#include <libultraship.h>
#include <libultra/gbi.h>
#include <vector>
#include <memory>

#include "BowsersCastle.h"
#include "GameObject.h"
#include "World.h"
#include "engine/actors/AFinishline.h"
#include "engine/vehicles/OBombKart.h"
#include "bowsers_castle_data.h"

extern "C" {
    #include "main.h"
    #include "camera.h"
    #include "course_offsets.h"
    #include "code_800029B0.h"
    #include "render_courses.h"
    #include "code_8006E9C0.h"
    #include "code_80057C60.h"
    #include "defines.h"
    #include "math_util.h"
    #include "external.h"
    #include "code_80005FD0.h"
    #include "spawn_players.h"
    #include "render_objects.h"
    #include "assets/common_data.h"
    #include "save.h"
    #include "staff_ghosts.h"
    #include "actors.h"
    #include "collision.h"
    #include "code_8003DC40.h"
    #include "memory.h"
    extern const char *bowsers_castle_dls[];
}

BowsersCastle::BowsersCastle() {
    this->vtx = d_course_bowsers_castle_vertex;
    this->gfx = d_course_bowsers_castle_packed_dls;
    this->gfxSize = 4900;
    this->textures = bowsers_castle_textures;
    Props.MinimapTexture = gTextureCourseOutlineBowsersCastle;
    Props.D_800E5548[0] = 64;
    Props.D_800E5548[1] = 64;

    Props.Id = "mk:bowsers_castle";
    Props.Name = "bowser's castle";
    Props.DebugName = "castle";
    Props.CourseLength = "777m";
    Props.AIBehaviour = D_0D008FB8;
    Props.AIMaximumSeparation = 35.0f;
    Props.AIMinimumSeparation = 0.2f;
    Props.SomePtr = D_800DCAF4;
    Props.AISteeringSensitivity = 53;

    Props.NearPersp = 2.0f;
    Props.FarPersp = 2700.0f;

    Props.PathSizes = {0x30C, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0};

    Props.D_0D009418[0] = 4.1666665f;
    Props.D_0D009418[1] = 5.5833334f;
    Props.D_0D009418[2] = 6.1666665f;
    Props.D_0D009418[3] = 6.75f;

    Props.D_0D009568[0] = 3.75f;
    Props.D_0D009568[1] = 5.1666665f;
    Props.D_0D009568[2] = 5.75f;
    Props.D_0D009568[3] = 6.3333334f;

    Props.D_0D0096B8[0] = 3.3333332f;
    Props.D_0D0096B8[1] = 3.9166667f;
    Props.D_0D0096B8[2] = 4.5f;
    Props.D_0D0096B8[3] = 5.0833334f;

    Props.D_0D009808[0] = 3.75f;
    Props.D_0D009808[1] = 5.1666665f;
    Props.D_0D009808[2] = 5.75f;
    Props.D_0D009808[3] = 6.3333334f;

    Props.PathTable[0] = (TrackWaypoint*)LOAD_ASSET_RAW(d_course_bowsers_castle_unknown_waypoints);
    Props.PathTable[1] = NULL;
    Props.PathTable[2] = NULL;
    Props.PathTable[3] = NULL;

    Props.PathTable2[0] = (TrackWaypoint*)LOAD_ASSET_RAW(d_course_bowsers_castle_track_waypoints);
    Props.PathTable2[1] = NULL;
    Props.PathTable2[2] = NULL;
    Props.PathTable2[3] = NULL;

    Props.Clouds = NULL; // no clouds
    Props.CloudList = NULL;
    Props.MinimapFinishlineX = 0;
    Props.MinimapFinishlineY = 0;

    Props.Skybox.TopRight = {48, 8, 120};
    Props.Skybox.BottomRight = {0, 0, 0};
    Props.Skybox.BottomLeft = {0, 0, 0};
    Props.Skybox.TopLeft = {48, 8, 120};
    Props.Skybox.FloorTopRight = {0, 0, 0};
    Props.Skybox.FloorBottomRight = {0, 0, 0};
    Props.Skybox.FloorBottomLeft = {0, 0, 0};
    Props.Skybox.FloorTopLeft = {0, 0, 0};
}

void BowsersCastle::Load() {
    Course::Load();

    parse_course_displaylists((TrackSectionsI*)LOAD_ASSET_RAW(d_course_bowsers_castle_addr));
    func_80295C6C();
    find_vtx_and_set_colours(segmented_gfx_to_virtual(reinterpret_cast<void*>(0x07001350)), 0x32, 0, 0, 0);
    D_8015F8E4 = -50.0f;
}

void BowsersCastle::LoadTextures() {
    dma_textures(gTextureShrub, 0x000003FFU, 0x00000800U);
}

