dxx-rebirth/similar/main/gamemine.cpp
2013-12-19 03:31:24 +00:00

1048 lines
35 KiB
C++

/*
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.
*/
/*
*
* Functions for loading mines in the game
*
*/
#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#include <string.h>
#include "pstypes.h"
#include "inferno.h"
#include "segment.h"
#include "textures.h"
#include "wall.h"
#include "object.h"
#include "gamemine.h"
#include "dxxerror.h"
#include "gameseg.h"
#include "switch.h"
#include "game.h"
#include "newmenu.h"
#ifdef EDITOR
#include "editor/editor.h"
#include "editor/esegment.h"
#endif
#include "fuelcen.h"
#include "hash.h"
#include "key.h"
#include "piggy.h"
#include "byteswap.h"
#include "gamesave.h"
#define REMOVE_EXT(s) (*(strchr( (s), '.' ))='\0')
int New_file_format_load = 1; // "new file format" is everything newer than d1 shareware
#if defined(DXX_BUILD_DESCENT_I)
typedef segment v16_segment;
#elif defined(DXX_BUILD_DESCENT_II)
fix Level_shake_frequency = 0, Level_shake_duration = 0;
int Secret_return_segment = 0;
vms_matrix Secret_return_orient;
typedef struct v16_segment {
#ifdef EDITOR
short segnum; // segment number, not sure what it means
#endif
side sides[MAX_SIDES_PER_SEGMENT]; // 6 sides
short children[MAX_SIDES_PER_SEGMENT]; // indices of 6 children segments, front, left, top, right, bottom, back
short verts[MAX_VERTICES_PER_SEGMENT]; // vertex ids of 4 front and 4 back vertices
#ifdef EDITOR
short group; // group number to which the segment belongs.
#endif
short objects; // pointer to objects in this segment
ubyte special; // what type of center this is
sbyte matcen_num; // which center segment is associated with.
short value;
fix static_light; // average static light in segment
#ifndef EDITOR
short pad; // make structure longword aligned
#endif
} v16_segment;
int d1_pig_present = 0; // can descent.pig from descent 1 be loaded?
/* returns nonzero if d1_tmap_num references a texture which isn't available in d2. */
int d1_tmap_num_unique(short d1_tmap_num) {
switch (d1_tmap_num) {
case 0: case 2: case 4: case 5: case 6: case 7: case 9:
case 10: case 11: case 12: case 17: case 18:
case 20: case 21: case 25: case 28:
case 38: case 39: case 41: case 44: case 49:
case 50: case 55: case 57: case 88:
case 132: case 141: case 147:
case 154: case 155: case 158: case 159:
case 160: case 161: case 167: case 168: case 169:
case 170: case 171: case 174: case 175: case 185:
case 193: case 194: case 195: case 198: case 199:
case 200: case 202: case 210: case 211:
case 220: case 226: case 227: case 228: case 229: case 230:
case 240: case 241: case 242: case 243: case 246:
case 250: case 251: case 252: case 253: case 257: case 258: case 259:
case 260: case 263: case 266: case 283: case 298:
case 315: case 317: case 319: case 320: case 321:
case 330: case 331: case 332: case 333: case 349:
case 351: case 352: case 353: case 354:
case 355: case 357: case 358: case 359:
case 362: case 370: return 1;
default: return 0;
}
}
/* Converts descent 1 texture numbers to descent 2 texture numbers.
* Textures from d1 which are unique to d1 have extra spaces around "return".
* If we can load the original d1 pig, we make sure this function is bijective.
* This function was updated using the file config/convtabl.ini from devil 2.2.
*/
short convert_d1_tmap_num(short d1_tmap_num) {
switch (d1_tmap_num) {
case 0: case 2: case 4: case 5:
// all refer to grey rock001 (exception to bijectivity rule)
return d1_pig_present ? 137 : 43; // (devil:95)
case 1: return 0;
case 3: return 1; // rock021
case 6: return 270; // blue rock002
case 7: return 271; // yellow rock265
case 8: return 2; // rock004
case 9: return d1_pig_present ? 138 : 62; // purple (devil:179)
case 10: return 272; // red rock006
case 11: return d1_pig_present ? 139 : 117;
case 12: return d1_pig_present ? 140 : 12; //devil:43
case 13: return 3; // rock014
case 14: return 4; // rock019
case 15: return 5; // rock020
case 16: return 6;
case 17: return d1_pig_present ? 141 : 52;
case 18: return 129;
case 19: return 7;
case 20: return d1_pig_present ? 142 : 22;
case 21: return d1_pig_present ? 143 : 9;
case 22: return 8;
case 23: return 9;
case 24: return 10;
case 25: return d1_pig_present ? 144 : 12; //devil:35
case 26: return 11;
case 27: return 12;
case 28: return d1_pig_present ? 145 : 11; //devil:43
//range handled by default case, returns 13..21 (- 16)
case 38: return 163; //devil:27
case 39: return 147; //31
case 40: return 22;
case 41: return 266;
case 42: return 23;
case 43: return 24;
case 44: return 136; //devil:135
case 45: return 25;
case 46: return 26;
case 47: return 27;
case 48: return 28;
case 49: return d1_pig_present ? 146 : 43; //devil:60
case 50: return 131; //devil:138
case 51: return 29;
case 52: return 30;
case 53: return 31;
case 54: return 32;
case 55: return 165; //devil:193
case 56: return 33;
case 57: return 132; //devil:119
// range handled by default case, returns 34..63 (- 24)
case 88: return 197; //devil:15
// range handled by default case, returns 64..106 (- 25)
case 132: return 167;
// range handled by default case, returns 107..114 (- 26)
case 141: return d1_pig_present ? 148 : 110; //devil:106
case 142: return 115;
case 143: return 116;
case 144: return 117;
case 145: return 118;
case 146: return 119;
case 147: return d1_pig_present ? 149 : 93;
case 148: return 120;
case 149: return 121;
case 150: return 122;
case 151: return 123;
case 152: return 124;
case 153: return 125; // rock263
case 154: return d1_pig_present ? 150 : 27;
case 155: return 126; // rock269
case 156: return 200; // metl002
case 157: return 201; // metl003
case 158: return 186; //devil:227
case 159: return 190; //devil:246
case 160: return d1_pig_present ? 151 : 206;
case 161: return d1_pig_present ? 152 : 114; //devil:206
case 162: return 202;
case 163: return 203;
case 164: return 204;
case 165: return 205;
case 166: return 206;
case 167: return d1_pig_present ? 153 : 206;
case 168: return d1_pig_present ? 154 : 206;
case 169: return d1_pig_present ? 155 : 206;
case 170: return d1_pig_present ? 156 : 227;//206;
case 171: return d1_pig_present ? 157 : 206;//227;
case 172: return 207;
case 173: return 208;
case 174: return d1_pig_present ? 158 : 202;
case 175: return d1_pig_present ? 159 : 206;
// range handled by default case, returns 209..217 (+ 33)
case 185: return d1_pig_present ? 160 : 217;
// range handled by default case, returns 218..224 (+ 32)
case 193: return d1_pig_present ? 161 : 206;
case 194: return d1_pig_present ? 162 : 203;//206;
case 195: return d1_pig_present ? 166 : 234;
case 196: return 225;
case 197: return 226;
case 198: return d1_pig_present ? 193 : 225;
case 199: return d1_pig_present ? 168 : 206; //devil:204
case 200: return d1_pig_present ? 169 : 206; //devil:204
case 201: return 227;
case 202: return d1_pig_present ? 170 : 206; //devil:227
// range handled by default case, returns 228..234 (+ 25)
case 210: return d1_pig_present ? 171 : 234; //devil:242
case 211: return d1_pig_present ? 172 : 206; //devil:240
// range handled by default case, returns 235..242 (+ 23)
case 220: return d1_pig_present ? 173 : 242; //devil:240
case 221: return 243;
case 222: return 244;
case 223: return d1_pig_present ? 174 : 313;
case 224: return 245;
case 225: return 246;
case 226: return 164;//247; matching names but not matching textures
case 227: return 179; //devil:181
case 228: return 196;//248; matching names but not matching textures
case 229: return d1_pig_present ? 175 : 15; //devil:66
case 230: return d1_pig_present ? 176 : 15; //devil:66
// range handled by default case, returns 249..257 (+ 18)
case 240: return d1_pig_present ? 177 : 6; //devil:132
case 241: return 130; //devil:131
case 242: return d1_pig_present ? 178 : 78; //devil:15
case 243: return d1_pig_present ? 180 : 33; //devil:38
case 244: return 258;
case 245: return 259;
case 246: return d1_pig_present ? 181 : 321; // grate metl127
case 247: return 260;
case 248: return 261;
case 249: return 262;
case 250: return 340; // white doorframe metl126
case 251: return 412; // red doorframe metl133
case 252: return 410; // blue doorframe metl134
case 253: return 411; // yellow doorframe metl135
case 254: return 263; // metl136
case 255: return 264; // metl139
case 256: return 265; // metl140
case 257: return d1_pig_present ? 182 : 249;//246; brig001
case 258: return d1_pig_present ? 183 : 251;//246; brig002
case 259: return d1_pig_present ? 184 : 252;//246; brig003
case 260: return d1_pig_present ? 185 : 256;//246; brig004
case 261: return 273; // exit01
case 262: return 274; // exit02
case 263: return d1_pig_present ? 187 : 281; // ceil001
case 264: return 275; // ceil002
case 265: return 276; // ceil003
case 266: return d1_pig_present ? 188 : 279; //devil:291
// range handled by default case, returns 277..291 (+ 10)
case 282: return 293;
case 283: return d1_pig_present ? 189 : 295;
case 284: return 295;
case 285: return 296;
case 286: return 298;
// range handled by default case, returns 300..310 (+ 13)
case 298: return d1_pig_present ? 191 : 364; // devil:374 misc010
// range handled by default case, returns 311..326 (+ 12)
case 315: return d1_pig_present ? 192 : 361; // bad producer misc044
// range handled by default case, returns 327..337 (+ 11)
case 327: return 352; // arw01
case 328: return 353; // misc17
case 329: return 354; // fan01
case 330: return 380; // mntr04
case 331: return 379;//373; matching names but not matching textures
case 332: return 355;//344; matching names but not matching textures
case 333: return 409; // lava misc11 //devil:404
case 334: return 356; // ctrl04
case 335: return 357; // ctrl01
case 336: return 358; // ctrl02
case 337: return 359; // ctrl03
case 338: return 360; // misc14
case 339: return 361; // producer misc16
case 340: return 362; // misc049
case 341: return 364; // misc060
case 342: return 363; // blown01
case 343: return 366; // misc061
case 344: return 365;
case 345: return 368;
case 346: return 376;
case 347: return 370;
case 348: return 367;
case 349: return 372;
case 350: return 369;
case 351: return 374;//429; matching names but not matching textures
case 352: return 375;//387; matching names but not matching textures
case 353: return 371;
case 354: return 377;//425; matching names but not matching textures
case 355: return 408;
case 356: return 378; // lava02
case 357: return 383;//384; matching names but not matching textures
case 358: return 384;//385; matching names but not matching textures
case 359: return 385;//386; matching names but not matching textures
case 360: return 386;
case 361: return 387;
case 362: return d1_pig_present ? 194 : 388; // mntr04b (devil: -1)
case 363: return 388;
case 364: return 391;
case 365: return 392;
case 366: return 393;
case 367: return 394;
case 368: return 395;
case 369: return 396;
case 370: return d1_pig_present ? 195 : 392; // mntr04d (devil: -1)
// range 371..584 handled by default case (wall01 and door frames)
default:
// ranges:
if (d1_tmap_num >= 29 && d1_tmap_num <= 37)
return d1_tmap_num - 16;
if (d1_tmap_num >= 58 && d1_tmap_num <= 87)
return d1_tmap_num - 24;
if (d1_tmap_num >= 89 && d1_tmap_num <= 131)
return d1_tmap_num - 25;
if (d1_tmap_num >= 133 && d1_tmap_num <= 140)
return d1_tmap_num - 26;
if (d1_tmap_num >= 176 && d1_tmap_num <= 184)
return d1_tmap_num + 33;
if (d1_tmap_num >= 186 && d1_tmap_num <= 192)
return d1_tmap_num + 32;
if (d1_tmap_num >= 203 && d1_tmap_num <= 209)
return d1_tmap_num + 25;
if (d1_tmap_num >= 212 && d1_tmap_num <= 219)
return d1_tmap_num + 23;
if (d1_tmap_num >= 231 && d1_tmap_num <= 239)
return d1_tmap_num + 18;
if (d1_tmap_num >= 267 && d1_tmap_num <= 281)
return d1_tmap_num + 10;
if (d1_tmap_num >= 287 && d1_tmap_num <= 297)
return d1_tmap_num + 13;
if (d1_tmap_num >= 299 && d1_tmap_num <= 314)
return d1_tmap_num + 12;
if (d1_tmap_num >= 316 && d1_tmap_num <= 326)
return d1_tmap_num + 11; // matching names but not matching textures
// wall01 and door frames:
if (d1_tmap_num > 370 && d1_tmap_num < 584) {
if (New_file_format_load) return d1_tmap_num + 64;
// d1 shareware needs special treatment:
if (d1_tmap_num < 410) return d1_tmap_num + 68;
if (d1_tmap_num < 417) return d1_tmap_num + 73;
if (d1_tmap_num < 446) return d1_tmap_num + 91;
if (d1_tmap_num < 453) return d1_tmap_num + 104;
if (d1_tmap_num < 462) return d1_tmap_num + 111;
if (d1_tmap_num < 486) return d1_tmap_num + 117;
if (d1_tmap_num < 494) return d1_tmap_num + 141;
if (d1_tmap_num < 584) return d1_tmap_num + 147;
}
{ // handle rare case where orientation != 0
short tmap_num = d1_tmap_num & TMAP_NUM_MASK;
short orient = d1_tmap_num & ~TMAP_NUM_MASK;
if (orient != 0) {
return orient | convert_d1_tmap_num(tmap_num);
} else {
Warning("can't convert unknown descent 1 texture #%d.\n", tmap_num);
return d1_tmap_num;
}
}
}
}
#endif
#ifdef EDITOR
short tmap_xlate_table[MAX_TEXTURES];
struct mtfi mine_top_fileinfo; // Should be same as first two fields below...
struct mfi mine_fileinfo;
struct mh mine_header;
struct me mine_editor;
// -----------------------------------------------------------------------------
//loads from an already-open file
// returns 0=everything ok, 1=old version, -1=error
int load_mine_data(PHYSFS_file *LoadFile)
{
char old_tmap_list[MAX_TEXTURES][FILENAME_LEN];
short tmap_times_used[MAX_TEXTURES];
int i, j;
short tmap_xlate;
int translate;
char *temptr;
int mine_start = PHYSFS_tell(LoadFile);
fuelcen_reset();
for (i=0; i < sizeof(tmap_times_used)/sizeof(tmap_times_used[0]); i++ )
tmap_times_used[i] = 0;
#ifdef EDITOR
// Create a new mine to initialize things.
//texpage_goto_first();
create_new_mine();
#endif
//===================== READ FILE INFO ========================
// These are the default values... version and fileinfo_sizeof
// don't have defaults.
mine_fileinfo.header_offset = -1;
mine_fileinfo.header_size = sizeof(mine_header);
mine_fileinfo.editor_offset = -1;
mine_fileinfo.editor_size = sizeof(mine_editor);
mine_fileinfo.vertex_offset = -1;
mine_fileinfo.vertex_howmany = 0;
mine_fileinfo.vertex_sizeof = sizeof(vms_vector);
mine_fileinfo.segment_offset = -1;
mine_fileinfo.segment_howmany = 0;
mine_fileinfo.segment_sizeof = sizeof(segment);
mine_fileinfo.newseg_verts_offset = -1;
mine_fileinfo.newseg_verts_howmany = 0;
mine_fileinfo.newseg_verts_sizeof = sizeof(vms_vector);
mine_fileinfo.group_offset = -1;
mine_fileinfo.group_howmany = 0;
mine_fileinfo.group_sizeof = sizeof(group);
mine_fileinfo.texture_offset = -1;
mine_fileinfo.texture_howmany = 0;
mine_fileinfo.texture_sizeof = FILENAME_LEN; // num characters in a name
mine_fileinfo.walls_offset = -1;
mine_fileinfo.walls_howmany = 0;
mine_fileinfo.walls_sizeof = sizeof(wall);
mine_fileinfo.triggers_offset = -1;
mine_fileinfo.triggers_howmany = 0;
mine_fileinfo.triggers_sizeof = sizeof(trigger);
mine_fileinfo.object_offset = -1;
mine_fileinfo.object_howmany = 1;
mine_fileinfo.object_sizeof = sizeof(object);
#if defined(DXX_BUILD_DESCENT_II)
mine_fileinfo.level_shake_frequency = 0;
mine_fileinfo.level_shake_duration = 0;
// Delta light stuff for blowing out light sources.
// if (mine_top_fileinfo.fileinfo_version >= 19) {
mine_fileinfo.dl_indices_offset = -1;
mine_fileinfo.dl_indices_howmany = 0;
mine_fileinfo.dl_indices_sizeof = sizeof(dl_index);
mine_fileinfo.delta_light_offset = -1;
mine_fileinfo.delta_light_howmany = 0;
mine_fileinfo.delta_light_sizeof = sizeof(delta_light);
// }
mine_fileinfo.segment2_offset = -1;
mine_fileinfo.segment2_howmany = 0;
mine_fileinfo.segment2_sizeof = sizeof(segment2);
#endif
// Read in mine_top_fileinfo to get size of saved fileinfo.
memset( &mine_top_fileinfo, 0, sizeof(mine_top_fileinfo) );
if (PHYSFSX_fseek( LoadFile, mine_start, SEEK_SET ))
Error( "Error moving to top of file in gamemine.c" );
if (PHYSFS_read( LoadFile, &mine_top_fileinfo, sizeof(mine_top_fileinfo), 1 )!=1)
Error( "Error reading mine_top_fileinfo in gamemine.c" );
if (mine_top_fileinfo.fileinfo_signature != 0x2884)
return -1;
// Check version number
if (mine_top_fileinfo.fileinfo_version < COMPATIBLE_VERSION )
return -1;
// Now, Read in the fileinfo
if (PHYSFSX_fseek( LoadFile, mine_start, SEEK_SET ))
Error( "Error seeking to top of file in gamemine.c" );
if (PHYSFS_read( LoadFile, &mine_fileinfo, mine_top_fileinfo.fileinfo_sizeof, 1 )!=1)
Error( "Error reading mine_fileinfo in gamemine.c" );
#if defined(DXX_BUILD_DESCENT_II)
if (mine_top_fileinfo.fileinfo_version < 18) {
Level_shake_frequency = 0;
Level_shake_duration = 0;
Secret_return_segment = 0;
Secret_return_orient = vmd_identity_matrix;
} else {
Level_shake_frequency = mine_fileinfo.level_shake_frequency << 12;
Level_shake_duration = mine_fileinfo.level_shake_duration << 12;
Secret_return_segment = mine_fileinfo.secret_return_segment;
Secret_return_orient = mine_fileinfo.secret_return_orient;
}
#endif
//===================== READ HEADER INFO ========================
// Set default values.
mine_header.num_vertices = 0;
mine_header.num_segments = 0;
if (mine_fileinfo.header_offset > -1 )
{
if (PHYSFSX_fseek( LoadFile, mine_fileinfo.header_offset, SEEK_SET ))
Error( "Error seeking to header_offset in gamemine.c" );
if (PHYSFS_read( LoadFile, &mine_header, mine_fileinfo.header_size, 1 )!=1)
Error( "Error reading mine_header in gamemine.c" );
}
//===================== READ EDITOR INFO ==========================
// Set default values
mine_editor.current_seg = 0;
mine_editor.newsegment_offset = -1; // To be written
mine_editor.newsegment_size = sizeof(segment);
mine_editor.Curside = 0;
mine_editor.Markedsegp = -1;
mine_editor.Markedside = 0;
if (mine_fileinfo.editor_offset > -1 )
{
if (PHYSFSX_fseek( LoadFile, mine_fileinfo.editor_offset, SEEK_SET ))
Error( "Error seeking to editor_offset in gamemine.c" );
if (PHYSFS_read( LoadFile, &mine_editor, mine_fileinfo.editor_size, 1 )!=1)
Error( "Error reading mine_editor in gamemine.c" );
}
//===================== READ TEXTURE INFO ==========================
if ( (mine_fileinfo.texture_offset > -1) && (mine_fileinfo.texture_howmany > 0))
{
if (PHYSFSX_fseek( LoadFile, mine_fileinfo.texture_offset, SEEK_SET ))
Error( "Error seeking to texture_offset in gamemine.c" );
for (i=0; i< mine_fileinfo.texture_howmany; i++ )
{
if (PHYSFS_read( LoadFile, &old_tmap_list[i], mine_fileinfo.texture_sizeof, 1 )!=1)
Error( "Error reading old_tmap_list[i] in gamemine.c" );
}
}
//=============== GENERATE TEXTURE TRANSLATION TABLE ===============
translate = 0;
Assert (NumTextures < MAX_TEXTURES);
{
hashtable ht;
hashtable_init( &ht, NumTextures );
// Remove all the file extensions in the textures list
for (i=0;i<NumTextures;i++) {
temptr = strchr(TmapInfo[i].filename, '.');
if (temptr) *temptr = '\0';
hashtable_insert( &ht, TmapInfo[i].filename, i );
}
// For every texture, search through the texture list
// to find a matching name.
for (j=0;j<mine_fileinfo.texture_howmany;j++) {
// Remove this texture name's extension
temptr = strchr(old_tmap_list[j], '.');
if (temptr) *temptr = '\0';
tmap_xlate_table[j] = hashtable_search( &ht,old_tmap_list[j]);
if (tmap_xlate_table[j] < 0 ) {
;
}
if (tmap_xlate_table[j] != j ) translate = 1;
if (tmap_xlate_table[j] >= 0)
tmap_times_used[tmap_xlate_table[j]]++;
}
{
int count = 0;
for (i=0; i<MAX_TEXTURES; i++ )
if (tmap_times_used[i])
count++;
}
hashtable_free( &ht );
}
//====================== READ VERTEX INFO ==========================
// New check added to make sure we don't read in too many vertices.
if ( mine_fileinfo.vertex_howmany > MAX_VERTICES )
mine_fileinfo.vertex_howmany = MAX_VERTICES;
if ( (mine_fileinfo.vertex_offset > -1) && (mine_fileinfo.vertex_howmany > 0))
{
if (PHYSFSX_fseek( LoadFile, mine_fileinfo.vertex_offset, SEEK_SET ))
Error( "Error seeking to vertex_offset in gamemine.c" );
for (i=0; i< mine_fileinfo.vertex_howmany; i++ )
{
// Set the default values for this vertex
Vertices[i].x = 1;
Vertices[i].y = 1;
Vertices[i].z = 1;
if (PHYSFS_read( LoadFile, &Vertices[i], mine_fileinfo.vertex_sizeof, 1 )!=1)
Error( "Error reading Vertices[i] in gamemine.c" );
}
}
//==================== READ SEGMENT INFO ===========================
// New check added to make sure we don't read in too many segments.
if ( mine_fileinfo.segment_howmany > MAX_SEGMENTS ) {
mine_fileinfo.segment_howmany = MAX_SEGMENTS;
#if defined(DXX_BUILD_DESCENT_II)
mine_fileinfo.segment2_howmany = MAX_SEGMENTS;
#endif
}
// [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();
if ( (mine_fileinfo.segment_offset > -1) && (mine_fileinfo.segment_howmany > 0)) {
if (PHYSFSX_fseek( LoadFile, mine_fileinfo.segment_offset,SEEK_SET ))
Error( "Error seeking to segment_offset in gamemine.c" );
Highest_segment_index = mine_fileinfo.segment_howmany-1;
for (i=0; i< mine_fileinfo.segment_howmany; i++ ) {
// Set the default values for this segment (clear to zero )
//memset( &Segments[i], 0, sizeof(segment) );
#if defined(DXX_BUILD_DESCENT_II)
if (mine_top_fileinfo.fileinfo_version >= 20)
{
if (PHYSFS_read( LoadFile, &Segments[i], mine_fileinfo.segment_sizeof, 1 )!=1)
Error("Unable to read segment %i\n", i);
}
else
#endif
if (mine_top_fileinfo.fileinfo_version >= 16)
{
v16_segment v16_seg;
Assert(mine_fileinfo.segment_sizeof == sizeof(v16_seg));
if (PHYSFS_read( LoadFile, &v16_seg, mine_fileinfo.segment_sizeof, 1 )!=1)
Error( "Error reading segments in gamemine.c" );
#if defined(DXX_BUILD_DESCENT_I)
Segments[i] = v16_seg;
#elif defined(DXX_BUILD_DESCENT_II)
#ifdef EDITOR
Segments[i].segnum = v16_seg.segnum;
// -- Segments[i].pad = v16_seg.pad;
#endif
for (j=0; j<MAX_SIDES_PER_SEGMENT; j++)
Segments[i].sides[j] = v16_seg.sides[j];
for (j=0; j<MAX_SIDES_PER_SEGMENT; j++)
Segments[i].children[j] = v16_seg.children[j];
for (j=0; j<MAX_VERTICES_PER_SEGMENT; j++)
Segments[i].verts[j] = v16_seg.verts[j];
Segment2s[i].special = v16_seg.special;
Segment2s[i].value = v16_seg.value;
Segment2s[i].s2_flags = 0;
Segment2s[i].matcen_num = v16_seg.matcen_num;
Segment2s[i].static_light = v16_seg.static_light;
#endif
fuelcen_activate( &Segments[i], Segment2s[i].special );
}
else
Error("Invalid mine version");
Segments[i].objects = -1;
#ifdef EDITOR
Segments[i].group = -1;
#endif
if (translate == 1)
for (j=0;j<MAX_SIDES_PER_SEGMENT;j++) {
unsigned short orient;
tmap_xlate = Segments[i].sides[j].tmap_num;
Segments[i].sides[j].tmap_num = tmap_xlate_table[tmap_xlate];
if ((WALL_IS_DOORWAY(&Segments[i],j) & WID_RENDER_FLAG))
if (Segments[i].sides[j].tmap_num < 0) {
Int3();
Segments[i].sides[j].tmap_num = NumTextures-1;
}
tmap_xlate = Segments[i].sides[j].tmap_num2 & TMAP_NUM_MASK;
orient = Segments[i].sides[j].tmap_num2 & (~TMAP_NUM_MASK);
if (tmap_xlate != 0) {
int xlated_tmap = tmap_xlate_table[tmap_xlate];
if ((WALL_IS_DOORWAY(&Segments[i],j) & WID_RENDER_FLAG))
if (xlated_tmap <= 0) {
Int3();
Segments[i].sides[j].tmap_num2 = NumTextures-1;
}
Segments[i].sides[j].tmap_num2 = xlated_tmap | orient;
}
}
}
#if defined(DXX_BUILD_DESCENT_II)
if (mine_top_fileinfo.fileinfo_version >= 20)
for (i=0; i<=Highest_segment_index; i++) {
PHYSFS_read(LoadFile, &Segment2s[i], sizeof(segment2), 1);
fuelcen_activate( &Segments[i], Segment2s[i].special );
}
#endif
}
//===================== READ NEWSEGMENT INFO =====================
#ifdef EDITOR
{ // Default segment created.
vms_vector sizevec;
med_create_new_segment(vm_vec_make(&sizevec,DEFAULT_X_SIZE,DEFAULT_Y_SIZE,DEFAULT_Z_SIZE)); // New_segment = Segments[0];
//memset( &New_segment, 0, sizeof(segment) );
}
if (mine_editor.newsegment_offset > -1)
{
if (PHYSFSX_fseek( LoadFile, mine_editor.newsegment_offset,SEEK_SET ))
Error( "Error seeking to newsegment_offset in gamemine.c" );
if (PHYSFS_read( LoadFile, &New_segment, mine_editor.newsegment_size,1 )!=1)
Error( "Error reading new_segment in gamemine.c" );
}
if ( (mine_fileinfo.newseg_verts_offset > -1) && (mine_fileinfo.newseg_verts_howmany > 0))
{
if (PHYSFSX_fseek( LoadFile, mine_fileinfo.newseg_verts_offset, SEEK_SET ))
Error( "Error seeking to newseg_verts_offset in gamemine.c" );
for (i=0; i< mine_fileinfo.newseg_verts_howmany; i++ )
{
// Set the default values for this vertex
Vertices[NEW_SEGMENT_VERTICES+i].x = 1;
Vertices[NEW_SEGMENT_VERTICES+i].y = 1;
Vertices[NEW_SEGMENT_VERTICES+i].z = 1;
if (PHYSFS_read( LoadFile, &Vertices[NEW_SEGMENT_VERTICES+i], mine_fileinfo.newseg_verts_sizeof,1 )!=1)
Error( "Error reading Vertices[NEW_SEGMENT_VERTICES+i] in gamemine.c" );
New_segment.verts[i] = NEW_SEGMENT_VERTICES+i;
}
}
#endif
//========================= UPDATE VARIABLES ======================
#ifdef EDITOR
// Setting to Markedsegp to NULL ignores Curside and Markedside, which
// we want to do when reading in an old file.
Markedside = mine_editor.Markedside;
Curside = mine_editor.Curside;
for (i=0;i<10;i++)
Groupside[i] = mine_editor.Groupside[i];
if ( mine_editor.current_seg != -1 )
Cursegp = &Segments[mine_editor.current_seg];
else
Cursegp = NULL;
if (mine_editor.Markedsegp != -1 )
Markedsegp = &Segments[mine_editor.Markedsegp];
else
Markedsegp = NULL;
num_groups = 0;
current_group = -1;
#endif
Num_vertices = mine_fileinfo.vertex_howmany;
Num_segments = mine_fileinfo.segment_howmany;
Highest_vertex_index = Num_vertices-1;
Highest_segment_index = Num_segments-1;
reset_objects(1); //one object, the player
#ifdef EDITOR
Highest_vertex_index = MAX_SEGMENT_VERTICES-1;
Highest_segment_index = MAX_SEGMENTS-1;
set_vertex_counts();
Highest_vertex_index = Num_vertices-1;
Highest_segment_index = Num_segments-1;
warn_if_concave_segments();
#endif
#ifdef EDITOR
validate_segment_all();
#endif
//create_local_segment_data();
//gamemine_find_textures();
if (mine_top_fileinfo.fileinfo_version < MINE_VERSION )
return 1; //old version
else
return 0;
}
#endif
#define COMPILED_MINE_VERSION 0
static void read_children(int segnum,ubyte bit_mask,PHYSFS_file *LoadFile)
{
int bit;
for (bit=0; bit<MAX_SIDES_PER_SEGMENT; bit++) {
if (bit_mask & (1 << bit)) {
Segments[segnum].children[bit] = PHYSFSX_readShort(LoadFile);
} else
Segments[segnum].children[bit] = -1;
}
}
static void read_verts(int segnum,PHYSFS_file *LoadFile)
{
int i;
// Read short Segments[segnum].verts[MAX_VERTICES_PER_SEGMENT]
for (i = 0; i < MAX_VERTICES_PER_SEGMENT; i++)
Segments[segnum].verts[i] = PHYSFSX_readShort(LoadFile);
}
static void read_special(int segnum,ubyte bit_mask,PHYSFS_file *LoadFile)
{
if (bit_mask & (1 << MAX_SIDES_PER_SEGMENT)) {
// Read ubyte Segments[segnum].special
Segments[segnum].special = PHYSFSX_readByte(LoadFile);
// Read byte Segments[segnum].matcen_num
Segments[segnum].matcen_num = PHYSFSX_readByte(LoadFile);
// Read short Segments[segnum].value
Segments[segnum].value = PHYSFSX_readShort(LoadFile);
} else {
Segments[segnum].special = 0;
Segments[segnum].matcen_num = -1;
Segments[segnum].value = 0;
}
}
#if defined(DXX_BUILD_DESCENT_I)
/*
* reads a segment2 structure from a PHYSFS_file
*/
static void segment2_read(segment *s2, PHYSFS_file *fp)
{
s2->special = PHYSFSX_readByte(fp);
if (s2->special >= MAX_CENTER_TYPES)
s2->special = SEGMENT_IS_NOTHING; // remove goals etc.
s2->matcen_num = PHYSFSX_readByte(fp);
s2->value = PHYSFSX_readByte(fp);
/*s2->s2_flags =*/ PHYSFSX_readByte(fp); // descent 2 ambient sound handling
s2->static_light = PHYSFSX_readFix(fp);
}
#endif
int load_mine_data_compiled(PHYSFS_file *LoadFile)
{
int i, segnum, sidenum;
ubyte compiled_version;
short temp_short;
ushort temp_ushort = 0;
ubyte bit_mask;
#if defined(DXX_BUILD_DESCENT_II)
d1_pig_present = PHYSFSX_exists(D1_PIGFILE,1);
#endif
if (!strcmp(strchr(Gamesave_current_filename, '.'), ".sdl"))
New_file_format_load = 0; // descent 1 shareware
else
New_file_format_load = 1;
// For compiled levels, textures map to themselves, prevent tmap_override always being gray,
// bug which Matt and John refused to acknowledge, so here is Mike, fixing it.
//
// Although in a cloud of arrogant glee, he forgot to ifdef it on EDITOR!
// (Matt told me to write that!)
#ifdef EDITOR
for (i=0; i<MAX_TEXTURES; i++)
tmap_xlate_table[i] = i;
#endif
// memset( Segments, 0, sizeof(segment)*MAX_SEGMENTS );
fuelcen_reset();
//=============================== Reading part ==============================
compiled_version = PHYSFSX_readByte(LoadFile);
(void)compiled_version;
if (New_file_format_load)
Num_vertices = PHYSFSX_readShort(LoadFile);
else
Num_vertices = PHYSFSX_readInt(LoadFile);
Assert( Num_vertices <= MAX_VERTICES );
if (New_file_format_load)
Num_segments = PHYSFSX_readShort(LoadFile);
else
Num_segments = PHYSFSX_readInt(LoadFile);
Assert( Num_segments <= MAX_SEGMENTS );
for (i = 0; i < Num_vertices; i++)
PHYSFSX_readVector( &(Vertices[i]), LoadFile);
for (segnum=0; segnum<Num_segments; segnum++ ) {
#ifdef EDITOR
Segments[segnum].segnum = segnum;
Segments[segnum].group = 0;
#endif
if (New_file_format_load)
bit_mask = PHYSFSX_readByte(LoadFile);
else
bit_mask = 0x7f; // read all six children and special stuff...
if (Gamesave_current_version == 5) { // d2 SHAREWARE level
read_special(segnum,bit_mask,LoadFile);
read_verts(segnum,LoadFile);
read_children(segnum,bit_mask,LoadFile);
} else {
read_children(segnum,bit_mask,LoadFile);
read_verts(segnum,LoadFile);
if (Gamesave_current_version <= 1) { // descent 1 level
read_special(segnum,bit_mask,LoadFile);
}
}
Segments[segnum].objects = -1;
if (Gamesave_current_version <= 5) { // descent 1 thru d2 SHAREWARE level
// Read fix Segments[segnum].static_light (shift down 5 bits, write as short)
temp_ushort = PHYSFSX_readShort(LoadFile);
Segments[segnum].static_light = ((fix)temp_ushort) << 4;
//PHYSFS_read( LoadFile, &Segments[segnum].static_light, sizeof(fix), 1 );
}
// Read the walls as a 6 byte array
for (sidenum=0; sidenum<MAX_SIDES_PER_SEGMENT; sidenum++ ) {
Segments[segnum].sides[sidenum].pad = 0;
}
if (New_file_format_load)
bit_mask = PHYSFSX_readByte(LoadFile);
else
bit_mask = 0x3f; // read all six sides
for (sidenum=0; sidenum<MAX_SIDES_PER_SEGMENT; sidenum++) {
ubyte byte_wallnum;
if (bit_mask & (1 << sidenum)) {
byte_wallnum = PHYSFSX_readByte(LoadFile);
if ( byte_wallnum == 255 )
Segments[segnum].sides[sidenum].wall_num = -1;
else
Segments[segnum].sides[sidenum].wall_num = byte_wallnum;
} else
Segments[segnum].sides[sidenum].wall_num = -1;
}
for (sidenum=0; sidenum<MAX_SIDES_PER_SEGMENT; sidenum++ ) {
if ( (Segments[segnum].children[sidenum]==-1) || (Segments[segnum].sides[sidenum].wall_num!=-1) ) {
// Read short Segments[segnum].sides[sidenum].tmap_num;
temp_ushort = PHYSFSX_readShort(LoadFile);
#if defined(DXX_BUILD_DESCENT_I)
Segments[segnum].sides[sidenum].tmap_num = convert_tmap(temp_ushort & 0x7fff);
if (New_file_format_load && !(temp_ushort & 0x8000))
Segments[segnum].sides[sidenum].tmap_num2 = 0;
else {
// Read short Segments[segnum].sides[sidenum].tmap_num2;
Segments[segnum].sides[sidenum].tmap_num2 = PHYSFSX_readShort(LoadFile);
Segments[segnum].sides[sidenum].tmap_num2 =
(convert_tmap(Segments[segnum].sides[sidenum].tmap_num2 & 0x3fff)) |
(Segments[segnum].sides[sidenum].tmap_num2 & 0xc000);
}
#elif defined(DXX_BUILD_DESCENT_II)
if (New_file_format_load) {
Segments[segnum].sides[sidenum].tmap_num = temp_ushort & 0x7fff;
} else
Segments[segnum].sides[sidenum].tmap_num = temp_ushort;
if (Gamesave_current_version <= 1)
Segments[segnum].sides[sidenum].tmap_num = convert_d1_tmap_num(Segments[segnum].sides[sidenum].tmap_num);
if (New_file_format_load && !(temp_ushort & 0x8000))
Segments[segnum].sides[sidenum].tmap_num2 = 0;
else {
// Read short Segments[segnum].sides[sidenum].tmap_num2;
Segments[segnum].sides[sidenum].tmap_num2 = PHYSFSX_readShort(LoadFile);
if (Gamesave_current_version <= 1 && Segments[segnum].sides[sidenum].tmap_num2 != 0)
Segments[segnum].sides[sidenum].tmap_num2 = convert_d1_tmap_num(Segments[segnum].sides[sidenum].tmap_num2);
}
#endif
// Read uvl Segments[segnum].sides[sidenum].uvls[4] (u,v>>5, write as short, l>>1 write as short)
for (i=0; i<4; i++ ) {
temp_short = PHYSFSX_readShort(LoadFile);
Segments[segnum].sides[sidenum].uvls[i].u = ((fix)temp_short) << 5;
temp_short = PHYSFSX_readShort(LoadFile);
Segments[segnum].sides[sidenum].uvls[i].v = ((fix)temp_short) << 5;
temp_ushort = PHYSFSX_readShort(LoadFile);
Segments[segnum].sides[sidenum].uvls[i].l = ((fix)temp_ushort) << 1;
//PHYSFS_read( LoadFile, &Segments[segnum].sides[sidenum].uvls[i].l, sizeof(fix), 1 );
}
} else {
Segments[segnum].sides[sidenum].tmap_num = 0;
Segments[segnum].sides[sidenum].tmap_num2 = 0;
for (i=0; i<4; i++ ) {
Segments[segnum].sides[sidenum].uvls[i].u = 0;
Segments[segnum].sides[sidenum].uvls[i].v = 0;
Segments[segnum].sides[sidenum].uvls[i].l = 0;
}
}
}
}
Highest_vertex_index = Num_vertices-1;
Highest_segment_index = Num_segments-1;
validate_segment_all(); // Fill in side type and normals.
for (i=0; i<Num_segments; i++) {
if (Gamesave_current_version > 5)
segment2_read(&Segments[i], LoadFile);
fuelcen_activate( &Segments[i], Segments[i].special );
}
reset_objects(1); //one object, the player
return 0;
}