nonacc mode removal, function return value audit
[picodrive.git] / Pico / Cart.c
index 18461a2..de340a1 100644 (file)
 // This is part of Pico Library\r
 \r
 // (c) Copyright 2004 Dave, All rights reserved.\r
-// (c) Copyright 2006 notaz, All rights reserved.\r
+// (c) Copyright 2006-2007, Grazvydas "notaz" Ignotas\r
 // Free for non-commercial use.\r
 \r
 // For commercial use, separate licencing terms must be obtained.\r
 \r
 \r
 #include "PicoInt.h"\r
+#include "../zlib/zlib.h"\r
+#include "../unzip/unzip.h"\r
+#include "../unzip/unzip_stream.h"\r
+\r
+\r
+static char *rom_exts[] = { "bin", "gen", "smd", "iso" };\r
+\r
+void (*PicoCartUnloadHook)(void) = NULL;\r
+\r
+void (*PicoCartLoadProgressCB)(int percent) = NULL;\r
+void (*PicoCDLoadProgressCB)(int percent) = NULL; // handled in Pico/cd/cd_file.c\r
+\r
+static void PicoCartDetect(void);\r
+\r
+/* cso struct */\r
+typedef struct _cso_struct\r
+{\r
+  unsigned char in_buff[2*2048];\r
+  unsigned char out_buff[2048];\r
+  struct {\r
+    char          magic[4];\r
+    unsigned int  unused;\r
+    unsigned int  total_bytes;\r
+    unsigned int  total_bytes_high; // ignored here\r
+    unsigned int  block_size;  // 10h\r
+    unsigned char ver;\r
+    unsigned char align;\r
+    unsigned char reserved[2];\r
+  } header;\r
+  unsigned int  fpos_in;  // input file read pointer\r
+  unsigned int  fpos_out; // pos in virtual decompressed file\r
+  int block_in_buff;      // block which we have read in in_buff\r
+  int pad;\r
+  int index[0];\r
+}\r
+cso_struct;\r
+\r
+static int uncompress2(void *dest, int destLen, void *source, int sourceLen)\r
+{\r
+    z_stream stream;\r
+    int err;\r
+\r
+    stream.next_in = (Bytef*)source;\r
+    stream.avail_in = (uInt)sourceLen;\r
+    stream.next_out = dest;\r
+    stream.avail_out = (uInt)destLen;\r
+\r
+    stream.zalloc = NULL;\r
+    stream.zfree = NULL;\r
+\r
+    err = inflateInit2(&stream, -15);\r
+    if (err != Z_OK) return err;\r
+\r
+    err = inflate(&stream, Z_FINISH);\r
+    if (err != Z_STREAM_END) {\r
+        inflateEnd(&stream);\r
+        return err;\r
+    }\r
+    //*destLen = stream.total_out;\r
+\r
+    return inflateEnd(&stream);\r
+}\r
+\r
+pm_file *pm_open(const char *path)\r
+{\r
+  pm_file *file = NULL;\r
+  const char *ext;\r
+  FILE *f;\r
+\r
+  if (path == NULL) return NULL;\r
+\r
+  if (strlen(path) < 5) ext = NULL; // no ext\r
+  else ext = path + strlen(path) - 3;\r
+\r
+  if (ext && strcasecmp(ext, "zip") == 0)\r
+  {\r
+    struct zipent *zipentry;\r
+    gzFile gzf = NULL;\r
+    ZIP *zipfile;\r
+    int i;\r
+\r
+    zipfile = openzip(path);\r
+\r
+    if (zipfile != NULL)\r
+    {\r
+      /* search for suitable file (right extension or large enough file) */\r
+      while ((zipentry = readzip(zipfile)) != NULL)\r
+      {\r
+        if (zipentry->uncompressed_size >= 128*1024) goto found_rom_zip;\r
+        if (strlen(zipentry->name) < 5) continue;\r
+\r
+        ext = zipentry->name+strlen(zipentry->name)-3;\r
+        for (i = 0; i < sizeof(rom_exts)/sizeof(rom_exts[0]); i++)\r
+          if (strcasecmp(ext, rom_exts[i]) == 0) goto found_rom_zip;\r
+      }\r
+\r
+      /* zipfile given, but nothing found suitable for us inside */\r
+      goto zip_failed;\r
+\r
+found_rom_zip:\r
+      /* try to convert to gzip stream, so we could use standard gzio functions from zlib */\r
+      gzf = zip2gz(zipfile, zipentry);\r
+      if (gzf == NULL)  goto zip_failed;\r
+\r
+      file = malloc(sizeof(*file));\r
+      if (file == NULL) goto zip_failed;\r
+      file->file  = zipfile;\r
+      file->param = gzf;\r
+      file->size  = zipentry->uncompressed_size;\r
+      file->type  = PMT_ZIP;\r
+      return file;\r
+\r
+zip_failed:\r
+      if (gzf) {\r
+        gzclose(gzf);\r
+        zipfile->fp = NULL; // gzclose() closed it\r
+      }\r
+      closezip(zipfile);\r
+      return NULL;\r
+    }\r
+  }\r
+  else if (ext && strcasecmp(ext, "cso") == 0)\r
+  {\r
+    cso_struct *cso = NULL, *tmp = NULL;\r
+    int size;\r
+    f = fopen(path, "rb");\r
+    if (f == NULL)\r
+      goto cso_failed;\r
+\r
+    /* we use our own buffering */\r
+    setvbuf(f, NULL, _IONBF, 0);\r
+\r
+    cso = malloc(sizeof(*cso));\r
+    if (cso == NULL)\r
+      goto cso_failed;\r
+\r
+    if (fread(&cso->header, 1, sizeof(cso->header), f) != sizeof(cso->header))\r
+      goto cso_failed;\r
+\r
+    if (strncmp(cso->header.magic, "CISO", 4) != 0) {\r
+      elprintf(EL_STATUS, "cso: bad header");\r
+      goto cso_failed;\r
+    }\r
+\r
+    if (cso->header.block_size != 2048) {\r
+      elprintf(EL_STATUS, "cso: bad block size (%u)", cso->header.block_size);\r
+      goto cso_failed;\r
+    }\r
+\r
+    size = ((cso->header.total_bytes >> 11) + 1)*4 + sizeof(*cso);\r
+    tmp = realloc(cso, size);\r
+    if (tmp == NULL)\r
+      goto cso_failed;\r
+    cso = tmp;\r
+    elprintf(EL_STATUS, "allocated %i bytes for CSO struct", size);\r
+\r
+    size -= sizeof(*cso); // index size\r
+    if (fread(cso->index, 1, size, f) != size) {\r
+      elprintf(EL_STATUS, "cso: premature EOF");\r
+      goto cso_failed;\r
+    }\r
+\r
+    // all ok\r
+    cso->fpos_in = ftell(f);\r
+    cso->fpos_out = 0;\r
+    cso->block_in_buff = -1;\r
+    file = malloc(sizeof(*file));\r
+    if (file == NULL) goto cso_failed;\r
+    file->file  = f;\r
+    file->param = cso;\r
+    file->size  = cso->header.total_bytes;\r
+    file->type  = PMT_CSO;\r
+    return file;\r
+\r
+cso_failed:\r
+    if (cso != NULL) free(cso);\r
+    if (f != NULL) fclose(f);\r
+    return NULL;\r
+  }\r
+\r
+  /* not a zip, treat as uncompressed file */\r
+  f = fopen(path, "rb");\r
+  if (f == NULL) return NULL;\r
+\r
+  /* we use our own buffering */\r
+  setvbuf(f, NULL, _IONBF, 0);\r
+\r
+  file = malloc(sizeof(*file));\r
+  if (file == NULL) {\r
+    fclose(f);\r
+    return NULL;\r
+  }\r
+  fseek(f, 0, SEEK_END);\r
+  file->file  = f;\r
+  file->param = NULL;\r
+  file->size  = ftell(f);\r
+  file->type  = PMT_UNCOMPRESSED;\r
+  fseek(f, 0, SEEK_SET);\r
+\r
+  return file;\r
+}\r
+\r
+size_t pm_read(void *ptr, size_t bytes, pm_file *stream)\r
+{\r
+  int ret;\r
+\r
+  if (stream->type == PMT_UNCOMPRESSED)\r
+  {\r
+    ret = fread(ptr, 1, bytes, stream->file);\r
+  }\r
+  else if (stream->type == PMT_ZIP)\r
+  {\r
+    gzFile gf = stream->param;\r
+    int err;\r
+    ret = gzread(gf, ptr, bytes);\r
+    err = gzerror2(gf);\r
+    if (ret > 0 && (err == Z_DATA_ERROR || err == Z_STREAM_END))\r
+      /* we must reset stream pointer or else next seek/read fails */\r
+      gzrewind(gf);\r
+  }\r
+  else if (stream->type == PMT_CSO)\r
+  {\r
+    cso_struct *cso = stream->param;\r
+    int read_pos, read_len, out_offs, rret;\r
+    int block = cso->fpos_out >> 11;\r
+    int index = cso->index[block];\r
+    int index_end = cso->index[block+1];\r
+    unsigned char *out = ptr, *tmp_dst;\r
+\r
+    ret = 0;\r
+    while (bytes != 0)\r
+    {\r
+      out_offs = cso->fpos_out&0x7ff;\r
+      if (out_offs == 0 && bytes >= 2048)\r
+           tmp_dst = out;\r
+      else tmp_dst = cso->out_buff;\r
+\r
+      read_pos = (index&0x7fffffff) << cso->header.align;\r
+\r
+      if (index < 0) {\r
+        if (read_pos != cso->fpos_in)\r
+          fseek(stream->file, read_pos, SEEK_SET);\r
+        rret = fread(tmp_dst, 1, 2048, stream->file);\r
+        cso->fpos_in = read_pos + rret;\r
+        if (rret != 2048) break;\r
+      } else {\r
+        read_len = (((index_end&0x7fffffff) << cso->header.align) - read_pos) & 0xfff;\r
+        if (block != cso->block_in_buff)\r
+        {\r
+          if (read_pos != cso->fpos_in)\r
+            fseek(stream->file, read_pos, SEEK_SET);\r
+          rret = fread(cso->in_buff, 1, read_len, stream->file);\r
+          cso->fpos_in = read_pos + rret;\r
+          if (rret != read_len) {\r
+            elprintf(EL_STATUS, "cso: read failed @ %08x", read_pos);\r
+            break;\r
+          }\r
+          cso->block_in_buff = block;\r
+        }\r
+        rret = uncompress2(tmp_dst, 2048, cso->in_buff, read_len);\r
+        if (rret != 0) {\r
+          elprintf(EL_STATUS, "cso: uncompress failed @ %08x with %i", read_pos, rret);\r
+          break;\r
+        }\r
+      }\r
+\r
+      rret = 2048;\r
+      if (out_offs != 0 || bytes < 2048) {\r
+        //elprintf(EL_STATUS, "cso: unaligned/nonfull @ %08x, offs=%i, len=%u", cso->fpos_out, out_offs, bytes);\r
+        if (bytes < rret) rret = bytes;\r
+        if (2048 - out_offs < rret) rret = 2048 - out_offs;\r
+        memcpy(out, tmp_dst + out_offs, rret);\r
+      }\r
+      ret += rret;\r
+      out += rret;\r
+      cso->fpos_out += rret;\r
+      bytes -= rret;\r
+      block++;\r
+      index = index_end;\r
+      index_end = cso->index[block+1];\r
+    }\r
+  }\r
+  else\r
+    ret = 0;\r
+\r
+  return ret;\r
+}\r
+\r
+int pm_seek(pm_file *stream, long offset, int whence)\r
+{\r
+  if (stream->type == PMT_UNCOMPRESSED)\r
+  {\r
+    fseek(stream->file, offset, whence);\r
+    return ftell(stream->file);\r
+  }\r
+  else if (stream->type == PMT_ZIP)\r
+  {\r
+    if (PicoMessage != NULL && offset > 6*1024*1024) {\r
+      long pos = gztell((gzFile) stream->param);\r
+      if (offset < pos || offset - pos > 6*1024*1024)\r
+        PicoMessage("Decompressing data...");\r
+    }\r
+    return gzseek((gzFile) stream->param, offset, whence);\r
+  }\r
+  else if (stream->type == PMT_CSO)\r
+  {\r
+    cso_struct *cso = stream->param;\r
+    switch (whence)\r
+    {\r
+      case SEEK_CUR: cso->fpos_out += offset; break;\r
+      case SEEK_SET: cso->fpos_out  = offset; break;\r
+      case SEEK_END: cso->fpos_out  = cso->header.total_bytes - offset; break;\r
+    }\r
+    return cso->fpos_out;\r
+  }\r
+  else\r
+    return -1;\r
+}\r
+\r
+int pm_close(pm_file *fp)\r
+{\r
+  int ret = 0;\r
+\r
+  if (fp == NULL) return EOF;\r
+\r
+  if (fp->type == PMT_UNCOMPRESSED)\r
+  {\r
+    fclose(fp->file);\r
+  }\r
+  else if (fp->type == PMT_ZIP)\r
+  {\r
+    ZIP *zipfile = fp->file;\r
+    gzclose((gzFile) fp->param);\r
+    zipfile->fp = NULL; // gzclose() closed it\r
+    closezip(zipfile);\r
+  }\r
+  else if (fp->type == PMT_CSO)\r
+  {\r
+    free(fp->param);\r
+    fclose(fp->file);\r
+  }\r
+  else\r
+    ret = EOF;\r
+\r
+  free(fp);\r
+  return ret;\r
+}\r
+\r
 \r
 void Byteswap(unsigned char *data,int len)\r
 {\r
@@ -57,25 +405,26 @@ static int DecodeSmd(unsigned char *data,int len)
   return 0;\r
 }\r
 \r