void BowsersCastle::SpawnActors() {
    gWorldInstance.AddActor(new AFinishline());

    spawn_foliage((struct ActorSpawnData*)LOAD_ASSET_RAW(d_course_bowsers_castle_tree_spawn));
    spawn_all_item_boxes((struct ActorSpawnData*)LOAD_ASSET_RAW(d_course_bowsers_castle_item_box_spawns));
}

void BowsersCastle::SpawnVehicles() {
    if (gModeSelection == VERSUS) {
        Vec3f pos = {0, 0, 0};

        gWorldInstance.AddBombKart(pos, &D_80164550[0][50], 50, 3, 0.8333333f);
        gWorldInstance.AddBombKart(pos, &D_80164550[0][150], 150, 1, 0.8333333f);
        gWorldInstance.AddBombKart(pos, &D_80164550[0][200], 200, 3, 0.8333333f);
        gWorldInstance.AddBombKart(pos, &D_80164550[0][260], 260, 1, 0.8333333f);
        gWorldInstance.AddBombKart(pos, &D_80164550[0][435], 435, 3, 0.8333333f);
        gWorldInstance.AddBombKart(pos, &D_80164550[0][0], 0, 0, 0.8333333f);
        gWorldInstance.AddBombKart(pos, &D_80164550[0][0], 0, 0, 0.8333333f);
    }
}

// Likely sets minimap boundaries
void BowsersCastle::MinimapSettings() {
    D_8018D2C0[0] = 265;
    D_8018D2A0 = 0.0174f;
    D_8018D2E0 = 12;
    D_8018D2E8 = 48;
}

void BowsersCastle::InitCourseObjects() {
    size_t objectId;
    size_t i;

    gNumActiveThwomps = NUM_THWOMPS_100CC_EXTRA;
    gThowmpSpawnList = gThwompSpawns100CCExtra;
    switch (gCCSelection) { /* switch 1; irregular */
        case CC_100:        /* switch 1 */
        case CC_EXTRA:      /* switch 1 */
            break;
        case CC_50: /* switch 1 */
            gNumActiveThwomps = NUM_THWOMPS_50CC;
            gThowmpSpawnList = gThomwpSpawns50CC;
            break;
        case CC_150: /* switch 1 */
            gNumActiveThwomps = NUM_THWOMPS_150CC;
            gThowmpSpawnList = gThomwpSpawns150CC;
            break;
    }
    for (i = 0; i < gNumActiveThwomps; i++) {
        objectId = indexObjectList1[i];
        init_object(objectId, 0);
        gObjectList[objectId].origin_pos[0] = gThowmpSpawnList[i].startX * xOrientation;
        gObjectList[objectId].origin_pos[2] = gThowmpSpawnList[i].startZ;
        gObjectList[objectId].unk_0D5 = gThowmpSpawnList[i].unk_4;
        gObjectList[objectId].primAlpha = gThowmpSpawnList[i].unk_6;
    }
    // Handle the big statue's fire breath
    objectId = indexObjectList2[0];
    init_object(objectId, 0);
    gObjectList[objectId].pos[0] = -68.0 * xOrientation;
    gObjectList[objectId].pos[1] = 80.0f;
    gObjectList[objectId].pos[2] = -1840.0f;
    // Handle the smaller statues' fire breath
    for (i = 0; i < NUM_FIRE_BREATHS; i++) {
        objectId = indexObjectList3[i];
        init_object(objectId, 0);
        gObjectList[objectId].pos[0] = gFireBreathsSpawns[i][0] * xOrientation;
        gObjectList[objectId].pos[1] = gFireBreathsSpawns[i][1];
        gObjectList[objectId].pos[2] = gFireBreathsSpawns[i][2];
        gObjectList[objectId].direction_angle[1] = 0;
        if (i % 2U) {
            gObjectList[objectId].direction_angle[1] += 0x8000;
        }
    }
    for (i = 0; i < 32; i++) {
        delete_object(&indexObjectList4[i]);
    }
}

void BowsersCastle::UpdateCourseObjects() {
    func_80081208();
    update_flame_particle();
}

void BowsersCastle::RenderCourseObjects(s32 cameraId) {
    render_object_thwomps(cameraId);
    render_object_bowser_flame(cameraId);
}

void BowsersCastle::SomeSounds() {
}

void BowsersCastle::WhatDoesThisDo(Player* player, int8_t playerId) {
    if (((s16) gNearestWaypointByPlayerId[playerId] >= 0x29) &&
        ((s16) gNearestWaypointByPlayerId[playerId] < 0x1D2)) {
        if (D_80165300[playerId] != 1) {
            func_800CA288(playerId, 0x41);
        }
        D_80165300[playerId] = 1;
    } else {
        if (D_80165300[playerId] != 0) {
            func_800CA2B8(playerId);
            D_80165300[playerId] = 0;
        }
    }
}

