// "Build Engine & Tools" Copyright (c) 1993-1997 Ken Silverman // Ken Silverman's official web site: "http://www.advsys.net/ken" // See the included license file "BUILDLIC.TXT" for license info. // // This file has been modified from Ken Silverman's original release // by Jonathon Fowler (jf@jonof.id.au) #pragma once #ifndef build_h_ #define build_h_ #if !defined __cplusplus || (__cplusplus < 201103L && !defined _MSC_VER) # error C++11 or greater is required. #endif #if defined _MSC_VER && _MSC_VER < 1800 # error Visual Studio 2013 is the minimum supported version. #endif #include "compat.h" #include "pragmas.h" #include "glad/glad.h" #include "glbuild.h" #include "palette.h" #ifdef __cplusplus extern "C" { #endif enum rendmode_t { REND_CLASSIC, REND_POLYMOST = 3, REND_POLYMER }; #define PI 3.14159265358979323846 #define fPI 3.14159265358979323846f #define MAXSECTORSV8 4096 #define MAXWALLSV8 16384 #define MAXSPRITESV8 16384 #define MAXSECTORSV7 1024 #define MAXWALLSV7 8192 #define MAXSPRITESV7 4096 #if !defined GEKKO && !defined __OPENDINGUX__ # define MAXSECTORS MAXSECTORSV8 # define MAXWALLS MAXWALLSV8 # define MAXSPRITES MAXSPRITESV8 # define MAXXDIM 7680 # define MAXYDIM 3200 # define MINXDIM 640 # define MINYDIM 480 // additional space beyond wall, in walltypes: # define M32_FIXME_WALLS 512 # define M32_FIXME_SECTORS 2 #else # define MAXSECTORS MAXSECTORSV7 # define MAXWALLS MAXWALLSV7 # define MAXSPRITES MAXSPRITESV7 #ifdef GEKKO # define MAXXDIM 860 # define MAXYDIM 490 # else # define MAXXDIM 320 # define MAXYDIM 200 # endif # define MINXDIM MAXXDIM # define MINYDIM MAXYDIM # define M32_FIXME_WALLS 0 # define M32_FIXME_SECTORS 0 #endif #ifdef LUNATIC # define NEW_MAP_FORMAT // A marker for LuaJIT C function callbacks, but not merely: # define LUNATIC_CB ATTRIBUTE((used)) // Used for variables and functions referenced from Lua: # define LUNATIC_EXTERN ATTRIBUTE((used)) # define LUNATIC_FASTCALL #else # ifdef NEW_MAP_FORMAT # error "New map format can only be used with Lunatic" # endif # define LUNATIC_EXTERN static # define LUNATIC_FASTCALL __fastcall #endif #define MAXWALLSB ((MAXWALLS>>2)+(MAXWALLS>>3)) #define MAXTILES 30720 #define MAXUSERTILES (MAXTILES-16) // reserve 16 tiles at the end #define MAXVOXELS 1024 #define MAXSTATUS 1024 #define MAXPLAYERS 16 // Maximum number of component tiles in a multi-psky: #define MAXPSKYTILES 8 #define MAXSPRITESONSCREEN 2048 #define MAXUNIQHUDID 256 //Extra slots so HUD models can store animation state without messing game sprites #define TSPR_TEMP 99 #define PR_LIGHT_PRIO_MAX 0 #define PR_LIGHT_PRIO_MAX_GAME 1 #define PR_LIGHT_PRIO_HIGH 2 #define PR_LIGHT_PRIO_HIGH_GAME 3 #define PR_LIGHT_PRIO_LOW 4 #define PR_LIGHT_PRIO_LOW_GAME 5 // Convenient sprite iterators, must not be used if any sprites inside the loop // are potentially deleted or their sector changed... #define SPRITES_OF(Statnum, Iter) Iter=headspritestat[Statnum]; Iter>=0; Iter=nextspritestat[Iter] #define SPRITES_OF_SECT(Sectnum, Iter) Iter=headspritesect[Sectnum]; Iter>=0; Iter=nextspritesect[Iter] // ... in which case this iterator may be used: #define SPRITES_OF_SECT_SAFE(Sectnum, Iter, Next) Iter=headspritesect[Sectnum]; \ Iter>=0 && (Next=nextspritesect[Iter], 1); Iter=Next #define SPRITES_OF_STAT_SAFE(Statnum, Iter, Next) Iter=headspritestat[Statnum]; \ Iter>=0 && (Next=nextspritestat[Iter], 1); Iter=Next #define CLEARLINES2D(Startline, Numlines, Color) \ clearbuf((char *)(frameplace + ((Startline)*bytesperline)), (bytesperline*(Numlines))>>2, (Color)) ////////// True Room over Room (YAX == rot -17 of "PRO") ////////// #define YAX_ENABLE //#define YAX_DEBUG //#define ENGINE_SCREENSHOT_DEBUG #ifdef YAX_ENABLE # if !defined NEW_MAP_FORMAT # define YAX_ENABLE__COMPAT # endif #endif ////////// yax defs ////////// #define SECTORFLD(Sect,Fld, Cf) (*((Cf) ? (§or[Sect].floor##Fld) : (§or[Sect].ceiling##Fld))) #define YAX_CEILING 0 // don't change! #define YAX_FLOOR 1 // don't change! # ifdef NEW_MAP_FORMAT # define YAX_MAXBUNCHES 512 # define YAX_BIT__COMPAT 1024 # define YAX_NEXTWALLBIT__COMPAT(Cf) (1<<(10+Cf)) # define YAX_NEXTWALLBITS__COMPAT (YAX_NEXTWALLBIT__COMPAT(0)|YAX_NEXTWALLBIT__COMPAT(1)) # else # define YAX_MAXBUNCHES 256 # define YAX_BIT 1024 // "has next wall when constrained"-bit (1<<10: ceiling, 1<<11: floor) # define YAX_NEXTWALLBIT(Cf) (1<<(10+Cf)) # define YAX_NEXTWALLBITS (YAX_NEXTWALLBIT(0)|YAX_NEXTWALLBIT(1)) # endif int32_t get_alwaysshowgray(void); // editor only void yax_updategrays(int32_t posze); #ifdef YAX_ENABLE # ifdef NEW_MAP_FORMAT // New map format -- no hijacking of otherwise used members. # define YAX_PTRNEXTWALL(Ptr, Wall, Cf) (*(&Ptr[Wall].upwall + Cf)) # define YAX_NEXTWALLDEFAULT(Cf) (-1) # else // More user tag hijacking: lotag/extra. :/ # define YAX_PTRNEXTWALL(Ptr, Wall, Cf) (*(int16_t *)(&Ptr[Wall].lotag + 2*Cf)) # define YAX_NEXTWALLDEFAULT(Cf) (((Cf)==YAX_CEILING) ? 0 : -1) extern int16_t yax_bunchnum[MAXSECTORS][2]; extern int16_t yax_nextwall[MAXWALLS][2]; # endif # define YAX_NEXTWALL(Wall, Cf) YAX_PTRNEXTWALL(wall, Wall, Cf) # define YAX_ITER_WALLS(Wal, Itervar, Cfvar) Cfvar=0, Itervar=(Wal); Itervar!=-1; \ Itervar=yax_getnextwall(Itervar, Cfvar), \ (void)(Itervar==-1 && Cfvar==0 && (Cfvar=1) && (Itervar=yax_getnextwall((Wal), Cfvar))) # define SECTORS_OF_BUNCH(Bunchnum, Cf, Itervar) Itervar = headsectbunch[Cf][Bunchnum]; \ Itervar != -1; Itervar = nextsectbunch[Cf][Itervar] extern int32_t r_tror_nomaskpass; # ifdef NEW_MAP_FORMAT // Moved below declarations of sector, wall, sprite. # else int16_t yax_getbunch(int16_t i, int16_t cf); static FORCE_INLINE void yax_getbunches(int16_t i, int16_t *cb, int16_t *fb) { *cb = yax_getbunch(i, YAX_CEILING); *fb = yax_getbunch(i, YAX_FLOOR); } int16_t yax_getnextwall(int16_t wal, int16_t cf); void yax_setnextwall(int16_t wal, int16_t cf, int16_t thenextwall); # endif void yax_setbunch(int16_t i, int16_t cf, int16_t bunchnum); void yax_setbunches(int16_t i, int16_t cb, int16_t fb); int16_t yax_vnextsec(int16_t line, int16_t cf); void yax_update(int32_t resetstat); int32_t yax_getneighborsect(int32_t x, int32_t y, int32_t sectnum, int32_t cf); static FORCE_INLINE int32_t yax_waltosecmask(int32_t walclipmask) { // blocking: walstat&1 --> secstat&512 // hitscan: walstat&64 --> secstat&2048 return ((walclipmask&1)<<9) | ((walclipmask&64)<<5); } void yax_preparedrawrooms(void); void yax_drawrooms(void (*SpriteAnimFunc)(int32_t,int32_t,int32_t,int32_t), int16_t sectnum, int32_t didmirror, int32_t smoothr); # define YAX_SKIPSECTOR(i) if (graysectbitmap[(i)>>3]&(1<<((i)&7))) continue # define YAX_SKIPWALL(i) if (graywallbitmap[(i)>>3]&(1<<((i)&7))) continue #else # define yax_preparedrawrooms() # define yax_drawrooms(SpriteAnimFunc, sectnum, didmirror, smoothr) # define YAX_SKIPSECTOR(i) (i)=(i) # define YAX_SKIPWALL(i) (i)=(i) #endif #define CLIPMASK0 (((1L)<<16)+1L) #define CLIPMASK1 (((256L)<<16)+64L) // max x/y val (= max editorgridextent in Mapster32) #define BXY_MAX 524288 // rotatesprite 'orientation' (actually much more) bits enum { RS_TRANS1 = 1, RS_AUTO = 2, RS_YFLIP = 4, RS_NOCLIP = 8, RS_TOPLEFT = 16, RS_TRANS2 = 32, RS_NOMASK = 64, RS_PERM = 128, RS_ALIGN_L = 256, RS_ALIGN_R = 512, RS_ALIGN_MASK = 768, RS_STRETCH = 1024, ROTATESPRITE_FULL16 = 2048, // ROTATESPRITE_MAX-1 is the mask of all externally available orientation bits ROTATESPRITE_MAX = 4096, RS_CENTERORIGIN = (1<<30), }; //Make all variables in BUILD.H defined in the ENGINE, //and externed in GAME #ifdef ENGINE # define EXTERN #else # define EXTERN extern #endif #ifdef __cplusplus static FORCE_INLINE void sector_tracker_hook(uintptr_t address); static FORCE_INLINE void wall_tracker_hook(uintptr_t address); static FORCE_INLINE void sprite_tracker_hook(uintptr_t address); } #define TRACKER_NAME_ SectorTracker #define TRACKER_GLOBAL_HOOK_ sector_tracker_hook #include "tracker.hpp" #undef TRACKER_NAME_ #undef TRACKER_GLOBAL_HOOK_ #define TRACKER_NAME_ WallTracker #define TRACKER_GLOBAL_HOOK_ wall_tracker_hook #include "tracker.hpp" #undef TRACKER_NAME_ #undef TRACKER_GLOBAL_HOOK_ #define TRACKER_NAME_ SpriteTracker #define TRACKER_GLOBAL_HOOK_ sprite_tracker_hook #include "tracker.hpp" #undef TRACKER_NAME_ #undef TRACKER_GLOBAL_HOOK_ #define Tracker(Container, Type) Container##Tracker #define TrackerCast(x) x.cast() #else #define Tracker(Container, Type) Type #define TrackerCast(x) x #endif // __cplusplus // Links to various ABIs specifying (or documenting non-normatively) the // alignment requirements of aggregates: // // System V AMD64: http://www.x86-64.org/documentation/abi-0.99.pdf // (x86-64.org down as of 2013-02-02?) // "An array uses the same alignment as its elements, except that a local or global // array variable of length at least 16 bytes or a C99 variable-length array variable // always has alignment of at least 16 bytes." // (Not reproducible with GCC or LuaJIT on Ubuntu) // // Win64: http://msdn.microsoft.com/en-us/library/9dbwhz68.aspx // // x86: http://en.wikipedia.org/wiki/Data_structure_alignment#Typical_alignment_of_C_structs_on_x86 enum { SPR_XFLIP = 4, SPR_YFLIP = 8, SPR_WALL = 16, SPR_FLOOR = 32, SPR_ALIGN_MASK = 32+16, }; #include "buildtypes.h" #define UNTRACKED_STRUCTS #undef buildtypes_h__ #include "buildtypes.h" #undef UNTRACKED_STRUCTS #if !defined NEW_MAP_FORMAT typedef sectortypev7 sectortype; typedef usectortypev7 usectortype; typedef walltypev7 walltype; typedef uwalltypev7 uwalltype; #else typedef sectortypevx sectortype; typedef usectortypevx usectortype; typedef walltypevx walltype; typedef uwalltypevx uwalltype; #endif // this is probably never going to be necessary EDUKE32_STATIC_ASSERT(sizeof(sectortype) == sizeof(usectortype)); EDUKE32_STATIC_ASSERT(sizeof(walltype) == sizeof(uwalltype)); EDUKE32_STATIC_ASSERT(sizeof(spritetype) == sizeof(uspritetype)); #ifdef NEW_MAP_FORMAT # define SECTORVX_SZ1 offsetof(sectortypevx, ceilingpicnum) # define SECTORVX_SZ4 sizeof(sectortypevx)-offsetof(sectortypevx, visibility) static inline void copy_v7_from_vx_sector(usectortypev7 *v7sec, const sectortypevx *vxsec) { /* [wallptr..wallnum] */ Bmemcpy(v7sec, vxsec, SECTORVX_SZ1); /* ceiling* */ v7sec->ceilingpicnum = vxsec->ceilingpicnum; v7sec->ceilingheinum = vxsec->ceilingheinum; v7sec->ceilingstat = vxsec->ceilingstat; v7sec->ceilingz = vxsec->ceilingz; v7sec->ceilingshade = vxsec->ceilingshade; v7sec->ceilingpal = vxsec->ceilingpal; v7sec->ceilingxpanning = vxsec->ceilingxpanning; v7sec->ceilingypanning = vxsec->ceilingypanning; /* floor* */ v7sec->floorpicnum = vxsec->floorpicnum; v7sec->floorheinum = vxsec->floorheinum; v7sec->floorstat = vxsec->floorstat; v7sec->floorz = vxsec->floorz; v7sec->floorshade = vxsec->floorshade; v7sec->floorpal = vxsec->floorpal; v7sec->floorxpanning = vxsec->floorxpanning; v7sec->floorypanning = vxsec->floorypanning; /* [visibility..extra] */ Bmemcpy(&v7sec->visibility, &vxsec->visibility, SECTORVX_SZ4); /* Clear YAX_BIT of ceiling and floor. (New-map format build saves TROR * maps as map-text.) */ v7sec->ceilingstat &= ~YAX_BIT__COMPAT; v7sec->floorstat &= ~YAX_BIT__COMPAT; } static inline void inplace_vx_from_v7_sector(sectortypevx *vxsec) { const sectortypev7 *v7sec = (sectortypev7 *)vxsec; usectortypev7 bakv7sec; // Can't do this in-place since the members were rearranged. Bmemcpy(&bakv7sec, v7sec, sizeof(sectortypev7)); /* [wallptr..wallnum] is already at the right place */ /* ceiling* */ vxsec->ceilingpicnum = bakv7sec.ceilingpicnum; vxsec->ceilingheinum = bakv7sec.ceilingheinum; vxsec->ceilingstat = bakv7sec.ceilingstat; vxsec->ceilingz = bakv7sec.ceilingz; vxsec->ceilingshade = bakv7sec.ceilingshade; vxsec->ceilingpal = bakv7sec.ceilingpal; vxsec->ceilingxpanning = bakv7sec.ceilingxpanning; vxsec->ceilingypanning = bakv7sec.ceilingypanning; /* floor* */ vxsec->floorpicnum = bakv7sec.floorpicnum; vxsec->floorheinum = bakv7sec.floorheinum; vxsec->floorstat = bakv7sec.floorstat; vxsec->floorz = bakv7sec.floorz; vxsec->floorshade = bakv7sec.floorshade; vxsec->floorpal = bakv7sec.floorpal; vxsec->floorxpanning = bakv7sec.floorxpanning; vxsec->floorypanning = bakv7sec.floorypanning; /* [visibility..extra] */ Bmemmove(&vxsec->visibility, &bakv7sec.visibility, SECTORVX_SZ4); } static inline void inplace_vx_tweak_sector(sectortypevx *vxsec, int32_t yaxp) { if (yaxp) { int32_t cisext = (vxsec->ceilingstat&YAX_BIT__COMPAT); int32_t fisext = (vxsec->floorstat&YAX_BIT__COMPAT); vxsec->ceilingbunch = cisext ? vxsec->ceilingxpanning : -1; vxsec->floorbunch = fisext ? vxsec->floorxpanning : -1; if (cisext) vxsec->ceilingxpanning = 0; if (fisext) vxsec->floorxpanning = 0; } else { vxsec->ceilingbunch = vxsec->floorbunch = -1; } /* Clear YAX_BIT of ceiling and floor (map-int VX doesn't use it). */ vxsec->ceilingstat &= ~YAX_BIT__COMPAT; vxsec->floorstat &= ~YAX_BIT__COMPAT; } # undef SECTORVX_SZ1 # undef SECTORVX_SZ4 # define WALLVX_SZ2 offsetof(walltypevx, blend)-offsetof(walltypevx, cstat) static inline void copy_v7_from_vx_wall(uwalltypev7 *v7wal, const walltypevx *vxwal) { /* [x..nextsector] */ Bmemcpy(v7wal, vxwal, offsetof(walltypevx, upwall)); /* [cstat..extra] */ Bmemcpy(&v7wal->cstat, &vxwal->cstat, WALLVX_SZ2); /* Clear YAX_NEXTWALLBITS. */ v7wal->cstat &= ~YAX_NEXTWALLBITS__COMPAT; } static inline void inplace_vx_from_v7_wall(walltypevx *vxwal) { const walltypev7 *v7wal = (walltypev7 *)vxwal; /* [cstat..extra] */ Bmemmove(&vxwal->cstat, &v7wal->cstat, WALLVX_SZ2); vxwal->blend = vxwal->filler_ = 0; } static inline void inplace_vx_tweak_wall(walltypevx *vxwal, int32_t yaxp) { if (yaxp) { int32_t haveupwall = (vxwal->cstat & YAX_NEXTWALLBIT__COMPAT(YAX_CEILING)); int32_t havednwall = (vxwal->cstat & YAX_NEXTWALLBIT__COMPAT(YAX_FLOOR)); vxwal->upwall = haveupwall ? vxwal->lotag : -1; vxwal->dnwall = havednwall ? vxwal->extra : -1; if (haveupwall) vxwal->lotag = 0; if (havednwall) vxwal->extra = -1; } else { vxwal->upwall = vxwal->dnwall = -1; } /* Clear YAX_NEXTWALLBITS (map-int VX doesn't use it). */ vxwal->cstat &= ~YAX_NEXTWALLBITS__COMPAT; } # undef WALLVX_SZ2 #endif #include "clip.h" #ifdef __cplusplus extern "C" { #endif typedef struct { uint32_t mdanimtims; int16_t mdanimcur; int16_t angoff, pitch, roll; vec3_t offset; uint8_t flags; uint8_t xpanning, ypanning; uint8_t filler; float alpha; // NOTE: keep 'tspr' on an 8-byte boundary: uspritetype *tspr; #if !defined UINTPTR_MAX # error Need UINTPTR_MAX define to select between 32- and 64-bit structs #endif #if UINTPTR_MAX == 0xffffffff /* On a 32-bit build, pad the struct so it has the same size everywhere. */ intptr_t dummy_; #endif } spriteext_t; typedef struct { float smoothduration; int16_t mdcurframe, mdoldframe; int16_t mdsmooth; uint8_t filler[2]; } spritesmooth_t; #ifndef NEW_MAP_FORMAT typedef struct { uint8_t blend; } wallext_t; #endif #define SPREXT_NOTMD 1 #define SPREXT_NOMDANIM 2 #define SPREXT_AWAY1 4 #define SPREXT_AWAY2 8 #define SPREXT_TSPRACCESS 16 #define SPREXT_TEMPINVISIBLE 32 #define TSPR_EXTRA_MDHACK 1 EXTERN int32_t guniqhudid; EXTERN int32_t spritesortcnt; extern int32_t g_loadedMapVersion; typedef struct { char *mhkfile; char *title; uint8_t md4[16]; } usermaphack_t; extern usermaphack_t g_loadedMapHack; extern int compare_usermaphacks(const void *, const void *); extern usermaphack_t *usermaphacks; extern int32_t num_usermaphacks; #if !defined DEBUG_MAIN_ARRAYS EXTERN spriteext_t *spriteext; EXTERN spritesmooth_t *spritesmooth; # ifndef NEW_MAP_FORMAT EXTERN wallext_t *wallext; # endif EXTERN sectortype *sector; EXTERN walltype *wall; EXTERN spritetype *sprite; EXTERN uspritetype *tsprite; #else EXTERN spriteext_t spriteext[MAXSPRITES+MAXUNIQHUDID]; EXTERN spritesmooth_t spritesmooth[MAXSPRITES+MAXUNIQHUDID]; # ifndef NEW_MAP_FORMAT EXTERN wallext_t wallext[MAXWALLS]; # endif EXTERN sectortype sector[MAXSECTORS + M32_FIXME_SECTORS]; EXTERN walltype wall[MAXWALLS + M32_FIXME_WALLS]; EXTERN spritetype sprite[MAXSPRITES]; EXTERN uspritetype tsprite[MAXSPRITESONSCREEN]; #endif EXTERN uint32_t sectorchanged[MAXSECTORS + M32_FIXME_SECTORS]; EXTERN uint32_t wallchanged[MAXWALLS + M32_FIXME_WALLS]; EXTERN uint32_t spritechanged[MAXSPRITES]; #ifdef NEW_MAP_FORMAT static FORCE_INLINE int16_t yax_getbunch(int16_t i, int16_t cf) { return cf ? sector[i].floorbunch : sector[i].ceilingbunch; } static FORCE_INLINE void yax_getbunches(int16_t i, int16_t *cb, int16_t *fb) { *cb = yax_getbunch(i, YAX_CEILING); *fb = yax_getbunch(i, YAX_FLOOR); } static FORCE_INLINE int16_t yax_getnextwall(int16_t wal, int16_t cf) { return cf ? wall[wal].dnwall : wall[wal].upwall; } static FORCE_INLINE void yax_setnextwall(int16_t wal, int16_t cf, int16_t thenextwall) { YAX_NEXTWALL(wal, cf) = thenextwall; } #endif static FORCE_INLINE void sector_tracker_hook(uintptr_t const address) { uintptr_t const usector = address - (uintptr_t)sector; #if DEBUGGINGAIDS Bassert(usector < ((MAXSECTORS + M32_FIXME_SECTORS) * sizeof(sectortype))); #endif ++sectorchanged[usector / sizeof(sectortype)]; } static FORCE_INLINE void wall_tracker_hook(uintptr_t const address) { uintptr_t const uwall = address - (uintptr_t)wall; #if DEBUGGINGAIDS Bassert(uwall < ((MAXWALLS + M32_FIXME_WALLS) * sizeof(walltype))); #endif ++wallchanged[uwall / sizeof(walltype)]; } static FORCE_INLINE void sprite_tracker_hook(uintptr_t const address) { uintptr_t const usprite = address - (uintptr_t)sprite; #if DEBUGGINGAIDS Bassert(usprite < (MAXSPRITES * sizeof(spritetype))); #endif ++spritechanged[usprite / sizeof(spritetype)]; } EXTERN int16_t maskwall[MAXWALLSB], maskwallcnt; EXTERN int16_t thewall[MAXWALLSB]; EXTERN uspritetype *tspriteptr[MAXSPRITESONSCREEN + 1]; EXTERN int32_t wx1, wy1, wx2, wy2; EXTERN int32_t xdim, ydim, numpages; EXTERN int32_t yxaspect, viewingrange; EXTERN intptr_t *ylookup; #ifndef GEKKO #define MAXVALIDMODES 256 #else #define MAXVALIDMODES 16 #endif EXTERN int32_t validmodecnt; struct validmode_t { int32_t xdim,ydim; char bpp; char fs; // bit 0 = fullscreen flag char filler[2]; int32_t extra; // internal use }; EXTERN struct validmode_t validmode[MAXVALIDMODES]; EXTERN int32_t numyaxbunches; #ifdef YAX_ENABLE // Singly-linked list of sectnums grouped by bunches and ceiling (0)/floor (1) // Usage e.g.: // int16_t bunchnum = yax_getbunch(somesector, YAX_CEILING); // Iteration over all sectors whose floor bunchnum equals 'bunchnum' (i.e. "all // floors of the other side"): // for (i=headsectbunch[1][bunchnum]; i!=-1; i=nextsectbunch[1][i]) // EXTERN int16_t headsectbunch[2][YAX_MAXBUNCHES], nextsectbunch[2][MAXSECTORS]; #endif EXTERN int32_t Numsprites; EXTERN int16_t numsectors, numwalls; EXTERN char display_mirror; // totalclocklock: the totalclock value that is backed up once on each // drawrooms() and is used for animateoffs(). EXTERN int32_t totalclock, totalclocklock; static inline int32_t BGetTime(void) { return totalclock; } EXTERN int32_t numframes, randomseed; EXTERN int16_t sintable[2048]; EXTERN uint8_t palette[768]; EXTERN int16_t numshades; EXTERN char *palookup[MAXPALOOKUPS]; extern uint8_t *basepaltable[MAXBASEPALS]; EXTERN uint8_t paletteloaded; EXTERN char *blendtable[MAXBLENDTABS]; EXTERN uint8_t whitecol, redcol; EXTERN int32_t maxspritesonscreen; enum { PALETTE_MAIN = 1<<0, PALETTE_SHADE = 1<<1, PALETTE_TRANSLUC = 1<<2, }; EXTERN char showinvisibility; EXTERN int32_t g_visibility, parallaxvisibility; EXTERN int32_t g_rotatespriteNoWidescreen; // blendtable[1] to blendtable[numalphatabs] are considered to be // alpha-blending tables: EXTERN uint8_t numalphatabs; EXTERN vec2_t windowxy1, windowxy2; EXTERN int16_t *startumost, *startdmost; // The maximum tile offset ever used in any tiled parallaxed multi-sky. #define PSKYOFF_MAX 8 #define DEFAULTPSKY -1 typedef struct { // The proportion at which looking up/down affects the apparent 'horiz' of // a parallaxed sky, scaled by 65536 (so, a value of 65536 makes it align // with the drawn surrounding scene): int32_t horizfrac; // The texel index offset in the y direction of a parallaxed sky: // XXX: currently always 0. int32_t yoffs; int8_t lognumtiles; // 1<0; j--) // NOTE: j==0 on non-early loop end if (picnum == multipskytile[j]) break; // Have a match. return j; } EXTERN psky_t * E_DefinePsky(int32_t tilenum); EXTERN char parallaxtype; EXTERN int32_t parallaxyoffs_override, parallaxyscale_override; extern int16_t pskybits_override; // last sprite in the freelist, that is the spritenum for which // .statnum==MAXSTATUS && nextspritestat[spritenum]==-1 // (or -1 if freelist is empty): EXTERN int16_t tailspritefree; EXTERN int16_t headspritesect[MAXSECTORS+1], headspritestat[MAXSTATUS+1]; EXTERN int16_t prevspritesect[MAXSPRITES], prevspritestat[MAXSPRITES]; EXTERN int16_t nextspritesect[MAXSPRITES], nextspritestat[MAXSPRITES]; EXTERN vec2s_t tilesiz[MAXTILES]; EXTERN char picsiz[MAXTILES]; EXTERN char walock[MAXTILES]; extern const char pow2char[8]; extern const int32_t pow2long[32]; // picanm[].sf: // |bit(1<<7) // |animtype|animtype|texhitscan|nofullbright|speed|speed|speed|speed| enum { PICANM_ANIMTYPE_NONE = 0, PICANM_ANIMTYPE_OSC = (1<<6), PICANM_ANIMTYPE_FWD = (2<<6), PICANM_ANIMTYPE_BACK = (3<<6), PICANM_ANIMTYPE_SHIFT = 6, PICANM_ANIMTYPE_MASK = (3<<6), // must be 192 PICANM_MISC_MASK = (3<<4), PICANM_TEXHITSCAN_BIT = (2<<4), PICANM_NOFULLBRIGHT_BIT = (1<<4), PICANM_ANIMSPEED_MASK = 15, // must be 15 }; // NOTE: If the layout of this struct is changed, loadpics() must be modified // accordingly. typedef struct { uint8_t num; // animate number int8_t xofs, yofs; uint8_t sf; // anim. speed and flags } picanm_t; EXTERN picanm_t picanm[MAXTILES]; EXTERN intptr_t waloff[MAXTILES]; // stores pointers to cache -- SA EXTERN int32_t windowpos, windowx, windowy; //These variables are for auto-mapping with the draw2dscreen function. //When you load a new board, these bits are all set to 0 - since //you haven't mapped out anything yet. Note that these arrays are //bit-mapped. //If you want draw2dscreen() to show sprite #54 then you say: // spritenum = 54; // show2dsprite[spritenum>>3] |= (1<<(spritenum&7)); //And if you want draw2dscreen() to not show sprite #54 then you say: // spritenum = 54; // show2dsprite[spritenum>>3] &= ~(1<<(spritenum&7)); EXTERN char show2dsector[(MAXSECTORS+7)>>3]; EXTERN char show2dwall[(MAXWALLS+7)>>3]; EXTERN char show2dsprite[(MAXSPRITES+7)>>3]; // In the editor, gotpic is only referenced from inline assembly; // the compiler needs that hint or building with LTO will discard it. #if !defined __clang__ && !defined NOASM # define GOTPIC_USED ATTRIBUTE((used)) #else # define GOTPIC_USED #endif EXTERN char GOTPIC_USED gotpic[(MAXTILES+7)>>3]; EXTERN char gotsector[(MAXSECTORS+7)>>3]; EXTERN char editorcolors[256]; EXTERN char faketile[(MAXTILES+7)>>3]; EXTERN char *faketiledata[MAXTILES]; EXTERN char spritecol2d[MAXTILES][2]; EXTERN uint8_t tilecols[MAXTILES]; extern uint8_t vgapal16[4*256]; extern uint32_t drawlinepat; extern void faketimerhandler(void); extern char apptitle[256]; extern int32_t novoxmips; #ifdef DEBUGGINGAIDS extern float debug1, debug2; #endif extern int16_t tiletovox[MAXTILES]; extern int32_t usevoxels, voxscale[MAXVOXELS]; #ifdef USE_OPENGL extern int32_t usemodels, usehightile; extern int32_t rendmode; #endif extern uint8_t globalr, globalg, globalb; EXTERN uint16_t h_xsize[MAXTILES], h_ysize[MAXTILES]; EXTERN int8_t h_xoffs[MAXTILES], h_yoffs[MAXTILES]; EXTERN char *globalpalwritten; enum { GLOBAL_NO_GL_TILESHADES = 1<<0, GLOBAL_NO_GL_FULLBRIGHT = 1<<1, GLOBAL_NO_GL_FOGSHADE = 1<<2, }; extern int32_t globalflags; extern const char *engineerrstr; EXTERN int32_t editorzrange[2]; static FORCE_INLINE int32_t getrendermode(void) { #ifndef USE_OPENGL return REND_CLASSIC; #else return rendmode; #endif } /************************************************************************* POSITION VARIABLES: POSX is your x - position ranging from 0 to 65535 POSY is your y - position ranging from 0 to 65535 (the length of a side of the grid in EDITBORD would be 1024) POSZ is your z - position (height) ranging from 0 to 65535, 0 highest. ANG is your angle ranging from 0 to 2047. Instead of 360 degrees, or 2 * PI radians, I use 2048 different angles, so 90 degrees would be 512 in my system. SPRITE VARIABLES: EXTERN short headspritesect[MAXSECTORS+1], headspritestat[MAXSTATUS+1]; EXTERN short prevspritesect[MAXSPRITES], prevspritestat[MAXSPRITES]; EXTERN short nextspritesect[MAXSPRITES], nextspritestat[MAXSPRITES]; Example: if the linked lists look like the following: ???????????????? Sector lists: Status lists: ????????????????J Sector0: 4, 5, 8 Status0: 2, 0, 8 Sector1: 16, 2, 0, 7 Status1: 4, 5, 16, 7, 3, 9 Sector2: 3, 9 ???????????????? Notice that each number listed above is shown exactly once on both the left and right side. This is because any sprite that exists must be in some sector, and must have some kind of status that you define. Coding example #1: To go through all the sprites in sector 1, the code can look like this: sectnum = 1; i = headspritesect[sectnum]; while (i != -1) { nexti = nextspritesect[i]; //your code goes here //ex: printf("Sprite %d is in sector %d\n",i,sectnum); i = nexti; } Coding example #2: To go through all sprites with status = 1, the code can look like this: statnum = 1; //status 1 i = headspritestat[statnum]; while (i != -1) { nexti = nextspritestat[i]; //your code goes here //ex: printf("Sprite %d has a status of 1 (active)\n",i,statnum); i = nexti; } insertsprite(short sectnum, short statnum); deletesprite(short spritenum); changespritesect(short spritenum, short newsectnum); changespritestat(short spritenum, short newstatnum); TILE VARIABLES: NUMTILES - the number of tiles found TILES.DAT. TILESIZX[MAXTILES] - simply the x-dimension of the tile number. TILESIZY[MAXTILES] - simply the y-dimension of the tile number. WALOFF[MAXTILES] - the actual address pointing to the top-left corner of the tile. PICANM[MAXTILES] - flags for animating the tile. TIMING VARIABLES: TOTALCLOCK - When the engine is initialized, TOTALCLOCK is set to zero. From then on, it is incremented 120 times a second by 1. That means that the number of seconds elapsed is totalclock / 120. NUMFRAMES - The number of times the draw3dscreen function was called since the engine was initialized. This helps to determine frame rate. (Frame rate = numframes * 120 / totalclock.) OTHER VARIABLES: STARTUMOST[320] is an array of the highest y-coordinates on each column that my engine is allowed to write to. You need to set it only once. STARTDMOST[320] is an array of the lowest y-coordinates on each column that my engine is allowed to write to. You need to set it only once. SINTABLE[2048] is a sin table with 2048 angles rather than the normal 360 angles for higher precision. Also since SINTABLE is in all integers, the range is multiplied by 16383, so instead of the normal -1>16; } #else int32_t krand(void); #endif int32_t ksqrt(uint32_t num); int32_t LUNATIC_FASTCALL getangle(int32_t xvect, int32_t yvect); static FORCE_INLINE uint32_t uhypsq(int32_t dx, int32_t dy) { return (uint32_t)dx*dx + (uint32_t)dy*dy; } static FORCE_INLINE int32_t logapproach(int32_t val, int32_t targetval) { int32_t dif = targetval - val; return (dif>>1) ? val + (dif>>1) : targetval; } void rotatepoint(vec2_t pivot, vec2_t p, int16_t daang, vec2_t *p2) ATTRIBUTE((nonnull(4))); int32_t lastwall(int16_t point); int32_t nextsectorneighborz(int16_t sectnum, int32_t refz, int16_t topbottom, int16_t direction); int32_t getceilzofslopeptr(const usectortype *sec, int32_t dax, int32_t day) ATTRIBUTE((nonnull(1))); int32_t getflorzofslopeptr(const usectortype *sec, int32_t dax, int32_t day) ATTRIBUTE((nonnull(1))); void getzsofslopeptr(const usectortype *sec, int32_t dax, int32_t day, int32_t *ceilz, int32_t *florz) ATTRIBUTE((nonnull(1,4,5))); static FORCE_INLINE int32_t getceilzofslope(int16_t sectnum, int32_t dax, int32_t day) { return getceilzofslopeptr((usectortype *)§or[sectnum], dax, day); } static FORCE_INLINE int32_t getflorzofslope(int16_t sectnum, int32_t dax, int32_t day) { return getflorzofslopeptr((usectortype *)§or[sectnum], dax, day); } static FORCE_INLINE void getzsofslope(int16_t sectnum, int32_t dax, int32_t day, int32_t *ceilz, int32_t *florz) { getzsofslopeptr((usectortype *)§or[sectnum], dax, day, ceilz, florz); } // Is a red wall in a safe fashion, i.e. only if consistency invariant // ".nextsector >= 0 iff .nextwall >= 0" holds. static FORCE_INLINE int32_t redwallp(const uwalltype *wal) { return (wal->nextwall >= 0 && wal->nextsector >= 0); } static FORCE_INLINE int32_t E_SpriteIsValid(const int32_t i) { return ((unsigned)i < MAXSPRITES && sprite[i].statnum != MAXSTATUS); } int clipshape_idx_for_sprite(uspritetype const * const curspr, int curidx); void alignceilslope(int16_t dasect, int32_t x, int32_t y, int32_t z); void alignflorslope(int16_t dasect, int32_t x, int32_t y, int32_t z); int32_t sectorofwall(int16_t theline); int32_t sectorofwall_noquick(int16_t theline); int32_t loopnumofsector(int16_t sectnum, int16_t wallnum); void setslope(int32_t sectnum, int32_t cf, int16_t slope); int32_t lintersect(int32_t x1, int32_t y1, int32_t z1, int32_t x2, int32_t y2, int32_t z2, int32_t x3, int32_t y3, int32_t x4, int32_t y4, int32_t *intx, int32_t *inty, int32_t *intz); int32_t rayintersect(int32_t x1, int32_t y1, int32_t z1, int32_t vx, int32_t vy, int32_t vz, int32_t x3, int32_t y3, int32_t x4, int32_t y4, int32_t *intx, int32_t *inty, int32_t *intz); #if !defined NETCODE_DISABLE void do_insertsprite_at_headofstat(int16_t spritenum, int16_t statnum); int32_t insertspritestat(int16_t statnum); void do_insertsprite_at_headofsect(int16_t spritenum, int16_t sectnum); void do_deletespritesect(int16_t deleteme); #endif int32_t insertsprite(int16_t sectnum, int16_t statnum); int32_t deletesprite(int16_t spritenum); int32_t changespritesect(int16_t spritenum, int16_t newsectnum); int32_t changespritestat(int16_t spritenum, int16_t newstatnum); int32_t setsprite(int16_t spritenum, const vec3_t *) ATTRIBUTE((nonnull(2))); int32_t setspritez(int16_t spritenum, const vec3_t *) ATTRIBUTE((nonnull(2))); int32_t spriteheightofsptr(const uspritetype *spr, int32_t *height, int32_t alsotileyofs); static FORCE_INLINE int32_t spriteheightofs(int16_t i, int32_t *height, int32_t alsotileyofs) { return spriteheightofsptr((uspritetype *)&sprite[i], height, alsotileyofs); } int screencapture(const char *filename, char inverseit) ATTRIBUTE((nonnull(1))); int screencapture_tga(const char *filename, char inverseit) ATTRIBUTE((nonnull(1))); struct OutputFileCounter { uint16_t count = 0; FILE * opennextfile(char *, char *); FILE * opennextfile_withext(char *, const char *); }; // PLAG: line utility functions typedef struct s_equation { float a, b, c; } _equation; int32_t wallvisible(int32_t x, int32_t y, int16_t wallnum); #define STATUS2DSIZ 144 #define STATUS2DSIZ2 26 //void qsetmode640350(void); //void qsetmode640480(void); void qsetmodeany(int32_t,int32_t); void clear2dscreen(void); void draw2dgrid(int32_t posxe, int32_t posye, int32_t posze, int16_t cursectnum, int16_t ange, int32_t zoome, int16_t gride); void draw2dscreen(const vec3_t *pos, int16_t cursectnum, int16_t ange, int32_t zoome, int16_t gride) ATTRIBUTE((nonnull(1))); int32_t drawline16(int32_t x1, int32_t y1, int32_t x2, int32_t y2, int col); void drawcircle16(int32_t x1, int32_t y1, int32_t r, int32_t eccen, char col); int32_t setrendermode(int32_t renderer); #ifdef USE_OPENGL void setrollangle(int32_t rolla); #endif // pal: pass -1 to invalidate all palettes for the tile, or >=0 for a particular palette // how: pass -1 to invalidate all instances of the tile in texture memory, or a bitfield // bit 0: opaque or masked (non-translucent) texture, using repeating // bit 1: ignored // bit 2: 33% translucence, using repeating // bit 3: 67% translucence, using repeating // bit 4: opaque or masked (non-translucent) texture, using clamping // bit 5: ignored // bit 6: 33% translucence, using clamping // bit 7: 67% translucence, using clamping // clamping is for sprites, repeating is for walls void invalidatetile(int16_t tilenume, int32_t pal, int32_t how); void setpolymost2dview(void); // sets up GL for 2D drawing int32_t polymost_drawtilescreen(int32_t tilex, int32_t tiley, int32_t wallnum, int32_t dimen, int32_t tilezoom, int32_t usehitile, uint8_t *loadedhitile); void polymost_glreset(void); void polymost_precache(int32_t dapicnum, int32_t dapalnum, int32_t datype); typedef uint16_t polytintflags_t; enum cutsceneflags { CUTSCENE_FORCEFILTER = 1, CUTSCENE_FORCENOFILTER = 2, CUTSCENE_TEXTUREFILTER = 4, }; #ifdef USE_OPENGL extern int32_t glanisotropy; extern int32_t glusetexcompr; extern int32_t gltexfiltermode; enum { TEXFILTER_OFF = 0, // GL_NEAREST TEXFILTER_ON = 5, // GL_LINEAR_MIPMAP_LINEAR }; extern int32_t glusetexcache, glusememcache; extern int32_t glmultisample, glnvmultisamplehint; extern int32_t glprojectionhacks; extern int32_t gltexmaxsize; void gltexapplyprops (void); void texcache_invalidate(void); # ifdef USE_GLEXT extern int32_t r_detailmapping; extern int32_t r_glowmapping; # endif extern int32_t r_vertexarrays; # ifdef USE_GLEXT extern int32_t r_vbos; extern int32_t r_vbocount; # endif extern int32_t r_animsmoothing; extern int32_t r_parallaxskyclamping; extern int32_t r_parallaxskypanning; extern int32_t r_fullbrights; extern int32_t r_downsize; extern int32_t r_downsizevar; extern int32_t mdtims, omdtims; extern int32_t glrendmode; #endif void hicinit(void); void hicsetpalettetint(int32_t palnum, char r, char g, char b, char sr, char sg, char sb, polytintflags_t effect); // flags bitset: 1 = don't compress int32_t hicsetsubsttex(int32_t picnum, int32_t palnum, const char *filen, float alphacut, float xscale, float yscale, float specpower, float specfactor, char flags); int32_t hicsetskybox(int32_t picnum, int32_t palnum, char *faces[6], int32_t flags); int32_t hicclearsubst(int32_t picnum, int32_t palnum); int32_t Ptile2tile(int32_t tile, int32_t pallet) ATTRIBUTE((pure)); int32_t md_loadmodel(const char *fn); int32_t md_setmisc(int32_t modelid, float scale, int32_t shadeoff, float zadd, float yoffset, int32_t flags); // int32_t md_tilehasmodel(int32_t tilenume, int32_t pal); extern const char *G_DefaultDefFile(void); extern const char *G_DefFile(void); extern char *g_defNamePtr; extern char **g_defModules; extern int32_t g_defModulesNum; #ifdef HAVE_CLIPSHAPE_FEATURE extern char **g_clipMapFiles; extern int32_t g_clipMapFilesNum; #endif #ifdef USE_OPENGL // TODO: dynamically allocate this typedef struct { vec3f_t add; int16_t angadd, flags, fov; } hudtyp; typedef struct { // maps build tiles to particular animation frames of a model int16_t modelid; int16_t framenum; // calculate the number from the name when declaring int16_t nexttile; uint16_t smoothduration; hudtyp *hudmem[2]; int8_t skinnum; char pal; } tile2model_t; # define EXTRATILES (MAXTILES/8) EXTERN int32_t mdinited; EXTERN tile2model_t tile2model[MAXTILES+EXTRATILES]; static FORCE_INLINE int32_t md_tilehasmodel(int32_t tilenume,int32_t pal) { return mdinited ? tile2model[Ptile2tile(tilenume,pal)].modelid : -1; } #endif // defined USE_OPENGL int32_t md_defineframe(int32_t modelid, const char *framename, int32_t tilenume, int32_t skinnum, float smoothduration, int32_t pal); int32_t md_defineanimation(int32_t modelid, const char *framestart, const char *frameend, int32_t fps, int32_t flags); int32_t md_defineskin(int32_t modelid, const char *skinfn, int32_t palnum, int32_t skinnum, int32_t surfnum, float param, float specpower, float specfactor, int32_t flags); int32_t md_definehud (int32_t modelid, int32_t tilex, vec3f_t add, int32_t angadd, int32_t flags, int32_t fov); int32_t md_undefinetile(int32_t tile); int32_t md_undefinemodel(int32_t modelid); int32_t loaddefinitionsfile(const char *fn); // if loadboard() fails with -2 return, try loadoldboard(). if it fails with // -2, board is dodgy int32_t loadoldboard(const char *filename, char fromwhere, vec3_t *dapos, int16_t *daang, int16_t *dacursectnum); #ifdef __cplusplus } #endif #include "hash.h" #ifdef POLYMER # include "polymer.h" #else # ifdef USE_OPENGL # include "polymost.h" # endif #endif #ifdef __cplusplus extern "C" { #endif static FORCE_INLINE void push_nofog(void) { #ifdef USE_OPENGL if (getrendermode() >= REND_POLYMOST) { glDisable(GL_FOG); } #endif } static FORCE_INLINE void pop_nofog(void) { #ifdef USE_OPENGL if (getrendermode() >= REND_POLYMOST && !nofog) glEnable(GL_FOG); #endif } static vec2_t const zerovec = { 0, 0 }; #ifdef LUNATIC extern const int32_t engine_main_arrays_are_static; extern const int32_t engine_v8; int32_t Mulscale(int32_t a, int32_t b, int32_t sh); #endif static inline int32_t clipmove_old(int32_t *x, int32_t *y, int32_t *z, int16_t *sectnum, int32_t xvect, int32_t yvect, int32_t walldist, int32_t ceildist, int32_t flordist, uint32_t cliptype) ATTRIBUTE((nonnull(1,2,3,4))); static inline int32_t clipmove_old(int32_t *x, int32_t *y, int32_t *z, int16_t *sectnum, int32_t xvect, int32_t yvect, int32_t walldist, int32_t ceildist, int32_t flordist, uint32_t cliptype) { vec3_t vector = { *x, *y, *z }; int32_t result = clipmove(&vector, sectnum, xvect, yvect, walldist, ceildist, flordist, cliptype); *x = vector.x; *y = vector.y; *z = vector.z; return result; } static inline int32_t pushmove_old(int32_t *x, int32_t *y, int32_t *z, int16_t *sectnum, int32_t walldist, int32_t ceildist, int32_t flordist, uint32_t cliptype) ATTRIBUTE((nonnull(1,2,3,4))); static inline int32_t pushmove_old(int32_t *x, int32_t *y, int32_t *z, int16_t *sectnum, int32_t walldist, int32_t ceildist, int32_t flordist, uint32_t cliptype) { vec3_t vector = { *x, *y, *z }; int32_t result = pushmove(&vector, sectnum, walldist, ceildist, flordist, cliptype); *x = vector.x; *y = vector.y; *z = vector.z; return result; } static inline void getzrange_old(int32_t x, int32_t y, int32_t z, int16_t sectnum, int32_t *ceilz, int32_t *ceilhit, int32_t *florz, int32_t *florhit, int32_t walldist, uint32_t cliptype) ATTRIBUTE((nonnull(5,6,7,8))); static inline void getzrange_old(int32_t x, int32_t y, int32_t z, int16_t sectnum, int32_t *ceilz, int32_t *ceilhit, int32_t *florz, int32_t *florhit, int32_t walldist, uint32_t cliptype) { const vec3_t vector = { x, y, z }; getzrange(&vector, sectnum, ceilz, ceilhit, florz, florhit, walldist, cliptype); } static inline int32_t setspritez_old(int16_t spritenum, int32_t x, int32_t y, int32_t z) { const vec3_t vector = { x, y, z }; return setspritez(spritenum, &vector); } extern int32_t rintersect(int32_t x1, int32_t y1, int32_t z1, int32_t vx_, int32_t vy_, int32_t vz, int32_t x3, int32_t y3, int32_t x4, int32_t y4, int32_t *intx, int32_t *inty, int32_t *intz); #ifdef __cplusplus } #endif #endif // build_h_