/* ** _gl_dynlight.cpp ** Light definitions for actors. ** **--------------------------------------------------------------------------- ** Copyright 2003 Timothy Stump ** Copyright 2005 Christoph Oelckers ** All rights reserved. ** ** Redistribution and use in source and binary forms, with or without ** modification, are permitted provided that the following conditions ** are met: ** ** 1. Redistributions of source code must retain the above copyright ** notice, this list of conditions and the following disclaimer. ** 2. Redistributions in binary form must reproduce the above copyright ** notice, this list of conditions and the following disclaimer in the ** documentation and/or other materials provided with the distribution. ** 3. The name of the author may not be used to endorse or promote products ** derived from this software without specific prior written permission. ** ** THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR ** IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES ** OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. ** IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, ** INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT ** NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, ** DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY ** THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT ** (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF ** THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. **--------------------------------------------------------------------------- ** */ #include #include "i_system.h" #include "doomtype.h" #include "c_cvars.h" #include "c_dispatch.h" #include "m_random.h" #include "sc_man.h" #include "templates.h" #include "w_wad.h" #include "gi.h" #include "r_state.h" #include "stats.h" #include "zstring.h" #include "d_dehacked.h" #include "v_text.h" #include "g_levellocals.h" #include "a_dynlight.h" #include "textures/skyboxtexture.h" int ScriptDepth; void gl_InitGlow(FScanner &sc); void gl_ParseBrightmap(FScanner &sc, int); void gl_DestroyUserShaders(); void gl_ParseHardwareShader(FScanner &sc, int deflump); void gl_ParseDetailTexture(FScanner &sc); //========================================================================== // // Dehacked aliasing // //========================================================================== inline PClassActor * GetRealType(PClassActor * ti) { PClassActor *rep = ti->GetReplacement(false); if (rep != ti && rep != NULL && rep->IsDescendantOf(NAME_DehackedPickup)) { return rep; } return ti; } //========================================================================== // // Light associations // //========================================================================== class FLightAssociation { public: //FLightAssociation(); FLightAssociation(FName actorName, const char *frameName, FName lightName) : m_ActorName(actorName), m_AssocLight(lightName) { strncpy(m_FrameName, frameName, 8); } FName ActorName() { return m_ActorName; } const char *FrameName() { return m_FrameName; } FName Light() { return m_AssocLight; } void ReplaceLightName(FName newName) { m_AssocLight = newName; } protected: char m_FrameName[8]; FName m_ActorName, m_AssocLight; }; TArray LightAssociations; //========================================================================== // // Light definitions // //========================================================================== class FLightDefaults { public: FLightDefaults(FName name, ELightType type); void ApplyProperties(ADynamicLight * light) const; FName GetName() const { return m_Name; } void SetParameter(double p) { m_Param = p; } void SetArg(int arg, int val) { m_Args[arg] = val; } int GetArg(int arg) { return m_Args[arg]; } uint8_t GetAttenuate() const { return m_attenuate; } void SetOffset(float* ft) { m_Pos.X = ft[0]; m_Pos.Z = ft[1]; m_Pos.Y = ft[2]; } void SetSubtractive(bool subtract) { m_subtractive = subtract; } void SetAdditive(bool add) { m_additive = add; } void SetDontLightSelf(bool add) { m_dontlightself = add; } void SetAttenuate(bool on) { m_attenuate = on; } void SetHalo(bool halo) { m_halo = halo; } void SetDontLightActors(bool on) { m_dontlightactors = on; } void OrderIntensities() { if (m_Args[LIGHT_INTENSITY] > m_Args[LIGHT_SECONDARY_INTENSITY]) { std::swap(m_Args[LIGHT_INTENSITY], m_Args[LIGHT_SECONDARY_INTENSITY]); m_swapped = true; } } protected: FName m_Name; int m_Args[5] = { 0,0,0,0,0 }; double m_Param = 0; DVector3 m_Pos = { 0,0,0 }; ELightType m_type; int8_t m_attenuate = -1; bool m_subtractive = false; bool m_additive = false; bool m_halo = false; bool m_dontlightself = false; bool m_dontlightactors = false; bool m_swapped = false; }; TDeletingArray LightDefaults; //----------------------------------------------------------------------------- // // // //----------------------------------------------------------------------------- FLightDefaults::FLightDefaults(FName name, ELightType type) { m_Name = name; m_type = type; } void FLightDefaults::ApplyProperties(ADynamicLight * light) const { auto oldtype = light->lighttype; light->lighttype = m_type; light->specialf1 = m_Param; light->SetOffset(m_Pos); light->halo = m_halo; for (int a = 0; a < 3; a++) light->args[a] = clamp((int)(m_Args[a]), 0, 255); light->args[LIGHT_INTENSITY] = m_Args[LIGHT_INTENSITY]; light->args[LIGHT_SECONDARY_INTENSITY] = m_Args[LIGHT_SECONDARY_INTENSITY]; light->flags4 &= ~(MF4_ADDITIVE | MF4_SUBTRACTIVE | MF4_DONTLIGHTSELF); if (m_subtractive) light->flags4 |= MF4_SUBTRACTIVE; if (m_additive) light->flags4 |= MF4_ADDITIVE; if (m_dontlightself) light->flags4 |= MF4_DONTLIGHTSELF; if (m_dontlightactors) light->flags4 |= MF4_DONTLIGHTACTORS; light->m_tickCount = 0; if (m_type == PulseLight) { float pulseTime = float(m_Param / TICRATE); light->m_lastUpdate = level.maptime; if (m_swapped) light->m_cycler.SetParams(float(light->args[LIGHT_SECONDARY_INTENSITY]), float(light->args[LIGHT_INTENSITY]), pulseTime, oldtype == PulseLight); else light->m_cycler.SetParams(float(light->args[LIGHT_INTENSITY]), float(light->args[LIGHT_SECONDARY_INTENSITY]), pulseTime, oldtype == PulseLight); light->m_cycler.ShouldCycle(true); light->m_cycler.SetCycleType(CYCLE_Sin); light->m_currentRadius = (float)light->m_cycler.GetVal(); if (light->m_currentRadius <= 0) light->m_currentRadius = 1; light->swapped = m_swapped; } switch (m_attenuate) { case 0: light->flags4 &= ~MF4_ATTENUATE; break; case 1: light->flags4 |= MF4_ATTENUATE; break; default: if (level.flags3 & LEVEL3_ATTENUATE) light->flags4 |= MF4_ATTENUATE; else light->flags4 &= ~MF4_ATTENUATE; break; } } //========================================================================== // // light definition file parser // //========================================================================== static const char *LightTags[]= { "color", "size", "secondarySize", "offset", "chance", "interval", "scale", "frame", "light", "{", "}", "subtractive", "additive", "halo", "dontlightself", "attenuate", "dontlightactors", NULL }; enum { LIGHTTAG_COLOR, LIGHTTAG_SIZE, LIGHTTAG_SECSIZE, LIGHTTAG_OFFSET, LIGHTTAG_CHANCE, LIGHTTAG_INTERVAL, LIGHTTAG_SCALE, LIGHTTAG_FRAME, LIGHTTAG_LIGHT, LIGHTTAG_OPENBRACE, LIGHTTAG_CLOSEBRACE, LIGHTTAG_SUBTRACTIVE, LIGHTTAG_ADDITIVE, LIGHTTAG_HALO, LIGHTTAG_DONTLIGHTSELF, LIGHTTAG_ATTENUATE, LIGHTTAG_DONTLIGHTACTORS, }; extern int ScriptDepth; //========================================================================== // // // //========================================================================== inline float ParseFloat(FScanner &sc) { sc.GetFloat(); return float(sc.Float); } inline int ParseInt(FScanner &sc) { sc.GetNumber(); return sc.Number; } inline char *ParseString(FScanner &sc) { sc.GetString(); return sc.String; } static void ParseTriple(FScanner &sc, float floatVal[3]) { for (int i = 0; i < 3; i++) { floatVal[i] = ParseFloat(sc); } } static void AddLightDefaults(FLightDefaults *defaults) { FLightDefaults *temp; unsigned int i; // remove duplicates for (i = 0; i < LightDefaults.Size(); i++) { temp = LightDefaults[i]; if (temp->GetName() == defaults->GetName()) { delete temp; LightDefaults.Delete(i); break; } } // If the current renderer cannot handle attenuated lights we need to reduce the radius here to account for the far more bright lights this would create. if (/*!Renderer->CanAttenuate() &&*/ (defaults->GetAttenuate())) { defaults->SetArg(LIGHT_INTENSITY, defaults->GetArg(LIGHT_INTENSITY) * 2 / 3); defaults->SetArg(LIGHT_SECONDARY_INTENSITY, defaults->GetArg(LIGHT_SECONDARY_INTENSITY) * 2 / 3); } LightDefaults.Push(defaults); } //----------------------------------------------------------------------------- // // // //----------------------------------------------------------------------------- static void ParsePointLight(FScanner &sc) { int type; float floatTriple[3]; int intVal; FLightDefaults *defaults; // get name sc.GetString(); FName name = sc.String; // check for opening brace sc.GetString(); if (sc.Compare("{")) { defaults = new FLightDefaults(name, PointLight); ScriptDepth++; while (ScriptDepth) { sc.GetString(); type = sc.MatchString(LightTags); switch (type) { case LIGHTTAG_OPENBRACE: ScriptDepth++; break; case LIGHTTAG_CLOSEBRACE: ScriptDepth--; break; case LIGHTTAG_COLOR: ParseTriple(sc, floatTriple); defaults->SetArg(LIGHT_RED, clamp((int)(floatTriple[0] * 255), 0, 255)); defaults->SetArg(LIGHT_GREEN, clamp((int)(floatTriple[1] * 255), 0, 255)); defaults->SetArg(LIGHT_BLUE, clamp((int)(floatTriple[2] * 255), 0, 255)); break; case LIGHTTAG_OFFSET: ParseTriple(sc, floatTriple); defaults->SetOffset(floatTriple); break; case LIGHTTAG_SIZE: intVal = clamp(ParseInt(sc), 1, 1024); defaults->SetArg(LIGHT_INTENSITY, intVal); break; case LIGHTTAG_SUBTRACTIVE: defaults->SetSubtractive(ParseInt(sc) != 0); break; case LIGHTTAG_ADDITIVE: defaults->SetAdditive(ParseInt(sc) != 0); break; case LIGHTTAG_HALO: defaults->SetHalo(ParseInt(sc) != 0); break; case LIGHTTAG_DONTLIGHTSELF: defaults->SetDontLightSelf(ParseInt(sc) != 0); break; case LIGHTTAG_ATTENUATE: defaults->SetAttenuate(ParseInt(sc) != 0); break; case LIGHTTAG_DONTLIGHTACTORS: defaults->SetDontLightActors(ParseInt(sc) != 0); break; default: sc.ScriptError("Unknown tag: %s\n", sc.String); } } AddLightDefaults(defaults); } else { sc.ScriptError("Expected '{'.\n"); } } //----------------------------------------------------------------------------- // // // //----------------------------------------------------------------------------- static void ParsePulseLight(FScanner &sc) { int type; float floatVal, floatTriple[3]; int intVal; FLightDefaults *defaults; // get name sc.GetString(); FName name = sc.String; // check for opening brace sc.GetString(); if (sc.Compare("{")) { defaults = new FLightDefaults(name, PulseLight); ScriptDepth++; while (ScriptDepth) { sc.GetString(); type = sc.MatchString(LightTags); switch (type) { case LIGHTTAG_OPENBRACE: ScriptDepth++; break; case LIGHTTAG_CLOSEBRACE: ScriptDepth--; break; case LIGHTTAG_COLOR: ParseTriple(sc, floatTriple); defaults->SetArg(LIGHT_RED, clamp((int)(floatTriple[0] * 255), 0, 255)); defaults->SetArg(LIGHT_GREEN, clamp((int)(floatTriple[1] * 255), 0, 255)); defaults->SetArg(LIGHT_BLUE, clamp((int)(floatTriple[2] * 255), 0, 255)); break; case LIGHTTAG_OFFSET: ParseTriple(sc, floatTriple); defaults->SetOffset(floatTriple); break; case LIGHTTAG_SIZE: intVal = clamp(ParseInt(sc), 1, 1024); defaults->SetArg(LIGHT_INTENSITY, intVal); break; case LIGHTTAG_SECSIZE: intVal = clamp(ParseInt(sc), 1, 1024); defaults->SetArg(LIGHT_SECONDARY_INTENSITY, intVal); break; case LIGHTTAG_INTERVAL: floatVal = ParseFloat(sc); defaults->SetParameter(floatVal * TICRATE); break; case LIGHTTAG_SUBTRACTIVE: defaults->SetSubtractive(ParseInt(sc) != 0); break; case LIGHTTAG_HALO: defaults->SetHalo(ParseInt(sc) != 0); break; case LIGHTTAG_DONTLIGHTSELF: defaults->SetDontLightSelf(ParseInt(sc) != 0); break; case LIGHTTAG_ATTENUATE: defaults->SetAttenuate(ParseInt(sc) != 0); break; case LIGHTTAG_DONTLIGHTACTORS: defaults->SetDontLightActors(ParseInt(sc) != 0); break; default: sc.ScriptError("Unknown tag: %s\n", sc.String); } } defaults->OrderIntensities(); AddLightDefaults(defaults); } else { sc.ScriptError("Expected '{'.\n"); } } //----------------------------------------------------------------------------- // // // //----------------------------------------------------------------------------- void ParseFlickerLight(FScanner &sc) { int type; float floatVal, floatTriple[3]; int intVal; FLightDefaults *defaults; // get name sc.GetString(); FName name = sc.String; // check for opening brace sc.GetString(); if (sc.Compare("{")) { defaults = new FLightDefaults(name, FlickerLight); ScriptDepth++; while (ScriptDepth) { sc.GetString(); type = sc.MatchString(LightTags); switch (type) { case LIGHTTAG_OPENBRACE: ScriptDepth++; break; case LIGHTTAG_CLOSEBRACE: ScriptDepth--; break; case LIGHTTAG_COLOR: ParseTriple(sc, floatTriple); defaults->SetArg(LIGHT_RED, clamp((int)(floatTriple[0] * 255), 0, 255)); defaults->SetArg(LIGHT_GREEN, clamp((int)(floatTriple[1] * 255), 0, 255)); defaults->SetArg(LIGHT_BLUE, clamp((int)(floatTriple[2] * 255), 0, 255)); break; case LIGHTTAG_OFFSET: ParseTriple(sc, floatTriple); defaults->SetOffset(floatTriple); break; case LIGHTTAG_SIZE: intVal = clamp(ParseInt(sc), 1, 1024); defaults->SetArg(LIGHT_INTENSITY, intVal); break; case LIGHTTAG_SECSIZE: intVal = clamp(ParseInt(sc), 1, 1024); defaults->SetArg(LIGHT_SECONDARY_INTENSITY, intVal); break; case LIGHTTAG_CHANCE: floatVal = ParseFloat(sc); defaults->SetParameter(floatVal*360.); break; case LIGHTTAG_SUBTRACTIVE: defaults->SetSubtractive(ParseInt(sc) != 0); break; case LIGHTTAG_HALO: defaults->SetHalo(ParseInt(sc) != 0); break; case LIGHTTAG_DONTLIGHTSELF: defaults->SetDontLightSelf(ParseInt(sc) != 0); break; case LIGHTTAG_ATTENUATE: defaults->SetAttenuate(ParseInt(sc) != 0); break; case LIGHTTAG_DONTLIGHTACTORS: defaults->SetDontLightActors(ParseInt(sc) != 0); break; default: sc.ScriptError("Unknown tag: %s\n", sc.String); } } defaults->OrderIntensities(); AddLightDefaults(defaults); } else { sc.ScriptError("Expected '{'.\n"); } } //----------------------------------------------------------------------------- // // // //----------------------------------------------------------------------------- void ParseFlickerLight2(FScanner &sc) { int type; float floatVal, floatTriple[3]; int intVal; FLightDefaults *defaults; // get name sc.GetString(); FName name = sc.String; // check for opening brace sc.GetString(); if (sc.Compare("{")) { defaults = new FLightDefaults(name, RandomFlickerLight); ScriptDepth++; while (ScriptDepth) { sc.GetString(); type = sc.MatchString(LightTags); switch (type) { case LIGHTTAG_OPENBRACE: ScriptDepth++; break; case LIGHTTAG_CLOSEBRACE: ScriptDepth--; break; case LIGHTTAG_COLOR: ParseTriple(sc, floatTriple); defaults->SetArg(LIGHT_RED, clamp((int)(floatTriple[0] * 255), 0, 255)); defaults->SetArg(LIGHT_GREEN, clamp((int)(floatTriple[1] * 255), 0, 255)); defaults->SetArg(LIGHT_BLUE, clamp((int)(floatTriple[2] * 255), 0, 255)); break; case LIGHTTAG_OFFSET: ParseTriple(sc, floatTriple); defaults->SetOffset(floatTriple); break; case LIGHTTAG_SIZE: intVal = clamp(ParseInt(sc), 1, 1024); defaults->SetArg(LIGHT_INTENSITY, intVal); break; case LIGHTTAG_SECSIZE: intVal = clamp(ParseInt(sc), 1, 1024); defaults->SetArg(LIGHT_SECONDARY_INTENSITY, intVal); break; case LIGHTTAG_INTERVAL: floatVal = ParseFloat(sc); defaults->SetParameter(floatVal * 360.); break; case LIGHTTAG_SUBTRACTIVE: defaults->SetSubtractive(ParseInt(sc) != 0); break; case LIGHTTAG_HALO: defaults->SetHalo(ParseInt(sc) != 0); break; case LIGHTTAG_DONTLIGHTSELF: defaults->SetDontLightSelf(ParseInt(sc) != 0); break; case LIGHTTAG_ATTENUATE: defaults->SetAttenuate(ParseInt(sc) != 0); break; case LIGHTTAG_DONTLIGHTACTORS: defaults->SetDontLightActors(ParseInt(sc) != 0); break; default: sc.ScriptError("Unknown tag: %s\n", sc.String); } } if (defaults->GetArg(LIGHT_SECONDARY_INTENSITY) < defaults->GetArg(LIGHT_INTENSITY)) { int v = defaults->GetArg(LIGHT_SECONDARY_INTENSITY); defaults->SetArg(LIGHT_SECONDARY_INTENSITY, defaults->GetArg(LIGHT_INTENSITY)); defaults->SetArg(LIGHT_INTENSITY, v); } AddLightDefaults(defaults); } else { sc.ScriptError("Expected '{'.\n"); } } //----------------------------------------------------------------------------- // // // //----------------------------------------------------------------------------- static void ParseSectorLight(FScanner &sc) { int type; float floatVal; float floatTriple[3]; FLightDefaults *defaults; // get name sc.GetString(); FName name = sc.String; // check for opening brace sc.GetString(); if (sc.Compare("{")) { defaults = new FLightDefaults(name, SectorLight); ScriptDepth++; while (ScriptDepth) { sc.GetString(); type = sc.MatchString(LightTags); switch (type) { case LIGHTTAG_OPENBRACE: ScriptDepth++; break; case LIGHTTAG_CLOSEBRACE: ScriptDepth--; break; case LIGHTTAG_COLOR: ParseTriple(sc, floatTriple); defaults->SetArg(LIGHT_RED, clamp((int)(floatTriple[0] * 255), 0, 255)); defaults->SetArg(LIGHT_GREEN, clamp((int)(floatTriple[1] * 255), 0, 255)); defaults->SetArg(LIGHT_BLUE, clamp((int)(floatTriple[2] * 255), 0, 255)); break; case LIGHTTAG_OFFSET: ParseTriple(sc, floatTriple); defaults->SetOffset(floatTriple); break; case LIGHTTAG_SCALE: floatVal = ParseFloat(sc); defaults->SetArg(LIGHT_SCALE, clamp((int)(floatVal * 255), 1, 1024)); break; case LIGHTTAG_SUBTRACTIVE: defaults->SetSubtractive(ParseInt(sc) != 0); break; case LIGHTTAG_HALO: defaults->SetHalo(ParseInt(sc) != 0); break; case LIGHTTAG_DONTLIGHTSELF: defaults->SetDontLightSelf(ParseInt(sc) != 0); break; case LIGHTTAG_ATTENUATE: defaults->SetAttenuate(ParseInt(sc) != 0); break; case LIGHTTAG_DONTLIGHTACTORS: defaults->SetDontLightActors(ParseInt(sc) != 0); break; default: sc.ScriptError("Unknown tag: %s\n", sc.String); } } AddLightDefaults(defaults); } else { sc.ScriptError("Expected '{'.\n"); } } //----------------------------------------------------------------------------- // // // //----------------------------------------------------------------------------- static void AddLightAssociation(const char *actor, const char *frame, const char *light) { FLightAssociation *temp; unsigned int i; FLightAssociation assoc(actor, frame, light); for (i = 0; i < LightAssociations.Size(); i++) { temp = &LightAssociations[i]; if (temp->ActorName() == assoc.ActorName()) { if (strcmp(temp->FrameName(), assoc.FrameName()) == 0) { temp->ReplaceLightName(assoc.Light()); return; } } } LightAssociations.Push(assoc); } //----------------------------------------------------------------------------- // // // //----------------------------------------------------------------------------- static void ParseFrame(FScanner &sc, FString name) { int type, startDepth; FString frameName; // get name sc.GetString(); if (strlen(sc.String) > 8) { sc.ScriptError("Name longer than 8 characters: %s\n", sc.String); } frameName = sc.String; startDepth = ScriptDepth; // check for opening brace sc.GetString(); if (sc.Compare("{")) { ScriptDepth++; while (ScriptDepth > startDepth) { sc.GetString(); type = sc.MatchString(LightTags); switch (type) { case LIGHTTAG_OPENBRACE: ScriptDepth++; break; case LIGHTTAG_CLOSEBRACE: ScriptDepth--; break; case LIGHTTAG_LIGHT: ParseString(sc); AddLightAssociation(name, frameName, sc.String); break; default: sc.ScriptError("Unknown tag: %s\n", sc.String); } } } else { sc.ScriptError("Expected '{'.\n"); } } //----------------------------------------------------------------------------- // // // //----------------------------------------------------------------------------- void ParseObject(FScanner &sc) { int type; FString name; // get name sc.GetString(); name = sc.String; if (!PClass::FindActor(name)) sc.ScriptMessage("Warning: dynamic lights attached to non-existent actor %s\n", name.GetChars()); // check for opening brace sc.GetString(); if (sc.Compare("{")) { ScriptDepth++; while (ScriptDepth) { sc.GetString(); type = sc.MatchString(LightTags); switch (type) { case LIGHTTAG_OPENBRACE: ScriptDepth++; break; case LIGHTTAG_CLOSEBRACE: ScriptDepth--; break; case LIGHTTAG_FRAME: ParseFrame(sc, name); break; default: sc.ScriptError("Unknown tag: %s\n", sc.String); } } } else { sc.ScriptError("Expected '{'.\n"); } } //========================================================================== // // // //========================================================================== // these are the core types available in the *DEFS lump static const char *CoreKeywords[]= { "pointlight", "pulselight", "flickerlight", "flickerlight2", "sectorlight", "object", "clearlights", "shader", "clearshaders", "skybox", "glow", "brightmap", "disable_fullbright", "hardwareshader", "detail", "#include", NULL }; enum { LIGHT_POINT, LIGHT_PULSE, LIGHT_FLICKER, LIGHT_FLICKER2, LIGHT_SECTOR, LIGHT_OBJECT, LIGHT_CLEAR, TAG_SHADER, TAG_CLEARSHADERS, TAG_SKYBOX, TAG_GLOW, TAG_BRIGHTMAP, TAG_DISABLE_FB, TAG_HARDWARESHADER, TAG_DETAIL, TAG_INCLUDE, }; //========================================================================== // // This is only here so any shader definition for ZDoomGL can be skipped // There is no functionality for this stuff! // //========================================================================== bool ParseShader(FScanner &sc) { int ShaderDepth = 0; if (sc.GetString()) { char *tmp; tmp = strstr(sc.String, "{"); while (tmp) { ShaderDepth++; tmp++; tmp = strstr(tmp, "{"); } tmp = strstr(sc.String, "}"); while (tmp) { ShaderDepth--; tmp++; tmp = strstr(tmp, "}"); } if (ShaderDepth == 0) return true; } return false; } //========================================================================== // // Light associations per actor class // //========================================================================== class FInternalLightAssociation { public: FInternalLightAssociation(FLightAssociation * asso); int Sprite() const { return m_sprite; } int Frame() const { return m_frame; } const FLightDefaults *Light() const { return m_AssocLight; } protected: int m_sprite; int m_frame; FLightDefaults * m_AssocLight; }; //========================================================================== // // // //========================================================================== FInternalLightAssociation::FInternalLightAssociation(FLightAssociation * asso) { m_AssocLight=NULL; for(unsigned int i=0;iGetName() == asso->Light()) { m_AssocLight = LightDefaults[i]; break; } } m_sprite=-1; m_frame = -1; for (unsigned i = 0; i < sprites.Size (); ++i) { if (strncmp (sprites[i].name, asso->FrameName(), 4) == 0) { m_sprite = (int)i; break; } } // Only handle lights for full frames. // I won't bother with special lights for single rotations // because there is no decent use for them! if (strlen(asso->FrameName())==5 || asso->FrameName()[5]=='0') { m_frame = toupper(asso->FrameName()[4])-'A'; } } //========================================================================== // // State lights // //========================================================================== TArray ParsedStateLights; TArray StateLights; //========================================================================== // // // //========================================================================== void InitializeActorLights() { for(unsigned int i=0;iLight() != nullptr) ti->ActorInfo()->LightAssociations.Push(iasso); } } // we don't need the parser data for the light associations anymore LightAssociations.Clear(); LightAssociations.ShrinkToFit(); StateLights.Resize(ParsedStateLights.Size()+1); for(unsigned i=0; iGetName() == ParsedStateLights[i]) { StateLights[i] = LightDefaults[j]; break; } } } else StateLights[i] = NULL; } StateLights[StateLights.Size()-1] = NULL; // terminator ParsedStateLights.Clear(); ParsedStateLights.ShrinkToFit(); } //========================================================================== // // // //========================================================================== void AActor::AttachLight(unsigned int count, const FLightDefaults *lightdef) { ADynamicLight *light; if (count < AttachedLights.Size()) { light = barrier_cast(AttachedLights[count]); assert(light != NULL); } else { light = Spawn(Pos(), NO_REPLACE); light->target = this; light->owned = true; light->ObjectFlags |= OF_Transient; //light->flags4 |= MF4_ATTENUATE; AttachedLights.Push(light); } light->flags2&=~MF2_DORMANT; lightdef->ApplyProperties(light); } //========================================================================== // // per-state light adjustment // //========================================================================== void AActor::SetDynamicLights() { TArray & LightAssociations = GetInfo()->LightAssociations; unsigned int count = 0; if (state == NULL) return; if (LightAssociations.Size() > 0) { ADynamicLight *lights, *tmpLight; unsigned int i; lights = tmpLight = NULL; for (i = 0; i < LightAssociations.Size(); i++) { if (LightAssociations[i]->Sprite() == sprite && (LightAssociations[i]->Frame()==frame || LightAssociations[i]->Frame()==-1)) { AttachLight(count++, LightAssociations[i]->Light()); } } } if (count == 0 && state->Light > 0) { for(int i= state->Light; StateLights[i] != NULL; i++) { if (StateLights[i] != (FLightDefaults*)-1) { AttachLight(count++, StateLights[i]); } } } for(;countflags2 |= MF2_DORMANT; memset(AttachedLights[count]->args, 0, 3*sizeof(args[0])); } } //========================================================================== // // Needed for garbage collection // //========================================================================== size_t AActor::PropagateMark() { for (unsigned i = 0; i it; AActor * a; ADynamicLight * l; while ((a=it.Next())) { a->AttachedLights.Clear(); } TThinkerIterator it2; l=it2.Next(); while (l) { ADynamicLight * ll = it2.Next(); if (l->owned) l->Destroy(); l=ll; } } //========================================================================== // // // //========================================================================== void AActor::RecreateAllAttachedLights() { TThinkerIterator it; AActor * a; while ((a=it.Next())) { a->SetDynamicLights(); } } //========================================================================== // // // //========================================================================== static void DoParseDefs(FScanner &sc, int workingLump) { int recursion=0; int lump, type; // Get actor class name. while (true) { sc.SavePos(); if (!sc.GetToken ()) { return; } type = sc.MatchString(CoreKeywords); switch (type) { case TAG_INCLUDE: { sc.MustGetString(); // This is not using sc.Open because it can print a more useful error message when done here lump = Wads.CheckNumForFullName(sc.String, true); if (lump==-1) sc.ScriptError("Lump '%s' not found", sc.String); FScanner newscanner(lump); DoParseDefs(newscanner, lump); break; } case LIGHT_POINT: ParsePointLight(sc); break; case LIGHT_PULSE: ParsePulseLight(sc); break; case LIGHT_FLICKER: ParseFlickerLight(sc); break; case LIGHT_FLICKER2: ParseFlickerLight2(sc); break; case LIGHT_SECTOR: ParseSectorLight(sc); break; case LIGHT_OBJECT: ParseObject(sc); break; case LIGHT_CLEAR: // This has been intentionally removed break; case TAG_SHADER: ParseShader(sc); break; case TAG_CLEARSHADERS: break; case TAG_SKYBOX: ParseGldefSkybox(sc); break; case TAG_GLOW: gl_InitGlow(sc); break; case TAG_BRIGHTMAP: gl_ParseBrightmap(sc, workingLump); break; case TAG_HARDWARESHADER: gl_ParseHardwareShader(sc, workingLump); break; case TAG_DETAIL: gl_ParseDetailTexture(sc); break; case TAG_DISABLE_FB: { /* not implemented. sc.MustGetString(); const PClass *cls = PClass::FindClass(sc.String); if (cls) GetDefaultByType(cls)->renderflags |= RF_NEVERFULLBRIGHT; */ } break; default: sc.ScriptError("Error parsing defs. Unknown tag: %s.\n", sc.String); break; } } } //========================================================================== // // // //========================================================================== static void LoadGLDefs(const char *defsLump) { int workingLump, lastLump; static const char *gldefsnames[] = { "GLDEFS", defsLump, nullptr }; lastLump = 0; while ((workingLump = Wads.FindLumpMulti(gldefsnames, &lastLump)) != -1) { FScanner sc(workingLump); DoParseDefs(sc, workingLump); } } //========================================================================== // // // //========================================================================== void ParseGLDefs() { const char *defsLump = NULL; LightAssociations.Clear(); LightDefaults.Clear(); gl_DestroyUserShaders(); switch (gameinfo.gametype) { case GAME_Heretic: defsLump = "HTICDEFS"; break; case GAME_Hexen: defsLump = "HEXNDEFS"; break; case GAME_Strife: defsLump = "STRFDEFS"; break; case GAME_Doom: defsLump = "DOOMDEFS"; break; case GAME_Chex: defsLump = "CHEXDEFS"; break; default: // silence GCC break; } ParseVavoomSkybox(); LoadGLDefs(defsLump); InitializeActorLights(); } //========================================================================== // // // //========================================================================== void AddStateLight(FState *State, const char *lname) { if (State->Light == 0) { ParsedStateLights.Push(NAME_None); State->Light = ParsedStateLights.Push(FName(lname)); } else { ParsedStateLights.Push(FName(lname)); } }