X-Git-Url: https://notaz.gp2x.de/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=Pico%2FCart.c;h=52f5cf507f630307fc6c77be46c53a628c44922a;hb=a12b1b29cc7e394128da59614c2efe8f5d182741;hp=eeb59646ef1e610fd788c881dfe5616546007295;hpb=c6196c0f0108d27df27d576ece320b3ec5705bb3;p=picodrive.git diff --git a/Pico/Cart.c b/Pico/Cart.c index eeb5964..52f5cf5 100644 --- a/Pico/Cart.c +++ b/Pico/Cart.c @@ -15,9 +15,59 @@ static char *rom_exts[] = { "bin", "gen", "smd", "iso" }; +void (*PicoCartUnloadHook)(void) = NULL; + void (*PicoCartLoadProgressCB)(int percent) = NULL; void (*PicoCDLoadProgressCB)(int percent) = NULL; // handled in Pico/cd/cd_file.c +/* cso struct */ +typedef struct _cso_struct +{ + unsigned char in_buff[2*2048]; + unsigned char out_buff[2048]; + struct { + char magic[4]; + unsigned int unused; + unsigned int total_bytes; + unsigned int total_bytes_high; // ignored here + unsigned int block_size; // 10h + unsigned char ver; + unsigned char align; + unsigned char reserved[2]; + } header; + unsigned int fpos_in; // input file read pointer + unsigned int fpos_out; // pos in virtual decompressed file + int block_in_buff; // block which we have read in in_buff + int pad; + int index[0]; +} +cso_struct; + +static int uncompress2(void *dest, int destLen, void *source, int sourceLen) +{ + z_stream stream; + int err; + + stream.next_in = (Bytef*)source; + stream.avail_in = (uInt)sourceLen; + stream.next_out = dest; + stream.avail_out = (uInt)destLen; + + stream.zalloc = NULL; + stream.zfree = NULL; + + err = inflateInit2(&stream, -15); + if (err != Z_OK) return err; + + err = inflate(&stream, Z_FINISH); + if (err != Z_STREAM_END) { + inflateEnd(&stream); + return err; + } + //*destLen = stream.total_out; + + return inflateEnd(&stream); +} pm_file *pm_open(const char *path) { @@ -77,6 +127,61 @@ zip_failed: return NULL; } } + else if (ext && strcasecmp(ext, "cso") == 0) + { + cso_struct *cso = NULL, *tmp = NULL; + int size; + f = fopen(path, "rb"); + if (f == NULL) + goto cso_failed; + + cso = malloc(sizeof(*cso)); + if (cso == NULL) + goto cso_failed; + + if (fread(&cso->header, 1, sizeof(cso->header), f) != sizeof(cso->header)) + goto cso_failed; + + if (strncmp(cso->header.magic, "CISO", 4) != 0) { + elprintf(EL_STATUS, "cso: bad header"); + goto cso_failed; + } + + if (cso->header.block_size != 2048) { + elprintf(EL_STATUS, "cso: bad block size (%u)", cso->header.block_size); + goto cso_failed; + } + + size = ((cso->header.total_bytes >> 11) + 1)*4 + sizeof(*cso); + tmp = realloc(cso, size); + if (tmp == NULL) + goto cso_failed; + cso = tmp; + elprintf(EL_STATUS, "allocated %i bytes for CSO struct", size); + + size -= sizeof(*cso); // index size + if (fread(cso->index, 1, size, f) != size) { + elprintf(EL_STATUS, "cso: premature EOF"); + goto cso_failed; + } + + // all ok + cso->fpos_in = ftell(f); + cso->fpos_out = 0; + cso->block_in_buff = -1; + file = malloc(sizeof(*file)); + if (file == NULL) goto cso_failed; + file->file = f; + file->param = cso; + file->size = cso->header.total_bytes; + file->type = PMT_CSO; + return file; + +cso_failed: + if (cso != NULL) free(cso); + if (f != NULL) fclose(f); + return NULL; + } /* not a zip, treat as uncompressed file */ f = fopen(path, "rb"); @@ -117,6 +222,68 @@ size_t pm_read(void *ptr, size_t bytes, pm_file *stream) /* we must reset stream pointer or else next seek/read fails */ gzrewind(gf); } + else if (stream->type == PMT_CSO) + { + cso_struct *cso = stream->param; + int read_pos, read_len, out_offs, rret; + int block = cso->fpos_out >> 11; + int index = cso->index[block]; + int index_end = cso->index[block+1]; + unsigned char *out = ptr, *tmp_dst; + + ret = 0; + while (bytes != 0) + { + out_offs = cso->fpos_out&0x7ff; + if (out_offs == 0 && bytes >= 2048) + tmp_dst = out; + else tmp_dst = cso->out_buff; + + read_pos = (index&0x7fffffff) << cso->header.align; + + if (index < 0) { + if (read_pos != cso->fpos_in) + fseek(stream->file, read_pos, SEEK_SET); + rret = fread(tmp_dst, 1, 2048, stream->file); + cso->fpos_in = read_pos + rret; + if (rret != 2048) break; + } else { + read_len = (((index_end&0x7fffffff) << cso->header.align) - read_pos) & 0xfff; + if (block != cso->block_in_buff) + { + if (read_pos != cso->fpos_in) + fseek(stream->file, read_pos, SEEK_SET); + rret = fread(cso->in_buff, 1, read_len, stream->file); + cso->fpos_in = read_pos + rret; + if (rret != read_len) { + elprintf(EL_STATUS, "cso: read failed @ %08x", read_pos); + break; + } + cso->block_in_buff = block; + } + rret = uncompress2(tmp_dst, 2048, cso->in_buff, read_len); + if (rret != 0) { + elprintf(EL_STATUS, "cso: uncompress failed @ %08x with %i", read_pos, rret); + break; + } + } + + rret = 2048; + if (out_offs != 0 || bytes < 2048) { + //elprintf(EL_STATUS, "cso: unaligned/nonfull @ %08x, offs=%i, len=%u", cso->fpos_out, out_offs, bytes); + if (bytes < rret) rret = bytes; + if (2048 - out_offs < rret) rret = 2048 - out_offs; + memcpy(out, tmp_dst + out_offs, rret); + } + ret += rret; + out += rret; + cso->fpos_out += rret; + bytes -= rret; + block++; + index = index_end; + index_end = cso->index[block+1]; + } + } else ret = 0; @@ -139,6 +306,17 @@ int pm_seek(pm_file *stream, long offset, int whence) } return gzseek((gzFile) stream->param, offset, whence); } + else if (stream->type == PMT_CSO) + { + cso_struct *cso = stream->param; + switch (whence) + { + case SEEK_CUR: cso->fpos_out += offset; break; + case SEEK_SET: cso->fpos_out = offset; break; + case SEEK_END: cso->fpos_out = cso->header.total_bytes - offset; break; + } + return cso->fpos_out; + } else return -1; } @@ -160,6 +338,11 @@ int pm_close(pm_file *fp) zipfile->fp = NULL; // gzclose() closed it closezip(zipfile); } + else if (fp->type == PMT_CSO) + { + free(fp->param); + fclose(fp->file); + } else ret = EOF; @@ -219,7 +402,6 @@ static int DecodeSmd(unsigned char *data,int len) static unsigned char *cd_realloc(void *old, int filesize) { unsigned char *rom; - dprintf("sizeof(mcd_state): %i", sizeof(mcd_state)); rom=realloc(old, sizeof(mcd_state)); if (rom) memset(rom+0x20000, 0, sizeof(mcd_state)-0x20000); return rom; @@ -237,7 +419,6 @@ static unsigned char *PicoCartAlloc(int filesize) alloc_size&=~0x7ffff; // use alloc size of multiples of 512K, so that memhandlers could be set up more efficiently if((filesize&0x3fff)==0x200) alloc_size+=0x200; else if(alloc_size-filesize < 4) alloc_size+=4; // padding for out-of-bound exec protection - //dprintf("alloc_size: %x\n", alloc_size); // Allocate space for the rom plus padding rom=(unsigned char *)malloc(alloc_size); @@ -302,7 +483,7 @@ int PicoCartLoad(pm_file *f,unsigned char **prom,unsigned int *psize) return 0; } -// Insert/remove a cartridge: +// Insert a cartridge: int PicoCartInsert(unsigned char *rom,unsigned int romsize) { // notaz: add a 68k "jump one op back" opcode to the end of ROM. @@ -314,21 +495,38 @@ int PicoCartInsert(unsigned char *rom,unsigned int romsize) Pico.rom=rom; Pico.romsize=romsize; + if (PicoCartUnloadHook != NULL) { + PicoCartUnloadHook(); + PicoCartUnloadHook = NULL; + } + + PicoMemResetHooks(); + PicoDmaHook = NULL; + PicoResetHook = NULL; + PicoLineHook = NULL; + carthw_chunks = NULL; + + PicoMemReset(); + + if (!(PicoMCD & 1)) + PicoCartDetect(); + // setup correct memory map for loaded ROM + // call PicoMemReset again due to possible memmap change if (PicoMCD & 1) PicoMemSetupCD(); else PicoMemSetup(); PicoMemReset(); - if (!(PicoMCD & 1)) - PicoCartDetect(); - return PicoReset(1); } -int PicoUnloadCart(unsigned char* romdata) +int PicoCartUnload(void) { - free(romdata); + if (Pico.rom != NULL) { + free(Pico.rom); + Pico.rom=NULL; + } return 0; } @@ -347,7 +545,10 @@ static int name_cmp(const char *name) return rom_strcmp(0x150, name); } -/* various cart-specific things, which can't be handled by generic code */ +/* + * various cart-specific things, which can't be handled by generic code + * (maybe I should start using CRC for this stuff?) + */ void PicoCartDetect(void) { int sram_size = 0, csum; @@ -367,10 +568,12 @@ void PicoCartDetect(void) Pico.m.sram_reg |= 4; } else { // normal SRAM - SRam.start = PicoRead32(0x1B4) & 0xFFFF00; + SRam.start = PicoRead32(0x1B4) & ~0xff; SRam.end = PicoRead32(0x1B8) | 1; sram_size = SRam.end - SRam.start + 1; } + SRam.start &= ~0xff000000; + SRam.end &= ~0xff000000; Pico.m.sram_reg |= 0x10; // SRAM was detected } if (sram_size <= 0) @@ -431,7 +634,7 @@ void PicoCartDetect(void) } else if ( name_cmp("MICRO MACHINES II") == 0 || (name_cmp(" ") == 0 && // Micro Machines {Turbo Tournament '96, Military - It's a Blast!} - (csum == 0x165e || csum == 0x168b || csum == 0xCEE0 || csum == 0x2C41))) + (csum == 0x165e || csum == 0x168b || csum == 0xCEE0 || csum == 0x2C41))) { SRam.start = 0x300000; SRam.end = 0x380001; @@ -443,10 +646,35 @@ void PicoCartDetect(void) SRam.eeprom_bit_out= 7; } + // SVP detection + else if (name_cmp("Virtua Racing") == 0 || + name_cmp("VIRTUA RACING") == 0) + { + PicoSVPStartup(); + } + + // Detect 12-in-1 mapper + else if ((name_cmp("ROBOCOP 3") && Pico.romsize == 0x200000) || + (rom_strcmp(0x160, "FLICKY") && Pico.romsize >= 0x200000)) + { + carthw_12in1_startup(); + } + + // Realtec mapper + else if (Pico.romsize == 512*1024 && ( + rom_strcmp(0x94, "THE EARTH DEFEND") || + rom_strcmp(0xfe, "WISEGAME 11-03-1993") || // Funny World + rom_strcmp(0x95, "MALLET LEGEND "))) // Whac-A-Critter + { + carthw_realtec_startup(); + } + // Some games malfunction if SRAM is not filled with 0xff if (name_cmp("DINO DINI'S SOCCER") == 0 || name_cmp("MICRO MACHINES II") == 0) + { memset(SRam.data, 0xff, sram_size); + } // Unusual region 'code' if (rom_strcmp(0x1f0, "EUROPE") == 0)