921 lines
22 KiB
C
Executable File
921 lines
22 KiB
C
Executable File
/*
|
|
Copyright (C) 1997-2005 ZSNES Team ( zsKnight, _Demo_, pagefault, Nach )
|
|
|
|
http://www.zsnes.com
|
|
http://sourceforge.net/projects/zsnes
|
|
|
|
This program is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU General Public License
|
|
as published by the Free Software Foundation; either
|
|
version 2 of the License, or (at your option) any later
|
|
version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program; if not, write to the Free Software
|
|
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
|
|
*/
|
|
|
|
|
|
|
|
#ifdef __LINUX__
|
|
#include "gblhdr.h"
|
|
#define DIR_SLASH "/"
|
|
#else
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <zlib.h>
|
|
#define DIR_SLASH "\\"
|
|
#endif
|
|
#include "numconv.h"
|
|
#include "gblvars.h"
|
|
#include "asm_call.h"
|
|
|
|
#ifdef __MSDOS__
|
|
#define clim() __asm__ __volatile__ ("cli");
|
|
#define stim() __asm__ __volatile__ ("sti");
|
|
#else
|
|
#define clim()
|
|
#define stim()
|
|
#endif
|
|
|
|
void SA1UpdateDPageC(), unpackfunct(), repackfunct();
|
|
void PrepareOffset(), ResetOffset(), initpitch(), UpdateBanksSDD1();
|
|
void procexecloop(), outofmemory();
|
|
|
|
static void copy_snes_data(unsigned char **buffer, void (*copy_func)(unsigned char **, void *, size_t))
|
|
{
|
|
//65816 status, etc.
|
|
copy_func(buffer, &curcyc, PH65816regsize);
|
|
//SPC Timers
|
|
copy_func(buffer, &cycpbl, 2*4);
|
|
//SNES PPU Register status
|
|
copy_func(buffer, &sndrot, 3019);
|
|
}
|
|
|
|
static void copy_spc_data(unsigned char **buffer, void (*copy_func)(unsigned char **, void *, size_t))
|
|
{
|
|
//SPC stuff, DSP stuff
|
|
copy_func(buffer, spcRam, PHspcsave);
|
|
copy_func(buffer, &BRRBuffer, PHdspsave);
|
|
copy_func(buffer, &DSPMem, sizeof(DSPMem));
|
|
}
|
|
|
|
static void copy_extra_data(unsigned char **buffer, void (*copy_func)(unsigned char **, void *, size_t))
|
|
{
|
|
copy_func(buffer, &soundcycleft, 33);
|
|
copy_func(buffer, &spc700read, 10*4);
|
|
copy_func(buffer, &timer2upd, 1*4);
|
|
copy_func(buffer, &xa, 14*4);
|
|
copy_func(buffer, &spcnumread, 4);
|
|
copy_func(buffer, &spchalted, 4);
|
|
copy_func(buffer, &opcd, 6*4);
|
|
copy_func(buffer, &HIRQCycNext, 5);
|
|
copy_func(buffer, &oamaddr, 14*4);
|
|
copy_func(buffer, &prevoamptr, 1);
|
|
}
|
|
|
|
static size_t load_save_size;
|
|
|
|
enum copy_state_method { csm_save_zst_new,
|
|
csm_load_zst_new,
|
|
csm_load_zst_old,
|
|
csm_save_rewind,
|
|
csm_load_rewind };
|
|
|
|
static void copy_state_data(unsigned char *buffer, void (*copy_func)(unsigned char **, void *, size_t), enum copy_state_method method)
|
|
{
|
|
copy_snes_data(&buffer, copy_func);
|
|
|
|
//WRAM (128k), VRAM (64k)
|
|
copy_func(&buffer, wramdata, 8192*16);
|
|
copy_func(&buffer, vram, 4096*16);
|
|
|
|
if (spcon)
|
|
{
|
|
copy_spc_data(&buffer, copy_func);
|
|
/*
|
|
if (buffer) //Rewind stuff
|
|
{
|
|
copy_func(&buffer, &echoon0, PHdspsave2);
|
|
}
|
|
*/
|
|
}
|
|
|
|
if (C4Enable)
|
|
{
|
|
copy_func(&buffer, C4Ram, 2048*4);
|
|
}
|
|
|
|
if (SFXEnable)
|
|
{
|
|
copy_func(&buffer, sfxramdata, 8192*16);
|
|
copy_func(&buffer, &SfxR0, PHnum2writesfxreg);
|
|
}
|
|
|
|
if (SA1Enable)
|
|
{
|
|
copy_func(&buffer, &SA1Mode, PHnum2writesa1reg);
|
|
copy_func(&buffer, SA1RAMArea, 8192*16);
|
|
if (method != csm_load_zst_old)
|
|
{
|
|
copy_func(&buffer, &SA1Status, 3);
|
|
copy_func(&buffer, &SA1xpc, 1*4);
|
|
copy_func(&buffer, &sa1dmaptr, 2*4);
|
|
}
|
|
}
|
|
|
|
if (DSP1Type && (method != csm_load_zst_old))
|
|
{
|
|
copy_func(&buffer, &DSP1COp, 70+128);
|
|
copy_func(&buffer, &Op00Multiplicand, 3*4+128);
|
|
copy_func(&buffer, &Op10Coefficient, 4*4+128);
|
|
copy_func(&buffer, &Op04Angle, 4*4+128);
|
|
copy_func(&buffer, &Op08X, 5*4+128);
|
|
copy_func(&buffer, &Op18X, 5*4+128);
|
|
copy_func(&buffer, &Op28X, 4*4+128);
|
|
copy_func(&buffer, &Op0CA, 5*4+128);
|
|
copy_func(&buffer, &Op02FX, 11*4+3*4+28*8+128);
|
|
copy_func(&buffer, &Op0AVS, 5*4+14*8+128);
|
|
copy_func(&buffer, &Op06X, 6*4+10*8+4+128);
|
|
copy_func(&buffer, &Op01m, 4*4+128);
|
|
copy_func(&buffer, &Op0DX, 6*4+128);
|
|
copy_func(&buffer, &Op03F, 6*4+128);
|
|
copy_func(&buffer, &Op14Zr, 9*4+128);
|
|
copy_func(&buffer, &Op0EH, 4*4+128);
|
|
}
|
|
|
|
if (SETAEnable)
|
|
{
|
|
copy_func(&buffer, setaramdata, 256*16);
|
|
|
|
//Todo: copy the SetaCmdEnable? For completeness we should do it
|
|
//but currently we ignore it anyway.
|
|
}
|
|
|
|
if (SPC7110Enable)
|
|
{
|
|
copy_func(&buffer, romdata+0x510000, 65536);
|
|
copy_func(&buffer, &SPCMultA, PHnum2writespc7110reg);
|
|
}
|
|
|
|
if (method != csm_load_zst_old)
|
|
{
|
|
copy_extra_data(&buffer, copy_func);
|
|
|
|
//We don't load SRAM from new states if box isn't checked
|
|
if ((method != csm_load_zst_new) || SRAMState)
|
|
{
|
|
copy_func(&buffer, sram, ramsize);
|
|
}
|
|
|
|
if ((method == csm_save_rewind) || (method == csm_load_rewind))
|
|
{
|
|
copy_func(&buffer, &tempesi, 4);
|
|
copy_func(&buffer, &tempedi, 4);
|
|
copy_func(&buffer, &tempedx, 4);
|
|
copy_func(&buffer, &tempebp, 4);
|
|
}
|
|
}
|
|
}
|
|
|
|
static void memcpyinc(unsigned char **dest, void *src, size_t len)
|
|
{
|
|
memcpy(*dest, src, len);
|
|
*dest += len;
|
|
}
|
|
|
|
static void memcpyrinc(unsigned char **src, void *dest, size_t len)
|
|
{
|
|
memcpy(dest, *src, len);
|
|
*src += len;
|
|
}
|
|
|
|
extern unsigned int RewindTimer;
|
|
extern unsigned char RewindStates;
|
|
|
|
extern unsigned char EMUPause, PauseRewind;
|
|
|
|
unsigned char *StateBackup = 0;
|
|
unsigned char AllocatedRewindStates, LatestRewindPos, EarliestRewindPos;
|
|
bool RewindPosPassed;
|
|
|
|
size_t rewind_state_size, cur_zst_size, old_zst_size;
|
|
|
|
extern unsigned char RewindFrames, romispal;
|
|
extern unsigned char MovieProcessing;
|
|
void zmv_rewind_save(size_t, bool);
|
|
void zmv_rewind_load(size_t, bool);
|
|
|
|
void ClearCacheCheck()
|
|
{
|
|
memset(vidmemch2, 1, sizeof(vidmemch2));
|
|
memset(vidmemch4, 1, sizeof(vidmemch4));
|
|
memset(vidmemch8, 1, sizeof(vidmemch8));
|
|
}
|
|
|
|
//Code to handle special frames for pausing, and desync checking
|
|
unsigned char *SpecialPauseBackup = 0, PauseFrameMode = 0;
|
|
/*
|
|
Pause frame modes
|
|
|
|
0 - no pause frame stored
|
|
1 - pause frame stored
|
|
2 - pause frame ready for reload
|
|
*/
|
|
|
|
void *doMemAlloc(size_t);
|
|
|
|
void BackupPauseFrame()
|
|
{
|
|
copy_state_data(SpecialPauseBackup, memcpyinc, csm_save_rewind);
|
|
PauseFrameMode = 1;
|
|
}
|
|
|
|
void RestorePauseFrame()
|
|
{
|
|
copy_state_data(SpecialPauseBackup, memcpyrinc, csm_load_rewind);
|
|
ClearCacheCheck();
|
|
PauseFrameMode = 0;
|
|
}
|
|
|
|
#define ActualRewindFrames (RewindFrames * (romispal ? 10 : 12))
|
|
|
|
void BackupCVFrame()
|
|
{
|
|
unsigned char *RewindBufferPos = StateBackup + LatestRewindPos*rewind_state_size;
|
|
//printf("Backing up rewind in slot #%u\n", LatestRewindPos);
|
|
|
|
if (MovieProcessing == 1) { zmv_rewind_save(LatestRewindPos, true); }
|
|
else if (MovieProcessing == 2) { zmv_rewind_save(LatestRewindPos, false); }
|
|
copy_state_data(RewindBufferPos, memcpyinc, csm_save_rewind);
|
|
|
|
if (RewindPosPassed)
|
|
{
|
|
EarliestRewindPos = (EarliestRewindPos != AllocatedRewindStates-1) ? EarliestRewindPos+1 : 0;
|
|
RewindPosPassed = false;
|
|
}
|
|
|
|
LatestRewindPos = (LatestRewindPos != AllocatedRewindStates-1) ? LatestRewindPos+1 : 0;
|
|
|
|
if (LatestRewindPos == EarliestRewindPos)
|
|
{
|
|
RewindPosPassed = true;
|
|
}
|
|
|
|
RewindTimer = ActualRewindFrames;
|
|
}
|
|
|
|
void RestoreCVFrame()
|
|
{
|
|
unsigned char *RewindBufferPos;
|
|
|
|
if (LatestRewindPos != EarliestRewindPos || RewindPosPassed)
|
|
{
|
|
LatestRewindPos = (LatestRewindPos) ? LatestRewindPos-1 : AllocatedRewindStates-1;
|
|
RewindPosPassed = false;
|
|
}
|
|
|
|
RewindBufferPos = StateBackup + LatestRewindPos*rewind_state_size;
|
|
//printf("Restoring rewind in slot #%u\n", LatestRewindPos);
|
|
|
|
if (MovieProcessing == 2)
|
|
{
|
|
zmv_rewind_load(LatestRewindPos, false);
|
|
}
|
|
else
|
|
{
|
|
if (MovieProcessing == 1)
|
|
{
|
|
zmv_rewind_load(LatestRewindPos, true);
|
|
}
|
|
|
|
EMUPause = PauseRewind;
|
|
}
|
|
|
|
copy_state_data(RewindBufferPos, memcpyrinc, csm_load_rewind);
|
|
|
|
if (EMUPause)
|
|
{
|
|
BackupPauseFrame();
|
|
}
|
|
|
|
ClearCacheCheck();
|
|
|
|
RewindTimer = ActualRewindFrames;
|
|
}
|
|
|
|
|
|
void SetupRewindBuffer()
|
|
{
|
|
//For special rewind case to help out pauses
|
|
if (SpecialPauseBackup){ free(SpecialPauseBackup); }
|
|
SpecialPauseBackup = doMemAlloc(rewind_state_size);
|
|
|
|
//For standard rewinds
|
|
if (StateBackup){ free(StateBackup); }
|
|
for (; RewindStates; RewindStates--)
|
|
{
|
|
StateBackup = 0;
|
|
StateBackup = (unsigned char *)malloc(rewind_state_size*RewindStates);
|
|
if (StateBackup) { break; }
|
|
}
|
|
AllocatedRewindStates = RewindStates;
|
|
}
|
|
|
|
static size_t state_size;
|
|
|
|
static void state_size_tally(unsigned char **dest, void *src, size_t len)
|
|
{
|
|
state_size += len;
|
|
}
|
|
|
|
void InitRewindVars()
|
|
{
|
|
unsigned char almost_useless_array[1]; //An array is needed for copy_state_data to give the correct size
|
|
state_size = 0;
|
|
copy_state_data(almost_useless_array, state_size_tally, csm_save_rewind);
|
|
rewind_state_size = state_size;
|
|
|
|
SetupRewindBuffer();
|
|
LatestRewindPos = 0;
|
|
EarliestRewindPos = 0;
|
|
RewindPosPassed = false;
|
|
RewindTimer = 1;
|
|
}
|
|
|
|
//This is used to preserve system load state between game loads
|
|
static unsigned char *BackupSystemBuffer = 0;
|
|
|
|
void BackupSystemVars()
|
|
{
|
|
unsigned char *buffer;
|
|
|
|
if (!BackupSystemBuffer)
|
|
{
|
|
state_size = 0;
|
|
copy_snes_data(&buffer, state_size_tally);
|
|
copy_spc_data(&buffer, state_size_tally);
|
|
copy_extra_data(&buffer, state_size_tally);
|
|
BackupSystemBuffer = doMemAlloc(state_size);
|
|
}
|
|
|
|
buffer = BackupSystemBuffer;
|
|
copy_snes_data(&buffer, memcpyinc);
|
|
copy_spc_data(&buffer, memcpyinc);
|
|
copy_extra_data(&buffer, memcpyinc);
|
|
}
|
|
|
|
void RestoreSystemVars()
|
|
{
|
|
unsigned char *buffer = BackupSystemBuffer;
|
|
InitRewindVars();
|
|
copy_snes_data(&buffer, memcpyrinc);
|
|
copy_spc_data(&buffer, memcpyrinc);
|
|
copy_extra_data(&buffer, memcpyrinc);
|
|
}
|
|
|
|
extern unsigned int spcBuffera;
|
|
extern unsigned int Voice0BufPtr, Voice1BufPtr, Voice2BufPtr, Voice3BufPtr;
|
|
extern unsigned int Voice4BufPtr, Voice5BufPtr, Voice6BufPtr, Voice7BufPtr;
|
|
extern unsigned int spcPCRam, spcRamDP;
|
|
|
|
void PrepareSaveState()
|
|
{
|
|
spcPCRam -= (unsigned int)spcRam;
|
|
spcRamDP -= (unsigned int)spcRam;
|
|
|
|
Voice0BufPtr -= spcBuffera;
|
|
Voice1BufPtr -= spcBuffera;
|
|
Voice2BufPtr -= spcBuffera;
|
|
Voice3BufPtr -= spcBuffera;
|
|
Voice4BufPtr -= spcBuffera;
|
|
Voice5BufPtr -= spcBuffera;
|
|
Voice6BufPtr -= spcBuffera;
|
|
Voice7BufPtr -= spcBuffera;
|
|
}
|
|
|
|
extern unsigned int SA1Stat;
|
|
extern unsigned char IRAM[2049], *SA1Ptr, *SA1RegPCS, *CurBWPtr, *SA1BWPtr;
|
|
extern unsigned char *SNSBWPtr;
|
|
|
|
void SaveSA1()
|
|
{
|
|
SA1Stat &= 0xFFFFFF00;
|
|
SA1Ptr -= (unsigned int)SA1RegPCS;
|
|
|
|
if (SA1RegPCS == IRAM)
|
|
{
|
|
SA1Stat = (SA1Stat & 0xFFFFFF00) + 1;
|
|
}
|
|
|
|
if (SA1RegPCS == IRAM-0x3000)
|
|
{
|
|
SA1Stat = (SA1Stat & 0xFFFFFF00) + 2;
|
|
}
|
|
|
|
SA1RegPCS -= (unsigned int)romdata;
|
|
CurBWPtr -= (unsigned int)romdata;
|
|
SA1BWPtr -= (unsigned int)romdata;
|
|
SNSBWPtr -= (unsigned int)romdata;
|
|
}
|
|
|
|
void RestoreSA1()
|
|
{
|
|
SA1RegPCS += (unsigned int)romdata;
|
|
CurBWPtr += (unsigned int)romdata;
|
|
SA1BWPtr += (unsigned int)romdata;
|
|
SNSBWPtr += (unsigned int)romdata;
|
|
|
|
if ((SA1Stat & 0xFF) == 1)
|
|
{
|
|
SA1RegPCS = IRAM;
|
|
}
|
|
|
|
if ((SA1Stat & 0xFF) == 2)
|
|
{
|
|
SA1RegPCS = IRAM-0x3000;
|
|
}
|
|
|
|
SA1Ptr += (unsigned int)SA1RegPCS;
|
|
SA1RAMArea = romdata + 4096*1024;
|
|
}
|
|
|
|
#define ResState(Voice_BufPtr) \
|
|
Voice_BufPtr += spcBuffera; \
|
|
if (Voice_BufPtr >= spcBuffera + 65536*4) \
|
|
{ \
|
|
Voice_BufPtr = spcBuffera; \
|
|
}
|
|
|
|
void ResetState()
|
|
{
|
|
spcPCRam += (unsigned int)spcRam;
|
|
spcRamDP += (unsigned int)spcRam;
|
|
|
|
ResState(Voice0BufPtr);
|
|
ResState(Voice1BufPtr);
|
|
ResState(Voice2BufPtr);
|
|
ResState(Voice3BufPtr);
|
|
ResState(Voice4BufPtr);
|
|
ResState(Voice5BufPtr);
|
|
ResState(Voice6BufPtr);
|
|
ResState(Voice7BufPtr);
|
|
}
|
|
|
|
unsigned char firstsaveinc = 0, txtsavemsg[15] = "STATE - SAVED.";
|
|
unsigned char txtsavemsgfail[16] = "UNABLE TO SAVE.";
|
|
|
|
extern unsigned int statefileloc, CurrentHandle, SfxRomBuffer, SfxCROM;
|
|
extern unsigned int SfxLastRamAdr, SfxRAMMem, MsgCount, MessageOn;
|
|
extern unsigned char AutoIncSaveSlot, fnamest[512], cbitmode, NoPictureSave;
|
|
extern unsigned char *Msgptr;
|
|
extern unsigned short PrevPicture[64*56];
|
|
|
|
static FILE *fhandle;
|
|
void SRAMChdir();
|
|
void CapturePicture();
|
|
|
|
static void write_save_state_data(unsigned char **dest, void *data, size_t len)
|
|
{
|
|
fwrite(data, 1, len, fhandle);
|
|
}
|
|
|
|
static const char zst_header_old[] = "ZSNES Save State File V0.6\x1a\x3c";
|
|
static const char zst_header_cur[] = "ZSNES Save State File V143\x1a\x8f";
|
|
|
|
void calculate_state_sizes()
|
|
{
|
|
state_size = 0;
|
|
copy_state_data(0, state_size_tally, csm_save_zst_new);
|
|
cur_zst_size = state_size + sizeof(zst_header_cur)-1;
|
|
|
|
state_size = 0;
|
|
copy_state_data(0, state_size_tally, csm_load_zst_old);
|
|
old_zst_size = state_size + sizeof(zst_header_old)-1;
|
|
}
|
|
|
|
static bool zst_save_compressed(FILE *fp)
|
|
{
|
|
size_t data_size = cur_zst_size - (sizeof(zst_header_cur)-1);
|
|
unsigned char *buffer = 0;
|
|
|
|
bool worked = false;
|
|
|
|
if ((buffer = (unsigned char *)malloc(data_size)))
|
|
{
|
|
//Compressed buffer which must be at least 0.1% larger than source buffer plus 12 bytes
|
|
//We devide by 1000 then add an extra 1 as a quick way to get a buffer large enough when
|
|
//using integer division
|
|
unsigned long compressed_size = data_size + data_size/1000 + 13;
|
|
unsigned char *compressed_buffer = 0;
|
|
|
|
if ((compressed_buffer = (unsigned char *)malloc(compressed_size)))
|
|
{
|
|
copy_state_data(buffer, memcpyinc, csm_save_zst_new);
|
|
if (compress2(compressed_buffer, &compressed_size, buffer, data_size, Z_BEST_COMPRESSION) == Z_OK)
|
|
{
|
|
fwrite3(compressed_size, fp);
|
|
fwrite(compressed_buffer, 1, compressed_size, fp);
|
|
worked = true;
|
|
}
|
|
free(compressed_buffer);
|
|
}
|
|
free(buffer);
|
|
}
|
|
|
|
if (!worked) //Compression failed for whatever reason
|
|
{
|
|
fwrite3(cur_zst_size | 0x00800000, fp); //Uncompressed ZST will never break 8MB
|
|
}
|
|
|
|
return(worked);
|
|
}
|
|
|
|
void zst_save(FILE *fp, bool Thumbnail, bool Compress)
|
|
{
|
|
PrepareOffset();
|
|
PrepareSaveState();
|
|
unpackfunct();
|
|
|
|
if (SFXEnable)
|
|
{
|
|
SfxRomBuffer -= SfxCROM;
|
|
SfxLastRamAdr -= SfxRAMMem;
|
|
}
|
|
|
|
if (SA1Enable)
|
|
{
|
|
SaveSA1(); //Convert SA-1 stuff to standard, non displacement format
|
|
}
|
|
|
|
if (!Compress || !zst_save_compressed(fp)) //If we don't want compressed or compression failed
|
|
{
|
|
fwrite(zst_header_cur, 1, sizeof(zst_header_cur)-1, fp); //-1 for null
|
|
|
|
fhandle = fp; //Set global file handle
|
|
copy_state_data(0, write_save_state_data, csm_save_zst_new);
|
|
|
|
if (Thumbnail)
|
|
{
|
|
CapturePicture();
|
|
fwrite(PrevPicture, 1, 64*56*sizeof(unsigned short), fp);
|
|
}
|
|
}
|
|
|
|
if (SFXEnable)
|
|
{
|
|
SfxRomBuffer += SfxCROM;
|
|
SfxLastRamAdr += SfxRAMMem;
|
|
}
|
|
|
|
if (SA1Enable)
|
|
{
|
|
RestoreSA1(); //Convert back SA-1 stuff
|
|
}
|
|
|
|
ResetOffset();
|
|
ResetState();
|
|
}
|
|
|
|
void statesaver()
|
|
{
|
|
//Save State code
|
|
#ifdef __LINUX__
|
|
SRAMChdir();
|
|
#endif
|
|
|
|
if (MovieProcessing == 2)
|
|
{
|
|
bool mzt_save(char *, bool, bool);
|
|
if (mzt_save(fnamest+1, (cbitmode && !NoPictureSave) ? true : false, false))
|
|
{
|
|
Msgptr = "RR STATE SAVED.";
|
|
MessageOn = MsgCount;
|
|
}
|
|
return;
|
|
}
|
|
|
|
//'Auto increment savestate slot' code
|
|
if (AutoIncSaveSlot)
|
|
{
|
|
if (firstsaveinc)
|
|
{
|
|
firstsaveinc = 0;
|
|
}
|
|
else
|
|
{
|
|
switch (fnamest[statefileloc])
|
|
{
|
|
case 't':
|
|
fnamest[statefileloc] = '1';
|
|
break;
|
|
case '9':
|
|
fnamest[statefileloc] = 't';
|
|
break;
|
|
default:
|
|
fnamest[statefileloc]++;
|
|
}
|
|
}
|
|
}
|
|
|
|
clim();
|
|
|
|
if ((fhandle = fopen(fnamest+1,"wb")))
|
|
{
|
|
zst_save(fhandle, (bool)(cbitmode && !NoPictureSave), false);
|
|
fclose(fhandle);
|
|
|
|
//Display message onscreen, 'STATE X SAVED.'
|
|
txtsavemsg[6] = (fnamest[statefileloc] == 't') ? '0' : fnamest[statefileloc];
|
|
Msgptr = txtsavemsg;
|
|
}
|
|
else
|
|
{
|
|
//Display message onscreen, 'UNABLE TO SAVE.'
|
|
Msgptr = txtsavemsgfail;
|
|
}
|
|
|
|
MessageOn = MsgCount;
|
|
|
|
stim();
|
|
}
|
|
|
|
unsigned char txtloadmsg[16] = "STATE - LOADED.";
|
|
unsigned char txtconvmsg[17] = "STATE - TOO OLD.";
|
|
unsigned char txtnfndmsg[24] = "UNABLE TO LOAD STATE -.";
|
|
|
|
extern unsigned int KeyLoadState, Totalbyteloaded, SfxMemTable[256], SfxCPB;
|
|
extern unsigned int SfxPBR, SfxROMBR, SfxRAMBR;
|
|
extern unsigned char pressed[256+128+64], multchange, ioportval, SDD1Enable;
|
|
extern unsigned char nexthdma;
|
|
|
|
static void read_save_state_data(unsigned char **dest, void *data, size_t len)
|
|
{
|
|
load_save_size += fread(data, 1, len, fhandle);
|
|
}
|
|
|
|
static bool zst_load_compressed(FILE *fp, size_t compressed_size)
|
|
{
|
|
unsigned long data_size = cur_zst_size - (sizeof(zst_header_cur)-1);
|
|
unsigned char *buffer = 0;
|
|
bool worked = false;
|
|
|
|
if ((buffer = (unsigned char *)malloc(data_size)))
|
|
{
|
|
unsigned char *compressed_buffer = 0;
|
|
|
|
if ((compressed_buffer = (unsigned char *)malloc(compressed_size)))
|
|
{
|
|
fread(compressed_buffer, 1, compressed_size, fp);
|
|
if (uncompress(buffer, &data_size, compressed_buffer, compressed_size) == Z_OK)
|
|
{
|
|
copy_state_data(buffer, memcpyrinc, csm_load_zst_new);
|
|
worked = true;
|
|
}
|
|
free(compressed_buffer);
|
|
}
|
|
free(buffer);
|
|
}
|
|
return(worked);
|
|
}
|
|
|
|
bool zst_load(FILE *fp, size_t Compressed)
|
|
{
|
|
size_t zst_version = 0;
|
|
|
|
if (Compressed)
|
|
{
|
|
if (!zst_load_compressed(fp, Compressed))
|
|
{
|
|
return(false);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
char zst_header_check[sizeof(zst_header_cur)-1];
|
|
|
|
Totalbyteloaded += fread(zst_header_check, 1, sizeof(zst_header_check), fp);
|
|
|
|
if (!memcmp(zst_header_check, zst_header_cur, sizeof(zst_header_check)-2))
|
|
{
|
|
zst_version = 143; //v1.43+
|
|
}
|
|
|
|
if (!memcmp(zst_header_check, zst_header_old, sizeof(zst_header_check)-2))
|
|
{
|
|
zst_version = 60; //v0.60 - v1.42
|
|
}
|
|
|
|
if (!zst_version) { return(false); } //Pre v0.60 saves are no longer loaded
|
|
|
|
load_save_size = 0;
|
|
fhandle = fp; //Set global file handle
|
|
copy_state_data(0, read_save_state_data, (zst_version == 143) ? csm_load_zst_new: csm_load_zst_old );
|
|
Totalbyteloaded += load_save_size;
|
|
}
|
|
|
|
if (SFXEnable)
|
|
{
|
|
SfxCPB = SfxMemTable[(SfxPBR & 0xFF)];
|
|
SfxCROM = SfxMemTable[(SfxROMBR & 0xFF)];
|
|
SfxRAMMem = (unsigned int)sfxramdata + ((SfxRAMBR & 0xFF) << 16);
|
|
SfxRomBuffer += SfxCROM;
|
|
SfxLastRamAdr += SfxRAMMem;
|
|
}
|
|
|
|
if (SA1Enable)
|
|
{
|
|
RestoreSA1(); //Convert back SA-1 stuff
|
|
SA1UpdateDPageC();
|
|
}
|
|
|
|
if (SDD1Enable)
|
|
{
|
|
UpdateBanksSDD1();
|
|
}
|
|
|
|
//Clear cache check if state loaded
|
|
ClearCacheCheck();
|
|
|
|
if (zst_version < 143) //Set new vars which old states did not have
|
|
{
|
|
prevoamptr = 0xFF;
|
|
ioportval = 0xFF;
|
|
spcnumread = 0;
|
|
spchalted = 0xFFFFFFFF;
|
|
nexthdma = 0;
|
|
}
|
|
|
|
repackfunct();
|
|
initpitch();
|
|
ResetOffset();
|
|
ResetState();
|
|
procexecloop();
|
|
|
|
return(true);
|
|
}
|
|
|
|
//Wrapper for above
|
|
bool zst_compressed_loader(FILE *fp)
|
|
{
|
|
size_t data_size = fread3(fp);
|
|
return((data_size & 0x00800000) ? zst_load(fp, 0) : zst_load(fp, data_size));
|
|
}
|
|
|
|
void zst_sram_load(FILE *fp)
|
|
{
|
|
fseek(fp, sizeof(zst_header_cur)-1 + PH65816regsize + 199635, SEEK_CUR);
|
|
if (spcon) { fseek(fp, PHspcsave + PHdspsave + sizeof(DSPMem), SEEK_CUR); }
|
|
if (C4Enable) { fseek(fp, 8192, SEEK_CUR); }
|
|
if (SFXEnable) { fseek(fp, PHnum2writesfxreg + 131072, SEEK_CUR); }
|
|
if (SA1Enable)
|
|
{
|
|
fseek(fp, PHnum2writesa1reg, SEEK_CUR);
|
|
fread(SA1RAMArea, 1, 131072, fp); // SA-1 sram
|
|
fseek(fp, 15, SEEK_CUR);
|
|
}
|
|
if (DSP1Type) { fseek(fp, 2874, SEEK_CUR); }
|
|
if (SETAEnable) { fread(setaramdata, 1, 4096, fp); } // SETA sram
|
|
if (SPC7110Enable) { fseek(fp, PHnum2writespc7110reg + 65536, SEEK_CUR); }
|
|
fseek(fp, 227, SEEK_CUR);
|
|
if (ramsize) { fread(sram, 1, ramsize, fp); } // normal sram
|
|
}
|
|
|
|
void zst_sram_load_compressed(FILE *fp)
|
|
{
|
|
size_t compressed_size = fread3(fp);
|
|
|
|
if (compressed_size & 0x00800000)
|
|
{
|
|
zst_sram_load(fp);
|
|
}
|
|
else
|
|
{
|
|
unsigned long data_size = cur_zst_size - (sizeof(zst_header_cur)-1);
|
|
unsigned char *buffer = 0;
|
|
|
|
if ((buffer = (unsigned char *)malloc(data_size)))
|
|
{
|
|
unsigned char *compressed_buffer = 0;
|
|
if ((compressed_buffer = (unsigned char *)malloc(compressed_size)))
|
|
{
|
|
fread(compressed_buffer, 1, compressed_size, fp);
|
|
if (uncompress(buffer, &data_size, compressed_buffer, compressed_size) == Z_OK)
|
|
{
|
|
unsigned char *data = buffer + PH65816regsize + 199635;
|
|
if (spcon) { data += PHspcsave + PHdspsave + sizeof(DSPMem); }
|
|
if (C4Enable) { data += 8192; }
|
|
if (SFXEnable) { data += PHnum2writesfxreg + 131072; }
|
|
if (SA1Enable)
|
|
{
|
|
data += PHnum2writesa1reg;
|
|
memcpyrinc(&data, SA1RAMArea, 131072); // SA-1 sram
|
|
data += 15;
|
|
}
|
|
if (DSP1Type) { data += 2874; }
|
|
if (SETAEnable) { memcpyrinc(&data, setaramdata, 4096); } // SETA sram
|
|
if (SPC7110Enable) { data += PHnum2writespc7110reg + 65536; }
|
|
data += 227;
|
|
if (ramsize) { memcpyrinc(&data, sram, ramsize); } // normal sram
|
|
}
|
|
free(compressed_buffer);
|
|
}
|
|
free(buffer);
|
|
}
|
|
}
|
|
}
|
|
|
|
void stateloader (unsigned char *statename, unsigned char keycheck, unsigned char xfercheck)
|
|
{
|
|
extern unsigned char PauseLoad;
|
|
#ifdef __LINUX__
|
|
SRAMChdir();
|
|
#endif
|
|
|
|
if (keycheck)
|
|
{
|
|
pressed[1] = 0;
|
|
pressed[KeyLoadState] = 2;
|
|
multchange = 1;
|
|
MessageOn = MsgCount;
|
|
}
|
|
|
|
//Get the state number
|
|
txtloadmsg[6] = txtconvmsg[6] = txtnfndmsg[21] = (fnamest[statefileloc] == 't') ? '0' : fnamest[statefileloc];
|
|
|
|
switch (MovieProcessing)
|
|
{
|
|
bool mzt_load(char *, bool);
|
|
|
|
case 1:
|
|
if (mzt_load(statename, true))
|
|
{
|
|
Msgptr = "RR STATE LOADED.";
|
|
MessageOn = MsgCount;
|
|
|
|
if ((EMUPause = PauseLoad)) //Yes this if supposed to have a single equal
|
|
{
|
|
BackupPauseFrame();
|
|
}
|
|
}
|
|
return;
|
|
case 2:
|
|
if (mzt_load(statename, false))
|
|
{
|
|
Msgptr = "CHAPTER LOADED.";
|
|
MessageOn = MsgCount;
|
|
}
|
|
return;
|
|
}
|
|
|
|
clim();
|
|
|
|
//Actual state loading code
|
|
if ((fhandle = fopen(statename,"rb")))
|
|
{
|
|
if (xfercheck) { Totalbyteloaded = 0; }
|
|
|
|
if (zst_load(fhandle, 0))
|
|
{
|
|
Msgptr = txtloadmsg; // 'STATE X LOADED.'
|
|
|
|
if ((EMUPause = PauseLoad)) //Yes this if supposed to have a single equal
|
|
{
|
|
BackupPauseFrame();
|
|
}
|
|
}
|
|
else
|
|
{
|
|
Msgptr = txtconvmsg; // 'STATE X TOO OLD.' - I don't think this is always accurate -Nach
|
|
}
|
|
fclose(fhandle);
|
|
}
|
|
else
|
|
{
|
|
Msgptr = txtnfndmsg; // 'UNABLE TO LOAD STATE X.'
|
|
}
|
|
|
|
stim();
|
|
}
|
|
|
|
void debugloadstate()
|
|
{
|
|
stateloader(fnamest+1, 0, 0);
|
|
}
|
|
|
|
void loadstate()
|
|
{
|
|
stateloader(fnamest+1, 1, 0);
|
|
}
|
|
|
|
void loadstate2()
|
|
{
|
|
stateloader(fnamest+1, 0, 1);
|
|
}
|