main/playsave.c

   1 /* $Id: playsave.c,v 1.20 2004-10-23 19:39:35 schaffner 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 "error.h"
  40
  41 #include "pa_enabl.h"
  42 #include "strutil.h"
  43 #include "game.h"
  44 #include "gameseq.h"
  45 #include "player.h"
  46 #include "playsave.h"
  47 #include "joy.h"
  48 #include "kconfig.h"
  49 #include "digi.h"
  50 #include "newmenu.h"
  51 #include "joydefs.h"
  52 #include "palette.h"
  53 #include "multi.h"
  54 #include "menu.h"
  55 #include "config.h"
  56 #include "text.h"
  57 #include "mono.h"
  58 #include "state.h"
  59 #include "gauges.h"
  60 #include "screens.h"
  61 #include "powerup.h"
  62 #include "makesig.h"
  63 #include "byteswap.h"
  64 #include "escort.h"
  65
  66 #define SAVE_FILE_ID                    MAKE_SIG('D','P','L','R')
  67
  68 #ifdef MACINTOSH
  69         #include <Files.h>
  70         #include <Errors.h>                     // mac doesn't have "normal" error numbers -- must use mac equivs
  71         #ifndef ENOENT
  72                 #define ENOENT fnfErr
  73         #endif
  74         #ifdef POLY_ACC
  75                 #include "poly_acc.h"
  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         #ifdef MACINTOSH
 274                 #ifdef POLY_ACC
 275                         if (PAEnabled)
 276                         {
 277                                 Scanline_double = 0;            // no pixel doubling for poly_acc
 278                         }
 279                         else
 280                         {
 281                                 Scanline_double = 1;            // should be default for new player
 282                         }
 283                 #else
 284                         Scanline_double = 1;                    // should be default for new player
 285                 #endif
 286         #endif
 287
 288         return 1;
 289 }
 290
 291 extern int Guided_in_big_window,Automap_always_hires;
 292
 293 //this length must match the value in escort.c
 294 #define GUIDEBOT_NAME_LEN 9
 295 extern char guidebot_name[];
 296 extern char real_guidebot_name[];
 297
 298 WIN(extern char win95_current_joyname[]);
 299
 300 ubyte control_type_dos,control_type_win;
 301
 302 //read in the player's saved games.  returns errno (0 == no error)
 303 int read_player_file()
 304 {
 305         #ifdef MACINTOSH
 306         char filename[FILENAME_LEN+15];
 307         #else
 308         char filename[FILENAME_LEN];
 309         #endif
 310         CFILE *file;
 311         int errno_ret = EZERO;
 312         int id, i;
 313         short player_file_version;
 314         int rewrite_it=0;
 315         int swap = 0;
 316
 317         Assert(Player_num>=0 && Player_num<MAX_PLAYERS);
 318
 319 #ifndef MACINTOSH
 320         sprintf(filename,"%.8s.plr",Players[Player_num].callsign);
 321 #else
 322         sprintf(filename, ":Players:%.8s.plr",Players[Player_num].callsign);
 323 #endif
 324         file = cfopen(filename, "rb");
 325
 326 #if 0 //ndef MACINTOSH
 327         //check filename
 328         if (file && isatty(fileno(file))) {
 329                 //if the callsign is the name of a tty device, prepend a char
 330                 fclose(file);
 331                 sprintf(filename,"$%.7s.plr",Players[Player_num].callsign);
 332                 file = fopen(filename,"rb");
 333         }
 334 #endif
 335
 336         if (!file) {
 337                 return errno;
 338         }
 339
 340         id = cfile_read_int(file);
 341
 342         // SWAPINT added here because old versions of d2x
 343         // used the wrong byte order.
 344         if (id!=SAVE_FILE_ID && id!=SWAPINT(SAVE_FILE_ID)) {
 345                 nm_messagebox(TXT_ERROR, 1, TXT_OK, "Invalid player file");
 346                 cfclose(file);
 347                 return -1;
 348         }
 349
 350         player_file_version = cfile_read_short(file);
 351
 352         if (player_file_version > 255) // bigendian file?
 353                 swap = 1;
 354
 355         if (swap)
 356                 player_file_version = SWAPSHORT(player_file_version);
 357
 358         if (player_file_version<COMPATIBLE_PLAYER_FILE_VERSION) {
 359                 nm_messagebox(TXT_ERROR, 1, TXT_OK, TXT_ERROR_PLR_VERSION);
 360                 cfclose(file);
 361                 return -1;
 362         }
 363
 364         Game_window_w = cfile_read_short(file);
 365         Game_window_h = cfile_read_short(file);
 366
 367         if (swap) {
 368                 Game_window_w = SWAPSHORT(Game_window_w);
 369                 Game_window_h = SWAPSHORT(Game_window_h);
 370         }
 371
 372         Player_default_difficulty = cfile_read_byte(file);
 373         Default_leveling_on       = cfile_read_byte(file);
 374         Reticle_on                = cfile_read_byte(file);
 375         Cockpit_mode              = cfile_read_byte(file);
 376         #ifdef POLY_ACC
 377          #ifdef PA_3DFX_VOODOO
 378                 if (Cockpit_mode<2)
 379                 {
 380                 Cockpit_mode=2;
 381                         Game_window_w  = 640;
 382                         Game_window_h   = 480;
 383                 }
 384          #endif
 385         #endif
 386
 387         Default_display_mode     = cfile_read_byte(file);
 388         Missile_view_enabled     = cfile_read_byte(file);
 389         Headlight_active_default = cfile_read_byte(file);
 390         Guided_in_big_window     = cfile_read_byte(file);
 391
 392         if (player_file_version >= 19)
 393                 Automap_always_hires = cfile_read_byte(file);
 394
 395         Auto_leveling_on = Default_leveling_on;
 396
 397         //read new highest level info
 398
 399         n_highest_levels = cfile_read_short(file);
 400         if (swap)
 401                 n_highest_levels = SWAPSHORT(n_highest_levels);
 402         Assert(n_highest_levels <= MAX_MISSIONS);
 403
 404         if (cfread(highest_levels, sizeof(hli), n_highest_levels, file) != n_highest_levels)
 405         {
 406                 errno_ret                       = errno;
 407                 cfclose(file);
 408                 return errno_ret;
 409         }
 410
 411         //read taunt macros
 412         {
 413 #ifdef NETWORK
 414                 int i,len;
 415
 416                 len                     = MAX_MESSAGE_LEN;
 417
 418                 for (i                  = 0; i < 4; i++)
 419                         if (cfread(Network_message_macro[i], len, 1, file) != 1)
 420                                 {errno_ret                      = errno; break;}
 421 #else
 422                 char dummy[4][MAX_MESSAGE_LEN];
 423
 424                 cfread(dummy, MAX_MESSAGE_LEN, 4, file);
 425 #endif
 426         }
 427
 428         //read kconfig data
 429         {
 430                 int n_control_types = (player_file_version<20)?7:CONTROL_MAX_TYPES;
 431
 432                 if (cfread( kconfig_settings, MAX_CONTROLS*n_control_types, 1, file ) != 1)
 433                         errno_ret=errno;
 434                 else if (cfread((ubyte *)&control_type_dos, sizeof(ubyte), 1, file ) != 1)
 435                         errno_ret=errno;
 436                 else if (player_file_version >= 21 && cfread((ubyte *)&control_type_win, sizeof(ubyte), 1, file ) != 1)
 437                         errno_ret=errno;
 438                 else if (cfread(&Config_joystick_sensitivity, sizeof(ubyte), 1, file ) != 1)
 439                         errno_ret=errno;
 440
 441                 #ifdef WINDOWS
 442                 Config_control_type = control_type_win;
 443                 #else
 444                 Config_control_type = control_type_dos;
 445                 #endif
 446
 447                 #ifdef MACINTOSH
 448                 joydefs_set_type(Config_control_type);
 449                 #endif
 450
 451                 for (i=0;i<11;i++)
 452                 {
 453                         PrimaryOrder[i]   = cfile_read_byte(file);
 454                         SecondaryOrder[i] = cfile_read_byte(file);
 455                 }
 456
 457                 if (player_file_version>=16)
 458                 {
 459                         Cockpit_3d_view[0] = cfile_read_int(file);
 460                         Cockpit_3d_view[1] = cfile_read_int(file);
 461                         if (swap) {
 462                                 Cockpit_3d_view[0] = SWAPINT(Cockpit_3d_view[0]);
 463                                 Cockpit_3d_view[1] = SWAPINT(Cockpit_3d_view[1]);
 464                         }
 465                 }
 466
 467
 468                 if (errno_ret==EZERO)   {
 469                         kc_set_controls();
 470                 }
 471
 472         }
 473
 474    if (player_file_version>=22)
 475          {
 476 #ifdef NETWORK
 477                 Netlife_kills = cfile_read_int(file);
 478                 Netlife_killed = cfile_read_int(file);
 479                 if (swap) {
 480                         Netlife_kills = SWAPINT(Netlife_kills);
 481                         Netlife_killed = SWAPINT(Netlife_killed);
 482                 }
 483 #else
 484                 cfile_read_int(file);
 485                 cfile_read_int(file);
 486 #endif
 487          }
 488 #ifdef NETWORK
 489    else
 490          {
 491                  Netlife_kills=0; Netlife_killed=0;
 492          }
 493 #endif
 494
 495         if (player_file_version>=23)
 496          {
 497           i = cfile_read_int(file);
 498           if (swap)
 499                   i = SWAPINT(i);
 500 #ifdef NETWORK
 501           mprintf ((0,"Reading: lifetime checksum is %d\n",i));
 502           if (i!=get_lifetime_checksum (Netlife_kills,Netlife_killed))
 503                 {
 504                  Netlife_kills=0; Netlife_killed=0;
 505                  nm_messagebox(NULL, 1, "Shame on me", "Trying to cheat eh?");
 506                  rewrite_it=1;
 507                 }
 508 #endif
 509          }
 510
 511         //read guidebot name
 512         if (player_file_version >= 18)
 513                 cfile_read_string(guidebot_name, GUIDEBOT_NAME_LEN, file);
 514         else
 515                 strcpy(guidebot_name,"GUIDE-BOT");
 516
 517         strcpy(real_guidebot_name,guidebot_name);
 518
 519         {
 520                 char buf[128];
 521
 522         #ifdef WINDOWS
 523                 joy95_get_name(JOYSTICKID1, buf, 127);
 524                 if (player_file_version >= 24)
 525                         cfile_read_string(win95_current_joyname, file);
 526                 else
 527                         strcpy(win95_current_joyname, "Old Player File");
 528
 529                 mprintf((0, "Detected joystick: %s\n", buf));
 530                 mprintf((0, "Player's joystick: %s\n", win95_current_joyname));
 531
 532                 if (strcmp(win95_current_joyname, buf)) {
 533                         for (i = 0; i < MAX_CONTROLS; i++)
 534                                 kconfig_settings[CONTROL_WINJOYSTICK][i] =
 535                                         default_kconfig_settings[CONTROL_WINJOYSTICK][i];
 536                 }
 537         #else
 538                 if (player_file_version >= 24)
 539                         cfile_read_string(buf, 127, file);      // Just read it in fpr DPS.
 540         #endif
 541         }
 542
 543         if (player_file_version >= 25)
 544                 cfread(kconfig_d2x_settings, MAX_D2X_CONTROLS, 1, file);
 545         else
 546                 for(i=0; i < MAX_D2X_CONTROLS; i++)
 547                         kconfig_d2x_settings[i] = default_kconfig_d2x_settings[i];
 548
 549         if (cfclose(file) && errno_ret == EZERO)
 550                 errno_ret                       = errno;
 551
 552         if (rewrite_it)
 553          write_player_file();
 554
 555         return errno_ret;
 556
 557 }
 558
 559
 560 //finds entry for this level in table.  if not found, returns ptr to
 561 //empty entry.  If no empty entries, takes over last one
 562 int find_hli_entry()
 563 {
 564         int i;
 565
 566         for (i=0;i<n_highest_levels;i++)
 567                 if (!stricmp(highest_levels[i].shortname, Current_mission_filename))
 568                         break;
 569
 570         if (i==n_highest_levels) {              //not found.  create entry
 571
 572                 if (i==MAX_MISSIONS)
 573                         i--;            //take last entry
 574                 else
 575                         n_highest_levels++;
 576
 577                 strcpy(highest_levels[i].shortname, Current_mission_filename);
 578                 highest_levels[i].level_num                     = 0;
 579         }
 580
 581         return i;
 582 }
 583
 584 //set a new highest level for player for this mission
 585 void set_highest_level(int levelnum)
 586 {
 587         int ret,i;
 588
 589         if ((ret=read_player_file()) != EZERO)
 590                 if (ret != ENOENT)              //if file doesn't exist, that's ok
 591                         return;
 592
 593         i                       = find_hli_entry();
 594
 595         if (levelnum > highest_levels[i].level_num)
 596                 highest_levels[i].level_num                     = levelnum;
 597
 598         write_player_file();
 599 }
 600
 601 //gets the player's highest level from the file for this mission
 602 int get_highest_level(void)
 603 {
 604         int i;
 605         int highest_saturn_level                        = 0;
 606         read_player_file();
 607 #ifndef SATURN
 608         if (strlen(Current_mission_filename)==0 )       {
 609                 for (i=0;i<n_highest_levels;i++)
 610                         if (!stricmp(highest_levels[i].shortname, "DESTSAT"))   //      Destination Saturn.
 611                                 highest_saturn_level                    = highest_levels[i].level_num;
 612         }
 613 #endif
 614    i                    = highest_levels[find_hli_entry()].level_num;
 615         if ( highest_saturn_level > i )
 616         i                       = highest_saturn_level;
 617         return i;
 618 }
 619
 620 extern int Cockpit_mode_save;
 621
 622 //write out player's saved games.  returns errno (0 == no error)
 623 int write_player_file()
 624 {
 625         #ifdef MACINTOSH
 626         char filename[FILENAME_LEN+15];
 627         #else
 628         char filename[FILENAME_LEN];            // because of ":Players:" path
 629         #endif
 630         CFILE *file;
 631         int errno_ret,i;
 632
 633 //      #ifdef APPLE_DEMO               // no saving of player files in Apple OEM version
 634 //      return 0;
 635 //      #endif
 636
 637         errno_ret                       = WriteConfigFile();
 638
 639 #ifndef MACINTOSH
 640         sprintf(filename,"%s.plr",Players[Player_num].callsign);
 641 #else
 642         sprintf(filename, ":Players:%.8s.plr",Players[Player_num].callsign);
 643 #endif
 644         file = cfopen(filename, "wb");
 645
 646 #if 0 //ndef MACINTOSH
 647         //check filename
 648         if (file && isatty(fileno(file))) {
 649
 650                 //if the callsign is the name of a tty device, prepend a char
 651
 652                 fclose(file);
 653                 sprintf(filename,"$%.7s.plr",Players[Player_num].callsign);
 654                 file                    = fopen(filename,"wb");
 655         }
 656 #endif
 657
 658         if (!file)
 659               return errno;
 660
 661         errno_ret                       = EZERO;
 662
 663         //Write out player's info
 664         cfile_write_int(SAVE_FILE_ID, file);
 665         cfile_write_short(PLAYER_FILE_VERSION, file);
 666
 667         cfile_write_short(Game_window_w, file);
 668         cfile_write_short(Game_window_h, file);
 669
 670         cfile_write_byte(Player_default_difficulty, file);
 671         cfile_write_byte(Auto_leveling_on, file);
 672         cfile_write_byte(Reticle_on, file);
 673         cfile_write_byte((Cockpit_mode_save != -1)?Cockpit_mode_save:Cockpit_mode, file);   //if have saved mode, write it instead of letterbox/rear view
 674         cfile_write_byte(Default_display_mode, file);
 675         cfile_write_byte(Missile_view_enabled, file);
 676         cfile_write_byte(Headlight_active_default, file);
 677         cfile_write_byte(Guided_in_big_window, file);
 678         cfile_write_byte(Automap_always_hires, file);
 679
 680         //write higest level info
 681         Assert(n_highest_levels <= MAX_MISSIONS);
 682         cfile_write_short(n_highest_levels, file);
 683         if ((cfwrite(highest_levels, sizeof(hli), n_highest_levels, file) != n_highest_levels))
 684         {
 685                 errno_ret                       = errno;
 686                 cfclose(file);
 687                 return errno_ret;
 688         }
 689
 690 #ifdef NETWORK
 691         if ((cfwrite(Network_message_macro, MAX_MESSAGE_LEN, 4, file) != 4))
 692         {
 693                 errno_ret                       = errno;
 694                 cfclose(file);
 695                 return errno_ret;
 696         }
 697 #else
 698         {
 699                 char dummy[4][MAX_MESSAGE_LEN]; // Pull the messages from a hat! ;-)
 700
 701                 cfwrite(dummy, MAX_MESSAGE_LEN, 4, file);
 702         }
 703 #endif
 704
 705         //write kconfig info
 706         {
 707
 708                 #ifdef WINDOWS
 709                 control_type_win = Config_control_type;
 710                 #else
 711                 control_type_dos = Config_control_type;
 712                 #endif
 713
 714                 if (cfwrite(kconfig_settings, MAX_CONTROLS * CONTROL_MAX_TYPES, 1, file ) != 1)
 715                         errno_ret=errno;
 716                 else if (cfwrite(&control_type_dos, sizeof(ubyte), 1, file) != 1)
 717                         errno_ret=errno;
 718                 else if (cfwrite(&control_type_win, sizeof(ubyte), 1, file ) != 1)
 719                         errno_ret=errno;
 720                 else if (cfwrite(&Config_joystick_sensitivity, sizeof(ubyte), 1, file) != 1)
 721                         errno_ret=errno;
 722
 723                 for (i=0;i<11;i++)
 724                 {
 725                         cfwrite(&PrimaryOrder[i], sizeof(ubyte), 1, file);
 726                         cfwrite(&SecondaryOrder[i], sizeof(ubyte), 1, file);
 727                 }
 728
 729                 cfile_write_int(Cockpit_3d_view[0], file);
 730                 cfile_write_int(Cockpit_3d_view[1], file);
 731
 732 #ifdef NETWORK
 733                 cfile_write_int(Netlife_kills, file);
 734                 cfile_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                 cfile_write_int(0, file);
 739                 cfile_write_int(0, file);
 740                 i = get_lifetime_checksum(0, 0);
 741 #endif
 742                 cfile_write_int(i,file);
 743         }
 744
 745         //write guidebot name
 746         cfile_write_string(real_guidebot_name, file);
 747         {
 748                 char buf[128];
 749                 #ifdef WINDOWS
 750                 joy95_get_name(JOYSTICKID1, buf, 127);
 751                 #else
 752                 strcpy(buf, "DOS joystick");
 753                 #endif
 754                 cfile_write_string(buf, file);  // Write out current joystick for player.
 755         }
 756
 757         cfwrite(kconfig_d2x_settings, MAX_D2X_CONTROLS, 1, file);
 758
 759         if (cfclose(file))
 760                 errno_ret                       = errno;
 761
 762         if (errno_ret != EZERO) {
 763                 cfile_delete(filename);         //delete bogus file
 764                 nm_messagebox(TXT_ERROR, 1, TXT_OK, "%s\n\n%s",TXT_ERROR_WRITING_PLR, strerror(errno_ret));
 765         }
 766
 767         #ifdef MACINTOSH                // set filetype and creator for playerfile
 768         {
 769                 FInfo finfo;
 770                 Str255 pfilename;
 771                 OSErr err;
 772
 773                 strcpy(pfilename, filename);
 774                 c2pstr(pfilename);
 775                 err = HGetFInfo(0, 0, pfilename, &finfo);
 776                 finfo.fdType = 'PLYR';
 777                 finfo.fdCreator = 'DCT2';
 778                 err = HSetFInfo(0, 0, pfilename, &finfo);
 779         }
 780         #endif
 781
 782         return errno_ret;
 783
 784 }
 785
 786 //update the player's highest level.  returns errno (0 == no error)
 787 int update_player_file()
 788 {
 789         int ret;
 790
 791         if ((ret=read_player_file()) != EZERO)
 792                 if (ret != ENOENT)              //if file doesn't exist, that's ok
 793                         return ret;
 794
 795         return write_player_file();
 796 }
 797
 798 int get_lifetime_checksum (int a,int b)
 799  {
 800   int num;
 801
 802   // confusing enough to beat amateur disassemblers? Lets hope so
 803
 804   num=(a<<8 ^ b);
 805   num^=(a | b);
 806   num*=num>>2;
 807   return (num);
 808  }
 809
 810