#include "Viewport.h"

#include "Party.h"
#include "Indoor.h"
#include "Math.h"
#include "mm7_data.h"
#include "Actor.h"
#include "Outdoor.h"
#include "Events.h"
#include "BSPModel.h"
#include "Mouse.h"
#include "SpriteObject.h"
#include "ObjectList.h"
#include "DecorationList.h"
#include "texts.h"
#include "Game.h"
#include "Vis.h"
#include "LOD.h"
#include "GUIWindow.h"
#include "TurnEngine.h"
#include "stru123.h"
#include "MM7.h"


//----- (004C0262) --------------------------------------------------------
void Viewport::SetScreen( signed int sTL_X, signed int sTL_Y, signed int sBR_X, signed int sBR_Y )
    {
    unsigned int tl_x; // edx@1
    unsigned int br_x; // esi@1
    unsigned int tl_y; // edi@3
    unsigned int br_y; // eax@3

    tl_x = sTL_X;
    br_x = sBR_X;
    if ( sTL_X > sBR_X )
        {
          __debugbreak(); // check this code
        br_x = sBR_X ^ sTL_X ^ sBR_X;                           // swap x's
        tl_x = br_x ^ sBR_X ^ sTL_X;
        }
    tl_y = sTL_Y;
    br_y = sBR_Y;
    if ( sTL_Y > sBR_Y )
        {
          __debugbreak(); // check this code
        br_y = sBR_Y ^ sTL_Y ^ sBR_Y;                           // swap y's 
        tl_y = br_y ^ sBR_Y ^ sTL_Y;
        }
    this->uScreen_TL_X = tl_x;
    this->uScreen_TL_Y = tl_y;
    this->uScreen_BR_X = br_x;
    this->uScreen_BR_Y = br_y;
    this->uScreenWidth = br_x - tl_x + 1;
    this->uScreenHeight = br_y - tl_y + 1;
    this->uScreenCenterX = (signed int)(br_x + tl_x) /2;
    if ( pRenderer->pRenderD3D == 0 )
        this->uScreenCenterY = this->uScreen_BR_Y - fixpoint_sub0(field_30, uScreenHeight);
    else
        this->uScreenCenterY = uScreenHeight/2;
    SetViewport(this->uScreen_TL_X, this->uScreen_TL_Y, this->uScreen_BR_X, this->uScreen_BR_Y);
    }

//----- (004C02F8) --------------------------------------------------------
void Viewport::_4C02F8(int a2)
    {
    this->field_30 = a2;
    SetScreen(this->uScreen_TL_X, this->uScreen_TL_Y, this->uScreen_BR_X, this->uScreen_BR_Y);
    }

//----- (004C0312) --------------------------------------------------------
void Viewport::SetViewport( signed int sTL_X, signed int sTL_Y, signed int sBR_X, signed int sBR_Y )
    {
    signed int tl_x; // ebx@1
    signed int tl_y; // edi@3
    signed int br_x; // edx@5
    signed int br_y; // eax@7

    tl_x = sTL_X;
    if ( sTL_X < this->uScreen_TL_X )
        tl_x = this->uScreen_TL_X;
    tl_y = sTL_Y;
    if ( sTL_Y < this->uScreen_TL_Y )
        tl_y = this->uScreen_TL_Y;
    br_x = sBR_X;
    if ( sBR_X > this->uScreen_BR_X )
        br_x = this->uScreen_BR_X;
    br_y = sBR_Y;
    if ( sBR_Y > this->uScreen_BR_Y )
        br_y = this->uScreen_BR_Y;
    this->uViewportTL_Y = tl_y;
    this->uViewportTL_X = tl_x;
    this->uViewportBR_X = br_x;
    this->uViewportBR_Y = br_y;
    }

//----- (00443219) --------------------------------------------------------
 void ViewingParams::_443219()
    {
    this->sViewCenterY += 512;
    AdjustPosition();
    }

