main/playsave.c

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