/* * Portions of this file are copyright Rebirth contributors and licensed as * described in COPYING.txt. * Portions of this file are copyright Parallax Software and licensed * according to the Parallax license below. * See COPYING.txt for license details. 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 managing the pig files. * */ #include #include #include "pstypes.h" #include "strutil.h" #include "inferno.h" #include "gr.h" #include "grdef.h" #include "u_mem.h" #include "iff.h" #include "dxxerror.h" #include "sounds.h" #include "songs.h" #include "bm.h" #include "hash.h" #include "common/2d/bitmap.h" #include "args.h" #include "palette.h" #include "gamefont.h" #include "gamepal.h" #include "physfsx.h" #include "rle.h" #include "screens.h" #include "piggy.h" #include "gamemine.h" #include "textures.h" #include "texmerge.h" #include "paging.h" #include "game.h" #include "text.h" #include "newmenu.h" #include "makesig.h" #include "console.h" #include "compiler-range_for.h" #include "compiler-make_unique.h" #include "compiler-static_assert.h" #include "partial_range.h" #if defined(DXX_BUILD_DESCENT_I) #include "custom.h" #include "snddecom.h" #define DEFAULT_PIGFILE_REGISTERED "descent.pig" #elif defined(DXX_BUILD_DESCENT_II) #include "compiler-range_for.h" #include "partial_range.h" #define DEFAULT_PIGFILE_REGISTERED "groupa.pig" #define DEFAULT_PIGFILE_SHAREWARE "d2demo.pig" #define DEFAULT_HAMFILE_REGISTERED "descent2.ham" #define DEFAULT_HAMFILE_SHAREWARE "d2demo.ham" #define D1_PALETTE "palette.256" #define DEFAULT_SNDFILE ((Piggy_hamfile_version < 3)?DEFAULT_HAMFILE_SHAREWARE:(GameArg.SndDigiSampleRate==SAMPLE_RATE_22K)?"descent2.s22":"descent2.s11") #define MAC_ALIEN1_PIGSIZE 5013035 #define MAC_ALIEN2_PIGSIZE 4909916 #define MAC_FIRE_PIGSIZE 4969035 #define MAC_GROUPA_PIGSIZE 4929684 // also used for mac shareware #define MAC_ICE_PIGSIZE 4923425 #define MAC_WATER_PIGSIZE 4832403 unsigned Num_aliases; array alias_list; int Piggy_hamfile_version = 0; #endif static std::unique_ptr BitmapBits; static std::unique_ptr SoundBits; struct SoundFile { char name[15]; }; #if defined(DXX_BUILD_DESCENT_II) namespace { #endif hashtable AllBitmapsNames; hashtable AllDigiSndNames; array GameBitmapOffset; #if defined(DXX_BUILD_DESCENT_II) } #endif int Num_bitmap_files = 0; int Num_sound_files = 0; namespace dsx { array GameSounds; static array SoundOffset; } array GameBitmaps; #if defined(DXX_BUILD_DESCENT_I) #define DBM_FLAG_LARGE 128 // Flags added onto the flags struct in b static #endif array AllBitmaps; static array AllSounds; #define DBM_FLAG_ABM 64 // animated bitmap static int Piggy_bitmap_cache_size; static int Piggy_bitmap_cache_next; ubyte * Piggy_bitmap_cache_data = NULL; static array GameBitmapFlags; static array GameBitmapXlat; #if defined(DXX_BUILD_DESCENT_I) #define PIGGY_BUFFER_SIZE (2048*1024) #elif defined(DXX_BUILD_DESCENT_II) #define PIGFILE_ID MAKE_SIG('G','I','P','P') //PPIG #define PIGFILE_VERSION 2 #define PIGGY_BUFFER_SIZE (2400*1024) #endif #define PIGGY_SMALL_BUFFER_SIZE (1400*1024) // size of buffer when CGameArg.SysLowMem is set static RAIIPHYSFS_File Piggy_fp; ubyte bogus_bitmap_initialized=0; array bogus_data; namespace dsx { digi_sound bogus_sound; } #if defined(DXX_BUILD_DESCENT_I) grs_bitmap bogus_bitmap; int MacPig = 0; // using the Macintosh pigfile? int PCSharePig = 0; // using PC Shareware pigfile? static array SoundCompressed; #elif defined(DXX_BUILD_DESCENT_II) char Current_pigfile[FILENAME_LEN] = ""; int Pigfile_initialized=0; static std::unique_ptr Bitmap_replacement_data; #define DBM_NUM_FRAMES 63 #define BM_FLAGS_TO_COPY (BM_FLAG_TRANSPARENT | BM_FLAG_SUPER_TRANSPARENT \ | BM_FLAG_NO_LIGHTING | BM_FLAG_RLE | BM_FLAG_RLE_BIG) #endif struct DiskBitmapHeader { char name[8]; ubyte dflags; // bits 0-5 anim frame num, bit 6 abm flag ubyte width; // low 8 bits here, 4 more bits in wh_extra ubyte height; // low 8 bits here, 4 more bits in wh_extra #if defined(DXX_BUILD_DESCENT_II) ubyte wh_extra; // bits 0-3 width, bits 4-7 height #endif ubyte flags; ubyte avg_color; int offset; } __pack__; #if defined(DXX_BUILD_DESCENT_I) static_assert(sizeof(DiskBitmapHeader) == 0x11, "sizeof(DiskBitmapHeader) must be 0x11"); #elif defined(DXX_BUILD_DESCENT_II) static_assert(sizeof(DiskBitmapHeader) == 0x12, "sizeof(DiskBitmapHeader) must be 0x12"); #define DISKBITMAPHEADER_D1_SIZE 17 // no wh_extra #endif struct DiskSoundHeader { char name[8]; int length; int data_length; int offset; } __pack__; #if defined(DXX_BUILD_DESCENT_II) static void free_bitmap_replacements(); static void free_d1_tmap_nums(); #ifdef EDITOR static int piggy_is_substitutable_bitmap(char * name, char (&subst_name)[32]); static void piggy_write_pigfile(const char *filename); static void write_int(int i,PHYSFS_File *file); #endif static int piggy_is_needed(int soundnum); #endif /* * reads a DiskBitmapHeader structure from a PHYSFS_File */ static void DiskBitmapHeader_read(DiskBitmapHeader *dbh, PHYSFS_File *fp) { PHYSFS_read(fp, dbh->name, 8, 1); dbh->dflags = PHYSFSX_readByte(fp); dbh->width = PHYSFSX_readByte(fp); dbh->height = PHYSFSX_readByte(fp); #if defined(DXX_BUILD_DESCENT_II) dbh->wh_extra = PHYSFSX_readByte(fp); #endif dbh->flags = PHYSFSX_readByte(fp); dbh->avg_color = PHYSFSX_readByte(fp); dbh->offset = PHYSFSX_readInt(fp); } /* * reads a DiskSoundHeader structure from a PHYSFS_File */ static void DiskSoundHeader_read(DiskSoundHeader *dsh, PHYSFS_File *fp) { PHYSFS_read(fp, dsh->name, 8, 1); dsh->length = PHYSFSX_readInt(fp); dsh->data_length = PHYSFSX_readInt(fp); dsh->offset = PHYSFSX_readInt(fp); } #if defined(DXX_BUILD_DESCENT_II) /* * reads a descent 1 DiskBitmapHeader structure from a PHYSFS_File */ static void DiskBitmapHeader_d1_read(DiskBitmapHeader *dbh, PHYSFS_File *fp) { PHYSFS_read(fp, dbh->name, 8, 1); dbh->dflags = PHYSFSX_readByte(fp); dbh->width = PHYSFSX_readByte(fp); dbh->height = PHYSFSX_readByte(fp); dbh->wh_extra = 0; dbh->flags = PHYSFSX_readByte(fp); dbh->avg_color = PHYSFSX_readByte(fp); dbh->offset = PHYSFSX_readInt(fp); } #endif void swap_0_255(grs_bitmap *bmp) { auto a = [](uint8_t &c) { if (c == 0) c = 255; else if (c == 255) c = 0; }; auto d = bmp->get_bitmap_data(); std::for_each(d, d + (bmp->bm_h * bmp->bm_w), a); } bitmap_index piggy_register_bitmap( grs_bitmap * bmp, const char * name, int in_file ) { bitmap_index temp; Assert( Num_bitmap_files < MAX_BITMAP_FILES ); temp.index = Num_bitmap_files; if (!in_file) { #if defined(DXX_BUILD_DESCENT_II) #ifdef EDITOR if ( GameArg.EdiMacData ) swap_0_255( bmp ); #endif #endif if (CGameArg.DbgNoCompressPigBitmap) gr_bitmap_rle_compress(*bmp); } #if defined(DXX_BUILD_DESCENT_II) else if (SoundOffset[Num_sound_files] == 0) SoundOffset[Num_sound_files] = -1; // make sure this sound's data is not individually freed #endif strncpy( AllBitmaps[Num_bitmap_files].name, name, 12 ); hashtable_insert( &AllBitmapsNames, AllBitmaps[Num_bitmap_files].name, Num_bitmap_files ); #if defined(DXX_BUILD_DESCENT_I) GameBitmaps[Num_bitmap_files] = *bmp; #endif if ( !in_file ) { GameBitmapOffset[Num_bitmap_files] = 0; GameBitmapFlags[Num_bitmap_files] = bmp->bm_flags; } Num_bitmap_files++; return temp; } namespace dsx { int piggy_register_sound( digi_sound * snd, const char * name, int in_file ) { int i; Assert( Num_sound_files < MAX_SOUND_FILES ); strncpy( AllSounds[Num_sound_files].name, name, 12 ); hashtable_insert( &AllDigiSndNames, AllSounds[Num_sound_files].name, Num_sound_files ); GameSounds[Num_sound_files] = *snd; #if defined(DXX_BUILD_DESCENT_I) //added/moved on 11/13/99 by Victor Rachels to ready for changing freq //#ifdef ALLEGRO GameSounds[Num_sound_files].bits = snd->bits; GameSounds[Num_sound_files].freq = snd->freq; #ifdef ALLEGRO //end this section move - VR GameSounds[Num_sound_files].priority = 128; GameSounds[Num_sound_files].loop_start = 0; GameSounds[Num_sound_files].loop_end = GameSounds[Num_sound_files].len; GameSounds[Num_sound_files].param = -1; #endif #endif if ( !in_file ) { SoundOffset[Num_sound_files] = 0; } #if defined(DXX_BUILD_DESCENT_I) else if (SoundOffset[Num_sound_files] == 0) SoundOffset[Num_sound_files] = -1; // make sure this sound's data is not individually freed #endif i = Num_sound_files; Num_sound_files++; return i; } bitmap_index piggy_find_bitmap(const char * name) { bitmap_index bmp; bmp.index = 0; #if defined(DXX_BUILD_DESCENT_II) size_t namelen; const char *t; if ((t=strchr(name,'#'))!=NULL) namelen = t - name; else namelen = strlen(name); char temp[FILENAME_LEN]; range_for (auto &i, partial_const_range(alias_list, Num_aliases)) if (i.alias_name[namelen] == 0 && d_strnicmp(name, i.alias_name,namelen)==0) { if (t) { //extra stuff for ABMs struct splitpath_t path; d_splitpath(i.file_name, &path); snprintf(temp, sizeof(temp), "%.*s%s\n", static_cast(path.base_end - path.base_start), path.base_start, t); name = temp; } else name = i.file_name; break; } #endif int i; i = hashtable_search( &AllBitmapsNames, name ); Assert( i != 0 ); if ( i < 0 ) return bmp; bmp.index = i; return bmp; } } int piggy_find_sound(const char *name) { int i; i = hashtable_search( &AllDigiSndNames, name ); if ( i < 0 ) return 255; return i; } static void piggy_close_file() { if (Piggy_fp) { Piggy_fp.reset(); #if defined(DXX_BUILD_DESCENT_II) Current_pigfile[0] = 0; #endif } } #if defined(DXX_BUILD_DESCENT_I) int properties_init() { int sbytes = 0; char temp_name_read[16]; char temp_name[16]; digi_sound temp_sound; DiskBitmapHeader bmh; DiskSoundHeader sndh; int header_size, N_bitmaps, N_sounds; int size; int Pigdata_start; int pigsize; int retval; for (unsigned i = 0; i < MAX_SOUND_FILES; ++i) { #ifdef ALLEGRO GameSounds[i].len = 0; #else GameSounds[i].length = 0; #endif GameSounds[i].data = NULL; SoundOffset[i] = 0; //added on 11/13/99 by Victor Rachels to ready for changing freq GameSounds[i].bits = 0; GameSounds[i].freq = 0; //end this section addition - VR } for (unsigned i = 0; i < MAX_BITMAP_FILES; ++i) { GameBitmapXlat[i] = i; GameBitmaps[i].bm_flags = BM_FLAG_PAGED_OUT; } if ( !bogus_bitmap_initialized ) { ubyte c; bogus_bitmap_initialized = 1; c = gr_find_closest_color( 0, 0, 63 ); bogus_data.fill(c); c = gr_find_closest_color( 63, 0, 0 ); // Make a big red X ! for (unsigned i = 0; i < 64; ++i) { bogus_data[i*64+i] = c; bogus_data[i*64+(63-i)] = c; } gr_init_bitmap(bogus_bitmap, bm_mode::linear, 0, 0, 64, 64, 64, bogus_data.data()); piggy_register_bitmap( &bogus_bitmap, "bogus", 1 ); #ifdef ALLEGRO bogus_sound.len = 64*64; #else bogus_sound.length = 64*64; #endif bogus_sound.data = bogus_data.data(); //added on 11/13/99 by Victor Rachels to ready for changing freq bogus_sound.freq = 11025; bogus_sound.bits = 8; //end this section addition - VR GameBitmapOffset[0] = 0; } Piggy_fp = PHYSFSX_openReadBuffered(DEFAULT_PIGFILE_REGISTERED); if (!Piggy_fp) { if (!PHYSFSX_exists("BITMAPS.TBL",1) && !PHYSFSX_exists("BITMAPS.BIN",1)) Error("Cannot find " DEFAULT_PIGFILE_REGISTERED " or BITMAPS.TBL"); return 1; // need to run gamedata_read_tbl } pigsize = PHYSFS_fileLength(Piggy_fp); switch (pigsize) { case D1_SHARE_BIG_PIGSIZE: case D1_SHARE_10_PIGSIZE: case D1_SHARE_PIGSIZE: PCSharePig = 1; Pigdata_start = 0; break; case D1_10_BIG_PIGSIZE: case D1_10_PIGSIZE: Pigdata_start = 0; break; default: Warning("Unknown size for " DEFAULT_PIGFILE_REGISTERED); Int3(); // fall through case D1_MAC_PIGSIZE: case D1_MAC_SHARE_PIGSIZE: MacPig = 1; case D1_PIGSIZE: case D1_OEM_PIGSIZE: Pigdata_start = PHYSFSX_readInt(Piggy_fp ); break; } HiresGFXAvailable = MacPig; // for now at least if (PCSharePig) retval = PIGGY_PC_SHAREWARE; // run gamedata_read_tbl in shareware mode else if (GameArg.EdiNoBm || (!PHYSFSX_exists("BITMAPS.TBL",1) && !PHYSFSX_exists("BITMAPS.BIN",1))) { properties_read_cmp( Piggy_fp ); // Note connection to above if!!! range_for (auto &i, GameBitmapXlat) { i = PHYSFSX_readShort(Piggy_fp); if (PHYSFS_eof(Piggy_fp)) break; } retval = 0; // don't run gamedata_read_tbl } else retval = 1; // run gamedata_read_tbl PHYSFSX_fseek( Piggy_fp, Pigdata_start, SEEK_SET ); size = PHYSFS_fileLength(Piggy_fp) - Pigdata_start; N_bitmaps = PHYSFSX_readInt(Piggy_fp); size -= sizeof(int); N_sounds = PHYSFSX_readInt(Piggy_fp); size -= sizeof(int); header_size = (N_bitmaps*sizeof(DiskBitmapHeader)) + (N_sounds*sizeof(DiskSoundHeader)); for (unsigned i = 0; i < N_bitmaps; ++i) { DiskBitmapHeader_read(&bmh, Piggy_fp); GameBitmapFlags[i+1] = 0; if ( bmh.flags & BM_FLAG_TRANSPARENT ) GameBitmapFlags[i+1] |= BM_FLAG_TRANSPARENT; if ( bmh.flags & BM_FLAG_SUPER_TRANSPARENT ) GameBitmapFlags[i+1] |= BM_FLAG_SUPER_TRANSPARENT; if ( bmh.flags & BM_FLAG_NO_LIGHTING ) GameBitmapFlags[i+1] |= BM_FLAG_NO_LIGHTING; if ( bmh.flags & BM_FLAG_RLE ) GameBitmapFlags[i+1] |= BM_FLAG_RLE; GameBitmapOffset[i+1] = bmh.offset + header_size + (sizeof(int)*2) + Pigdata_start; Assert( (i+1) == Num_bitmap_files ); //size -= sizeof(DiskBitmapHeader); memcpy( temp_name_read, bmh.name, 8 ); temp_name_read[8] = 0; if ( bmh.dflags & DBM_FLAG_ABM ) snprintf(temp_name, sizeof(temp_name), "%s#%d", temp_name_read, bmh.dflags & 63); else strcpy( temp_name, temp_name_read ); grs_bitmap temp_bitmap{}; gr_init_bitmap(temp_bitmap, bm_mode::linear, 0, 0, (bmh.dflags & DBM_FLAG_LARGE) ? bmh.width + 256 : bmh.width, bmh.height, (bmh.dflags & DBM_FLAG_LARGE) ? bmh.width + 256 : bmh.width, Piggy_bitmap_cache_data); temp_bitmap.bm_flags |= BM_FLAG_PAGED_OUT; temp_bitmap.avg_color = bmh.avg_color; if (MacPig) { // HACK HACK HACK!!!!! if (!d_strnicmp(bmh.name, "cockpit") || !d_strnicmp(bmh.name, "status") || !d_strnicmp(bmh.name, "rearview")) { temp_bitmap.bm_w = temp_bitmap.bm_rowsize = 640; if (GameBitmapFlags[i+1] & BM_FLAG_RLE) GameBitmapFlags[i+1] |= BM_FLAG_RLE_BIG; } if (!d_strnicmp(bmh.name, "cockpit") || !d_strnicmp(bmh.name, "rearview")) temp_bitmap.bm_h = 480; } piggy_register_bitmap( &temp_bitmap, temp_name, 1 ); } if (!MacPig) { for (unsigned i = 0; i < N_sounds; ++i) { DiskSoundHeader_read(&sndh, Piggy_fp); //size -= sizeof(DiskSoundHeader); #ifdef ALLEGRO temp_sound.len = sndh.length; #else temp_sound.length = sndh.length; #endif //added on 11/13/99 by Victor Rachels to ready for changing freq temp_sound.bits = 8; temp_sound.freq = 11025; //end this section addition - VR temp_sound.data = (uint8_t *)(sndh.offset + header_size + (sizeof(int)*2)+Pigdata_start); SoundOffset[Num_sound_files] = sndh.offset + header_size + (sizeof(int)*2)+Pigdata_start; if (PCSharePig) SoundCompressed[Num_sound_files] = sndh.data_length; memcpy( temp_name_read, sndh.name, 8 ); temp_name_read[8] = 0; piggy_register_sound( &temp_sound, temp_name_read, 1 ); sbytes += sndh.length; } SoundBits = make_unique(sbytes + 16); } #if 1 //def EDITOR Piggy_bitmap_cache_size = size - header_size - sbytes + 16; Assert( Piggy_bitmap_cache_size > 0 ); #else Piggy_bitmap_cache_size = PIGGY_BUFFER_SIZE; if (CGameArg.SysLowMem) Piggy_bitmap_cache_size = PIGGY_SMALL_BUFFER_SIZE; #endif BitmapBits = make_unique(Piggy_bitmap_cache_size); Piggy_bitmap_cache_data = BitmapBits.get(); Piggy_bitmap_cache_next = 0; return retval; } #elif defined(DXX_BUILD_DESCENT_II) //initialize a pigfile, reading headers //returns the size of all the bitmap data void piggy_init_pigfile(const char *filename) { int i; char temp_name[16]; char temp_name_read[16]; DiskBitmapHeader bmh; int header_size, N_bitmaps, data_start; #ifdef EDITOR int data_size; #endif piggy_close_file(); //close old pig if still open Piggy_fp = PHYSFSX_openReadBuffered(filename); //try pigfile for shareware if (!Piggy_fp) Piggy_fp = PHYSFSX_openReadBuffered(DEFAULT_PIGFILE_SHAREWARE); if (Piggy_fp) { //make sure pig is valid type file & is up-to-date int pig_id,pig_version; pig_id = PHYSFSX_readInt(Piggy_fp); pig_version = PHYSFSX_readInt(Piggy_fp); if (pig_id != PIGFILE_ID || pig_version != PIGFILE_VERSION) { Piggy_fp.reset(); //out of date pig //..so pretend it's not here } } if (!Piggy_fp) { #ifdef EDITOR return; //if editor, ok to not have pig, because we'll build one #else Error("Cannot load required file <%s>",filename); #endif } strncpy(Current_pigfile,filename,sizeof(Current_pigfile)); N_bitmaps = PHYSFSX_readInt(Piggy_fp); header_size = N_bitmaps * sizeof(DiskBitmapHeader); data_start = header_size + PHYSFS_tell(Piggy_fp); #ifdef EDITOR data_size = PHYSFS_fileLength(Piggy_fp) - data_start; #endif Num_bitmap_files = 1; for (i=0; i(bmh.wh_extra & 0x0f) << 8); gr_init_bitmap(*bm, bm_mode::linear, 0, 0, width, bmh.height + (static_cast(bmh.wh_extra & 0xf0) << 4), width, NULL); bm->bm_flags = BM_FLAG_PAGED_OUT; bm->avg_color = bmh.avg_color; GameBitmapFlags[i+1] = bmh.flags & BM_FLAGS_TO_COPY; GameBitmapOffset[i+1] = bmh.offset + data_start; Assert( (i+1) == Num_bitmap_files ); piggy_register_bitmap(bm, temp_name, 1); } #ifdef EDITOR Piggy_bitmap_cache_size = data_size + (data_size/10); //extra mem for new bitmaps Assert( Piggy_bitmap_cache_size > 0 ); #else Piggy_bitmap_cache_size = PIGGY_BUFFER_SIZE; if (CGameArg.SysLowMem) Piggy_bitmap_cache_size = PIGGY_SMALL_BUFFER_SIZE; #endif BitmapBits = make_unique(Piggy_bitmap_cache_size); Piggy_bitmap_cache_data = BitmapBits.get(); Piggy_bitmap_cache_next = 0; Pigfile_initialized=1; } //reads in a new pigfile (for new palette) //returns the size of all the bitmap data void piggy_new_pigfile(char *pigname) { int i; char temp_name[16]; char temp_name_read[16]; DiskBitmapHeader bmh; int header_size, N_bitmaps, data_start; #ifdef EDITOR int must_rewrite_pig = 0; #endif d_strlwr(pigname); if (d_strnicmp(Current_pigfile, pigname, sizeof(Current_pigfile)) == 0 // correct pig already loaded && !Bitmap_replacement_data) // no need to reload: no bitmaps were altered return; if (!Pigfile_initialized) { //have we ever opened a pigfile? piggy_init_pigfile(pigname); //..no, so do initialization stuff return; } else piggy_close_file(); //close old pig if still open Piggy_bitmap_cache_next = 0; //free up cache strncpy(Current_pigfile,pigname,sizeof(Current_pigfile)); Piggy_fp = PHYSFSX_openReadBuffered(pigname); //try pigfile for shareware if (!Piggy_fp) Piggy_fp = PHYSFSX_openReadBuffered(DEFAULT_PIGFILE_SHAREWARE); if (Piggy_fp) { //make sure pig is valid type file & is up-to-date int pig_id,pig_version; pig_id = PHYSFSX_readInt(Piggy_fp); pig_version = PHYSFSX_readInt(Piggy_fp); if (pig_id != PIGFILE_ID || pig_version != PIGFILE_VERSION) { Piggy_fp.reset(); //out of date pig //..so pretend it's not here } } #ifndef EDITOR if (!Piggy_fp) Error("Cannot open correct version of <%s>", pigname); #endif if (Piggy_fp) { N_bitmaps = PHYSFSX_readInt(Piggy_fp); header_size = N_bitmaps * sizeof(DiskBitmapHeader); data_start = header_size + PHYSFS_tell(Piggy_fp); for (i=1; i<=N_bitmaps; i++ ) { grs_bitmap *bm = &GameBitmaps[i]; int width; DiskBitmapHeader_read(&bmh, Piggy_fp); memcpy( temp_name_read, bmh.name, 8 ); temp_name_read[8] = 0; if ( bmh.dflags & DBM_FLAG_ABM ) snprintf(temp_name, sizeof(temp_name), "%s#%d", temp_name_read, bmh.dflags & DBM_NUM_FRAMES); else strcpy( temp_name, temp_name_read ); #ifdef EDITOR //Make sure name matches if (strcmp(temp_name,AllBitmaps[i].name)) { //Int3(); //this pig is out of date. Delete it must_rewrite_pig=1; } #endif strcpy(AllBitmaps[i].name,temp_name); width = bmh.width + (static_cast(bmh.wh_extra & 0x0f) << 8); gr_set_bitmap_data(*bm, NULL); // free ogl texture gr_init_bitmap(*bm, bm_mode::linear, 0, 0, width, bmh.height + (static_cast(bmh.wh_extra & 0xf0) << 4), width, NULL); bm->bm_flags = BM_FLAG_PAGED_OUT; bm->avg_color = bmh.avg_color; GameBitmapFlags[i] = bmh.flags & BM_FLAGS_TO_COPY; GameBitmapOffset[i] = bmh.offset + data_start; } } else N_bitmaps = 0; //no pigfile, so no bitmaps #ifndef EDITOR Assert(N_bitmaps == Num_bitmap_files-1); #else if (must_rewrite_pig || (N_bitmaps < Num_bitmap_files-1)) { int size; //re-read the bitmaps that aren't in this pig for (i=N_bitmaps+1;i, MAX_BITMAPS_PER_BRUSH> bm; iff_error = iff_read_animbrush(abmname,bm,&nframes,newpal); if (iff_error != IFF_NO_ERROR) { Error("File %s - IFF error: %s",abmname,iff_errormsg(iff_error)); } for (fnum=0;fnumavg_color = compute_average_pixel(bm[fnum].get()); if ( GameArg.EdiMacData ) swap_0_255( bm[fnum].get() ); if (CGameArg.DbgNoCompressPigBitmap) gr_bitmap_rle_compress(*bm[fnum].get()); if (bm[fnum]->bm_flags & BM_FLAG_RLE) size = *reinterpret_cast(bm[fnum]->bm_data); else size = bm[fnum]->bm_w * bm[fnum]->bm_h; memcpy( &Piggy_bitmap_cache_data[Piggy_bitmap_cache_next],bm[fnum]->bm_data,size); d_free(bm[fnum]->bm_mdata); bm[fnum]->bm_mdata = &Piggy_bitmap_cache_data[Piggy_bitmap_cache_next]; Piggy_bitmap_cache_next += size; GameBitmaps[i+fnum] = std::move(*bm[fnum]); } i += nframes-1; //filled in multiple bitmaps } else { //this is a BBM grs_bitmap n; palette_array_t newpal; int iff_error; char bbmname[FILENAME_LEN]; int SuperX; snprintf(bbmname, sizeof(bbmname), "%s.bbm", AllBitmaps[i].name); iff_error = iff_read_bitmap(bbmname, n, &newpal); if (iff_error != IFF_NO_ERROR) { Error("File %s - IFF error: %s",bbmname,iff_errormsg(iff_error)); } SuperX = (GameBitmapFlags[i]&BM_FLAG_SUPER_TRANSPARENT)?254:-1; //above makes assumption that supertransparent color is 254 if ( iff_has_transparency ) gr_remap_bitmap_good(n, newpal, iff_transparent_color, SuperX); else gr_remap_bitmap_good(n, newpal, -1, SuperX); n.avg_color = compute_average_pixel(&n); if ( GameArg.EdiMacData ) swap_0_255( &n ); if (CGameArg.DbgNoCompressPigBitmap) gr_bitmap_rle_compress(n); if (n.bm_flags & BM_FLAG_RLE) size = *reinterpret_cast(n.bm_data); else size = n.bm_w * n.bm_h; memcpy( &Piggy_bitmap_cache_data[Piggy_bitmap_cache_next],n.bm_data,size); d_free(n.bm_mdata); n.bm_mdata = &Piggy_bitmap_cache_data[Piggy_bitmap_cache_next]; Piggy_bitmap_cache_next += size; GameBitmaps[i] = n; } } //@@Dont' do these things which are done when writing //@@for (i=0; i < Num_bitmap_files; i++ ) { //@@ bitmap_index bi; //@@ bi.index = i; //@@ PIGGY_PAGE_IN( bi ); //@@} //@@ //@@piggy_close_file(); piggy_write_pigfile(pigname); Current_pigfile[0] = 0; //say no pig, to force reload piggy_new_pigfile(pigname); //read in just-generated pig } #endif //ifdef EDITOR } #define HAMFILE_ID MAKE_SIG('!','M','A','H') //HAM! #define HAMFILE_VERSION 3 //version 1 -> 2: save marker_model_num //version 2 -> 3: removed sound files #define SNDFILE_ID MAKE_SIG('D','N','S','D') //DSND #define SNDFILE_VERSION 1 int read_hamfile() { int ham_id; int sound_offset = 0; int shareware = 0; auto ham_fp = PHYSFSX_openReadBuffered(DEFAULT_HAMFILE_REGISTERED); if (!ham_fp) { ham_fp = PHYSFSX_openReadBuffered(DEFAULT_HAMFILE_SHAREWARE); if (ham_fp) { shareware = 1; GameArg.SndDigiSampleRate = SAMPLE_RATE_11K; if (CGameArg.SndDisableSdlMixer) { digi_close(); digi_init(); } } } if (!ham_fp) { return 0; } //make sure ham is valid type file & is up-to-date ham_id = PHYSFSX_readInt(ham_fp); Piggy_hamfile_version = PHYSFSX_readInt(ham_fp); if (ham_id != HAMFILE_ID) Error("Cannot open ham file %s or %s\n", DEFAULT_HAMFILE_REGISTERED, DEFAULT_HAMFILE_SHAREWARE); #if 0 if (ham_id != HAMFILE_ID || Piggy_hamfile_version != HAMFILE_VERSION) { Must_write_hamfile = 1; PHYSFS_close(ham_fp); //out of date ham return 0; } #endif if (Piggy_hamfile_version < 3) // hamfile contains sound info, probably PC demo { sound_offset = PHYSFSX_readInt(ham_fp); if (shareware) // deal with interactive PC demo { GameArg.GfxSkipHiresGFX = 1; //CGameArg.SysLowMem = 1; } } #if 1 //ndef EDITOR { int i; bm_read_all(ham_fp); //PHYSFS_read( ham_fp, GameBitmapXlat, sizeof(ushort)*MAX_BITMAP_FILES, 1 ); for (i = 0; i < MAX_BITMAP_FILES; i++) { GameBitmapXlat[i] = PHYSFSX_readShort(ham_fp); if (PHYSFS_eof(ham_fp)) break; } } #endif if (Piggy_hamfile_version < 3) { int N_sounds; int sound_start; int header_size; int i; DiskSoundHeader sndh; digi_sound temp_sound; char temp_name_read[16]; int sbytes = 0; static int justonce = 1; if (!justonce) { return 1; } justonce = 0; PHYSFSX_fseek(ham_fp, sound_offset, SEEK_SET); N_sounds = PHYSFSX_readInt(ham_fp); sound_start = PHYSFS_tell(ham_fp); header_size = N_sounds * sizeof(DiskSoundHeader); //Read sounds for (i=0; i(static_cast(sndh.offset + header_size + sound_start)); SoundOffset[Num_sound_files] = sndh.offset + header_size + sound_start; memcpy( temp_name_read, sndh.name, 8 ); temp_name_read[8] = 0; piggy_register_sound( &temp_sound, temp_name_read, 1 ); if (piggy_is_needed(i)) sbytes += sndh.length; } SoundBits = make_unique(sbytes + 16); } return 1; } static int read_sndfile() { int snd_id,snd_version; int N_sounds; int sound_start; int header_size; int i; DiskSoundHeader sndh; digi_sound temp_sound; char temp_name_read[16]; int sbytes = 0; auto snd_fp = PHYSFSX_openReadBuffered(DEFAULT_SNDFILE); if (!snd_fp) return 0; //make sure soundfile is valid type file & is up-to-date snd_id = PHYSFSX_readInt(snd_fp); snd_version = PHYSFSX_readInt(snd_fp); if (snd_id != SNDFILE_ID || snd_version != SNDFILE_VERSION) { return 0; } N_sounds = PHYSFSX_readInt(snd_fp); sound_start = PHYSFS_tell(snd_fp); header_size = N_sounds*sizeof(DiskSoundHeader); //Read sounds for (i=0; i(static_cast(sndh.offset + header_size + sound_start)); SoundOffset[Num_sound_files] = sndh.offset + header_size + sound_start; memcpy( temp_name_read, sndh.name, 8 ); temp_name_read[8] = 0; piggy_register_sound( &temp_sound, temp_name_read, 1 ); if (piggy_is_needed(i)) sbytes += sndh.length; } SoundBits = make_unique(sbytes + 16); return 1; } int properties_init(void) { int ham_ok=0,snd_ok=0; for (unsigned i = 0; i < MAX_SOUND_FILES; ++i) { GameSounds[i].length = 0; GameSounds[i].data = NULL; SoundOffset[i] = 0; } for (unsigned i = 0; i < MAX_BITMAP_FILES; ++i) { GameBitmapXlat[i] = i; } if ( !bogus_bitmap_initialized ) { ubyte c; bogus_bitmap_initialized = 1; c = gr_find_closest_color( 0, 0, 63 ); bogus_data.fill(c); c = gr_find_closest_color( 63, 0, 0 ); // Make a big red X ! for (unsigned i = 0; i < 64; ++i) { bogus_data[i*64+i] = c; bogus_data[i*64+(63-i)] = c; } gr_init_bitmap(GameBitmaps[Num_bitmap_files], bm_mode::linear, 0, 0, 64, 64, 64, bogus_data.data()); piggy_register_bitmap(&GameBitmaps[Num_bitmap_files], "bogus", 1); bogus_sound.length = 64*64; bogus_sound.data = bogus_data.data(); GameBitmapOffset[0] = 0; } snd_ok = ham_ok = read_hamfile(); if (Piggy_hamfile_version >= 3) { snd_ok = read_sndfile(); if (!snd_ok) Error("Cannot open sound file: %s\n", DEFAULT_SNDFILE); } return (ham_ok && snd_ok); //read ok } #endif static int piggy_is_needed(int soundnum) { int i; if (!CGameArg.SysLowMem) return 1; for (i=0; i lastbuf; for (i=0; i 0 ) { if ( piggy_is_needed(i) ) { PHYSFSX_fseek( Piggy_fp, SoundOffset[i], SEEK_SET ); // Read in the sound data!!! snd->data = ptr; #ifdef ALLEGRO ptr += snd->len; sbytes += snd->len; #else ptr += snd->length; sbytes += snd->length; #endif //Arne's decompress for shareware on all soundcards - Tim@Rikers.org if (pc_shareware) { if (lastsize < SoundCompressed[i]) { MALLOC(lastbuf, uint8_t[], SoundCompressed[i]); } PHYSFS_read( Piggy_fp, lastbuf, SoundCompressed[i], 1 ); sound_decompress(lastbuf.get(), SoundCompressed[i], snd->data); } else #ifdef ALLEGRO PHYSFS_read( Piggy_fp, snd->data, snd->len, 1 ); #else PHYSFS_read( Piggy_fp, snd->data, snd->length, 1 ); #endif } } } } #elif defined(DXX_BUILD_DESCENT_II) void piggy_read_sounds(void) { ubyte * ptr; int i, sbytes; ptr = SoundBits.get(); sbytes = 0; auto fp = PHYSFSX_openReadBuffered(DEFAULT_SNDFILE); if (!fp) return; for (i=0; i 0 ) { if ( piggy_is_needed(i) ) { PHYSFSX_fseek( fp, SoundOffset[i], SEEK_SET ); // Read in the sound data!!! snd->data = ptr; ptr += snd->length; sbytes += snd->length; PHYSFS_read( fp, snd->data, snd->length, 1 ); } else snd->data = (uint8_t *) (-1); } } } #endif void piggy_bitmap_page_in( bitmap_index bitmap ) { grs_bitmap * bmp; int i,org_i; org_i = 0; i = bitmap.index; Assert( i >= 0 ); Assert( i < MAX_BITMAP_FILES ); Assert( i < Num_bitmap_files ); Assert( Piggy_bitmap_cache_size > 0 ); if ( i < 1 ) return; if ( i >= MAX_BITMAP_FILES ) return; if ( i >= Num_bitmap_files ) return; if ( GameBitmapOffset[i] == 0 ) return; // A read-from-disk bitmap!!! if (CGameArg.SysLowMem) { org_i = i; i = GameBitmapXlat[i]; // Xlat for low-memory settings! } bmp = &GameBitmaps[i]; if ( bmp->bm_flags & BM_FLAG_PAGED_OUT ) { pause_game_world_time p; ReDoIt: PHYSFSX_fseek( Piggy_fp, GameBitmapOffset[i], SEEK_SET ); gr_set_bitmap_flags(*bmp, GameBitmapFlags[i]); #if defined(DXX_BUILD_DESCENT_I) gr_set_bitmap_data (*bmp, &Piggy_bitmap_cache_data [Piggy_bitmap_cache_next]); #endif if ( bmp->bm_flags & BM_FLAG_RLE ) { int zsize = PHYSFSX_readInt(Piggy_fp); #if defined(DXX_BUILD_DESCENT_I) // GET JOHN NOW IF YOU GET THIS ASSERT!!! Assert( Piggy_bitmap_cache_next+zsize < Piggy_bitmap_cache_size ); if ( Piggy_bitmap_cache_next+zsize >= Piggy_bitmap_cache_size ) { piggy_bitmap_page_out_all(); goto ReDoIt; } memcpy( &Piggy_bitmap_cache_data[Piggy_bitmap_cache_next], &zsize, sizeof(int) ); Piggy_bitmap_cache_next += sizeof(int); PHYSFS_read( Piggy_fp, &Piggy_bitmap_cache_data[Piggy_bitmap_cache_next], 1, zsize-4 ); if (MacPig) { rle_swap_0_255(*bmp); memcpy(&zsize, bmp->bm_data, 4); } Piggy_bitmap_cache_next += zsize-4; #elif defined(DXX_BUILD_DESCENT_II) int pigsize = PHYSFS_fileLength(Piggy_fp); // GET JOHN NOW IF YOU GET THIS ASSERT!!! //Assert( Piggy_bitmap_cache_next+zsize < Piggy_bitmap_cache_size ); if ( Piggy_bitmap_cache_next+zsize >= Piggy_bitmap_cache_size ) { Int3(); piggy_bitmap_page_out_all(); goto ReDoIt; } PHYSFS_read( Piggy_fp, &Piggy_bitmap_cache_data[Piggy_bitmap_cache_next+4], 1, zsize-4 ); *((int *) (Piggy_bitmap_cache_data + Piggy_bitmap_cache_next)) = INTEL_INT(zsize); gr_set_bitmap_data(*bmp, &Piggy_bitmap_cache_data[Piggy_bitmap_cache_next]); #ifndef MACDATA switch (pigsize) { default: if (!GameArg.EdiMacData) break; // otherwise, fall through... case MAC_ALIEN1_PIGSIZE: case MAC_ALIEN2_PIGSIZE: case MAC_FIRE_PIGSIZE: case MAC_GROUPA_PIGSIZE: case MAC_ICE_PIGSIZE: case MAC_WATER_PIGSIZE: rle_swap_0_255(*bmp); memcpy(&zsize, bmp->bm_data, 4); break; } #endif Piggy_bitmap_cache_next += zsize; if ( Piggy_bitmap_cache_next+zsize >= Piggy_bitmap_cache_size ) { Int3(); piggy_bitmap_page_out_all(); goto ReDoIt; } #endif } else { // GET JOHN NOW IF YOU GET THIS ASSERT!!! Assert( Piggy_bitmap_cache_next+(bmp->bm_h*bmp->bm_w) < Piggy_bitmap_cache_size ); if ( Piggy_bitmap_cache_next+(bmp->bm_h*bmp->bm_w) >= Piggy_bitmap_cache_size ) { piggy_bitmap_page_out_all(); goto ReDoIt; } PHYSFS_read( Piggy_fp, &Piggy_bitmap_cache_data[Piggy_bitmap_cache_next], 1, bmp->bm_h*bmp->bm_w ); #if defined(DXX_BUILD_DESCENT_I) Piggy_bitmap_cache_next+=bmp->bm_h*bmp->bm_w; if (MacPig) swap_0_255(bmp); #elif defined(DXX_BUILD_DESCENT_II) int pigsize = PHYSFS_fileLength(Piggy_fp); gr_set_bitmap_data(*bmp, &Piggy_bitmap_cache_data[Piggy_bitmap_cache_next]); Piggy_bitmap_cache_next+=bmp->bm_h*bmp->bm_w; #ifndef MACDATA switch (pigsize) { default: if (!GameArg.EdiMacData) break; // otherwise, fall through... case MAC_ALIEN1_PIGSIZE: case MAC_ALIEN2_PIGSIZE: case MAC_FIRE_PIGSIZE: case MAC_GROUPA_PIGSIZE: case MAC_ICE_PIGSIZE: case MAC_WATER_PIGSIZE: swap_0_255( bmp ); break; } #endif #endif } //@@if ( bmp->bm_selector ) { //@@#if !defined(WINDOWS) && !defined(MACINTOSH) //@@ if (!dpmi_modify_selector_base( bmp->bm_selector, bmp->bm_data )) //@@ Error( "Error modifying selector base in piggy.c\n" ); //@@#endif //@@} compute_average_rgb(bmp, bmp->avg_color_rgb); } if (CGameArg.SysLowMem) { if ( org_i != i ) GameBitmaps[org_i] = GameBitmaps[i]; } //@@Removed from John's code: //@@#ifndef WINDOWS //@@ if ( bmp->bm_selector ) { //@@ if (!dpmi_modify_selector_base( bmp->bm_selector, bmp->bm_data )) //@@ Error( "Error modifying selector base in piggy.c\n" ); //@@ } //@@#endif } #if 0 void piggy_bitmap_page_out_all() { int i; Piggy_bitmap_cache_next = 0; piggy_page_flushed++; texmerge_flush(); rle_cache_flush(); for (i=0; i 0 ) { // Don't page out bitmaps read from disk!!! GameBitmaps[i].bm_flags = BM_FLAG_PAGED_OUT; #if defined(DXX_BUILD_DESCENT_I) gr_set_bitmap_data (GameBitmaps[i], Piggy_bitmap_cache_data); #elif defined(DXX_BUILD_DESCENT_II) gr_set_bitmap_data(GameBitmaps[i], NULL); #endif } } } #endif void piggy_load_level_data() { piggy_bitmap_page_out_all(); paging_touch_all(); } #if defined(DXX_BUILD_DESCENT_II) #ifdef EDITOR static void piggy_write_pigfile(const char *filename) { int bitmap_data_start, data_offset; DiskBitmapHeader bmh; int org_offset; char subst_name[32]; int i; char tname[FILENAME_LEN]; for (i=0; i < Num_bitmap_files; i++ ) { bitmap_index bi; bi.index = i; PIGGY_PAGE_IN( bi ); } piggy_close_file(); auto pig_fp = PHYSFSX_openWriteBuffered(filename); //open PIG file Assert(pig_fp); write_int(PIGFILE_ID,pig_fp); write_int(PIGFILE_VERSION,pig_fp); Num_bitmap_files--; PHYSFS_write( pig_fp, &Num_bitmap_files, sizeof(int), 1 ); Num_bitmap_files++; bitmap_data_start = PHYSFS_tell(pig_fp); bitmap_data_start += (Num_bitmap_files - 1) * sizeof(DiskBitmapHeader); data_offset = bitmap_data_start; change_filename_extension(tname,filename,"lst"); auto fp1 = PHYSFSX_openWriteBuffered(tname); change_filename_extension(tname,filename,"all"); auto fp2 = PHYSFSX_openWriteBuffered(tname); for (i=1; i < Num_bitmap_files; i++ ) { grs_bitmap *bmp; { char * p, *p1; p = strchr(AllBitmaps[i].name, '#'); if (p) { // this is an ABM == animated bitmap int n; p1 = p; p1++; n = atoi(p1); *p = 0; if (fp2 && n==0) PHYSFSX_printf( fp2, "%s.abm\n", AllBitmaps[i].name ); memcpy( bmh.name, AllBitmaps[i].name, 8 ); Assert( n <= DBM_NUM_FRAMES ); bmh.dflags = DBM_FLAG_ABM + n; *p = '#'; } else { if (fp2) PHYSFSX_printf( fp2, "%s.bbm\n", AllBitmaps[i].name ); memcpy( bmh.name, AllBitmaps[i].name, 8 ); bmh.dflags = 0; } } bmp = &GameBitmaps[i]; Assert( !(bmp->bm_flags&BM_FLAG_PAGED_OUT) ); if (fp1) PHYSFSX_printf( fp1, "BMP: %s, size %d bytes", AllBitmaps[i].name, bmp->bm_rowsize * bmp->bm_h ); org_offset = PHYSFS_tell(pig_fp); bmh.offset = data_offset - bitmap_data_start; PHYSFSX_fseek( pig_fp, data_offset, SEEK_SET ); if ( bmp->bm_flags & BM_FLAG_RLE ) { const auto size = reinterpret_cast(bmp->bm_data); PHYSFS_write( pig_fp, bmp->bm_data, sizeof(ubyte), *size ); data_offset += *size; if (fp1) PHYSFSX_printf( fp1, ", and is already compressed to %d bytes.\n", *size ); } else { PHYSFS_write( pig_fp, bmp->bm_data, sizeof(ubyte), bmp->bm_rowsize * bmp->bm_h ); data_offset += bmp->bm_rowsize * bmp->bm_h; if (fp1) PHYSFSX_printf( fp1, ".\n" ); } PHYSFSX_fseek( pig_fp, org_offset, SEEK_SET ); Assert( GameBitmaps[i].bm_w < 4096 ); bmh.width = (GameBitmaps[i].bm_w & 0xff); bmh.wh_extra = ((GameBitmaps[i].bm_w >> 8) & 0x0f); Assert( GameBitmaps[i].bm_h < 4096 ); bmh.height = GameBitmaps[i].bm_h; bmh.wh_extra |= ((GameBitmaps[i].bm_h >> 4) & 0xf0); bmh.flags = GameBitmaps[i].bm_flags; if (piggy_is_substitutable_bitmap( AllBitmaps[i].name, subst_name )) { bitmap_index other_bitmap; other_bitmap = piggy_find_bitmap( subst_name ); GameBitmapXlat[i] = other_bitmap.index; bmh.flags |= BM_FLAG_PAGED_OUT; } else { bmh.flags &= ~BM_FLAG_PAGED_OUT; } bmh.avg_color=GameBitmaps[i].avg_color; PHYSFS_write(pig_fp, &bmh, sizeof(DiskBitmapHeader), 1); // Mark as a bitmap } PHYSFSX_printf( fp1, " Dumped %d assorted bitmaps.\n", Num_bitmap_files ); } static void write_int(int i, PHYSFS_File *file) { if (PHYSFS_write( file, &i, sizeof(i), 1) != 1) Error( "Error reading int in gamesave.c" ); } #endif #endif void piggy_close() { int i; #if defined(DXX_BUILD_DESCENT_I) custom_close(); #endif piggy_close_file(); BitmapBits.reset(); SoundBits.reset(); for (i = 0; i < Num_sound_files; i++) if (SoundOffset[i] == 0) d_free(GameSounds[i].data); #if defined(DXX_BUILD_DESCENT_II) free_bitmap_replacements(); free_d1_tmap_nums(); #endif } void remove_char( char * s, char c ) { char *p = strchr(s,c); if (p) *p = '\0'; } #if defined(DXX_BUILD_DESCENT_II) #ifdef EDITOR static int piggy_does_bitmap_exist_slow(const char * name ) { int i; for (i=0; i indices; MALLOC( indices, uint16_t[], n_bitmaps ); range_for (auto &i, unchecked_partial_range(indices.get(), n_bitmaps)) i = PHYSFSX_readShort(ifile); bitmap_data_size = PHYSFS_fileLength(ifile) - PHYSFS_tell(ifile) - sizeof(DiskBitmapHeader) * n_bitmaps; Bitmap_replacement_data = make_unique(bitmap_data_size); range_for (const auto i, unchecked_partial_range(indices.get(), n_bitmaps)) { DiskBitmapHeader bmh; grs_bitmap *bm = &GameBitmaps[i]; int width; DiskBitmapHeader_read(&bmh, ifile); width = bmh.width + (static_cast(bmh.wh_extra & 0x0f) << 8); gr_set_bitmap_data(*bm, NULL); // free ogl texture gr_init_bitmap(*bm, bm_mode::linear, 0, 0, width, bmh.height + (static_cast(bmh.wh_extra & 0xf0) << 4), width, NULL); bm->avg_color = bmh.avg_color; bm->bm_data = (uint8_t *) static_cast(bmh.offset); gr_set_bitmap_flags(*bm, bmh.flags & BM_FLAGS_TO_COPY); GameBitmapOffset[i] = 0; // don't try to read bitmap from current pigfile } PHYSFS_read(ifile,Bitmap_replacement_data,1,bitmap_data_size); range_for (const auto i, unchecked_partial_range(indices.get(), n_bitmaps)) { grs_bitmap *bm = &GameBitmaps[i]; gr_set_bitmap_data(*bm, &Bitmap_replacement_data[reinterpret_cast(bm->bm_data)]); } last_palette_loaded_pig[0]= 0; //force pig re-load texmerge_flush(); //for re-merging with new textures } } /* calculate table to translate d1 bitmaps to current palette, * return -1 on error */ static int get_d1_colormap( palette_array_t &d1_palette, array &colormap ) { auto palette_file = PHYSFSX_openReadBuffered(D1_PALETTE); if (!palette_file || PHYSFS_fileLength(palette_file) != 9472) return -1; PHYSFS_read( palette_file, &d1_palette[0], sizeof(d1_palette[0]), d1_palette.size() ); array freq; build_colormap_good( d1_palette, colormap, freq ); // don't change transparencies: colormap[254] = 254; colormap[255] = 255; return 0; } #define JUST_IN_CASE 132 /* is enough for d1 pc registered */ static void bitmap_read_d1( grs_bitmap *bitmap, /* read into this bitmap */ PHYSFS_File *d1_Piggy_fp, /* read from this file */ int bitmap_data_start, /* specific to file */ DiskBitmapHeader *bmh, /* header info for bitmap */ ubyte **next_bitmap, /* where to write it (if 0, use malloc) */ palette_array_t &d1_palette, /* what palette the bitmap has */ array &colormap) /* how to translate bitmap's colors */ { int zsize, pigsize = PHYSFS_fileLength(d1_Piggy_fp); ubyte *data; int width; width = bmh->width + (static_cast(bmh->wh_extra & 0x0f) << 8); gr_set_bitmap_data(*bitmap, NULL); // free ogl texture gr_init_bitmap(*bitmap, bm_mode::linear, 0, 0, width, bmh->height + (static_cast(bmh->wh_extra & 0xf0) << 4), width, NULL); bitmap->avg_color = bmh->avg_color; gr_set_bitmap_flags(*bitmap, bmh->flags & BM_FLAGS_TO_COPY); PHYSFSX_fseek(d1_Piggy_fp, bitmap_data_start + bmh->offset, SEEK_SET); if (bmh->flags & BM_FLAG_RLE) { zsize = PHYSFSX_readInt(d1_Piggy_fp); PHYSFSX_fseek(d1_Piggy_fp, -4, SEEK_CUR); } else zsize = bitmap->bm_h * bitmap->bm_w; if (next_bitmap) { data = *next_bitmap; *next_bitmap += zsize; } else { MALLOC(data, ubyte, zsize + JUST_IN_CASE); } if (!data) return; PHYSFS_read(d1_Piggy_fp, data, 1, zsize); gr_set_bitmap_data(*bitmap, data); switch(pigsize) { case D1_MAC_PIGSIZE: case D1_MAC_SHARE_PIGSIZE: if (bmh->flags & BM_FLAG_RLE) rle_swap_0_255(*bitmap); else swap_0_255(bitmap); } if (bmh->flags & BM_FLAG_RLE) rle_remap(*bitmap, colormap); else gr_remap_bitmap_good(*bitmap, d1_palette, TRANSPARENCY_COLOR, -1); if (bmh->flags & BM_FLAG_RLE) { // size of bitmap could have changed! int new_size; memcpy(&new_size, bitmap->bm_data, 4); if (next_bitmap) { *next_bitmap += new_size - zsize; } else { Assert( zsize + JUST_IN_CASE >= new_size ); bitmap->bm_mdata = (uint8_t *) d_realloc(bitmap->bm_mdata, new_size); Assert(bitmap->bm_data); } } } #define D1_MAX_TEXTURES 800 #define D1_MAX_TMAP_NUM 1630 // 1621 in descent.pig Mac registered /* the inverse of the d2 Textures array, but for the descent 1 pigfile. * "Textures" looks up a d2 bitmap index given a d2 tmap_num. * "d1_tmap_nums" looks up a d1 tmap_num given a d1 bitmap. "-1" means "None". */ typedef array d1_tmap_nums_t; static std::unique_ptr d1_tmap_nums; static void free_d1_tmap_nums() { d1_tmap_nums.reset(); } static void bm_read_d1_tmap_nums(PHYSFS_File *d1pig) { int i, d1_index; PHYSFSX_fseek(d1pig, 8, SEEK_SET); d1_tmap_nums = make_unique(); d1_tmap_nums->fill(-1); for (i = 0; i < D1_MAX_TEXTURES; i++) { d1_index = PHYSFSX_readShort(d1pig); Assert(d1_index >= 0 && d1_index < D1_MAX_TMAP_NUM); (*d1_tmap_nums)[d1_index] = i; if (PHYSFS_eof(d1pig)) break; } } // this function is at the same position in the d1 shareware piggy loading // algorithm as bm_load_sub in main/bmread.c static int get_d1_bm_index(char *filename, PHYSFS_File *d1_pig) { int i, N_bitmaps; DiskBitmapHeader bmh; if (strchr (filename, '.')) *strchr (filename, '.') = '\0'; // remove extension PHYSFSX_fseek (d1_pig, 0, SEEK_SET); N_bitmaps = PHYSFSX_readInt (d1_pig); PHYSFSX_fseek (d1_pig, 8, SEEK_SET); for (i = 1; i <= N_bitmaps; i++) { DiskBitmapHeader_d1_read(&bmh, d1_pig); if (!d_strnicmp(bmh.name, filename, 8)) return i; } return -1; } // imitate the algorithm of gamedata_read_tbl in main/bmread.c static void read_d1_tmap_nums_from_hog(PHYSFS_File *d1_pig) { #define LINEBUF_SIZE 600 int reading_textures = 0; short texture_count = 0; int bitmaps_tbl_is_binary = 0; int i; auto bitmaps = PHYSFSX_openReadBuffered("bitmaps.tbl"); if (!bitmaps) { bitmaps = PHYSFSX_openReadBuffered ("bitmaps.bin"); bitmaps_tbl_is_binary = 1; } if (!bitmaps) { Warning ("Could not find bitmaps.* for reading d1 textures"); return; } d1_tmap_nums = make_unique(); d1_tmap_nums->fill(-1); for (PHYSFSX_gets_line_t inputline; PHYSFSX_fgets (inputline, bitmaps);) { char *arg; if (bitmaps_tbl_is_binary) decode_text_line((inputline)); else while (inputline[(i=strlen(inputline))-2]=='\\') PHYSFSX_fgets(inputline,bitmaps,i-2); // strip comments REMOVE_EOL(inputline); if (strchr(inputline, ';')!=NULL) REMOVE_COMMENTS(inputline); if (strlen(inputline) == LINEBUF_SIZE-1) { Warning("Possible line truncation in BITMAPS.TBL"); return; } arg = strtok( inputline, space_tab ); if (arg && arg[0] == '@') { arg++; //Registered_only = 1; } while (arg != NULL) { if (*arg == '$') reading_textures = 0; // default if (!strcmp(arg, "$TEXTURES")) // BM_TEXTURES reading_textures = 1; else if (! d_stricmp(arg, "$ECLIP") // BM_ECLIP || ! d_stricmp(arg, "$WCLIP")) // BM_WCLIP texture_count++; else // not a special token, must be a bitmap! if (reading_textures) { while (*arg == '\t' || *arg == ' ') arg++;//remove unwanted blanks if (*arg == '\0') break; if (d1_tmap_num_unique(texture_count)) { int d1_index = get_d1_bm_index(arg, d1_pig); if (d1_index >= 0 && d1_index < D1_MAX_TMAP_NUM) { (*d1_tmap_nums)[d1_index] = texture_count; //int d2_index = d2_index_for_d1_index(d1_index); } } Assert (texture_count < D1_MAX_TEXTURES); texture_count++; } arg = strtok (NULL, equal_space); } } } /* If the given d1_index is the index of a bitmap we have to load * (because it is unique to descent 1), then returns the d2_index that * the given d1_index replaces. * Returns -1 if the given d1_index is not unique to descent 1. */ static short d2_index_for_d1_index(short d1_index) { Assert(d1_index >= 0 && d1_index < D1_MAX_TMAP_NUM); if (! d1_tmap_nums || (*d1_tmap_nums)[d1_index] == -1 || ! d1_tmap_num_unique((*d1_tmap_nums)[d1_index])) return -1; return Textures[convert_d1_tmap_num((*d1_tmap_nums)[d1_index])].index; } #define D1_BITMAPS_SIZE 300000 void load_d1_bitmap_replacements() { DiskBitmapHeader bmh; int pig_data_start, bitmap_header_start, bitmap_data_start; int N_bitmaps; short d1_index, d2_index; ubyte* next_bitmap; palette_array_t d1_palette; char *p; int pigsize; auto d1_Piggy_fp = PHYSFSX_openReadBuffered(D1_PIGFILE); #define D1_PIG_LOAD_FAILED "Failed loading " D1_PIGFILE if (!d1_Piggy_fp) { Warning(D1_PIG_LOAD_FAILED); return; } //first, free up data allocated for old bitmaps free_bitmap_replacements(); array colormap; if (get_d1_colormap( d1_palette, colormap ) != 0) Warning("Could not load descent 1 color palette"); pigsize = PHYSFS_fileLength(d1_Piggy_fp); switch (pigsize) { case D1_SHARE_BIG_PIGSIZE: case D1_SHARE_10_PIGSIZE: case D1_SHARE_PIGSIZE: case D1_10_BIG_PIGSIZE: case D1_10_PIGSIZE: pig_data_start = 0; // OK, now we need to read d1_tmap_nums by emulating d1's gamedata_read_tbl() read_d1_tmap_nums_from_hog(d1_Piggy_fp); break; default: Warning("Unknown size for " D1_PIGFILE); Int3(); // fall through case D1_PIGSIZE: case D1_OEM_PIGSIZE: case D1_MAC_PIGSIZE: case D1_MAC_SHARE_PIGSIZE: pig_data_start = PHYSFSX_readInt(d1_Piggy_fp ); bm_read_d1_tmap_nums(d1_Piggy_fp); //was: bm_read_all_d1(fp); //for (i = 0; i < 1800; i++) GameBitmapXlat[i] = PHYSFSX_readShort(d1_Piggy_fp); break; } PHYSFSX_fseek( d1_Piggy_fp, pig_data_start, SEEK_SET ); N_bitmaps = PHYSFSX_readInt(d1_Piggy_fp); { int N_sounds = PHYSFSX_readInt(d1_Piggy_fp); int header_size = N_bitmaps * DISKBITMAPHEADER_D1_SIZE + N_sounds * sizeof(DiskSoundHeader); bitmap_header_start = pig_data_start + 2 * sizeof(int); bitmap_data_start = bitmap_header_start + header_size; } Bitmap_replacement_data = make_unique(D1_BITMAPS_SIZE); if (!Bitmap_replacement_data) { Warning(D1_PIG_LOAD_FAILED); return; } next_bitmap = Bitmap_replacement_data.get(); for (d1_index = 1; d1_index <= N_bitmaps; d1_index++ ) { d2_index = d2_index_for_d1_index(d1_index); // only change bitmaps which are unique to d1 if (d2_index != -1) { PHYSFSX_fseek(d1_Piggy_fp, bitmap_header_start + (d1_index-1) * DISKBITMAPHEADER_D1_SIZE, SEEK_SET); DiskBitmapHeader_d1_read(&bmh, d1_Piggy_fp); bitmap_read_d1( &GameBitmaps[d2_index], d1_Piggy_fp, bitmap_data_start, &bmh, &next_bitmap, d1_palette, colormap ); Assert(next_bitmap - Bitmap_replacement_data.get() < D1_BITMAPS_SIZE); GameBitmapOffset[d2_index] = 0; // don't try to read bitmap from current d2 pigfile GameBitmapFlags[d2_index] = bmh.flags; if ( (p = strchr(AllBitmaps[d2_index].name, '#')) /* d2 BM is animated */ && !(bmh.dflags & DBM_FLAG_ABM) ) { /* d1 bitmap is not animated */ int i, len = p - AllBitmaps[d2_index].name; for (i = 0; i < Num_bitmap_files; i++) if (i != d2_index && ! memcmp(AllBitmaps[d2_index].name, AllBitmaps[i].name, len)) { gr_set_bitmap_data(GameBitmaps[i], NULL); // free ogl texture GameBitmaps[i] = GameBitmaps[d2_index]; GameBitmapOffset[i] = 0; GameBitmapFlags[i] = bmh.flags; } } } } last_palette_loaded_pig[0]= 0; //force pig re-load texmerge_flush(); //for re-merging with new textures } /* * Find and load the named bitmap from descent.pig * similar to read_extra_bitmap_iff */ bitmap_index read_extra_bitmap_d1_pig(const char *name) { bitmap_index bitmap_num; grs_bitmap * n = &GameBitmaps[extra_bitmap_num]; bitmap_num.index = 0; { DiskBitmapHeader bmh; int pig_data_start, bitmap_header_start, bitmap_data_start; int i, N_bitmaps; palette_array_t d1_palette; int pigsize; auto d1_Piggy_fp = PHYSFSX_openReadBuffered(D1_PIGFILE); if (!d1_Piggy_fp) { Warning(D1_PIG_LOAD_FAILED); return bitmap_num; } array colormap; if (get_d1_colormap( d1_palette, colormap ) != 0) Warning("Could not load descent 1 color palette"); pigsize = PHYSFS_fileLength(d1_Piggy_fp); switch (pigsize) { case D1_SHARE_BIG_PIGSIZE: case D1_SHARE_10_PIGSIZE: case D1_SHARE_PIGSIZE: case D1_10_BIG_PIGSIZE: case D1_10_PIGSIZE: pig_data_start = 0; break; default: Warning("Unknown size for " D1_PIGFILE); Int3(); // fall through case D1_PIGSIZE: case D1_OEM_PIGSIZE: case D1_MAC_PIGSIZE: case D1_MAC_SHARE_PIGSIZE: pig_data_start = PHYSFSX_readInt(d1_Piggy_fp ); break; } PHYSFSX_fseek( d1_Piggy_fp, pig_data_start, SEEK_SET ); N_bitmaps = PHYSFSX_readInt(d1_Piggy_fp); { int N_sounds = PHYSFSX_readInt(d1_Piggy_fp); int header_size = N_bitmaps * DISKBITMAPHEADER_D1_SIZE + N_sounds * sizeof(DiskSoundHeader); bitmap_header_start = pig_data_start + 2 * sizeof(int); bitmap_data_start = bitmap_header_start + header_size; } for (i = 1; i <= N_bitmaps; i++) { DiskBitmapHeader_d1_read(&bmh, d1_Piggy_fp); if (!d_strnicmp(bmh.name, name, 8)) break; } if (d_strnicmp(bmh.name, name, 8)) { con_printf(CON_DEBUG, "could not find bitmap %s", name); return bitmap_num; } bitmap_read_d1( n, d1_Piggy_fp, bitmap_data_start, &bmh, 0, d1_palette, colormap ); } n->avg_color = 0; //compute_average_pixel(n); bitmap_num.index = extra_bitmap_num; GameBitmaps[extra_bitmap_num++] = *n; return bitmap_num; } #endif /* * reads a bitmap_index structure from a PHYSFS_File */ void bitmap_index_read(PHYSFS_File *fp, bitmap_index &bi) { bi.index = PHYSFSX_readShort(fp); } /* * reads n bitmap_index structs from a PHYSFS_File */ void bitmap_index_read_n(PHYSFS_File *fp, const partial_range_t r) { range_for (auto &i, r) i.index = PHYSFSX_readShort(fp); }