+static unsigned char *cd_realloc(void *old, int filesize)\r
+{\r
+  unsigned char *rom;\r
+  rom=realloc(old, sizeof(mcd_state));\r
+  if (rom) memset(rom+0x20000, 0, sizeof(mcd_state)-0x20000);\r
+  return rom;\r
+}\r
+\r
 static unsigned char *PicoCartAlloc(int filesize)\r
 {\r
   int alloc_size;\r
   unsigned char *rom;\r
 \r
-  if (PicoMCD & 1) {\r
-    dprintf("sizeof(mcd_state): %i", sizeof(mcd_state));\r
-    if (filesize > 0x20000) return NULL; // invalid BIOS\r
-    rom=(unsigned char *)malloc(sizeof(mcd_state));\r
-    if (rom) memset(rom, 0, sizeof(mcd_state));\r
-    return rom;\r
-  }\r
+  if (PicoAHW & PAHW_MCD) return cd_realloc(NULL, filesize);\r
 \r
   alloc_size=filesize+0x7ffff;\r
   if((filesize&0x3fff)==0x200) alloc_size-=0x200;\r
   alloc_size&=~0x7ffff; // use alloc size of multiples of 512K, so that memhandlers could be set up more efficiently\r
   if((filesize&0x3fff)==0x200) alloc_size+=0x200;\r
   else if(alloc_size-filesize < 4) alloc_size+=4; // padding for out-of-bound exec protection\r
-  //dprintf("alloc_size: %x\n",  alloc_size);\r
 \r
   // Allocate space for the rom plus padding\r
   rom=(unsigned char *)malloc(alloc_size);\r
@@ -83,29 +432,59 @@ static unsigned char *PicoCartAlloc(int filesize)
   return rom;\r
 }\r
 \r
