bugfix/improvement
[picodrive.git] / Pico / Cart.c
index 0762473..a9fe6ec 100644 (file)
@@ -1,7 +1,7 @@
 // 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
 #include "../unzip/unzip.h"\r
 #include "../unzip/unzip_stream.h"\r
 \r
+\r
 static char *rom_exts[] = { "bin", "gen", "smd", "iso" };\r
 \r
+void (*PicoCartLoadProgressCB)(int percent) = NULL;\r
+\r
 \r
 pm_file *pm_open(const char *path)\r
 {\r
@@ -45,7 +48,7 @@ pm_file *pm_open(const char *path)
 \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
+          if (strcasecmp(ext, rom_exts[i]) == 0) goto found_rom_zip;\r
       }\r
 \r
       /* zipfile given, but nothing found suitable for us inside */\r
@@ -78,6 +81,9 @@ zip_failed:
   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
@@ -120,10 +126,16 @@ int pm_seek(pm_file *stream, long offset, int whence)
 {\r
   if (stream->type == PMT_UNCOMPRESSED)\r
   {\r
-    return fseek(stream->file, offset, whence);\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\r
@@ -234,7 +246,7 @@ static unsigned char *PicoCartAlloc(int filesize)
 \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
   size=f->size;\r
@@ -243,9 +255,35 @@ int PicoCartLoad(pm_file *f,unsigned char **prom,unsigned int *psize)
 \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
+    printf("out of memory (wanted %i)\n", size);\r
+    return 1;\r
+  }\r
 \r
-  pm_read(rom,size,f); // Load up the rom\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
+    printf("read failed\n");\r
+    free(rom);\r
+    return 1;\r
+  }\r
 \r
   // maybe we are loading MegaCD BIOS?\r
   if (!(PicoMCD&1) && size == 0x20000 && (!strncmp((char *)rom+0x124, "BOOT", 4) || !strncmp((char *)rom+0x128, "BOOT", 4))) {\r
@@ -272,10 +310,18 @@ int PicoCartInsert(unsigned char *rom,unsigned int romsize)
   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
+  // setup correct memory map for loaded ROM\r
+  if (PicoMCD & 1)\r
+       PicoMemSetupCD();\r
+  else PicoMemSetup();\r
+  PicoMemReset();\r
+\r
+  if (!(PicoMCD & 1))\r
+    PicoCartDetect();\r
+\r
   return PicoReset(1);\r
 }\r
 \r
@@ -285,3 +331,124 @@ int PicoUnloadCart(unsigned char* romdata)
   return 0;\r
 }\r
 \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
+static int name_cmp(const char *name)\r
+{\r
+  return rom_strcmp(0x150, name);\r
+}\r
+\r
+/* various cart-specific things, which can't be handled by generic code */\r
+void PicoCartDetect(void)\r
+{\r
+  int sram_size = 0, csum;\r
+  if(SRam.data) free(SRam.data); SRam.data=0;\r
+  Pico.m.sram_reg = 0;\r
+\r
+  csum = PicoRead32(0x18c) & 0xffff;\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) & 0xFFFF00;\r
+      SRam.end   = PicoRead32(0x1B8) | 1;\r
+      sram_size  = SRam.end - SRam.start + 1;\r
+    }\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 (sram_size)\r
+  {\r
+    SRam.data = (unsigned char *) calloc(sram_size, 1);\r
+    if(!SRam.data) 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
+  // 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
+    memset(SRam.data, 0xff, sram_size);\r
+\r
+  // Unusual region 'code'\r
+  if (rom_strcmp(0x1f0, "EUROPE") == 0)\r
+    *(int *) (Pico.rom+0x1f0) = 0x20204520;\r
+}\r
+\r