void BowsersCastle::WhatDoesThisDoAI(Player* player, int8_t playerId) {
    if (((s16) gNearestWaypointByPlayerId[playerId] >= 0x29) &&
        ((s16) gNearestWaypointByPlayerId[playerId] < 0x1D2)) {
        if (D_80165300[playerId] != 1) {
            func_800CA2E4(playerId, 0x41);
        }
        D_80165300[playerId] = 1;
    } else {
        if (D_80165300[playerId] != 0) {
            func_800CA30C(playerId);
            D_80165300[playerId] = 0;
        }
    }
}

// Positions the finishline on the minimap
void BowsersCastle::MinimapFinishlinePosition() {
    //! todo: Place hard-coded values here.
    draw_hud_2d_texture_8x8(this->Props.MinimapFinishlineX, this->Props.MinimapFinishlineY, (u8*) common_texture_minimap_finish_line);
}

void BowsersCastle::Render(struct UnkStruct_800DC5EC* arg0) {
    gSPTexture(gDisplayListHead++, 0xFFFF, 0xFFFF, 0, G_TX_RENDERTILE, G_ON);
    gSPSetGeometryMode(gDisplayListHead++, G_SHADING_SMOOTH);
    gSPClearGeometryMode(gDisplayListHead++, G_LIGHTING);

    if (func_80290C20(arg0->camera) == 1) {
        gDPSetCombineMode(gDisplayListHead++, G_CC_SHADE, G_CC_SHADE);
        gDPSetRenderMode(gDisplayListHead++, G_RM_AA_ZB_OPA_SURF, G_RM_AA_ZB_OPA_SURF2);
        // d_course_bowsers_castle_packed_dl_6A80
        gSPDisplayList(gDisplayListHead++, segmented_gfx_to_virtual(reinterpret_cast<void*>(0x07006A80)));
    }

    gDPSetCombineMode(gDisplayListHead++, G_CC_MODULATEIA, G_CC_MODULATEIA);
    gDPSetRenderMode(gDisplayListHead++, G_RM_AA_ZB_OPA_SURF, G_RM_AA_ZB_OPA_SURF2);

    D_802B87BC++;
    if (D_802B87BC > 255) {
        D_802B87BC = 0;
    }
    render_course_segments(bowsers_castle_dls, arg0);

    gDPSetCombineMode(gDisplayListHead++, G_CC_MODULATEIA, G_CC_MODULATEIA);
    gDPSetRenderMode(gDisplayListHead++, G_RM_AA_ZB_TEX_EDGE, G_RM_AA_ZB_TEX_EDGE2);
    // d_course_bowsers_castle_packed_dl_248
    gSPDisplayList(gDisplayListHead++, segmented_gfx_to_virtual(reinterpret_cast<void*>(0x07000248)));
}

void BowsersCastle::RenderCredits() {
    gSPDisplayList(gDisplayListHead++, (Gfx*)(d_course_bowsers_castle_dl_9148));
}

void BowsersCastle::Collision() {}

void BowsersCastle::SomeCollisionThing(Player *player, Vec3f arg1, Vec3f arg2, Vec3f arg3, f32* arg4, f32* arg5, f32* arg6, f32* arg7) {
    func_8003E6EC(player, arg1, arg2, arg3, arg4, arg5, arg6, arg7);
}

void BowsersCastle::Waypoints(Player* player, int8_t playerId) {
    s16 waypoint = gNearestWaypointByPlayerId[playerId];
    if ((waypoint >= 0x235) && (waypoint < 0x247)) {
        player->nearestWaypointId = 0x214;
    } else if ((waypoint >= 0x267) && (waypoint < 0x277)) {
        player->nearestWaypointId = 0x25B;
    } else {
        player->nearestWaypointId = gNearestWaypointByPlayerId[playerId];
        if (player->nearestWaypointId < 0) {
            player->nearestWaypointId = gWaypointCountByPathIndex[0] + player->nearestWaypointId;
        }
    }
}

void BowsersCastle::DrawWater(struct UnkStruct_800DC5EC* screen, uint16_t pathCounter, uint16_t cameraRot, uint16_t playerDirection) {
    if (gActiveScreenMode != SCREEN_MODE_1P) {
        return;
    }
    if (pathCounter < 6) {
        return;
    }
    if (pathCounter > 9) {
        return;
    }
    if (pathCounter == 9) {
        if (cameraRot < 0xA000) {
            return;
        }
        if (cameraRot > 0xE000) {
            return;
        }
    }
    gSPDisplayList(gDisplayListHead++, (Gfx*)d_course_bowsers_castle_dl_9228);
}

void BowsersCastle::CreditsSpawnActors() {
    find_vtx_and_set_colours(segmented_gfx_to_virtual((void*)0x07001350), 0x32, 0, 0, 0);
}

void BowsersCastle::Destroy() { }