/**
 * @file d_a_obj_Lv5Key.cpp
 * Snowpeak Ruins Key Lock
 */

#include "d/dolzel_rel.h" // IWYU pragma: keep

#include "d/actor/d_a_obj_Lv5Key.h"
#include "d/d_com_inf_game.h"

static int useHeapInit(fopAc_ac_c*);

static char* l_arcName = "Lv5_KEY";

int daObjLv5Key_c::CreateHeap() {
    J3DModelData* modelData = (J3DModelData*)dComIfG_getObjectRes(l_arcName, 7);
    J3DAnmTransform* pbck = (J3DAnmTransform*)dComIfG_getObjectRes(l_arcName, 4);
    JUT_ASSERT(0, modelData != NULL);

    mpModel = mDoExt_J3DModel__create(modelData, 0x80000, 0x11000084);
    if (mpModel == NULL) {
        return 0;
    }

    if (!mBck.init(pbck, TRUE, J3DFrameCtrl::EMode_NONE, 1.0f, 0, -1, false)) {
        return 0;
    }

    return 1;
}

int daObjLv5Key_c::Init() {
    initCcSph();
    fopAcM_setCullSizeBox(this, -50.0f, 30.0f, -20.0f, 50.0f, -90.0f, 20.0f);
    setLocalOffset(0.0f, 0.0f, 0.0f);
    setStatus(STATUS_WAIT);

    mAction = NULL;
    setAction(&daObjLv5Key_c::Wait, 1);
    return cPhs_COMPLEATE_e;
}

void daObjLv5Key_c::setBgc() {
    OS_REPORT("-------------setBgc!!\n");
    mAcch.Set(fopAcM_GetPosition_p(this), fopAcM_GetOldPosition_p(this), this, 1, &mAcchCir,
              fopAcM_GetSpeed_p(this), NULL, NULL);
    mAcch.SetGndThinCellingOff();
    mAcchCir.SetWall(30.0f, 30.0f);
}

void daObjLv5Key_c::initCcSph() {
    static const dCcD_SrcSph ccShpSrc = {
        {
            {0x0, {{0x400, 0x1, 0x0}, {0xD8FBFDFF, 0x11}, 0x0}},  // mObj
            {dCcD_SE_STONE, 0x0, 0x0, 0x0, 0x0},                  // mGObjAt
            {dCcD_SE_NONE, 0x0, 0x0, 0x0, 0x0},                   // mGObjTg
            {0x0},                                                // mGObjCo
        },                                                        // mObjInf
        {
            {{0.0f, -17.8f, 0.0f}, 35.0f}  // mSph
        }  // mSphAttr
    };

    mCcStts.Init(0x3C, 0xFF, this);
    mCcSph.Set(ccShpSrc);
    mCcSph.SetStts(&mCcStts);
    mCcSph.SetC(current.pos);
}

void daObjLv5Key_c::setCcSph() {
    cXyz center(0.0f, -17.5f, 0.0f);
    mDoMtx_stack_c::transS(current.pos);
    mDoMtx_stack_c::ZXYrotM(shape_angle);
    mDoMtx_stack_c::multVec(&center, &center);

    mCcSph.SetC(center);
    mCcSph.SetR(35.0f);
    dComIfG_Ccsp()->Set(&mCcSph);

    if (mCcSph.ChkTgHit()) {
        mCcSph.ClrTgHit();
    }
}

static int daObjLv5Key_Create(fopAc_ac_c* i_this) {
    return ((daObjLv5Key_c*)i_this)->create_1st();
}

static int daObjLv5Key_Delete(daObjLv5Key_c* i_this) {
    i_this->Delete();
    return 1;
}

void daObjLv5Key_c::setAction(daObjLv5Key_c::actionFunc i_action, int param_1) {
    if (mAction != i_action) {
        if (mAction != NULL) {
            mMode = -1;
            (this->*mAction)(param_1);
        }

        mMode = 0;
        mAction = i_action;
        (this->*mAction)(param_1);
    }
}

void daObjLv5Key_c::Action() {
    if (mAction == NULL) {
        OS_REPORT("ACTION NOT SET!!\n");
    } else {
        (this->*mAction)(0);
    }
}

