REDRIVER2/src_rebuild/GAME/C/DR2ROADS.C
Ilya Shurumov c40d40bd22 - added sources rebuilt with TDR and partially decompiled intro sequence
- moved necessary data to new sources
- running intro with TOMB5 HLE emulator
2020-03-28 03:25:35 +06:00

713 lines
16 KiB
C

#include "THISDUST.H"
#include "DR2ROADS.H"
sdPlane sea = { 9, 0, 16384, 0, 2048 }; // a default surface if FindSurfaceD2 fails
// decompiled code
// original method signature:
// void /*$ra*/ ProcessStraightsDriver2Lump(char *lump_file /*$s0*/, int lump_size /*$a1*/)
// line 64, offset 0x000136c0
/* begin block 1 */
// Start line: 65
// Start offset: 0x000136C0
/* end block 1 */
// End offset: 0x000136F4
// End Line: 69
/* begin block 2 */
// Start line: 659
/* end block 2 */
// End Line: 660
/* begin block 3 */
// Start line: 128
/* end block 3 */
// End Line: 129
void ProcessStraightsDriver2Lump(char *lump_file,int lump_size)
{
Getlong((char *)&NumDriver2Straights,lump_file);
Driver2StraightsPtr = (DRIVER2_STRAIGHT *)(lump_file + 4);
return;
}
// decompiled code
// original method signature:
// void /*$ra*/ ProcessCurvesDriver2Lump(char *lump_file /*$s0*/, int lump_size /*$a1*/)
// line 80, offset 0x000136f4
/* begin block 1 */
// Start line: 81
// Start offset: 0x000136F4
/* end block 1 */
// End offset: 0x00013728
// End Line: 85
/* begin block 2 */
// Start line: 681
/* end block 2 */
// End Line: 682
/* begin block 3 */
// Start line: 693
/* end block 3 */
// End Line: 694
void ProcessCurvesDriver2Lump(char *lump_file,int lump_size)
{
Getlong((char *)&NumDriver2Curves,lump_file);
Driver2CurvesPtr = (DRIVER2_CURVE *)(lump_file + 4);
return;
}
// decompiled code
// original method signature:
// void /*$ra*/ ProcessJunctionsDriver2Lump(char *lump_file /*$s1*/, int lump_size /*$a1*/, int fix /*$s0*/)
// line 94, offset 0x00013728
/* begin block 1 */
// Start line: 95
// Start offset: 0x00013728
/* begin block 1.1 */
// Start line: 102
// Start offset: 0x0001375C
// Variables:
// int loop; // $v1
// struct OLD_DRIVER2_JUNCTION *old; // $a1
// struct DRIVER2_JUNCTION *p; // $a0
/* begin block 1.1.1 */
// Start line: 107
// Start offset: 0x00013778
// Variables:
// int i; // $a1
/* end block 1.1.1 */
// End offset: 0x000137A4
// End Line: 113
/* end block 1.1 */
// End offset: 0x000137B8
// End Line: 114
/* end block 1 */
// End offset: 0x000137CC
// End Line: 115
/* begin block 2 */
// Start line: 713
/* end block 2 */
// End Line: 714
/* begin block 3 */
// Start line: 723
/* end block 3 */
// End Line: 724
void ProcessJunctionsDriver2Lump(char *lump_file,int lump_size,int fix)
{
int iVar1;
int iVar2;
short *psVar3;
DRIVER2_JUNCTION *pDVar4;
DRIVER2_JUNCTION *pDVar5;
int iVar6;
DRIVER2_JUNCTION *pDVar7;
Getlong((char *)&NumDriver2Junctions,lump_file);
iVar1 = NumDriver2Junctions;
pDVar4 = (DRIVER2_JUNCTION *)(lump_file + 4);
Driver2JunctionsPtr = pDVar4;
if ((fix != 0) && (iVar2 = 0, pDVar5 = pDVar4, 0 < NumDriver2Junctions)) {
do {
iVar2 = iVar2 + 1;
pDVar7 = pDVar4 + 1;
psVar3 = pDVar5[1].ExitIdx;
iVar6 = 3;
do {
psVar3 = psVar3 + 1;
iVar6 = iVar6 + -1;
pDVar4->ExitIdx[0] = *psVar3;
pDVar4 = (DRIVER2_JUNCTION *)(pDVar4->ExitIdx + 1);
} while (-1 < iVar6);
pDVar4 = pDVar7;
pDVar5 = pDVar5 + 2;
} while (iVar2 < iVar1);
}
return;
}
// decompiled code
// original method signature:
// int /*$ra*/ MapHeight(struct VECTOR *pos /*$s0*/)
// line 146, offset 0x000137cc
/* begin block 1 */
// Start line: 147
// Start offset: 0x000137CC
// Variables:
// int height; // $v0
// struct _sdPlane *plane; // $v0
/* end block 1 */
// End offset: 0x0001380C
// End Line: 162
/* begin block 2 */
// Start line: 808
/* end block 2 */
// End Line: 809
/* begin block 3 */
// Start line: 840
/* end block 3 */
// End Line: 841
int MapHeight(VECTOR *pos)
{
_sdPlane *plane;
int iVar1;
plane = sdGetCell(pos);
if (plane == (_sdPlane *)0x0) {
iVar1 = 0;
}
else {
iVar1 = sdHeightOnPlane(pos,plane);
}
return iVar1;
}
// decompiled code
// original method signature:
// int /*$ra*/ FindSurfaceD2(struct VECTOR *pos /*$s0*/, struct VECTOR *normal /*$s1*/, struct VECTOR *out /*$s3*/, struct _sdPlane **plane /*$s2*/)
// line 164, offset 0x00012ef4
/* begin block 1 */
// Start line: 328
/* end block 1 */
// End Line: 329
int FindSurfaceD2(VECTOR *pos,VECTOR *normal,VECTOR *out,_sdPlane **plane)
{
_sdPlane *p_Var1;
int iVar2;
p_Var1 = sdGetCell(pos);
*plane = p_Var1;
out->vx = pos->vx;
out->vz = pos->vz;
iVar2 = sdHeightOnPlane(pos,*plane);
out->vy = iVar2;
p_Var1 = *plane;
if ((p_Var1 == (_sdPlane *)0x0) || (p_Var1->b == 0)) {
normal->vx = 0;
normal->vy = 0x1000;
normal->vz = 0;
}
else {
normal->vx = (int)((uint)(ushort)p_Var1->a << 0x10) >> 0x12;
normal->vy = (int)((uint)(ushort)(*plane)->b << 0x10) >> 0x12;
normal->vz = (int)((uint)(ushort)(*plane)->c << 0x10) >> 0x12;
}
if (*plane == (_sdPlane *)0x0) {
iVar2 = 0x1000;
}
else {
iVar2 = 0x1000;
if ((*plane)->surface == 4) {
if (((gInGameCutsceneActive == 0) || (gCurrentMissionNumber != 0x17)) ||
(gInGameCutsceneID != 0)) {
iVar2 = out->vy + ((((int)((uint)*(ushort *)
((int)rcossin_tbl + ((pos->vx + pos->vz) * 8 & 0x3ff8U))
<< 0x10) >> 0x18) / 3) * 0x10000 >> 0x10);
}
else {
iVar2 = out->vy + ((int)((uint)*(ushort *)
((int)rcossin_tbl + ((pos->vx + pos->vz) * 8 & 0x3ff8U)) <<
0x10) >> 0x19);
}
out->vy = iVar2;
iVar2 = 0x800;
}
}
return iVar2;
}
// decompiled code
// original method signature:
// int /*$ra*/ sdHeightOnPlane(struct VECTOR *pos /*$t0*/, struct _sdPlane *plane /*$a1*/)
// line 205, offset 0x000130d4
/* begin block 1 */
// Start line: 206
// Start offset: 0x000130D4
/* begin block 1.1 */
// Start line: 216
// Start offset: 0x00013134
// Variables:
// int angle; // $v0
// int i; // $v0
// struct DRIVER2_CURVE *curve; // $s0
/* end block 1.1 */
// End offset: 0x0001319C
// End Line: 228
/* begin block 1.2 */
// Start line: 231
// Start offset: 0x0001319C
// Variables:
// int val; // $a3
/* begin block 1.2.1 */
// Start line: 240
// Start offset: 0x000131BC
// Variables:
// int lx; // $v0
// int ly; // $v1
/* end block 1.2.1 */
// End offset: 0x00013218
// End Line: 244
/* end block 1.2 */
// End offset: 0x0001322C
// End Line: 247
/* end block 1 */
// End offset: 0x0001322C
// End Line: 248
/* begin block 2 */
// Start line: 410
/* end block 2 */
// End Line: 411
int sdHeightOnPlane(VECTOR *pos,_sdPlane *plane)
{
int iVar1;
uint uVar2;
DRIVER2_CURVE *pDVar3;
if (plane != (_sdPlane *)0x0) {
uVar2 = plane->d;
if ((((int)uVar2 >> 1 ^ uVar2) & 0x40000000) != 0) {
return uVar2 ^ 0x40000000;
}
if (((plane->surface & 0xe000U) == 0x4000) && (plane->b == 0)) {
pDVar3 = Driver2CurvesPtr + (((uint)(ushort)plane->surface & 0x1fff) - 0x20);
iVar1 = ratan2(pDVar3->Midz - pos->vz,pDVar3->Midx - pos->vx);
iVar1 = (int)pDVar3->gradient * (iVar1 + 0x800U & 0xfff);
if (iVar1 < 0) {
iVar1 = iVar1 + 0xfff;
}
return (iVar1 >> 0xc) - (int)pDVar3->height;
}
iVar1 = (int)plane->b;
if (iVar1 != 0) {
if (iVar1 == 0x4000) {
return -uVar2;
}
if (iVar1 == 0) {
trap(7);
}
return -uVar2 - (int)((int)plane->a * ((pos->vx - 0x200U & 0xffff) + 0x200) +
(int)plane->c * ((pos->vz - 0x200U & 0xffff) + 0x200)) / iVar1;
}
}
return 0;
}
// decompiled code
// original method signature:
// int /*$ra*/ GetSurfaceIndex(struct VECTOR *pos /*$a0*/)
// line 250, offset 0x0001380c
/* begin block 1 */
// Start line: 252
// Start offset: 0x0001380C
// Variables:
// struct _sdPlane *plane; // $v0
/* end block 1 */
// End offset: 0x00013848
// End Line: 260
/* begin block 2 */
// Start line: 959
/* end block 2 */
// End Line: 960
/* begin block 3 */
// Start line: 1048
/* end block 3 */
// End Line: 1049
/* begin block 4 */
// Start line: 1049
/* end block 4 */
// End Line: 1050
/* begin block 5 */
// Start line: 1051
/* end block 5 */
// End Line: 1052
int GetSurfaceIndex(VECTOR *pos)
{
_sdPlane *p_Var1;
int iVar2;
p_Var1 = sdGetCell(pos);
if (p_Var1 == (_sdPlane *)0x0) {
iVar2 = -0x20;
}
else {
iVar2 = (int)p_Var1->surface + -0x20;
}
return iVar2;
}
// decompiled code
// original method signature:
// struct _sdPlane * /*$ra*/ FindRoadInBSP(struct _sdNode *node /*$s0*/, struct _sdPlane *base /*$s1*/)
// line 266, offset 0x000138f0
/* begin block 1 */
// Start line: 268
// Start offset: 0x00013908
// Variables:
// struct _sdPlane *plane; // $v0
/* end block 1 */
// End offset: 0x00013980
// End Line: 293
/* begin block 2 */
// Start line: 409
/* end block 2 */
// End Line: 410
/* begin block 3 */
// Start line: 1463
/* end block 3 */
// End Line: 1464
_sdPlane * FindRoadInBSP(_sdNode *node,_sdPlane *base)
{
_sdPlane *p_Var1;
while( true ) {
if (-1 < node->angle) {
base = base + node->angle;
if (base->surface < 0x20) {
base = (_sdPlane *)0x0;
}
return base;
}
p_Var1 = FindRoadInBSP((_sdNode *)&node->dist,base);
if (p_Var1 != (_sdPlane *)0x0) break;
node = (_sdNode *)(&node->angle + ((node->angle << 1) >> 0x18));
}
return p_Var1;
}
// decompiled code
// original method signature:
// int /*$ra*/ RoadInCell(struct VECTOR *pos /*$s5*/)
// line 295, offset 0x0001322c
/* begin block 1 */
// Start line: 296
// Start offset: 0x0001322C
// Variables:
// char *buffer; // $s2
// struct XYPAIR cellPos; // stack offset -48
// struct XYPAIR cell; // stack offset -40
// short *surface; // $a0
// struct _sdPlane *plane; // $s0
/* begin block 1.1 */
// Start line: 331
// Start offset: 0x00013318
// Variables:
// int moreLevels; // $s3
// short *check; // $s1
// struct _sdPlane *base; // $s4
/* end block 1.1 */
// End offset: 0x000133E4
// End Line: 372
/* end block 1 */
// End offset: 0x0001346C
// End Line: 389
/* begin block 2 */
// Start line: 549
/* end block 2 */
// End Line: 550
/* begin block 3 */
// Start line: 550
/* end block 3 */
// End Line: 551
/* begin block 4 */
// Start line: 598
/* end block 4 */
// End Line: 599
int RoadInCell(VECTOR *pos)
{
bool bVar1;
short sVar2;
ushort uVar3;
_sdPlane *plane;
int iVar4;
int iVar5;
uint uVar6;
ushort *puVar7;
short *psVar8;
iVar4 = pos->vx + -0x200;
iVar5 = pos->vz + -0x200;
psVar8 = RoadMapDataRegions4
[iVar4 >> 0x10 & 1U ^ (cells_across >> 6 & 1U) + (iVar5 >> 0xf & 2U) ^
cells_down >> 5 & 2U];
if (*psVar8 == 2) {
puVar7 = (ushort *)(psVar8 + (iVar4 >> 10 & 0x3fU) + (iVar5 >> 10 & 0x3fU) * 0x40 + 4);
uVar6 = SEXT24((short)*puVar7);
uVar3 = *puVar7;
if (uVar6 == 0xffffffff) {
return -1;
}
if ((uVar3 & 0xe000) == 0) {
plane = (_sdPlane *)((int)psVar8 + uVar6 * 0xc + (int)psVar8[1]);
}
else {
if ((uVar6 & 0x8000) != 0) {
sVar2 = psVar8[1];
bVar1 = ((uint)uVar3 & 0x6000) == 0x2000;
if (bVar1) {
puVar7 = (ushort *)((int)psVar8 + ((uint)uVar3 & 0x1fff) * 2 + (int)psVar8[2] + 2);
goto LAB_0001335c;
}
LAB_00013370:
uVar3 = *puVar7;
if ((uVar3 & 0x4000) == 0) {
plane = (_sdPlane *)((int)psVar8 + (int)sVar2) + (short)uVar3;
if (0x1f < plane->surface) goto LAB_0001340c;
}
else {
plane = FindRoadInBSP((_sdNode *)
((int)psVar8 + ((uint)uVar3 & 0x3fff) * 4 + (int)psVar8[3]),
(_sdPlane *)((int)psVar8 + (int)sVar2));
if (plane != (_sdPlane *)0x0) goto LAB_00013414;
}
puVar7 = puVar7 + 2;
if (!bVar1) goto LAB_0001340c;
LAB_0001335c:
if (puVar7[-1] == 0x8000) {
bVar1 = false;
}
goto LAB_00013370;
}
plane = (_sdPlane *)0x0;
}
LAB_0001340c:
if (plane == (_sdPlane *)0x0) {
return -1;
}
LAB_00013414:
if (0x1f < plane->surface) {
iVar4 = sdHeightOnPlane(pos,plane);
pos->vy = iVar4 + 0x100;
return (int)plane->surface + -0x20;
}
}
return -1;
}
// decompiled code
// original method signature:
// struct _sdPlane * /*$ra*/ sdGetCell(struct VECTOR *pos /*$s3*/)
// line 400, offset 0x0001346c
/* begin block 1 */
// Start line: 401
// Start offset: 0x0001346C
// Variables:
// char *buffer; // $s1
// short *surface; // $s0
// int nextLevel; // $s2
// struct _sdPlane *plane; // $a1
// struct XYPAIR cell; // stack offset -40
// struct XYPAIR cellPos; // stack offset -32
/* begin block 1.1 */
// Start line: 441
// Start offset: 0x0001355C
// Variables:
// int y; // $a0
/* end block 1.1 */
// End offset: 0x000135B8
// End Line: 456
/* begin block 1.2 */
// Start line: 463
// Start offset: 0x000135CC
// Variables:
// short *BSPsurface; // $a0
/* end block 1.2 */
// End offset: 0x00013634
// End Line: 481
/* end block 1 */
// End offset: 0x000136C0
// End Line: 502
/* begin block 2 */
// Start line: 828
/* end block 2 */
// End Line: 829
/* begin block 3 */
// Start line: 840
/* end block 3 */
// End Line: 841
/* begin block 4 */
// Start line: 852
/* end block 4 */
// End Line: 853
_sdPlane * sdGetCell(VECTOR *pos)
{
bool bVar1;
_sdPlane *plane;
short *psVar2;
ushort *puVar3;
ushort *puVar4;
short *psVar5;
XYPAIR local_20;
sdLevel = 0;
local_20.x = pos->vx - 0x200;
local_20.y = pos->vz - 0x200;
psVar5 = RoadMapDataRegions4
[(int)local_20.x >> 0x10 & 1U ^ (cells_across >> 6 & 1U) + ((int)local_20.y >> 0xf & 2U)
^ cells_down >> 5 & 2U];
plane = (_sdPlane *)0x0;
if (*psVar5 == 2) {
puVar3 = (ushort *)
(psVar5 + ((int)local_20.x >> 10 & 0x3fU) + ((int)local_20.y >> 10 & 0x3fU) * 0x40 + 4)
;
if (*puVar3 == 0xffff) {
plane = &sea;
}
else {
if (((uint)*puVar3 & 0x6000) == 0x2000) {
psVar2 = (short *)((int)psVar5 + ((uint)*puVar3 & 0x1fff) * 2 + (int)psVar5[2]);
do {
if (-0x100 - pos->vy <= (int)*psVar2) break;
psVar2 = psVar2 + 2;
sdLevel = sdLevel + 1;
} while (*psVar2 != -0x8000);
puVar3 = (ushort *)(psVar2 + 1);
}
do {
bVar1 = false;
puVar4 = puVar3;
if ((*puVar3 & 0x4000) != 0) {
local_20.x = local_20.x & 0x3ff;
local_20.y = local_20.y & 0x3ff;
puVar4 = (ushort *)
sdGetBSP((_sdNode *)((int)psVar5 + ((uint)*puVar3 & 0x3fff) * 4 + (int)psVar5[3])
,&local_20);
if (*puVar4 == 0x7fff) {
sdLevel = sdLevel + 1;
bVar1 = true;
puVar4 = puVar3 + 2;
}
}
puVar3 = puVar4;
} while (bVar1);
plane = (_sdPlane *)((int)psVar5 + (int)(short)*puVar4 * 0xc + (int)psVar5[1]);
if ((((uint)plane & 3) == 0) && (*(int *)plane != -1)) {
if ((uint)(ushort)plane->surface - 0x10 < 0x10) {
plane = EventSurface(pos,plane);
}
}
else {
plane = &sea;
}
}
}
return plane;
}
// decompiled code
// original method signature:
// short * /*$ra*/ sdGetBSP(struct _sdNode *node /*$a3*/, struct XYPAIR *pos /*$a1*/)
// line 505, offset 0x00013848
/* begin block 1 */
// Start line: 506
// Start offset: 0x00013848
/* begin block 1.1 */
// Start line: 509
// Start offset: 0x00013870
// Variables:
// int dot; // $a0
/* end block 1.1 */
// End offset: 0x000138D4
// End Line: 522
/* end block 1 */
// End offset: 0x000138F0
// End Line: 524
/* begin block 2 */
// Start line: 1560
/* end block 2 */
// End Line: 1561
short * sdGetBSP(_sdNode *node,XYPAIR *pos)
{
uint uVar1;
uint uVar2;
uVar2 = node->angle;
if ((int)uVar2 < 0) {
do {
uVar1 = (int)(uVar2 << 0x15) >> 0x13 & 0x3ffc;
if (pos->y * (int)*(short *)((int)rcossin_tbl + uVar1 + 2) -
pos->x * (int)*(short *)((int)rcossin_tbl + uVar1) < ((int)(uVar2 << 9) >> 0x14) << 0xc) {
node = (_sdNode *)&node->dist;
}
else {
node = (_sdNode *)(&node->angle + ((int)(uVar2 << 1) >> 0x18));
}
uVar2 = node->angle;
} while ((uVar2 & 0x80000000) != 0);
}
return (short *)node;
}