main/playsave.c

   1 /* $Id: playsave.c,v 1.24 2005-07-30 01:50:17 chris Exp $ */
   2 /*
   3 THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
   4 SOFTWARE CORPORATION ("PARALLAX").  PARALLAX, IN DISTRIBUTING THE CODE TO
   5 END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
   6 ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
   7 IN USING, DISPLAYING,  AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
   8 SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
   9 FREE PURPOSES.  IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
  10 CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES.  THE END-USER UNDERSTANDS
  11 AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
  12 COPYRIGHT 1993-1999 PARALLAX SOFTWARE CORPORATION.  ALL RIGHTS RESERVED.
  13 */
  14
  15 /*
  16  *
  17  * Functions to load & save player's settings (*.plr file)
  18  *
  19  */
  20
  21 #ifdef HAVE_CONFIG_H
  22 #include <conf.h>
  23 #endif
  24
  25 #ifdef WINDOWS
  26 #include "desw.h"
  27 #include <mmsystem.h>
  28 #endif
  29
  30 #include <stdio.h>
  31 #include <string.h>
  32 #if !defined(_MSC_VER) && !defined(macintosh)
  33 #include <unistd.h>
  34 #endif
  35 #ifndef _WIN32_WCE
  36 #include <errno.h>
  37 #endif
  38
  39 #include <physfs.h>
  40
  41 #include "error.h"
  42
  43 #include "strutil.h"
  44 #include "game.h"
  45 #include "gameseq.h"
  46 #include "player.h"
  47 #include "playsave.h"
  48 #include "joy.h"
  49 #include "kconfig.h"
  50 #include "digi.h"
  51 #include "newmenu.h"
  52 #include "joydefs.h"
  53 #include "palette.h"
  54 #include "multi.h"
  55 #include "menu.h"
  56 #include "config.h"
  57 #include "text.h"
  58 #include "mono.h"
  59 #include "state.h"
  60 #include "gauges.h"
  61 #include "screens.h"
  62 #include "powerup.h"
  63 #include "makesig.h"
  64 #include "byteswap.h"
  65 #include "escort.h"
  66
  67 #include "physfsx.h"
  68
  69 #define SAVE_FILE_ID                    MAKE_SIG('D','P','L','R')
  70
  71 #ifdef MACINTOSH
  72         #include <Files.h>
  73         #include <Errors.h>                     // mac doesn't have "normal" error numbers -- must use mac equivs
  74         #ifndef ENOENT
  75                 #define ENOENT fnfErr
  76         #endif
  77         #include "isp.h"
  78 #elif defined(_WIN32_WCE)
  79 # define errno -1
  80 # define ENOENT -1
  81 # define strerror(x) "Unknown Error"
  82 #endif
  83
  84 int get_lifetime_checksum (int a,int b);
  85
  86 typedef struct hli {
  87         char    shortname[9];
  88         ubyte   level_num;
  89 } hli;
  90
  91 short n_highest_levels;
  92
  93 hli highest_levels[MAX_MISSIONS];
  94
  95 #define PLAYER_FILE_VERSION     25                      //increment this every time the player file changes
  96
  97 //version 5  ->  6: added new highest level information
  98 //version 6  ->  7: stripped out the old saved_game array.
  99 //version 7  ->  8: added reticle flag, & window size
 100 //version 8  ->  9: removed player_struct_version
 101 //version 9  -> 10: added default display mode
 102 //version 10 -> 11: added all toggles in toggle menu
 103 //version 11 -> 12: added weapon ordering
 104 //version 12 -> 13: added more keys
 105 //version 13 -> 14: took out marker key
 106 //version 14 -> 15: added guided in big window
 107 //version 15 -> 16: added small windows in cockpit
 108 //version 16 -> 17: ??
 109 //version 17 -> 18: save guidebot name
 110 //version 18 -> 19: added automap-highres flag
 111 //version 19 -> 20: added kconfig data for windows joysticks
 112 //version 20 -> 21: save seperate config types for DOS & Windows
 113 //version 21 -> 22: save lifetime netstats
 114 //version 22 -> 23: ??
 115 //version 23 -> 24: add name of joystick for windows version.
 116 //version 24 -> 25: add d2x keys array
 117
 118 #define COMPATIBLE_PLAYER_FILE_VERSION          17
 119
 120
 121 int Default_leveling_on=1;
 122 extern ubyte SecondaryOrder[],PrimaryOrder[];
 123 extern void InitWeaponOrdering();
 124
 125 #ifdef MACINTOSH
 126 extern ubyte default_firebird_settings[];
 127 extern ubyte default_mousestick_settings[];
 128 #endif
 129
 130 int new_player_config()
 131 {
 132         int nitems;
 133         int i,j,control_choice;
 134         newmenu_item m[8];
 135    int mct=CONTROL_MAX_TYPES;
 136
 137    #ifndef WINDOWS
 138          mct--;
 139         #endif
 140
 141    InitWeaponOrdering ();               //setup default weapon priorities
 142
 143 #if defined(MACINTOSH) && defined(USE_ISP)
 144         if (!ISpEnabled())
 145         {
 146 #endif
 147 RetrySelection:
 148                 #if !defined(MACINTOSH) && !defined(WINDOWS)
 149                 for (i=0; i<mct; i++ )  {
 150                         m[i].type = NM_TYPE_MENU; m[i].text = CONTROL_TEXT(i);
 151                 }
 152                 #elif defined(WINDOWS)
 153                         m[0].type = NM_TYPE_MENU; m[0].text = CONTROL_TEXT(0);
 154                         m[1].type = NM_TYPE_MENU; m[1].text = CONTROL_TEXT(5);
 155                         m[2].type = NM_TYPE_MENU; m[2].text = CONTROL_TEXT(7);
 156                         i = 3;
 157                 #else
 158                 for (i = 0; i < 6; i++) {
 159                         m[i].type = NM_TYPE_MENU; m[i].text = CONTROL_TEXT(i);
 160                 }
 161                 m[4].text = "Gravis Firebird/Mousetick II";
 162                 m[3].text = "Thrustmaster";
 163                 #endif
 164
 165                 nitems = i;
 166                 m[0].text = TXT_CONTROL_KEYBOARD;
 167
 168                 #ifdef WINDOWS
 169                         if (Config_control_type==CONTROL_NONE) control_choice = 0;
 170                         else if (Config_control_type == CONTROL_MOUSE) control_choice = 1;
 171                         else if (Config_control_type == CONTROL_WINJOYSTICK) control_choice = 2;
 172                         else control_choice = 0;
 173                 #else
 174                         control_choice = Config_control_type;                           // Assume keyboard
 175                 #endif
 176
 177                 #ifndef APPLE_DEMO
 178                         control_choice = newmenu_do1( NULL, TXT_CHOOSE_INPUT, i, m, NULL, control_choice );
 179                 #else
 180                         control_choice = 0;
 181                 #endif
 182
 183                 if ( control_choice < 0 )
 184                         return 0;
 185
 186 #if defined(MACINTOSH) && defined(USE_ISP)
 187         }
 188         else    // !!!!NOTE ... link to above if (!ISpEnabled()), this is a really crappy function
 189         {
 190                 control_choice = 0;
 191         }
 192 #endif
 193
 194         for (i=0;i<CONTROL_MAX_TYPES; i++ )
 195                 for (j=0;j<MAX_CONTROLS; j++ )
 196                         kconfig_settings[i][j] = default_kconfig_settings[i][j];
 197         //added on 2/4/99 by Victor Rachels for new keys
 198         for(i=0; i < MAX_D2X_CONTROLS; i++)
 199                 kconfig_d2x_settings[i] = default_kconfig_d2x_settings[i];
 200         //end this section addition - VR
 201         kc_set_controls();
 202
 203         Config_control_type = control_choice;
 204
 205 #ifdef WINDOWS
 206         if (control_choice == 1) Config_control_type = CONTROL_MOUSE;
 207         else if (control_choice == 2) Config_control_type = CONTROL_WINJOYSTICK;
 208
 209 //      if (Config_control_type == CONTROL_WINJOYSTICK)
 210 //              joydefs_calibrate();
 211 #else
 212         #ifndef MACINTOSH
 213         if ( Config_control_type==CONTROL_THRUSTMASTER_FCS)     {
 214                 i = nm_messagebox( TXT_IMPORTANT_NOTE, 2, "Choose another", TXT_OK, TXT_FCS );
 215                 if (i==0) goto RetrySelection;
 216         }
 217
 218         if ( (Config_control_type>0) &&         (Config_control_type<5))        {
 219                 joydefs_calibrate();
 220         }
 221         #else           // some macintosh only stuff here
 222         if ( Config_control_type==CONTROL_THRUSTMASTER_FCS)     {
 223                 extern char *tm_warning;
 224
 225                 i = nm_messagebox( TXT_IMPORTANT_NOTE, 2, "Choose another", TXT_OK, tm_warning );
 226                 if (i==0) goto RetrySelection;
 227         } else  if ( Config_control_type==CONTROL_FLIGHTSTICK_PRO )     {
 228                 extern char *ch_warning;
 229
 230                 i = nm_messagebox( TXT_IMPORTANT_NOTE, 2, "Choose another", TXT_OK, ch_warning );
 231                 if (i==0) goto RetrySelection;
 232         } else  if ( Config_control_type==CONTROL_GRAVIS_GAMEPAD )      {
 233                 extern char *ms_warning;
 234
 235                 i = nm_messagebox( TXT_IMPORTANT_NOTE, 2, "Choose another", TXT_OK, ms_warning );
 236                 if (i==0) goto RetrySelection;
 237                 // stupid me -- get real default setting for either mousestick or firebird
 238                 joydefs_set_type( Config_control_type );
 239                 if (joy_have_firebird())
 240                         for (i=0; i<NUM_OTHER_CONTROLS; i++ )
 241                                 kconfig_settings[Config_control_type][i] = default_firebird_settings[i];
 242                 else
 243                         for (i=0; i<NUM_OTHER_CONTROLS; i++ )
 244                                 kconfig_settings[Config_control_type][i] = default_mousestick_settings[i];
 245                 kc_set_controls();              // reset the joystick control
 246         }
 247         if ( (Config_control_type>0) && (Config_control_type<5)  ) {
 248                 joydefs_set_type( Config_control_type );
 249                 joydefs_calibrate();
 250         }
 251
 252         #endif
 253 #endif
 254
 255         Player_default_difficulty = 1;
 256         Auto_leveling_on = Default_leveling_on = 1;
 257         n_highest_levels = 1;
 258         highest_levels[0].shortname[0] = 0;                     //no name for mission 0
 259         highest_levels[0].level_num = 1;                                //was highest level in old struct
 260         Config_joystick_sensitivity = 8;
 261         Cockpit_3d_view[0]=CV_NONE;
 262         Cockpit_3d_view[1]=CV_NONE;
 263
 264         // Default taunt macros
 265         #ifdef NETWORK
 266         strcpy(Network_message_macro[0], "Why can't we all just get along?");
 267         strcpy(Network_message_macro[1], "Hey, I got a present for ya");
 268         strcpy(Network_message_macro[2], "I got a hankerin' for a spankerin'");
 269         strcpy(Network_message_macro[3], "This one's headed for Uranus");
 270         Netlife_kills=0; Netlife_killed=0;
 271         #endif
 272
 273         return 1;
 274 }
 275
 276 extern int Guided_in_big_window,Automap_always_hires;
 277
 278 //this length must match the value in escort.c
 279 #define GUIDEBOT_NAME_LEN 9
 280 extern char guidebot_name[];
 281 extern char real_guidebot_name[];
 282
 283 WIN(extern char win95_current_joyname[]);
 284
 285 ubyte control_type_dos,control_type_win;
 286
 287
 288 //read in the player's saved games.  returns errno (0 == no error)
 289 int read_player_file()
 290 {
 291         #ifdef MACINTOSH
 292         char filename[FILENAME_LEN+15];
 293         #else
 294         char filename[FILENAME_LEN];
 295         #endif
 296         PHYSFS_file *file;
 297         int id, i;
 298         short player_file_version;
 299         int rewrite_it=0;
 300         int swap = 0;
 301
 302         Assert(Player_num>=0 && Player_num<MAX_PLAYERS);
 303
 304 #ifndef MACINTOSH
 305         sprintf(filename,"%.8s.plr",Players[Player_num].callsign);
 306 #else
 307         sprintf(filename, "Players/%.8s.plr",Players[Player_num].callsign);
 308 #endif
 309
 310         if (!PHYSFS_exists(filename))
 311                 return ENOENT;
 312
 313         file = PHYSFSX_openReadBuffered(filename);
 314
 315 #if 0
 316 #ifndef MACINTOSH
 317         //check filename
 318         if (file && isatty(fileno(file))) {
 319                 //if the callsign is the name of a tty device, prepend a char
 320                 PHYSFS_close(file);
 321                 sprintf(filename,"$%.7s.plr",Players[Player_num].callsign);
 322                 file = PHYSFSX_openReadBuffered(filename);
 323         }
 324 #endif
 325 #endif
 326
 327         if (!file)
 328                 goto read_player_file_failed;
 329
 330         PHYSFS_readSLE32(file, &id);
 331
 332         // SWAPINT added here because old versions of d2x
 333         // used the wrong byte order.
 334         if (id!=SAVE_FILE_ID && id!=SWAPINT(SAVE_FILE_ID)) {
 335                 nm_messagebox(TXT_ERROR, 1, TXT_OK, "Invalid player file");
 336                 PHYSFS_close(file);
 337                 return -1;
 338         }
 339
 340         player_file_version = cfile_read_short(file);
 341
 342         if (player_file_version > 255) // bigendian file?
 343                 swap = 1;
 344
 345         if (swap)
 346                 player_file_version = SWAPSHORT(player_file_version);
 347
 348         if (player_file_version<COMPATIBLE_PLAYER_FILE_VERSION) {
 349                 nm_messagebox(TXT_ERROR, 1, TXT_OK, TXT_ERROR_PLR_VERSION);
 350                 PHYSFS_close(file);
 351                 return -1;
 352         }
 353
 354         Game_window_w = cfile_read_short(file);
 355         Game_window_h = cfile_read_short(file);
 356
 357         if (swap) {
 358                 Game_window_w = SWAPSHORT(Game_window_w);
 359                 Game_window_h = SWAPSHORT(Game_window_h);
 360         }
 361
 362         Player_default_difficulty = cfile_read_byte(file);
 363         Default_leveling_on       = cfile_read_byte(file);
 364         Reticle_on                = cfile_read_byte(file);
 365         Cockpit_mode              = cfile_read_byte(file);
 366         Default_display_mode      = cfile_read_byte(file);
 367         Missile_view_enabled      = cfile_read_byte(file);
 368         Headlight_active_default  = cfile_read_byte(file);
 369         Guided_in_big_window      = cfile_read_byte(file);
 370
 371         if (player_file_version >= 19)
 372                 Automap_always_hires = cfile_read_byte(file);
 373
 374         Auto_leveling_on = Default_leveling_on;
 375
 376         //read new highest level info
 377
 378         n_highest_levels = cfile_read_short(file);
 379         if (swap)
 380                 n_highest_levels = SWAPSHORT(n_highest_levels);
 381         Assert(n_highest_levels <= MAX_MISSIONS);
 382
 383         if (PHYSFS_read(file, highest_levels, sizeof(hli), n_highest_levels) != n_highest_levels)
 384                 goto read_player_file_failed;
 385
 386         //read taunt macros
 387         {
 388 #ifdef NETWORK
 389                 int i,len;
 390
 391                 len = MAX_MESSAGE_LEN;
 392
 393                 for (i = 0; i < 4; i++)
 394                         if (PHYSFS_read(file, Network_message_macro[i], len, 1) != 1)
 395                                 goto read_player_file_failed;
 396 #else
 397                 char dummy[4][MAX_MESSAGE_LEN];
 398
 399                 cfread(dummy, MAX_MESSAGE_LEN, 4, file);
 400 #endif
 401         }
 402
 403         //read kconfig data
 404         {
 405                 int n_control_types = (player_file_version<20)?7:CONTROL_MAX_TYPES;
 406
 407                 if (PHYSFS_read(file, kconfig_settings, MAX_CONTROLS*n_control_types, 1) != 1)
 408                         goto read_player_file_failed;
 409                 else if (PHYSFS_read(file, (ubyte *)&control_type_dos, sizeof(ubyte), 1) != 1)
 410                         goto read_player_file_failed;
 411                 else if (player_file_version >= 21 && PHYSFS_read(file, (ubyte *)&control_type_win, sizeof(ubyte), 1) != 1)
 412                         goto read_player_file_failed;
 413                 else if (PHYSFS_read(file, &Config_joystick_sensitivity, sizeof(ubyte), 1) !=1 )
 414                         goto read_player_file_failed;
 415
 416                 #ifdef WINDOWS
 417                 Config_control_type = control_type_win;
 418                 #else
 419                 Config_control_type = control_type_dos;
 420                 #endif
 421
 422                 #ifdef MACINTOSH
 423                 joydefs_set_type(Config_control_type);
 424                 #endif
 425
 426                 for (i=0;i<11;i++)
 427                 {
 428                         PrimaryOrder[i] = cfile_read_byte(file);
 429                         SecondaryOrder[i] = cfile_read_byte(file);
 430                 }
 431
 432                 if (player_file_version>=16)
 433                 {
 434                         PHYSFS_readSLE32(file, &Cockpit_3d_view[0]);
 435                         PHYSFS_readSLE32(file, &Cockpit_3d_view[1]);
 436                         if (swap)
 437                         {
 438                                 Cockpit_3d_view[0] = SWAPINT(Cockpit_3d_view[0]);
 439                                 Cockpit_3d_view[1] = SWAPINT(Cockpit_3d_view[1]);
 440                         }
 441                 }
 442
 443                 kc_set_controls();
 444
 445         }
 446
 447         if (player_file_version>=22)
 448         {
 449 #ifdef NETWORK
 450                 PHYSFS_readSLE32(file, &Netlife_kills);
 451                 PHYSFS_readSLE32(file, &Netlife_killed);
 452                 if (swap) {
 453                         Netlife_kills = SWAPINT(Netlife_kills);
 454                         Netlife_killed = SWAPINT(Netlife_killed);
 455                 }
 456 #else
 457                 {
 458                         int dummy;
 459                         PHYSFS_readSLE32(file, &dummy);
 460                         PHYSFS_readSLE32(file, &dummy);
 461                 }
 462 #endif
 463         }
 464 #ifdef NETWORK
 465         else
 466         {
 467                 Netlife_kills=0; Netlife_killed=0;
 468         }
 469 #endif
 470
 471         if (player_file_version>=23)
 472         {
 473                 PHYSFS_readSLE32(file, &i);
 474                 if (swap)
 475                         i = SWAPINT(i);
 476 #ifdef NETWORK
 477                 mprintf ((0,"Reading: lifetime checksum is %d\n",i));
 478                 if (i!=get_lifetime_checksum (Netlife_kills,Netlife_killed))
 479                 {
 480                         Netlife_kills=0; Netlife_killed=0;
 481                         nm_messagebox(NULL, 1, "Shame on me", "Trying to cheat eh?");
 482                         rewrite_it=1;
 483                 }
 484 #endif
 485         }
 486
 487         //read guidebot name
 488         if (player_file_version >= 18)
 489                 PHYSFSX_readString(file, guidebot_name);
 490         else
 491                 strcpy(guidebot_name,"GUIDE-BOT");
 492
 493         strcpy(real_guidebot_name,guidebot_name);
 494
 495         {
 496                 char buf[128];
 497
 498         #ifdef WINDOWS
 499                 joy95_get_name(JOYSTICKID1, buf, 127);
 500                 if (player_file_version >= 24)
 501                         PHYSFSX_readString(file, win95_current_joyname);
 502                 else
 503                         strcpy(win95_current_joyname, "Old Player File");
 504
 505                 mprintf((0, "Detected joystick: %s\n", buf));
 506                 mprintf((0, "Player's joystick: %s\n", win95_current_joyname));
 507
 508                 if (strcmp(win95_current_joyname, buf)) {
 509                         for (i = 0; i < MAX_CONTROLS; i++)
 510                                 kconfig_settings[CONTROL_WINJOYSTICK][i] =
 511                                         default_kconfig_settings[CONTROL_WINJOYSTICK][i];
 512                 }
 513         #else
 514                 if (player_file_version >= 24)
 515                         PHYSFSX_readString(file, buf);                  // Just read it in fpr DPS.
 516         #endif
 517         }
 518
 519         if (player_file_version >= 25)
 520                 PHYSFS_read(file, kconfig_d2x_settings, MAX_D2X_CONTROLS, 1);
 521         else
 522                 for(i=0; i < MAX_D2X_CONTROLS; i++)
 523                         kconfig_d2x_settings[i] = default_kconfig_d2x_settings[i];
 524
 525         if (!PHYSFS_close(file))
 526                 goto read_player_file_failed;
 527
 528         if (rewrite_it)
 529                 write_player_file();
 530
 531         return EZERO;
 532
 533  read_player_file_failed:
 534         nm_messagebox(TXT_ERROR, 1, TXT_OK, "%s\n\n%s", "Error reading PLR file", PHYSFS_getLastError());
 535         if (file)
 536                 PHYSFS_close(file);
 537
 538         return -1;
 539 }
 540
 541
 542 //finds entry for this level in table.  if not found, returns ptr to
 543 //empty entry.  If no empty entries, takes over last one
 544 int find_hli_entry()
 545 {
 546         int i;
 547
 548         for (i=0;i<n_highest_levels;i++)
 549                 if (!stricmp(highest_levels[i].shortname, Current_mission_filename))
 550                         break;
 551
 552         if (i==n_highest_levels) {              //not found.  create entry
 553
 554                 if (i==MAX_MISSIONS)
 555                         i--;            //take last entry
 556                 else
 557                         n_highest_levels++;
 558
 559                 strcpy(highest_levels[i].shortname, Current_mission_filename);
 560                 highest_levels[i].level_num                     = 0;
 561         }
 562
 563         return i;
 564 }
 565
 566 //set a new highest level for player for this mission
 567 void set_highest_level(int levelnum)
 568 {
 569         int ret,i;
 570
 571         if ((ret=read_player_file()) != EZERO)
 572                 if (ret != ENOENT)              //if file doesn't exist, that's ok
 573                         return;
 574
 575         i                       = find_hli_entry();
 576
 577         if (levelnum > highest_levels[i].level_num)
 578                 highest_levels[i].level_num                     = levelnum;
 579
 580         write_player_file();
 581 }
 582
 583 //gets the player's highest level from the file for this mission
 584 int get_highest_level(void)
 585 {
 586         int i;
 587         int highest_saturn_level                        = 0;
 588         read_player_file();
 589 #ifndef SATURN
 590         if (strlen(Current_mission_filename)==0 )       {
 591                 for (i=0;i<n_highest_levels;i++)
 592                         if (!stricmp(highest_levels[i].shortname, "DESTSAT"))   //      Destination Saturn.
 593                                 highest_saturn_level                    = highest_levels[i].level_num;
 594         }
 595 #endif
 596    i                    = highest_levels[find_hli_entry()].level_num;
 597         if ( highest_saturn_level > i )
 598         i                       = highest_saturn_level;
 599         return i;
 600 }
 601
 602 extern int Cockpit_mode_save;
 603
 604
 605 //write out player's saved games.  returns errno (0 == no error)
 606 int write_player_file()
 607 {
 608         #ifdef MACINTOSH
 609         char filename[FILENAME_LEN+15];
 610         #else
 611         char filename[FILENAME_LEN];            // because of ":Players:" path
 612         #endif
 613         PHYSFS_file *file;
 614         int i;
 615
 616 //      #ifdef APPLE_DEMO               // no saving of player files in Apple OEM version
 617 //      return 0;
 618 //      #endif
 619
 620         WriteConfigFile();
 621
 622 #ifndef MACINTOSH
 623         sprintf(filename,"%s.plr",Players[Player_num].callsign);
 624 #else
 625         sprintf(filename, ":Players:%.8s.plr",Players[Player_num].callsign);
 626 #endif
 627         file = PHYSFSX_openWriteBuffered(filename);
 628
 629 #if 0 //ndef MACINTOSH
 630         //check filename
 631         if (file && isatty(fileno(file))) {
 632
 633                 //if the callsign is the name of a tty device, prepend a char
 634
 635                 PHYSFS_close(file);
 636                 sprintf(filename,"$%.7s.plr",Players[Player_num].callsign);
 637                 file = PHYSFSX_openWriteBuffered(filename);
 638         }
 639 #endif
 640
 641         if (!file)
 642                 return -1;
 643
 644         //Write out player's info
 645         PHYSFS_writeULE32(file, SAVE_FILE_ID);
 646         PHYSFS_writeULE16(file, PLAYER_FILE_VERSION);
 647
 648         PHYSFS_writeULE16(file, Game_window_w);
 649         PHYSFS_writeULE16(file, Game_window_h);
 650
 651         PHYSFSX_writeU8(file, Player_default_difficulty);
 652         PHYSFSX_writeU8(file, Auto_leveling_on);
 653         PHYSFSX_writeU8(file, Reticle_on);
 654         PHYSFSX_writeU8(file, (Cockpit_mode_save!=-1)?Cockpit_mode_save:Cockpit_mode);  //if have saved mode, write it instead of letterbox/rear view
 655         PHYSFSX_writeU8(file, Default_display_mode);
 656         PHYSFSX_writeU8(file, Missile_view_enabled);
 657         PHYSFSX_writeU8(file, Headlight_active_default);
 658         PHYSFSX_writeU8(file, Guided_in_big_window);
 659         PHYSFSX_writeU8(file, Automap_always_hires);
 660
 661         //write higest level info
 662         PHYSFS_writeULE16(file, n_highest_levels);
 663         if ((PHYSFS_write(file, highest_levels, sizeof(hli), n_highest_levels) != n_highest_levels))
 664                 goto write_player_file_failed;
 665
 666 #ifdef NETWORK
 667         if ((PHYSFS_write(file, Network_message_macro, MAX_MESSAGE_LEN, 4) != 4))
 668                 goto write_player_file_failed;
 669 #else
 670         {
 671                 char dummy[4][MAX_MESSAGE_LEN]; // Pull the messages from a hat! ;-)
 672
 673                 if ((PHYSFS_write(file, dummy, MAX_MESSAGE_LEN, 4) != 4))
 674                         goto write_player_file_failed;
 675         }
 676 #endif
 677
 678         //write kconfig info
 679         {
 680
 681                 #ifdef WINDOWS
 682                 control_type_win = Config_control_type;
 683                 #else
 684                 control_type_dos = Config_control_type;
 685                 #endif
 686
 687                 if (PHYSFS_write(file, kconfig_settings, MAX_CONTROLS*CONTROL_MAX_TYPES, 1) != 1)
 688                         goto write_player_file_failed;
 689                 else if (PHYSFS_write(file, &control_type_dos, sizeof(ubyte), 1) != 1)
 690                         goto write_player_file_failed;
 691                 else if (PHYSFS_write(file, &control_type_win, sizeof(ubyte), 1) != 1)
 692                         goto write_player_file_failed;
 693                 else if (PHYSFS_write(file, &Config_joystick_sensitivity, sizeof(ubyte), 1) != 1)
 694                         goto write_player_file_failed;
 695
 696                 for (i = 0; i < 11; i++)
 697                 {
 698                         PHYSFS_write(file, &PrimaryOrder[i], sizeof(ubyte), 1);
 699                         PHYSFS_write(file, &SecondaryOrder[i], sizeof(ubyte), 1);
 700                 }
 701
 702                 PHYSFS_writeULE32(file, Cockpit_3d_view[0]);
 703                 PHYSFS_writeULE32(file, Cockpit_3d_view[1]);
 704
 705 #ifdef NETWORK
 706                 PHYSFS_writeULE32(file, Netlife_kills);
 707                 PHYSFS_writeULE32(file, Netlife_killed);
 708                 i=get_lifetime_checksum (Netlife_kills,Netlife_killed);
 709                 mprintf ((0,"Writing: Lifetime checksum is %d\n",i));
 710 #else
 711                 PHYSFS_writeULE32(file, 0);
 712                 PHYSFS_writeULE32(file, 0);
 713                 i = get_lifetime_checksum (0, 0);
 714 #endif
 715                 PHYSFS_writeULE32(file, i);
 716         }
 717
 718         //write guidebot name
 719         PHYSFSX_writeString(file, real_guidebot_name);
 720
 721         {
 722                 char buf[128];
 723                 #ifdef WINDOWS
 724                 joy95_get_name(JOYSTICKID1, buf, 127);
 725                 #else
 726                 strcpy(buf, "DOS joystick");
 727                 #endif
 728                 PHYSFSX_writeString(file, buf);         // Write out current joystick for player.
 729         }
 730
 731         PHYSFS_write(file, kconfig_d2x_settings, MAX_D2X_CONTROLS, 1);
 732
 733         if (!PHYSFS_close(file))
 734                 goto write_player_file_failed;
 735
 736         #ifdef MACINTOSH                // set filetype and creator for playerfile
 737         {
 738                 FInfo finfo;
 739                 Str255 pfilename;
 740                 OSErr err;
 741
 742                 strcpy(pfilename, filename);
 743                 c2pstr(pfilename);
 744                 err = HGetFInfo(0, 0, pfilename, &finfo);
 745                 finfo.fdType = 'PLYR';
 746                 finfo.fdCreator = 'DCT2';
 747                 err = HSetFInfo(0, 0, pfilename, &finfo);
 748         }
 749         #endif
 750
 751         return EZERO;
 752
 753  write_player_file_failed:
 754         nm_messagebox(TXT_ERROR, 1, TXT_OK, "%s\n\n%s", TXT_ERROR_WRITING_PLR, PHYSFS_getLastError());
 755         if (file)
 756         {
 757                 PHYSFS_close(file);
 758                 PHYSFS_delete(filename);        //delete bogus file
 759         }
 760
 761         return -1;
 762 }
 763
 764 //update the player's highest level.  returns errno (0 == no error)
 765 int update_player_file()
 766 {
 767         int ret;
 768
 769         if ((ret=read_player_file()) != EZERO)
 770                 if (ret != ENOENT)              //if file doesn't exist, that's ok
 771                         return ret;
 772
 773         return write_player_file();
 774 }
 775
 776 int get_lifetime_checksum (int a,int b)
 777  {
 778   int num;
 779
 780   // confusing enough to beat amateur disassemblers? Lets hope so
 781
 782   num=(a<<8 ^ b);
 783   num^=(a | b);
 784   num*=num>>2;
 785   return (num);
 786  }
 787
 788