int YabLoadState(const char *filename)
{
FILE *fp;
char id[3];
u8 endian;
int headerversion, version, size, chunksize, headersize;
IOCheck_struct check;
u8* buf;
int totalsize;
int outputwidth;
int outputheight;
int curroutputwidth;
int curroutputheight;
int movieposition;
int temp;
u32 temp32;
filename = MakeMovieStateName(filename);
if (!filename)
return -1;
if ((fp = fopen(filename, "rb")) == NULL)
return -1;
headersize = 0xC;
// Read signature
yread(&check, (void *)id, 1, 3, fp);
if (strncmp(id, "YSS", 3) != 0)
{
fclose(fp);
return -2;
}
// Read header
yread(&check, (void *)&endian, 1, 1, fp);
yread(&check, (void *)&headerversion, 4, 1, fp);
yread(&check, (void *)&size, 4, 1, fp);
switch(headerversion)
{
case 1:
/* This is the "original" version of the format */
break;
case 2:
/* version 2 adds video recording */
yread(&check, (void *)&framecounter, 4, 1, fp);
movieposition=ftell(fp);
yread(&check, (void *)&movieposition, 4, 1, fp);
headersize = 0x14;
break;
default:
/* we're trying to open a save state using a future version
* of the YSS format, that won't work, sorry :) */
fclose(fp);
return -3;
break;
}
#ifdef WORDS_BIGENDIAN
if (endian == 1)
#else
if (endian == 0)
#endif
{
// should setup reading so it's byte-swapped
YabSetError(YAB_ERR_OTHER, (void *)"Load State byteswapping not supported");
fclose(fp);
return -3;
}
// Make sure size variable matches actual size minus header
fseek(fp, 0, SEEK_END);
if (size != (ftell(fp) - headersize))
{
fclose(fp);
return -2;
}
fseek(fp, headersize, SEEK_SET);
// Verify version here
ScspMuteAudio(SCSP_MUTE_SYSTEM);
if (StateCheckRetrieveHeader(fp, "CART", &version, &chunksize) != 0)
{
fclose(fp);
// Revert back to old state here
ScspUnMuteAudio(SCSP_MUTE_SYSTEM);
return -3;
}
CartLoadState(fp, version, chunksize);
if (StateCheckRetrieveHeader(fp, "CS2 ", &version, &chunksize) != 0)
{
fclose(fp);
// Revert back to old state here
ScspUnMuteAudio(SCSP_MUTE_SYSTEM);
return -3;
}
Cs2LoadState(fp, version, chunksize);
if (StateCheckRetrieveHeader(fp, "MSH2", &version, &chunksize) != 0)
{
fclose(fp);
// Revert back to old state here
ScspUnMuteAudio(SCSP_MUTE_SYSTEM);
return -3;
}
SH2LoadState(MSH2, fp, version, chunksize);
if (StateCheckRetrieveHeader(fp, "SSH2", &version, &chunksize) != 0)
{
fclose(fp);
// Revert back to old state here
ScspUnMuteAudio(SCSP_MUTE_SYSTEM);
return -3;
}
SH2LoadState(SSH2, fp, version, chunksize);
if (StateCheckRetrieveHeader(fp, "SCSP", &version, &chunksize) != 0)
{
fclose(fp);
// Revert back to old state here
ScspUnMuteAudio(SCSP_MUTE_SYSTEM);
return -3;
}
SoundLoadState(fp, version, chunksize);
if (StateCheckRetrieveHeader(fp, "SCU ", &version, &chunksize) != 0)
{
fclose(fp);
// Revert back to old state here
ScspUnMuteAudio(SCSP_MUTE_SYSTEM);
return -3;
}
ScuLoadState(fp, version, chunksize);
if (StateCheckRetrieveHeader(fp, "SMPC", &version, &chunksize) != 0)
{
fclose(fp);
// Revert back to old state here
ScspUnMuteAudio(SCSP_MUTE_SYSTEM);
return -3;
}
SmpcLoadState(fp, version, chunksize);
if (StateCheckRetrieveHeader(fp, "VDP1", &version, &chunksize) != 0)
{
fclose(fp);
// Revert back to old state here
ScspUnMuteAudio(SCSP_MUTE_SYSTEM);
return -3;
}
Vdp1LoadState(fp, version, chunksize);
if (StateCheckRetrieveHeader(fp, "VDP2", &version, &chunksize) != 0)
{
fclose(fp);
// Revert back to old state here
ScspUnMuteAudio(SCSP_MUTE_SYSTEM);
return -3;
}
Vdp2LoadState(fp, version, chunksize);
if (StateCheckRetrieveHeader(fp, "OTHR", &version, &chunksize) != 0)
{
fclose(fp);
// Revert back to old state here
ScspUnMuteAudio(SCSP_MUTE_SYSTEM);
return -3;
}
// Other data
yread(&check, (void *)BupRam, 0x10000, 1, fp);
yread(&check, (void *)HighWram, 0x100000, 1, fp);
yread(&check, (void *)LowWram, 0x100000, 1, fp);
yread(&check, (void *)&yabsys.DecilineCount, sizeof(int), 1, fp);
yread(&check, (void *)&yabsys.LineCount, sizeof(int), 1, fp);
yread(&check, (void *)&yabsys.VBlankLineCount, sizeof(int), 1, fp);
yread(&check, (void *)&yabsys.MaxLineCount, sizeof(int), 1, fp);
yread(&check, (void *)&temp, sizeof(int), 1, fp);
yread(&check, (void *)&temp, sizeof(int), 1, fp);
yread(&check, (void *)&temp32, sizeof(u32), 1, fp);
yread(&check, (void *)&yabsys.CurSH2FreqType, sizeof(int), 1, fp);
yread(&check, (void *)&yabsys.IsPal, sizeof(int), 1, fp);
YabauseChangeTiming(yabsys.CurSH2FreqType);
yabsys.UsecFrac = (temp32 << YABSYS_TIMING_BITS) * temp / 10;
if (headerversion > 1) {
yread(&check, (void *)&outputwidth, sizeof(outputwidth), 1, fp);
yread(&check, (void *)&outputheight, sizeof(outputheight), 1, fp);
totalsize=outputwidth * outputheight * sizeof(u32);
if ((buf = (u8 *)malloc(totalsize)) == NULL)
{
return -2;
}
yread(&check, (void *)buf, totalsize, 1, fp);
YuiSwapBuffers();
#ifdef USE_OPENGL
if(VIDCore->id == VIDCORE_SOFT)
glRasterPos2i(0, outputheight);
if(VIDCore->id == VIDCORE_OGL)
glRasterPos2i(0, outputheight/2);
#endif
VIDCore->GetGlSize(&curroutputwidth, &curroutputheight);
#ifdef USE_OPENGL
glPixelZoom((float)curroutputwidth / (float)outputwidth, ((float)curroutputheight / (float)outputheight));
glDrawPixels(outputwidth, outputheight, GL_RGBA, GL_UNSIGNED_BYTE, buf);
#endif
YuiSwapBuffers();
fseek(fp, movieposition, SEEK_SET);
MovieReadState(fp, filename);
}
fclose(fp);
ScspUnMuteAudio(SCSP_MUTE_SYSTEM);
OSDPushMessage(OSDMSG_STATUS, 150, "STATE LOADED");
return 0;
}
int YabSaveState(const char *filename)
{
u32 i;
FILE *fp;
int offset;
IOCheck_struct check;
u8 *buf;
int totalsize;
int outputwidth;
int outputheight;
int movieposition;
int temp;
u32 temp32;
check.done = 0;
check.size = 0;
//use a second set of savestates for movies
filename = MakeMovieStateName(filename);
if (!filename)
return -1;
if ((fp = fopen(filename, "wb")) == NULL)
return -1;
// Write signature
fprintf(fp, "YSS");
// Write endianness byte
#ifdef WORDS_BIGENDIAN
fputc(0x00, fp);
#else
fputc(0x01, fp);
#endif
// Write version(fix me)
i = 2;
ywrite(&check, (void *)&i, sizeof(i), 1, fp);
// Skip the next 4 bytes for now
i = 0;
ywrite(&check, (void *)&i, sizeof(i), 1, fp);
//write frame number
ywrite(&check, (void *)&framecounter, 4, 1, fp);
//this will be updated with the movie position later
ywrite(&check, (void *)&framecounter, 4, 1, fp);
// Go through each area and write each state
i += CartSaveState(fp);
i += Cs2SaveState(fp);
i += SH2SaveState(MSH2, fp);
i += SH2SaveState(SSH2, fp);
i += SoundSaveState(fp);
i += ScuSaveState(fp);
i += SmpcSaveState(fp);
i += Vdp1SaveState(fp);
i += Vdp2SaveState(fp);
offset = StateWriteHeader(fp, "OTHR", 1);
// Other data
ywrite(&check, (void *)BupRam, 0x10000, 1, fp); // do we really want to save this?
ywrite(&check, (void *)HighWram, 0x100000, 1, fp);
ywrite(&check, (void *)LowWram, 0x100000, 1, fp);
ywrite(&check, (void *)&yabsys.DecilineCount, sizeof(int), 1, fp);
ywrite(&check, (void *)&yabsys.LineCount, sizeof(int), 1, fp);
ywrite(&check, (void *)&yabsys.VBlankLineCount, sizeof(int), 1, fp);
ywrite(&check, (void *)&yabsys.MaxLineCount, sizeof(int), 1, fp);
temp = yabsys.DecilineStop >> YABSYS_TIMING_BITS;
ywrite(&check, (void *)&temp, sizeof(int), 1, fp);
temp = (yabsys.CurSH2FreqType == CLKTYPE_26MHZ) ? 268 : 286;
ywrite(&check, (void *)&temp, sizeof(int), 1, fp);
temp32 = (yabsys.UsecFrac * temp / 10) >> YABSYS_TIMING_BITS;
ywrite(&check, (void *)&temp32, sizeof(u32), 1, fp);
ywrite(&check, (void *)&yabsys.CurSH2FreqType, sizeof(int), 1, fp);
ywrite(&check, (void *)&yabsys.IsPal, sizeof(int), 1, fp);
VIDCore->GetGlSize(&outputwidth, &outputheight);
totalsize=outputwidth * outputheight * sizeof(u32);
if ((buf = (u8 *)malloc(totalsize)) == NULL)
{
return -2;
}
YuiSwapBuffers();
#ifdef USE_OPENGL
glPixelZoom(1,1);
glReadBuffer(GL_BACK);
glReadPixels(0, 0, outputwidth, outputheight, GL_RGBA, GL_UNSIGNED_BYTE, buf);
#endif
YuiSwapBuffers();
ywrite(&check, (void *)&outputwidth, sizeof(outputwidth), 1, fp);
ywrite(&check, (void *)&outputheight, sizeof(outputheight), 1, fp);
ywrite(&check, (void *)buf, totalsize, 1, fp);
movieposition=ftell(fp);
//write the movie to the end of the savestate
SaveMovieInState(fp, check);
i += StateFinishHeader(fp, offset);
// Go back and update size
fseek(fp, 8, SEEK_SET);
ywrite(&check, (void *)&i, sizeof(i), 1, fp);
fseek(fp, 16, SEEK_SET);
ywrite(&check, (void *)&movieposition, sizeof(movieposition), 1, fp);
fclose(fp);
OSDPushMessage(OSDMSG_STATUS, 150, "STATE SAVED");
return 0;
}
void YglRender(void) {
YglLevel * level;
glEnable(GL_TEXTURE_2D);
#ifdef USEMICSHADERS
glShadeModel(GL_SMOOTH);
#endif
glBindTexture(GL_TEXTURE_2D, _Ygl->texture);
glTexSubImage2D (GL_TEXTURE_2D, 0, 0, 0, YglTM->width, YglTM->yMax, GL_RGBA, GL_UNSIGNED_BYTE, YglTM->texture);
#ifdef USEMICSHADERS
if (useShaders)
{
glEnableClientState(GL_COLOR_ARRAY);
pfglUseProgram(shaderProgram);
}
#endif
if(_Ygl->st) {
int vertices [] = { 0, 0, 320, 0, 320, 224, 0, 224 };
int text [] = { 0, 0, YglTM->width, 0, YglTM->width, YglTM->height, 0, YglTM->height };
glVertexPointer(2, GL_INT, 0, vertices);
#ifdef USEMICSHADERS
// FIXME: this needs to be defined --AC
//glColorPointer(4, GL_UNSIGNED_BYTE, 0, colors);
#endif
glTexCoordPointer(4, GL_INT, 0, text);
glDrawArrays(GL_QUADS, 0, 4);
} else {
unsigned int i;
for(i = 0;i < _Ygl->depth;i++) {
level = _Ygl->levels + i;
glVertexPointer(2, GL_INT, 0, level->quads);
#ifdef USEMICSHADERS
glColorPointer(4, GL_UNSIGNED_BYTE, 0, level->colors);
#endif
glTexCoordPointer(4, GL_INT, 0, level->textcoords);
glDrawArrays(GL_QUADS, 0, level->currentQuad / 2);
}
}
#ifdef USEMICSHADERS
if (useShaders)
{
glDisableClientState(GL_COLOR_ARRAY);
pfglUseProgram(0);
}
#endif
glDisable(GL_TEXTURE_2D);
#ifndef _arch_dreamcast
#if HAVE_LIBGLUT
if (_Ygl->msglength > 0) {
int i;
glColor3f(1.0f, 0.0f, 0.0f);
glRasterPos2i(10, 22);
for (i = 0; i < _Ygl->msglength; i++) {
glutBitmapCharacter(GLUT_BITMAP_HELVETICA_12, _Ygl->message[i]);
}
glColor3f(1, 1, 1);
}
#endif
#endif
YuiSwapBuffers();
}
