/*  Starshatter: The Open Source Project
    Copyright (c) 2021-2024, Starshatter: The Open Source Project Contributors
    Copyright (c) 2011-2012, Starshatter OpenSource Distribution Contributors
    Copyright (c) 1997-2006, Destroyer Studios LLC.

    AUTHOR:       John DiCamillo


    OVERVIEW
    ========
    Mission Debriefing Dialog Active Window class
*/

#include "DebriefDlg.h"
#include "PlanScreen.h"
#include "Campaign.h"
#include "Element.h"
#include "Instruction.h"
#include "Mission.h"
#include "Sim.h"
#include "SimEvent.h"
#include "Ship.h"
#include "ShipDesign.h"
#include "StarSystem.h"
#include "FormatUtil.h"
#include "Player.h"
#include "Campaign.h"

#include "NetLobby.h"
#include "HttpServer.h"

#include "Clock.h"
#include "ContentBundle.h"
#include "Keyboard.h"
#include "Mouse.h"
#include "Button.h"
#include "ListBox.h"
#include "Slider.h"
#include "ParseUtil.h"
#include "Game.h"

// +--------------------------------------------------------------------+
// DECLARE MAPPING FUNCTIONS:

DEF_MAP_CLIENT(DebriefDlg, OnClose);
DEF_MAP_CLIENT(DebriefDlg, OnUnit);

// +--------------------------------------------------------------------+

DebriefDlg::DebriefDlg(Screen* s, FormDef& def, PlanScreen* mgr)
: FormWindow(s, 0, 0, s->Width(), s->Height()), manager(mgr),
close_btn(0), campaign(0), mission(0),
unit_index(0), info(0), sim(0), ship(0)
{
    campaign = Campaign::GetCampaign();

    if (campaign)
    mission = campaign->GetMission();

    Init(def);
}

DebriefDlg::~DebriefDlg()
{
}

// +--------------------------------------------------------------------+

void
DebriefDlg::RegisterControls()
{
    mission_name               = FindControl(200);
    mission_system             = FindControl(202);
    mission_sector             = FindControl(204);
    mission_time_start         = FindControl(206);

    objectives                 = FindControl(210);
    situation                  = FindControl(240);
    mission_score              = FindControl(211);
    unit_list                  = (ListBox*) FindControl(320);
    summary_list               = (ListBox*) FindControl(330);
    event_list                 = (ListBox*) FindControl(340);

    if (unit_list)
    REGISTER_CLIENT(EID_SELECT, unit_list, DebriefDlg, OnUnit);

    close_btn                   = (Button*) FindControl(1);

    if (close_btn)
    REGISTER_CLIENT(EID_CLICK, close_btn, DebriefDlg, OnClose);
}

// +--------------------------------------------------------------------+

void
DebriefDlg::Show()
{
    FormWindow::Show();
    Clock::GetInstance()->SetTimeCompression(1.0);

    mission  = 0;
    campaign = Campaign::GetCampaign();
    sim      = Sim::GetSim();

    if (sim)
    ship  = sim->GetPlayerShip();

    if (campaign)
    mission = campaign->GetMission();

    if (mission_name) {
        if (mission)
        mission_name->SetText(mission->Name());
        else
        mission_name->SetText(ContentBundle::GetInstance()->GetText("DebriefDlg.mission-name"));
    }

    if (mission_system) {
        mission_system->SetText("");

        if (mission) {
            StarSystem* sys = mission->GetStarSystem();

            if (sys)
            mission_system->SetText(sys->Name());
        }
    }

    if (mission_sector) {
        mission_sector->SetText("");

        if (mission) {
            MissionElement* elem = mission->GetElements()[0];

            if (elem)
            mission_sector->SetText(elem->Region());
        }
    }

    if (mission_time_start) {
        if (mission) {
            char txt[32];
            FormatDayTime(txt, mission->Start());
            mission_time_start->SetText(txt);
        }
    }

    if (objectives) {
        bool found_objectives = false;

        if (sim && sim->GetPlayerElement()) {
            Text     text;
            Element* elem = sim->GetPlayerElement();

            for (int i = 0; i < elem->NumObjectives(); i++) {
                Instruction* obj = elem->GetObjective(i);
                text += Text("* ") + obj->GetDescription() + Text("\n");

                found_objectives = true;
            }

            objectives->SetText(text);
        }

        if (!found_objectives) {
            if (mission)
            objectives->SetText(mission->Objective());
            else
            objectives->SetText(ContentBundle::GetInstance()->GetText("DebriefDlg.unspecified"));
        }
    }

    if (situation) {
        if (mission)
        situation->SetText(mission->Situation());
        else
        situation->SetText(ContentBundle::GetInstance()->GetText("DebriefDlg.unknown"));
    }

    if (mission_score) {
        mission_score->SetText(ContentBundle::GetInstance()->GetText("DebriefDlg.no-stats"));

        if (ship) {
            for (int i = 0; i < ShipStats::NumStats(); i++) {
                ShipStats* stats = ShipStats::GetStats(i);
                if (stats && !strcmp(ship->Name(), stats->GetName())) {
                    stats->Summarize();
                    const auto points = stats->EffectivePoints();
                    mission_score->SetText(Text::format(
                        "%d %s", points, ContentBundle::GetInstance()->GetText("DebriefDlg.points").data()));
                    break;
                }
            }
        }
    }

    DrawUnits();
}

