2b50c1fdded127fa42961eff0cb01a42b522399d
[pcsx_rearmed.git] / plugins / dfsound / freeze.c
1 /***************************************************************************\r
2                           freeze.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 <stddef.h>\r
19 #include <assert.h>\r
20 #include "stdafx.h"\r
21 \r
22 #define _IN_FREEZE\r
23 \r
24 #include "externals.h"\r
25 #include "registers.h"\r
26 #include "spu.h"\r
27 \r
28 ////////////////////////////////////////////////////////////////////////\r
29 // freeze structs\r
30 ////////////////////////////////////////////////////////////////////////\r
31 \r
32 typedef struct\r
33 {\r
34  int            AttackModeExp;\r
35  int            AttackTime;\r
36  int            DecayTime;\r
37  int            SustainLevel;\r
38  int            SustainModeExp;\r
39  int            SustainModeDec;\r
40  int            SustainTime;\r
41  int            ReleaseModeExp;\r
42  unsigned int   ReleaseVal;\r
43  int            ReleaseTime;\r
44  int            ReleaseStartTime; \r
45  int            ReleaseVol; \r
46  int            lTime;\r
47  int            lVolume;\r
48 } ADSRInfo;\r
49 \r
50 typedef struct\r
51 {\r
52  int            State;\r
53  int            AttackModeExp;\r
54  int            AttackRate;\r
55  int            DecayRate;\r
56  int            SustainLevel;\r
57  int            SustainModeExp;\r
58  int            SustainIncrease;\r
59  int            SustainRate;\r
60  int            ReleaseModeExp;\r
61  int            ReleaseRate;\r
62  int            EnvelopeVol;\r
63  int            lVolume;\r
64  int            lDummy1;\r
65  int            lDummy2;\r
66 } ADSRInfoEx_orig;\r
67 \r
68 typedef struct\r
69 {\r
70  // no mutexes used anymore... don't need them to sync access\r
71  //HANDLE            hMutex;\r
72 \r
73  int               bNew;                               // start flag\r
74 \r
75  int               iSBPos;                             // mixing stuff\r
76  int               spos;\r
77  int               sinc;\r
78  int               SB[32+32];                          // Pete added another 32 dwords in 1.6 ... prevents overflow issues with gaussian/cubic interpolation (thanx xodnizel!), and can be used for even better interpolations, eh? :)\r
79  int               sval;\r
80 \r
81  int               iStart;                             // start ptr into sound mem\r
82  int               iCurr;                              // current pos in sound mem\r
83  int               iLoop;                              // loop ptr in sound mem\r
84 \r
85  int               bOn;                                // is channel active (sample playing?)\r
86  int               bStop;                              // is channel stopped (sample _can_ still be playing, ADSR Release phase)\r
87  int               bReverb;                            // can we do reverb on this channel? must have ctrl register bit, to get active\r
88  int               iActFreq;                           // current psx pitch\r
89  int               iUsedFreq;                          // current pc pitch\r
90  int               iLeftVolume;                        // left volume\r
91  int               iLeftVolRaw;                        // left psx volume value\r
92  int               bIgnoreLoop;                        // ignore loop bit, if an external loop address is used\r
93  int               iMute;                              // mute mode\r
94  int               iRightVolume;                       // right volume\r
95  int               iRightVolRaw;                       // right psx volume value\r
96  int               iRawPitch;                          // raw pitch (0...3fff)\r
97  int               iIrqDone;                           // debug irq done flag\r
98  int               s_1;                                // last decoding infos\r
99  int               s_2;\r
100  int               bRVBActive;                         // reverb active flag\r
101  int               iRVBOffset;                         // reverb offset\r
102  int               iRVBRepeat;                         // reverb repeat\r
103  int               bNoise;                             // noise active flag\r
104  int               bFMod;                              // freq mod (0=off, 1=sound channel, 2=freq channel)\r
105  int               iRVBNum;                            // another reverb helper\r
106  int               iOldNoise;                          // old noise val for this channel   \r
107  ADSRInfo          ADSR;                               // active ADSR settings\r
108  ADSRInfoEx_orig   ADSRX;                              // next ADSR settings (will be moved to active on sample start)\r
109 } SPUCHAN_orig;\r
110 \r
111 typedef struct SPUFreeze\r
112 {\r
113  char          szSPUName[8];\r
114  uint32_t ulFreezeVersion;\r
115  uint32_t ulFreezeSize;\r
116  unsigned char cSPUPort[0x200];\r
117  unsigned char cSPURam[0x80000];\r
118  xa_decode_t   xaS;     \r
119 } SPUFreeze_t;\r
120 \r
121 typedef struct\r
122 {\r
123  unsigned short  spuIrq;\r
124  unsigned short  decode_pos;\r
125  uint32_t   pSpuIrq;\r
126  uint32_t   spuAddr;\r
127  uint32_t   rvb_cur;\r
128  uint16_t   xa_left;\r
129  uint16_t   cdda_left;\r
130  uint32_t   cycles_played;\r
131 \r
132  SPUCHAN_orig s_chan[MAXCHAN];   \r
133 \r
134  uint32_t   cycles_dma_end;\r
135  uint32_t   decode_dirty_ch;\r
136  uint32_t   dwNoiseVal;\r
137  uint32_t   dwNoiseCount;\r
138  uint32_t   XARepeat;\r
139  uint32_t   XALastVal;\r
140  uint32_t   last_keyon_cycles;\r
141  uint32_t   rvb_sb[2][4];\r
142  int32_t    interpolation; // which interpolation's data is in SPUCHAN_orig::SB\r
143 \r
144 } SPUOSSFreeze_t;\r
145 \r
146 ////////////////////////////////////////////////////////////////////////\r
147 \r
148 static SPUOSSFreeze_t * LoadStateV5(SPUFreeze_t * pF, uint32_t cycles);\r
149 static void LoadStateUnknown(SPUFreeze_t * pF, uint32_t cycles); // unknown format\r
150 \r
151 // we want to retain compatibility between versions,\r
152 // so use original channel struct\r
153 static void save_channel(SPUCHAN_orig *d, const SPUCHAN *s, int ch)\r
154 {\r
155  memset(d, 0, sizeof(*d));\r
156  d->bNew = !!(spu.dwNewChannel & (1<<ch));\r
157  d->iSBPos = s->iSBPos;\r
158  d->spos = s->spos;\r
159  d->sinc = s->sinc;\r
160  assert(sizeof(d->SB) >= sizeof(spu.sb[ch]));\r
161  memcpy(d->SB, &spu.sb[ch], sizeof(spu.sb[ch]));\r
162  d->iStart = (regAreaGetCh(ch, 6) & ~1) << 3;\r
163  d->iCurr = 0; // set by the caller\r
164  d->iLoop = 0; // set by the caller\r
165  d->bOn = !!(spu.dwChannelsAudible & (1<<ch));\r
166  d->bStop = s->ADSRX.State == ADSR_RELEASE;\r
167  d->bReverb = s->bReverb;\r
168  d->iActFreq = 1;\r
169  d->iUsedFreq = 2;\r
170  d->iLeftVolume = s->iLeftVolume;\r
171  // this one is nasty but safe, save compat is important\r
172  d->bIgnoreLoop = (s->prevflags ^ 2) << 1;\r
173  d->iRightVolume = s->iRightVolume;\r
174  d->iRawPitch = s->iRawPitch;\r
175  d->s_1 = spu.sb[ch].SB[27]; // yes it's reversed\r
176  d->s_2 = spu.sb[ch].SB[26];\r
177  d->bRVBActive = s->bRVBActive;\r
178  d->bNoise = s->bNoise;\r
179  d->bFMod = s->bFMod;\r
180  d->ADSRX.State = s->ADSRX.State;\r
181  d->ADSRX.AttackModeExp = s->ADSRX.AttackModeExp;\r
182  d->ADSRX.AttackRate = s->ADSRX.AttackRate;\r
183  d->ADSRX.DecayRate = s->ADSRX.DecayRate;\r
184  d->ADSRX.SustainLevel = s->ADSRX.SustainLevel;\r
185  d->ADSRX.SustainModeExp = s->ADSRX.SustainModeExp;\r
186  d->ADSRX.SustainIncrease = s->ADSRX.SustainIncrease;\r
187  d->ADSRX.SustainRate = s->ADSRX.SustainRate;\r
188  d->ADSRX.ReleaseModeExp = s->ADSRX.ReleaseModeExp;\r
189  d->ADSRX.ReleaseRate = s->ADSRX.ReleaseRate;\r
190  d->ADSRX.EnvelopeVol = s->ADSRX.EnvelopeVol;\r
191  d->ADSRX.lVolume = d->bOn; // hmh\r
192 }\r
193 \r
194 static void load_channel(SPUCHAN *d, const SPUCHAN_orig *s, int ch)\r
195 {\r
196  memset(d, 0, sizeof(*d));\r
197  if (s->bNew) spu.dwNewChannel |= 1<<ch;\r
198  d->iSBPos = s->iSBPos;\r
199  if ((uint32_t)d->iSBPos >= 28) d->iSBPos = 27;\r
200  d->spos = s->spos;\r
201  d->sinc = s->sinc;\r
202  d->sinc_inv = 0;\r
203  memcpy(&spu.sb[ch], s->SB, sizeof(spu.sb[ch]));\r
204  d->pCurr = (void *)((uintptr_t)s->iCurr & 0x7fff0);\r
205  d->pLoop = (void *)((uintptr_t)s->iLoop & 0x7fff0);\r
206  d->bReverb = s->bReverb;\r
207  d->iLeftVolume = s->iLeftVolume;\r
208  d->iRightVolume = s->iRightVolume;\r
209  d->iRawPitch = s->iRawPitch;\r
210  d->bRVBActive = s->bRVBActive;\r
211  d->bNoise = s->bNoise;\r
212  d->bFMod = s->bFMod;\r
213  d->prevflags = (s->bIgnoreLoop >> 1) ^ 2;\r
214  d->ADSRX.State = s->ADSRX.State;\r
215  if (s->bStop) d->ADSRX.State = ADSR_RELEASE;\r
216  d->ADSRX.AttackModeExp = s->ADSRX.AttackModeExp;\r
217  d->ADSRX.AttackRate = s->ADSRX.AttackRate;\r
218  d->ADSRX.DecayRate = s->ADSRX.DecayRate;\r
219  d->ADSRX.SustainLevel = s->ADSRX.SustainLevel;\r
220  d->ADSRX.SustainModeExp = s->ADSRX.SustainModeExp;\r
221  d->ADSRX.SustainIncrease = s->ADSRX.SustainIncrease;\r
222  d->ADSRX.SustainRate = s->ADSRX.SustainRate;\r
223  d->ADSRX.ReleaseModeExp = s->ADSRX.ReleaseModeExp;\r
224  d->ADSRX.ReleaseRate = s->ADSRX.ReleaseRate;\r
225  d->ADSRX.EnvelopeVol = s->ADSRX.EnvelopeVol;\r
226  if (s->bOn) spu.dwChannelsAudible |= 1<<ch;\r
227  else d->ADSRX.EnvelopeVol = 0;\r
228 }\r
229 \r
230 // force load from regArea to variables\r
231 static void load_register(unsigned long reg, unsigned int cycles)\r
232 {\r
233  unsigned short *r = &spu.regArea[((reg & 0xfff) - 0xc00) >> 1];\r
234  *r ^= 1;\r
235  SPUwriteRegister(reg, *r ^ 1, cycles);\r
236 }\r
237 \r
238 ////////////////////////////////////////////////////////////////////////\r
239 // SPUFREEZE: called by main emu on savestate load/save\r
240 ////////////////////////////////////////////////////////////////////////\r
241 \r
242 long DoFreeze(unsigned int ulFreezeMode, SPUFreeze_t * pF,\r
243  unsigned int cycles)\r
244 {\r
245  SPUOSSFreeze_t * pFO = NULL;\r
246  sample_buf *sb_rvb = &spu.sb[MAXCHAN];\r
247  int i, j;\r
248 \r
249  if(!pF) return 0;                                     // first check\r
250 \r
251 #if P_HAVE_PTHREAD || defined(WANT_THREAD_CODE)\r
252  sb_rvb = &spu.sb_thread[MAXCHAN];\r
253 #endif\r
254  if(ulFreezeMode)                                      // info or save?\r
255   {//--------------------------------------------------//\r
256    int xa_left = 0, cdda_left = 0;\r
257    do_samples(cycles, 1);\r
258 \r
259    if(ulFreezeMode==1)                                 \r
260     memset(pF,0,sizeof(SPUFreeze_t)+sizeof(SPUOSSFreeze_t));\r
261 \r
262    strcpy(pF->szSPUName,"PBOSS");\r
263    pF->ulFreezeVersion=5;\r
264    pF->ulFreezeSize=sizeof(SPUFreeze_t)+sizeof(SPUOSSFreeze_t);\r
265 \r
266    if(ulFreezeMode==2) return 1;                       // info mode? ok, bye\r
267                                                        // save mode:\r
268    regAreaGet(H_SPUctrl) = spu.spuCtrl;\r
269    regAreaGet(H_SPUstat) = spu.spuStat;\r
270    memcpy(pF->cSPURam,spu.spuMem,0x80000);             // copy common infos\r
271    memcpy(pF->cSPUPort,spu.regArea,0x200);\r
272 \r
273    if(spu.xapGlobal && spu.XAPlay!=spu.XAFeed)         // some xa\r
274     {\r
275      xa_left = spu.XAFeed - spu.XAPlay;\r
276      if (xa_left < 0)\r
277       xa_left = spu.XAEnd - spu.XAPlay + spu.XAFeed - spu.XAStart;\r
278      pF->xaS = *spu.xapGlobal;\r
279     }\r
280    else if (spu.CDDAPlay != spu.CDDAFeed)\r
281     {\r
282      // abuse the xa struct to store leftover cdda samples\r
283      unsigned int *p = spu.CDDAPlay;\r
284      cdda_left = spu.CDDAFeed - spu.CDDAPlay;\r
285      if (cdda_left < 0)\r
286       cdda_left = spu.CDDAEnd - spu.CDDAPlay + spu.CDDAFeed - spu.CDDAStart;\r
287      if (cdda_left > sizeof(pF->xaS.pcm) / 4)\r
288       cdda_left = sizeof(pF->xaS.pcm) / 4;\r
289      if (p + cdda_left <= spu.CDDAEnd)\r
290       memcpy(pF->xaS.pcm, p, cdda_left * 4);\r
291      else {\r
292       memcpy(pF->xaS.pcm, p, (spu.CDDAEnd - p) * 4);\r
293       memcpy((char *)pF->xaS.pcm + (spu.CDDAEnd - p) * 4, spu.CDDAStart,\r
294              (cdda_left - (spu.CDDAEnd - p)) * 4);\r
295      }\r
296      pF->xaS.nsamples = 0;\r
297     }\r
298    else\r
299     memset(&pF->xaS,0,sizeof(xa_decode_t));            // or clean xa\r
300 \r
301    pFO=(SPUOSSFreeze_t *)(pF+1);                       // store special stuff\r
302 \r
303    pFO->spuIrq = spu.regArea[(H_SPUirqAddr - 0x0c00) / 2];\r
304    if(spu.pSpuIrq) pFO->pSpuIrq = spu.pSpuIrq - spu.spuMemC;\r
305 \r
306    pFO->spuAddr=spu.spuAddr;\r
307    if(pFO->spuAddr==0) pFO->spuAddr=0xbaadf00d;\r
308    pFO->decode_pos = spu.decode_pos;\r
309    pFO->rvb_cur = spu.rvb->CurrAddr;\r
310    pFO->xa_left = xa_left;\r
311    pFO->cdda_left = cdda_left;\r
312    pFO->cycles_played = spu.cycles_played;\r
313    pFO->cycles_dma_end = spu.cycles_dma_end;\r
314    pFO->decode_dirty_ch = spu.decode_dirty_ch;\r
315    pFO->dwNoiseVal = spu.dwNoiseVal;\r
316    pFO->dwNoiseCount = spu.dwNoiseCount;\r
317    pFO->XARepeat = spu.XARepeat;\r
318    pFO->XALastVal = spu.XALastVal;\r
319    pFO->last_keyon_cycles = spu.last_keyon_cycles;\r
320    for (i = 0; i < 2; i++)\r
321     memcpy(&pFO->rvb_sb[i], sb_rvb->SB_rvb[i], sizeof(pFO->rvb_sb[i]));\r
322    pFO->interpolation = spu.interpolation;\r
323 \r
324    for(i=0;i<MAXCHAN;i++)\r
325     {\r
326      save_channel(&pFO->s_chan[i],&spu.s_chan[i],i);\r
327      if(spu.s_chan[i].pCurr)\r
328       pFO->s_chan[i].iCurr=spu.s_chan[i].pCurr-spu.spuMemC;\r
329      if(spu.s_chan[i].pLoop)\r
330       pFO->s_chan[i].iLoop=spu.s_chan[i].pLoop-spu.spuMemC;\r
331     }\r
332 \r
333    return 1;\r
334    //--------------------------------------------------//\r
335   }\r
336                                                        \r
337  if(ulFreezeMode!=0) return 0;                         // bad mode? bye\r
338 \r
339  memcpy(spu.spuMem,pF->cSPURam,0x80000);               // get ram\r
340  memcpy(spu.regArea,pF->cSPUPort,0x200);\r
341  spu.bMemDirty = 1;\r
342  spu.spuCtrl = regAreaGet(H_SPUctrl);\r
343  spu.spuStat = regAreaGet(H_SPUstat);\r
344 \r
345  if (!strcmp(pF->szSPUName,"PBOSS") && pF->ulFreezeVersion==5)\r
346    pFO = LoadStateV5(pF, cycles);\r
347  else LoadStateUnknown(pF, cycles);\r
348 \r
349  spu.XAPlay = spu.XAFeed = spu.XAStart;\r
350  spu.CDDAPlay = spu.CDDAFeed = spu.CDDAStart;\r
351  spu.cdClearSamples = 512;\r
352  if (pFO && pFO->xa_left && pF->xaS.nsamples) {        // start xa again\r
353   FeedXA(&pF->xaS);\r
354   spu.XAPlay = spu.XAFeed - pFO->xa_left;\r
355   if (spu.XAPlay < spu.XAStart)\r
356    spu.XAPlay = spu.XAStart;\r
357  }\r
358  else if (pFO && pFO->cdda_left) {                     // start cdda again\r
359   FeedCDDA((void *)pF->xaS.pcm, pFO->cdda_left * 4);\r
360  }\r
361 \r
362  // not in old savestates\r
363  spu.cycles_dma_end = 0;\r
364  spu.decode_dirty_ch = spu.dwChannelsAudible & 0x0a;\r
365  spu.dwNoiseVal = 0;\r
366  spu.dwNoiseCount = 0;\r
367  spu.XARepeat = 0;\r
368  spu.XALastVal = 0;\r
369  spu.last_keyon_cycles = cycles - 16*786u;\r
370  spu.interpolation = -1;\r
371  if (pFO && pF->ulFreezeSize >= sizeof(*pF) + offsetof(SPUOSSFreeze_t, rvb_sb)) {\r
372   spu.cycles_dma_end = pFO->cycles_dma_end;\r
373   spu.decode_dirty_ch = pFO->decode_dirty_ch;\r
374   spu.dwNoiseVal = pFO->dwNoiseVal;\r
375   spu.dwNoiseCount = pFO->dwNoiseCount;\r
376   spu.XARepeat = pFO->XARepeat;\r
377   spu.XALastVal = pFO->XALastVal;\r
378   spu.last_keyon_cycles = pFO->last_keyon_cycles;\r
379  }\r
380  if (pFO && pF->ulFreezeSize >= sizeof(*pF) + sizeof(*pFO)) {\r
381   for (i = 0; i < 2; i++)\r
382    for (j = 0; j < 2; j++)\r
383     memcpy(&sb_rvb->SB_rvb[i][j*4], pFO->rvb_sb[i], 4 * sizeof(sb_rvb->SB_rvb[i][0]));\r
384   spu.interpolation = pFO->interpolation;\r
385  }\r
386  for (i = 0; i <= 2; i += 2)\r
387   if (!regAreaGet(H_SPUcmvolL+i) && regAreaGet(H_SPUmvolL+i) < 0x8000u)\r
388    regAreaRef(H_SPUcmvolL+i) = regAreaGet(H_SPUmvolL+i) << 1;\r
389 \r
390  // repair some globals\r
391  for(i=0;i<=62;i+=2)\r
392   load_register(H_Reverb+i, cycles);\r
393  load_register(H_SPUReverbAddr, cycles);\r
394  load_register(H_SPUrvolL, cycles);\r
395  load_register(H_SPUrvolR, cycles);\r
396  load_register(H_CDLeft, cycles);\r
397  load_register(H_CDRight, cycles);\r
398 \r
399  // reverb\r
400  spu.rvb->StartAddr = regAreaGet(H_SPUReverbAddr) << 2;\r
401  if (spu.rvb->CurrAddr < spu.rvb->StartAddr)\r
402   spu.rvb->CurrAddr = spu.rvb->StartAddr;\r
403 \r
404  ClearWorkingState();\r
405 \r
406  if (spu.spuCtrl & CTRL_IRQ)\r
407   schedule_next_irq();\r
408 \r
409  return 1;\r
410 }\r
411 \r
412 ////////////////////////////////////////////////////////////////////////\r
413 \r
414 static SPUOSSFreeze_t * LoadStateV5(SPUFreeze_t * pF, uint32_t cycles)\r
415 {\r
416  int i;SPUOSSFreeze_t * pFO;\r
417 \r
418  pFO=(SPUOSSFreeze_t *)(pF+1);\r
419 \r
420  spu.pSpuIrq = spu.spuMemC + ((spu.regArea[(H_SPUirqAddr - 0x0c00) / 2] << 3) & ~0xf);\r
421 \r
422  if(pFO->spuAddr)\r
423   {\r
424    if (pFO->spuAddr == 0xbaadf00d) spu.spuAddr = 0;\r
425    else spu.spuAddr = pFO->spuAddr & 0x7fffe;\r
426   }\r
427  spu.decode_pos = pFO->decode_pos & 0x1ff;\r
428  spu.rvb->CurrAddr = pFO->rvb_cur;\r
429  spu.cycles_played = pFO->cycles_played ? pFO->cycles_played : cycles;\r
430 \r
431  spu.dwNewChannel=0;\r
432  spu.dwChannelsAudible=0;\r
433  spu.dwChannelDead=0;\r
434  for(i=0;i<MAXCHAN;i++)\r
435   {\r
436    load_channel(&spu.s_chan[i],&pFO->s_chan[i],i);\r
437 \r
438    spu.s_chan[i].pCurr+=(uintptr_t)spu.spuMemC;\r
439    spu.s_chan[i].pLoop+=(uintptr_t)spu.spuMemC;\r
440   }\r
441 \r
442  return pFO;\r
443 }\r
444 \r
445 ////////////////////////////////////////////////////////////////////////\r
446 \r
447 static void LoadStateUnknown(SPUFreeze_t * pF, uint32_t cycles)\r
448 {\r
449  int i;\r
450 \r
451  for(i=0;i<MAXCHAN;i++)\r
452   {\r
453    spu.s_chan[i].pLoop=spu.spuMemC;\r
454   }\r
455 \r
456  spu.dwNewChannel=0;\r
457  spu.dwChannelsAudible=0;\r
458  spu.dwChannelDead=0;\r
459  spu.pSpuIrq=spu.spuMemC;\r
460  spu.cycles_played = cycles;\r
461 \r
462  for(i=0;i<0xc0;i++)\r
463   {\r
464    load_register(0x1f801c00 + i*2, cycles);\r
465   }\r
466 }\r
467 \r
468 ////////////////////////////////////////////////////////////////////////\r
469 // vim:shiftwidth=1:expandtab\r