-int PicoCartLoad(FILE *f,unsigned char **prom,unsigned int *psize)\r
+int PicoCartLoad(pm_file *f,unsigned char **prom,unsigned int *psize)\r
 {\r
-  unsigned char *rom=NULL; int size;\r
+  unsigned char *rom=NULL; int size, bytes_read;\r
   if (f==NULL) return 1;\r
 \r
-  fseek(f,0,SEEK_END); size=ftell(f); fseek(f,0,SEEK_SET);\r
+  size=f->size;\r
   if (size <= 0) return 1;\r
-  if (PicoMCD & 1) {\r
-    if (size > 0x20000) return 1; // invalid BIOS\r
-    size = 0xe0000;\r
-  } else {\r
-    size=(size+3)&~3; // Round up to a multiple of 4\r
-  }\r
+  size=(size+3)&~3; // Round up to a multiple of 4\r
 \r
   // Allocate space for the rom plus padding\r
   rom=PicoCartAlloc(size);\r
-  if (rom==NULL) return 1; // { fclose(f); return 1; }\r
+  if (rom==NULL) {\r
+    elprintf(EL_STATUS, "out of memory (wanted %i)", size);\r
+    return 1;\r
+  }\r
+\r
+  if (PicoCartLoadProgressCB != NULL)\r
+  {\r
+    // read ROM in blocks, just for fun\r
+    int ret;\r
+    unsigned char *p = rom;\r
+    bytes_read=0;\r
+    do\r
+    {\r
+      int todo = size - bytes_read;\r
+      if (todo > 256*1024) todo = 256*1024;\r
+      ret = pm_read(p,todo,f);\r
+      bytes_read += ret;\r
+      p += ret;\r
+      PicoCartLoadProgressCB(bytes_read * 100 / size);\r
+    }\r
+    while (ret > 0);\r
+  }\r
+  else\r
+    bytes_read = pm_read(rom,size,f); // Load up the rom\r
+  if (bytes_read <= 0) {\r
+    elprintf(EL_STATUS, "read failed");\r
+    free(rom);\r
+    return 1;\r
+  }\r
 \r
-  fread(rom,1,size,f); // Load up the rom\r
-  // fclose(f); // this is confusing. From now on, caller should close it, because it opened this.\r
+  // maybe we are loading MegaCD BIOS?\r
+  if (!(PicoAHW & PAHW_MCD) && size == 0x20000 && (!strncmp((char *)rom+0x124, "BOOT", 4) ||\r
+       !strncmp((char *)rom+0x128, "BOOT", 4))) {\r
+    PicoAHW |= PAHW_MCD;\r
+    rom = cd_realloc(rom, size);\r
+  }\r
 \r
   // Check for SMD:\r
-  if ((size&0x3fff)==0x200) { DecodeSmd(rom,size); size-=0x200; } // Decode and byteswap SMD\r
+  if (size >= 0x4200 && (size&0x3fff)==0x200 &&\r
+      ((rom[0x2280] == 'S' && rom[0x280] == 'E') || (rom[0x280] == 'S' && rom[0x2281] == 'E'))) {\r
+    DecodeSmd(rom,size); size-=0x200; // Decode and byteswap SMD\r
+  }\r
   else Byteswap(rom,size); // Just byteswap\r
 \r
   if (prom)  *prom=rom;\r
@@ -114,84 +493,235 @@ int PicoCartLoad(FILE *f,unsigned char **prom,unsigned int *psize)
   return 0;\r
 }\r
 \r
