1 /* $Id: gamemine.c,v 1.27 2004-06-26 16:27:17 schaffner Exp $ */
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.
17 * Functions for loading mines in the game
20 * Revision 1.2 1995/10/31 10:15:58 allender
21 * code for shareware levels
23 * Revision 1.1 1995/05/16 15:25:29 allender
26 * Revision 2.2 1995/03/06 15:23:14 john
27 * New screen techniques.
29 * Revision 2.1 1995/02/27 13:13:37 john
30 * Removed floating point.
32 * Revision 2.0 1995/02/27 11:27:45 john
33 * New version 2.0, which has no anonymous unions, builds with
34 * Watcom 10.0, and doesn't require parsing BITMAPS.TBL.
36 * Revision 1.70 1995/02/13 20:35:09 john
39 * Revision 1.69 1995/02/07 17:12:03 rob
40 * Added ifdef's for Editor.
42 * Revision 1.68 1995/02/07 16:51:48 mike
43 * fix gray rock josh problem.
45 * Revision 1.67 1995/02/01 15:46:26 yuan
48 * Revision 1.66 1995/01/19 15:19:28 mike
49 * new super-compressed registered file format.
51 * Revision 1.65 1994/12/10 16:44:59 matt
52 * Added debugging code to track down door that turns into rock
54 * Revision 1.64 1994/12/10 14:58:24 yuan
55 * *** empty log message ***
57 * Revision 1.63 1994/12/08 17:19:10 yuan
60 * Revision 1.62 1994/12/07 14:05:33 yuan
61 * Fixed wall assert problem... Bashed highest_segment
62 * _index before WALL_IS_DOORWAY check.
64 * Revision 1.61 1994/11/27 23:14:52 matt
65 * Made changes for new mprintf calling convention
67 * Revision 1.60 1994/11/27 18:05:20 matt
68 * Compile out LVL reader when editor compiled out
70 * Revision 1.59 1994/11/26 22:51:45 matt
71 * Removed editor-only fields from segment structure when editor is compiled
72 * out, and padded segment structure to even multiple of 4 bytes.
74 * Revision 1.58 1994/11/26 21:48:02 matt
75 * Fixed saturation in short light value
77 * Revision 1.57 1994/11/20 22:11:49 mike
78 * comment out an apparently unnecessary call to fuelcen_reset().
80 * Revision 1.56 1994/11/18 21:56:42 john
81 * Added a better, leaner pig format.
83 * Revision 1.55 1994/11/17 20:09:18 john
84 * Added new compiled level format.
86 * Revision 1.54 1994/11/17 15:40:17 mike
87 * Comment out mprintf which was causing important information to scroll away.
89 * Revision 1.53 1994/11/17 14:56:37 mike
90 * moved segment validation functions from editor to main.
92 * Revision 1.52 1994/11/17 11:39:35 matt
93 * Ripped out code to load old mines
95 * Revision 1.51 1994/11/14 20:47:53 john
96 * Attempted to strip out all the code in the game
97 * directory that uses any ui code.
99 * Revision 1.50 1994/11/14 16:05:38 matt
100 * Fixed, maybe, again, errors when can't find texture during remap
102 * Revision 1.49 1994/11/14 14:34:03 matt
103 * Fixed up handling when textures can't be found during remap
105 * Revision 1.48 1994/11/14 13:01:55 matt
106 * Added Int3() when can't find texture
108 * Revision 1.47 1994/10/30 14:12:21 mike
109 * rip out local segments stuff.
111 * Revision 1.46 1994/10/27 19:43:07 john
112 * Disable the piglet option.
114 * Revision 1.45 1994/10/27 18:51:42 john
115 * Added -piglet option that only loads needed textures for a
116 * mine. Only saved ~1MB, and code still doesn't free textures
117 * before you load a new mine.
119 * Revision 1.44 1994/10/20 12:47:22 matt
120 * Replace old save files (MIN/SAV/HOT) with new LVL files
122 * Revision 1.43 1994/10/19 16:46:40 matt
123 * Made tmap overrides for robots remap texture numbers
125 * Revision 1.42 1994/10/03 23:37:01 mike
126 * Adapt to changed fuelcen_activate parameters.
128 * Revision 1.41 1994/09/23 22:14:49 matt
129 * Took out obsolete structure fields
131 * Revision 1.40 1994/08/01 11:04:11 yuan
132 * New materialization centers.
134 * Revision 1.39 1994/07/21 19:01:47 mike
135 * Call Lsegment stuff.
145 static char rcsid[] = "$Id: gamemine.c,v 1.27 2004-06-26 16:27:17 schaffner Exp $";
158 #include "textures.h"
161 #include "gamemine.h"
170 #include "editor/editor.h"
180 #include "byteswap.h"
181 #include "gamesave.h"
183 #define REMOVE_EXT(s) (*(strchr( (s), '.' ))='\0')
185 fix Level_shake_frequency = 0, Level_shake_duration = 0;
186 int Secret_return_segment = 0;
187 vms_matrix Secret_return_orient;
190 struct mtfi mine_top_fileinfo; // Should be same as first two fields below...
191 struct mfi mine_fileinfo;
192 struct mh mine_header;
193 struct me mine_editor;
196 typedef struct v16_segment {
198 short segnum; // segment number, not sure what it means
200 side sides[MAX_SIDES_PER_SEGMENT]; // 6 sides
201 short children[MAX_SIDES_PER_SEGMENT]; // indices of 6 children segments, front, left, top, right, bottom, back
202 short verts[MAX_VERTICES_PER_SEGMENT]; // vertex ids of 4 front and 4 back vertices
204 short group; // group number to which the segment belongs.
206 short objects; // pointer to objects in this segment
207 ubyte special; // what type of center this is
208 sbyte matcen_num; // which center segment is associated with.
210 fix static_light; // average static light in segment
212 short pad; // make structure longword aligned
218 ushort fileinfo_signature;
219 ushort fileinfo_version;
221 int header_offset; // Stuff common to game & editor
223 int editor_offset; // Editor specific stuff
228 int newseg_verts_offset;
229 int newseg_verts_howmany;
230 int newseg_verts_sizeof;
244 int triggers_howmany;
249 int object_offset; // Object info
252 int unused_offset; // was: doors_offset
253 int unused_howmamy; // was: doors_howmany
254 int unused_sizeof; // was: doors_sizeof
255 short level_shake_frequency; // Shakes every level_shake_frequency seconds
256 short level_shake_duration; // for level_shake_duration seconds (on average, random). In 16ths second.
257 int secret_return_segment;
258 vms_matrix secret_return_orient;
260 int dl_indices_offset;
261 int dl_indices_howmany;
262 int dl_indices_sizeof;
264 int delta_light_offset;
265 int delta_light_howmany;
266 int delta_light_sizeof;
271 int CreateDefaultNewSegment();
273 int New_file_format_load = 1; // "new file format" is everything newer than d1 shareware
275 int d1_pig_present = 0; // can descent.pig from descent 1 be loaded?
277 /* returns nonzero if d1_tmap_num references a texture which isn't available in d2. */
278 int d1_tmap_num_unique(short d1_tmap_num) {
279 switch (d1_tmap_num) {
280 case 0: case 2: case 4: case 5: case 6: case 7: case 9:
281 case 10: case 11: case 12: case 17: case 18:
282 case 20: case 21: case 25: case 28:
283 case 38: case 39: case 41: case 44: case 49:
284 case 50: case 55: case 57: case 88:
285 case 132: case 141: case 147:
286 case 154: case 155: case 158: case 159:
287 case 160: case 161: case 167: case 168: case 169:
288 case 170: case 171: case 174: case 175: case 185:
289 case 193: case 194: case 195: case 198: case 199:
290 case 200: case 202: case 210: case 211:
291 case 220: case 226: case 227: case 228: case 229: case 230:
292 case 240: case 241: case 242: case 243: case 246:
293 case 250: case 251: case 252: case 253: case 257: case 258: case 259:
294 case 260: case 263: case 266: case 283: case 298:
295 case 315: case 317: case 319: case 320: case 321:
296 case 330: case 331: case 332: case 333: case 349:
297 case 351: case 352: case 353: case 354:
298 case 355: case 357: case 358: case 359:
299 case 362: case 370: return 1;
304 #define TMAP_NUM_MASK 0x3FFF
306 /* Converts descent 1 texture numbers to descent 2 texture numbers.
307 * Textures from d1 which are unique to d1 have extra spaces around "return".
308 * If we can load the original d1 pig, we make sure this function is bijective.
309 * This function was updated using the file config/convtabl.ini from devil 2.2.
311 short convert_d1_tmap_num(short d1_tmap_num) {
312 switch (d1_tmap_num) {
313 case 0: case 2: case 4: case 5: // all refer to rock001 (exception to bijectivity rule)
314 return d1_pig_present ? 137 : 43; // grey (devil:95)
316 case 3: return 1; // rock021
317 case 6: return 270; // blue
318 case 7: return 271; // yellow
320 case 9: return d1_pig_present ? 138 : 62; // purple (devil:179)
321 case 10: return 272; // red
322 case 11: return d1_pig_present ? 139 : 117;
323 case 12: return d1_pig_present ? 140 : 12; //devil:43
328 case 17: return d1_pig_present ? 141 : 52;
331 case 20: return d1_pig_present ? 142 : 22;
332 case 21: return d1_pig_present ? 143 : 9;
336 case 25: return d1_pig_present ? 144 : 12; //devil:35
339 case 28: return d1_pig_present ? 145 : 11; //devil:43
340 //range handled by default case, returns 13..21
341 case 38: return 163; //devil:27
342 case 39: return 147; //31
347 case 44: return 136; //devil:135
352 case 49: return d1_pig_present ? 146 : 43; //devil:60
353 case 50: return 131; //devil:138
358 case 55: return 165; //devil:193
360 case 57: return 132; //devil:119
361 // range handled by default case, returns 34..63
362 case 88: return 197; //devil:15
363 // range handled by default case, returns 64..106
364 case 132: return 167;
365 // range handled by default case, returns 107..114
366 case 141: return d1_pig_present ? 148 : 110; //devil:106
367 case 142: return 115;
368 case 143: return 116;
369 case 144: return 117;
370 case 145: return 118;
371 case 146: return 119;
372 case 147: return d1_pig_present ? 149 : 93;
373 case 148: return 120;
374 case 149: return 121;
375 case 150: return 122;
376 case 151: return 123;
377 case 152: return 124;
378 case 153: return 125;
379 case 154: return d1_pig_present ? 150 : 27;
380 case 155: return 126;
381 case 156: return 200;
382 case 157: return 201;
383 case 158: return 186; //devil:227
384 case 159: return 190; //devil:246
385 case 160: return d1_pig_present ? 151 : 206;
386 case 161: return d1_pig_present ? 152 : 114; //devil:206
387 case 162: return 202;
388 case 163: return 203;
389 case 164: return 204;
390 case 165: return 205;
391 case 166: return 206;
392 case 167: return d1_pig_present ? 153 : 206;
393 case 168: return d1_pig_present ? 154 : 206;
394 case 169: return d1_pig_present ? 155 : 206;
395 case 170: return d1_pig_present ? 156 : 227;//206;
396 case 171: return d1_pig_present ? 157 : 206;//227;
397 case 172: return 207;
398 case 173: return 208;
399 case 174: return d1_pig_present ? 158 : 202;
400 case 175: return d1_pig_present ? 159 : 206;
401 // range handled by default case, returns 209..217
402 case 185: return d1_pig_present ? 160 : 217;
403 // range handled by default case, returns 218..224
404 case 193: return d1_pig_present ? 161 : 206;
405 case 194: return d1_pig_present ? 162 : 203;//206;
406 case 195: return d1_pig_present ? 166 : 234;
407 case 196: return 225;
408 case 197: return 226;
409 case 198: return d1_pig_present ? 167 : 225;
410 case 199: return d1_pig_present ? 168 : 206; //devil:204
411 case 200: return d1_pig_present ? 169 : 206; //devil:204
412 case 201: return 227;
413 case 202: return d1_pig_present ? 170 : 206; //devil:227
414 // range handled by default case, returns 228..234
415 case 210: return d1_pig_present ? 171 : 234; //devil:242
416 case 211: return d1_pig_present ? 172 : 206; //devil:240
417 // range handled by default case, returns 235..242
418 case 220: return d1_pig_present ? 173 : 242; //devil:240
419 case 221: return 243;
420 case 222: return 244;
421 case 223: return d1_pig_present ? 174 : 313;
422 case 224: return 245;
423 case 225: return 246;
424 case 226: return 164;//247; matching names but not matching textures
425 case 227: return 179; //devil:181
426 case 228: return 196;//248; matching names but not matching textures
427 case 229: return d1_pig_present ? 175 : 15; //devil:66
428 case 230: return d1_pig_present ? 176 : 15; //devil:66
429 // range handled by default case, returns 249..257
430 case 240: return d1_pig_present ? 177 : 6; //devil:132
431 case 241: return 130; //devil:131
432 case 242: return d1_pig_present ? 178 : 78; //devil:15
433 case 243: return d1_pig_present ? 180 : 33; //devil:38
434 case 244: return 258;
435 case 245: return 259;
436 case 246: return d1_pig_present ? 181 : 321;
437 case 247: return 260;
438 case 248: return 261;
439 case 249: return 262;
440 case 250: return 340; // white entrance
441 case 251: return 412; // red entrance
442 case 252: return 410; // blue entrance
443 case 253: return 411; // yellow entrance
444 case 254: return 263;
445 case 255: return 264;
446 case 256: return 265;
447 case 257: return d1_pig_present ? 182 : 249;//246; brig001
448 case 258: return d1_pig_present ? 183 : 251;//246; brig002
449 case 259: return d1_pig_present ? 184 : 252;//246; brig003
450 case 260: return d1_pig_present ? 185 : 256;//246; brig004
451 case 261: return 273;
452 case 262: return 274;
453 case 263: return d1_pig_present ? 187 : 281;
454 case 264: return 275;
455 case 265: return 276;
456 case 266: return d1_pig_present ? 188 : 279; //devil:291
457 // range handled by default case, returns 277..291
458 case 282: return 293;
459 case 283: return d1_pig_present ? 189 : 295;
460 case 284: return 295;
461 case 285: return 296;
462 case 286: return 298;
463 // range handled by default case, returns 300..310
464 case 298: return d1_pig_present ? 191 : 364; //devil:374
465 // range handled by default case, returns 311..326
466 case 315: return d1_pig_present ? 192 : 361; // broken producer
467 // range handled by default case, returns 327..337
468 case 327: return 352;
469 case 328: return 353;
470 case 329: return 354;
471 case 330: return 380;
472 case 331: return 379;//373; matching names but not matching textures
473 case 332: return 355;//344; matching names but not matching textures
474 case 333: return 409; // lava //devil:404
475 case 334: return 356;
476 case 335: return 357;
477 case 336: return 358;
478 case 337: return 359;
479 case 338: return 360;
480 case 339: return 361; // producer
481 case 340: return 362;
482 case 341: return 364;
483 case 342: return 363;
484 case 343: return 366;
485 case 344: return 365;
486 case 345: return 368;
487 case 346: return 376;
488 case 347: return 370;
489 case 348: return 367;
490 case 349: return 372;
491 case 350: return 369;
492 case 351: return 374;//429; matching names but not matching textures
493 case 352: return 375;//387; matching names but not matching textures
494 case 353: return 371;
495 case 354: return 377;//425; matching names but not matching textures
496 case 355: return 408;
497 case 356: return 378; // lava02
498 case 357: return 383;//384; matching names but not matching textures
499 case 358: return 384;//385; matching names but not matching textures
500 case 359: return 385;//386; matching names but not matching textures
501 case 360: return 386;
502 case 361: return 387;
503 case 362: return d1_pig_present ? 194 : 388; // mntr04a (devil: -1)
504 case 363: return 388;
505 case 364: return 391;
506 case 365: return 392;
507 case 366: return 393;
508 case 367: return 394;
509 case 368: return 395;
510 case 369: return 396;
511 case 370: return d1_pig_present ? 195 : 392; // mntr04b (devil: -1)
512 // range 371..584 handled by default case (wall01 and door frames)
515 if (d1_tmap_num >= 29 && d1_tmap_num <= 37)
516 return d1_tmap_num - 16;
517 if (d1_tmap_num >= 58 && d1_tmap_num <= 87)
518 return d1_tmap_num - 24;
519 if (d1_tmap_num >= 89 && d1_tmap_num <= 131)
520 return d1_tmap_num - 25;
521 if (d1_tmap_num >= 133 && d1_tmap_num <= 140)
522 return d1_tmap_num - 26;
523 if (d1_tmap_num >= 176 && d1_tmap_num <= 184)
524 return d1_tmap_num + 33;
525 if (d1_tmap_num >= 186 && d1_tmap_num <= 192)
526 return d1_tmap_num + 32;
527 if (d1_tmap_num >= 203 && d1_tmap_num <= 209)
528 return d1_tmap_num + 25;
529 if (d1_tmap_num >= 212 && d1_tmap_num <= 219)
530 return d1_tmap_num + 23;
531 if (d1_tmap_num >= 231 && d1_tmap_num <= 239)
532 return d1_tmap_num + 18;
533 if (d1_tmap_num >= 267 && d1_tmap_num <= 281)
534 return d1_tmap_num + 10;
535 if (d1_tmap_num >= 287 && d1_tmap_num <= 297)
536 return d1_tmap_num + 13;
537 if (d1_tmap_num >= 299 && d1_tmap_num <= 314)
538 return d1_tmap_num + 12;
539 if (d1_tmap_num >= 316 && d1_tmap_num <= 326)
540 return d1_tmap_num + 11; // matching names but not matching textures
541 // wall01 and door frames:
542 if (d1_tmap_num > 370 && d1_tmap_num < 584) {
543 if (New_file_format_load) return d1_tmap_num + 64;
544 // d1 shareware needs special treatment:
545 if (d1_tmap_num < 410) return d1_tmap_num + 68;
546 if (d1_tmap_num < 417) return d1_tmap_num + 73;
547 if (d1_tmap_num < 446) return d1_tmap_num + 91;
548 if (d1_tmap_num < 453) return d1_tmap_num + 104;
549 if (d1_tmap_num < 462) return d1_tmap_num + 111;
550 if (d1_tmap_num < 486) return d1_tmap_num + 117;
551 if (d1_tmap_num < 494) return d1_tmap_num + 141;
552 if (d1_tmap_num < 584) return d1_tmap_num + 147;
554 { // handle rare case where orientation != 0
555 short tmap_num = d1_tmap_num & TMAP_NUM_MASK;
556 short orient = d1_tmap_num & ~TMAP_NUM_MASK;
558 return orient | convert_d1_tmap_num(tmap_num);
560 Warning("can't convert unknown descent 1 texture #%d.\n", tmap_num);
569 static char old_tmap_list[MAX_TEXTURES][FILENAME_LEN];
570 short tmap_xlate_table[MAX_TEXTURES];
571 static short tmap_times_used[MAX_TEXTURES];
573 // -----------------------------------------------------------------------------
574 //loads from an already-open file
575 // returns 0=everything ok, 1=old version, -1=error
576 int load_mine_data(CFILE *LoadFile)
578 int i, j,oldsizeadjust;
582 int mine_start = cftell(LoadFile);
584 d1_pig_present = cfexist(D1_PIGFILE);
586 oldsizeadjust=(sizeof(int)*2)+sizeof (vms_matrix);
589 for (i=0; i<MAX_TEXTURES; i++ )
590 tmap_times_used[i] = 0;
593 // Create a new mine to initialize things.
594 //texpage_goto_first();
598 //===================== READ FILE INFO ========================
600 // These are the default values... version and fileinfo_sizeof
601 // don't have defaults.
602 mine_fileinfo.header_offset = -1;
603 mine_fileinfo.header_size = sizeof(mine_header);
604 mine_fileinfo.editor_offset = -1;
605 mine_fileinfo.editor_size = sizeof(mine_editor);
606 mine_fileinfo.vertex_offset = -1;
607 mine_fileinfo.vertex_howmany = 0;
608 mine_fileinfo.vertex_sizeof = sizeof(vms_vector);
609 mine_fileinfo.segment_offset = -1;
610 mine_fileinfo.segment_howmany = 0;
611 mine_fileinfo.segment_sizeof = sizeof(segment);
612 mine_fileinfo.newseg_verts_offset = -1;
613 mine_fileinfo.newseg_verts_howmany = 0;
614 mine_fileinfo.newseg_verts_sizeof = sizeof(vms_vector);
615 mine_fileinfo.group_offset = -1;
616 mine_fileinfo.group_howmany = 0;
617 mine_fileinfo.group_sizeof = sizeof(group);
618 mine_fileinfo.texture_offset = -1;
619 mine_fileinfo.texture_howmany = 0;
620 mine_fileinfo.texture_sizeof = FILENAME_LEN; // num characters in a name
621 mine_fileinfo.walls_offset = -1;
622 mine_fileinfo.walls_howmany = 0;
623 mine_fileinfo.walls_sizeof = sizeof(wall);
624 mine_fileinfo.triggers_offset = -1;
625 mine_fileinfo.triggers_howmany = 0;
626 mine_fileinfo.triggers_sizeof = sizeof(trigger);
627 mine_fileinfo.object_offset = -1;
628 mine_fileinfo.object_howmany = 1;
629 mine_fileinfo.object_sizeof = sizeof(object);
631 mine_fileinfo.level_shake_frequency = 0;
632 mine_fileinfo.level_shake_duration = 0;
634 // Delta light stuff for blowing out light sources.
635 // if (mine_top_fileinfo.fileinfo_version >= 19) {
636 mine_fileinfo.dl_indices_offset = -1;
637 mine_fileinfo.dl_indices_howmany = 0;
638 mine_fileinfo.dl_indices_sizeof = sizeof(dl_index);
640 mine_fileinfo.delta_light_offset = -1;
641 mine_fileinfo.delta_light_howmany = 0;
642 mine_fileinfo.delta_light_sizeof = sizeof(delta_light);
646 mine_fileinfo.segment2_offset = -1;
647 mine_fileinfo.segment2_howmany = 0;
648 mine_fileinfo.segment2_sizeof = sizeof(segment2);
650 // Read in mine_top_fileinfo to get size of saved fileinfo.
652 memset( &mine_top_fileinfo, 0, sizeof(mine_top_fileinfo) );
654 if (cfseek( LoadFile, mine_start, SEEK_SET ))
655 Error( "Error moving to top of file in gamemine.c" );
657 if (cfread( &mine_top_fileinfo, sizeof(mine_top_fileinfo), 1, LoadFile )!=1)
658 Error( "Error reading mine_top_fileinfo in gamemine.c" );
660 if (mine_top_fileinfo.fileinfo_signature != 0x2884)
663 // Check version number
664 if (mine_top_fileinfo.fileinfo_version < COMPATIBLE_VERSION )
667 // Now, Read in the fileinfo
668 if (cfseek( LoadFile, mine_start, SEEK_SET ))
669 Error( "Error seeking to top of file in gamemine.c" );
671 if (cfread( &mine_fileinfo, mine_top_fileinfo.fileinfo_sizeof, 1, LoadFile )!=1)
672 Error( "Error reading mine_fileinfo in gamemine.c" );
674 if (mine_top_fileinfo.fileinfo_version < 18) {
675 mprintf((1, "Old version, setting shake intensity to 0.\n"));
676 Level_shake_frequency = 0;
677 Level_shake_duration = 0;
678 Secret_return_segment = 0;
679 Secret_return_orient = vmd_identity_matrix;
681 Level_shake_frequency = mine_fileinfo.level_shake_frequency << 12;
682 Level_shake_duration = mine_fileinfo.level_shake_duration << 12;
683 Secret_return_segment = mine_fileinfo.secret_return_segment;
684 Secret_return_orient = mine_fileinfo.secret_return_orient;
687 //===================== READ HEADER INFO ========================
689 // Set default values.
690 mine_header.num_vertices = 0;
691 mine_header.num_segments = 0;
693 if (mine_fileinfo.header_offset > -1 )
695 if (cfseek( LoadFile, mine_fileinfo.header_offset, SEEK_SET ))
696 Error( "Error seeking to header_offset in gamemine.c" );
698 if (cfread( &mine_header, mine_fileinfo.header_size, 1, LoadFile )!=1)
699 Error( "Error reading mine_header in gamemine.c" );
702 //===================== READ EDITOR INFO ==========================
704 // Set default values
705 mine_editor.current_seg = 0;
706 mine_editor.newsegment_offset = -1; // To be written
707 mine_editor.newsegment_size = sizeof(segment);
708 mine_editor.Curside = 0;
709 mine_editor.Markedsegp = -1;
710 mine_editor.Markedside = 0;
712 if (mine_fileinfo.editor_offset > -1 )
714 if (cfseek( LoadFile, mine_fileinfo.editor_offset, SEEK_SET ))
715 Error( "Error seeking to editor_offset in gamemine.c" );
717 if (cfread( &mine_editor, mine_fileinfo.editor_size, 1, LoadFile )!=1)
718 Error( "Error reading mine_editor in gamemine.c" );
721 //===================== READ TEXTURE INFO ==========================
723 if ( (mine_fileinfo.texture_offset > -1) && (mine_fileinfo.texture_howmany > 0))
725 if (cfseek( LoadFile, mine_fileinfo.texture_offset, SEEK_SET ))
726 Error( "Error seeking to texture_offset in gamemine.c" );
728 for (i=0; i< mine_fileinfo.texture_howmany; i++ )
730 if (cfread( &old_tmap_list[i], mine_fileinfo.texture_sizeof, 1, LoadFile )!=1)
731 Error( "Error reading old_tmap_list[i] in gamemine.c" );
735 //=============== GENERATE TEXTURE TRANSLATION TABLE ===============
739 Assert (NumTextures < MAX_TEXTURES);
744 hashtable_init( &ht, NumTextures );
746 // Remove all the file extensions in the textures list
748 for (i=0;i<NumTextures;i++) {
749 temptr = strchr(TmapInfo[i].filename, '.');
750 if (temptr) *temptr = '\0';
751 hashtable_insert( &ht, TmapInfo[i].filename, i );
754 // For every texture, search through the texture list
755 // to find a matching name.
756 for (j=0;j<mine_fileinfo.texture_howmany;j++) {
757 // Remove this texture name's extension
758 temptr = strchr(old_tmap_list[j], '.');
759 if (temptr) *temptr = '\0';
761 tmap_xlate_table[j] = hashtable_search( &ht,old_tmap_list[j]);
762 if (tmap_xlate_table[j] < 0 ) {
763 //tmap_xlate_table[j] = 0;
764 // mprintf( (0, "Couldn't find texture '%s'\n", old_tmap_list[j] ));
767 if (tmap_xlate_table[j] != j ) translate = 1;
768 if (tmap_xlate_table[j] >= 0)
769 tmap_times_used[tmap_xlate_table[j]]++;
774 for (i=0; i<MAX_TEXTURES; i++ )
775 if (tmap_times_used[i])
777 mprintf( (0, "This mine has %d unique textures in it (~%d KB)\n", count, (count*4096) /1024 ));
780 // -- mprintf( (0, "Translate=%d\n", translate ));
782 hashtable_free( &ht );
785 //====================== READ VERTEX INFO ==========================
787 // New check added to make sure we don't read in too many vertices.
788 if ( mine_fileinfo.vertex_howmany > MAX_VERTICES )
790 mprintf((0, "Num vertices exceeds maximum. Loading MAX %d vertices\n", MAX_VERTICES));
791 mine_fileinfo.vertex_howmany = MAX_VERTICES;
794 if ( (mine_fileinfo.vertex_offset > -1) && (mine_fileinfo.vertex_howmany > 0))
796 if (cfseek( LoadFile, mine_fileinfo.vertex_offset, SEEK_SET ))
797 Error( "Error seeking to vertex_offset in gamemine.c" );
799 for (i=0; i< mine_fileinfo.vertex_howmany; i++ )
801 // Set the default values for this vertex
806 if (cfread( &Vertices[i], mine_fileinfo.vertex_sizeof, 1, LoadFile )!=1)
807 Error( "Error reading Vertices[i] in gamemine.c" );
811 //==================== READ SEGMENT INFO ===========================
813 // New check added to make sure we don't read in too many segments.
814 if ( mine_fileinfo.segment_howmany > MAX_SEGMENTS ) {
815 mprintf((0, "Num segments exceeds maximum. Loading MAX %d segments\n", MAX_SEGMENTS));
816 mine_fileinfo.segment_howmany = MAX_SEGMENTS;
817 mine_fileinfo.segment2_howmany = MAX_SEGMENTS;
820 // [commented out by mk on 11/20/94 (weren't we supposed to hit final in October?) because it looks redundant. I think I'll test it now...] fuelcen_reset();
822 if ( (mine_fileinfo.segment_offset > -1) && (mine_fileinfo.segment_howmany > 0)) {
824 if (cfseek( LoadFile, mine_fileinfo.segment_offset,SEEK_SET ))
826 Error( "Error seeking to segment_offset in gamemine.c" );
828 Highest_segment_index = mine_fileinfo.segment_howmany-1;
830 for (i=0; i< mine_fileinfo.segment_howmany; i++ ) {
832 // Set the default values for this segment (clear to zero )
833 //memset( &Segments[i], 0, sizeof(segment) );
835 if (mine_top_fileinfo.fileinfo_version < 20) {
838 Assert(mine_fileinfo.segment_sizeof == sizeof(v16_seg));
840 if (cfread( &v16_seg, mine_fileinfo.segment_sizeof, 1, LoadFile )!=1)
841 Error( "Error reading segments in gamemine.c" );
844 Segments[i].segnum = v16_seg.segnum;
845 // -- Segments[i].pad = v16_seg.pad;
848 for (j=0; j<MAX_SIDES_PER_SEGMENT; j++)
849 Segments[i].sides[j] = v16_seg.sides[j];
851 for (j=0; j<MAX_SIDES_PER_SEGMENT; j++)
852 Segments[i].children[j] = v16_seg.children[j];
854 for (j=0; j<MAX_VERTICES_PER_SEGMENT; j++)
855 Segments[i].verts[j] = v16_seg.verts[j];
857 Segment2s[i].special = v16_seg.special;
858 Segment2s[i].value = v16_seg.value;
859 Segment2s[i].s2_flags = 0;
860 Segment2s[i].matcen_num = v16_seg.matcen_num;
861 Segment2s[i].static_light = v16_seg.static_light;
862 fuelcen_activate( &Segments[i], Segment2s[i].special );
865 if (cfread( &Segments[i], mine_fileinfo.segment_sizeof, 1, LoadFile )!=1)
866 Error("Unable to read segment %i\n", i);
869 Segments[i].objects = -1;
871 Segments[i].group = -1;
874 if (mine_top_fileinfo.fileinfo_version < 15) { //used old uvl ranges
877 for (sn=0;sn<MAX_SIDES_PER_SEGMENT;sn++)
878 for (uvln=0;uvln<4;uvln++) {
879 Segments[i].sides[sn].uvls[uvln].u /= 64;
880 Segments[i].sides[sn].uvls[uvln].v /= 64;
881 Segments[i].sides[sn].uvls[uvln].l /= 32;
886 for (j=0;j<MAX_SIDES_PER_SEGMENT;j++) {
887 unsigned short orient;
888 tmap_xlate = Segments[i].sides[j].tmap_num;
889 Segments[i].sides[j].tmap_num = tmap_xlate_table[tmap_xlate];
890 if ((WALL_IS_DOORWAY(&Segments[i],j) & WID_RENDER_FLAG))
891 if (Segments[i].sides[j].tmap_num < 0) {
892 mprintf( (0, "Couldn't find texture '%s' for Segment %d, side %d\n", old_tmap_list[tmap_xlate],i,j));
894 Segments[i].sides[j].tmap_num = NumTextures-1;
896 tmap_xlate = Segments[i].sides[j].tmap_num2 & TMAP_NUM_MASK;
897 orient = Segments[i].sides[j].tmap_num2 & (~TMAP_NUM_MASK);
898 if (tmap_xlate != 0) {
899 int xlated_tmap = tmap_xlate_table[tmap_xlate];
901 if ((WALL_IS_DOORWAY(&Segments[i],j) & WID_RENDER_FLAG))
902 if (xlated_tmap <= 0) {
903 mprintf( (0, "Couldn't find texture '%s' for Segment %d, side %d\n", old_tmap_list[tmap_xlate],i,j));
905 Segments[i].sides[j].tmap_num2 = NumTextures-1;
907 Segments[i].sides[j].tmap_num2 = xlated_tmap | orient;
913 if (mine_top_fileinfo.fileinfo_version >= 20)
914 for (i=0; i<=Highest_segment_index; i++) {
915 cfread(&Segment2s[i], sizeof(segment2), 1, LoadFile);
916 fuelcen_activate( &Segments[i], Segment2s[i].special );
920 //===================== READ NEWSEGMENT INFO =====================
924 { // Default segment created.
926 med_create_new_segment(vm_vec_make(&sizevec,DEFAULT_X_SIZE,DEFAULT_Y_SIZE,DEFAULT_Z_SIZE)); // New_segment = Segments[0];
927 //memset( &New_segment, 0, sizeof(segment) );
930 if (mine_editor.newsegment_offset > -1)
932 if (cfseek( LoadFile, mine_editor.newsegment_offset,SEEK_SET ))
933 Error( "Error seeking to newsegment_offset in gamemine.c" );
934 if (cfread( &New_segment, mine_editor.newsegment_size,1,LoadFile )!=1)
935 Error( "Error reading new_segment in gamemine.c" );
938 if ( (mine_fileinfo.newseg_verts_offset > -1) && (mine_fileinfo.newseg_verts_howmany > 0))
940 if (cfseek( LoadFile, mine_fileinfo.newseg_verts_offset, SEEK_SET ))
941 Error( "Error seeking to newseg_verts_offset in gamemine.c" );
942 for (i=0; i< mine_fileinfo.newseg_verts_howmany; i++ )
944 // Set the default values for this vertex
945 Vertices[NEW_SEGMENT_VERTICES+i].x = 1;
946 Vertices[NEW_SEGMENT_VERTICES+i].y = 1;
947 Vertices[NEW_SEGMENT_VERTICES+i].z = 1;
949 if (cfread( &Vertices[NEW_SEGMENT_VERTICES+i], mine_fileinfo.newseg_verts_sizeof,1,LoadFile )!=1)
950 Error( "Error reading Vertices[NEW_SEGMENT_VERTICES+i] in gamemine.c" );
952 New_segment.verts[i] = NEW_SEGMENT_VERTICES+i;
958 //========================= UPDATE VARIABLES ======================
962 // Setting to Markedsegp to NULL ignores Curside and Markedside, which
963 // we want to do when reading in an old file.
965 Markedside = mine_editor.Markedside;
966 Curside = mine_editor.Curside;
968 Groupside[i] = mine_editor.Groupside[i];
970 if ( mine_editor.current_seg != -1 )
971 Cursegp = mine_editor.current_seg + Segments;
975 if (mine_editor.Markedsegp != -1 )
976 Markedsegp = mine_editor.Markedsegp + Segments;
985 Num_vertices = mine_fileinfo.vertex_howmany;
986 Num_segments = mine_fileinfo.segment_howmany;
987 Highest_vertex_index = Num_vertices-1;
988 Highest_segment_index = Num_segments-1;
990 reset_objects(1); //one object, the player
993 Highest_vertex_index = MAX_SEGMENT_VERTICES-1;
994 Highest_segment_index = MAX_SEGMENTS-1;
996 Highest_vertex_index = Num_vertices-1;
997 Highest_segment_index = Num_segments-1;
999 warn_if_concave_segments();
1003 validate_segment_all();
1006 //create_local_segment_data();
1008 //gamemine_find_textures();
1010 if (mine_top_fileinfo.fileinfo_version < MINE_VERSION )
1011 return 1; //old version
1018 #define COMPILED_MINE_VERSION 0
1020 void read_children(int segnum,ubyte bit_mask,CFILE *LoadFile)
1024 for (bit=0; bit<MAX_SIDES_PER_SEGMENT; bit++) {
1025 if (bit_mask & (1 << bit)) {
1026 Segments[segnum].children[bit] = cfile_read_short(LoadFile);
1028 Segments[segnum].children[bit] = -1;
1032 void read_verts(int segnum,CFILE *LoadFile)
1035 // Read short Segments[segnum].verts[MAX_VERTICES_PER_SEGMENT]
1036 for (i = 0; i < MAX_VERTICES_PER_SEGMENT; i++)
1037 Segments[segnum].verts[i] = cfile_read_short(LoadFile);
1040 void read_special(int segnum,ubyte bit_mask,CFILE *LoadFile)
1042 if (bit_mask & (1 << MAX_SIDES_PER_SEGMENT)) {
1043 // Read ubyte Segment2s[segnum].special
1044 Segment2s[segnum].special = cfile_read_byte(LoadFile);
1045 // Read byte Segment2s[segnum].matcen_num
1046 Segment2s[segnum].matcen_num = cfile_read_byte(LoadFile);
1047 // Read short Segment2s[segnum].value
1048 Segment2s[segnum].value = cfile_read_short(LoadFile);
1050 Segment2s[segnum].special = 0;
1051 Segment2s[segnum].matcen_num = -1;
1052 Segment2s[segnum].value = 0;
1056 int load_mine_data_compiled(CFILE *LoadFile)
1058 int i, segnum, sidenum;
1059 ubyte compiled_version;
1061 ushort temp_ushort = 0;
1064 d1_pig_present = cfexist(D1_PIGFILE);
1066 if (!strcmp(strchr(Gamesave_current_filename, '.'), ".sdl"))
1067 New_file_format_load = 0; // descent 1 shareware
1069 New_file_format_load = 1;
1071 // For compiled levels, textures map to themselves, prevent tmap_override always being gray,
1072 // bug which Matt and John refused to acknowledge, so here is Mike, fixing it.
1074 for (i=0; i<MAX_TEXTURES; i++)
1075 tmap_xlate_table[i] = i;
1078 // memset( Segments, 0, sizeof(segment)*MAX_SEGMENTS );
1081 //=============================== Reading part ==============================
1082 compiled_version = cfile_read_byte(LoadFile);
1083 //Assert( compiled_version==COMPILED_MINE_VERSION );
1084 if (compiled_version!=COMPILED_MINE_VERSION)
1085 mprintf((0,"compiled mine version=%i\n", compiled_version)); //many levels have "wrong" versions. Theres no point in aborting because of it, I think.
1087 if (New_file_format_load)
1088 Num_vertices = cfile_read_short(LoadFile);
1090 Num_vertices = cfile_read_int(LoadFile);
1091 Assert( Num_vertices <= MAX_VERTICES );
1093 if (New_file_format_load)
1094 Num_segments = cfile_read_short(LoadFile);
1096 Num_segments = cfile_read_int(LoadFile);
1097 Assert( Num_segments <= MAX_SEGMENTS );
1099 for (i = 0; i < Num_vertices; i++)
1100 cfile_read_vector( &(Vertices[i]), LoadFile);
1102 for (segnum=0; segnum<Num_segments; segnum++ ) {
1105 Segments[segnum].segnum = segnum;
1106 Segments[segnum].group = 0;
1109 if (New_file_format_load)
1110 bit_mask = cfile_read_byte(LoadFile);
1112 bit_mask = 0x7f; // read all six children and special stuff...
1114 if (Gamesave_current_version == 5) { // d2 SHAREWARE level
1115 read_special(segnum,bit_mask,LoadFile);
1116 read_verts(segnum,LoadFile);
1117 read_children(segnum,bit_mask,LoadFile);
1119 read_children(segnum,bit_mask,LoadFile);
1120 read_verts(segnum,LoadFile);
1121 if (Gamesave_current_version <= 1) { // descent 1 level
1122 read_special(segnum,bit_mask,LoadFile);
1126 Segments[segnum].objects = -1;
1128 if (Gamesave_current_version <= 5) { // descent 1 thru d2 SHAREWARE level
1129 // Read fix Segments[segnum].static_light (shift down 5 bits, write as short)
1130 temp_ushort = cfile_read_short(LoadFile);
1131 Segment2s[segnum].static_light = ((fix)temp_ushort) << 4;
1132 //cfread( &Segments[segnum].static_light, sizeof(fix), 1, LoadFile );
1135 // Read the walls as a 6 byte array
1136 for (sidenum=0; sidenum<MAX_SIDES_PER_SEGMENT; sidenum++ ) {
1137 Segments[segnum].sides[sidenum].pad = 0;
1140 if (New_file_format_load)
1141 bit_mask = cfile_read_byte(LoadFile);
1143 bit_mask = 0x3f; // read all six sides
1144 for (sidenum=0; sidenum<MAX_SIDES_PER_SEGMENT; sidenum++) {
1147 if (bit_mask & (1 << sidenum)) {
1148 byte_wallnum = cfile_read_byte(LoadFile);
1149 if ( byte_wallnum == 255 )
1150 Segments[segnum].sides[sidenum].wall_num = -1;
1152 Segments[segnum].sides[sidenum].wall_num = byte_wallnum;
1154 Segments[segnum].sides[sidenum].wall_num = -1;
1157 for (sidenum=0; sidenum<MAX_SIDES_PER_SEGMENT; sidenum++ ) {
1159 if ( (Segments[segnum].children[sidenum]==-1) || (Segments[segnum].sides[sidenum].wall_num!=-1) ) {
1160 // Read short Segments[segnum].sides[sidenum].tmap_num;
1161 if (New_file_format_load) {
1162 temp_ushort = cfile_read_short(LoadFile);
1163 Segments[segnum].sides[sidenum].tmap_num = temp_ushort & 0x7fff;
1165 Segments[segnum].sides[sidenum].tmap_num = cfile_read_short(LoadFile);
1167 if (Gamesave_current_version <= 1)
1168 Segments[segnum].sides[sidenum].tmap_num = convert_d1_tmap_num(Segments[segnum].sides[sidenum].tmap_num);
1170 if (New_file_format_load && !(temp_ushort & 0x8000))
1171 Segments[segnum].sides[sidenum].tmap_num2 = 0;
1173 // Read short Segments[segnum].sides[sidenum].tmap_num2;
1174 Segments[segnum].sides[sidenum].tmap_num2 = cfile_read_short(LoadFile);
1175 if (Gamesave_current_version <= 1 && Segments[segnum].sides[sidenum].tmap_num2 != 0)
1176 Segments[segnum].sides[sidenum].tmap_num2 = convert_d1_tmap_num(Segments[segnum].sides[sidenum].tmap_num2);
1179 // Read uvl Segments[segnum].sides[sidenum].uvls[4] (u,v>>5, write as short, l>>1 write as short)
1180 for (i=0; i<4; i++ ) {
1181 temp_short = cfile_read_short(LoadFile);
1182 Segments[segnum].sides[sidenum].uvls[i].u = ((fix)temp_short) << 5;
1183 temp_short = cfile_read_short(LoadFile);
1184 Segments[segnum].sides[sidenum].uvls[i].v = ((fix)temp_short) << 5;
1185 temp_ushort = cfile_read_short(LoadFile);
1186 Segments[segnum].sides[sidenum].uvls[i].l = ((fix)temp_ushort) << 1;
1187 //cfread( &Segments[segnum].sides[sidenum].uvls[i].l, sizeof(fix), 1, LoadFile );
1190 Segments[segnum].sides[sidenum].tmap_num = 0;
1191 Segments[segnum].sides[sidenum].tmap_num2 = 0;
1192 for (i=0; i<4; i++ ) {
1193 Segments[segnum].sides[sidenum].uvls[i].u = 0;
1194 Segments[segnum].sides[sidenum].uvls[i].v = 0;
1195 Segments[segnum].sides[sidenum].uvls[i].l = 0;
1205 fp = fopen("segments.out", "wt");
1206 for (i = 0; i <= Highest_segment_index; i++) {
1207 side sides[MAX_SIDES_PER_SEGMENT]; // 6 sides
1208 short children[MAX_SIDES_PER_SEGMENT]; // indices of 6 children segments, front, left, top, right, bottom, back
1209 short verts[MAX_VERTICES_PER_SEGMENT]; // vertex ids of 4 front and 4 back vertices
1210 int objects; // pointer to objects in this segment
1212 for (j = 0; j < MAX_SIDES_PER_SEGMENT; j++) {
1213 sbyte type; // replaces num_faces and tri_edge, 1 = quad, 2 = 0:2 triangulation, 3 = 1:3 triangulation
1214 ubyte pad; //keep us longword alligned
1219 vms_vector normals[2]; // 2 normals, if quadrilateral, both the same.
1220 fprintf(fp, "%d\n", Segments[i].sides[j].type);
1221 fprintf(fp, "%d\n", Segments[i].sides[j].pad);
1222 fprintf(fp, "%d\n", Segments[i].sides[j].wall_num);
1223 fprintf(fp, "%d\n", Segments[i].tmap_num);
1231 Highest_vertex_index = Num_vertices-1;
1232 Highest_segment_index = Num_segments-1;
1234 validate_segment_all(); // Fill in side type and normals.
1236 for (i=0; i<Num_segments; i++) {
1237 if (Gamesave_current_version > 5)
1238 segment2_read(&Segment2s[i], LoadFile);
1239 fuelcen_activate( &Segments[i], Segment2s[i].special );
1242 reset_objects(1); //one object, the player