/* $Id: mission.c,v 1.9 2002-08-23 10:43:11 btb Exp $ */ /* 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-1999 PARALLAX SOFTWARE CORPORATION. ALL RIGHTS RESERVED. */ /* * * Stuff for loading missions * * */ #ifdef HAVE_CONFIG_H #include #endif #include #include #include #include #include #include "pstypes.h" #include "cfile.h" #include "strutil.h" #include "inferno.h" #include "mission.h" #include "gameseq.h" #include "titles.h" #include "songs.h" #include "mono.h" #include "error.h" #include "findfile.h" mle Mission_list[MAX_MISSIONS]; int Current_mission_num; int N_secret_levels; // Made a global by MK for scoring purposes. August 1, 1995. char *Current_mission_filename,*Current_mission_longname; //this stuff should get defined elsewhere char Level_names[MAX_LEVELS_PER_MISSION][FILENAME_LEN]; char Secret_level_names[MAX_SECRET_LEVELS_PER_MISSION][FILENAME_LEN]; //where the missions go #ifndef EDITOR #define MISSION_DIR "missions/" #else #define MISSION_DIR "./" #endif char *Builtin_mission_filename; int Builtin_mission_hogsize; // // Special versions of mission routines for shareware // int load_mission_shareware(int mission_num) { Current_mission_num = mission_num; Current_mission_filename = Mission_list[mission_num].filename; Current_mission_longname = Mission_list[mission_num].mission_name; N_secret_levels = 0; Last_level = 3; Last_secret_level = 0; switch (Builtin_mission_hogsize) { case MAC_SHARE_MISSION_HOGSIZE: // mac demo is using the regular hog and rl2 files strcpy(Level_names[0],"d2leva-1.rl2"); strcpy(Level_names[1],"d2leva-2.rl2"); strcpy(Level_names[2],"d2leva-3.rl2"); break; default: Int3(); // fall through case SHAREWARE_MISSION_HOGSIZE: strcpy(Level_names[0],"d2leva-1.sl2"); strcpy(Level_names[1],"d2leva-2.sl2"); strcpy(Level_names[2],"d2leva-3.sl2"); } return 1; } // // Special versions of mission routines for Diamond/S3 version // int load_mission_oem(int mission_num) { Current_mission_num = mission_num; Current_mission_filename = Mission_list[mission_num].filename; Current_mission_longname = Mission_list[mission_num].mission_name; N_secret_levels = 2; Last_level = 8; Last_secret_level = -2; strcpy(Level_names[0],"d2leva-1.rl2"); strcpy(Level_names[1],"d2leva-2.rl2"); strcpy(Level_names[2],"d2leva-3.rl2"); strcpy(Level_names[3],"d2leva-4.rl2"); strcpy(Secret_level_names[0],"d2leva-s.rl2"); strcpy(Level_names[4],"d2levb-1.rl2"); strcpy(Level_names[5],"d2levb-2.rl2"); strcpy(Level_names[6],"d2levb-3.rl2"); strcpy(Level_names[7],"d2levb-4.rl2"); strcpy(Secret_level_names[1],"d2levb-s.rl2"); Secret_level_table[0] = 1; Secret_level_table[1] = 5; return 1; } //strips damn newline from end of line char *mfgets(char *s,int n,CFILE *f) { char *r; r = cfgets(s,n,f); if (r && s[strlen(s)-1] == '\n') s[strlen(s)-1] = 0; return r; } //compare a string for a token. returns true if match int istok(char *buf,char *tok) { return strnicmp(buf,tok,strlen(tok)) == 0; } //adds a terminating 0 after a string at the first white space void add_term(char *s) { while (*s && !isspace(*s)) s++; *s = 0; //terminate! } //returns ptr to string after '=' & white space, or NULL if no '=' //adds 0 after parm at first white space char *get_value(char *buf) { char *t; t = strchr(buf,'=')+1; if (t) { while (*t && isspace(*t)) t++; if (*t) return t; } return NULL; //error! } //reads a line, returns ptr to value of passed parm. returns NULL if none char *get_parm_value(char *parm,CFILE *f) { static char buf[80]; if (!mfgets(buf,80,f)) return NULL; if (istok(buf,parm)) return get_value(buf); else return NULL; } int ml_sort_func(mle *e0,mle *e1) { return stricmp(e0->mission_name,e1->mission_name); } extern char CDROM_dir[]; extern int HoardEquipped(); //returns 1 if file read ok, else 0 int read_mission_file(char *filename,int count,int location) { char filename2[100]; CFILE *mfile; //printf("reading: %s\n", filename); switch (location) { case ML_MISSIONDIR: strcpy(filename2,MISSION_DIR); break; case ML_CDROM: songs_stop_redbook(); //so we can read from the CD strcpy(filename2,CDROM_dir); break; default: Int3(); //fall through case ML_CURDIR: strcpy(filename2,""); break; } strcat(filename2,filename); mfile = cfopen(filename2,"rb"); if (mfile) { char *p; char temp[FILENAME_LEN],*t; strcpy(temp,filename); if ((t = strchr(temp,'.')) == NULL) return 0; //missing extension // look if it's .mn2 or .msn Mission_list[count].descent_version = (t[3] == '2') ? 2 : 1; *t = 0; //kill extension strncpy( Mission_list[count].filename, temp, 9 ); Mission_list[count].anarchy_only_flag = 0; Mission_list[count].location = location; p = get_parm_value("name",mfile); if (!p) { //try enhanced mission cfseek(mfile,0,SEEK_SET); p = get_parm_value("xname",mfile); } #ifdef NETWORK if (HoardEquipped()) { if (!p) { //try super-enhanced mission! cfseek(mfile,0,SEEK_SET); p = get_parm_value("zname",mfile); } } #endif if (p) { char *t; if ((t=strchr(p,';'))!=NULL) *t=0; t = p + strlen(p)-1; while (isspace(*t)) t--; strncpy(Mission_list[count].mission_name,p,MISSION_NAME_LEN); } else { cfclose(mfile); return 0; } p = get_parm_value("type",mfile); //get mission type if (p) Mission_list[count].anarchy_only_flag = istok(p,"anarchy"); cfclose(mfile); return 1; } return 0; } void add_builtin_mission_to_list(int *count) { Builtin_mission_hogsize = cfile_size("descent2.hog"); if (Builtin_mission_hogsize == -1) Builtin_mission_hogsize = cfile_size("d2demo.hog"); switch (Builtin_mission_hogsize) { case SHAREWARE_MISSION_HOGSIZE: case MAC_SHARE_MISSION_HOGSIZE: strcpy(Mission_list[*count].filename,SHAREWARE_MISSION_FILENAME); strcpy(Mission_list[*count].mission_name,SHAREWARE_MISSION_NAME); Mission_list[*count].anarchy_only_flag = 0; break; case OEM_MISSION_HOGSIZE: strcpy(Mission_list[*count].filename,OEM_MISSION_FILENAME); strcpy(Mission_list[*count].mission_name,OEM_MISSION_NAME); Mission_list[*count].anarchy_only_flag = 0; break; default: Warning("Unknown hogsize %d, trying %s\n", Builtin_mission_hogsize, FULL_MISSION_FILENAME); Int3(); //fall through case FULL_MISSION_HOGSIZE: if (!read_mission_file(FULL_MISSION_FILENAME,0,ML_CURDIR)) Error("Could not find required mission file <%s>", FULL_MISSION_FILENAME); } Builtin_mission_filename = strdup(Mission_list[*count].filename); ++(*count); } void add_missions_to_list(char *search_name, int *count, int anarchy_mode) { FILEFINDSTRUCT find; if( !FileFindFirst( search_name, &find ) ) { do { if (read_mission_file( find.name, *count, ML_MISSIONDIR )) { if (anarchy_mode || !Mission_list[*count].anarchy_only_flag) ++(*count); } } while( !FileFindNext( &find ) && *count < MAX_MISSIONS); FileFindClose(); if (*count >= MAX_MISSIONS) mprintf((0, "Warning: more missions than d2x can handle\n")); } } /* move to on mission list, increment */ void promote (char * mission_name, int * top_place, int num_missions) { int i; char name[FILENAME_LEN], * t; strcpy(name, mission_name); if ((t = strchr(name,'.')) != NULL) *t = 0; //kill extension //printf("promoting: %s\n", name); for (i = *top_place; i < num_missions; i++) if (!stricmp(Mission_list[i].filename, name)) { //swap mission positions mle temp; temp = Mission_list[*top_place]; Mission_list[*top_place] = Mission_list[i]; Mission_list[i] = temp; ++(*top_place); break; } } //fills in the global list of missions. Returns the number of missions //in the list. If anarchy_mode set, don't include non-anarchy levels. extern char CDROM_dir[]; extern char AltHogDir[]; extern char AltHogdir_initialized; int build_mission_list(int anarchy_mode) { static int num_missions=-1; int count = 0; int top_place; //now search for levels on disk //@@Took out this code because after this routine was called once for //@@a list of single-player missions, a subsequent call for a list of //@@anarchy missions would not scan again, and thus would not find the //@@anarchy-only missions. If we retain the minimum level of install, //@@we may want to put the code back in, having it always scan for all //@@missions, and have the code that uses it sort out the ones it wants. //@@ if (num_missions != -1) { //@@ if (Current_mission_num != 0) //@@ load_mission(0); //set built-in mission as default //@@ return num_missions; //@@ } add_builtin_mission_to_list(&count); //read built-in first add_missions_to_list(MISSION_DIR "*.mn2", &count, anarchy_mode); add_missions_to_list(MISSION_DIR "*.msn", &count, anarchy_mode); if (AltHogdir_initialized) { char search_name[PATH_MAX + 5]; strcpy(search_name, AltHogDir); strcat(search_name, "/" MISSION_DIR "*.mn2"); add_missions_to_list(search_name, &count, anarchy_mode); strcpy(search_name, AltHogDir); strcat(search_name, "/" MISSION_DIR "*.msn"); add_missions_to_list(search_name, &count, anarchy_mode); } // move original missions (in stroy-chronological order) // to top of mission list top_place = 0; promote("descent", &top_place, count); // original descent 1 mission promote(Builtin_mission_filename, &top_place, count); // descent 2 promote("d2x", &top_place, count); // vertigo if (count > top_place) qsort(&Mission_list[top_place], count - top_place, sizeof(*Mission_list), (int (*)( const void *, const void * ))ml_sort_func); if (count > top_place) qsort(&Mission_list[top_place], count - top_place, sizeof(*Mission_list), (int (*)( const void *, const void * ))ml_sort_func); //load_mission(0); //set built-in mission as default num_missions = count; return count; } void init_extra_robot_movie(char *filename); //values for built-in mission //loads the specfied mission from the mission list. //build_mission_list() must have been called. //Returns true if mission loaded ok, else false. int load_mission(int mission_num) { CFILE *mfile; char buf[80], *v; int found_hogfile; int enhanced_mission = 0; if (!strcmp(Mission_list[mission_num].filename, Builtin_mission_filename)) { switch (Builtin_mission_hogsize) { case SHAREWARE_MISSION_HOGSIZE: case MAC_SHARE_MISSION_HOGSIZE: return load_mission_shareware(mission_num); break; case OEM_MISSION_HOGSIZE: return load_mission_oem(mission_num); break; } } Current_mission_num = mission_num; mprintf(( 0, "Loading mission %d\n", mission_num )); //read mission from file switch (Mission_list[mission_num].location) { case ML_MISSIONDIR: strcpy(buf,MISSION_DIR); break; case ML_CDROM: strcpy(buf,CDROM_dir); break; default: Int3(); //fall through case ML_CURDIR: strcpy(buf,""); break; } strcat(buf,Mission_list[mission_num].filename); if (Mission_list[mission_num].descent_version == 2) strcat(buf,".mn2"); else strcat(buf,".msn"); mfile = cfopen(buf,"rb"); if (mfile == NULL) { Current_mission_num = -1; return 0; //error! } //for non-builtin missions, load HOG if (strcmp(Mission_list[mission_num].filename, Builtin_mission_filename)) { strcpy(buf+strlen(buf)-4,".hog"); //change extension found_hogfile = cfile_use_alternate_hogfile(buf); #ifdef RELEASE //for release, require mission to be in hogfile if (! found_hogfile) { cfclose(mfile); Current_mission_num = -1; return 0; } #endif } //init vars Last_level = 0; Last_secret_level = 0; while (mfgets(buf,80,mfile)) { if (istok(buf,"name")) continue; //already have name, go to next line if (istok(buf,"xname")) { enhanced_mission = 1; continue; //already have name, go to next line } if (istok(buf,"zname")) { enhanced_mission = 2; continue; //already have name, go to next line } else if (istok(buf,"type")) continue; //already have name, go to next line else if (istok(buf,"hog")) { char *bufp = buf; while (*(bufp++) != '=') ; if (*bufp == ' ') while (*(++bufp) == ' ') ; cfile_use_alternate_hogfile(bufp); mprintf((0, "Hog file override = [%s]\n", bufp)); } else if (istok(buf,"num_levels")) { if ((v=get_value(buf))!=NULL) { int n_levels,i; n_levels = atoi(v); for (i=0;iLast_level) break; Last_secret_level--; } else break; } } } } cfclose(mfile); if (Last_level <= 0) { Current_mission_num = -1; //no valid mission loaded return 0; } Current_mission_filename = Mission_list[Current_mission_num].filename; Current_mission_longname = Mission_list[Current_mission_num].mission_name; if (enhanced_mission) { char t[50]; extern void bm_read_extra_robots(); sprintf(t,"%s.ham",Current_mission_filename); bm_read_extra_robots(t,enhanced_mission); strncpy(t,Current_mission_filename,6); strcat(t,"-l.mvl"); init_extra_robot_movie(t); } return 1; } //loads the named mission if exists. //Returns true if mission loaded ok, else false. int load_mission_by_name(char *mission_name) { int n,i; n = build_mission_list(1); for (i=0;i