// Fill out your copyright notice in the Description page of Project Settings.


#include "AdventurePlayerController.h"
#include "AdventureMap.h"
#include "HexTile.h"
#include "AdventureCameraPawn.h"
#include "AdventureCharacter.h"
#include "MapObject.h"
#include "MovementArrow.h"



AAdventurePlayerController::AAdventurePlayerController() 
{
	PrimaryActorTick.bCanEverTick = true;
	PrimaryActorTick.bStartWithTickEnabled = true;
    AutoReceiveInput = EAutoReceiveInput::Player0;
}
void AAdventurePlayerController::BeginPlay()
{
    Super::BeginPlay();
    World = GetWorld();
    
    HoveredHex = CurrentHex;

}
// Called every frame
void AAdventurePlayerController::Tick(float DeltaTime)
{
    Super::Tick(DeltaTime);

    if (bInPlacementMode) { FitOnGrid(PlaceObj); }
}

void AAdventurePlayerController::SetupInputComponent()
{
    // Always call this.
    Super::SetupInputComponent();

    // This is initialized on startup, you can go straight to binding
    InputComponent->BindAction("LeftClick", IE_Pressed, this, &AAdventurePlayerController::LeftClick);
    InputComponent->BindAction("DebugAlt", IE_Pressed, this, &AAdventurePlayerController::EnablePlacing); // Change binding eventually
    InputComponent->BindAction("DebugAlt", IE_Released, this, &AAdventurePlayerController::DisablePlacing); // Change binding eventually
}

void AAdventurePlayerController::LeftClick()
{
    if (IsValid(HoveredHex)) {
        if (!bInPlacementMode) {

        }
        else { PlaceObject(PlaceObjClass, HoveredHex); }
    }
    else { return; }
}

TArray<AHexTile*> AAdventurePlayerController::Vision(int32 Radius)
{
    TArray<AHexTile*> Results;
    TSet<AHexTile*> Visible;
    if (CurrentHex->bDiagMove) { Radius = FMath::FloorToInt(float(Radius) * (2.f / 3.f)); }
    Visible = MapRef->BreadthFirstSearch(CurrentHex, Radius);
    for (auto& Hex : Visible) {
        if (ExploredHexes.Contains(Hex)) { continue; }
        Results.Add(Hex);
        ExploredHexes.Add(Hex);
    }
    return Results;
}

void AAdventurePlayerController::MarkPath(TArray<AHexTile*> Path)
{
    FHexVector DirA = FHexVector(Path[0]->Q - CurrentHex->Q, Path[0]->R - CurrentHex->R);
    FHexVector DirB;
    for (int32 i = 0; i < Path.Num() - 1; i++)
    {
        DirB = FHexVector(Path[i + 1]->Q - Path[i]->Q, Path[i + 1]->R - Path[i]->R);
        AMovementArrow* Arrow = World->SpawnActor<AMovementArrow>(MoveArrowClass, Path[i]->GetActorTransform());
        Arrow->MapRef = MapRef;
        Arrow->SetVariant(DirA, DirB);
        PathArrows.Add(Arrow);
        DirA = DirB;
    }
}
void AAdventurePlayerController::ClearPath() 
{ 
    for (AMovementArrow* Arrow : PathArrows) {
        Arrow->Destroy();
    }
    PathArrows.Empty(); 
}

void AAdventurePlayerController::EnablePlacing()
{
    bInPlacementMode = true;
    PlaceObj = World->SpawnActor<AMapObject>(PlaceObjClass, FTransform());
}

void AAdventurePlayerController::DisablePlacing()
{
    bInPlacementMode = false;
    // if (IsValid(PlaceObj)) { PlaceObj->Destroy(); }
}

void AAdventurePlayerController::FitOnGrid(AMapObject* MapObject)
{
    if (!IsValid(HoveredHex)) { return; }
    if (HoveredHex->bFree) { MapObject->SetActorLocation(FVector(HoveredHex->GetActorLocation())); }
}

// called from BP; generally takes the Hex under the player cursor as argument
void AAdventurePlayerController::PlaceObject(TSubclassOf<AMapObject> MapObjClass, AHexTile* OnHex)
{
    AMapObject* SpawnedObj = World->SpawnActor<AMapObject>(MapObjClass, FTransform(OnHex->GetActorTransform().GetLocation()));
    SpawnedObj->Origin = OnHex;
    OnHex->bFree = false; 
    SpawnedObj->Occupy();

    MapRef->MapObjects.Add(OnHex, SpawnedObj);
    MapRef->IncID++;
    SpawnedObj->ID = MapRef->IncID;
    MapRef->MapObjectsByID.Add(MapRef->IncID, SpawnedObj);
}