merge from libretro
[pcsx_rearmed.git] / dfsound / freeze.c
... / ...
CommitLineData
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 "stdafx.h"\r
19\r
20#define _IN_FREEZE\r
21\r
22#include "externals.h"\r
23#include "registers.h"\r
24#include "spu.h"\r
25\r
26////////////////////////////////////////////////////////////////////////\r
27// freeze structs\r
28////////////////////////////////////////////////////////////////////////\r
29\r
30typedef struct\r
31{\r
32 int AttackModeExp;\r
33 int AttackTime;\r
34 int DecayTime;\r
35 int SustainLevel;\r
36 int SustainModeExp;\r
37 int SustainModeDec;\r
38 int SustainTime;\r
39 int ReleaseModeExp;\r
40 unsigned int ReleaseVal;\r
41 int ReleaseTime;\r
42 int ReleaseStartTime; \r
43 int ReleaseVol; \r
44 int lTime;\r
45 int lVolume;\r
46} ADSRInfo;\r
47\r
48typedef struct\r
49{\r
50 int State;\r
51 int AttackModeExp;\r
52 int AttackRate;\r
53 int DecayRate;\r
54 int SustainLevel;\r
55 int SustainModeExp;\r
56 int SustainIncrease;\r
57 int SustainRate;\r
58 int ReleaseModeExp;\r
59 int ReleaseRate;\r
60 int EnvelopeVol;\r
61 int lVolume;\r
62 int lDummy1;\r
63 int lDummy2;\r
64} ADSRInfoEx_orig;\r
65\r
66typedef struct\r
67{\r
68 // no mutexes used anymore... don't need them to sync access\r
69 //HANDLE hMutex;\r
70\r
71 int bNew; // start flag\r
72\r
73 int iSBPos; // mixing stuff\r
74 int spos;\r
75 int sinc;\r
76 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
77 int sval;\r
78\r
79 int iStart; // start ptr into sound mem\r
80 int iCurr; // current pos in sound mem\r
81 int iLoop; // loop ptr in sound mem\r
82\r
83 int bOn; // is channel active (sample playing?)\r
84 int bStop; // is channel stopped (sample _can_ still be playing, ADSR Release phase)\r
85 int bReverb; // can we do reverb on this channel? must have ctrl register bit, to get active\r
86 int iActFreq; // current psx pitch\r
87 int iUsedFreq; // current pc pitch\r
88 int iLeftVolume; // left volume\r
89 int iLeftVolRaw; // left psx volume value\r
90 int bIgnoreLoop; // ignore loop bit, if an external loop address is used\r
91 int iMute; // mute mode\r
92 int iRightVolume; // right volume\r
93 int iRightVolRaw; // right psx volume value\r
94 int iRawPitch; // raw pitch (0...3fff)\r
95 int iIrqDone; // debug irq done flag\r
96 int s_1; // last decoding infos\r
97 int s_2;\r
98 int bRVBActive; // reverb active flag\r
99 int iRVBOffset; // reverb offset\r
100 int iRVBRepeat; // reverb repeat\r
101 int bNoise; // noise active flag\r
102 int bFMod; // freq mod (0=off, 1=sound channel, 2=freq channel)\r
103 int iRVBNum; // another reverb helper\r
104 int iOldNoise; // old noise val for this channel \r
105 ADSRInfo ADSR; // active ADSR settings\r
106 ADSRInfoEx_orig ADSRX; // next ADSR settings (will be moved to active on sample start)\r
107} SPUCHAN_orig;\r
108\r
109typedef struct\r
110{\r
111 char szSPUName[8];\r
112 uint32_t ulFreezeVersion;\r
113 uint32_t ulFreezeSize;\r
114 unsigned char cSPUPort[0x200];\r
115 unsigned char cSPURam[0x80000];\r
116 xa_decode_t xaS; \r
117} SPUFreeze_t;\r
118\r
119typedef struct\r
120{\r
121 unsigned short spuIrq;\r
122 uint32_t pSpuIrq;\r
123 uint32_t spuAddr;\r
124 uint32_t dummy1;\r
125 uint32_t dummy2;\r
126 uint32_t dummy3;\r
127\r
128 SPUCHAN_orig s_chan[MAXCHAN]; \r
129\r
130} SPUOSSFreeze_t;\r
131\r
132////////////////////////////////////////////////////////////////////////\r
133\r
134void LoadStateV5(SPUFreeze_t * pF); // newest version\r
135void LoadStateUnknown(SPUFreeze_t * pF, uint32_t cycles); // unknown format\r
136\r
137// we want to retain compatibility between versions,\r
138// so use original channel struct\r
139static void save_channel(SPUCHAN_orig *d, const SPUCHAN *s, int ch)\r
140{\r
141 memset(d, 0, sizeof(*d));\r
142 d->bNew = !!(dwNewChannel & (1<<ch));\r
143 d->iSBPos = s->iSBPos;\r
144 d->spos = s->spos;\r
145 d->sinc = s->sinc;\r
146 memcpy(d->SB, s->SB, sizeof(d->SB));\r
147 d->iStart = (regAreaGet(ch,6)&~1)<<3;\r
148 d->iCurr = 0; // set by the caller\r
149 d->iLoop = 0; // set by the caller\r
150 d->bOn = !!(dwChannelOn & (1<<ch));\r
151 d->bStop = s->bStop;\r
152 d->bReverb = s->bReverb;\r
153 d->iActFreq = 1;\r
154 d->iUsedFreq = 2;\r
155 d->iLeftVolume = s->iLeftVolume;\r
156 // this one is nasty but safe, save compat is important\r
157 d->bIgnoreLoop = (s->prevflags ^ 2) << 1;\r
158 d->iRightVolume = s->iRightVolume;\r
159 d->iRawPitch = s->iRawPitch;\r
160 d->s_1 = s->SB[27]; // yes it's reversed\r
161 d->s_2 = s->SB[26];\r
162 d->bRVBActive = s->bRVBActive;\r
163 d->bNoise = s->bNoise;\r
164 d->bFMod = s->bFMod;\r
165 d->ADSRX.State = s->ADSRX.State;\r
166 d->ADSRX.AttackModeExp = s->ADSRX.AttackModeExp;\r
167 d->ADSRX.AttackRate = s->ADSRX.AttackRate;\r
168 d->ADSRX.DecayRate = s->ADSRX.DecayRate;\r
169 d->ADSRX.SustainLevel = s->ADSRX.SustainLevel;\r
170 d->ADSRX.SustainModeExp = s->ADSRX.SustainModeExp;\r
171 d->ADSRX.SustainIncrease = s->ADSRX.SustainIncrease;\r
172 d->ADSRX.SustainRate = s->ADSRX.SustainRate;\r
173 d->ADSRX.ReleaseModeExp = s->ADSRX.ReleaseModeExp;\r
174 d->ADSRX.ReleaseRate = s->ADSRX.ReleaseRate;\r
175 d->ADSRX.EnvelopeVol = s->ADSRX.EnvelopeVol;\r
176 d->ADSRX.lVolume = d->bOn; // hmh\r
177}\r
178\r
179static void load_channel(SPUCHAN *d, const SPUCHAN_orig *s, int ch)\r
180{\r
181 memset(d, 0, sizeof(*d));\r
182 if (s->bNew) dwNewChannel |= 1<<ch;\r
183 d->iSBPos = s->iSBPos;\r
184 if ((uint32_t)d->iSBPos >= 28) d->iSBPos = 27;\r
185 d->spos = s->spos;\r
186 d->sinc = s->sinc;\r
187 d->sinc_inv = 0;\r
188 memcpy(d->SB, s->SB, sizeof(d->SB));\r
189 d->pCurr = (void *)((long)s->iCurr & 0x7fff0);\r
190 d->pLoop = (void *)((long)s->iLoop & 0x7fff0);\r
191 d->bStop = s->bStop;\r
192 d->bReverb = s->bReverb;\r
193 d->iLeftVolume = s->iLeftVolume;\r
194 d->iRightVolume = s->iRightVolume;\r
195 d->iRawPitch = s->iRawPitch;\r
196 d->bRVBActive = s->bRVBActive;\r
197 d->bNoise = s->bNoise;\r
198 d->bFMod = s->bFMod;\r
199 d->prevflags = (s->bIgnoreLoop >> 1) ^ 2;\r
200 d->ADSRX.State = s->ADSRX.State;\r
201 d->ADSRX.AttackModeExp = s->ADSRX.AttackModeExp;\r
202 d->ADSRX.AttackRate = s->ADSRX.AttackRate;\r
203 d->ADSRX.DecayRate = s->ADSRX.DecayRate;\r
204 d->ADSRX.SustainLevel = s->ADSRX.SustainLevel;\r
205 d->ADSRX.SustainModeExp = s->ADSRX.SustainModeExp;\r
206 d->ADSRX.SustainIncrease = s->ADSRX.SustainIncrease;\r
207 d->ADSRX.SustainRate = s->ADSRX.SustainRate;\r
208 d->ADSRX.ReleaseModeExp = s->ADSRX.ReleaseModeExp;\r
209 d->ADSRX.ReleaseRate = s->ADSRX.ReleaseRate;\r
210 d->ADSRX.EnvelopeVol = s->ADSRX.EnvelopeVol;\r
211 if (s->bOn) dwChannelOn |= 1<<ch;\r
212 else d->ADSRX.EnvelopeVol = 0;\r
213}\r
214\r
215// force load from regArea to variables\r
216static void load_register(unsigned long reg, unsigned int cycles)\r
217{\r
218 unsigned short *r = &regArea[((reg & 0xfff) - 0xc00) >> 1];\r
219 *r ^= 1;\r
220 SPUwriteRegister(reg, *r ^ 1, cycles);\r
221}\r
222\r
223////////////////////////////////////////////////////////////////////////\r
224// SPUFREEZE: called by main emu on savestate load/save\r
225////////////////////////////////////////////////////////////////////////\r
226\r
227long CALLBACK SPUfreeze(uint32_t ulFreezeMode, SPUFreeze_t * pF,\r
228 uint32_t cycles)\r
229{\r
230 int i;SPUOSSFreeze_t * pFO;\r
231\r
232 if(!pF) return 0; // first check\r
233\r
234 if(ulFreezeMode) // info or save?\r
235 {//--------------------------------------------------//\r
236 if(ulFreezeMode==1) \r
237 memset(pF,0,sizeof(SPUFreeze_t)+sizeof(SPUOSSFreeze_t));\r
238\r
239 strcpy(pF->szSPUName,"PBOSS");\r
240 pF->ulFreezeVersion=5;\r
241 pF->ulFreezeSize=sizeof(SPUFreeze_t)+sizeof(SPUOSSFreeze_t);\r
242\r
243 if(ulFreezeMode==2) return 1; // info mode? ok, bye\r
244 // save mode:\r
245 do_samples(cycles);\r
246\r
247 memcpy(pF->cSPURam,spuMem,0x80000); // copy common infos\r
248 memcpy(pF->cSPUPort,regArea,0x200);\r
249\r
250 if(xapGlobal && XAPlay!=XAFeed) // some xa\r
251 {\r
252 pF->xaS=*xapGlobal; \r
253 }\r
254 else \r
255 memset(&pF->xaS,0,sizeof(xa_decode_t)); // or clean xa\r
256\r
257 pFO=(SPUOSSFreeze_t *)(pF+1); // store special stuff\r
258\r
259 pFO->spuIrq=spuIrq;\r
260 if(pSpuIrq) pFO->pSpuIrq = (unsigned long)pSpuIrq-(unsigned long)spuMemC;\r
261\r
262 pFO->spuAddr=spuAddr;\r
263 if(pFO->spuAddr==0) pFO->spuAddr=0xbaadf00d;\r
264\r
265 for(i=0;i<MAXCHAN;i++)\r
266 {\r
267 save_channel(&pFO->s_chan[i],&s_chan[i],i);\r
268 if(s_chan[i].pCurr)\r
269 pFO->s_chan[i].iCurr=s_chan[i].pCurr-spuMemC;\r
270 if(s_chan[i].pLoop)\r
271 pFO->s_chan[i].iLoop=s_chan[i].pLoop-spuMemC;\r
272 }\r
273\r
274 return 1;\r
275 //--------------------------------------------------//\r
276 }\r
277 \r
278 if(ulFreezeMode!=0) return 0; // bad mode? bye\r
279\r
280 memcpy(spuMem,pF->cSPURam,0x80000); // get ram\r
281 memcpy(regArea,pF->cSPUPort,0x200);\r
282\r
283 if(pF->xaS.nsamples<=4032) // start xa again\r
284 SPUplayADPCMchannel(&pF->xaS);\r
285\r
286 xapGlobal=0;\r
287\r
288 if(!strcmp(pF->szSPUName,"PBOSS") && pF->ulFreezeVersion==5)\r
289 LoadStateV5(pF);\r
290 else LoadStateUnknown(pF, cycles);\r
291\r
292 // repair some globals\r
293 for(i=0;i<=62;i+=2)\r
294 load_register(H_Reverb+i, cycles);\r
295 load_register(H_SPUReverbAddr, cycles);\r
296 load_register(H_SPUrvolL, cycles);\r
297 load_register(H_SPUrvolR, cycles);\r
298\r
299 load_register(H_SPUctrl, cycles);\r
300 load_register(H_SPUstat, cycles);\r
301 load_register(H_CDLeft, cycles);\r
302 load_register(H_CDRight, cycles);\r
303\r
304 // fix to prevent new interpolations from crashing\r
305 for(i=0;i<MAXCHAN;i++) s_chan[i].SB[28]=0;\r
306\r
307 ClearWorkingState();\r
308 cycles_played = cycles;\r
309\r
310 return 1;\r
311}\r
312\r
313////////////////////////////////////////////////////////////////////////\r
314\r
315void LoadStateV5(SPUFreeze_t * pF)\r
316{\r
317 int i;SPUOSSFreeze_t * pFO;\r
318\r
319 pFO=(SPUOSSFreeze_t *)(pF+1);\r
320\r
321 spuIrq = pFO->spuIrq;\r
322 if(pFO->pSpuIrq) pSpuIrq = spuMemC+((long)pFO->pSpuIrq&0x7fff0); else pSpuIrq=NULL;\r
323\r
324 if(pFO->spuAddr)\r
325 {\r
326 spuAddr = pFO->spuAddr;\r
327 if (spuAddr == 0xbaadf00d) spuAddr = 0;\r
328 }\r
329\r
330 dwNewChannel=0;\r
331 dwChannelOn=0;\r
332 dwChannelDead=0;\r
333 for(i=0;i<MAXCHAN;i++)\r
334 {\r
335 load_channel(&s_chan[i],&pFO->s_chan[i],i);\r
336\r
337 s_chan[i].pCurr+=(unsigned long)spuMemC;\r
338 s_chan[i].pLoop+=(unsigned long)spuMemC;\r
339 }\r
340}\r
341\r
342////////////////////////////////////////////////////////////////////////\r
343\r
344void LoadStateUnknown(SPUFreeze_t * pF, uint32_t cycles)\r
345{\r
346 int i;\r
347\r
348 for(i=0;i<MAXCHAN;i++)\r
349 {\r
350 s_chan[i].bStop=0;\r
351 s_chan[i].pLoop=spuMemC;\r
352 }\r
353\r
354 dwNewChannel=0;\r
355 dwChannelOn=0;\r
356 dwChannelDead=0;\r
357 pSpuIrq=0;\r
358\r
359 for(i=0;i<0xc0;i++)\r
360 {\r
361 load_register(0x1f801c00 + i*2, cycles);\r
362 }\r
363}\r
364\r
365////////////////////////////////////////////////////////////////////////\r