void daObjLv5Key_c::Wait(int param_0) {
    switch (mMode) {
    case -1:
        break;
    case 0:
        setStatus(STATUS_WAIT);
        mBck.setPlaySpeed(0.0f);
        mMode = 1;
        break;
    case 1:
        if (is_open_start()) {
            setBgc();
            setAction(&daObjLv5Key_c::Open, 1);
        } else if (is_shake_start()) {
            setAction(&daObjLv5Key_c::Shake, 1);
        }
    }
}

void daObjLv5Key_c::Open(int param_0) {
    switch (mMode) {
    case -1:
        break;
    case 0:
        mBck.setPlaySpeed(1.0f);
        mCcSph.OffCoSetBit();
        mMode = 1;
        break;
    case 1:
        mBck.play();

        if (mBck.isStop()) {
            setAction(&daObjLv5Key_c::Fall, 1);
        }
    }
}

void daObjLv5Key_c::Fall(int param_0) {
    switch (mMode) {
    case -1:
        break;
    case 0:
        fopAcM_SetSpeedF(this, 0.0f);
        fopAcM_SetSpeed(this, 0.0f, 0.0f, 0.0f);
        fopAcM_SetGravity(this, -6.0f);
        mMode = 1;
        break;
    case 1: {
        fopAcM_calcSpeed(this);
        fopAcM_posMove(this, NULL);

        f32 old_y = current.pos.y;
        current.pos.y -= 88.0f;
        mAcch.CrrPos(dComIfG_Bgsp());
        current.pos.y = old_y;

        OS_REPORT("FALL SPD = %f\n", speed.y);

        if (mAcch.ChkGroundHit() IF_DUSK(|| current.pos.abs(home.pos) > 200.0f)) {
            fopAcM_GetSpeed(this);
            fopAcM_SetSpeedF(this, 4.0f);
            fopAcM_SetSpeed(this, 0.0f, 22.0f, 0.0f);

            setRotateSpd(0x120, 0, 0);
            mMode = 2;
        }
        break;
    }
    case 2:
        RotateAngle();

        fopAcM_calcSpeed(this);
        fopAcM_posMove(this, NULL);
        OS_REPORT("BOUND SPD = %f\n", speed.y);

        f32 prev_y = current.pos.y;
        current.pos.y -= 87.0f;
        mAcch.CrrPos(dComIfG_Bgsp());
        current.pos.y = prev_y;

        if (mAcch.ChkGroundHit() IF_DUSK(|| current.pos.abs(home.pos) > 200.0f)) {
            setAction(&daObjLv5Key_c::Land, 1);
        }
    }
}

void daObjLv5Key_c::Land(int param_0) {
    switch (mMode) {
    case -1:
        break;
    case 0:
        TranslateByNowDirect(0.0f, 0.0f, 18.4f);
        setLocalOffset(-17.4, -74.7f, 8.7f);
        setRotateAccel(0x2C0, 0, 0);
        mRotateSpd.x -= 0x10;
        mRotateSpd.z = 0;

        mMode = 1;
        break;
    case 1:
        calcRotateSpd();
        OS_REPORT("ROTATE SPD = %x\n", mRotateSpd.x);
        RotateAngle();

        if (shape_angle.x >= 0x4000) {
            shape_angle.x = 0x4000;
            setStatus(STATUS_OPEN);
            mMode = -1;
        }
    }
}

void daObjLv5Key_c::Shake(int param_0) {
    switch (mMode) {
    case -1:
        break;
    case 0:
        setLocalOffset(0.0f, 0.0f, 0.0f);
        setTimer(30);
        mMode = 1;
        break;
    case 1:
        if (countdown()) {
            setShakeNum(2);
            setRotateSpd(-0x100, 0, 0);
            setRotateAccel(0x2A, 0, 0);
            mMode = 2;
        }
        break;
    case 2:
        calcRotateSpd();
        RotateAngle();

        if (shape_angle.x >= 0) {
            shape_angle.x = 0;
            setRotateSpd(-0x100, 0, 0);
            decShakeNum();

            if (is_shake_end()) {
                setAction(&daObjLv5Key_c::Wait, 1);
            }
        }
    }
}

