diff options
Diffstat (limited to 'src/libxineadec/nosefart/mmc5_snd.c')
-rw-r--r-- | src/libxineadec/nosefart/mmc5_snd.c | 360 |
1 files changed, 0 insertions, 360 deletions
diff --git a/src/libxineadec/nosefart/mmc5_snd.c b/src/libxineadec/nosefart/mmc5_snd.c deleted file mode 100644 index 7269fa967..000000000 --- a/src/libxineadec/nosefart/mmc5_snd.c +++ /dev/null @@ -1,360 +0,0 @@ -/* -** Nofrendo (c) 1998-2000 Matthew Conte (matt@conte.com) -** -** -** This program is free software; you can redistribute it and/or -** modify it under the terms of version 2 of the GNU Library General -** Public License as published by the Free Software Foundation. -** -** This program is distributed in the hope that it will be useful, -** but WITHOUT ANY WARRANTY; without even the implied warranty of -** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -** Library General Public License for more details. To obtain a -** copy of the GNU Library General Public License, write to the Free -** Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. -** -** Any permitted reproduction of these routines, in whole or in part, -** must bear this legend. -** -** -** mmc5_snd.c -** -** Nintendo MMC5 sound emulation -** $Id: mmc5_snd.c,v 1.2 2003/12/05 15:55:01 f1rmb Exp $ -*/ - -#include <string.h> -#include "types.h" -#include "mmc5_snd.h" -#include "nes_apu.h" - -/* TODO: encapsulate apu/mmc5 rectangle */ - -#define APU_OVERSAMPLE -#define APU_VOLUME_DECAY(x) ((x) -= ((x) >> 7)) - - -typedef struct mmc5dac_s -{ - int32 output; - boolean enabled; -} mmc5dac_t; - - -/* look up table madness */ -static int32 decay_lut[16]; -static int vbl_lut[32]; - -/* various sound constants for sound emulation */ -/* vblank length table used for rectangles, triangle, noise */ -static const uint8 vbl_length[32] = -{ - 5, 127, 10, 1, 19, 2, 40, 3, 80, 4, 30, 5, 7, 6, 13, 7, - 6, 8, 12, 9, 24, 10, 48, 11, 96, 12, 36, 13, 8, 14, 16, 15 -}; - -/* ratios of pos/neg pulse for rectangle waves -** 2/16 = 12.5%, 4/16 = 25%, 8/16 = 50%, 12/16 = 75% -** (4-bit adder in rectangles, hence the 16) -*/ -static const int duty_lut[4] = -{ - 2, 4, 8, 12 -}; - - -static int32 mmc5_incsize; -static uint8 mul[2]; -static mmc5rectangle_t mmc5rect[2]; -static mmc5dac_t mmc5dac; - -#define MMC5_RECTANGLE_OUTPUT chan->output_vol -static int32 mmc5_rectangle(mmc5rectangle_t *chan) -{ - int32 output; - -#ifdef APU_OVERSAMPLE - int num_times; - int32 total; -#endif /* APU_OVERSAMPLE */ - - /* reg0: 0-3=volume, 4=envelope, 5=hold, 6-7=duty cycle - ** reg1: 0-2=sweep shifts, 3=sweep inc/dec, 4-6=sweep length, 7=sweep on - ** reg2: 8 bits of freq - ** reg3: 0-2=high freq, 7-4=vbl length counter - */ - - APU_VOLUME_DECAY(chan->output_vol); - - if (FALSE == chan->enabled || 0 == chan->vbl_length) - return MMC5_RECTANGLE_OUTPUT; - - /* vbl length counter */ - if (FALSE == chan->holdnote) - chan->vbl_length--; - - /* envelope decay at a rate of (env_delay + 1) / 240 secs */ - chan->env_phase -= 4; /* 240/60 */ - while (chan->env_phase < 0) - { - chan->env_phase += chan->env_delay; - - if (chan->holdnote) - chan->env_vol = (chan->env_vol + 1) & 0x0F; - else if (chan->env_vol < 0x0F) - chan->env_vol++; - } - - if (chan->freq < APU_TO_FIXED(4)) - return MMC5_RECTANGLE_OUTPUT; - - chan->phaseacc -= mmc5_incsize; /* # of cycles per sample */ - if (chan->phaseacc >= 0) - return MMC5_RECTANGLE_OUTPUT; - -#ifdef APU_OVERSAMPLE - num_times = total = 0; - - if (chan->fixed_envelope) - output = chan->volume << 8; /* fixed volume */ - else - output = (chan->env_vol ^ 0x0F) << 8; -#endif - - while (chan->phaseacc < 0) - { - chan->phaseacc += chan->freq; - chan->adder = (chan->adder + 1) & 0x0F; - -#ifdef APU_OVERSAMPLE - if (chan->adder < chan->duty_flip) - total += output; - else - total -= output; - - num_times++; -#endif - } - -#ifdef APU_OVERSAMPLE - chan->output_vol = total / num_times; -#else - if (chan->fixed_envelope) - output = chan->volume << 8; /* fixed volume */ - else - output = (chan->env_vol ^ 0x0F) << 8; - - if (0 == chan->adder) - chan->output_vol = output; - else if (chan->adder == chan->duty_flip) - chan->output_vol = -output; -#endif - - return MMC5_RECTANGLE_OUTPUT; -} - -static uint8 mmc5_read(uint32 address) -{ - uint32 retval; - - retval = (uint32) (mul[0] * mul[1]); - - switch (address) - { - case 0x5205: - return (uint8) retval; - - case 0x5206: - return (uint8) (retval >> 8); - - default: - return 0xFF; - } -} - -/* mix vrcvi sound channels together */ -static int32 mmc5_process(void) -{ - int32 accum; - - accum = mmc5_rectangle(&mmc5rect[0]); - accum += mmc5_rectangle(&mmc5rect[1]); - if (mmc5dac.enabled) - accum += mmc5dac.output; - - return accum; -} - -/* write to registers */ -static void mmc5_write(uint32 address, uint8 value) -{ - int chan; - - switch (address) - { - /* rectangles */ - case MMC5_WRA0: - case MMC5_WRB0: - chan = (address & 4) ? 1 : 0; - mmc5rect[chan].regs[0] = value; - - mmc5rect[chan].volume = value & 0x0F; - mmc5rect[chan].env_delay = decay_lut[value & 0x0F]; - mmc5rect[chan].holdnote = (value & 0x20) ? TRUE : FALSE; - mmc5rect[chan].fixed_envelope = (value & 0x10) ? TRUE : FALSE; - mmc5rect[chan].duty_flip = duty_lut[value >> 6]; - break; - - case MMC5_WRA1: - case MMC5_WRB1: - break; - - case MMC5_WRA2: - case MMC5_WRB2: - chan = (address & 4) ? 1 : 0; - mmc5rect[chan].regs[2] = value; - if (mmc5rect[chan].enabled) - mmc5rect[chan].freq = APU_TO_FIXED((((mmc5rect[chan].regs[3] & 7) << 8) + value) + 1); - break; - - case MMC5_WRA3: - case MMC5_WRB3: - chan = (address & 4) ? 1 : 0; - mmc5rect[chan].regs[3] = value; - - if (mmc5rect[chan].enabled) - { - mmc5rect[chan].vbl_length = vbl_lut[value >> 3]; - mmc5rect[chan].env_vol = 0; - mmc5rect[chan].freq = APU_TO_FIXED((((value & 7) << 8) + mmc5rect[chan].regs[2]) + 1); - mmc5rect[chan].adder = 0; - } - break; - - case MMC5_SMASK: - if (value & 0x01) - mmc5rect[0].enabled = TRUE; - else - { - mmc5rect[0].enabled = FALSE; - mmc5rect[0].vbl_length = 0; - } - - if (value & 0x02) - mmc5rect[1].enabled = TRUE; - else - { - mmc5rect[1].enabled = FALSE; - mmc5rect[1].vbl_length = 0; - } - - break; - - case 0x5010: - if (value & 0x01) - mmc5dac.enabled = TRUE; - else - mmc5dac.enabled = FALSE; - break; - - case 0x5011: - mmc5dac.output = (value ^ 0x80) << 8; - break; - - case 0x5205: - mul[0] = value; - break; - - case 0x5206: - mul[1] = value; - break; - - default: - break; - } -} - -/* reset state of vrcvi sound channels */ -static void mmc5_reset(void) -{ - int i; - - /* get the phase period from the apu */ - mmc5_incsize = apu_getcyclerate(); - - for (i = 0x5000; i < 0x5008; i++) - mmc5_write(i, 0); - - mmc5_write(0x5010, 0); - mmc5_write(0x5011, 0); -} - -static void mmc5_init(void) -{ - int i; - int num_samples = apu_getcontext()->num_samples; - - /* lut used for enveloping and frequency sweeps */ - for (i = 0; i < 16; i++) - decay_lut[i] = num_samples * (i + 1); - - /* used for note length, based on vblanks and size of audio buffer */ - for (i = 0; i < 32; i++) - vbl_lut[i] = vbl_length[i] * num_samples; -} - -/* TODO: bleh */ -static void mmc5_shutdown(void) -{ -} - -static apu_memread mmc5_memread[] = -{ - { 0x5205, 0x5206, mmc5_read }, - { -1, -1, NULL } -}; - -static apu_memwrite mmc5_memwrite[] = -{ - { 0x5000, 0x5015, mmc5_write }, - { 0x5205, 0x5206, mmc5_write }, - { -1, -1, NULL } -}; - -apuext_t mmc5_ext = -{ - mmc5_init, - mmc5_shutdown, - mmc5_reset, - mmc5_process, - mmc5_memread, - mmc5_memwrite -}; - -/* -** $Log: mmc5_snd.c,v $ -** Revision 1.2 2003/12/05 15:55:01 f1rmb -** cleanup phase II. use xprintf when it's relevant, use xine_xmalloc when it's relevant too. Small other little fix (can't remember). Change few internal function prototype because it xine_t pointer need to be used if some xine's internal sections. NOTE: libdvd{nav,read} is still too noisy, i will take a look to made it quit, without invasive changes. To be continued... -** -** Revision 1.1 2003/01/08 07:04:35 tmmm -** initial import of Nosefart sources -** -** Revision 1.6 2000/07/04 04:51:41 matt -** cleanups -** -** Revision 1.5 2000/07/03 02:18:53 matt -** much better external module exporting -** -** Revision 1.4 2000/06/28 22:03:51 matt -** fixed stupid oversight -** -** Revision 1.3 2000/06/20 20:46:58 matt -** minor cleanups -** -** Revision 1.2 2000/06/20 04:06:16 matt -** migrated external sound definition to apu module -** -** Revision 1.1 2000/06/20 00:06:47 matt -** initial revision -** -*/ |