// +--------------------------------------------------------------------+

void
DebriefDlg::DrawUnits()
{
    if (mission) {
        if (unit_list) {
            unit_list->ClearItems();

            int  seln    = -1;
            bool netgame = false;

            if (sim && sim->IsNetGame())
            netgame = true;

            for (int i = 0; i < ShipStats::NumStats(); i++) {
                ShipStats* stats = ShipStats::GetStats(i);
                stats->Summarize();

                if (netgame || (stats->GetIFF() == mission->Team() &&
                            !strcmp(stats->GetRegion(), mission->GetRegion()))) {
                    int n = unit_list->AddItemWithData(" ", i) - 1;
                    unit_list->SetItemText(n, 1, stats->GetName());
                    unit_list->SetItemText(n, 2, stats->GetRole());
                    unit_list->SetItemText(n, 3, stats->GetType());

                    if (ship && !strcmp(ship->Name(), stats->GetName()))
                    seln = n;
                }
            }

            if (seln >= 0) {
                unit_list->SetSelected(seln);
                OnUnit(0);
            }
        }
    }
}

// +--------------------------------------------------------------------+

void
DebriefDlg::ExecFrame()
{
    if (unit_list && unit_list->NumItems() && unit_list->GetSelCount() < 1) {
        unit_list->SetSelected(0);
        OnUnit(0);
    }

    if (Keyboard::KeyDown(VK_RETURN)) {
        OnClose(0);
    }
}

// +--------------------------------------------------------------------+

void
DebriefDlg::OnUnit(AWEvent* event)
{
    if (!unit_list || !event_list || !summary_list)
    return;

    summary_list->ClearItems();
    event_list->ClearItems();

    int seln = unit_list->GetSelection();
    int unit = unit_list->GetItemData(seln);

    ShipStats* stats = ShipStats::GetStats(unit);
    if (stats) {
        stats->Summarize();

        char txt[64];
        int i = 0;

        sprintf_s(txt, "%d", stats->GetGunShots());
        summary_list->AddItem("Guns Fired: ");
        summary_list->SetItemText(i++, 1, txt);

        sprintf_s(txt, "%d", stats->GetGunHits());
        summary_list->AddItem("Gun Hits: ");
        summary_list->SetItemText(i++, 1, txt);

        sprintf_s(txt, "%d", stats->GetGunKills());
        summary_list->AddItem("Gun Kills: ");
        summary_list->SetItemText(i++, 1, txt);

        // one line spacer:
        summary_list->AddItem(" ");
        i++;

        sprintf_s(txt, "%d", stats->GetMissileShots());
        summary_list->AddItem("Missiles Fired: ");
        summary_list->SetItemText(i++, 1, txt);

        sprintf_s(txt, "%d", stats->GetMissileHits());
        summary_list->AddItem("Missile Hits: ");
        summary_list->SetItemText(i++, 1, txt);

        sprintf_s(txt, "%d", stats->GetMissileKills());
        summary_list->AddItem("Missile Kills: ");
        summary_list->SetItemText(i++, 1, txt);

        i = 0;
        ListIter<SimEvent> iter = stats->GetEvents();
        while (++iter) {
            SimEvent* event = iter.value();

            char txt[64];
            int time = event->GetTime();

            if (time > 24 * 60 * 60)
            FormatDayTime(txt, time);
            else
            FormatTime(txt, time);

            event_list->AddItem(txt);
            event_list->SetItemText(i, 1, event->GetEventDesc());

            if (event->GetTarget())
            event_list->SetItemText(i, 2, event->GetTarget());

            i++;
        }
    }
}

// +--------------------------------------------------------------------+

void
DebriefDlg::OnClose(AWEvent* event)
{
    Sim* sim = Sim::GetSim();

    sim->CommitMission();
    sim->UnloadMission();

    NetLobby* lobby = NetLobby::GetInstance();
    if (lobby && lobby->IsHost()) {
        lobby->SelectMission(0);
        lobby->ExecFrame();
    }

    Player* player = Player::GetCurrentPlayer();
    if (player && player->ShowAward()) {
        manager->ShowAwardDlg();
    }

    else {
        if (auto game = Game::GetInstance()) {
            Mouse::Show(false);
            Campaign* campaign = Campaign::GetCampaign();
            if (campaign && campaign->GetCampaignId() < Campaign::SINGLE_MISSIONS)
                game->SetGameMode(Game::CMPN_MODE);
            else
                game->SetGameMode(Game::MENU_MODE);
        }
    }
}