TakeV/dxx-rebirth
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity
dxx-rebirth/main/playsave.c

1092 lines
28 KiB
C
Raw Blame History

/*
THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
SOFTWARE CORPORATION ("PARALLAX"). PARALLAX, IN DISTRIBUTING THE CODE TO
END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
IN USING, DISPLAYING, AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
FREE PURPOSES. IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES. THE END-USER UNDERSTANDS
AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
COPYRIGHT 1993-1998 PARALLAX SOFTWARE CORPORATION. ALL RIGHTS RESERVED.
*/
/*
*
* Functions to load & save player games
*
*/
#ifdef RCS
#pragma off (unreferenced)
static char rcsid[] = "$Id: playsave.c,v 1.1.1.1 2006/03/17 19:42:10 zicodxx Exp $";
#pragma on (unreferenced)
#endif
#include <stdio.h>
#include <string.h>
#include <errno.h>
#include <limits.h>
#if !(defined(__APPLE__) && defined(__MACH__))
#include <physfs.h>
#else
#include <physfs/physfs.h>
#endif
#include "error.h"
#include "gameseq.h"
#include "player.h"
#include "playsave.h"
#include "joy.h"
#include "kconfig.h"
#include "digi.h"
#include "newmenu.h"
#include "palette.h"
#include "multi.h"
#include "menu.h"
#include "config.h"
#include "text.h"
#include "mono.h"
#include "state.h"
#include "reorder.h"
#include "u_mem.h"
#include "network.h"
#include "strutil.h"
#include "strio.h"
#include "vers_id.h"
#include "byteswap.h"
#include "physfsx.h"
#define SAVE_FILE_ID 0x44504c52 /* 'DPLR' */
//this is for version 5 and below
typedef struct save_info_v5 {
int id;
short saved_game_version,player_struct_version;
int highest_level;
int default_difficulty_level;
int default_leveling_on;
} __pack__ save_info_v5;
//this is for version 6 and above
typedef struct save_info {
int id;
short saved_game_version,player_struct_version;
int n_highest_levels; //how many highest levels are saved
int default_difficulty_level;
int default_leveling_on;
} __pack__ save_info;
typedef struct hli {
char shortname[9];
ubyte level_num;
} __pack__ hli;
int n_highest_levels;
hli highest_levels[MAX_MISSIONS];
#define SAVED_GAME_VERSION 8 //increment this every time saved_game struct changes
//version 5 -> 6: added new highest level information
//version 6 -> 7: stripped out the old saved_game array.
//version 7 -> 8: readded the old saved_game array since this is needed
// for shareware saved games
//the shareware is level 4
#define COMPATIBLE_SAVED_GAME_VERSION 4
#define COMPATIBLE_PLAYER_STRUCT_VERSION 16
typedef struct saved_game {
char name[GAME_NAME_LEN+1]; //extra char for terminating zero
player player;
int difficulty_level; //which level game is played at
int primary_weapon; //which weapon selected
int secondary_weapon; //which weapon selected
int cockpit_mode; //which cockpit mode selected
int window_w,window_h; //size of player's window
int next_level_num; //which level we're going to
int auto_leveling_on; //does player have autoleveling on?
} __pack__ saved_game;
saved_game saved_games[N_SAVE_SLOTS];
int Default_leveling_on=1;
void init_game_list()
{
int i;
for (i=0;i<N_SAVE_SLOTS;i++)
saved_games[i].name[0] = 0;
}
int new_player_config()
{
int i,j,control_choice;
int mct=CONTROL_MAX_TYPES;
mct--;
control_choice = Config_control_type; // Assume keyboard
for (i=0;i<CONTROL_MAX_TYPES; i++ )
for (j=0;j<MAX_CONTROLS; j++ )
kconfig_settings[i][j] = default_kconfig_settings[i][j];
for(i=0; i < MAX_D1X_CONTROLS; i++)
kconfig_d1x_settings[i] = default_kconfig_d1x_settings[i];
kc_set_controls();
Config_control_type = control_choice;
Player_default_difficulty = 1;
Auto_leveling_on = Default_leveling_on = 1;
n_highest_levels = 1;
highest_levels[0].shortname[0] = 0; //no name for mission 0
highest_levels[0].level_num = 1; //was highest level in old struct
Config_joystick_sensitivity = 8;
Config_mouse_sensitivity = 8;
memcpy(primary_order, default_primary_order, sizeof(primary_order));
memcpy(secondary_order, default_secondary_order, sizeof(secondary_order));
// Default taunt macros
#ifdef NETWORK
strcpy(Network_message_macro[0], TXT_DEF_MACRO_1);
strcpy(Network_message_macro[1], TXT_DEF_MACRO_2);
strcpy(Network_message_macro[2], TXT_DEF_MACRO_3);
strcpy(Network_message_macro[3], TXT_DEF_MACRO_4);
#endif
return 1;
}
int read_player_d1x(char *filename)
{
PHYSFS_file *f;
int rc = 0;
char line[60],*word;
int Stop=0;
int i;
plyr_read_stats();
// set defaults for when nothing is specified
memcpy(primary_order, default_primary_order, sizeof(primary_order));
memcpy(secondary_order, default_secondary_order, sizeof(secondary_order));
for(i=0;i<MAX_D1X_CONTROLS;i++)
kconfig_d1x_settings[i] = default_kconfig_d1x_settings[i];
f = PHYSFSX_openReadBuffered(filename);
if(!f || PHYSFS_eof(f) )
return errno;
while( !Stop && !PHYSFS_eof(f) )
{
cfgets(line,50,f);
word=splitword(line,':');
strupr(word);
if (strstr(word,"ADVANCED ORDERING"))
{
d_free(word);
cfgets(line,50,f);
word=splitword(line,'=');
strupr(word);
while(!strstr(word,"END") && !PHYSFS_eof(f))
{
if(!strcmp(word,"PRIMARY"))
sscanf(line,"%d,%d,%d,%d,%d",&primary_order[0], &primary_order[1], &primary_order[2], &primary_order[3], &primary_order[4]);
else if(!strcmp(word,"SECONDARY"))
sscanf(line,"%d,%d,%d,%d,%d",&secondary_order[0], &secondary_order[1], &secondary_order[2], &secondary_order[3], &secondary_order[4]);
d_free(word);
cfgets(line,50,f);
word=splitword(line,'=');
strupr(word);
}
}
else if (strstr(word,"WEAPON KEYS"))
{
d_free(word);
cfgets(line,50,f);
word=splitword(line,'=');
strupr(word);
while(!strstr(word,"END") && !PHYSFS_eof(f))
{
int kc1,kc2;
int i=atoi(word);
if(i==0) i=10;
i=(i-1)*2;
sscanf(line,"0x%x,0x%x",&kc1,&kc2);
kconfig_d1x_settings[i] = kc1;
kconfig_d1x_settings[i+1] = kc2;
d_free(word);
cfgets(line,50,f);
word=splitword(line,'=');
strupr(word);
}
}
else if (strstr(word,"CYCLE KEYS"))
{
d_free(word);
cfgets(line,50,f);
word=splitword(line,'=');
strupr(word);
while(!strstr(word,"END") && !PHYSFS_eof(f))
{
int kc1, kc2;
if(!strcmp(word,"CYCLE PRIMARY"))
{
sscanf(line,"0x%x,0x%x",&kc1,&kc2);
kconfig_d1x_settings[20]=kc1;
kconfig_d1x_settings[21]=kc2;
}
else if(!strcmp(word,"CYCLE SECONDARY"))
{
sscanf(line,"0x%x,0x%x",&kc1,&kc2);
kconfig_d1x_settings[22]=kc1;
kconfig_d1x_settings[23]=kc2;
}
d_free(word);
cfgets(line,50,f);
word=splitword(line,'=');
strupr(word);
}
}
else if (strstr(word,"AUTOSELECT KEYS"))
{
d_free(word);
cfgets(line,50,f);
word=splitword(line,'=');
strupr(word);
while(!strstr(word,"END") && !PHYSFS_eof(f))
{
int kc1, kc2;
if(!strcmp(word,"PRIMARY AUTOSELECT TOGGLE"))
{
sscanf(line,"0x%x,0x%x",&kc1,&kc2);
kconfig_d1x_settings[24]=kc1;
kconfig_d1x_settings[25]=kc2;
}
else if(!strcmp(word,"SECONDARY AUTOSELECT TOGGLE"))
{
sscanf(line,"0x%x,0x%x",&kc1,&kc2);
kconfig_d1x_settings[26]=kc1;
kconfig_d1x_settings[27]=kc2;
}
d_free(word);
cfgets(line,50,f);
word=splitword(line,'=');
strupr(word);
}
}
else if (strstr(word,"JOYSTICK"))
{
d_free(word);
cfgets(line,50,f);
word=splitword(line,'=');
strupr(word);
while(!strstr(word,"END") && !PHYSFS_eof(f))
{
if(!strcmp(word,"DEADZONE"))
sscanf(line,"%i",&joy_deadzone);
d_free(word);
cfgets(line,50,f);
word=splitword(line,'=');
strupr(word);
}
}
else if (strstr(word,"MOUSE"))
{
d_free(word);
cfgets(line,50,f);
word=splitword(line,'=');
strupr(word);
while(!strstr(word,"END") && !PHYSFS_eof(f))
{
if(!strcmp(word,"SENSITIVITY"))
{
int tmp;
sscanf(line,"%i",&tmp);
Config_mouse_sensitivity = (ubyte) tmp;
}
d_free(word);
cfgets(line,50,f);
word=splitword(line,'=');
strupr(word);
}
}
else if (strstr(word,"COCKPIT"))
{
d_free(word);
cfgets(line,50,f);
word=splitword(line,'=');
strupr(word);
while(!strstr(word,"END") && !PHYSFS_eof(f))
{
if(!strcmp(word,"MODE"))
{
int tmp;
sscanf(line,"%i",&tmp);
Cockpit_mode = (ubyte) tmp;
}
d_free(word);
cfgets(line,50,f);
word=splitword(line,'=');
strupr(word);
}
}
else if (strstr(word,"END") || PHYSFS_eof(f))
{
Stop=1;
}
else
{
if(word[0]=='['&&!strstr(word,"D1X OPTIONS"))
{
while(!strstr(line,"END") && !PHYSFS_eof(f))
{
cfgets(line,50,f);
strupr(line);
}
}
}
if(word)
d_free(word);
}
PHYSFS_close(f);
return rc;
}
char effcode1[]="d1xrocks_SKCORX!D";
char effcode2[]="AObe)7Rn1 -+/zZ'0";
char effcode3[]="aoeuidhtnAOEUIDH6";
char effcode4[]="'/.;]<{=,+?|}->[3";
unsigned char * decode_stat(unsigned char *p,int *v,char *effcode)
{
unsigned char c;int neg,i,I;
if (p[0]==0)return NULL;
else if (p[0]>='a'){
neg=1;I=p[0]-'a';
}else{
neg=0;I=p[0]-'A';
}
i=0;*v=0;
p++;
while (p[i*2] && p[i*2+1] && p[i*2]!=' '){
c=(p[i*2]-33)+((p[i*2+1]-33)<<4);
c^=effcode[i+neg];
*v+=c << (i*8);
i++;
}
if (neg)
*v *= -1;
if (!p[i*2])return NULL;
return p+(i*2);
}
void plyr_read_stats_v(int *k, int *d){
char filename[14];
int k1=-1,k2=0,d1=-1,d2=0;
PHYSFS_file *f;
*k=0;*d=0;//in case the file doesn't exist.
sprintf(filename,GameArg.SysUsePlayersDir?"Players/%s.eff":"%s.eff",Players[Player_num].callsign);
f = PHYSFSX_openReadBuffered(filename);
if(f)
{
char line[256],*word;
if(!PHYSFS_eof(f))
{
cfgets(line,50,f);
word=splitword(line,':');
if(!strcmp(word,"kills"))
*k=atoi(line);
d_free(word);
}
if(!PHYSFS_eof(f))
{
cfgets(line,50,f);
word=splitword(line,':');
if(!strcmp(word,"deaths"))
*d=atoi(line);
d_free(word);
}
if(!PHYSFS_eof(f))
{
cfgets(line,50,f);
word=splitword(line,':');
if(!strcmp(word,"key") && strlen(line)>10){
unsigned char *p;
if (line[0]=='0' && line[1]=='1'){
if ((p=decode_stat((unsigned char*)line+3,&k1,effcode1))&&
(p=decode_stat(p+1,&k2,effcode2))&&
(p=decode_stat(p+1,&d1,effcode3))){
decode_stat(p+1,&d2,effcode4);
}
}
}
d_free(word);
}
if (k1!=k2 || k1!=*k || d1!=d2 || d1!=*d)
{
*k=0;*d=0;
}
}
if(f)
PHYSFS_close(f);
}
int multi_kills_stat=0;
int multi_deaths_stat=0;
void plyr_read_stats()
{
plyr_read_stats_v(&multi_kills_stat,&multi_deaths_stat);
}
void plyr_save_stats()
{
int kills,deaths,neg;
char filename[14];
unsigned char buf[16],buf2[16],a;
int i;
PHYSFS_file *f;
kills=0;
deaths=0;
kills=multi_kills_stat;
deaths=multi_deaths_stat;
sprintf(filename,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);
}
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 order]\n");
PHYSFSX_printf(fout,"primary=1,2,3,4,5\n");
PHYSFSX_printf(fout,"secondary=%d,%d,%d,%d,%d\n",secondary_order[0], secondary_order[1], secondary_order[2],secondary_order[3], secondary_order[4]);
PHYSFSX_printf(fout,"[end]\n");
PHYSFSX_printf(fout,"[advanced ordering]\n");
PHYSFSX_printf(fout,"primary=%d,%d,%d,%d,%d\n",primary_order[0], primary_order[1], primary_order[2],primary_order[3], primary_order[4]);
PHYSFSX_printf(fout,"secondary=%d,%d,%d,%d,%d\n",secondary_order[0], secondary_order[1], secondary_order[2],secondary_order[3], secondary_order[4]);
PHYSFSX_printf(fout,"[end]\n");
PHYSFSX_printf(fout,"[weapon keys]\n");
PHYSFSX_printf(fout,"1=0x%x,0x%x\n",kconfig_d1x_settings[0],kconfig_d1x_settings[1]);
PHYSFSX_printf(fout,"2=0x%x,0x%x\n",kconfig_d1x_settings[2],kconfig_d1x_settings[3]);
PHYSFSX_printf(fout,"3=0x%x,0x%x\n",kconfig_d1x_settings[4],kconfig_d1x_settings[5]);
PHYSFSX_printf(fout,"4=0x%x,0x%x\n",kconfig_d1x_settings[6],kconfig_d1x_settings[7]);
PHYSFSX_printf(fout,"5=0x%x,0x%x\n",kconfig_d1x_settings[8],kconfig_d1x_settings[9]);
PHYSFSX_printf(fout,"6=0x%x,0x%x\n",kconfig_d1x_settings[10],kconfig_d1x_settings[11]);
PHYSFSX_printf(fout,"7=0x%x,0x%x\n",kconfig_d1x_settings[12],kconfig_d1x_settings[13]);
PHYSFSX_printf(fout,"8=0x%x,0x%x\n",kconfig_d1x_settings[14],kconfig_d1x_settings[15]);
PHYSFSX_printf(fout,"9=0x%x,0x%x\n",kconfig_d1x_settings[16],kconfig_d1x_settings[17]);
PHYSFSX_printf(fout,"0=0x%x,0x%x\n",kconfig_d1x_settings[18],kconfig_d1x_settings[19]);
PHYSFSX_printf(fout,"[end]\n");
PHYSFSX_printf(fout,"[cycle keys]\n");
PHYSFSX_printf(fout,"cycle primary=0x%x,0x%x\n",kconfig_d1x_settings[20],kconfig_d1x_settings[21]);
PHYSFSX_printf(fout,"cycle secondary=0x%x,0x%x\n",kconfig_d1x_settings[22],kconfig_d1x_settings[23]);
PHYSFSX_printf(fout,"[end]\n");
PHYSFSX_printf(fout,"[autoselect keys]\n");
PHYSFSX_printf(fout,"primary autoselect toggle=0x%x,0x%x\n",kconfig_d1x_settings[24],kconfig_d1x_settings[25]);
PHYSFSX_printf(fout,"secondary autoselect toggle=0x%x,0x%x\n",kconfig_d1x_settings[26],kconfig_d1x_settings[27]);
PHYSFSX_printf(fout,"[end]\n");
PHYSFSX_printf(fout,"[joystick]\n");
PHYSFSX_printf(fout,"deadzone=%i\n",joy_deadzone);
PHYSFSX_printf(fout,"[end]\n");
PHYSFSX_printf(fout,"[mouse]\n");
PHYSFSX_printf(fout,"sensitivity=%d\n",Config_mouse_sensitivity);
PHYSFSX_printf(fout,"[end]\n");
PHYSFSX_printf(fout,"[cockpit]\n");
PHYSFSX_printf(fout,"mode=%i\n",(Cockpit_mode==1?0:Cockpit_mode));
PHYSFSX_printf(fout,"[end]\n");
PHYSFSX_printf(fout,"[plx version]\n");
PHYSFSX_printf(fout,"plx version=%s\n",D1X_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;
}
//read in the player's saved games. returns errno (0 == no error)
int read_player_file()
{
char filename[32];
PHYSFS_file *file;
save_info info;
int errno_ret = EZERO;
int player_file_size;
int shareware_file = -1;
Assert(Player_num>=0 && Player_num<MAX_PLAYERS);
// adb: I hope that this prevents the missing weapon ordering bug
memcpy(primary_order, default_primary_order, sizeof(primary_order));
memcpy(secondary_order, default_secondary_order, sizeof(secondary_order));
sprintf(filename, GameArg.SysUsePlayersDir? "Players/%.8s.plr" : "%.8s.plr", Players[Player_num].callsign);
if (!PHYSFS_exists(filename))
return ENOENT;
file = PHYSFSX_openReadBuffered(filename);
if (!file) {
return errno;
}
// Unfortunatly d1x has been writing both shareware and registered
// player files with a saved_game_version of 7 and 8, whereas the
// original decent used 4 for shareware games and 7 for registered
// games. Because of this the player files didn't get properly read
// when reading d1x shareware player files in d1x registered or
// vica versa. The problem is that the sizeof of the taunt macros
// differ between the share and registered versions, causing the
// reading of the player file to go wrong. Thus we now determine the
// sizeof the player file to determine what kinda player file we are
// dealing with so that we can do the right thing
PHYSFS_seek(file, 0);
player_file_size = PHYSFS_fileLength(file);
if (PHYSFS_read(file,&info,sizeof(info),1) != 1) {
errno_ret = errno;
PHYSFS_close(file);
return errno_ret;
}
info.id = INTEL_INT(info.id);
info.saved_game_version = INTEL_SHORT(info.saved_game_version);
info.player_struct_version = INTEL_SHORT(info.player_struct_version);
info.n_highest_levels = INTEL_INT(info.n_highest_levels);
info.default_difficulty_level = INTEL_INT(info.default_difficulty_level);
info.default_leveling_on = INTEL_INT(info.default_leveling_on);
if (info.id!=SAVE_FILE_ID) {
nm_messagebox(TXT_ERROR, 1, TXT_OK, "Invalid player file");
PHYSFS_close(file);
return -1;
}
if (info.saved_game_version<COMPATIBLE_SAVED_GAME_VERSION || info.player_struct_version<COMPATIBLE_PLAYER_STRUCT_VERSION) {
nm_messagebox(TXT_ERROR, 1, TXT_OK, TXT_ERROR_PLR_VERSION);
PHYSFS_close(file);
return -1;
}
/* determine if we're dealing with a shareware or registered playerfile */
switch (info.saved_game_version)
{
case 4:
shareware_file = 1;
break;
case 5:
case 6:
shareware_file = 0;
break;
case 7:
/* version 7 doesn't have the saved games array */
if ((player_file_size - (sizeof(hli)*info.n_highest_levels)) == (2212 - sizeof(saved_games)))
shareware_file = 1;
if ((player_file_size - (sizeof(hli)*info.n_highest_levels)) == (2252 - sizeof(saved_games)))
shareware_file = 0;
break;
case 8:
if ((player_file_size - (sizeof(hli)*info.n_highest_levels)) == 2212)
shareware_file = 1;
if ((player_file_size - (sizeof(hli)*info.n_highest_levels)) == 2252)
shareware_file = 0;
/* d1x-rebirth v0.31 to v0.42 broke things by adding stuff to the
player struct without thinking (sigh) */
if ((player_file_size - (sizeof(hli)*info.n_highest_levels)) == (2212 + 2*sizeof(int)))
{
shareware_file = 1;
/* skip the cruft added to the player_info struct */
PHYSFS_seek(file, PHYSFS_tell(file)+2*sizeof(int));
}
if ((player_file_size - (sizeof(hli)*info.n_highest_levels)) == (2252 + 2*sizeof(int)))
{
shareware_file = 0;
/* skip the cruft added to the player_info struct */
PHYSFS_seek(file, PHYSFS_tell(file)+2*sizeof(int));
}
}
if (shareware_file == -1) {
nm_messagebox(TXT_ERROR, 1, TXT_OK, "Error invalid or unknown\nplayerfile-size");
PHYSFS_close(file);
return -1;
}
if (info.saved_game_version <= 5) {
//deal with old-style highest level info
n_highest_levels = 1;
highest_levels[0].shortname[0] = 0; //no name for mission 0
highest_levels[0].level_num = info.n_highest_levels; //was highest level in old struct
//This hack allows the player to start on level 8 if he's made it to
//level 7 on the shareware. We do this because the shareware didn't
//save the information that the player finished level 7, so the most
//we know is that he made it to level 7.
if (info.n_highest_levels==7)
highest_levels[0].level_num = 8;
}
else { //read new highest level info
n_highest_levels = info.n_highest_levels;
if (PHYSFS_read(file,highest_levels,sizeof(hli),n_highest_levels) != n_highest_levels) {
errno_ret = errno;
PHYSFS_close(file);
return errno_ret;
}
}
Player_default_difficulty = info.default_difficulty_level;
Default_leveling_on = info.default_leveling_on;
if ( info.saved_game_version != 7 ) { // Read old & SW saved games.
if (PHYSFS_read(file,saved_games,sizeof(saved_games),1) != 1) {
errno_ret = errno;
PHYSFS_close(file);
return errno_ret;
}
}
//read taunt macros
{
int i;
#if defined SHAREWARE && defined NETWORK
for (i = 0; i < 4; i++)
{
if (PHYSFS_read(Network_message_macro[i], MAX_MESSAGE_LEN, 1) != 1)
{errno_ret = errno; break;}
/* if this is not a shareware file, make sure what we've
read is 0 terminated and skip the 10 additional bytes
of the registered version */
if (!shareware_file)
{
Network_message_macro[i][MAX_MESSAGE_LEN-1] = 0;
PHYSFS_seek(file, PHYSFS_tell(file)+10);
}
}
#else
int len = shareware_file? 25:35;
#ifdef NETWORK
for (i = 0; i < 4; i++)
if (PHYSFS_read(file, Network_message_macro[i], len, 1) != 1)
{errno_ret = errno; break;}
#else
i = 0;
PHYSFS_seek( file, PHYSFS_tell(file)+4*len );
#endif
#endif
}
//read kconfig data
{
// if (fread( kconfig_settings, MAX_CONTROLS*CONTROL_MAX_TYPES, 1, file )!=1)
// errno_ret=errno;
int i,j;
for(i=0;i<CONTROL_MAX_TYPES;i++)
for(j=0;j<MAX_NOND1X_CONTROLS;j++)
if(PHYSFS_read(file, &kconfig_settings[i][j], sizeof(ubyte),1)!=1)
errno_ret=errno;
if(errno_ret == EZERO)
{
if (PHYSFS_read(file, &Config_control_type, sizeof(ubyte), 1 )!=1)
errno_ret=errno;
else if (PHYSFS_read(file, &Config_joystick_sensitivity, sizeof(ubyte), 1 )!=1)
errno_ret=errno;
}
}
if (!PHYSFS_close(file) && errno_ret==EZERO)
errno_ret = errno;
if ( info.saved_game_version != 7 ) {
int i, found=0;
Assert( N_SAVE_SLOTS == 10 );
for (i=0; i<N_SAVE_SLOTS; i++ ) {
if ( saved_games[i].name[0] ) {
state_save_old_game(i, saved_games[i].name, &saved_games[i].player,
saved_games[i].difficulty_level, saved_games[i].primary_weapon,
saved_games[i].secondary_weapon, saved_games[i].next_level_num );
// make sure we do not do this again, which would possibly overwrite
// a new newstyle savegame
saved_games[i].name[0] = 0;
found++;
}
}
if (found)
write_player_file();
}
filename[strlen(filename) - 4] = 0;
strcat(filename, ".plx");
read_player_d1x(filename);
{
int i;
highest_primary=0;
highest_secondary=0;
for(i=0; i<MAX_PRIMARY_WEAPONS+NEWPRIMS; i++)
if(primary_order[i]>0)
highest_primary++;
for(i=0; i<MAX_SECONDARY_WEAPONS+NEWSECS; i++)
if(secondary_order[i]>0)
highest_secondary++;
}
if (errno_ret==EZERO) {
kc_set_controls();
}
return errno_ret;
}
//finds entry for this level in table. if not found, returns ptr to
//empty entry. If no empty entries, takes over last one
int find_hli_entry()
{
int i;
#ifdef SHAREWARE
return 0;
#else
for (i=0;i<n_highest_levels;i++)
if (!stricmp(highest_levels[i].shortname, Current_mission_filename))
break;
if (i==n_highest_levels) { //not found. create entry
if (i==MAX_MISSIONS)
i--; //take last entry
else
n_highest_levels++;
strcpy(highest_levels[i].shortname, Current_mission_filename);
highest_levels[i].level_num = 0;
}
return i;
#endif
}
//set a new highest level for player for this mission
void set_highest_level(int levelnum)
{
int ret,i;
if ((ret=read_player_file()) != EZERO)
if (ret != ENOENT) //if file doesn't exist, that's ok
return;
i = find_hli_entry();
if (levelnum > highest_levels[i].level_num)
highest_levels[i].level_num = levelnum;
write_player_file();
}
//gets the player's highest level from the file for this mission
int get_highest_level(void)
{
int i;
int highest_saturn_level = 0;
read_player_file();
#ifndef SHAREWARE
#ifndef SATURN
if (strlen(Current_mission_filename)==0 ) {
for (i=0;i<n_highest_levels;i++)
if (!stricmp(highest_levels[i].shortname, "DESTSAT")) // Destination Saturn.
highest_saturn_level = highest_levels[i].level_num;
}
#endif
#endif
i = highest_levels[find_hli_entry()].level_num;
if ( highest_saturn_level > i )
i = highest_saturn_level;
return i;
}
//write out player's saved games. returns errno (0 == no error)
int write_player_file()
{
char filename[32];
PHYSFS_file *file;
save_info info;
int errno_ret;
errno_ret = WriteConfigFile();
info.id = INTEL_INT(SAVE_FILE_ID);
info.saved_game_version = INTEL_SHORT(SAVED_GAME_VERSION);
info.player_struct_version = INTEL_SHORT(PLAYER_STRUCT_VERSION);
info.default_difficulty_level = INTEL_INT(Player_default_difficulty);
info.default_leveling_on = INTEL_INT(Auto_leveling_on);
info.n_highest_levels = INTEL_INT(n_highest_levels);
sprintf(filename, GameArg.SysUsePlayersDir? "Players/%.8s.plx" : "%.8s.plx", Players[Player_num].callsign);
write_player_d1x(filename);
sprintf(filename, GameArg.SysUsePlayersDir? "Players/%.8s.plr" : "%.8s.plr", Players[Player_num].callsign);
file = PHYSFSX_openWriteBuffered(filename);
if (!file)
return errno;
errno_ret = EZERO;
if (PHYSFS_write( file, &info,sizeof(info),1) != 1) {
errno_ret = errno;
PHYSFS_close(file);
return errno_ret;
}
//write higest level info
if ((PHYSFS_write( file, highest_levels, sizeof(hli), n_highest_levels) != n_highest_levels)) {
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, Network_message_macro, 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 );
#endif
//write kconfig info
{
// if (PHYSFS_write( file, kconfig_settings, MAX_CONTROLS*CONTROL_MAX_TYPES, 1, file )!=1)
// errno_ret=errno;
int i,j;
for(i=0;i<CONTROL_MAX_TYPES;i++) {
for(j=0;j<MAX_NOND1X_CONTROLS;j++) {
if(PHYSFS_write( file, &kconfig_settings[i][j], sizeof(kconfig_settings[i][j]), 1)!=1)
errno_ret=errno;
}
}
if(errno_ret == EZERO)
{
if (PHYSFS_write( file, &Config_control_type, sizeof(ubyte), 1 )!=1)
errno_ret=errno;
else if (PHYSFS_write( file, &Config_joystick_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;
}
//returns errno (0 == no error)
int save_player_game(int slot_num,char *text)
{
int ret;
if ((ret=read_player_file()) != EZERO)
if (ret != ENOENT) //if file doesn't exist, that's ok
return ret;
Assert(slot_num < N_SAVE_SLOTS);
strcpy(saved_games[slot_num].name,text);
saved_games[slot_num].player = Players[Player_num];
saved_games[slot_num].difficulty_level = Difficulty_level;
saved_games[slot_num].auto_leveling_on = Auto_leveling_on;
saved_games[slot_num].primary_weapon = Primary_weapon;
saved_games[slot_num].secondary_weapon = Secondary_weapon;
// now saved in PLX file
saved_games[slot_num].cockpit_mode = 0;
// here Game_window_w(h should follow, but we don't use it anymore
saved_games[slot_num].window_w = 0;
saved_games[slot_num].window_h = 0;
saved_games[slot_num].next_level_num = Next_level_num;
return write_player_file();
}
//returns errno (0 == no error)
int load_player_game(int slot_num)
{
char save_callsign[CALLSIGN_LEN+1];
int ret;
Assert(slot_num < N_SAVE_SLOTS);
if ((ret=read_player_file()) != EZERO)
return ret;
Assert(saved_games[slot_num].name[0] != 0);
strcpy(save_callsign,Players[Player_num].callsign);
Players[Player_num] = saved_games[slot_num].player;
strcpy(Players[Player_num].callsign,save_callsign);
Difficulty_level = saved_games[slot_num].difficulty_level;
Auto_leveling_on = saved_games[slot_num].auto_leveling_on;
Primary_weapon = saved_games[slot_num].primary_weapon;
Secondary_weapon = saved_games[slot_num].secondary_weapon;
Players[Player_num].level = saved_games[slot_num].next_level_num;
return EZERO;
}
//fills in a list of pointers to strings describing saved games
//returns the number of non-empty slots
//returns -1 if this is a new player
int get_game_list(char *game_text[N_SAVE_SLOTS])
{
int i,count,ret;
ret = read_player_file();
for (i=count=0;i<N_SAVE_SLOTS;i++) {
if (game_text)
game_text[i] = saved_games[i].name;
if (saved_games[i].name[0])
count++;
}
return (ret==EZERO)?count:-1; //-1 means new file was created
}
//update the player's highest level. returns errno (0 == no error)
int update_player_file()
{
int ret;
if ((ret=read_player_file()) != EZERO)
if (ret != ENOENT) //if file doesn't exist, that's ok
return ret;
return write_player_file();
}
Reference in a new issue View git blame Copy permalink