optimizations, fixes, hacks, psp, ...
[picodrive.git] / Pico / cd / Area.c
CommitLineData
6cadc2da 1// Savestate handling for emulated Sega/Mega CD machine.
2// (c) Copyright 2007, Grazvydas "notaz" Ignotas
51a902ae 3
4
5#include "../PicoInt.h"
6
7// ym2612
8#include "../sound/ym2612.h"
9
10// sn76496
11extern int *sn76496_regs;
12
76276b0b 13void (*PicoStateProgressCB)(const char *str) = 0;
14
51a902ae 15
16typedef enum {
17 CHUNK_M68K = 1,
18 CHUNK_RAM,
19 CHUNK_VRAM,
20 CHUNK_ZRAM,
75736070 21 CHUNK_CRAM, // 5
51a902ae 22 CHUNK_VSRAM,
23 CHUNK_MISC,
24 CHUNK_VIDEO,
25 CHUNK_Z80,
75736070 26 CHUNK_PSG, // 10
51a902ae 27 CHUNK_FM,
28 // CD stuff
75736070 29 CHUNK_S68K,
30 CHUNK_PRG_RAM,
31 CHUNK_WORD_RAM,
4f265db7 32 CHUNK_PCM_RAM, // 15
33 CHUNK_BRAM,
75736070 34 CHUNK_GA_REGS,
4f265db7 35 CHUNK_PCM,
75736070 36 CHUNK_CDC,
4f265db7 37 CHUNK_CDD, // 20
75736070 38 CHUNK_SCD,
4f265db7 39 CHUNK_RC,
75736070 40 CHUNK_MISC_CD,
51a902ae 41} chunk_name_e;
42
43
76276b0b 44static char *chunk_names[] = {
da42200b 45 "INVALID!",
76276b0b 46 "Saving.. M68K state",
47 "Saving.. RAM",
48 "Saving.. VRAM",
49 "Saving.. ZRAM",
50 "Saving.. CRAM", // 5
51 "Saving.. VSRAM",
52 "Saving.. emu state",
53 "Saving.. VIDEO",
54 "Saving.. Z80 state",
55 "Saving.. PSG", // 10
56 "Saving.. FM",
57 // CD stuff
58 "Saving.. S68K state",
59 "Saving.. PRG_RAM",
60 "Saving.. WORD_RAM",
61 "Saving.. PCM_RAM", // 15
62 "Saving.. BRAM",
63 "Saving.. GATE ARRAY regs",
64 "Saving.. PCM state",
65 "Saving.. CDC",
66 "Saving.. CDD", // 20
67 "Saving.. SCD",
68 "Saving.. GFX chip",
69 "Saving.. MCD state",
70};
71
72
51a902ae 73static int write_chunk(chunk_name_e name, int len, void *data, void *file)
74{
75 size_t bwritten = 0;
76 bwritten += areaWrite(&name, 1, 1, file);
77 bwritten += areaWrite(&len, 1, 4, file);
78 bwritten += areaWrite(data, 1, len, file);
79
80 return (bwritten == len + 4 + 1);
81}
82
83
84#define CHECKED_WRITE(name,len,data) \
76276b0b 85 if (PicoStateProgressCB) PicoStateProgressCB(chunk_names[name]); \
51a902ae 86 if (!write_chunk(name, len, data, file)) return 1;
87
88#define CHECKED_WRITE_BUFF(name,buff) \
76276b0b 89 if (PicoStateProgressCB) PicoStateProgressCB(chunk_names[name]); \
51a902ae 90 if (!write_chunk(name, sizeof(buff), &buff, file)) return 1;
91
eff55556 92PICO_INTERNAL int PicoCdSaveState(void *file)
51a902ae 93{
94 unsigned char buff[0x60];
95 void *ym2612_regs = YM2612GetRegs();
96
97 areaWrite("PicoSMCD", 1, 8, file);
98 areaWrite(&PicoVer, 1, 4, file);
99
100 memset(buff, 0, sizeof(buff));
101 PicoAreaPackCpu(buff, 0);
102 CHECKED_WRITE_BUFF(CHUNK_M68K, buff);
103 CHECKED_WRITE_BUFF(CHUNK_RAM, Pico.ram);
104 CHECKED_WRITE_BUFF(CHUNK_VRAM, Pico.vram);
105 CHECKED_WRITE_BUFF(CHUNK_ZRAM, Pico.zram);
106 CHECKED_WRITE_BUFF(CHUNK_CRAM, Pico.cram);
107 CHECKED_WRITE_BUFF(CHUNK_VSRAM, Pico.vsram);
108 CHECKED_WRITE_BUFF(CHUNK_MISC, Pico.m);
109 CHECKED_WRITE_BUFF(CHUNK_VIDEO, Pico.video);
110 if(PicoOpt&7) {
111 memset(buff, 0, sizeof(buff));
112 z80_pack(buff);
113 CHECKED_WRITE_BUFF(CHUNK_Z80, buff);
114 }
115 if(PicoOpt&3)
116 CHECKED_WRITE(CHUNK_PSG, 28*4, sn76496_regs);
117 if(PicoOpt&1)
118 CHECKED_WRITE(CHUNK_FM, 0x200+4, ym2612_regs);
119
75736070 120 if (PicoMCD & 1)
121 {
122 Pico_mcd->m.audio_offset = mp3_get_offset();
123 memset(buff, 0, sizeof(buff));
124 PicoAreaPackCpu(buff, 1);
fa1e5e29 125 if (Pico_mcd->s68k_regs[3]&4) // 1M mode?
126 wram_1M_to_2M(Pico_mcd->word_ram2M);
127 Pico_mcd->m.hint_vector = *(unsigned short *)(Pico_mcd->bios + 0x72);
75736070 128
129 CHECKED_WRITE_BUFF(CHUNK_S68K, buff);
130 CHECKED_WRITE_BUFF(CHUNK_PRG_RAM, Pico_mcd->prg_ram);
fa1e5e29 131 CHECKED_WRITE_BUFF(CHUNK_WORD_RAM, Pico_mcd->word_ram2M); // in 2M format
4f265db7 132 CHECKED_WRITE_BUFF(CHUNK_PCM_RAM, Pico_mcd->pcm_ram);
75736070 133 CHECKED_WRITE_BUFF(CHUNK_BRAM, Pico_mcd->bram);
4f265db7 134 CHECKED_WRITE_BUFF(CHUNK_GA_REGS, Pico_mcd->s68k_regs); // GA regs, not CPU regs
135 CHECKED_WRITE_BUFF(CHUNK_PCM, Pico_mcd->pcm);
75736070 136 CHECKED_WRITE_BUFF(CHUNK_CDD, Pico_mcd->cdd);
137 CHECKED_WRITE_BUFF(CHUNK_CDC, Pico_mcd->cdc);
138 CHECKED_WRITE_BUFF(CHUNK_SCD, Pico_mcd->scd);
139 CHECKED_WRITE_BUFF(CHUNK_RC, Pico_mcd->rot_comp);
140 CHECKED_WRITE_BUFF(CHUNK_MISC_CD, Pico_mcd->m);
fa1e5e29 141
142 if (Pico_mcd->s68k_regs[3]&4) // convert back
143 wram_2M_to_1M(Pico_mcd->word_ram2M);
75736070 144 }
51a902ae 145
146 return 0;
147}
148
149static int g_read_offs = 0;
150
51a902ae 151#define R_ERROR_RETURN(error) \
152{ \
153 printf("PicoCdLoadState @ %x: " error "\n", g_read_offs); \
154 return 1; \
155}
156
75736070 157// when is eof really set?
158#define CHECKED_READ(len,data) \
159 if (areaRead(data, 1, len, file) != len) { \
160 if (len == 1 && areaEof(file)) return 0; \
161 R_ERROR_RETURN("areaRead: premature EOF\n"); \
162 return 1; \
163 } \
164 g_read_offs += len;
165
51a902ae 166#define CHECKED_READ2(len2,data) \
b542be46 167 if (len2 != len) { \
168 printf("unexpected len %i, wanted %i (%s)", len, len2, #len2); \
169 if (len > len2) R_ERROR_RETURN("failed."); \
170 /* else read anyway and hope for the best.. */ \
171 } \
172 CHECKED_READ(len, data)
51a902ae 173
174#define CHECKED_READ_BUFF(buff) CHECKED_READ2(sizeof(buff), &buff);
175
eff55556 176PICO_INTERNAL int PicoCdLoadState(void *file)
51a902ae 177{
178 unsigned char buff[0x60];
179 int ver, len;
180 void *ym2612_regs = YM2612GetRegs();
181
182 g_read_offs = 0;
183 CHECKED_READ(8, buff);
184 if (strncmp((char *)buff, "PicoSMCD", 8)) R_ERROR_RETURN("bad header");
185 CHECKED_READ(4, &ver);
186
187 while (!areaEof(file))
188 {
189 CHECKED_READ(1, buff);
190 CHECKED_READ(4, &len);
75736070 191 if (len < 0 || len > 1024*512) R_ERROR_RETURN("bad length");
4f265db7 192 if (buff[0] > CHUNK_FM && !(PicoMCD & 1)) R_ERROR_RETURN("cd chunk in non CD state?");
51a902ae 193
194 switch (buff[0])
195 {
196 case CHUNK_M68K:
197 CHECKED_READ_BUFF(buff);
198 PicoAreaUnpackCpu(buff, 0);
199 break;
200
201 case CHUNK_Z80:
202 CHECKED_READ_BUFF(buff);
203 z80_unpack(buff);
204 break;
205
206 case CHUNK_RAM: CHECKED_READ_BUFF(Pico.ram); break;
207 case CHUNK_VRAM: CHECKED_READ_BUFF(Pico.vram); break;
208 case CHUNK_ZRAM: CHECKED_READ_BUFF(Pico.zram); break;
209 case CHUNK_CRAM: CHECKED_READ_BUFF(Pico.cram); break;
210 case CHUNK_VSRAM: CHECKED_READ_BUFF(Pico.vsram); break;
211 case CHUNK_MISC: CHECKED_READ_BUFF(Pico.m); break;
212 case CHUNK_VIDEO: CHECKED_READ_BUFF(Pico.video); break;
213 case CHUNK_PSG: CHECKED_READ2(28*4, sn76496_regs); break;
214 case CHUNK_FM:
215 CHECKED_READ2(0x200+4, ym2612_regs);
216 YM2612PicoStateLoad();
217 break;
75736070 218
219 // cd stuff
220 case CHUNK_S68K:
221 CHECKED_READ_BUFF(buff);
222 PicoAreaUnpackCpu(buff, 1);
223 break;
224
225 case CHUNK_PRG_RAM: CHECKED_READ_BUFF(Pico_mcd->prg_ram); break;
fa1e5e29 226 case CHUNK_WORD_RAM: CHECKED_READ_BUFF(Pico_mcd->word_ram2M); break;
4f265db7 227 case CHUNK_PCM_RAM: CHECKED_READ_BUFF(Pico_mcd->pcm_ram); break;
75736070 228 case CHUNK_BRAM: CHECKED_READ_BUFF(Pico_mcd->bram); break;
229 case CHUNK_GA_REGS: CHECKED_READ_BUFF(Pico_mcd->s68k_regs); break;
4f265db7 230 case CHUNK_PCM: CHECKED_READ_BUFF(Pico_mcd->pcm); break;
75736070 231 case CHUNK_CDD: CHECKED_READ_BUFF(Pico_mcd->cdd); break;
232 case CHUNK_CDC: CHECKED_READ_BUFF(Pico_mcd->cdc); break;
233 case CHUNK_SCD: CHECKED_READ_BUFF(Pico_mcd->scd); break;
234 case CHUNK_RC: CHECKED_READ_BUFF(Pico_mcd->rot_comp); break;
fa1e5e29 235 case CHUNK_MISC_CD: CHECKED_READ_BUFF(Pico_mcd->m); break;
75736070 236
237 default:
fa1e5e29 238 printf("PicoCdLoadState: skipping unknown chunk %i of size %i\n", buff[0], len);
75736070 239 areaSeek(file, len, SEEK_CUR);
240 break;
51a902ae 241 }
242 }
243
fa1e5e29 244 /* after load events */
245 if (Pico_mcd->s68k_regs[3]&4) // 1M mode?
246 wram_2M_to_1M(Pico_mcd->word_ram2M);
4ff2d527 247 PicoMemResetCD(Pico_mcd->s68k_regs[3]);
3aa1e148 248#ifdef _ASM_CD_MEMORY_C
00bd648e 249 if (Pico_mcd->s68k_regs[3]&4)
250 PicoMemResetCDdecode(Pico_mcd->s68k_regs[3]);
4ff2d527 251#endif
83bd0b76 252 if (Pico_mcd->m.audio_track > 0 && Pico_mcd->m.audio_track < Pico_mcd->TOC.Last_Track)
253 mp3_start_play(Pico_mcd->TOC.Tracks[Pico_mcd->m.audio_track].F, Pico_mcd->m.audio_offset);
fa1e5e29 254 // restore hint vector
255 *(unsigned short *)(Pico_mcd->bios + 0x72) = Pico_mcd->m.hint_vector;
256
51a902ae 257 return 0;
258}
259
860c6322 260
261int PicoCdLoadStateGfx(void *file)
262{
263 int ver, len, found = 0;
264 char buff[8];
265
266 g_read_offs = 0;
267 CHECKED_READ(8, buff);
268 if (strncmp(buff, "PicoSMCD", 8)) R_ERROR_RETURN("bad header");
269 CHECKED_READ(4, &ver);
270
271 while (!areaEof(file) && found < 4)
272 {
273 CHECKED_READ(1, buff);
274 CHECKED_READ(4, &len);
275 if (len < 0 || len > 1024*512) R_ERROR_RETURN("bad length");
276 if (buff[0] > CHUNK_FM && !(PicoMCD & 1)) R_ERROR_RETURN("cd chunk in non CD state?");
277
278 switch (buff[0])
279 {
280 case CHUNK_VRAM: CHECKED_READ_BUFF(Pico.vram); found++; break;
281 case CHUNK_CRAM: CHECKED_READ_BUFF(Pico.cram); found++; break;
282 case CHUNK_VSRAM: CHECKED_READ_BUFF(Pico.vsram); found++; break;
283 case CHUNK_VIDEO: CHECKED_READ_BUFF(Pico.video); found++; break;
284 default:
285 areaSeek(file, len, SEEK_CUR);
286 break;
287 }
288 }
289
290 return 0;
291}
292
293