-// Insert/remove a cartridge:\r
+// Insert a cartridge:\r
 int PicoCartInsert(unsigned char *rom,unsigned int romsize)\r
 {\r
   // notaz: add a 68k "jump one op back" opcode to the end of ROM.\r
   // This will hang the emu, but will prevent nasty crashes.\r
   // note: 4 bytes are padded to every ROM\r
-  if(rom != NULL)\r
+  if (rom != NULL)\r
     *(unsigned long *)(rom+romsize) = 0xFFFE4EFA; // 4EFA FFFE byteswapped\r
 \r
-  SRam.resize=1;\r
   Pico.rom=rom;\r
   Pico.romsize=romsize;\r
 \r
-  return PicoReset(1);\r
-}\r
+  if (SRam.data) {\r
+    free(SRam.data);\r
+    SRam.data = NULL;\r
+  }\r
 \r
-int PicoUnloadCart(unsigned char* romdata)\r
-{\r
-  free(romdata);\r
+  if (PicoCartUnloadHook != NULL) {\r
+    PicoCartUnloadHook();\r
+    PicoCartUnloadHook = NULL;\r
+  }\r
+\r
+  PicoAHW &= PAHW_MCD;\r
+\r
+  PicoMemResetHooks();\r
+  PicoDmaHook = NULL;\r
+  PicoResetHook = NULL;\r
+  PicoLineHook = NULL;\r
+  PicoLoadStateHook = NULL;\r
+  carthw_chunks = NULL;\r
+\r
+  PicoMemReset();\r
+\r
+  if (!(PicoAHW & PAHW_MCD))\r
+    PicoCartDetect();\r
+\r
+  // setup correct memory map for loaded ROM\r
+  // call PicoMemReset again due to possible memmap change\r
+  switch (PicoAHW) {\r
+    default:\r
+      elprintf(EL_STATUS|EL_ANOMALY, "starting in unknown hw configuration: %x", PicoAHW);\r
+    case 0:\r
+    case PAHW_SVP:  PicoMemSetup(); break;\r
+    case PAHW_MCD:  PicoMemSetupCD(); break;\r
+    case PAHW_PICO: PicoMemSetupPico(); break;\r
+  }\r
+  PicoMemReset();\r
+\r
+  PicoPower();\r
   return 0;\r
 }\r
 \r