void daObjLv5Key_c::TranslateByNowDirect(f32 i_x, f32 i_y, f32 i_z) {
    cXyz trans;
    trans.set(i_x, i_y, i_z);

    mDoMtx_stack_c::ZXYrotS(shape_angle);
    mDoMtx_stack_c::multVec(&trans, &trans);
    current.pos += trans;
}

int daObjLv5Key_c::Execute() {
    Action();
    setBaseMtx();
    setCcSph();
    return 1;
}

int daObjLv5Key_c::Draw() {
    g_env_light.settingTevStruct(0x10, &current.pos, &tevStr);
    g_env_light.setLightTevColorType_MAJI(mpModel, &tevStr);

    dComIfGd_setListBG();
    mBck.entry(mpModel->getModelData());
    mDoExt_modelUpdateDL(mpModel);
    mBck.remove(mpModel->getModelData());
    return 1;
}

int daObjLv5Key_c::Delete() {
    dComIfG_resDelete(&mPhase, l_arcName);
    return 1;
}

void daObjLv5Key_c::setBaseMtx() {
    mDoMtx_stack_c::transS(current.pos);

    cXyz& localOffset = getLocalOffset();
    mDoMtx_stack_c::transM(localOffset.x, localOffset.y, localOffset.z);
    mDoMtx_stack_c::ZXYrotM(shape_angle);
    mDoMtx_stack_c::transM(-localOffset.x, -localOffset.y, -localOffset.z);

    mpModel->setBaseTRMtx(mDoMtx_stack_c::get());
}

static int daObjLv5Key_Draw(daObjLv5Key_c* i_this) {
    return i_this->Draw();
}

static int daObjLv5Key_Execute(daObjLv5Key_c* i_this) {
    return i_this->Execute();
}

int daObjLv5Key_c::create_1st() {
    fopAcM_ct(this, daObjLv5Key_c);

    int phase = dComIfG_resLoad(&mPhase, l_arcName);
    if (phase == cPhs_COMPLEATE_e) {
        if (!fopAcM_entrySolidHeap(this, useHeapInit, 0x4B000)) {
            return cPhs_ERROR_e;
        }

        fopAcM_SetMtx(this, mpModel->getBaseTRMtx());
        Init();
        daObjLv5Key_Execute(this);
    }

    return phase;
}

static int useHeapInit(fopAc_ac_c* i_this) {
    return ((daObjLv5Key_c*)i_this)->CreateHeap();
}

static int daObjLv5Key_IsDelete(daObjLv5Key_c* i_this) {
    return 1;
}

static actor_method_class l_daObjLv5Key_Method = {
    (process_method_func)daObjLv5Key_Create,  (process_method_func)daObjLv5Key_Delete,
    (process_method_func)daObjLv5Key_Execute, (process_method_func)daObjLv5Key_IsDelete,
    (process_method_func)daObjLv5Key_Draw,
};

actor_process_profile_definition g_profile_Obj_Lv5Key = {
    /* Layer ID     */ fpcLy_CURRENT_e,
    /* List ID      */ 7,
    /* List Prio    */ fpcPi_CURRENT_e,
    /* Proc Name    */ fpcNm_Obj_Lv5Key_e,
    /* Proc SubMtd  */ &g_fpcLf_Method.base,
    /* Size         */ sizeof(daObjLv5Key_c),
    /* Size Other   */ 0,
    /* Parameters   */ 0,
    /* Leaf SubMtd  */ &g_fopAc_Method.base,
    /* Draw Prio    */ fpcDwPi_Obj_Lv5Key_e,
    /* Actor SubMtd */ &l_daObjLv5Key_Method,
    /* Status       */ fopAcStts_UNK_0x40000_e | fopAcStts_UNK_0x4000_e | fopAcStts_CULL_e | fopAcStts_NOEXEC_e,
    /* Group        */ fopAc_ACTOR_e,
    /* Cull Type    */ fopAc_CULLBOX_CUSTOM_e,
};