notaz.gp2x.de / pcsx_rearmed.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
spu: remove some hacks
[pcsx_rearmed.git] / plugins / dfsound / registers.c
CommitLineData
ef79bbde
P		 1/***************************************************************************\r
2 registers.c - description\r
3 -------------------\r
4 begin : Wed May 15 2002\r
5 copyright : (C) 2002 by Pete Bernert\r
6 email : BlackDove@addcom.de\r
7 ***************************************************************************/\r
8/***************************************************************************\r
9 * *\r
10 * This program is free software; you can redistribute it and/or modify *\r
11 * it under the terms of the GNU General Public License as published by *\r
12 * the Free Software Foundation; either version 2 of the License, or *\r
13 * (at your option) any later version. See also the license.txt file for *\r
14 * additional informations. *\r
15 * *\r
16 ***************************************************************************/\r
17\r
18#include "stdafx.h"\r
19\r
20#define _IN_REGISTERS\r
21\r
22#include "externals.h"\r
23#include "registers.h"\r
ef79bbde 24\r
7e44d49d 25static void SoundOn(int start,int end,unsigned short val);\r
26static void SoundOff(int start,int end,unsigned short val);\r
27static void FModOn(int start,int end,unsigned short val);\r
28static void NoiseOn(int start,int end,unsigned short val);\r
29static void SetVolumeL(unsigned char ch,short vol);\r
30static void SetVolumeR(unsigned char ch,short vol);\r
31static void SetPitch(int ch,unsigned short val);\r
32static void ReverbOn(int start,int end,unsigned short val);\r
33\r
ef79bbde
P		 34////////////////////////////////////////////////////////////////////////\r
35// WRITE REGISTERS: called by main emu\r
36////////////////////////////////////////////////////////////////////////\r
37\r
650adfd2 38static const uint32_t ignore_dupe[8] = {\r
39 // ch 0-15 c40 c80 cc0\r
40 0x7f7f7f7f, 0x7f7f7f7f, 0x7f7f7f7f, 0x7f7f7f7f,\r
41 // ch 16-24 d40 control reverb\r
42 0x7f7f7f7f, 0x7f7f7f7f, 0xff05ff0f, 0xffffffff\r
43};\r
44\r
45void CALLBACK SPUwriteRegister(unsigned long reg, unsigned short val,\r
46 unsigned int cycles)\r
ef79bbde 47{\r
650adfd2 48 int r = reg & 0xfff;\r
49 int rofs = (r - 0xc00) >> 1;\r
50 int changed = regArea[rofs] != val;\r
51 regArea[rofs] = val;\r
52\r
53 if (!changed && (ignore_dupe[rofs >> 5] & (1 << (rofs & 0x1f))))\r
54 return;\r
55 // zero keyon/keyoff?\r
56 if (val == 0 && (r & 0xff8) == 0xd88)\r
57 return;\r
58\r
59 do_samples_if_needed(cycles);\r
ef79bbde
P		 60\r
61 if(r>=0x0c00 && r<0x0d80) // some channel info?\r
62 {\r
63 int ch=(r>>4)-0xc0; // calc channel\r
64 switch(r&0x0f)\r
65 {\r
66 //------------------------------------------------// r volume\r
67 case 0: \r
68 SetVolumeL((unsigned char)ch,val);\r
69 break;\r
70 //------------------------------------------------// l volume\r
71 case 2: \r
72 SetVolumeR((unsigned char)ch,val);\r
73 break;\r
74 //------------------------------------------------// pitch\r
75 case 4: \r
76 SetPitch(ch,val);\r
650adfd2 77 goto upd_irq;\r
ef79bbde
P		 78 //------------------------------------------------// start\r
79 case 6: \r
7e44d49d 80 // taken from regArea later\r
ef79bbde
P		 81 break;\r
82 //------------------------------------------------// level with pre-calcs\r
83 case 8:\r
84 {\r
6d866bb7 85 const unsigned long lval=val;\r
ef79bbde
P		 86 //---------------------------------------------//\r
87 s_chan[ch].ADSRX.AttackModeExp=(lval&0x8000)?1:0; \r
88 s_chan[ch].ADSRX.AttackRate=(lval>>8) & 0x007f;\r
89 s_chan[ch].ADSRX.DecayRate=(lval>>4) & 0x000f;\r
90 s_chan[ch].ADSRX.SustainLevel=lval & 0x000f;\r
91 //---------------------------------------------//\r
ef79bbde
P		 92 }\r
93 break;\r
94 //------------------------------------------------// adsr times with pre-calcs\r
95 case 10:\r
96 {\r
6d866bb7 97 const unsigned long lval=val;\r
ef79bbde
P		 98\r
99 //----------------------------------------------//\r
100 s_chan[ch].ADSRX.SustainModeExp = (lval&0x8000)?1:0;\r
101 s_chan[ch].ADSRX.SustainIncrease= (lval&0x4000)?0:1;\r
102 s_chan[ch].ADSRX.SustainRate = (lval>>6) & 0x007f;\r
103 s_chan[ch].ADSRX.ReleaseModeExp = (lval&0x0020)?1:0;\r
104 s_chan[ch].ADSRX.ReleaseRate = lval & 0x001f;\r
105 //----------------------------------------------//\r
ef79bbde
P		 106 }\r
107 break;\r
108 //------------------------------------------------// adsr volume... mmm have to investigate this\r
109 case 12:\r
110 break;\r
111 //------------------------------------------------//\r
112 case 14: // loop?\r
7e44d49d 113 s_chan[ch].pLoop=spuMemC+((val&~1)<<3);\r
650adfd2 114 goto upd_irq;\r
ef79bbde
P		 115 //------------------------------------------------//\r
116 }\r
ef79bbde
P		 117 return;\r
118 }\r
119\r
120 switch(r)\r
121 {\r
122 //-------------------------------------------------//\r
123 case H_SPUaddr:\r
124 spuAddr = (unsigned long) val<<3;\r
125 break;\r
126 //-------------------------------------------------//\r
127 case H_SPUdata:\r
128 spuMem[spuAddr>>1] = val;\r
129 spuAddr+=2;\r
130 if(spuAddr>0x7ffff) spuAddr=0;\r
131 break;\r
132 //-------------------------------------------------//\r
133 case H_SPUctrl:\r
650adfd2 134 if (!(spuCtrl & CTRL_IRQ)) {\r
3fc2a4c2 135 spuStat&=~STAT_IRQ;\r
650adfd2 136 if (val & CTRL_IRQ)\r
137 schedule_next_irq();\r
138 }\r
ef79bbde
P		 139 spuCtrl=val;\r
140 break;\r
141 //-------------------------------------------------//\r
142 case H_SPUstat:\r
143 spuStat=val & 0xf800;\r
144 break;\r
145 //-------------------------------------------------//\r
146 case H_SPUReverbAddr:\r
147 if(val==0xFFFF || val<=0x200)\r
148 {rvb.StartAddr=rvb.CurrAddr=0;}\r
149 else\r
150 {\r
151 const long iv=(unsigned long)val<<2;\r
152 if(rvb.StartAddr!=iv)\r
153 {\r
154 rvb.StartAddr=(unsigned long)val<<2;\r
155 rvb.CurrAddr=rvb.StartAddr;\r
156 }\r
157 }\r
650adfd2 158 goto rvbd;\r
ef79bbde
P		 159 //-------------------------------------------------//\r
160 case H_SPUirqAddr:\r
161 spuIrq = val;\r
3fc2a4c2 162 pSpuIrq=spuMemC+(((unsigned long) val<<3)&~0xf);\r
650adfd2 163 goto upd_irq;\r
ef79bbde
P		 164 //-------------------------------------------------//\r
165 case H_SPUrvolL:\r
166 rvb.VolLeft=val;\r
167 break;\r
168 //-------------------------------------------------//\r
169 case H_SPUrvolR:\r
170 rvb.VolRight=val;\r
171 break;\r
172 //-------------------------------------------------//\r
173\r
174/*\r
175 case H_ExtLeft:\r
176 //auxprintf("EL %d\n",val);\r
177 break;\r
178 //-------------------------------------------------//\r
179 case H_ExtRight:\r
180 //auxprintf("ER %d\n",val);\r
181 break;\r
182 //-------------------------------------------------//\r
183 case H_SPUmvolL:\r
184 //auxprintf("ML %d\n",val);\r
185 break;\r
186 //-------------------------------------------------//\r
187 case H_SPUmvolR:\r
188 //auxprintf("MR %d\n",val);\r
189 break;\r
190 //-------------------------------------------------//\r
191 case H_SPUMute1:\r
192 //auxprintf("M0 %04x\n",val);\r
193 break;\r
194 //-------------------------------------------------//\r
195 case H_SPUMute2:\r
196 //auxprintf("M1 %04x\n",val);\r
197 break;\r
198*/\r
199 //-------------------------------------------------//\r
200 case H_SPUon1:\r
201 SoundOn(0,16,val);\r
202 break;\r
203 //-------------------------------------------------//\r
204 case H_SPUon2:\r
205 SoundOn(16,24,val);\r
206 break;\r
207 //-------------------------------------------------//\r
208 case H_SPUoff1:\r
209 SoundOff(0,16,val);\r
210 break;\r
211 //-------------------------------------------------//\r
212 case H_SPUoff2:\r
213 SoundOff(16,24,val);\r
214 break;\r
215 //-------------------------------------------------//\r
216 case H_CDLeft:\r
217 iLeftXAVol=val & 0x7fff;\r
218 if(cddavCallback) cddavCallback(0,val);\r
219 break;\r
220 case H_CDRight:\r
221 iRightXAVol=val & 0x7fff;\r
222 if(cddavCallback) cddavCallback(1,val);\r
223 break;\r
224 //-------------------------------------------------//\r
225 case H_FMod1:\r
226 FModOn(0,16,val);\r
227 break;\r
228 //-------------------------------------------------//\r
229 case H_FMod2:\r
230 FModOn(16,24,val);\r
231 break;\r
232 //-------------------------------------------------//\r
233 case H_Noise1:\r
234 NoiseOn(0,16,val);\r
235 break;\r
236 //-------------------------------------------------//\r
237 case H_Noise2:\r
238 NoiseOn(16,24,val);\r
239 break;\r
240 //-------------------------------------------------//\r
241 case H_RVBon1:\r
242 ReverbOn(0,16,val);\r
243 break;\r
244 //-------------------------------------------------//\r
245 case H_RVBon2:\r
246 ReverbOn(16,24,val);\r
247 break;\r
248 //-------------------------------------------------//\r
650adfd2 249 case H_Reverb+0 : rvb.FB_SRC_A=val*4; goto rvbd;\r
250 case H_Reverb+2 : rvb.FB_SRC_B=val*4; goto rvbd;\r
251 case H_Reverb+4 : rvb.IIR_ALPHA=(short)val; goto rvbd;\r
252 case H_Reverb+6 : rvb.ACC_COEF_A=(short)val; goto rvbd;\r
253 case H_Reverb+8 : rvb.ACC_COEF_B=(short)val; goto rvbd;\r
254 case H_Reverb+10 : rvb.ACC_COEF_C=(short)val; goto rvbd;\r
255 case H_Reverb+12 : rvb.ACC_COEF_D=(short)val; goto rvbd;\r
256 case H_Reverb+14 : rvb.IIR_COEF=(short)val; goto rvbd;\r
257 case H_Reverb+16 : rvb.FB_ALPHA=(short)val; goto rvbd;\r
258 case H_Reverb+18 : rvb.FB_X=(short)val; goto rvbd;\r
259 case H_Reverb+20 : rvb.IIR_DEST_A0=val*4; goto rvbd;\r
260 case H_Reverb+22 : rvb.IIR_DEST_A1=val*4; goto rvbd;\r
261 case H_Reverb+24 : rvb.ACC_SRC_A0=val*4; goto rvbd;\r
262 case H_Reverb+26 : rvb.ACC_SRC_A1=val*4; goto rvbd;\r
263 case H_Reverb+28 : rvb.ACC_SRC_B0=val*4; goto rvbd;\r
264 case H_Reverb+30 : rvb.ACC_SRC_B1=val*4; goto rvbd;\r
265 case H_Reverb+32 : rvb.IIR_SRC_A0=val*4; goto rvbd;\r
266 case H_Reverb+34 : rvb.IIR_SRC_A1=val*4; goto rvbd;\r
267 case H_Reverb+36 : rvb.IIR_DEST_B0=val*4; goto rvbd;\r
268 case H_Reverb+38 : rvb.IIR_DEST_B1=val*4; goto rvbd;\r
269 case H_Reverb+40 : rvb.ACC_SRC_C0=val*4; goto rvbd;\r
270 case H_Reverb+42 : rvb.ACC_SRC_C1=val*4; goto rvbd;\r
271 case H_Reverb+44 : rvb.ACC_SRC_D0=val*4; goto rvbd;\r
272 case H_Reverb+46 : rvb.ACC_SRC_D1=val*4; goto rvbd;\r
273 case H_Reverb+48 : rvb.IIR_SRC_B1=val*4; goto rvbd;\r
274 case H_Reverb+50 : rvb.IIR_SRC_B0=val*4; goto rvbd;\r
275 case H_Reverb+52 : rvb.MIX_DEST_A0=val*4; goto rvbd;\r
276 case H_Reverb+54 : rvb.MIX_DEST_A1=val*4; goto rvbd;\r
277 case H_Reverb+56 : rvb.MIX_DEST_B0=val*4; goto rvbd;\r
278 case H_Reverb+58 : rvb.MIX_DEST_B1=val*4; goto rvbd;\r
279 case H_Reverb+60 : rvb.IN_COEF_L=(short)val; goto rvbd;\r
280 case H_Reverb+62 : rvb.IN_COEF_R=(short)val; goto rvbd;\r
ef79bbde 281 }\r
650adfd2 282 return;\r
283\r
284upd_irq:\r
285 if (spuCtrl & CTRL_IRQ)\r
286 schedule_next_irq();\r
287 return;\r
ef79bbde 288\r
650adfd2 289rvbd:\r
290 rvb.dirty = 1; // recalculate on next update\r
ef79bbde
P		 291}\r
292\r
293////////////////////////////////////////////////////////////////////////\r
294// READ REGISTER: called by main emu\r
295////////////////////////////////////////////////////////////////////////\r
296\r
297unsigned short CALLBACK SPUreadRegister(unsigned long reg)\r
298{\r
299 const unsigned long r=reg&0xfff;\r
300 \r
ef79bbde
P		 301 if(r>=0x0c00 && r<0x0d80)\r
302 {\r
303 switch(r&0x0f)\r
304 {\r
305 case 12: // get adsr vol\r
306 {\r
307 const int ch=(r>>4)-0xc0;\r
6d866bb7 308 if(dwNewChannel&(1<<ch)) return 1; // we are started, but not processed? return 1\r
309 if((dwChannelOn&(1<<ch)) && // same here... we haven't decoded one sample yet, so no envelope yet. return 1 as well\r
310 !s_chan[ch].ADSRX.EnvelopeVol)\r
ef79bbde
P		 311 return 1;\r
312 return (unsigned short)(s_chan[ch].ADSRX.EnvelopeVol>>16);\r
313 }\r
314\r
315 case 14: // get loop address\r
316 {\r
317 const int ch=(r>>4)-0xc0;\r
ef79bbde
P		 318 return (unsigned short)((s_chan[ch].pLoop-spuMemC)>>3);\r
319 }\r
320 }\r
321 }\r
322\r
323 switch(r)\r
324 {\r
325 case H_SPUctrl:\r
326 return spuCtrl;\r
327\r
328 case H_SPUstat:\r
329 return spuStat;\r
330 \r
331 case H_SPUaddr:\r
332 return (unsigned short)(spuAddr>>3);\r
333\r
334 case H_SPUdata:\r
335 {\r
336 unsigned short s=spuMem[spuAddr>>1];\r
337 spuAddr+=2;\r
338 if(spuAddr>0x7ffff) spuAddr=0;\r
339 return s;\r
340 }\r
341\r
342 case H_SPUirqAddr:\r
343 return spuIrq;\r
344\r
345 //case H_SPUIsOn1:\r
346 // return IsSoundOn(0,16);\r
347\r
348 //case H_SPUIsOn2:\r
349 // return IsSoundOn(16,24);\r
350 \r
351 }\r
352\r
353 return regArea[(r-0xc00)>>1];\r
354}\r
355 \r
356////////////////////////////////////////////////////////////////////////\r
357// SOUND ON register write\r
358////////////////////////////////////////////////////////////////////////\r
359\r
7e44d49d 360static void SoundOn(int start,int end,unsigned short val)\r
ef79bbde
P		 361{\r
362 int ch;\r
363\r
364 for(ch=start;ch<end;ch++,val>>=1) // loop channels\r
365 {\r
77d6fd63 366 if((val&1) && regAreaGet(ch,6)) // mmm... start has to be set before key on !?!\r
ef79bbde 367 {\r
b00afb77 368 // do this here, not in StartSound\r
369 // - fixes fussy timing issues\r
370 s_chan[ch].bStop=0;\r
77d6fd63 371 s_chan[ch].pCurr=spuMemC+((regAreaGet(ch,6)&~1)<<3); // must be block aligned\r
372 s_chan[ch].pLoop=spuMemC+((regAreaGet(ch,14)&~1)<<3);\r
e4f075af 373 s_chan[ch].prevflags=2;\r
b00afb77 374\r
ef79bbde 375 dwNewChannel|=(1<<ch); // bitfield for faster testing\r
6d866bb7 376 dwChannelOn|=1<<ch;\r
174c454a 377 dwChannelDead&=~(1<<ch);\r
ef79bbde
P		 378 }\r
379 }\r
380}\r
381\r
382////////////////////////////////////////////////////////////////////////\r
383// SOUND OFF register write\r
384////////////////////////////////////////////////////////////////////////\r
385\r
7e44d49d 386static void SoundOff(int start,int end,unsigned short val)\r
ef79bbde
P		 387{\r
388 int ch;\r
389 for(ch=start;ch<end;ch++,val>>=1) // loop channels\r
390 {\r
391 if(val&1) // && s_chan[i].bOn) mmm...\r
392 {\r
393 s_chan[ch].bStop=1;\r
b00afb77 394\r
395 // Jungle Book - Rhythm 'n Groove\r
396 // - turns off buzzing sound (loop hangs)\r
b00afb77 397 dwNewChannel &= ~(1<<ch);\r
ef79bbde
P		 398 } \r
399 }\r
400}\r
401\r
402////////////////////////////////////////////////////////////////////////\r
403// FMOD register write\r
404////////////////////////////////////////////////////////////////////////\r
405\r
7e44d49d 406static void FModOn(int start,int end,unsigned short val)\r
ef79bbde
P		 407{\r
408 int ch;\r
409\r
410 for(ch=start;ch<end;ch++,val>>=1) // loop channels\r
411 {\r
412 if(val&1) // -> fmod on/off\r
413 {\r
414 if(ch>0) \r
415 {\r
416 s_chan[ch].bFMod=1; // --> sound channel\r
417 s_chan[ch-1].bFMod=2; // --> freq channel\r
418 }\r
419 }\r
420 else\r
421 {\r
422 s_chan[ch].bFMod=0; // --> turn off fmod\r
07a6dd2c 423 if(ch>0&&s_chan[ch-1].bFMod==2)\r
424 s_chan[ch-1].bFMod=0;\r
ef79bbde
P		 425 }\r
426 }\r
427}\r
428\r
429////////////////////////////////////////////////////////////////////////\r
430// NOISE register write\r
431////////////////////////////////////////////////////////////////////////\r
432\r
7e44d49d 433static void NoiseOn(int start,int end,unsigned short val)\r
ef79bbde
P		 434{\r
435 int ch;\r
436\r
437 for(ch=start;ch<end;ch++,val>>=1) // loop channels\r
438 {\r
6d866bb7 439 s_chan[ch].bNoise=val&1; // -> noise on/off\r
ef79bbde
P		 440 }\r
441}\r
442\r
443////////////////////////////////////////////////////////////////////////\r
444// LEFT VOLUME register write\r
445////////////////////////////////////////////////////////////////////////\r
446\r
447// please note: sweep and phase invert are wrong... but I've never seen\r
448// them used\r
449\r
7e44d49d 450static void SetVolumeL(unsigned char ch,short vol) // LEFT VOLUME\r
ef79bbde 451{\r
ef79bbde
P		 452 if(vol&0x8000) // sweep?\r
453 {\r
454 short sInc=1; // -> sweep up?\r
455 if(vol&0x2000) sInc=-1; // -> or down?\r
456 if(vol&0x1000) vol^=0xffff; // -> mmm... phase inverted? have to investigate this\r
457 vol=((vol&0x7f)+1)/2; // -> sweep: 0..127 -> 0..64\r
458 vol+=vol/(2*sInc); // -> HACK: we don't sweep right now, so we just raise/lower the volume by the half!\r
459 vol*=128;\r
460 }\r
461 else // no sweep:\r
462 {\r
463 if(vol&0x4000) // -> mmm... phase inverted? have to investigate this\r
464 //vol^=0xffff;\r
465 vol=0x3fff-(vol&0x3fff);\r
466 }\r
467\r
468 vol&=0x3fff;\r
469 s_chan[ch].iLeftVolume=vol; // store volume\r
470}\r
471\r
472////////////////////////////////////////////////////////////////////////\r
473// RIGHT VOLUME register write\r
474////////////////////////////////////////////////////////////////////////\r
475\r
7e44d49d 476static void SetVolumeR(unsigned char ch,short vol) // RIGHT VOLUME\r
ef79bbde 477{\r
ef79bbde
P		 478 if(vol&0x8000) // comments... see above :)\r
479 {\r
480 short sInc=1;\r
481 if(vol&0x2000) sInc=-1;\r
482 if(vol&0x1000) vol^=0xffff;\r
483 vol=((vol&0x7f)+1)/2; \r
484 vol+=vol/(2*sInc);\r
485 vol*=128;\r
486 }\r
487 else \r
488 {\r
489 if(vol&0x4000) //vol=vol^=0xffff;\r
490 vol=0x3fff-(vol&0x3fff);\r
491 }\r
492\r
493 vol&=0x3fff;\r
494\r
495 s_chan[ch].iRightVolume=vol;\r
496}\r
497\r
498////////////////////////////////////////////////////////////////////////\r
499// PITCH register write\r
500////////////////////////////////////////////////////////////////////////\r
501\r
7e44d49d 502static void SetPitch(int ch,unsigned short val) // SET PITCH\r
ef79bbde
P		 503{\r
504 int NP;\r
505 if(val>0x3fff) NP=0x3fff; // get pitch val\r
506 else NP=val;\r
507\r
508 s_chan[ch].iRawPitch=NP;\r
7e44d49d 509 s_chan[ch].sinc=(NP<<4)|8;\r
650adfd2 510 s_chan[ch].sinc_inv=0;\r
7e44d49d 511 if(iUseInterpolation==1) s_chan[ch].SB[32]=1; // -> freq change in simple interpolation mode: set flag\r
ef79bbde
P		 512}\r
513\r
514////////////////////////////////////////////////////////////////////////\r
515// REVERB register write\r
516////////////////////////////////////////////////////////////////////////\r
517\r
7e44d49d 518static void ReverbOn(int start,int end,unsigned short val)\r
ef79bbde
P		 519{\r
520 int ch;\r
521\r
522 for(ch=start;ch<end;ch++,val>>=1) // loop channels\r
523 {\r
6d866bb7 524 s_chan[ch].bReverb=val&1; // -> reverb on/off\r
ef79bbde
P		 525 }\r
526}\r
ARM optimized PCSX fork