1 // This is part of Pico Library
3 // (c) Copyright 2006 notaz, All rights reserved.
4 // Free for non-commercial use.
6 // For commercial use, separate licencing terms must be obtained.
9 #include "../PicoInt.h"
12 #include "../sound/ym2612.h"
15 extern int *sn76496_regs;
44 static int write_chunk(chunk_name_e name, int len, void *data, void *file)
47 bwritten += areaWrite(&name, 1, 1, file);
48 bwritten += areaWrite(&len, 1, 4, file);
49 bwritten += areaWrite(data, 1, len, file);
51 return (bwritten == len + 4 + 1);
55 #define CHECKED_WRITE(name,len,data) \
56 if (!write_chunk(name, len, data, file)) return 1;
58 #define CHECKED_WRITE_BUFF(name,buff) \
59 if (!write_chunk(name, sizeof(buff), &buff, file)) return 1;
61 int PicoCdSaveState(void *file)
63 unsigned char buff[0x60];
64 void *ym2612_regs = YM2612GetRegs();
66 areaWrite("PicoSMCD", 1, 8, file);
67 areaWrite(&PicoVer, 1, 4, file);
69 memset(buff, 0, sizeof(buff));
70 PicoAreaPackCpu(buff, 0);
71 CHECKED_WRITE_BUFF(CHUNK_M68K, buff);
72 CHECKED_WRITE_BUFF(CHUNK_RAM, Pico.ram);
73 CHECKED_WRITE_BUFF(CHUNK_VRAM, Pico.vram);
74 CHECKED_WRITE_BUFF(CHUNK_ZRAM, Pico.zram);
75 CHECKED_WRITE_BUFF(CHUNK_CRAM, Pico.cram);
76 CHECKED_WRITE_BUFF(CHUNK_VSRAM, Pico.vsram);
77 CHECKED_WRITE_BUFF(CHUNK_MISC, Pico.m);
78 CHECKED_WRITE_BUFF(CHUNK_VIDEO, Pico.video);
80 memset(buff, 0, sizeof(buff));
82 CHECKED_WRITE_BUFF(CHUNK_Z80, buff);
85 CHECKED_WRITE(CHUNK_PSG, 28*4, sn76496_regs);
87 CHECKED_WRITE(CHUNK_FM, 0x200+4, ym2612_regs);
92 Pico_mcd->m.audio_offset = mp3_get_offset();
93 memset(buff, 0, sizeof(buff));
94 PicoAreaPackCpu(buff, 1);
96 CHECKED_WRITE_BUFF(CHUNK_S68K, buff);
97 CHECKED_WRITE_BUFF(CHUNK_PRG_RAM, Pico_mcd->prg_ram);
98 CHECKED_WRITE_BUFF(CHUNK_WORD_RAM, Pico_mcd->word_ram); // in 2M format
99 CHECKED_WRITE_BUFF(CHUNK_BRAM, Pico_mcd->bram);
100 CHECKED_WRITE_BUFF(CHUNK_GA_REGS, Pico_mcd->s68k_regs);
101 CHECKED_WRITE_BUFF(CHUNK_CDD, Pico_mcd->cdd);
102 CHECKED_WRITE_BUFF(CHUNK_CDC, Pico_mcd->cdc);
103 CHECKED_WRITE_BUFF(CHUNK_SCD, Pico_mcd->scd);
104 CHECKED_WRITE_BUFF(CHUNK_RC, Pico_mcd->rot_comp);
105 CHECKED_WRITE_BUFF(CHUNK_MISC_CD, Pico_mcd->m);
111 static int g_read_offs = 0;
113 #define R_ERROR_RETURN(error) \
115 printf("PicoCdLoadState @ %x: " error "\n", g_read_offs); \
119 // when is eof really set?
120 #define CHECKED_READ(len,data) \
121 if (areaRead(data, 1, len, file) != len) { \
122 if (len == 1 && areaEof(file)) return 0; \
123 R_ERROR_RETURN("areaRead: premature EOF\n"); \
128 #define CHECKED_READ2(len2,data) \
129 if (len2 != len) R_ERROR_RETURN("unexpected len, wanted " #len2); \
130 CHECKED_READ(len2, data)
132 #define CHECKED_READ_BUFF(buff) CHECKED_READ2(sizeof(buff), &buff);
134 int PicoCdLoadState(void *file)
136 unsigned char buff[0x60];
138 void *ym2612_regs = YM2612GetRegs();
141 CHECKED_READ(8, buff);
142 if (strncmp((char *)buff, "PicoSMCD", 8)) R_ERROR_RETURN("bad header");
143 CHECKED_READ(4, &ver);
145 while (!areaEof(file))
147 CHECKED_READ(1, buff);
148 CHECKED_READ(4, &len);
149 if (len < 0 || len > 1024*512) R_ERROR_RETURN("bad length");
154 CHECKED_READ_BUFF(buff);
155 PicoAreaUnpackCpu(buff, 0);
159 CHECKED_READ_BUFF(buff);
163 case CHUNK_RAM: CHECKED_READ_BUFF(Pico.ram); break;
164 case CHUNK_VRAM: CHECKED_READ_BUFF(Pico.vram); break;
165 case CHUNK_ZRAM: CHECKED_READ_BUFF(Pico.zram); break;
166 case CHUNK_CRAM: CHECKED_READ_BUFF(Pico.cram); break;
167 case CHUNK_VSRAM: CHECKED_READ_BUFF(Pico.vsram); break;
168 case CHUNK_MISC: CHECKED_READ_BUFF(Pico.m); break;
169 case CHUNK_VIDEO: CHECKED_READ_BUFF(Pico.video); break;
170 case CHUNK_PSG: CHECKED_READ2(28*4, sn76496_regs); break;
172 CHECKED_READ2(0x200+4, ym2612_regs);
173 YM2612PicoStateLoad();
178 CHECKED_READ_BUFF(buff);
179 PicoAreaUnpackCpu(buff, 1);
182 case CHUNK_PRG_RAM: CHECKED_READ_BUFF(Pico_mcd->prg_ram); break;
183 case CHUNK_WORD_RAM: CHECKED_READ_BUFF(Pico_mcd->word_ram); break;
184 case CHUNK_BRAM: CHECKED_READ_BUFF(Pico_mcd->bram); break;
185 case CHUNK_GA_REGS: CHECKED_READ_BUFF(Pico_mcd->s68k_regs); break;
186 case CHUNK_CDD: CHECKED_READ_BUFF(Pico_mcd->cdd); break;
187 case CHUNK_CDC: CHECKED_READ_BUFF(Pico_mcd->cdc); break;
188 case CHUNK_SCD: CHECKED_READ_BUFF(Pico_mcd->scd); break;
189 case CHUNK_RC: CHECKED_READ_BUFF(Pico_mcd->rot_comp); break;
192 CHECKED_READ_BUFF(Pico_mcd->m);
193 mp3_start_play(Pico_mcd->TOC.Tracks[Pico_mcd->m.audio_track].F, Pico_mcd->m.audio_offset);
197 printf("skipping unknown chunk %i of size %i\n", buff[0], len);
198 areaSeek(file, len, SEEK_CUR);