8b6e09ca09
This was done to clean up the license and to ensure that any commercial fork of the engine has to obey the far stricter requirements concerning source distribution. The old license was compatible with GPLv2 whereas combining GPLv2 and LGPLv3 force a license upgrade to GPLv3. The license of code that originates from ZDoomGL has not been changed.
396 lines
11 KiB
C++
396 lines
11 KiB
C++
//
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
// Copyright(C) 2002-2016 Christoph Oelckers
|
|
// All rights reserved.
|
|
//
|
|
// This program is free software: you can redistribute it and/or modify
|
|
// it under the terms of the GNU Lesser General Public License as published by
|
|
// the Free Software Foundation, either version 3 of the License, or
|
|
// (at your option) any later version.
|
|
//
|
|
// This program is distributed in the hope that it will be useful,
|
|
// but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
// GNU Lesser General Public License for more details.
|
|
//
|
|
// You should have received a copy of the GNU Lesser General Public License
|
|
// along with this program. If not, see http://www.gnu.org/licenses/
|
|
//
|
|
//--------------------------------------------------------------------------
|
|
//
|
|
|
|
#include "gl/system/gl_system.h"
|
|
#include "a_sharedglobal.h"
|
|
#include "g_level.h"
|
|
#include "r_sky.h"
|
|
#include "r_state.h"
|
|
#include "r_utility.h"
|
|
#include "doomdata.h"
|
|
#include "portal.h"
|
|
#include "gl/gl_functions.h"
|
|
|
|
#include "gl/data/gl_data.h"
|
|
#include "gl/renderer/gl_lightdata.h"
|
|
#include "gl/scene/gl_drawinfo.h"
|
|
#include "gl/scene/gl_portal.h"
|
|
#include "gl/textures/gl_material.h"
|
|
#include "gl/utility/gl_convert.h"
|
|
|
|
CVAR(Bool,gl_noskyboxes, false, 0)
|
|
extern int skyfog;
|
|
|
|
//==========================================================================
|
|
//
|
|
// Set up the skyinfo struct
|
|
//
|
|
//==========================================================================
|
|
|
|
void GLSkyInfo::init(int sky1, PalEntry FadeColor)
|
|
{
|
|
memset(this, 0, sizeof(*this));
|
|
if ((sky1 & PL_SKYFLAT) && (sky1 & (PL_SKYFLAT - 1)))
|
|
{
|
|
const line_t *l = &lines[(sky1&(PL_SKYFLAT - 1)) - 1];
|
|
const side_t *s = l->sidedef[0];
|
|
int pos;
|
|
|
|
if (level.flags & LEVEL_SWAPSKIES && s->GetTexture(side_t::bottom).isValid())
|
|
{
|
|
pos = side_t::bottom;
|
|
}
|
|
else
|
|
{
|
|
pos = side_t::top;
|
|
}
|
|
|
|
FTextureID texno = s->GetTexture(pos);
|
|
texture[0] = FMaterial::ValidateTexture(texno, false, true);
|
|
if (!texture[0] || texture[0]->tex->UseType == FTexture::TEX_Null) goto normalsky;
|
|
skytexno1 = texno;
|
|
x_offset[0] = s->GetTextureXOffset(pos) * (360.f/65536.f);
|
|
y_offset = s->GetTextureYOffset(pos);
|
|
mirrored = !l->args[2];
|
|
}
|
|
else
|
|
{
|
|
normalsky:
|
|
if (level.flags&LEVEL_DOUBLESKY)
|
|
{
|
|
texture[1] = FMaterial::ValidateTexture(sky1texture, false, true);
|
|
x_offset[1] = GLRenderer->mSky1Pos;
|
|
doublesky = true;
|
|
}
|
|
|
|
if ((level.flags&LEVEL_SWAPSKIES || (sky1 == PL_SKYFLAT) || (level.flags&LEVEL_DOUBLESKY)) &&
|
|
sky2texture != sky1texture) // If both skies are equal use the scroll offset of the first!
|
|
{
|
|
texture[0] = FMaterial::ValidateTexture(sky2texture, false, true);
|
|
skytexno1 = sky2texture;
|
|
sky2 = true;
|
|
x_offset[0] = GLRenderer->mSky2Pos;
|
|
}
|
|
else if (!doublesky)
|
|
{
|
|
texture[0] = FMaterial::ValidateTexture(sky1texture, false, true);
|
|
skytexno1 = sky1texture;
|
|
x_offset[0] = GLRenderer->mSky1Pos;
|
|
}
|
|
}
|
|
if (skyfog > 0)
|
|
{
|
|
fadecolor = FadeColor;
|
|
fadecolor.a = 0;
|
|
}
|
|
else fadecolor = 0;
|
|
|
|
}
|
|
|
|
|
|
//==========================================================================
|
|
//
|
|
// Calculate sky texture for ceiling or floor
|
|
//
|
|
//==========================================================================
|
|
|
|
void GLWall::SkyPlane(sector_t *sector, int plane, bool allowreflect)
|
|
{
|
|
int ptype = -1;
|
|
|
|
FSectorPortal *sportal = sector->ValidatePortal(plane);
|
|
if (sportal != nullptr && sportal->mFlags & PORTSF_INSKYBOX) sportal = nullptr; // no recursions, delete it here to simplify the following code
|
|
|
|
// Either a regular sky or a skybox with skyboxes disabled
|
|
if ((sportal == nullptr && sector->GetTexture(plane) == skyflatnum) || (gl_noskyboxes && sportal != nullptr && sportal->mType == PORTS_SKYVIEWPOINT))
|
|
{
|
|
GLSkyInfo skyinfo;
|
|
skyinfo.init(sector->sky, Colormap.FadeColor);
|
|
ptype = PORTALTYPE_SKY;
|
|
sky = UniqueSkies.Get(&skyinfo);
|
|
}
|
|
else if (sportal != nullptr)
|
|
{
|
|
switch (sportal->mType)
|
|
{
|
|
case PORTS_STACKEDSECTORTHING:
|
|
case PORTS_PORTAL:
|
|
case PORTS_LINKEDPORTAL:
|
|
{
|
|
FPortal *glport = sector->GetGLPortal(plane);
|
|
if (glport != NULL)
|
|
{
|
|
if (sector->PortalBlocksView(plane)) return;
|
|
|
|
if (GLPortal::instack[1 - plane]) return;
|
|
ptype = PORTALTYPE_SECTORSTACK;
|
|
portal = glport;
|
|
}
|
|
break;
|
|
}
|
|
|
|
case PORTS_SKYVIEWPOINT:
|
|
case PORTS_HORIZON:
|
|
case PORTS_PLANE:
|
|
ptype = PORTALTYPE_SKYBOX;
|
|
secportal = sportal;
|
|
break;
|
|
}
|
|
}
|
|
else if (allowreflect && sector->GetReflect(plane) > 0)
|
|
{
|
|
if ((plane == sector_t::ceiling && ViewPos.Z > sector->ceilingplane.fD()) ||
|
|
(plane == sector_t::floor && ViewPos.Z < -sector->floorplane.fD())) return;
|
|
ptype = PORTALTYPE_PLANEMIRROR;
|
|
planemirror = plane == sector_t::ceiling ? §or->ceilingplane : §or->floorplane;
|
|
}
|
|
if (ptype != -1)
|
|
{
|
|
PutPortal(ptype);
|
|
}
|
|
}
|
|
|
|
|
|
//==========================================================================
|
|
//
|
|
// Calculate sky texture for a line
|
|
//
|
|
//==========================================================================
|
|
|
|
void GLWall::SkyLine(sector_t *fs, line_t *line)
|
|
{
|
|
FSectorPortal *secport = line->GetTransferredPortal();
|
|
GLSkyInfo skyinfo;
|
|
int ptype;
|
|
|
|
// JUSTHIT is used as an indicator that a skybox is in use.
|
|
// This is to avoid recursion
|
|
|
|
if (!gl_noskyboxes && secport && (secport->mSkybox == nullptr || !(secport->mFlags & PORTSF_INSKYBOX)))
|
|
{
|
|
ptype = PORTALTYPE_SKYBOX;
|
|
secportal = secport;
|
|
}
|
|
else
|
|
{
|
|
skyinfo.init(fs->sky, Colormap.FadeColor);
|
|
ptype = PORTALTYPE_SKY;
|
|
sky = UniqueSkies.Get(&skyinfo);
|
|
}
|
|
ztop[0] = zceil[0];
|
|
ztop[1] = zceil[1];
|
|
zbottom[0] = zfloor[0];
|
|
zbottom[1] = zfloor[1];
|
|
PutPortal(ptype);
|
|
}
|
|
|
|
|
|
//==========================================================================
|
|
//
|
|
// Skies on one sided walls
|
|
//
|
|
//==========================================================================
|
|
|
|
void GLWall::SkyNormal(sector_t * fs,vertex_t * v1,vertex_t * v2)
|
|
{
|
|
ztop[0]=ztop[1]=32768.0f;
|
|
zbottom[0]=zceil[0];
|
|
zbottom[1]=zceil[1];
|
|
SkyPlane(fs, sector_t::ceiling, true);
|
|
|
|
ztop[0]=zfloor[0];
|
|
ztop[1]=zfloor[1];
|
|
zbottom[0]=zbottom[1]=-32768.0f;
|
|
SkyPlane(fs, sector_t::floor, true);
|
|
}
|
|
|
|
//==========================================================================
|
|
//
|
|
// Upper Skies on two sided walls
|
|
//
|
|
//==========================================================================
|
|
|
|
void GLWall::SkyTop(seg_t * seg,sector_t * fs,sector_t * bs,vertex_t * v1,vertex_t * v2)
|
|
{
|
|
if (fs->GetTexture(sector_t::ceiling)==skyflatnum)
|
|
{
|
|
if (bs->special == GLSector_NoSkyDraw) return;
|
|
if (bs->GetTexture(sector_t::ceiling)==skyflatnum)
|
|
{
|
|
// if the back sector is closed the sky must be drawn!
|
|
if (bs->ceilingplane.ZatPoint(v1) > bs->floorplane.ZatPoint(v1) ||
|
|
bs->ceilingplane.ZatPoint(v2) > bs->floorplane.ZatPoint(v2) || bs->transdoor)
|
|
return;
|
|
|
|
// one more check for some ugly transparent door hacks
|
|
if (!bs->floorplane.isSlope() && !fs->floorplane.isSlope())
|
|
{
|
|
if (bs->GetPlaneTexZ(sector_t::floor)==fs->GetPlaneTexZ(sector_t::floor)+1.)
|
|
{
|
|
FTexture * tex = TexMan(seg->sidedef->GetTexture(side_t::bottom));
|
|
if (!tex || tex->UseType==FTexture::TEX_Null) return;
|
|
|
|
// very, very, very ugly special case (See Icarus MAP14)
|
|
// It is VERY important that this is only done for a floor height difference of 1
|
|
// or it will cause glitches elsewhere.
|
|
tex = TexMan(seg->sidedef->GetTexture(side_t::mid));
|
|
if (tex != NULL && !(seg->linedef->flags & ML_DONTPEGTOP) &&
|
|
seg->sidedef->GetTextureYOffset(side_t::mid) > 0)
|
|
{
|
|
ztop[0]=ztop[1]=32768.0f;
|
|
zbottom[0]=zbottom[1]=
|
|
bs->ceilingplane.ZatPoint(v2) + seg->sidedef->GetTextureYOffset(side_t::mid);
|
|
SkyPlane(fs, sector_t::ceiling, false);
|
|
return;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
ztop[0]=ztop[1]=32768.0f;
|
|
|
|
FTexture * tex = TexMan(seg->sidedef->GetTexture(side_t::top));
|
|
if (bs->GetTexture(sector_t::ceiling) != skyflatnum)
|
|
|
|
{
|
|
zbottom[0]=zceil[0];
|
|
zbottom[1]=zceil[1];
|
|
}
|
|
else
|
|
{
|
|
zbottom[0] = bs->ceilingplane.ZatPoint(v1);
|
|
zbottom[1] = bs->ceilingplane.ZatPoint(v2);
|
|
flags|=GLWF_SKYHACK; // mid textures on such lines need special treatment!
|
|
}
|
|
}
|
|
else
|
|
{
|
|
float frontreflect = fs->GetReflect(sector_t::ceiling);
|
|
if (frontreflect > 0)
|
|
{
|
|
float backreflect = bs->GetReflect(sector_t::ceiling);
|
|
if (backreflect > 0 && bs->ceilingplane.fD() == fs->ceilingplane.fD())
|
|
{
|
|
// Don't add intra-portal line to the portal.
|
|
return;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
int type = fs->GetPortalType(sector_t::ceiling);
|
|
if (type == PORTS_STACKEDSECTORTHING || type == PORTS_PORTAL || type == PORTS_LINKEDPORTAL)
|
|
{
|
|
FPortal *pfront = fs->GetGLPortal(sector_t::ceiling);
|
|
FPortal *pback = bs->GetGLPortal(sector_t::ceiling);
|
|
if (pfront == NULL || fs->PortalBlocksView(sector_t::ceiling)) return;
|
|
if (pfront == pback && !bs->PortalBlocksView(sector_t::ceiling)) return;
|
|
}
|
|
}
|
|
|
|
// stacked sectors
|
|
ztop[0] = ztop[1] = 32768.0f;
|
|
zbottom[0] = fs->ceilingplane.ZatPoint(v1);
|
|
zbottom[1] = fs->ceilingplane.ZatPoint(v2);
|
|
|
|
}
|
|
|
|
SkyPlane(fs, sector_t::ceiling, true);
|
|
}
|
|
|
|
|
|
//==========================================================================
|
|
//
|
|
// Lower Skies on two sided walls
|
|
//
|
|
//==========================================================================
|
|
|
|
void GLWall::SkyBottom(seg_t * seg,sector_t * fs,sector_t * bs,vertex_t * v1,vertex_t * v2)
|
|
{
|
|
if (fs->GetTexture(sector_t::floor)==skyflatnum)
|
|
{
|
|
if (bs->special == GLSector_NoSkyDraw) return;
|
|
FTexture * tex = TexMan(seg->sidedef->GetTexture(side_t::bottom));
|
|
|
|
// For lower skies the normal logic only applies to walls with no lower texture!
|
|
if (tex->UseType==FTexture::TEX_Null)
|
|
{
|
|
if (bs->GetTexture(sector_t::floor)==skyflatnum)
|
|
{
|
|
// if the back sector is closed the sky must be drawn!
|
|
if (bs->ceilingplane.ZatPoint(v1) > bs->floorplane.ZatPoint(v1) ||
|
|
bs->ceilingplane.ZatPoint(v2) > bs->floorplane.ZatPoint(v2))
|
|
return;
|
|
|
|
}
|
|
else
|
|
{
|
|
// Special hack for Vrack2b
|
|
if (bs->floorplane.ZatPoint(ViewPos) > ViewPos.Z) return;
|
|
}
|
|
}
|
|
zbottom[0]=zbottom[1]=-32768.0f;
|
|
|
|
if ((tex && tex->UseType!=FTexture::TEX_Null) || bs->GetTexture(sector_t::floor)!=skyflatnum)
|
|
{
|
|
ztop[0]=zfloor[0];
|
|
ztop[1]=zfloor[1];
|
|
}
|
|
else
|
|
{
|
|
ztop[0] = bs->floorplane.ZatPoint(v1);
|
|
ztop[1] = bs->floorplane.ZatPoint(v2);
|
|
flags|=GLWF_SKYHACK; // mid textures on such lines need special treatment!
|
|
}
|
|
}
|
|
else
|
|
{
|
|
float frontreflect = fs->GetReflect(sector_t::floor);
|
|
if (frontreflect > 0)
|
|
{
|
|
float backreflect = bs->GetReflect(sector_t::floor);
|
|
if (backreflect > 0 && bs->floorplane.fD() == fs->floorplane.fD())
|
|
{
|
|
// Don't add intra-portal line to the portal.
|
|
return;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
int type = fs->GetPortalType(sector_t::floor);
|
|
if (type == PORTS_STACKEDSECTORTHING || type == PORTS_PORTAL || type == PORTS_LINKEDPORTAL)
|
|
{
|
|
FPortal *pfront = fs->GetGLPortal(sector_t::floor);
|
|
FPortal *pback = bs->GetGLPortal(sector_t::floor);
|
|
if (pfront == NULL || fs->PortalBlocksView(sector_t::floor)) return;
|
|
if (pfront == pback && !bs->PortalBlocksView(sector_t::floor)) return;
|
|
}
|
|
}
|
|
|
|
// stacked sectors
|
|
zbottom[0]=zbottom[1]=-32768.0f;
|
|
ztop[0] = fs->floorplane.ZatPoint(v1);
|
|
ztop[1] = fs->floorplane.ZatPoint(v2);
|
|
}
|
|
|
|
SkyPlane(fs, sector_t::floor, true);
|
|
}
|
|
|