+void PicoCartUnload(void)\r
+{\r
+  if (Pico.rom != NULL) {\r
+    SekFinishIdleDet();\r
+    free(Pico.rom);\r
+    Pico.rom=NULL;\r
+  }\r
+}\r
 \r
-#ifdef _UNZIP_SUPPORT\r
-\r
-// notaz\r
-#include "../unzip/unzip.h"\r
+static int rom_strcmp(int rom_offset, const char *s1)\r
+{\r
+  int i, len = strlen(s1);\r
+  const char *s_rom = (const char *)Pico.rom + rom_offset;\r
+  for (i = 0; i < len; i++)\r
+    if (s1[i] != s_rom[i^1])\r
+      return 1;\r
+  return 0;\r
+}\r
 \r
-// nearly same as PicoCartLoad, but works with zipfiles\r
-int CartLoadZip(const char *fname, unsigned char **prom, unsigned int *psize)\r
+static int name_cmp(const char *name)\r
 {\r
-       unsigned char *rom=0;\r
-       struct zipent* zipentry;\r
-       int size;\r
-       ZIP *zipfile = openzip(fname);\r
+  return rom_strcmp(0x150, name);\r
+}\r
 \r
-       if(!zipfile) return 1;\r
+/*\r
+ * various cart-specific things, which can't be handled by generic code\r
+ * (maybe I should start using CRC for this stuff?)\r
+ */\r
+static void PicoCartDetect(void)\r
+{\r
+  int sram_size = 0, csum;\r
+  Pico.m.sram_reg = 0;\r
 \r
-       // find first bin or smd\r
-       while((zipentry = readzip(zipfile)) != 0)\r
-       {\r
-               char *ext;\r
-               if(strlen(zipentry->name) < 5) continue;\r
-               ext = zipentry->name+strlen(zipentry->name)-4;\r
+  csum = PicoRead32(0x18c) & 0xffff;\r
 \r
-               if(!strcasecmp(ext, ".bin") || !strcasecmp(ext, ".smd") || !strcasecmp(ext, ".gen")) break;\r
-       }\r
+  if (Pico.rom[0x1B1] == 'R' && Pico.rom[0x1B0] == 'A')\r
+  {\r
+    if (Pico.rom[0x1B2] & 0x40)\r
+    {\r
+      // EEPROM\r
+      SRam.start = PicoRead32(0x1B4) & ~1; // zero address is used for clock by some games\r
+      SRam.end   = PicoRead32(0x1B8);\r
+      sram_size  = 0x2000;\r
+      Pico.m.sram_reg |= 4;\r
+    } else {\r
+      // normal SRAM\r
+      SRam.start = PicoRead32(0x1B4) & ~0xff;\r
+      SRam.end   = PicoRead32(0x1B8) | 1;\r
+      sram_size  = SRam.end - SRam.start + 1;\r
+    }\r
+    SRam.start &= ~0xff000000;\r
+    SRam.end   &= ~0xff000000;\r
+    Pico.m.sram_reg |= 0x10; // SRAM was detected\r
+  }\r
+  if (sram_size <= 0)\r
+  {\r
+    // some games may have bad headers, like S&K and Sonic3\r
+    // note: majority games use 0x200000 as starting address, but there are some which\r
+    // use something else (0x300000 by HardBall '95). Luckily they have good headers.\r
+    SRam.start = 0x200000;\r
+    SRam.end   = 0x203FFF;\r
+    sram_size  = 0x004000;\r
+  }\r
 \r
-       if(!zipentry) {\r
-               closezip(zipfile);\r
-               return 4; // no roms\r
-       }\r
+  // this game actually doesn't have SRAM, but some weird protection\r
+  if (rom_strcmp(0x120, "PUGGSY") == 0)\r
+  {\r
+    SRam.start = SRam.end = sram_size = 0;\r
+  }\r
 \r
-       size = zipentry->uncompressed_size;\r
+  if (sram_size)\r
+  {\r
+    SRam.data = (unsigned char *) calloc(sram_size, 1);\r
+    if (SRam.data == NULL) return;\r
+  }\r
+  SRam.changed = 0;\r
+\r
+  // set EEPROM defaults, in case it gets detected\r
+  SRam.eeprom_type   = 0; // 7bit (24C01)\r
+  SRam.eeprom_abits  = 3; // eeprom access must be odd addr for: bit0 ~ cl, bit1 ~ in\r
+  SRam.eeprom_bit_cl = 1;\r
+  SRam.eeprom_bit_in = 0;\r
+  SRam.eeprom_bit_out= 0;\r
+\r
+  // some known EEPROM data (thanks to EkeEke)\r
+  if (name_cmp("COLLEGE SLAM") == 0 ||\r
+      name_cmp("FRANK THOMAS BIGHURT BASEBAL") == 0)\r
+  {\r
+    SRam.eeprom_type = 3;\r
+    SRam.eeprom_abits = 2;\r
+    SRam.eeprom_bit_cl = 0;\r
+  }\r
+  else if (name_cmp("NBA JAM TOURNAMENT EDITION") == 0 ||\r
+           name_cmp("NFL QUARTERBACK CLUB") == 0)\r
+  {\r
+    SRam.eeprom_type = 2;\r
+    SRam.eeprom_abits = 2;\r
+    SRam.eeprom_bit_cl = 0;\r
+  }\r
+  else if (name_cmp("NBA JAM") == 0)\r
+  {\r
+    SRam.eeprom_type = 2;\r
+    SRam.eeprom_bit_out = 1;\r
+    SRam.eeprom_abits = 0;\r
+  }\r
+  else if (name_cmp("NHLPA HOCKEY '93") == 0 ||\r
+           name_cmp("NHLPA Hockey '93") == 0 ||\r
+           name_cmp("RINGS OF POWER") == 0)\r
+  {\r
+    SRam.start = SRam.end = 0x200000;\r
+    Pico.m.sram_reg = 0x14;\r
+    SRam.eeprom_abits = 0;\r
+    SRam.eeprom_bit_cl = 6;\r
+    SRam.eeprom_bit_in = 7;\r
+    SRam.eeprom_bit_out= 7;\r
+  }\r
+  else if ( name_cmp("MICRO MACHINES II") == 0 ||\r
+           (name_cmp("        ") == 0 && // Micro Machines {Turbo Tournament '96, Military - It's a Blast!}\r
+           (csum == 0x165e || csum == 0x168b || csum == 0xCEE0 || csum == 0x2C41)))\r
+  {\r
+    SRam.start = 0x300000;\r
+    SRam.end   = 0x380001;\r
+    Pico.m.sram_reg = 0x14;\r
+    SRam.eeprom_type = 2;\r
+    SRam.eeprom_abits = 0;\r
+    SRam.eeprom_bit_cl = 1;\r
+    SRam.eeprom_bit_in = 0;\r
+    SRam.eeprom_bit_out= 7;\r
+  }\r
 \r
-       size=(size+3)&~3; // Round up to a multiple of 4\r
+  // SVP detection\r
+  else if (name_cmp("Virtua Racing") == 0 ||\r
+           name_cmp("VIRTUA RACING") == 0)\r
+  {\r
+    PicoSVPStartup();\r
+  }\r
 \r
-       // Allocate space for the rom plus padding\r
-       rom=PicoCartAlloc(size);\r
-       if (rom==NULL) { closezip(zipfile); return 2; }\r
+  // Pico\r
+  else if (rom_strcmp(0x100, "SEGA PICO") == 0 ||\r
+           rom_strcmp(0x100, "IMA IKUNOUJYUKU") == 0) // what is that supposed to mean?\r
+  {\r
+    PicoInitPico();\r
+  }\r
 \r
-       if(readuncompresszip(zipfile, zipentry, (char *)rom) != 0) {\r
-               free(rom);\r
-               rom = 0;\r
-               closezip(zipfile);\r
-               return 5; // unzip failed\r
-       }\r
+  // Detect 12-in-1 mapper\r
+  else if ((name_cmp("ROBOCOP 3") == 0 && Pico.romsize == 0x200000) ||\r
+    (rom_strcmp(0x160, "FLICKY") == 0 && Pico.romsize >= 0x200000)  ||\r
+    (name_cmp(" SHOVE IT!") == 0 && Pico.romsize >= 0x200000) ||\r
+    (name_cmp("MS PACMAN") == 0 && Pico.romsize >= 0x200000)) // bad dump?\r
+  {\r
+    carthw_12in1_startup();\r
+  }\r
 \r
-       closezip(zipfile);\r
+  // Realtec mapper\r
+  else if (Pico.romsize == 512*1024 && (\r
+    rom_strcmp(0x94, "THE EARTH DEFEND") == 0 ||\r
+    rom_strcmp(0xfe, "WISEGAME 11-03-1993") == 0 || // Funny World\r
+    rom_strcmp(0x95, "MALLET LEGEND ") == 0)) // Whac-A-Critter\r
+  {\r
+    carthw_realtec_startup();\r
+  }\r
 \r
-       // Check for SMD:\r
-       if ((size&0x3fff)==0x200) { DecodeSmd(rom,size); size-=0x200; } // Decode and byteswap SMD\r
-       else Byteswap(rom,size); // Just byteswap\r
+  // Radica mapper\r
+  else if (name_cmp("KID CHAMELEON") == 0 && Pico.romsize > 0x100000)\r
+  {\r
+    carthw_radica_startup();\r
+  }\r
 \r
-       if (prom)  *prom=rom;\r
-       if (psize) *psize=size;\r
+  // Some games malfunction if SRAM is not filled with 0xff\r
+  if (name_cmp("DINO DINI'S SOCCER") == 0 ||\r
+      name_cmp("MICRO MACHINES II") == 0)\r
+  {\r
+    memset(SRam.data, 0xff, sram_size);\r
+  }\r
 \r
-       return 0;\r
+  // Unusual region 'code'\r
+  if (rom_strcmp(0x1f0, "EUROPE") == 0 || rom_strcmp(0x1f0, "Europe") == 0)\r
+    *(int *) (Pico.rom+0x1f0) = 0x20204520;\r
 }\r
 \r
-#endif\r