gzdoom/src/p_xlat.cpp
Christoph Oelckers 2dff0e7309 - fixed: P_TranslateLinedef should not do any byte swapping but require passing of properly ordered values.
This gets called from several places, and the only one passing in potentially byte swapped values is P_LoadLineDefs.
All other uses of this function were essentially broken on PowerPC.
2017-05-04 23:52:16 +02:00

507 lines
No EOL
12 KiB
C++

/*
** p_xlat.cpp
** Translate old Doom format maps to the Hexen format
**
**---------------------------------------------------------------------------
** Copyright 1998-2007 Randy Heit
** 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 "doomtype.h"
#include "g_level.h"
#include "p_lnspec.h"
#include "doomdata.h"
#include "m_swap.h"
#include "p_spec.h"
#include "p_local.h"
#include "a_sharedglobal.h"
#include "gi.h"
#include "w_wad.h"
#include "sc_man.h"
#include "cmdlib.h"
#include "g_levellocals.h"
#include "actorinlines.h"
#include "xlat/xlat.h"
// define names for the TriggerType field of the general linedefs
typedef enum
{
WalkOnce,
WalkMany,
SwitchOnce,
SwitchMany,
GunOnce,
GunMany,
PushOnce,
PushMany,
} triggertype_e;
void P_TranslateLineDef (line_t *ld, maplinedef_t *mld, int lineindexforid)
{
uint32_t special = mld->special;
short tag = mld->tag;
uint32_t flags =mld->flags;
INTBOOL passthrough = 0;
uint32_t flags1 = flags;
uint32_t newflags = 0;
for(int i=0;i<16;i++)
{
if ((flags & (1<<i)) && LineFlagTranslations[i].ismask)
{
flags1 &= LineFlagTranslations[i].newvalue;
}
}
for(int i=0;i<16;i++)
{
if ((flags1 & (1<<i)) && !LineFlagTranslations[i].ismask)
{
switch (LineFlagTranslations[i].newvalue)
{
case -1:
passthrough = true;
break;
case -2:
ld->alpha = 0.75;
break;
case -3:
ld->alpha = 0.25;
break;
default:
newflags |= LineFlagTranslations[i].newvalue;
break;
}
}
}
flags = newflags;
if (lineindexforid >= 0)
{
// For purposes of maintaining BOOM compatibility, each
// line also needs to have its ID set to the same as its tag.
// An external conversion program would need to do this more
// intelligently.
tagManager.AddLineID(lineindexforid, tag);
}
// 0 specials are never translated.
if (special == 0)
{
ld->special = 0;
ld->flags = flags;
ld->args[0] = mld->tag;
memset (ld->args+1, 0, sizeof(ld->args)-sizeof(ld->args[0]));
return;
}
FLineTrans *linetrans = NULL;
if (special < SimpleLineTranslations.Size()) linetrans = &SimpleLineTranslations[special];
if (linetrans != NULL && linetrans->special != 0)
{
ld->special = linetrans->special;
ld->flags = flags | ((linetrans->flags & 0x1f) << 9);
if (linetrans->flags & 0x20) ld->flags |= ML_FIRSTSIDEONLY;
ld->activation = 1 << GET_SPAC(ld->flags);
if (ld->activation == SPAC_AnyCross)
{ // this is really PTouch
ld->activation = SPAC_Impact|SPAC_PCross;
}
else if (ld->activation == SPAC_Impact)
{ // In non-UMDF maps, Impact implies PCross
ld->activation = SPAC_Impact | SPAC_PCross;
}
ld->flags &= ~ML_SPAC_MASK;
if (passthrough && ld->activation == SPAC_Use)
{
ld->activation = SPAC_UseThrough;
}
// Set special arguments.
FXlatExprState state;
state.tag = tag;
state.linetype = special;
for (int t = 0; t < LINETRANS_MAXARGS; ++t)
{
int arg = linetrans->args[t];
int argop = (linetrans->flags >> (LINETRANS_TAGSHIFT + t*TAGOP_NUMBITS)) & TAGOP_MASK;
switch (argop)
{
case ARGOP_Const:
ld->args[t] = arg;
break;
case ARGOP_Tag:
ld->args[t] = tag;
break;
case ARGOP_Expr:
{
int *xnode = &XlatExpressions[arg];
state.bIsConstant = true;
XlatExprEval[*xnode](&ld->args[t], xnode, &state);
}
break;
default:
assert(0);
ld->args[t] = 0;
break;
}
}
if ((ld->flags & ML_SECRET) && ld->activation & (SPAC_Use|SPAC_UseThrough))
{
ld->flags &= ~ML_MONSTERSCANACTIVATE;
}
return;
}
for(int i=0;i<NumBoomish;i++)
{
FBoomTranslator *b = &Boomish[i];
if (special >= b->FirstLinetype && special <= b->LastLinetype)
{
ld->special = b->NewSpecial;
switch (special & 0x0007)
{
case WalkMany:
flags |= ML_REPEAT_SPECIAL;
case WalkOnce:
ld->activation = SPAC_Cross;
break;
case SwitchMany:
case PushMany:
flags |= ML_REPEAT_SPECIAL;
case SwitchOnce:
case PushOnce:
if (passthrough)
ld->activation = SPAC_UseThrough;
else
ld->activation = SPAC_Use;
break;
case GunMany:
flags |= ML_REPEAT_SPECIAL;
case GunOnce:
ld->activation = SPAC_Impact;
break;
}
ld->args[0] = tag;
ld->args[1] = ld->args[2] = ld->args[3] = ld->args[4] = 0;
for(unsigned j=0; j < b->Args.Size(); j++)
{
FBoomArg *arg = &b->Args[j];
int *destp;
int flagtemp;
uint8_t val = 0; // quiet, GCC
bool found;
if (arg->ArgNum < 4)
{
destp = &ld->args[arg->ArgNum+1];
}
else
{
flagtemp = ((flags >> 9) & 0x3f);
destp = &flagtemp;
}
if (arg->ListSize == 0)
{
val = arg->ConstantValue;
found = true;
}
else
{
found = false;
for (int k = 0; k < arg->ListSize; k++)
{
if ((special & arg->AndValue) == arg->ResultFilter[k])
{
val = arg->ResultValue[k];
found = true;
}
}
}
if (found)
{
if (arg->bOrExisting)
{
*destp |= val;
}
else
{
*destp = val;
}
if (arg->ArgNum == 4)
{
flags = (flags & ~0x7e00) | (flagtemp << 9);
}
}
}
// We treat push triggers like switch triggers with zero tags.
if ((special & 7) == PushMany || (special & 7) == PushOnce)
{
if (ld->special == Generic_Door)
{
ld->args[2] |= 128;
}
else
{
ld->args[0] = 0;
}
}
ld->flags = flags;
if (flags & ML_MONSTERSCANACTIVATE && ld->activation == SPAC_Cross)
{
// In Boom anything can activate such a line so set the proper type here.
ld->activation = SPAC_AnyCross;
}
return;
}
}
// Don't know what to do, so 0 it
ld->special = 0;
ld->flags = flags;
memset (ld->args, 0, sizeof(ld->args));
}
// Now that ZDoom again gives the option of using Doom's original teleport
// behavior, only teleport dests in a sector with a 0 tag need to be
// given a TID. And since Doom format maps don't have TIDs, we can safely
// give them TID 1.
void P_TranslateTeleportThings ()
{
AActor *dest;
TThinkerIterator<AActor> iterator(NAME_TeleportDest);
bool foundSomething = false;
while ( (dest = iterator.Next()) )
{
if (!tagManager.SectorHasTags(dest->Sector))
{
dest->tid = 1;
dest->AddToHash ();
foundSomething = true;
}
}
if (foundSomething)
{
for (auto &line : level.lines)
{
if (line.special == Teleport)
{
if (line.args[1] == 0)
{
line.args[0] = 1;
}
}
else if (line.special == Teleport_NoFog)
{
if (line.args[2] == 0)
{
line.args[0] = 1;
}
}
else if (line.special == Teleport_ZombieChanger)
{
if (line.args[1] == 0)
{
line.args[0] = 1;
}
}
}
}
}
int P_TranslateSectorSpecial (int special)
{
int mask = 0;
for(int i = SectorMasks.Size()-1; i>=0; i--)
{
int newmask = special & SectorMasks[i].mask;
if (newmask)
{
special &= ~newmask;
if (SectorMasks[i].op == 1)
newmask <<= SectorMasks[i].shift;
else if (SectorMasks[i].op == -1)
newmask >>= SectorMasks[i].shift;
else if (SectorMasks[i].op == 0 && SectorMasks[i].shift == 1)
newmask = 0;
mask |= newmask;
}
}
if ((unsigned)special < SectorTranslations.Size())
{
if (!SectorTranslations[special].bitmask_allowed && mask)
special = 0;
else
special = SectorTranslations[special].newtype;
}
return special | mask;
}
static const int *Expr_Const(int *dest, const int *xnode, FXlatExprState *state)
{
*dest = xnode[-1];
return xnode - 2;
}
static const int *Expr_Tag(int *dest, const int *xnode, FXlatExprState *state)
{
*dest = state->tag;
state->bIsConstant = false;
return xnode - 1;
}
static const int *Expr_Add(int *dest, const int *xnode, FXlatExprState *state)
{
int op1, op2;
xnode = XlatExprEval[xnode[-1]](&op2, xnode-1, state);
xnode = XlatExprEval[xnode[0]](&op1, xnode, state);
*dest = op1 + op2;
return xnode;
}
static const int *Expr_Sub(int *dest, const int *xnode, FXlatExprState *state)
{
int op1, op2;
xnode = XlatExprEval[xnode[-1]](&op2, xnode-1, state);
xnode = XlatExprEval[xnode[0]](&op1, xnode, state);
*dest = op1 - op2;
return xnode;
}
static const int *Expr_Mul(int *dest, const int *xnode, FXlatExprState *state)
{
int op1, op2;
xnode = XlatExprEval[xnode[-1]](&op2, xnode-1, state);
xnode = XlatExprEval[xnode[0]](&op1, xnode, state);
*dest = op1 * op2;
return xnode;
}
static void Div0Check(int &op1, int &op2, const FXlatExprState *state)
{
if (op2 == 0)
{
Printf("Xlat: Division by 0 for line type %d\n", state->linetype);
// Set some safe values
op1 = 0;
op2 = 1;
}
}
static const int *Expr_Div(int *dest, const int *xnode, FXlatExprState *state)
{
int op1, op2;
xnode = XlatExprEval[xnode[-1]](&op2, xnode-1, state);
xnode = XlatExprEval[xnode[0]](&op1, xnode, state);
Div0Check(op1, op2, state);
*dest = op1 / op2;
return xnode;
}
static const int *Expr_Mod(int *dest, const int *xnode, FXlatExprState *state)
{
int op1, op2;
xnode = XlatExprEval[xnode[-1]](&op2, xnode-1, state);
xnode = XlatExprEval[xnode[0]](&op1, xnode, state);
Div0Check(op1, op2, state);
*dest = op1 % op2;
return xnode;
}
static const int *Expr_And(int *dest, const int *xnode, FXlatExprState *state)
{
int op1, op2;
xnode = XlatExprEval[xnode[-1]](&op2, xnode-1, state);
xnode = XlatExprEval[xnode[0]](&op1, xnode, state);
*dest = op1 & op2;
return xnode;
}
static const int *Expr_Or(int *dest, const int *xnode, FXlatExprState *state)
{
int op1, op2;
xnode = XlatExprEval[xnode[-1]](&op2, xnode-1, state);
xnode = XlatExprEval[xnode[0]](&op1, xnode, state);
*dest = op1 | op2;
return xnode;
}
static const int *Expr_Xor(int *dest, const int *xnode, FXlatExprState *state)
{
int op1, op2;
xnode = XlatExprEval[xnode[-1]](&op2, xnode-1, state);
xnode = XlatExprEval[xnode[0]](&op1, xnode, state);
*dest = op1 ^ op2;
return xnode;
}
static const int *Expr_Neg(int *dest, const int *xnode, FXlatExprState *state)
{
int op;
xnode = XlatExprEval[xnode[-1]](&op, xnode-1, state);
*dest = -op;
return xnode;
}
const int* (*XlatExprEval[XEXP_COUNT])(int *dest, const int *xnode, FXlatExprState *state) =
{
Expr_Const,
Expr_Tag,
Expr_Add,
Expr_Sub,
Expr_Mul,
Expr_Div,
Expr_Mod,
Expr_And,
Expr_Or,
Expr_Xor,
Expr_Neg
};