Pico/cd/Area.c

   1 // This is part of Pico Library
   2
   3 // (c) Copyright 2007 notaz, All rights reserved.
   4 // Free for non-commercial use.
   5
   6 // For commercial use, separate licencing terms must be obtained.
   7
   8
   9 #include "../PicoInt.h"
  10
  11 // ym2612
  12 #include "../sound/ym2612.h"
  13
  14 // sn76496
  15 extern int *sn76496_regs;
  16
  17
  18 typedef enum {
  19         CHUNK_M68K = 1,
  20         CHUNK_RAM,
  21         CHUNK_VRAM,
  22         CHUNK_ZRAM,
  23         CHUNK_CRAM,     // 5
  24         CHUNK_VSRAM,
  25         CHUNK_MISC,
  26         CHUNK_VIDEO,
  27         CHUNK_Z80,
  28         CHUNK_PSG,      // 10
  29         CHUNK_FM,
  30         // CD stuff
  31         CHUNK_S68K,
  32         CHUNK_PRG_RAM,
  33         CHUNK_WORD_RAM,
  34         CHUNK_PCM_RAM,  // 15
  35         CHUNK_BRAM,
  36         CHUNK_GA_REGS,
  37         CHUNK_PCM,
  38         CHUNK_CDC,
  39         CHUNK_CDD,      // 20
  40         CHUNK_SCD,
  41         CHUNK_RC,
  42         CHUNK_MISC_CD,
  43 } chunk_name_e;
  44
  45
  46 static int write_chunk(chunk_name_e name, int len, void *data, void *file)
  47 {
  48         size_t bwritten = 0;
  49         bwritten += areaWrite(&name, 1, 1, file);
  50         bwritten += areaWrite(&len, 1, 4, file);
  51         bwritten += areaWrite(data, 1, len, file);
  52
  53         return (bwritten == len + 4 + 1);
  54 }
  55
  56
  57 #define CHECKED_WRITE(name,len,data) \
  58         if (!write_chunk(name, len, data, file)) return 1;
  59
  60 #define CHECKED_WRITE_BUFF(name,buff) \
  61         if (!write_chunk(name, sizeof(buff), &buff, file)) return 1;
  62
  63 int PicoCdSaveState(void *file)
  64 {
  65         unsigned char buff[0x60];
  66         void *ym2612_regs = YM2612GetRegs();
  67
  68         areaWrite("PicoSMCD", 1, 8, file);
  69         areaWrite(&PicoVer, 1, 4, file);
  70
  71         memset(buff, 0, sizeof(buff));
  72         PicoAreaPackCpu(buff, 0);
  73         CHECKED_WRITE_BUFF(CHUNK_M68K,  buff);
  74         CHECKED_WRITE_BUFF(CHUNK_RAM,   Pico.ram);
  75         CHECKED_WRITE_BUFF(CHUNK_VRAM,  Pico.vram);
  76         CHECKED_WRITE_BUFF(CHUNK_ZRAM,  Pico.zram);
  77         CHECKED_WRITE_BUFF(CHUNK_CRAM,  Pico.cram);
  78         CHECKED_WRITE_BUFF(CHUNK_VSRAM, Pico.vsram);
  79         CHECKED_WRITE_BUFF(CHUNK_MISC,  Pico.m);
  80         CHECKED_WRITE_BUFF(CHUNK_VIDEO, Pico.video);
  81         if(PicoOpt&7) {
  82                 memset(buff, 0, sizeof(buff));
  83                 z80_pack(buff);
  84                 CHECKED_WRITE_BUFF(CHUNK_Z80, buff);
  85         }
  86         if(PicoOpt&3)
  87                 CHECKED_WRITE(CHUNK_PSG, 28*4, sn76496_regs);
  88         if(PicoOpt&1)
  89                 CHECKED_WRITE(CHUNK_FM, 0x200+4, ym2612_regs);
  90
  91         // TODO: cd stuff
  92         if (PicoMCD & 1)
  93         {
  94                 Pico_mcd->m.audio_offset = mp3_get_offset();
  95                 memset(buff, 0, sizeof(buff));
  96                 PicoAreaPackCpu(buff, 1);
  97
  98                 CHECKED_WRITE_BUFF(CHUNK_S68K,     buff);
  99                 CHECKED_WRITE_BUFF(CHUNK_PRG_RAM,  Pico_mcd->prg_ram);
 100                 CHECKED_WRITE_BUFF(CHUNK_WORD_RAM, Pico_mcd->word_ram); // in 2M format
 101                 CHECKED_WRITE_BUFF(CHUNK_PCM_RAM,  Pico_mcd->pcm_ram);
 102                 CHECKED_WRITE_BUFF(CHUNK_BRAM,     Pico_mcd->bram);
 103                 CHECKED_WRITE_BUFF(CHUNK_GA_REGS,  Pico_mcd->s68k_regs); // GA regs, not CPU regs
 104                 CHECKED_WRITE_BUFF(CHUNK_PCM,      Pico_mcd->pcm);
 105                 CHECKED_WRITE_BUFF(CHUNK_CDD,      Pico_mcd->cdd);
 106                 CHECKED_WRITE_BUFF(CHUNK_CDC,      Pico_mcd->cdc);
 107                 CHECKED_WRITE_BUFF(CHUNK_SCD,      Pico_mcd->scd);
 108                 CHECKED_WRITE_BUFF(CHUNK_RC,       Pico_mcd->rot_comp);
 109                 CHECKED_WRITE_BUFF(CHUNK_MISC_CD,  Pico_mcd->m);
 110         }
 111
 112         return 0;
 113 }
 114
 115 static int g_read_offs = 0;
 116
 117 #define R_ERROR_RETURN(error) \
 118 { \
 119         printf("PicoCdLoadState @ %x: " error "\n", g_read_offs); \
 120         return 1; \
 121 }
 122
 123 // when is eof really set?
 124 #define CHECKED_READ(len,data) \
 125         if (areaRead(data, 1, len, file) != len) { \
 126                 if (len == 1 && areaEof(file)) return 0; \
 127                 R_ERROR_RETURN("areaRead: premature EOF\n"); \
 128                 return 1; \
 129         } \
 130         g_read_offs += len;
 131
 132 #define CHECKED_READ2(len2,data) \
 133         if (len2 != len) R_ERROR_RETURN("unexpected len, wanted " #len2); \
 134         CHECKED_READ(len2, data)
 135
 136 #define CHECKED_READ_BUFF(buff) CHECKED_READ2(sizeof(buff), &buff);
 137
 138 int PicoCdLoadState(void *file)
 139 {
 140         unsigned char buff[0x60];
 141         int ver, len;
 142         void *ym2612_regs = YM2612GetRegs();
 143
 144         g_read_offs = 0;
 145         CHECKED_READ(8, buff);
 146         if (strncmp((char *)buff, "PicoSMCD", 8)) R_ERROR_RETURN("bad header");
 147         CHECKED_READ(4, &ver);
 148
 149         while (!areaEof(file))
 150         {
 151                 CHECKED_READ(1, buff);
 152                 CHECKED_READ(4, &len);
 153                 if (len < 0 || len > 1024*512) R_ERROR_RETURN("bad length");
 154                 if (buff[0] > CHUNK_FM && !(PicoMCD & 1)) R_ERROR_RETURN("cd chunk in non CD state?");
 155
 156                 switch (buff[0])
 157                 {
 158                         case CHUNK_M68K:
 159                                 CHECKED_READ_BUFF(buff);
 160                                 PicoAreaUnpackCpu(buff, 0);
 161                                 break;
 162
 163                         case CHUNK_Z80:
 164                                 CHECKED_READ_BUFF(buff);
 165                                 z80_unpack(buff);
 166                                 break;
 167
 168                         case CHUNK_RAM:   CHECKED_READ_BUFF(Pico.ram); break;
 169                         case CHUNK_VRAM:  CHECKED_READ_BUFF(Pico.vram); break;
 170                         case CHUNK_ZRAM:  CHECKED_READ_BUFF(Pico.zram); break;
 171                         case CHUNK_CRAM:  CHECKED_READ_BUFF(Pico.cram); break;
 172                         case CHUNK_VSRAM: CHECKED_READ_BUFF(Pico.vsram); break;
 173                         case CHUNK_MISC:  CHECKED_READ_BUFF(Pico.m); break;
 174                         case CHUNK_VIDEO: CHECKED_READ_BUFF(Pico.video); break;
 175                         case CHUNK_PSG:   CHECKED_READ2(28*4, sn76496_regs); break;
 176                         case CHUNK_FM:
 177                                 CHECKED_READ2(0x200+4, ym2612_regs);
 178                                 YM2612PicoStateLoad();
 179                                 break;
 180
 181                         // cd stuff
 182                         case CHUNK_S68K:
 183                                 CHECKED_READ_BUFF(buff);
 184                                 PicoAreaUnpackCpu(buff, 1);
 185                                 break;
 186
 187                         case CHUNK_PRG_RAM:     CHECKED_READ_BUFF(Pico_mcd->prg_ram); break;
 188                         case CHUNK_WORD_RAM:    CHECKED_READ_BUFF(Pico_mcd->word_ram); break;
 189                         case CHUNK_PCM_RAM:     CHECKED_READ_BUFF(Pico_mcd->pcm_ram); break;
 190                         case CHUNK_BRAM:        CHECKED_READ_BUFF(Pico_mcd->bram); break;
 191                         case CHUNK_GA_REGS:     CHECKED_READ_BUFF(Pico_mcd->s68k_regs); break;
 192                         case CHUNK_PCM:         CHECKED_READ_BUFF(Pico_mcd->pcm); break;
 193                         case CHUNK_CDD:         CHECKED_READ_BUFF(Pico_mcd->cdd); break;
 194                         case CHUNK_CDC:         CHECKED_READ_BUFF(Pico_mcd->cdc); break;
 195                         case CHUNK_SCD:         CHECKED_READ_BUFF(Pico_mcd->scd); break;
 196                         case CHUNK_RC:          CHECKED_READ_BUFF(Pico_mcd->rot_comp); break;
 197
 198                         case CHUNK_MISC_CD:
 199                                 CHECKED_READ_BUFF(Pico_mcd->m);
 200                                 mp3_start_play(Pico_mcd->TOC.Tracks[Pico_mcd->m.audio_track].F, Pico_mcd->m.audio_offset);
 201                                 break;
 202
 203                         default:
 204                                 printf("skipping unknown chunk %i of size %i\n", buff[0], len);
 205                                 areaSeek(file, len, SEEK_CUR);
 206                                 break;
 207                 }
 208         }
 209
 210         return 0;
 211 }
 212