// -----------------------------------------------------------------------------
static int med_save_situation(char * filename)
{
auto SaveFile = PHYSFSX_openWriteBuffered(filename);
if (!SaveFile) {
char ErrorMessage[200];
snprintf(ErrorMessage, sizeof(ErrorMessage), "ERROR: Unable to open %s\n", filename);
ui_messagebox( -2, -2, 1, ErrorMessage, "Ok" );
return 1;
}
// Write mine name.
struct splitpath_t path;
d_splitpath(filename, &path);
PHYSFSX_printf(SaveFile, "%.*s.min\n", DXX_ptrdiff_cast_int(path.base_end - path.base_start), path.base_start);
// Write player position.
PHYSFSX_printf(SaveFile, "%x %x %x\n",static_cast<unsigned>(ConsoleObject->pos.x),static_cast<unsigned>(ConsoleObject->pos.y),static_cast<unsigned>(ConsoleObject->pos.z));
// Write player orientation.
PHYSFSX_printf(SaveFile, "%8x %8x %8x\n",static_cast<unsigned>(ConsoleObject->orient.rvec.x),static_cast<unsigned>(ConsoleObject->orient.rvec.y),static_cast<unsigned>(ConsoleObject->orient.rvec.z));
PHYSFSX_printf(SaveFile, "%8x %8x %8x\n",static_cast<unsigned>(ConsoleObject->orient.uvec.x),static_cast<unsigned>(ConsoleObject->orient.uvec.y),static_cast<unsigned>(ConsoleObject->orient.uvec.z));
PHYSFSX_printf(SaveFile, "%8x %8x %8x\n",static_cast<unsigned>(ConsoleObject->orient.fvec.x),static_cast<unsigned>(ConsoleObject->orient.fvec.y),static_cast<unsigned>(ConsoleObject->orient.fvec.z));
PHYSFSX_printf(SaveFile, "%i\n", ConsoleObject->segnum);
return 1;
}
// -----------------------------------------------------------------------------
int med_save_situation(char * filename)
{
PHYSFS_file * SaveFile;
char mine_name[MAX_NAME_LENGTH];
SaveFile = PHYSFSX_openWriteBuffered( filename );
if (!SaveFile) {
char ErrorMessage[200];
sprintf( ErrorMessage, "ERROR: Unable to open %s\n", filename );
ui_messagebox( -2, -2, 1, ErrorMessage, "Ok" );
return 1;
}
// Write mine name.
// strcpy(mine_name, filename);
d_splitpath(filename, NULL, NULL, mine_name, NULL);
set_extension(mine_name, "min");
PHYSFSX_printf(SaveFile, "%s\n", mine_name);
// Write player position.
PHYSFSX_printf(SaveFile, "%x %x %x\n",(unsigned int) ConsoleObject->pos.x,(unsigned int) ConsoleObject->pos.y,(unsigned int) ConsoleObject->pos.z);
// Write player orientation.
PHYSFSX_printf(SaveFile, "%8x %8x %8x\n",(unsigned int) ConsoleObject->orient.rvec.x,(unsigned int) ConsoleObject->orient.rvec.y,(unsigned int) ConsoleObject->orient.rvec.z);
PHYSFSX_printf(SaveFile, "%8x %8x %8x\n",(unsigned int) ConsoleObject->orient.uvec.x,(unsigned int) ConsoleObject->orient.uvec.y,(unsigned int) ConsoleObject->orient.uvec.z);
PHYSFSX_printf(SaveFile, "%8x %8x %8x\n",(unsigned int) ConsoleObject->orient.fvec.x,(unsigned int) ConsoleObject->orient.fvec.y,(unsigned int) ConsoleObject->orient.fvec.z);
PHYSFSX_printf(SaveFile, "%i\n", ConsoleObject->segnum);
PHYSFS_close( SaveFile);
return 1;
}
// write values from netgame_info to ngp file
void write_netgame_profile(netgame_info *ng)
{
char filename[PATH_MAX];
PHYSFS_file *file;
memset(filename, '\0', PATH_MAX);
snprintf(filename, PATH_MAX, GameArg.SysUsePlayersDir? "Players/%.8s.ngp" : "%.8s.ngp", Players[Player_num].callsign);
file = PHYSFSX_openWriteBuffered(filename);
if (!file)
return;
PHYSFSX_printf(file, "game_name=%s\n", ng->game_name);
PHYSFSX_printf(file, "gamemode=%i\n", ng->gamemode);
PHYSFSX_printf(file, "RefusePlayers=%i\n", ng->RefusePlayers);
PHYSFSX_printf(file, "difficulty=%i\n", ng->difficulty);
PHYSFSX_printf(file, "game_flags=%i\n", ng->game_flags);
PHYSFSX_printf(file, "AllowedItems=%i\n", ng->AllowedItems);
PHYSFSX_printf(file, "ShowEnemyNames=%i\n", ng->ShowEnemyNames);
PHYSFSX_printf(file, "BrightPlayers=%i\n", ng->BrightPlayers);
PHYSFSX_printf(file, "InvulAppear=%i\n", ng->InvulAppear);
PHYSFSX_printf(file, "KillGoal=%i\n", ng->KillGoal);
PHYSFSX_printf(file, "PlayTimeAllowed=%i\n", ng->PlayTimeAllowed);
PHYSFSX_printf(file, "control_invul_time=%i\n", ng->control_invul_time);
PHYSFSX_printf(file, "PacketsPerSec=%i\n", ng->PacketsPerSec);
PHYSFSX_printf(file, "NoFriendlyFire=%i\n", ng->NoFriendlyFire);
#ifdef USE_TRACKER
PHYSFSX_printf(file, "Tracker=%i\n", ng->Tracker);
#else
PHYSFSX_printf(file, "Tracker=0\n");
#endif
PHYSFSX_printf(file, "ngp version=%s\n",VERSION);
PHYSFS_close(file);
}
void con_init(void)
{
cxx_con_init();
memset(con_buffer,0,sizeof(con_buffer));
if (GameArg.DbgSafelog)
gamelog_fp = PHYSFS_openWrite("gamelog.txt");
else
gamelog_fp = PHYSFSX_openWriteBuffered("gamelog.txt");
atexit(con_close);
}
//writes out an uncompressed RGB .tga file
//if we got really spiffy, we could optionally link in libpng or something, and use that.
void write_bmp(char *savename,int w,int h,unsigned char *buf)
{
PHYSFS_file* TGAFile;
TGA_header TGA;
GLbyte HeightH,HeightL,WidthH,WidthL;
unsigned int pixel;
unsigned char *rgbaBuf;
buf = (unsigned char*)d_calloc(w*h*4,sizeof(unsigned char));
rgbaBuf = (unsigned char*) d_calloc(w * h * 4, sizeof(unsigned char));
glReadPixels(0, 0, w, h, GL_RGBA, GL_UNSIGNED_BYTE, rgbaBuf);
for(pixel = 0; pixel < w * h; pixel++) {
*(buf + pixel * 3) = *(rgbaBuf + pixel * 4 + 2);
*(buf + pixel * 3 + 1) = *(rgbaBuf + pixel * 4 + 1);
*(buf + pixel * 3 + 2) = *(rgbaBuf + pixel * 4);
}
d_free(rgbaBuf);
if (!(TGAFile = PHYSFSX_openWriteBuffered(savename)))
{
con_printf(CON_URGENT,"Could not create TGA file to dump screenshot!");
d_free(buf);
return;
}
HeightH = (GLbyte)(h / 256);
HeightL = (GLbyte)(h % 256);
WidthH = (GLbyte)(w / 256);
WidthL = (GLbyte)(w % 256);
// Write TGA Header
TGA.TGAheader[0] = 0;
TGA.TGAheader[1] = 0;
TGA.TGAheader[2] = 2;
TGA.TGAheader[3] = 0;
TGA.TGAheader[4] = 0;
TGA.TGAheader[5] = 0;
TGA.TGAheader[6] = 0;
TGA.TGAheader[7] = 0;
TGA.TGAheader[8] = 0;
TGA.TGAheader[9] = 0;
TGA.TGAheader[10] = 0;
TGA.TGAheader[11] = 0;
TGA.header[0] = (GLbyte) WidthL;
TGA.header[1] = (GLbyte) WidthH;
TGA.header[2] = (GLbyte) HeightL;
TGA.header[3] = (GLbyte) HeightH;
TGA.header[4] = (GLbyte) 24;
TGA.header[5] = 0;
PHYSFS_write(TGAFile,&TGA,sizeof(TGA_header),1);
PHYSFS_write(TGAFile,buf,w*h*3*sizeof(unsigned char),1);
PHYSFS_close(TGAFile);
d_free(buf);
}
void con_init(void)
{
con_buffer = {};
if (CGameArg.DbgSafelog)
gamelog_fp.reset(PHYSFS_openWrite("gamelog.txt"));
else
gamelog_fp = PHYSFSX_openWriteBuffered("gamelog.txt");
cli_init();
cmd_init();
cvar_init();
}
void mem_print_all()
{
PHYSFS_file * ef;
int i, size = 0;
ef = PHYSFSX_openWriteBuffered( "DESCENT.MEM" );
for (i=0; i<LargestIndex; i++ )
if (Present[i]==1 ) {
size += MallocSize[i];
PHYSFSX_printf( ef, "%12d bytes in %s declared in %s, line %d\n", MallocSize[i], Varname[i], Filename[i], LineNum[i] );
}
PHYSFSX_printf( ef, "%d bytes (%d Kbytes) allocated.\n", size, size/1024 );
PHYSFS_close(ef);
}
int med_save_mine(const char * filename)
{
char ErrorMessage[256];
auto SaveFile = PHYSFSX_openWriteBuffered(filename);
if (!SaveFile)
{
snprintf(ErrorMessage, sizeof(ErrorMessage), "ERROR: Unable to open %s\n", filename);
ui_messagebox( -2, -2, 1, ErrorMessage, "Ok" );
return 1;
}
save_mine_data(SaveFile);
//==================== CLOSE THE FILE =============================
return 0;
}
//writes out an uncompressed RGB .tga file
//if we got really spiffy, we could optionally link in libpng or something, and use that.
void write_bmp(char *savename,int w,int h,unsigned char *buf){
PHYSFS_file *f;
f = PHYSFSX_openWriteBuffered(savename);
if (f) {
GLubyte targaMagic[12] = { 0, //no identification field
0,//no colormap
2,//RGB image (well, BGR, actually)
0, 0, 0, 0, 0, 0, 0, 0, 0 };//no colormap or image origin stuff.
GLubyte blah;
int r;
GLubyte *s;
int x,y;
//write .TGA header.
PHYSFS_write(f, targaMagic, sizeof(targaMagic), 1);
PHYSFS_writeSLE16(f, w);
PHYSFS_writeSLE16(f, h);
PHYSFSX_writeU8(f, 24); // 24 bpp
PHYSFSX_writeU8(f, 0); // no attribute bits, origin is lowerleft, no interleave
s=buf;
for (y=0;y<h;y++){//TGAs use BGR ordering of data.
for (x=0;x<w;x++){
blah=s[0];
s[0]=s[2];
s[2]=blah;
s+=3;
}
}
x=0;y=w*h*3;
while (y > 0)
{
r = (int)PHYSFS_write(f, buf + x, 1, y);
if (r<=0){
mprintf((0,"screenshot error, couldn't write to %s (err %i)\n",savename,errno));
break;
}
x+=r;y-=r;
}
PHYSFS_close(f);
}else{
mprintf((0,"screenshot error, couldn't open %s (err %i)\n",savename,errno));
}
}
int WriteConfigFile()
{
PHYSFS_file *infile;
GameCfg.GammaLevel = gr_palette_get_gamma();
infile = PHYSFSX_openWriteBuffered("descent.cfg");
if (infile == NULL) {
return 1;
}
PHYSFSX_printf(infile, "%s=%d\n", DigiVolumeStr, GameCfg.DigiVolume);
PHYSFSX_printf(infile, "%s=%d\n", MusicVolumeStr, GameCfg.MusicVolume);
PHYSFSX_printf(infile, "%s=%d\n", ReverseStereoStr, GameCfg.ReverseStereo);
PHYSFSX_printf(infile, "%s=%d\n", OrigTrackOrderStr, GameCfg.OrigTrackOrder);
PHYSFSX_printf(infile, "%s=%d\n", MusicTypeStr, GameCfg.MusicType);
PHYSFSX_printf(infile, "%s=%d\n", CMLevelMusicPlayOrderStr, GameCfg.CMLevelMusicPlayOrder);
PHYSFSX_printf(infile, "%s=%d\n", CMLevelMusicTrack0Str, GameCfg.CMLevelMusicTrack[0]);
PHYSFSX_printf(infile, "%s=%d\n", CMLevelMusicTrack1Str, GameCfg.CMLevelMusicTrack[1]);
PHYSFSX_printf(infile, "%s=%s\n", CMLevelMusicPathStr, GameCfg.CMLevelMusicPath);
PHYSFSX_printf(infile, "%s=%s\n", CMMiscMusic0Str, GameCfg.CMMiscMusic[SONG_TITLE]);
PHYSFSX_printf(infile, "%s=%s\n", CMMiscMusic1Str, GameCfg.CMMiscMusic[SONG_BRIEFING]);
PHYSFSX_printf(infile, "%s=%s\n", CMMiscMusic2Str, GameCfg.CMMiscMusic[SONG_ENDLEVEL]);
PHYSFSX_printf(infile, "%s=%s\n", CMMiscMusic3Str, GameCfg.CMMiscMusic[SONG_ENDGAME]);
PHYSFSX_printf(infile, "%s=%s\n", CMMiscMusic4Str, GameCfg.CMMiscMusic[SONG_CREDITS]);
PHYSFSX_printf(infile, "%s=%d\n", GammaLevelStr, GameCfg.GammaLevel);
PHYSFSX_printf(infile, "%s=%s\n", LastPlayerStr, Players[Player_num].callsign);
PHYSFSX_printf(infile, "%s=%s\n", LastMissionStr, GameCfg.LastMission);
PHYSFSX_printf(infile, "%s=%i\n", ResolutionXStr, SM_W(Game_screen_mode));
PHYSFSX_printf(infile, "%s=%i\n", ResolutionYStr, SM_H(Game_screen_mode));
PHYSFSX_printf(infile, "%s=%i\n", AspectXStr, GameCfg.AspectX);
PHYSFSX_printf(infile, "%s=%i\n", AspectYStr, GameCfg.AspectY);
PHYSFSX_printf(infile, "%s=%i\n", WindowModeStr, GameCfg.WindowMode);
PHYSFSX_printf(infile, "%s=%i\n", TexFiltStr, GameCfg.TexFilt);
PHYSFSX_printf(infile, "%s=%i\n", VSyncStr, GameCfg.VSync);
PHYSFSX_printf(infile, "%s=%i\n", MultisampleStr, GameCfg.Multisample);
PHYSFSX_printf(infile, "%s=%i\n", FPSIndicatorStr, GameCfg.FPSIndicator);
PHYSFSX_printf(infile, "%s=%i\n", GrabinputStr, GameCfg.Grabinput);
PHYSFS_close(infile);
return 0;
}
dump_door_debugging_info()
{
object *obj;
vms_vector new_pos;
fvi_query fq;
fvi_info hit_info;
int fate;
PHYSFS_file *dfile;
int wall_num;
obj = &Objects[Players[Player_num].objnum];
vm_vec_scale_add(&new_pos,&obj->pos,&obj->orient.fvec,i2f(100));
fq.p0 = &obj->pos;
fq.startseg = obj->segnum;
fq.p1 = &new_pos;
fq.rad = 0;
fq.thisobjnum = Players[Player_num].objnum;
fq.ignore_obj_list = NULL;
fq.flags = 0;
fate = find_vector_intersection(&fq,&hit_info);
dfile = PHYSFSX_openWriteBuffered("door.out");
PHYSFSX_printf(dfile,"FVI hit_type = %d\n",fate);
PHYSFSX_printf(dfile," hit_seg = %d\n",hit_info.hit_seg);
PHYSFSX_printf(dfile," hit_side = %d\n",hit_info.hit_side);
PHYSFSX_printf(dfile," hit_side_seg = %d\n",hit_info.hit_side_seg);
PHYSFSX_printf(dfile,"\n");
if (fate == HIT_WALL) {
wall_num = Segments[hit_info.hit_seg].sides[hit_info.hit_side].wall_num;
PHYSFSX_printf(dfile,"wall_num = %d\n",wall_num);
if (wall_num != -1) {
wall *wall = &Walls[wall_num];
active_door *d;
int i;
PHYSFSX_printf(dfile," segnum = %d\n",wall->segnum);
PHYSFSX_printf(dfile," sidenum = %d\n",wall->sidenum);
PHYSFSX_printf(dfile," hps = %x\n",wall->hps);
PHYSFSX_printf(dfile," linked_wall = %d\n",wall->linked_wall);
PHYSFSX_printf(dfile," type = %d\n",wall->type);
PHYSFSX_printf(dfile," flags = %x\n",wall->flags);
PHYSFSX_printf(dfile," state = %d\n",wall->state);
PHYSFSX_printf(dfile," trigger = %d\n",wall->trigger);
PHYSFSX_printf(dfile," clip_num = %d\n",wall->clip_num);
PHYSFSX_printf(dfile," keys = %x\n",wall->keys);
PHYSFSX_printf(dfile," controlling_trigger = %d\n",wall->controlling_trigger);
PHYSFSX_printf(dfile," cloak_value = %d\n",wall->cloak_value);
PHYSFSX_printf(dfile,"\n");
for (i=0;i<Num_open_doors;i++) { //find door
d = &ActiveDoors[i];
if (d->front_wallnum[0]==wall-Walls || d->back_wallnum[0]==wall-Walls || (d->n_parts==2 && (d->front_wallnum[1]==wall-Walls || d->back_wallnum[1]==wall-Walls)))
break;
}
if (i>=Num_open_doors)
PHYSFSX_printf(dfile,"No active door.\n");
else {
PHYSFSX_printf(dfile,"Active door %d:\n",i);
PHYSFSX_printf(dfile," n_parts = %d\n",d->n_parts);
PHYSFSX_printf(dfile," front_wallnum = %d,%d\n",d->front_wallnum[0],d->front_wallnum[1]);
PHYSFSX_printf(dfile," back_wallnum = %d,%d\n",d->back_wallnum[0],d->back_wallnum[1]);
PHYSFSX_printf(dfile," time = %x\n",d->time);
}
}
}
PHYSFSX_printf(dfile,"\n");
PHYSFSX_printf(dfile,"\n");
PHYSFS_close(dfile);
}
void piggy_dump_all()
{
int i, xlat_offset;
PHYSFS_file * fp;
#ifndef RELEASE
PHYSFS_file * fp1;
PHYSFS_file * fp2;
#endif
char * filename;
int data_offset;
int org_offset;
DiskBitmapHeader bmh;
DiskSoundHeader sndh;
int header_offset;
char subst_name[32];
#ifdef NO_DUMP_SOUNDS
Num_sound_files = 0;
Num_sound_files_new = 0;
#endif
// {
// bitmap_index bi;
// bi.index = 614;
// PIGGY_PAGE_IN( bi );
// count_colors( bi.index, &GameBitmaps[bi.index] );
// key_getch();
// }
// {
// bitmap_index bi;
// bi.index = 478;
// PIGGY_PAGE_IN( bi );
// Int3();
// count_colors( bi.index, &GameBitmaps[bi.index] );
// key_getch();
// }
// {
// bitmap_index bi;
// bi.index = 1398;
// PIGGY_PAGE_IN( bi );
// count_colors( bi.index, &GameBitmaps[bi.index] );
// key_getch();
// }
// {
// bitmap_index bi;
// bi.index = 642;
// PIGGY_PAGE_IN( bi );
// count_colors( bi.index, &GameBitmaps[bi.index] );
// key_getch();
// }
// {
// bitmap_index bi;
// bi.index = 529;
// PIGGY_PAGE_IN( bi );
// count_colors( bi.index, &GameBitmaps[bi.index] );
// key_getch();
// }
// exit(0);
//
if ((Num_bitmap_files_new == 0) && (Num_sound_files_new == 0) )
return;
for (i=0; i < Num_bitmap_files; i++ ) {
bitmap_index bi;
bi.index = i;
PIGGY_PAGE_IN( bi );
}
piggy_close_file();
filename = SHAREPATH "descent.pig";
fp = PHYSFSX_openWriteBuffered( filename );
Assert( fp!=NULL );
#ifndef RELEASE
fp1 = PHYSFSX_openWriteBuffered( "piggy.lst" );
fp2 = PHYSFSX_openWriteBuffered( "piggy.all" );
#endif
i = 0;
PHYSFS_write( fp, &i, sizeof(int), 1 );
bm_write_all(fp);
xlat_offset = PHYSFS_tell(fp);
PHYSFS_write( fp, GameBitmapXlat, sizeof(ushort)*MAX_BITMAP_FILES, 1 );
i = PHYSFS_tell(fp);
PHYSFSX_fseek( fp, 0, SEEK_SET );
PHYSFS_write( fp, &i, sizeof(int), 1 );
PHYSFSX_fseek( fp, i, SEEK_SET );
Num_bitmap_files--;
PHYSFS_write( fp, &Num_bitmap_files, sizeof(int), 1 );
Num_bitmap_files++;
PHYSFS_write( fp, &Num_sound_files, sizeof(int), 1 );
header_offset = PHYSFS_tell(fp);
header_offset += ((Num_bitmap_files-1)*sizeof(DiskBitmapHeader)) + (Num_sound_files*sizeof(DiskSoundHeader));
data_offset = header_offset;
for (i=1; i < Num_bitmap_files; i++ ) {
int *size;
grs_bitmap *bmp;
{
char * p, *p1;
p = strchr(AllBitmaps[i].name,'#');
if (p) {
int n;
p1 = p; p1++;
n = atoi(p1);
*p = 0;
#ifndef RELEASE
if (n==0) {
PHYSFSX_printf( fp2, "%s.abm\n", AllBitmaps[i].name );
}
#endif
memcpy( bmh.name, AllBitmaps[i].name, 8 );
Assert( n <= 63 );
bmh.dflags = DBM_FLAG_ABM + n;
*p = '#';
}else {
#ifndef RELEASE
PHYSFSX_printf( fp2, "%s.bbm\n", AllBitmaps[i].name );
#endif
memcpy( bmh.name, AllBitmaps[i].name, 8 );
bmh.dflags = 0;
}
}
bmp = &GameBitmaps[i];
Assert( !(bmp->bm_flags&BM_FLAG_PAGED_OUT) );
#ifndef RELEASE
PHYSFSX_printf( fp1, "BMP: %s, size %d bytes", AllBitmaps[i].name, bmp->bm_rowsize * bmp->bm_h );
#endif
org_offset = PHYSFS_tell(fp);
bmh.offset = data_offset - header_offset;
PHYSFSX_fseek( fp, data_offset, SEEK_SET );
if ( bmp->bm_flags & BM_FLAG_RLE ) {
size = (int *)bmp->bm_data;
PHYSFS_write( fp, bmp->bm_data, sizeof(ubyte), *size );
data_offset += *size;
//bmh.data_length = *size;
#ifndef RELEASE
PHYSFSX_printf( fp1, ", and is already compressed to %d bytes.\n", *size );
#endif
} else {
PHYSFS_write( fp, bmp->bm_data, sizeof(ubyte), bmp->bm_rowsize * bmp->bm_h );
data_offset += bmp->bm_rowsize * bmp->bm_h;
//bmh.data_length = bmp->bm_rowsize * bmp->bm_h;
#ifndef RELEASE
PHYSFSX_printf( fp1, ".\n" );
#endif
}
PHYSFSX_fseek( fp, org_offset, SEEK_SET );
if ( GameBitmaps[i].bm_w > 255 ) {
Assert( GameBitmaps[i].bm_w < 512 );
bmh.width = GameBitmaps[i].bm_w - 256;
bmh.dflags |= DBM_FLAG_LARGE;
} else {
bmh.width = GameBitmaps[i].bm_w;
}
Assert( GameBitmaps[i].bm_h < 256 );
bmh.height = GameBitmaps[i].bm_h;
bmh.flags = GameBitmaps[i].bm_flags;
if (piggy_is_substitutable_bitmap( AllBitmaps[i].name, subst_name )) {
bitmap_index other_bitmap;
other_bitmap = piggy_find_bitmap( subst_name );
GameBitmapXlat[i] = other_bitmap.index;
bmh.flags |= BM_FLAG_PAGED_OUT;
} else {
#ifdef BUILD_PSX_DATA
count_colors( i, &GameBitmaps[i] );
#endif
bmh.flags &= ~BM_FLAG_PAGED_OUT;
}
bmh.avg_color=GameBitmaps[i].avg_color;
PHYSFS_write( fp, &bmh, sizeof(DiskBitmapHeader), 1 ); // Mark as a bitmap
}
for (i=0; i < Num_sound_files; i++ )
{
digi_sound *snd;
snd = &GameSounds[i];
strcpy( sndh.name, AllSounds[i].name );
#ifdef ALLEGRO
sndh.length = GameSounds[i].len;
#else
sndh.length = GameSounds[i].length;
#endif
sndh.offset = data_offset - header_offset;
org_offset = PHYSFS_tell(fp);
PHYSFSX_fseek( fp, data_offset, SEEK_SET );
sndh.data_length = sndh.length;
PHYSFS_write( fp, snd->data, sizeof(ubyte), sndh.length );
data_offset += sndh.length;
PHYSFSX_fseek( fp, org_offset, SEEK_SET );
PHYSFS_write( fp, &sndh, sizeof(DiskSoundHeader), 1 ); // Mark as a bitmap
#ifndef RELEASE
PHYSFSX_printf( fp1, "SND: %s, size %d bytes\n", AllSounds[i].name, sndh.length );
PHYSFSX_printf( fp2, "%s.raw\n", AllSounds[i].name );
#endif
}
PHYSFSX_fseek( fp, xlat_offset, SEEK_SET );
PHYSFS_write( fp, GameBitmapXlat, sizeof(ushort)*MAX_BITMAP_FILES, 1 );
PHYSFS_close(fp);
#ifndef RELEASE
PHYSFSX_printf( fp1, " Dumped %d assorted bitmaps.\n", Num_bitmap_files );
PHYSFSX_printf( fp1, " Dumped %d assorted sounds.\n", Num_sound_files );
PHYSFS_close(fp1);
PHYSFS_close(fp2);
#endif
#ifdef BUILD_PSX_DATA
fp = PHYSFSX_openWriteBuffered( "psx/descent.dat" );
PHYSFS_write( fp, &i, sizeof(int), 1 );
bm_write_all(fp);
PHYSFS_write( fp, GameBitmapXlat, sizeof(ushort)*MAX_BITMAP_FILES, 1 );
PHYSFS_close(fp);
#endif
// Never allow the game to run after building pig.
exit(0);
}
//write out player's saved games. returns errno (0 == no error)
int write_player_file()
{
char filename[PATH_MAX];
PHYSFS_file *file;
int errno_ret, i;
if ( Newdemo_state == ND_STATE_PLAYBACK )
return -1;
errno_ret = WriteConfigFile();
memset(filename, '\0', PATH_MAX);
snprintf(filename, PATH_MAX, GameArg.SysUsePlayersDir? "Players/%.8s.plx" : "%.8s.plx", Players[Player_num].callsign);
write_player_d1x(filename);
snprintf(filename, PATH_MAX, GameArg.SysUsePlayersDir? "Players/%.8s.plr" : "%.8s.plr", Players[Player_num].callsign);
file = PHYSFSX_openWriteBuffered(filename);
if (!file)
return errno;
PHYSFS_writeULE32(file, SAVE_FILE_ID);
PHYSFS_writeULE16(file, SAVED_GAME_VERSION);
PHYSFS_writeULE16(file, PLAYER_STRUCT_VERSION);
PHYSFS_writeSLE32(file, PlayerCfg.NHighestLevels);
PHYSFS_writeSLE32(file, PlayerCfg.DefaultDifficulty);
PHYSFS_writeSLE32(file, PlayerCfg.AutoLeveling);
errno_ret = EZERO;
//write higest level info
if ((PHYSFS_write( file, PlayerCfg.HighestLevels, sizeof(hli), PlayerCfg.NHighestLevels) != PlayerCfg.NHighestLevels)) {
errno_ret = errno;
PHYSFS_close(file);
return errno_ret;
}
if (PHYSFS_write( file, saved_games,sizeof(saved_games),1) != 1) {
errno_ret = errno;
PHYSFS_close(file);
return errno_ret;
}
#ifdef NETWORK
if ((PHYSFS_write( file, PlayerCfg.NetworkMessageMacro, MAX_MESSAGE_LEN, 4) != 4)) {
errno_ret = errno;
PHYSFS_close(file);
return errno_ret;
}
#else
{
//PHYSFS_seek( file, PHYSFS_tell(file)+MAX_MESSAGE_LEN * 4 ); // Seeking is bad for Mac OS 9
char dummy[MAX_MESSAGE_LEN][4];
if ((PHYSFS_write( file, dummy, MAX_MESSAGE_LEN, 4) != 4)) {
errno_ret = errno;
PHYSFS_close(file);
return errno_ret;
}
}
#endif
//write kconfig info
{
if (PHYSFS_write(file, PlayerCfg.KeySettings[0], sizeof(PlayerCfg.KeySettings[0]), 1) != 1)
errno_ret=errno;
if (PHYSFS_write(file, PlayerCfg.KeySettings[1], sizeof(PlayerCfg.KeySettings[1]), 1) != 1)
errno_ret=errno;
for (i = 0; i < MAX_CONTROLS*3; i++)
if (PHYSFS_write(file, "0", sizeof(ubyte), 1) != 1) // Skip obsolete Flightstick/Thrustmaster/Gravis map fields
errno_ret=errno;
if (PHYSFS_write(file, PlayerCfg.KeySettings[2], sizeof(PlayerCfg.KeySettings[2]), 1) != 1)
errno_ret=errno;
for (i = 0; i < MAX_CONTROLS; i++)
if (PHYSFS_write(file, "0", sizeof(ubyte), 1) != 1) // Skip obsolete Cyberman map field
errno_ret=errno;
if(errno_ret == EZERO)
{
ubyte old_avg_joy_sensitivity = 8;
if (PHYSFS_write( file, &PlayerCfg.ControlType, sizeof(ubyte), 1 )!=1)
errno_ret=errno;
else if (PHYSFS_write( file, &old_avg_joy_sensitivity, sizeof(ubyte), 1 )!=1)
errno_ret=errno;
}
}
if (!PHYSFS_close(file))
errno_ret = errno;
if (errno_ret != EZERO) {
PHYSFS_delete(filename); //delete bogus file
nm_messagebox(TXT_ERROR, 1, TXT_OK, "%s\n\n%s",TXT_ERROR_WRITING_PLR, strerror(errno_ret));
}
return errno_ret;
}
int write_player_d1x(char *filename)
{
PHYSFS_file *fout;
int rc=0;
char tempfile[PATH_MAX];
strcpy(tempfile,filename);
tempfile[strlen(tempfile)-4]=0;
strcat(tempfile,".pl$");
fout=PHYSFSX_openWriteBuffered(tempfile);
if (!fout && GameArg.SysUsePlayersDir)
{
PHYSFS_mkdir("Players/"); //try making directory
fout=PHYSFSX_openWriteBuffered(tempfile);
}
if(fout)
{
PHYSFSX_printf(fout,"[D1X Options]\n");
PHYSFSX_printf(fout,"[weapon reorder]\n");
PHYSFSX_printf(fout,"primary=0x%x,0x%x,0x%x,0x%x,0x%x,0x%x\n",PlayerCfg.PrimaryOrder[0], PlayerCfg.PrimaryOrder[1], PlayerCfg.PrimaryOrder[2],PlayerCfg.PrimaryOrder[3], PlayerCfg.PrimaryOrder[4], PlayerCfg.PrimaryOrder[5]);
PHYSFSX_printf(fout,"secondary=0x%x,0x%x,0x%x,0x%x,0x%x,0x%x\n",PlayerCfg.SecondaryOrder[0], PlayerCfg.SecondaryOrder[1], PlayerCfg.SecondaryOrder[2],PlayerCfg.SecondaryOrder[3], PlayerCfg.SecondaryOrder[4], PlayerCfg.SecondaryOrder[5]);
PHYSFSX_printf(fout,"[end]\n");
PHYSFSX_printf(fout,"[joystick]\n");
PHYSFSX_printf(fout,"sensitivity0=%d\n",PlayerCfg.JoystickSens[0]);
PHYSFSX_printf(fout,"sensitivity1=%d\n",PlayerCfg.JoystickSens[1]);
PHYSFSX_printf(fout,"sensitivity2=%d\n",PlayerCfg.JoystickSens[2]);
PHYSFSX_printf(fout,"sensitivity3=%d\n",PlayerCfg.JoystickSens[3]);
PHYSFSX_printf(fout,"sensitivity4=%d\n",PlayerCfg.JoystickSens[4]);
PHYSFSX_printf(fout,"sensitivity5=%d\n",PlayerCfg.JoystickSens[5]);
PHYSFSX_printf(fout,"deadzone0=%d\n",PlayerCfg.JoystickDead[0]);
PHYSFSX_printf(fout,"deadzone1=%d\n",PlayerCfg.JoystickDead[1]);
PHYSFSX_printf(fout,"deadzone2=%d\n",PlayerCfg.JoystickDead[2]);
PHYSFSX_printf(fout,"deadzone3=%d\n",PlayerCfg.JoystickDead[3]);
PHYSFSX_printf(fout,"deadzone4=%d\n",PlayerCfg.JoystickDead[4]);
PHYSFSX_printf(fout,"deadzone5=%d\n",PlayerCfg.JoystickDead[5]);
PHYSFSX_printf(fout,"[end]\n");
PHYSFSX_printf(fout,"[mouse]\n");
PHYSFSX_printf(fout,"flightsim=%d\n",PlayerCfg.MouseFlightSim);
PHYSFSX_printf(fout,"sensitivity0=%d\n",PlayerCfg.MouseSens[0]);
PHYSFSX_printf(fout,"sensitivity1=%d\n",PlayerCfg.MouseSens[1]);
PHYSFSX_printf(fout,"sensitivity2=%d\n",PlayerCfg.MouseSens[2]);
PHYSFSX_printf(fout,"sensitivity3=%d\n",PlayerCfg.MouseSens[3]);
PHYSFSX_printf(fout,"sensitivity4=%d\n",PlayerCfg.MouseSens[4]);
PHYSFSX_printf(fout,"sensitivity5=%d\n",PlayerCfg.MouseSens[5]);
PHYSFSX_printf(fout,"fsdead=%d\n",PlayerCfg.MouseFSDead);
PHYSFSX_printf(fout,"fsindi=%d\n",PlayerCfg.MouseFSIndicator);
PHYSFSX_printf(fout,"[end]\n");
PHYSFSX_printf(fout,"[weapon keys v2]\n");
PHYSFSX_printf(fout,"1=0x%x,0x%x,0x%x\n",PlayerCfg.KeySettingsD1X[0],PlayerCfg.KeySettingsD1X[1],PlayerCfg.KeySettingsD1X[2]);
PHYSFSX_printf(fout,"2=0x%x,0x%x,0x%x\n",PlayerCfg.KeySettingsD1X[3],PlayerCfg.KeySettingsD1X[4],PlayerCfg.KeySettingsD1X[5]);
PHYSFSX_printf(fout,"3=0x%x,0x%x,0x%x\n",PlayerCfg.KeySettingsD1X[6],PlayerCfg.KeySettingsD1X[7],PlayerCfg.KeySettingsD1X[8]);
PHYSFSX_printf(fout,"4=0x%x,0x%x,0x%x\n",PlayerCfg.KeySettingsD1X[9],PlayerCfg.KeySettingsD1X[10],PlayerCfg.KeySettingsD1X[11]);
PHYSFSX_printf(fout,"5=0x%x,0x%x,0x%x\n",PlayerCfg.KeySettingsD1X[12],PlayerCfg.KeySettingsD1X[13],PlayerCfg.KeySettingsD1X[14]);
PHYSFSX_printf(fout,"6=0x%x,0x%x,0x%x\n",PlayerCfg.KeySettingsD1X[15],PlayerCfg.KeySettingsD1X[16],PlayerCfg.KeySettingsD1X[17]);
PHYSFSX_printf(fout,"7=0x%x,0x%x,0x%x\n",PlayerCfg.KeySettingsD1X[18],PlayerCfg.KeySettingsD1X[19],PlayerCfg.KeySettingsD1X[20]);
PHYSFSX_printf(fout,"8=0x%x,0x%x,0x%x\n",PlayerCfg.KeySettingsD1X[21],PlayerCfg.KeySettingsD1X[22],PlayerCfg.KeySettingsD1X[23]);
PHYSFSX_printf(fout,"9=0x%x,0x%x,0x%x\n",PlayerCfg.KeySettingsD1X[24],PlayerCfg.KeySettingsD1X[25],PlayerCfg.KeySettingsD1X[26]);
PHYSFSX_printf(fout,"0=0x%x,0x%x,0x%x\n",PlayerCfg.KeySettingsD1X[27],PlayerCfg.KeySettingsD1X[28],PlayerCfg.KeySettingsD1X[29]);
PHYSFSX_printf(fout,"[end]\n");
PHYSFSX_printf(fout,"[cockpit]\n");
PHYSFSX_printf(fout,"mode=%i\n",PlayerCfg.CockpitMode[0]);
PHYSFSX_printf(fout,"hud=%i\n",PlayerCfg.HudMode);
PHYSFSX_printf(fout,"rettype=%i\n",PlayerCfg.ReticleType);
PHYSFSX_printf(fout,"retrgba=%i,%i,%i,%i\n",PlayerCfg.ReticleRGBA[0],PlayerCfg.ReticleRGBA[1],PlayerCfg.ReticleRGBA[2],PlayerCfg.ReticleRGBA[3]);
PHYSFSX_printf(fout,"retsize=%i\n",PlayerCfg.ReticleSize);
PHYSFSX_printf(fout,"[end]\n");
PHYSFSX_printf(fout,"[toggles]\n");
PHYSFSX_printf(fout,"persistentdebris=%i\n",PlayerCfg.PersistentDebris);
PHYSFSX_printf(fout,"prshot=%i\n",PlayerCfg.PRShot);
PHYSFSX_printf(fout,"noredundancy=%i\n",PlayerCfg.NoRedundancy);
PHYSFSX_printf(fout,"multimessages=%i\n",PlayerCfg.MultiMessages);
PHYSFSX_printf(fout,"bombgauge=%i\n",PlayerCfg.BombGauge);
PHYSFSX_printf(fout,"automapfreeflight=%i\n",PlayerCfg.AutomapFreeFlight);
PHYSFSX_printf(fout,"nofireautoselect=%i\n",PlayerCfg.NoFireAutoselect);
PHYSFSX_printf(fout,"[end]\n");
PHYSFSX_printf(fout,"[graphics]\n");
PHYSFSX_printf(fout,"alphaeffects=%i\n",PlayerCfg.AlphaEffects);
PHYSFSX_printf(fout,"dynlightcolor=%i\n",PlayerCfg.DynLightColor);
PHYSFSX_printf(fout,"[end]\n");
PHYSFSX_printf(fout,"[plx version]\n");
PHYSFSX_printf(fout,"plx version=%s\n",VERSION);
PHYSFSX_printf(fout,"[end]\n");
PHYSFSX_printf(fout,"[end]\n");
PHYSFS_close(fout);
if(rc==0)
{
PHYSFS_delete(filename);
rc = PHYSFSX_rename(tempfile,filename);
}
return rc;
}
else
return errno;
}
void plyr_save_stats()
{
int kills = PlayerCfg.NetlifeKills,deaths = PlayerCfg.NetlifeKilled, neg, i;
char filename[PATH_MAX];
unsigned char buf[16],buf2[16],a;
PHYSFS_file *f;
memset(filename, '\0', PATH_MAX);
snprintf(filename, PATH_MAX, GameArg.SysUsePlayersDir?"Players/%s.eff":"%s.eff", Players[Player_num].callsign);
f = PHYSFSX_openWriteBuffered(filename);
if(!f)
return; //broken!
PHYSFSX_printf(f,"kills:%i\n",kills);
PHYSFSX_printf(f,"deaths:%i\n",deaths);
PHYSFSX_printf(f,"key:01 ");
if (kills<0)
{
neg=1;
kills*=-1;
}
else
neg=0;
for (i=0;kills;i++)
{
a=(kills & 0xFF) ^ effcode1[i+neg];
buf[i*2]=(a&0xF)+33;
buf[i*2+1]=(a>>4)+33;
a=(kills & 0xFF) ^ effcode2[i+neg];
buf2[i*2]=(a&0xF)+33;
buf2[i*2+1]=(a>>4)+33;
kills>>=8;
}
buf[i*2]=0;
buf2[i*2]=0;
if (neg)
i+='a';
else
i+='A';
PHYSFSX_printf(f,"%c%s %c%s ",i,buf,i,buf2);
if (deaths<0)
{
neg=1;
deaths*=-1;
}else
neg=0;
for (i=0;deaths;i++)
{
a=(deaths & 0xFF) ^ effcode3[i+neg];
buf[i*2]=(a&0xF)+33;
buf[i*2+1]=(a>>4)+33;
a=(deaths & 0xFF) ^ effcode4[i+neg];
buf2[i*2]=(a&0xF)+33;
buf2[i*2+1]=(a>>4)+33;
deaths>>=8;
}
buf[i*2]=0;
buf2[i*2]=0;
if (neg)
i+='a';
else
i+='A';
PHYSFSX_printf(f,"%c%s %c%s\n",i,buf,i,buf2);
PHYSFS_close(f);
}
// -----------------------------------------------------------------------------
// Save game
int save_level_sub(char * filename, int compiled_version)
{
PHYSFS_file * SaveFile;
char temp_filename[PATH_MAX];
int minedata_offset=0,gamedata_offset=0,hostagetext_offset=0;
// if ( !compiled_version )
{
write_game_text_file(filename);
if (Errors_in_mine) {
if (is_real_level(filename)) {
char ErrorMessage[200];
sprintf( ErrorMessage, "Warning: %i errors in this mine!\n", Errors_in_mine );
gr_palette_load(gr_palette);
if (nm_messagebox( NULL, 2, "Cancel Save", "Save", ErrorMessage )!=1) {
return 1;
}
}
}
// change_filename_extension(temp_filename,filename,".LVL");
}
// else
{
change_filename_extension(temp_filename, filename, ".RDL");
}
SaveFile = PHYSFSX_openWriteBuffered(temp_filename);
if (!SaveFile)
{
char ErrorMessage[256];
snprintf( ErrorMessage, sizeof(ErrorMessage), "ERROR: Cannot write to '%s'.", temp_filename);
gr_palette_load(gr_palette);
nm_messagebox( NULL, 1, "Ok", ErrorMessage );
return 1;
}
if (Current_level_name[0] == 0)
strcpy(Current_level_name,"Untitled");
clear_transient_objects(1); //1 means clear proximity bombs
compress_objects(); //after this, Highest_object_index == num objects
//make sure player is in a segment
if (update_object_seg(&Objects[Players[0].objnum]) == 0) {
if (ConsoleObject->segnum > Highest_segment_index)
ConsoleObject->segnum = 0;
compute_segment_center(&ConsoleObject->pos,&(Segments[ConsoleObject->segnum]));
}
fix_object_segs();
//Write the header
PHYSFS_writeSLE32(SaveFile, MAKE_SIG('P','L','V','L'));
PHYSFS_writeSLE32(SaveFile, Gamesave_current_version);
//save placeholders
PHYSFS_writeSLE32(SaveFile, minedata_offset);
PHYSFS_writeSLE32(SaveFile, gamedata_offset);
PHYSFS_writeSLE32(SaveFile, hostagetext_offset);
//Now write the damn data
minedata_offset = PHYSFS_tell(SaveFile);
#if 0 // only save compiled mine data
if ( !compiled_version )
save_mine_data(SaveFile);
else
#endif
save_mine_data_compiled(SaveFile);
gamedata_offset = PHYSFS_tell(SaveFile);
save_game_data(SaveFile);
hostagetext_offset = PHYSFS_tell(SaveFile);
PHYSFS_seek(SaveFile, sizeof(int) + sizeof(Gamesave_current_version));
PHYSFS_writeSLE32(SaveFile, minedata_offset);
PHYSFS_writeSLE32(SaveFile, gamedata_offset);
PHYSFS_writeSLE32(SaveFile, hostagetext_offset);
//==================== CLOSE THE FILE =============================
PHYSFS_close(SaveFile);
// if ( !compiled_version )
{
if (EditorWindow)
editor_status_fmt("Saved mine %s, \"%s\"",filename,Current_level_name);
}
return 0;
}
int state_save_all_sub(char *filename, char *desc, int between_levels)
{
int i,j;
PHYSFS_file *fp;
grs_canvas * cnv;
ubyte *pal;
Assert(between_levels == 0); //between levels save ripped out
/* if ( Game_mode & GM_MULTI ) {
{
start_time();
return 0;
}
}*/
#if defined(MACINTOSH) && !defined(NDEBUG)
if ( strncmp(filename, PLAYER_DIR, 9) )
Int3();
#endif
fp = PHYSFSX_openWriteBuffered(filename);
if ( !fp ) {
if ( !(Game_mode & GM_MULTI) )
nm_messagebox(NULL, 1, TXT_OK, "Error writing savegame.\nPossibly out of disk\nspace.");
start_time();
return 0;
}
//Save id
PHYSFS_write(fp, dgss_id, sizeof(char) * 4, 1);
//Save version
i = STATE_VERSION;
PHYSFS_write(fp, &i, sizeof(int), 1);
//Save description
PHYSFS_write(fp, desc, sizeof(char) * DESC_LENGTH, 1);
// Save the current screen shot...
cnv = gr_create_canvas( THUMBNAIL_W, THUMBNAIL_H );
if ( cnv )
{
#ifdef OGL
ubyte *buf;
int k;
GLint gl_draw_buffer;
#endif
grs_canvas * cnv_save;
cnv_save = grd_curcanv;
gr_set_current_canvas( cnv );
render_frame(0, 0);
#if defined(OGL)
buf = d_malloc(THUMBNAIL_W * THUMBNAIL_H * 3);
glGetIntegerv(GL_DRAW_BUFFER, &gl_draw_buffer);
glReadBuffer(gl_draw_buffer);
glReadPixels(0, SHEIGHT - THUMBNAIL_H, THUMBNAIL_W, THUMBNAIL_H, GL_RGB, GL_UNSIGNED_BYTE, buf);
k = THUMBNAIL_H;
for (i = 0; i < THUMBNAIL_W * THUMBNAIL_H; i++) {
if (!(j = i % THUMBNAIL_W))
k--;
cnv->cv_bitmap.bm_data[THUMBNAIL_W * k + j] =
gr_find_closest_color(buf[3*i]/4, buf[3*i+1]/4, buf[3*i+2]/4);
}
d_free(buf);
#endif
pal = gr_palette;
PHYSFS_write(fp, cnv->cv_bitmap.bm_data, THUMBNAIL_W * THUMBNAIL_H, 1);
gr_set_current_canvas(cnv_save);
gr_free_canvas( cnv );
PHYSFS_write(fp, pal, 3, 256);
}
else
{
ubyte color = 0;
for ( i=0; i<THUMBNAIL_W*THUMBNAIL_H; i++ )
PHYSFS_write(fp, &color, sizeof(ubyte), 1);
}
// Save the Between levels flag...
PHYSFS_write(fp, &between_levels, sizeof(int), 1);
// Save the mission info...
mprintf ((0, "HEY! Mission name is %s\n", Current_mission_filename));
PHYSFS_write(fp, Current_mission_filename, 9 * sizeof(char), 1);
//Save level info
PHYSFS_write(fp, &Current_level_num, sizeof(int), 1);
PHYSFS_write(fp, &Next_level_num, sizeof(int), 1);
//Save GameTime
PHYSFS_write(fp, &GameTime, sizeof(fix), 1);
// If coop save, save all
#ifdef NETWORK
if (Game_mode & GM_MULTI_COOP)
{
PHYSFS_write(fp, &state_game_id,sizeof(int), 1);
PHYSFS_write(fp, &Netgame,sizeof(netgame_info), 1);
PHYSFS_write(fp, &NetPlayers,sizeof(AllNetPlayers_info), 1);
PHYSFS_write(fp, &N_players,sizeof(int), 1);
PHYSFS_write(fp, &Player_num,sizeof(int), 1);
for (i=0;i<N_players;i++)
PHYSFS_write(fp, &Players[i], sizeof(player), 1);
#ifdef RISKY_PROPOSITION
PHYSFS_write(fp, &robot_controlled[0], 4 * MAX_ROBOTS_CONTROLLED, 1);
PHYSFS_write(fp, &robot_agitation[0], 4 * MAX_ROBOTS_CONTROLLED, 1);
PHYSFS_write(fp, &robot_controlled_time[0], 4 * MAX_ROBOTS_CONTROLLED, 1);
PHYSFS_write(fp, &robot_last_send_time[0], 4 * MAX_ROBOTS_CONTROLLED, 1);
PHYSFS_write(fp, &robot_last_message_time[0], 4 * MAX_ROBOTS_CONTROLLED, 1);
PHYSFS_write(fp, &robot_send_pending[0], 4 * MAX_ROBOTS_CONTROLLED, 1);
PHYSFS_write(fp, &robot_fired[0], 4 * MAX_ROBOTS_CONTROLLED, 1);
for (i=0;i<MAX_ROBOTS_CONTROLLED;i++)
PHYSFS_write(fp, robot_fire_buf[i][0], 18 + 3, 1);
#endif
}
#endif
//Save player info
PHYSFS_write(fp, &Players[Player_num], sizeof(player), 1);
// Save the current weapon info
PHYSFS_write(fp, &Primary_weapon, sizeof(sbyte), 1);
PHYSFS_write(fp, &Secondary_weapon, sizeof(sbyte), 1);
// Save the difficulty level
PHYSFS_write(fp, &Difficulty_level, sizeof(int), 1);
// Save cheats enabled
PHYSFS_write(fp, &Cheats_enabled.intval, sizeof(int), 1);
if ( !between_levels ) {
//Finish all morph objects
for (i=0; i<=Highest_object_index; i++ ) {
if ( (Objects[i].type != OBJ_NONE) && (Objects[i].render_type==RT_MORPH)) {
morph_data *md;
md = find_morph_data(&Objects[i]);
if (md) {
md->obj->control_type = md->morph_save_control_type;
md->obj->movement_type = md->morph_save_movement_type;
md->obj->render_type = RT_POLYOBJ;
md->obj->mtype.phys_info = md->morph_save_phys_info;
md->obj = NULL;
} else { //maybe loaded half-morphed from disk
Objects[i].flags |= OF_SHOULD_BE_DEAD;
Objects[i].render_type = RT_POLYOBJ;
Objects[i].control_type = CT_NONE;
Objects[i].movement_type = MT_NONE;
}
}
}
//Save object info
i = Highest_object_index+1;
PHYSFS_write(fp, &i, sizeof(int), 1);
PHYSFS_write(fp, Objects, sizeof(object), i);
//Save wall info
i = Num_walls;
PHYSFS_write(fp, &i, sizeof(int), 1);
PHYSFS_write(fp, Walls, sizeof(wall), i);
//Save exploding wall info
i = MAX_EXPLODING_WALLS;
PHYSFS_write(fp, &i, sizeof(int), 1);
PHYSFS_write(fp, expl_wall_list, sizeof(*expl_wall_list), i);
//Save door info
i = Num_open_doors;
PHYSFS_write(fp, &i, sizeof(int), 1);
PHYSFS_write(fp, ActiveDoors, sizeof(active_door), i);
//Save cloaking wall info
i = Num_cloaking_walls;
PHYSFS_write(fp, &i, sizeof(int), 1);
PHYSFS_write(fp, CloakingWalls, sizeof(cloaking_wall), i);
//Save trigger info
PHYSFS_write(fp, &Num_triggers, sizeof(int), 1);
PHYSFS_write(fp, Triggers, sizeof(trigger), Num_triggers);
//Save tmap info
for (i = 0; i <= Highest_segment_index; i++)
{
for (j = 0; j < 6; j++)
{
PHYSFS_write(fp, &Segments[i].sides[j].wall_num, sizeof(short), 1);
PHYSFS_write(fp, &Segments[i].sides[j].tmap_num, sizeof(short), 1);
PHYSFS_write(fp, &Segments[i].sides[j].tmap_num2, sizeof(short), 1);
}
}
// Save the fuelcen info
PHYSFS_write(fp, &Control_center_destroyed, sizeof(int), 1);
PHYSFS_write(fp, &Countdown_timer, sizeof(int), 1);
PHYSFS_write(fp, &Num_robot_centers, sizeof(int), 1);
PHYSFS_write(fp, RobotCenters, sizeof(matcen_info), Num_robot_centers);
PHYSFS_write(fp, &ControlCenterTriggers, sizeof(control_center_triggers), 1);
PHYSFS_write(fp, &Num_fuelcenters, sizeof(int), 1);
PHYSFS_write(fp, Station, sizeof(FuelCenter), Num_fuelcenters);
// Save the control cen info
PHYSFS_write(fp, &Control_center_been_hit, sizeof(int), 1);
PHYSFS_write(fp, &Control_center_player_been_seen, sizeof(int), 1);
PHYSFS_write(fp, &Control_center_next_fire_time, sizeof(int), 1);
PHYSFS_write(fp, &Control_center_present, sizeof(int), 1);
PHYSFS_write(fp, &Dead_controlcen_object_num, sizeof(int), 1);
// Save the AI state
ai_save_state( fp );
// Save the automap visited info
PHYSFS_write(fp, Automap_visited, sizeof(ubyte), MAX_SEGMENTS);
}
PHYSFS_write(fp, &state_game_id, sizeof(uint), 1);
PHYSFS_write(fp, &Laser_rapid_fire, sizeof(int), 1);
PHYSFS_write(fp, &Lunacy, sizeof(int), 1); // Yes, writing this twice. Removed the Ugly robot system, but didn't want to change savegame format.
PHYSFS_write(fp, &Lunacy, sizeof(int), 1);
// Save automap marker info
PHYSFS_write(fp, MarkerObject, sizeof(MarkerObject) ,1);
PHYSFS_write(fp, MarkerOwner, sizeof(MarkerOwner), 1);
PHYSFS_write(fp, MarkerMessage, sizeof(MarkerMessage), 1);
PHYSFS_write(fp, &Afterburner_charge, sizeof(fix), 1);
//save last was super information
PHYSFS_write(fp, &Primary_last_was_super, sizeof(Primary_last_was_super), 1);
PHYSFS_write(fp, &Secondary_last_was_super, sizeof(Secondary_last_was_super), 1);
// Save flash effect stuff
PHYSFS_write(fp, &Flash_effect, sizeof(int), 1);
PHYSFS_write(fp, &Time_flash_last_played, sizeof(int), 1);
PHYSFS_write(fp, &PaletteRedAdd, sizeof(int), 1);
PHYSFS_write(fp, &PaletteGreenAdd, sizeof(int), 1);
PHYSFS_write(fp, &PaletteBlueAdd, sizeof(int), 1);
PHYSFS_write(fp, Light_subtracted, sizeof(Light_subtracted[0]), MAX_SEGMENTS);
PHYSFS_write(fp, &First_secret_visit, sizeof(First_secret_visit), 1);
if (PHYSFS_write(fp, &Omega_charge, sizeof(Omega_charge), 1) < 1)
{
if ( !(Game_mode & GM_MULTI) ) {
nm_messagebox(NULL, 1, TXT_OK, "Error writing savegame.\nPossibly out of disk\nspace.");
PHYSFS_close(fp);
PHYSFS_delete(filename);
}
} else {
PHYSFS_close(fp);
#ifdef MACINTOSH // set the type and creator of the saved game file
{
FInfo finfo;
OSErr err;
Str255 pfilename;
strcpy(pfilename, filename);
c2pstr(pfilename);
err = HGetFInfo(0, 0, pfilename, &finfo);
finfo.fdType = 'SVGM';
finfo.fdCreator = 'DCT2';
err = HSetFInfo(0, 0, pfilename, &finfo);
}
#endif
}
start_time();
return 1;
}
// -----------------------------------------------------------------------------------
// blind_save means don't prompt user for any info.
int state_save_all(int between_levels, int secret_save, char *filename_override, int blind_save)
{
int rval, filenum = -1;
char filename[128], desc[DESC_LENGTH+1];
Assert(between_levels == 0); //between levels save ripped out
#ifdef NETWORK
if ( Game_mode & GM_MULTI ) {
multi_initiate_save_game();
return 0;
}
#endif
if ((Current_level_num < 0) && (secret_save == 0)) {
HUD_init_message( "Can't save in secret level!" );
return 0;
}
if (Final_boss_is_dead) //don't allow save while final boss is dying
return 0;
mprintf(( 0, "CL=%d, NL=%d\n", Current_level_num, Next_level_num ));
// If this is a secret save and the control center has been destroyed, don't allow
// return to the base level.
if (secret_save && (Control_center_destroyed)) {
mprintf((0, "Deleting secret.sgb so player can't return to base level.\n"));
PHYSFS_delete(PLAYER_DIR "secret.sgb");
return 0;
}
stop_time();
if (secret_save == 1) {
filename_override = filename;
sprintf(filename_override, PLAYER_DIR "secret.sgb");
} else if (secret_save == 2) {
filename_override = filename;
sprintf(filename_override, PLAYER_DIR "secret.sgc");
} else {
if (filename_override) {
strcpy( filename, filename_override);
sprintf(desc, "[autosave backup]");
}
else if (!(filenum = state_get_save_file(filename, desc, 0, blind_save)))
{
start_time();
return 0;
}
}
// MK, 1/1/96
// If not in multiplayer, do special secret level stuff.
// If secret.sgc exists, then copy it to Nsecret.sgc (where N = filenum).
// If it doesn't exist, then delete Nsecret.sgc
if (!secret_save && !(Game_mode & GM_MULTI)) {
int rval;
char temp_fname[32], fc;
if (filenum != -1) {
if (filenum >= 10)
fc = (filenum-10) + 'a';
else
fc = '0' + filenum;
sprintf(temp_fname, PLAYER_DIR "%csecret.sgc", fc);
mprintf((0, "Trying to copy secret.sgc to %s.\n", temp_fname));
if (PHYSFS_exists(temp_fname))
{
mprintf((0, "Deleting file %s\n", temp_fname));
if (!PHYSFS_delete(temp_fname))
Error("Cannot delete file <%s>: %s", temp_fname, PHYSFS_getLastError());
}
if (PHYSFS_exists(PLAYER_DIR "secret.sgc"))
{
mprintf((0, "Copying secret.sgc to %s.\n", temp_fname));
rval = copy_file(PLAYER_DIR "secret.sgc", temp_fname);
Assert(rval == 0); // Oops, error copying secret.sgc to temp_fname!
}
}
}
// Save file we're going to save over in last slot and call "[autosave backup]"
if (!filename_override) {
PHYSFS_file *tfp;
tfp = PHYSFSX_openWriteBuffered(filename);
if ( tfp ) {
char newname[128];
sprintf( newname, PLAYER_DIR "%s.sg%x", Players[Player_num].callsign, NUM_SAVES );
PHYSFS_seek(tfp, DESC_OFFSET);
PHYSFS_write(tfp, "[autosave backup]", sizeof(char) * DESC_LENGTH, 1);
PHYSFS_close(tfp);
PHYSFS_delete(newname);
PHYSFSX_rename(filename, newname);
}
}
rval = state_save_all_sub(filename, desc, between_levels);
if (rval && !secret_save)
HUD_init_message("Game saved.");
return rval;
}
int dump_walls_info()
{
int w;
PHYSFS_file *fp;
fp = PHYSFSX_openWriteBuffered("WALL.OUT");
PHYSFSX_printf(fp, "Num_walls %d\n", Num_walls);
for (w=0; w<Num_walls; w++) {
PHYSFSX_printf(fp, "WALL #%d\n", w);
PHYSFSX_printf(fp, " seg: %d\n", Walls[w].segnum);
PHYSFSX_printf(fp, " sidenum: %d\n", Walls[w].sidenum);
switch (Walls[w].type) {
case WALL_NORMAL:
PHYSFSX_printf(fp, " type: NORMAL\n");
break;
case WALL_BLASTABLE:
PHYSFSX_printf(fp, " type: BLASTABLE\n");
break;
case WALL_DOOR:
PHYSFSX_printf(fp, " type: DOOR\n");
break;
case WALL_ILLUSION:
PHYSFSX_printf(fp, " type: ILLUSION\n");
break;
case WALL_OPEN:
PHYSFSX_printf(fp, " type: OPEN\n");
break;
case WALL_CLOSED:
PHYSFSX_printf(fp, " type: CLOSED\n");
break;
default:
PHYSFSX_printf(fp, " type: ILLEGAL!!!!! <-----------------\n");
break;
}
PHYSFSX_printf(fp, " flags:\n");
if (Walls[w].flags & WALL_BLASTED)
PHYSFSX_printf(fp, " BLASTED\n");
if (Walls[w].flags & WALL_DOOR_OPENED)
PHYSFSX_printf(fp, " DOOR_OPENED <----------------- BAD!!!\n");
if (Walls[w].flags & WALL_DOOR_OPENING)
PHYSFSX_printf(fp, " DOOR_OPENING <---------------- BAD!!!\n");
if (Walls[w].flags & WALL_DOOR_LOCKED)
PHYSFSX_printf(fp, " DOOR_LOCKED\n");
if (Walls[w].flags & WALL_DOOR_AUTO)
PHYSFSX_printf(fp, " DOOR_AUTO\n");
if (Walls[w].flags & WALL_ILLUSION_OFF)
PHYSFSX_printf(fp, " ILLUSION_OFF <---------------- OUTDATED\n");
//if (Walls[w].flags & WALL_FUELCEN)
// PHYSFSX_printf(fp, " FUELCEN <--------------------- OUTDATED\n");
PHYSFSX_printf(fp, " trigger: %d\n", Walls[w].trigger);
PHYSFSX_printf(fp, " clip_num: %d\n", Walls[w].clip_num);
switch (Walls[w].keys) {
case KEY_NONE:
PHYSFSX_printf(fp, " key: NONE\n");
break;
case KEY_BLUE:
PHYSFSX_printf(fp, " key: BLUE\n");
break;
case KEY_RED:
PHYSFSX_printf(fp, " key: RED\n");
break;
case KEY_GOLD:
PHYSFSX_printf(fp, " key: NONE\n");
break;
default:
PHYSFSX_printf(fp, " key: ILLEGAL!!!!!! <-----------------\n");
break;
}
PHYSFSX_printf(fp, " linked_wall %d\n", Walls[w].linked_wall);
}
PHYSFS_close(fp);
return 1;
}
