1 /* $Id: gamemine.c,v 1.34 2005-06-22 09:21:52 chris 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
26 static char rcsid[] = "$Id: gamemine.c,v 1.34 2005-06-22 09:21:52 chris Exp $";
51 #include "editor/editor.h"
64 #define REMOVE_EXT(s) (*(strchr( (s), '.' ))='\0')
66 fix Level_shake_frequency = 0, Level_shake_duration = 0;
67 int Secret_return_segment = 0;
68 vms_matrix Secret_return_orient;
71 struct mtfi mine_top_fileinfo; // Should be same as first two fields below...
72 struct mfi mine_fileinfo;
73 struct mh mine_header;
74 struct me mine_editor;
77 typedef struct v16_segment {
79 short segnum; // segment number, not sure what it means
81 side sides[MAX_SIDES_PER_SEGMENT]; // 6 sides
82 short children[MAX_SIDES_PER_SEGMENT]; // indices of 6 children segments, front, left, top, right, bottom, back
83 short verts[MAX_VERTICES_PER_SEGMENT]; // vertex ids of 4 front and 4 back vertices
85 short group; // group number to which the segment belongs.
87 short objects; // pointer to objects in this segment
88 ubyte special; // what type of center this is
89 sbyte matcen_num; // which center segment is associated with.
91 fix static_light; // average static light in segment
93 short pad; // make structure longword aligned
99 ushort fileinfo_signature;
100 ushort fileinfo_version;
102 int header_offset; // Stuff common to game & editor
104 int editor_offset; // Editor specific stuff
109 int newseg_verts_offset;
110 int newseg_verts_howmany;
111 int newseg_verts_sizeof;
125 int triggers_howmany;
130 int object_offset; // Object info
133 int unused_offset; // was: doors_offset
134 int unused_howmamy; // was: doors_howmany
135 int unused_sizeof; // was: doors_sizeof
136 short level_shake_frequency; // Shakes every level_shake_frequency seconds
137 short level_shake_duration; // for level_shake_duration seconds (on average, random). In 16ths second.
138 int secret_return_segment;
139 vms_matrix secret_return_orient;
141 int dl_indices_offset;
142 int dl_indices_howmany;
143 int dl_indices_sizeof;
145 int delta_light_offset;
146 int delta_light_howmany;
147 int delta_light_sizeof;
152 int CreateDefaultNewSegment();
154 int New_file_format_load = 1; // "new file format" is everything newer than d1 shareware
156 int d1_pig_present = 0; // can descent.pig from descent 1 be loaded?
158 /* returns nonzero if d1_tmap_num references a texture which isn't available in d2. */
159 int d1_tmap_num_unique(short d1_tmap_num) {
160 switch (d1_tmap_num) {
161 case 0: case 2: case 4: case 5: case 6: case 7: case 9:
162 case 10: case 11: case 12: case 17: case 18:
163 case 20: case 21: case 25: case 28:
164 case 38: case 39: case 41: case 44: case 49:
165 case 50: case 55: case 57: case 88:
166 case 132: case 141: case 147:
167 case 154: case 155: case 158: case 159:
168 case 160: case 161: case 167: case 168: case 169:
169 case 170: case 171: case 174: case 175: case 185:
170 case 193: case 194: case 195: case 198: case 199:
171 case 200: case 202: case 210: case 211:
172 case 220: case 226: case 227: case 228: case 229: case 230:
173 case 240: case 241: case 242: case 243: case 246:
174 case 250: case 251: case 252: case 253: case 257: case 258: case 259:
175 case 260: case 263: case 266: case 283: case 298:
176 case 315: case 317: case 319: case 320: case 321:
177 case 330: case 331: case 332: case 333: case 349:
178 case 351: case 352: case 353: case 354:
179 case 355: case 357: case 358: case 359:
180 case 362: case 370: return 1;
185 /* Converts descent 1 texture numbers to descent 2 texture numbers.
186 * Textures from d1 which are unique to d1 have extra spaces around "return".
187 * If we can load the original d1 pig, we make sure this function is bijective.
188 * This function was updated using the file config/convtabl.ini from devil 2.2.
190 short convert_d1_tmap_num(short d1_tmap_num) {
191 switch (d1_tmap_num) {
192 case 0: case 2: case 4: case 5:
193 // all refer to grey rock001 (exception to bijectivity rule)
194 return d1_pig_present ? 137 : 43; // (devil:95)
196 case 3: return 1; // rock021
197 case 6: return 270; // blue rock002
198 case 7: return 271; // yellow rock265
199 case 8: return 2; // rock004
200 case 9: return d1_pig_present ? 138 : 62; // purple (devil:179)
201 case 10: return 272; // red rock006
202 case 11: return d1_pig_present ? 139 : 117;
203 case 12: return d1_pig_present ? 140 : 12; //devil:43
204 case 13: return 3; // rock014
205 case 14: return 4; // rock019
206 case 15: return 5; // rock020
208 case 17: return d1_pig_present ? 141 : 52;
211 case 20: return d1_pig_present ? 142 : 22;
212 case 21: return d1_pig_present ? 143 : 9;
216 case 25: return d1_pig_present ? 144 : 12; //devil:35
219 case 28: return d1_pig_present ? 145 : 11; //devil:43
220 //range handled by default case, returns 13..21 (- 16)
221 case 38: return 163; //devil:27
222 case 39: return 147; //31
227 case 44: return 136; //devil:135
232 case 49: return d1_pig_present ? 146 : 43; //devil:60
233 case 50: return 131; //devil:138
238 case 55: return 165; //devil:193
240 case 57: return 132; //devil:119
241 // range handled by default case, returns 34..63 (- 24)
242 case 88: return 197; //devil:15
243 // range handled by default case, returns 64..106 (- 25)
244 case 132: return 167;
245 // range handled by default case, returns 107..114 (- 26)
246 case 141: return d1_pig_present ? 148 : 110; //devil:106
247 case 142: return 115;
248 case 143: return 116;
249 case 144: return 117;
250 case 145: return 118;
251 case 146: return 119;
252 case 147: return d1_pig_present ? 149 : 93;
253 case 148: return 120;
254 case 149: return 121;
255 case 150: return 122;
256 case 151: return 123;
257 case 152: return 124;
258 case 153: return 125; // rock263
259 case 154: return d1_pig_present ? 150 : 27;
260 case 155: return 126; // rock269
261 case 156: return 200; // metl002
262 case 157: return 201; // metl003
263 case 158: return 186; //devil:227
264 case 159: return 190; //devil:246
265 case 160: return d1_pig_present ? 151 : 206;
266 case 161: return d1_pig_present ? 152 : 114; //devil:206
267 case 162: return 202;
268 case 163: return 203;
269 case 164: return 204;
270 case 165: return 205;
271 case 166: return 206;
272 case 167: return d1_pig_present ? 153 : 206;
273 case 168: return d1_pig_present ? 154 : 206;
274 case 169: return d1_pig_present ? 155 : 206;
275 case 170: return d1_pig_present ? 156 : 227;//206;
276 case 171: return d1_pig_present ? 157 : 206;//227;
277 case 172: return 207;
278 case 173: return 208;
279 case 174: return d1_pig_present ? 158 : 202;
280 case 175: return d1_pig_present ? 159 : 206;
281 // range handled by default case, returns 209..217 (+ 33)
282 case 185: return d1_pig_present ? 160 : 217;
283 // range handled by default case, returns 218..224 (+ 32)
284 case 193: return d1_pig_present ? 161 : 206;
285 case 194: return d1_pig_present ? 162 : 203;//206;
286 case 195: return d1_pig_present ? 166 : 234;
287 case 196: return 225;
288 case 197: return 226;
289 case 198: return d1_pig_present ? 193 : 225;
290 case 199: return d1_pig_present ? 168 : 206; //devil:204
291 case 200: return d1_pig_present ? 169 : 206; //devil:204
292 case 201: return 227;
293 case 202: return d1_pig_present ? 170 : 206; //devil:227
294 // range handled by default case, returns 228..234 (+ 25)
295 case 210: return d1_pig_present ? 171 : 234; //devil:242
296 case 211: return d1_pig_present ? 172 : 206; //devil:240
297 // range handled by default case, returns 235..242 (+ 23)
298 case 220: return d1_pig_present ? 173 : 242; //devil:240
299 case 221: return 243;
300 case 222: return 244;
301 case 223: return d1_pig_present ? 174 : 313;
302 case 224: return 245;
303 case 225: return 246;
304 case 226: return 164;//247; matching names but not matching textures
305 case 227: return 179; //devil:181
306 case 228: return 196;//248; matching names but not matching textures
307 case 229: return d1_pig_present ? 175 : 15; //devil:66
308 case 230: return d1_pig_present ? 176 : 15; //devil:66
309 // range handled by default case, returns 249..257 (+ 18)
310 case 240: return d1_pig_present ? 177 : 6; //devil:132
311 case 241: return 130; //devil:131
312 case 242: return d1_pig_present ? 178 : 78; //devil:15
313 case 243: return d1_pig_present ? 180 : 33; //devil:38
314 case 244: return 258;
315 case 245: return 259;
316 case 246: return d1_pig_present ? 181 : 321; // grate metl127
317 case 247: return 260;
318 case 248: return 261;
319 case 249: return 262;
320 case 250: return 340; // white doorframe metl126
321 case 251: return 412; // red doorframe metl133
322 case 252: return 410; // blue doorframe metl134
323 case 253: return 411; // yellow doorframe metl135
324 case 254: return 263; // metl136
325 case 255: return 264; // metl139
326 case 256: return 265; // metl140
327 case 257: return d1_pig_present ? 182 : 249;//246; brig001
328 case 258: return d1_pig_present ? 183 : 251;//246; brig002
329 case 259: return d1_pig_present ? 184 : 252;//246; brig003
330 case 260: return d1_pig_present ? 185 : 256;//246; brig004
331 case 261: return 273; // exit01
332 case 262: return 274; // exit02
333 case 263: return d1_pig_present ? 187 : 281; // ceil001
334 case 264: return 275; // ceil002
335 case 265: return 276; // ceil003
336 case 266: return d1_pig_present ? 188 : 279; //devil:291
337 // range handled by default case, returns 277..291 (+ 10)
338 case 282: return 293;
339 case 283: return d1_pig_present ? 189 : 295;
340 case 284: return 295;
341 case 285: return 296;
342 case 286: return 298;
343 // range handled by default case, returns 300..310 (+ 13)
344 case 298: return d1_pig_present ? 191 : 364; // devil:374 misc010
345 // range handled by default case, returns 311..326 (+ 12)
346 case 315: return d1_pig_present ? 192 : 361; // bad producer misc044
347 // range handled by default case, returns 327..337 (+ 11)
348 case 327: return 352; // arw01
349 case 328: return 353; // misc17
350 case 329: return 354; // fan01
351 case 330: return 380; // mntr04
352 case 331: return 379;//373; matching names but not matching textures
353 case 332: return 355;//344; matching names but not matching textures
354 case 333: return 409; // lava misc11 //devil:404
355 case 334: return 356; // ctrl04
356 case 335: return 357; // ctrl01
357 case 336: return 358; // ctrl02
358 case 337: return 359; // ctrl03
359 case 338: return 360; // misc14
360 case 339: return 361; // producer misc16
361 case 340: return 362; // misc049
362 case 341: return 364; // misc060
363 case 342: return 363; // blown01
364 case 343: return 366; // misc061
365 case 344: return 365;
366 case 345: return 368;
367 case 346: return 376;
368 case 347: return 370;
369 case 348: return 367;
370 case 349: return 372;
371 case 350: return 369;
372 case 351: return 374;//429; matching names but not matching textures
373 case 352: return 375;//387; matching names but not matching textures
374 case 353: return 371;
375 case 354: return 377;//425; matching names but not matching textures
376 case 355: return 408;
377 case 356: return 378; // lava02
378 case 357: return 383;//384; matching names but not matching textures
379 case 358: return 384;//385; matching names but not matching textures
380 case 359: return 385;//386; matching names but not matching textures
381 case 360: return 386;
382 case 361: return 387;
383 case 362: return d1_pig_present ? 194 : 388; // mntr04b (devil: -1)
384 case 363: return 388;
385 case 364: return 391;
386 case 365: return 392;
387 case 366: return 393;
388 case 367: return 394;
389 case 368: return 395;
390 case 369: return 396;
391 case 370: return d1_pig_present ? 195 : 392; // mntr04d (devil: -1)
392 // range 371..584 handled by default case (wall01 and door frames)
395 if (d1_tmap_num >= 29 && d1_tmap_num <= 37)
396 return d1_tmap_num - 16;
397 if (d1_tmap_num >= 58 && d1_tmap_num <= 87)
398 return d1_tmap_num - 24;
399 if (d1_tmap_num >= 89 && d1_tmap_num <= 131)
400 return d1_tmap_num - 25;
401 if (d1_tmap_num >= 133 && d1_tmap_num <= 140)
402 return d1_tmap_num - 26;
403 if (d1_tmap_num >= 176 && d1_tmap_num <= 184)
404 return d1_tmap_num + 33;
405 if (d1_tmap_num >= 186 && d1_tmap_num <= 192)
406 return d1_tmap_num + 32;
407 if (d1_tmap_num >= 203 && d1_tmap_num <= 209)
408 return d1_tmap_num + 25;
409 if (d1_tmap_num >= 212 && d1_tmap_num <= 219)
410 return d1_tmap_num + 23;
411 if (d1_tmap_num >= 231 && d1_tmap_num <= 239)
412 return d1_tmap_num + 18;
413 if (d1_tmap_num >= 267 && d1_tmap_num <= 281)
414 return d1_tmap_num + 10;
415 if (d1_tmap_num >= 287 && d1_tmap_num <= 297)
416 return d1_tmap_num + 13;
417 if (d1_tmap_num >= 299 && d1_tmap_num <= 314)
418 return d1_tmap_num + 12;
419 if (d1_tmap_num >= 316 && d1_tmap_num <= 326)
420 return d1_tmap_num + 11; // matching names but not matching textures
421 // wall01 and door frames:
422 if (d1_tmap_num > 370 && d1_tmap_num < 584) {
423 if (New_file_format_load) return d1_tmap_num + 64;
424 // d1 shareware needs special treatment:
425 if (d1_tmap_num < 410) return d1_tmap_num + 68;
426 if (d1_tmap_num < 417) return d1_tmap_num + 73;
427 if (d1_tmap_num < 446) return d1_tmap_num + 91;
428 if (d1_tmap_num < 453) return d1_tmap_num + 104;
429 if (d1_tmap_num < 462) return d1_tmap_num + 111;
430 if (d1_tmap_num < 486) return d1_tmap_num + 117;
431 if (d1_tmap_num < 494) return d1_tmap_num + 141;
432 if (d1_tmap_num < 584) return d1_tmap_num + 147;
434 { // handle rare case where orientation != 0
435 short tmap_num = d1_tmap_num & TMAP_NUM_MASK;
436 short orient = d1_tmap_num & ~TMAP_NUM_MASK;
438 return orient | convert_d1_tmap_num(tmap_num);
440 Warning("can't convert unknown descent 1 texture #%d.\n", tmap_num);
449 static char old_tmap_list[MAX_TEXTURES][FILENAME_LEN];
450 short tmap_xlate_table[MAX_TEXTURES];
451 static short tmap_times_used[MAX_TEXTURES];
453 // -----------------------------------------------------------------------------
454 //loads from an already-open file
455 // returns 0=everything ok, 1=old version, -1=error
456 int load_mine_data(CFILE *LoadFile)
458 int i, j,oldsizeadjust;
462 int mine_start = cftell(LoadFile);
464 oldsizeadjust=(sizeof(int)*2)+sizeof (vms_matrix);
467 for (i=0; i<MAX_TEXTURES; i++ )
468 tmap_times_used[i] = 0;
471 // Create a new mine to initialize things.
472 //texpage_goto_first();
476 //===================== READ FILE INFO ========================
478 // These are the default values... version and fileinfo_sizeof
479 // don't have defaults.
480 mine_fileinfo.header_offset = -1;
481 mine_fileinfo.header_size = sizeof(mine_header);
482 mine_fileinfo.editor_offset = -1;
483 mine_fileinfo.editor_size = sizeof(mine_editor);
484 mine_fileinfo.vertex_offset = -1;
485 mine_fileinfo.vertex_howmany = 0;
486 mine_fileinfo.vertex_sizeof = sizeof(vms_vector);
487 mine_fileinfo.segment_offset = -1;
488 mine_fileinfo.segment_howmany = 0;
489 mine_fileinfo.segment_sizeof = sizeof(segment);
490 mine_fileinfo.newseg_verts_offset = -1;
491 mine_fileinfo.newseg_verts_howmany = 0;
492 mine_fileinfo.newseg_verts_sizeof = sizeof(vms_vector);
493 mine_fileinfo.group_offset = -1;
494 mine_fileinfo.group_howmany = 0;
495 mine_fileinfo.group_sizeof = sizeof(group);
496 mine_fileinfo.texture_offset = -1;
497 mine_fileinfo.texture_howmany = 0;
498 mine_fileinfo.texture_sizeof = FILENAME_LEN; // num characters in a name
499 mine_fileinfo.walls_offset = -1;
500 mine_fileinfo.walls_howmany = 0;
501 mine_fileinfo.walls_sizeof = sizeof(wall);
502 mine_fileinfo.triggers_offset = -1;
503 mine_fileinfo.triggers_howmany = 0;
504 mine_fileinfo.triggers_sizeof = sizeof(trigger);
505 mine_fileinfo.object_offset = -1;
506 mine_fileinfo.object_howmany = 1;
507 mine_fileinfo.object_sizeof = sizeof(object);
509 mine_fileinfo.level_shake_frequency = 0;
510 mine_fileinfo.level_shake_duration = 0;
512 // Delta light stuff for blowing out light sources.
513 // if (mine_top_fileinfo.fileinfo_version >= 19) {
514 mine_fileinfo.dl_indices_offset = -1;
515 mine_fileinfo.dl_indices_howmany = 0;
516 mine_fileinfo.dl_indices_sizeof = sizeof(dl_index);
518 mine_fileinfo.delta_light_offset = -1;
519 mine_fileinfo.delta_light_howmany = 0;
520 mine_fileinfo.delta_light_sizeof = sizeof(delta_light);
524 mine_fileinfo.segment2_offset = -1;
525 mine_fileinfo.segment2_howmany = 0;
526 mine_fileinfo.segment2_sizeof = sizeof(segment2);
528 // Read in mine_top_fileinfo to get size of saved fileinfo.
530 memset( &mine_top_fileinfo, 0, sizeof(mine_top_fileinfo) );
532 if (cfseek( LoadFile, mine_start, SEEK_SET ))
533 Error( "Error moving to top of file in gamemine.c" );
535 if (cfread( &mine_top_fileinfo, sizeof(mine_top_fileinfo), 1, LoadFile )!=1)
536 Error( "Error reading mine_top_fileinfo in gamemine.c" );
538 if (mine_top_fileinfo.fileinfo_signature != 0x2884)
541 // Check version number
542 if (mine_top_fileinfo.fileinfo_version < COMPATIBLE_VERSION )
545 // Now, Read in the fileinfo
546 if (cfseek( LoadFile, mine_start, SEEK_SET ))
547 Error( "Error seeking to top of file in gamemine.c" );
549 if (cfread( &mine_fileinfo, mine_top_fileinfo.fileinfo_sizeof, 1, LoadFile )!=1)
550 Error( "Error reading mine_fileinfo in gamemine.c" );
552 if (mine_top_fileinfo.fileinfo_version < 18) {
553 mprintf((1, "Old version, setting shake intensity to 0.\n"));
554 Level_shake_frequency = 0;
555 Level_shake_duration = 0;
556 Secret_return_segment = 0;
557 Secret_return_orient = vmd_identity_matrix;
559 Level_shake_frequency = mine_fileinfo.level_shake_frequency << 12;
560 Level_shake_duration = mine_fileinfo.level_shake_duration << 12;
561 Secret_return_segment = mine_fileinfo.secret_return_segment;
562 Secret_return_orient = mine_fileinfo.secret_return_orient;
565 //===================== READ HEADER INFO ========================
567 // Set default values.
568 mine_header.num_vertices = 0;
569 mine_header.num_segments = 0;
571 if (mine_fileinfo.header_offset > -1 )
573 if (cfseek( LoadFile, mine_fileinfo.header_offset, SEEK_SET ))
574 Error( "Error seeking to header_offset in gamemine.c" );
576 if (cfread( &mine_header, mine_fileinfo.header_size, 1, LoadFile )!=1)
577 Error( "Error reading mine_header in gamemine.c" );
580 //===================== READ EDITOR INFO ==========================
582 // Set default values
583 mine_editor.current_seg = 0;
584 mine_editor.newsegment_offset = -1; // To be written
585 mine_editor.newsegment_size = sizeof(segment);
586 mine_editor.Curside = 0;
587 mine_editor.Markedsegp = -1;
588 mine_editor.Markedside = 0;
590 if (mine_fileinfo.editor_offset > -1 )
592 if (cfseek( LoadFile, mine_fileinfo.editor_offset, SEEK_SET ))
593 Error( "Error seeking to editor_offset in gamemine.c" );
595 if (cfread( &mine_editor, mine_fileinfo.editor_size, 1, LoadFile )!=1)
596 Error( "Error reading mine_editor in gamemine.c" );
599 //===================== READ TEXTURE INFO ==========================
601 if ( (mine_fileinfo.texture_offset > -1) && (mine_fileinfo.texture_howmany > 0))
603 if (cfseek( LoadFile, mine_fileinfo.texture_offset, SEEK_SET ))
604 Error( "Error seeking to texture_offset in gamemine.c" );
606 for (i=0; i< mine_fileinfo.texture_howmany; i++ )
608 if (cfread( &old_tmap_list[i], mine_fileinfo.texture_sizeof, 1, LoadFile )!=1)
609 Error( "Error reading old_tmap_list[i] in gamemine.c" );
613 //=============== GENERATE TEXTURE TRANSLATION TABLE ===============
617 Assert (NumTextures < MAX_TEXTURES);
622 hashtable_init( &ht, NumTextures );
624 // Remove all the file extensions in the textures list
626 for (i=0;i<NumTextures;i++) {
627 temptr = strchr(TmapInfo[i].filename, '.');
628 if (temptr) *temptr = '\0';
629 hashtable_insert( &ht, TmapInfo[i].filename, i );
632 // For every texture, search through the texture list
633 // to find a matching name.
634 for (j=0;j<mine_fileinfo.texture_howmany;j++) {
635 // Remove this texture name's extension
636 temptr = strchr(old_tmap_list[j], '.');
637 if (temptr) *temptr = '\0';
639 tmap_xlate_table[j] = hashtable_search( &ht,old_tmap_list[j]);
640 if (tmap_xlate_table[j] < 0 ) {
641 //tmap_xlate_table[j] = 0;
642 // mprintf( (0, "Couldn't find texture '%s'\n", old_tmap_list[j] ));
645 if (tmap_xlate_table[j] != j ) translate = 1;
646 if (tmap_xlate_table[j] >= 0)
647 tmap_times_used[tmap_xlate_table[j]]++;
652 for (i=0; i<MAX_TEXTURES; i++ )
653 if (tmap_times_used[i])
655 mprintf( (0, "This mine has %d unique textures in it (~%d KB)\n", count, (count*4096) /1024 ));
658 // -- mprintf( (0, "Translate=%d\n", translate ));
660 hashtable_free( &ht );
663 //====================== READ VERTEX INFO ==========================
665 // New check added to make sure we don't read in too many vertices.
666 if ( mine_fileinfo.vertex_howmany > MAX_VERTICES )
668 mprintf((0, "Num vertices exceeds maximum. Loading MAX %d vertices\n", MAX_VERTICES));
669 mine_fileinfo.vertex_howmany = MAX_VERTICES;
672 if ( (mine_fileinfo.vertex_offset > -1) && (mine_fileinfo.vertex_howmany > 0))
674 if (cfseek( LoadFile, mine_fileinfo.vertex_offset, SEEK_SET ))
675 Error( "Error seeking to vertex_offset in gamemine.c" );
677 for (i=0; i< mine_fileinfo.vertex_howmany; i++ )
679 // Set the default values for this vertex
684 if (cfread( &Vertices[i], mine_fileinfo.vertex_sizeof, 1, LoadFile )!=1)
685 Error( "Error reading Vertices[i] in gamemine.c" );
689 //==================== READ SEGMENT INFO ===========================
691 // New check added to make sure we don't read in too many segments.
692 if ( mine_fileinfo.segment_howmany > MAX_SEGMENTS ) {
693 mprintf((0, "Num segments exceeds maximum. Loading MAX %d segments\n", MAX_SEGMENTS));
694 mine_fileinfo.segment_howmany = MAX_SEGMENTS;
695 mine_fileinfo.segment2_howmany = MAX_SEGMENTS;
698 // [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();
700 if ( (mine_fileinfo.segment_offset > -1) && (mine_fileinfo.segment_howmany > 0)) {
702 if (cfseek( LoadFile, mine_fileinfo.segment_offset,SEEK_SET ))
704 Error( "Error seeking to segment_offset in gamemine.c" );
706 Highest_segment_index = mine_fileinfo.segment_howmany-1;
708 for (i=0; i< mine_fileinfo.segment_howmany; i++ ) {
710 // Set the default values for this segment (clear to zero )
711 //memset( &Segments[i], 0, sizeof(segment) );
713 if (mine_top_fileinfo.fileinfo_version < 20) {
716 Assert(mine_fileinfo.segment_sizeof == sizeof(v16_seg));
718 if (cfread( &v16_seg, mine_fileinfo.segment_sizeof, 1, LoadFile )!=1)
719 Error( "Error reading segments in gamemine.c" );
722 Segments[i].segnum = v16_seg.segnum;
723 // -- Segments[i].pad = v16_seg.pad;
726 for (j=0; j<MAX_SIDES_PER_SEGMENT; j++)
727 Segments[i].sides[j] = v16_seg.sides[j];
729 for (j=0; j<MAX_SIDES_PER_SEGMENT; j++)
730 Segments[i].children[j] = v16_seg.children[j];
732 for (j=0; j<MAX_VERTICES_PER_SEGMENT; j++)
733 Segments[i].verts[j] = v16_seg.verts[j];
735 Segment2s[i].special = v16_seg.special;
736 Segment2s[i].value = v16_seg.value;
737 Segment2s[i].s2_flags = 0;
738 Segment2s[i].matcen_num = v16_seg.matcen_num;
739 Segment2s[i].static_light = v16_seg.static_light;
740 fuelcen_activate( &Segments[i], Segment2s[i].special );
743 if (cfread( &Segments[i], mine_fileinfo.segment_sizeof, 1, LoadFile )!=1)
744 Error("Unable to read segment %i\n", i);
747 Segments[i].objects = -1;
749 Segments[i].group = -1;
752 if (mine_top_fileinfo.fileinfo_version < 15) { //used old uvl ranges
755 for (sn=0;sn<MAX_SIDES_PER_SEGMENT;sn++)
756 for (uvln=0;uvln<4;uvln++) {
757 Segments[i].sides[sn].uvls[uvln].u /= 64;
758 Segments[i].sides[sn].uvls[uvln].v /= 64;
759 Segments[i].sides[sn].uvls[uvln].l /= 32;
764 for (j=0;j<MAX_SIDES_PER_SEGMENT;j++) {
765 unsigned short orient;
766 tmap_xlate = Segments[i].sides[j].tmap_num;
767 Segments[i].sides[j].tmap_num = tmap_xlate_table[tmap_xlate];
768 if ((WALL_IS_DOORWAY(&Segments[i],j) & WID_RENDER_FLAG))
769 if (Segments[i].sides[j].tmap_num < 0) {
770 mprintf( (0, "Couldn't find texture '%s' for Segment %d, side %d\n", old_tmap_list[tmap_xlate],i,j));
772 Segments[i].sides[j].tmap_num = NumTextures-1;
774 tmap_xlate = Segments[i].sides[j].tmap_num2 & TMAP_NUM_MASK;
775 orient = Segments[i].sides[j].tmap_num2 & (~TMAP_NUM_MASK);
776 if (tmap_xlate != 0) {
777 int xlated_tmap = tmap_xlate_table[tmap_xlate];
779 if ((WALL_IS_DOORWAY(&Segments[i],j) & WID_RENDER_FLAG))
780 if (xlated_tmap <= 0) {
781 mprintf( (0, "Couldn't find texture '%s' for Segment %d, side %d\n", old_tmap_list[tmap_xlate],i,j));
783 Segments[i].sides[j].tmap_num2 = NumTextures-1;
785 Segments[i].sides[j].tmap_num2 = xlated_tmap | orient;
791 if (mine_top_fileinfo.fileinfo_version >= 20)
792 for (i=0; i<=Highest_segment_index; i++) {
793 cfread(&Segment2s[i], sizeof(segment2), 1, LoadFile);
794 fuelcen_activate( &Segments[i], Segment2s[i].special );
798 //===================== READ NEWSEGMENT INFO =====================
802 { // Default segment created.
804 med_create_new_segment(vm_vec_make(&sizevec,DEFAULT_X_SIZE,DEFAULT_Y_SIZE,DEFAULT_Z_SIZE)); // New_segment = Segments[0];
805 //memset( &New_segment, 0, sizeof(segment) );
808 if (mine_editor.newsegment_offset > -1)
810 if (cfseek( LoadFile, mine_editor.newsegment_offset,SEEK_SET ))
811 Error( "Error seeking to newsegment_offset in gamemine.c" );
812 if (cfread( &New_segment, mine_editor.newsegment_size,1,LoadFile )!=1)
813 Error( "Error reading new_segment in gamemine.c" );
816 if ( (mine_fileinfo.newseg_verts_offset > -1) && (mine_fileinfo.newseg_verts_howmany > 0))
818 if (cfseek( LoadFile, mine_fileinfo.newseg_verts_offset, SEEK_SET ))
819 Error( "Error seeking to newseg_verts_offset in gamemine.c" );
820 for (i=0; i< mine_fileinfo.newseg_verts_howmany; i++ )
822 // Set the default values for this vertex
823 Vertices[NEW_SEGMENT_VERTICES+i].x = 1;
824 Vertices[NEW_SEGMENT_VERTICES+i].y = 1;
825 Vertices[NEW_SEGMENT_VERTICES+i].z = 1;
827 if (cfread( &Vertices[NEW_SEGMENT_VERTICES+i], mine_fileinfo.newseg_verts_sizeof,1,LoadFile )!=1)
828 Error( "Error reading Vertices[NEW_SEGMENT_VERTICES+i] in gamemine.c" );
830 New_segment.verts[i] = NEW_SEGMENT_VERTICES+i;
836 //========================= UPDATE VARIABLES ======================
840 // Setting to Markedsegp to NULL ignores Curside and Markedside, which
841 // we want to do when reading in an old file.
843 Markedside = mine_editor.Markedside;
844 Curside = mine_editor.Curside;
846 Groupside[i] = mine_editor.Groupside[i];
848 if ( mine_editor.current_seg != -1 )
849 Cursegp = &Segments[mine_editor.current_seg];
853 if (mine_editor.Markedsegp != -1 )
854 Markedsegp = &Segments[mine_editor.Markedsegp];
863 Num_vertices = mine_fileinfo.vertex_howmany;
864 Num_segments = mine_fileinfo.segment_howmany;
865 Highest_vertex_index = Num_vertices-1;
866 Highest_segment_index = Num_segments-1;
868 reset_objects(1); //one object, the player
871 Highest_vertex_index = MAX_SEGMENT_VERTICES-1;
872 Highest_segment_index = MAX_SEGMENTS-1;
874 Highest_vertex_index = Num_vertices-1;
875 Highest_segment_index = Num_segments-1;
877 warn_if_concave_segments();
881 validate_segment_all();
884 //create_local_segment_data();
886 //gamemine_find_textures();
888 if (mine_top_fileinfo.fileinfo_version < MINE_VERSION )
889 return 1; //old version
896 #define COMPILED_MINE_VERSION 0
898 void read_children(int segnum,ubyte bit_mask,CFILE *LoadFile)
902 for (bit=0; bit<MAX_SIDES_PER_SEGMENT; bit++) {
903 if (bit_mask & (1 << bit)) {
904 Segments[segnum].children[bit] = cfile_read_short(LoadFile);
906 Segments[segnum].children[bit] = -1;
910 void read_verts(int segnum,CFILE *LoadFile)
913 // Read short Segments[segnum].verts[MAX_VERTICES_PER_SEGMENT]
914 for (i = 0; i < MAX_VERTICES_PER_SEGMENT; i++)
915 Segments[segnum].verts[i] = cfile_read_short(LoadFile);
918 void read_special(int segnum,ubyte bit_mask,CFILE *LoadFile)
920 if (bit_mask & (1 << MAX_SIDES_PER_SEGMENT)) {
921 // Read ubyte Segment2s[segnum].special
922 Segment2s[segnum].special = cfile_read_byte(LoadFile);
923 // Read byte Segment2s[segnum].matcen_num
924 Segment2s[segnum].matcen_num = cfile_read_byte(LoadFile);
925 // Read short Segment2s[segnum].value
926 Segment2s[segnum].value = cfile_read_short(LoadFile);
928 Segment2s[segnum].special = 0;
929 Segment2s[segnum].matcen_num = -1;
930 Segment2s[segnum].value = 0;
934 int load_mine_data_compiled(CFILE *LoadFile)
936 int i, segnum, sidenum;
937 ubyte compiled_version;
939 ushort temp_ushort = 0;
942 d1_pig_present = cfexist(D1_PIGFILE);
943 #if 0 // the following will be deleted once reading old pigfiles works reliably
944 if (d1_pig_present) {
945 CFILE * d1_Piggy_fp = cfopen( D1_PIGFILE, "rb" );
946 switch (cfilelength(d1_Piggy_fp)) {
947 case D1_SHARE_BIG_PIGSIZE:
948 case D1_SHARE_10_PIGSIZE:
949 case D1_SHARE_PIGSIZE:
950 case D1_10_BIG_PIGSIZE:
952 //d1_pig_present = 0;
954 cfclose (d1_Piggy_fp);
958 if (!strcmp(strchr(Gamesave_current_filename, '.'), ".sdl"))
959 New_file_format_load = 0; // descent 1 shareware
961 New_file_format_load = 1;
963 // For compiled levels, textures map to themselves, prevent tmap_override always being gray,
964 // bug which Matt and John refused to acknowledge, so here is Mike, fixing it.
966 for (i=0; i<MAX_TEXTURES; i++)
967 tmap_xlate_table[i] = i;
970 // memset( Segments, 0, sizeof(segment)*MAX_SEGMENTS );
973 //=============================== Reading part ==============================
974 compiled_version = cfile_read_byte(LoadFile);
975 //Assert( compiled_version==COMPILED_MINE_VERSION );
976 if (compiled_version!=COMPILED_MINE_VERSION)
977 mprintf((0,"compiled mine version=%i\n", compiled_version)); //many levels have "wrong" versions. Theres no point in aborting because of it, I think.
979 if (New_file_format_load)
980 Num_vertices = cfile_read_short(LoadFile);
982 Num_vertices = cfile_read_int(LoadFile);
983 Assert( Num_vertices <= MAX_VERTICES );
985 if (New_file_format_load)
986 Num_segments = cfile_read_short(LoadFile);
988 Num_segments = cfile_read_int(LoadFile);
989 Assert( Num_segments <= MAX_SEGMENTS );
991 for (i = 0; i < Num_vertices; i++)
992 cfile_read_vector( &(Vertices[i]), LoadFile);
994 for (segnum=0; segnum<Num_segments; segnum++ ) {
997 Segments[segnum].segnum = segnum;
998 Segments[segnum].group = 0;
1001 if (New_file_format_load)
1002 bit_mask = cfile_read_byte(LoadFile);
1004 bit_mask = 0x7f; // read all six children and special stuff...
1006 if (Gamesave_current_version == 5) { // d2 SHAREWARE level
1007 read_special(segnum,bit_mask,LoadFile);
1008 read_verts(segnum,LoadFile);
1009 read_children(segnum,bit_mask,LoadFile);
1011 read_children(segnum,bit_mask,LoadFile);
1012 read_verts(segnum,LoadFile);
1013 if (Gamesave_current_version <= 1) { // descent 1 level
1014 read_special(segnum,bit_mask,LoadFile);
1018 Segments[segnum].objects = -1;
1020 if (Gamesave_current_version <= 5) { // descent 1 thru d2 SHAREWARE level
1021 // Read fix Segments[segnum].static_light (shift down 5 bits, write as short)
1022 temp_ushort = cfile_read_short(LoadFile);
1023 Segment2s[segnum].static_light = ((fix)temp_ushort) << 4;
1024 //cfread( &Segments[segnum].static_light, sizeof(fix), 1, LoadFile );
1027 // Read the walls as a 6 byte array
1028 for (sidenum=0; sidenum<MAX_SIDES_PER_SEGMENT; sidenum++ ) {
1029 Segments[segnum].sides[sidenum].pad = 0;
1032 if (New_file_format_load)
1033 bit_mask = cfile_read_byte(LoadFile);
1035 bit_mask = 0x3f; // read all six sides
1036 for (sidenum=0; sidenum<MAX_SIDES_PER_SEGMENT; sidenum++) {
1039 if (bit_mask & (1 << sidenum)) {
1040 byte_wallnum = cfile_read_byte(LoadFile);
1041 if ( byte_wallnum == 255 )
1042 Segments[segnum].sides[sidenum].wall_num = -1;
1044 Segments[segnum].sides[sidenum].wall_num = byte_wallnum;
1046 Segments[segnum].sides[sidenum].wall_num = -1;
1049 for (sidenum=0; sidenum<MAX_SIDES_PER_SEGMENT; sidenum++ ) {
1051 if ( (Segments[segnum].children[sidenum]==-1) || (Segments[segnum].sides[sidenum].wall_num!=-1) ) {
1052 // Read short Segments[segnum].sides[sidenum].tmap_num;
1053 if (New_file_format_load) {
1054 temp_ushort = cfile_read_short(LoadFile);
1055 Segments[segnum].sides[sidenum].tmap_num = temp_ushort & 0x7fff;
1057 Segments[segnum].sides[sidenum].tmap_num = cfile_read_short(LoadFile);
1059 if (Gamesave_current_version <= 1)
1060 Segments[segnum].sides[sidenum].tmap_num = convert_d1_tmap_num(Segments[segnum].sides[sidenum].tmap_num);
1062 if (New_file_format_load && !(temp_ushort & 0x8000))
1063 Segments[segnum].sides[sidenum].tmap_num2 = 0;
1065 // Read short Segments[segnum].sides[sidenum].tmap_num2;
1066 Segments[segnum].sides[sidenum].tmap_num2 = cfile_read_short(LoadFile);
1067 if (Gamesave_current_version <= 1 && Segments[segnum].sides[sidenum].tmap_num2 != 0)
1068 Segments[segnum].sides[sidenum].tmap_num2 = convert_d1_tmap_num(Segments[segnum].sides[sidenum].tmap_num2);
1071 // Read uvl Segments[segnum].sides[sidenum].uvls[4] (u,v>>5, write as short, l>>1 write as short)
1072 for (i=0; i<4; i++ ) {
1073 temp_short = cfile_read_short(LoadFile);
1074 Segments[segnum].sides[sidenum].uvls[i].u = ((fix)temp_short) << 5;
1075 temp_short = cfile_read_short(LoadFile);
1076 Segments[segnum].sides[sidenum].uvls[i].v = ((fix)temp_short) << 5;
1077 temp_ushort = cfile_read_short(LoadFile);
1078 Segments[segnum].sides[sidenum].uvls[i].l = ((fix)temp_ushort) << 1;
1079 //cfread( &Segments[segnum].sides[sidenum].uvls[i].l, sizeof(fix), 1, LoadFile );
1082 Segments[segnum].sides[sidenum].tmap_num = 0;
1083 Segments[segnum].sides[sidenum].tmap_num2 = 0;
1084 for (i=0; i<4; i++ ) {
1085 Segments[segnum].sides[sidenum].uvls[i].u = 0;
1086 Segments[segnum].sides[sidenum].uvls[i].v = 0;
1087 Segments[segnum].sides[sidenum].uvls[i].l = 0;
1097 fp = fopen("segments.out", "wt");
1098 for (i = 0; i <= Highest_segment_index; i++) {
1099 side sides[MAX_SIDES_PER_SEGMENT]; // 6 sides
1100 short children[MAX_SIDES_PER_SEGMENT]; // indices of 6 children segments, front, left, top, right, bottom, back
1101 short verts[MAX_VERTICES_PER_SEGMENT]; // vertex ids of 4 front and 4 back vertices
1102 int objects; // pointer to objects in this segment
1104 for (j = 0; j < MAX_SIDES_PER_SEGMENT; j++) {
1105 sbyte type; // replaces num_faces and tri_edge, 1 = quad, 2 = 0:2 triangulation, 3 = 1:3 triangulation
1106 ubyte pad; //keep us longword alligned
1111 vms_vector normals[2]; // 2 normals, if quadrilateral, both the same.
1112 fprintf(fp, "%d\n", Segments[i].sides[j].type);
1113 fprintf(fp, "%d\n", Segments[i].sides[j].pad);
1114 fprintf(fp, "%d\n", Segments[i].sides[j].wall_num);
1115 fprintf(fp, "%d\n", Segments[i].tmap_num);
1123 Highest_vertex_index = Num_vertices-1;
1124 Highest_segment_index = Num_segments-1;
1126 validate_segment_all(); // Fill in side type and normals.
1128 for (i=0; i<Num_segments; i++) {
1129 if (Gamesave_current_version > 5)
1130 segment2_read(&Segment2s[i], LoadFile);
1131 fuelcen_activate( &Segments[i], Segment2s[i].special );
1134 reset_objects(1); //one object, the player