mirror of
https://github.com/ZDoom/gzdoom-gles.git
synced 2024-12-15 14:51:13 +00:00
1375 lines
32 KiB
C++
1375 lines
32 KiB
C++
/*
|
|
** _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 <ctype.h>
|
|
#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"
|
|
|
|
|
|
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_ParseSkybox(FScanner &sc);
|
|
void gl_ParseDetailTexture(FScanner &sc);
|
|
void gl_ParseVavoomSkybox();
|
|
|
|
//==========================================================================
|
|
//
|
|
// 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<FLightAssociation> 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 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];
|
|
double m_Param;
|
|
DVector3 m_Pos;
|
|
ELightType m_type;
|
|
int8_t m_attenuate;
|
|
bool m_subtractive, m_additive, m_halo, m_dontlightself;
|
|
bool m_swapped = false;
|
|
};
|
|
|
|
TDeletingArray<FLightDefaults *> LightDefaults;
|
|
|
|
//-----------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//-----------------------------------------------------------------------------
|
|
|
|
FLightDefaults::FLightDefaults(FName name, ELightType type)
|
|
{
|
|
m_Name = name;
|
|
m_type = type;
|
|
|
|
m_Pos.Zero();
|
|
memset(m_Args, 0, sizeof(m_Args));
|
|
m_Param = 0;
|
|
|
|
m_subtractive = false;
|
|
m_additive = false;
|
|
m_halo = false;
|
|
m_dontlightself = false;
|
|
m_attenuate = -1;
|
|
}
|
|
|
|
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>((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;
|
|
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",
|
|
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
|
|
};
|
|
|
|
|
|
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>((int)(floatTriple[0] * 255), 0, 255));
|
|
defaults->SetArg(LIGHT_GREEN, clamp<int>((int)(floatTriple[1] * 255), 0, 255));
|
|
defaults->SetArg(LIGHT_BLUE, clamp<int>((int)(floatTriple[2] * 255), 0, 255));
|
|
break;
|
|
case LIGHTTAG_OFFSET:
|
|
ParseTriple(sc, floatTriple);
|
|
defaults->SetOffset(floatTriple);
|
|
break;
|
|
case LIGHTTAG_SIZE:
|
|
intVal = clamp<int>(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;
|
|
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>((int)(floatTriple[0] * 255), 0, 255));
|
|
defaults->SetArg(LIGHT_GREEN, clamp<int>((int)(floatTriple[1] * 255), 0, 255));
|
|
defaults->SetArg(LIGHT_BLUE, clamp<int>((int)(floatTriple[2] * 255), 0, 255));
|
|
break;
|
|
case LIGHTTAG_OFFSET:
|
|
ParseTriple(sc, floatTriple);
|
|
defaults->SetOffset(floatTriple);
|
|
break;
|
|
case LIGHTTAG_SIZE:
|
|
intVal = clamp<int>(ParseInt(sc), 1, 1024);
|
|
defaults->SetArg(LIGHT_INTENSITY, intVal);
|
|
break;
|
|
case LIGHTTAG_SECSIZE:
|
|
intVal = clamp<int>(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;
|
|
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>((int)(floatTriple[0] * 255), 0, 255));
|
|
defaults->SetArg(LIGHT_GREEN, clamp<int>((int)(floatTriple[1] * 255), 0, 255));
|
|
defaults->SetArg(LIGHT_BLUE, clamp<int>((int)(floatTriple[2] * 255), 0, 255));
|
|
break;
|
|
case LIGHTTAG_OFFSET:
|
|
ParseTriple(sc, floatTriple);
|
|
defaults->SetOffset(floatTriple);
|
|
break;
|
|
case LIGHTTAG_SIZE:
|
|
intVal = clamp<int>(ParseInt(sc), 1, 1024);
|
|
defaults->SetArg(LIGHT_INTENSITY, intVal);
|
|
break;
|
|
case LIGHTTAG_SECSIZE:
|
|
intVal = clamp<int>(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;
|
|
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>((int)(floatTriple[0] * 255), 0, 255));
|
|
defaults->SetArg(LIGHT_GREEN, clamp<int>((int)(floatTriple[1] * 255), 0, 255));
|
|
defaults->SetArg(LIGHT_BLUE, clamp<int>((int)(floatTriple[2] * 255), 0, 255));
|
|
break;
|
|
case LIGHTTAG_OFFSET:
|
|
ParseTriple(sc, floatTriple);
|
|
defaults->SetOffset(floatTriple);
|
|
break;
|
|
case LIGHTTAG_SIZE:
|
|
intVal = clamp<int>(ParseInt(sc), 1, 1024);
|
|
defaults->SetArg(LIGHT_INTENSITY, intVal);
|
|
break;
|
|
case LIGHTTAG_SECSIZE:
|
|
intVal = clamp<int>(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;
|
|
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>((int)(floatTriple[0] * 255), 0, 255));
|
|
defaults->SetArg(LIGHT_GREEN, clamp<int>((int)(floatTriple[1] * 255), 0, 255));
|
|
defaults->SetArg(LIGHT_BLUE, clamp<int>((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;
|
|
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;i<LightDefaults.Size();i++)
|
|
{
|
|
if (LightDefaults[i]->GetName() == 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<FName> ParsedStateLights;
|
|
TArray<FLightDefaults *> StateLights;
|
|
|
|
|
|
|
|
//==========================================================================
|
|
//
|
|
//
|
|
//
|
|
//==========================================================================
|
|
|
|
void InitializeActorLights()
|
|
{
|
|
for(unsigned int i=0;i<LightAssociations.Size();i++)
|
|
{
|
|
PClassActor * ti = PClass::FindActor(LightAssociations[i].ActorName());
|
|
if (ti)
|
|
{
|
|
ti = GetRealType(ti);
|
|
// put this in the class data arena so that we do not have to worry about deleting it ourselves.
|
|
void *mem = ClassDataAllocator.Alloc(sizeof(FInternalLightAssociation));
|
|
FInternalLightAssociation * iasso = new(mem) FInternalLightAssociation(&LightAssociations[i]);
|
|
if (iasso->Light() != nullptr)
|
|
ti->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; i<ParsedStateLights.Size();i++)
|
|
{
|
|
if (ParsedStateLights[i] != NAME_None)
|
|
{
|
|
StateLights[i] = (FLightDefaults*)-1; // something invalid that's not NULL.
|
|
for(unsigned int j=0;j<LightDefaults.Size();j++)
|
|
{
|
|
if (LightDefaults[j]->GetName() == 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<ADynamicLight*>(AttachedLights[count]);
|
|
assert(light != NULL);
|
|
}
|
|
else
|
|
{
|
|
light = Spawn<ADynamicLight>(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<FInternalLightAssociation *> & LightAssociations = GetClass()->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(;count<AttachedLights.Size();count++)
|
|
{
|
|
AttachedLights[count]->flags2 |= MF2_DORMANT;
|
|
memset(AttachedLights[count]->args, 0, 3*sizeof(args[0]));
|
|
}
|
|
}
|
|
|
|
//==========================================================================
|
|
//
|
|
// Needed for garbage collection
|
|
//
|
|
//==========================================================================
|
|
|
|
size_t AActor::PropagateMark()
|
|
{
|
|
for (unsigned i = 0; i<AttachedLights.Size(); i++)
|
|
{
|
|
GC::Mark(AttachedLights[i]);
|
|
}
|
|
return Super::PropagateMark();
|
|
}
|
|
|
|
//==========================================================================
|
|
//
|
|
// This is called before saving the game
|
|
//
|
|
//==========================================================================
|
|
|
|
void AActor::DeleteAllAttachedLights()
|
|
{
|
|
TThinkerIterator<AActor> it;
|
|
AActor * a;
|
|
ADynamicLight * l;
|
|
|
|
while ((a=it.Next()))
|
|
{
|
|
a->AttachedLights.Clear();
|
|
}
|
|
|
|
TThinkerIterator<ADynamicLight> it2;
|
|
|
|
l=it2.Next();
|
|
while (l)
|
|
{
|
|
ADynamicLight * ll = it2.Next();
|
|
if (l->owned) l->Destroy();
|
|
l=ll;
|
|
}
|
|
}
|
|
|
|
//==========================================================================
|
|
//
|
|
//
|
|
//
|
|
//==========================================================================
|
|
|
|
void AActor::RecreateAllAttachedLights()
|
|
{
|
|
TThinkerIterator<AActor> it;
|
|
AActor * a;
|
|
|
|
while ((a=it.Next()))
|
|
{
|
|
a->SetDynamicLights();
|
|
}
|
|
}
|
|
|
|
|
|
//==========================================================================
|
|
// The actual light def parsing code is there.
|
|
// DoParseDefs is no longer called directly by ParseDefs, now it's called
|
|
// by LoadDynLightDefs, which wasn't simply integrated into ParseDefs
|
|
// because of the way the code needs to load two out of five lumps.
|
|
//==========================================================================
|
|
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:
|
|
gl_ParseSkybox(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;
|
|
}
|
|
gl_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));
|
|
}
|
|
}
|