//----- (00443225) --------------------------------------------------------
void ViewingParams::_443225()
    {
    this->sViewCenterX -= 512;
    AdjustPosition();
    }

//----- (00443231) --------------------------------------------------------
void ViewingParams::_443231()
    {
    this->sViewCenterY -= 512;
    AdjustPosition();
    }

//----- (0044323D) --------------------------------------------------------
void ViewingParams::_44323D()
    {
    this->sViewCenterX += 512;
    AdjustPosition();
    }

//----- (00443249) --------------------------------------------------------
void ViewingParams::CenterOnParty()
    {
    int v1; // edx@1

    v1 = (unsigned __int64)((signed __int64)this->field_2C << 15) >> 16;
    this->field_2C = v1;
    if ( v1 < 384 )
        this->field_2C = 384;
    this->sViewCenterX = pParty->vPosition.x;
    this->sViewCenterY = pParty->vPosition.y;
    AdjustPosition();
    }

//----- (00443291) --------------------------------------------------------
void ViewingParams::CenterOnParty2()
    {
    int v1; // edx@1
    int v2; // eax@1

    v1 = 2 * this->field_2C;
    v2 = 1536;
    this->field_2C = v1;
    if ( uCurrentlyLoadedLevelType != LEVEL_Outdoor )
        v2 = 3072;
    if ( v1 > v2 )
        this->field_2C = v2;
    this->sViewCenterX = pParty->vPosition.x;
    this->sViewCenterY = pParty->vPosition.y;
    AdjustPosition();
    }

//----- (004432E7) --------------------------------------------------------
void ViewingParams::AdjustPosition()
    {
    ViewingParams *v1; // esi@1
    int v2; // ebx@1
    signed int v3; // edx@1
    int v4; // ecx@1
    int v5; // edi@3
    int v6; // eax@3
    int v7; // eax@5


    v1 = this;
    v2 = this->indoor_center_y;
    v3 = 88 >> this->field_2C / 384;
    v4 = (44 - v3) << 9;
    if ( v1->sViewCenterY > v2 + v4 )
        v1->sViewCenterY = v2 + v4;

    v5 = v1->indoor_center_x;
    v6 = (v3 - 44) << 9;
    if ( v1->sViewCenterX < v5 + v6 )
        v1->sViewCenterX = v5 + v6;

    v7 = v2 + v6;
    if ( v1->sViewCenterY < v7 )
        v1->sViewCenterY = v7;

    if ( v1->sViewCenterX > v5 + v4 )
        v1->sViewCenterX = v5 + v4;
    }

//----- (00443343) --------------------------------------------------------
void ViewingParams::InitGrayPalette()
    {
    for  (unsigned short i=0; i<256; ++i)
        pPalette[i]=TargetColor(i, i, i);
    }

//----- (00443365) --------------------------------------------------------
void ViewingParams::_443365()
{
  Vec3_short_ *v3; // eax@4
  Vec3_short_ *v6; // eax@12
  int minimum_y; // [sp+10h] [bp-10h]@2
  int maximum_y; // [sp+14h] [bp-Ch]@2
  int minimum_x; // [sp+18h] [bp-8h]@2
  int maximum_x; // [sp+1Ch] [bp-4h]@2

  InitGrayPalette();
  if ( uCurrentlyLoadedLevelType == LEVEL_Indoor )
  {
    minimum_x = 0x40000000;
    minimum_y = 0x40000000;

    maximum_x = -0x40000000;
    maximum_y = -0x40000000;
    for (int i=0; i<pIndoor->pMapOutlines->uNumOutlines; ++i)
    {
      v3 = &pIndoor->pVertices[pIndoor->pMapOutlines->pOutlines[i].uFace1ID];

      if ( v3->x < minimum_x )
        minimum_x = v3->x;
      if ( v3->x > maximum_x )
        maximum_x = v3->x;
      if ( v3->y < minimum_y )
        minimum_y = v3->x;
      if ( v3->y > maximum_y )
        maximum_y = v3->x;

      v6 = &pIndoor->pVertices[pIndoor->pMapOutlines->pOutlines[i].uFace2ID];

      if ( v6->x < minimum_x )
        minimum_x = v3->x;
      if ( v6->x > maximum_x )
        maximum_x = v3->x;

      if ( v6->y < minimum_y )
        minimum_y = v3->y;
      if ( v6->y > maximum_y )
        maximum_y = v3->y;
    }

    uMinimapZoom = 1024;
    indoor_center_x = (signed int)(minimum_x + maximum_x) / 2;
    field_28 = 10;
    indoor_center_y = (signed int)(minimum_y + maximum_y) / 2;
  }
  else
  {
    indoor_center_x = 0;
    indoor_center_y = 0;
    uMinimapZoom = _576E2C_current_minimap_zoom;
    field_28 = dword_576E28;
  }
  field_2C = 384;
}
//----- (0042213C) --------------------------------------------------------
void OnGameViewportClick()
{
  signed int v0; // ebx@2
  POINT *v1; // esi@3
  signed int v2; // eax@9
  BLVFace *v3; // eax@10
  unsigned int v4; // eax@11
  unsigned __int16 v5; // dx@14
  signed int v6; // eax@14
  char *v7; // esi@15
  //int *v8; // eax@19
  int v9; // eax@19
  unsigned int v10; // eax@19
  int v11; // ecx@21
  ODMFace *v12; // eax@22
  LevelDecoration *v13; // esi@24
  __int16 v14; // ax@25
  int v15; // ecx@29
  signed int v16; // edx@30
  Actor *v17; // esi@30
  int v18; // ebx@47
  unsigned __int16 v19; // ax@50
  const char *v20; // eax@51
  signed int v21; // eax@58
  ItemGen *v22; // esi@62
  unsigned int v23; // eax@62
  SpriteObject a1; // [sp+Ch] [bp-80h]@1
  //POINT v25; // [sp+7Ch] [bp-10h]@3
  POINT a2; // [sp+84h] [bp-8h]@3

  v1 = pMouse->GetCursorPos(&a2);
  if ( pRenderer->pRenderD3D )
    v0 = pGame->pVisInstance->get_picked_object_zbuf_val();
  else
  {
    v0 = pRenderer->pActiveZBuffer[v1->x + pSRZBufferLineOffsets[v1->y]];
  }

  if ( PID_TYPE(v0) == OBJECT_Item)
  {
    a2.y = (signed int)(unsigned __int16)v0 >> 3;
    v21 = (signed int)(unsigned __int16)v0 >> 3;
    if ( !(pObjectList->pObjects[pSpriteObjects[v21].uObjectDescID].uFlags & 0x10) && a2.y < 1000 && pSpriteObjects[v21].uObjectDescID
      && (unsigned int)v0 < 0x2000000 )
    {
      v22 = &pSpriteObjects[v21].stru_24;
      v23 = pSpriteObjects[v21].stru_24.uItemID;
      if ( pItemsTable->pItems[v23].uEquipType == 18 )
      {
        party_finds_gold(v22->uSpecEnchantmentType, 0);
        viewparams->bRedrawGameUI = 1;
      }
      else
      {
        sprintfex(pTmpBuf2.data(), pGlobalTXT_LocalizationStrings[471], pItemsTable->pItems[v23].pUnidentifiedName);
        ShowStatusBarString(pTmpBuf2.data(), 2u);
        if ( v22->uItemID == 506 )
          _449B7E_toggle_bit(pParty->_quest_bits, 184, 1u);
        if ( v22->uItemID == 455 )
          _449B7E_toggle_bit(pParty->_quest_bits, 185, 1u);
        if ( !pParty->AddItem(v22) )
          pParty->SetHoldingItem(v22);
      }
      SpriteObject::OnInteraction(a2.y);
      return;
    }
    v4 = pParty->pPickedItem.uItemID;
    if ( !pParty->pPickedItem.uItemID )
		return;
    goto LABEL_14;
  }
  if ( PID_TYPE(v0) != OBJECT_Actor)
  {
    if ( PID_TYPE(v0) == OBJECT_Decoration)
    {
      v13 = &pLevelDecorations[(signed int)(unsigned __int16)v0 >> 3];
      if ( (signed int)(((unsigned int)v0 >> 16) - pDecorationList->pDecorations[v13->uDecorationDescID].uRadius) >= 512 )
	  {
          v4 = pParty->pPickedItem.uItemID;
          if ( !pParty->pPickedItem.uItemID )
            return;
          goto LABEL_14;
	  }
      v14 = v13->field_16_event_id;
      if ( !v14 )
      {
        if ( pLevelDecorations[(signed int)(unsigned __int16)v0 >> 3].IsInteractive() )
        {
          v15 = stru_5E4C90._decor_events[v13->_idx_in_stru123 - 75] + 380;
          activeLevelDecoration = &pLevelDecorations[(signed int)(unsigned __int16)v0 >> 3];
          EventProcessor(v15, 0, 1);
          activeLevelDecoration = NULL;
        }
        return;
      }
      v11 = v14;
    }
    else
    {
      if ( PID_TYPE(v0) != OBJECT_BModel || HIWORD(v0) >= 512 )
	  {
          v4 = pParty->pPickedItem.uItemID;
          if ( !pParty->pPickedItem.uItemID )
            return;
          goto LABEL_14;
	  }
      v2 = PID_ID(v0);
      if ( uCurrentlyLoadedLevelType == LEVEL_Indoor)
      {
        v3 = &pIndoor->pFaces[v2];
        if ( !(v3->uAttributes & 0x2000000) )
        {
LABEL_11:
			v4 = pParty->pPickedItem.uItemID;
			if ( !pParty->pPickedItem.uItemID )
			{
				ShowNothingHereStatus();
				v4 = pParty->pPickedItem.uItemID;
				if ( !pParty->pPickedItem.uItemID )
					return;
			}
LABEL_14:
			v5 = pItemsTable->pItems[v4].uSpriteID;
			v6 = 0;
			a1.uType = v5;
			if ( (signed int)pObjectList->uNumObjects <= 0 )
				LOWORD(v6) = 0;
			else
			{
				v7 = (char *)&pObjectList->pObjects->uObjectID;
				while ( v5 != *(short *)v7 )
				{
					++v6;
					v7 += 56;
					if ( v6 >= (signed int)pObjectList->uNumObjects )
					{
						LOWORD(v6) = 0;
						break;
					}
				}
			}
			a1.uObjectDescID = v6;
			a1.vPosition.y = pParty->vPosition.y;
			a1.spell_caster_pid = OBJECT_Player;
			a1.vPosition.x = pParty->vPosition.x;
			a1.vPosition.z = pParty->sEyelevel + pParty->vPosition.z;
			a1.uSoundID = 0;
			a1.uFacing = 0;
			a1.uAttributes = 8;
			a1.uSectorID = pIndoor->GetSector(pParty->vPosition.x, pParty->vPosition.y, pParty->sEyelevel + pParty->vPosition.z);
			a1.uSpriteFrameID = 0;
			memcpy(&a1.stru_24, &pParty->pPickedItem, 0x24u);

            extern int UnprojectX(int);
			v9 = UnprojectX(v1->x);
			a1.Create(pParty->sRotationY + v9, 184, 200, 0);
			v10 = pIcons_LOD->LoadTexture(pItemsTable->pItems[pParty->pPickedItem.uItemID].pIconName, TEXTURE_16BIT_PALETTE);
			if (v10 != -1)
				pIcons_LOD->pTextures[v10].Release();
			pMouse->RemoveHoldingItem();
			pIcons_LOD->SyncLoadedFilesCount();
			return;
        }
        v11 = pIndoor->pFaceExtras[v3->uFaceExtraID].uEventID;
      }
      else
      {
        v12 = &pOutdoor->pBModels[(signed int)(v0 & 0xFFFF) >> 9].pFaces[v2 & 0x3F];
        if ( !v12->Clickable())
          goto LABEL_11;
        v11 = v12->sCogTriggeredID;
      }
    }
    EventProcessor(v11, (unsigned __int16)v0, 1);
    return;
  }
  v16 = (signed int)(unsigned __int16)v0 >> 3;
  a2.y = v16;
  v17 = &pActors[v16];
  if ( v17->uAIState == 5 )
  {
    if ( (unsigned int)v0 < 0x2000000 )
    {
      stru_50C198.LootActor(&pActors[v16]);
      return;
    }
    v4 = pParty->pPickedItem.uItemID;
    if ( !pParty->pPickedItem.uItemID )
		return;
    goto LABEL_14;
  }
  if ( GetAsyncKeyState(VK_SHIFT) >= 0 )
  {
    if ( !v17->GetActorsRelation(0) && !(BYTE2(v17->uAttributes) & 8) )
    {
      if ( HIWORD(v0) >= 512)
	  {
          v4 = pParty->pPickedItem.uItemID;
          if ( !pParty->pPickedItem.uItemID )
            return;
          goto LABEL_14;
	  }
      if ( !v17->CanAct() )
        return;
      v18 = a2.y;
      Actor::AI_FaceObject(a2.y, 4u, 0, 0);
      if ( !v17->sNPC_ID )
      {
        v19 = pNPCStats->pGroups_copy[v17->uGroup];
        if ( v19 )
        {
          v20 = pNPCStats->pCatchPhrases[v19];
          if ( v20 )
          {
            pParty->uFlags |= 2u;
            strcpy(byte_5B0938.data(), v20);
            sub_4451A8_press_any_key(0, 0, 0);
          }
        }
        return;
      }
      /*if ( (signed int)pMessageQueue_50CBD0->uNumMessages >= 40 )
        return;
      pMessageQueue_50CBD0->pMessages[pMessageQueue_50CBD0->uNumMessages].eType = UIMSG_StartNPCDialogue;
      pMessageQueue_50CBD0->pMessages[pMessageQueue_50CBD0->uNumMessages].param = v18;
LABEL_42:
      *(&pMessageQueue_50CBD0->uNumMessages + 3 * pMessageQueue_50CBD0->uNumMessages + 3) = 0;
      ++pMessageQueue_50CBD0->uNumMessages;
      return;*/
      pMessageQueue_50CBD0->AddMessage(UIMSG_StartNPCDialogue, v18, 0);
      return;
    }
    if ( pParty->bTurnBasedModeOn == 1 && pTurnEngine->field_4 == 3 )
    {
      pTurnEngine->field_18 |= 8u;
      return;
    }
    /*if ( (signed int)pMessageQueue_50CBD0->uNumMessages < 40 )
    {
      pMessageQueue_50CBD0->pMessages[pMessageQueue_50CBD0->uNumMessages].eType = UIMSG_Attack;
      goto LABEL_41;
    }*/
    pMessageQueue_50CBD0->AddMessage(UIMSG_Attack, 0, 0);
  }
  else
  {
    if ( pParty->bTurnBasedModeOn == 1 && pTurnEngine->field_4 == 3 )
    {
      pParty->uFlags |= PARTY_FLAGS_1_FALLING;
      return;
    }
    if ( uActiveCharacter
      && sub_427769_spell(pPlayers[uActiveCharacter]->uQuickSpell))
    {
      pMessageQueue_50CBD0->AddMessage(UIMSG_CastQuickSpell, 0, 0);
      /*&& (signed int)pMessageQueue_50CBD0->uNumMessages < 40 )
      pMessageQueue_50CBD0->pMessages[pMessageQueue_50CBD0->uNumMessages].eType = UIMSG_CastQuickSpell;
LABEL_41:
      pMessageQueue_50CBD0->pMessages[pMessageQueue_50CBD0->uNumMessages].param = 0;
      goto LABEL_42;*/
    }
  }
}