/**
 * @file d_a_obj_ladder.cpp
 * 
*/

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

#include "d/actor/d_a_obj_ladder.h"
#include "JSystem/J3DGraphAnimator/J3DModelData.h"
#include "SSystem/SComponent/c_math.h"
#include "d/d_com_inf_game.h"
#include "d/d_bg_s.h"
#include "d/d_bg_w.h"
#include "f_op/f_op_actor_mng.h"

struct Attr {
    /* 0x00 */ f32 field_0x00;
    /* 0x04 */ f32 field_0x04;
    /* 0x08 */ f32 field_0x08;
    /* 0x0C */ f32 field_0x0c;
    /* 0x10 */ u8 field_0x10;
    /* 0x11 */ u8 field_0x11;
    /* 0x12 */ u8 field_0x12;
    /* 0x13 */ u8 field_0x13;
    /* 0x14 */ u8 field_0x14;
    /* 0x16 */ s16 field_0x16;
    /* 0x18 */ s16 field_0x18;
    /* 0x1A */ s16 vibrationTimer;
    /* 0x1C */ f32 field_0x1c;
    /* 0x20 */ f32 field_0x20;
};

static Attr const L_attr = {
    -3.0f, 0.005f, 0.0005f,
    0.5f, 0x03, 0x4B, 0x32, 0x2D, 0x28, 0x4E20,
    0x3CC3, 0x0F, 2.0f, 1.0f,
};

inline static const Attr& attr() {
    return L_attr;
}

char const daObjLadder::Act_c::M_arcname[5] = "Mhsg";

struct AttrType {
    /* 0x0 */ s16 field_0x0;
    /* 0x2 */ s16 field_0x2;
    /* 0x4 */ f32 field_0x4;
};

static AttrType L_attr_type[6] = {
    { 0x08, 0x10, 600.0f},
    { 0x09, 0x11, 900.0f},
    { 0x04, 0x0C, 1200.0f},
    { 0x05, 0x0D, 1500.0f},
    { 0x07, 0x0F, 450.0f},
    { 0x06, 0x0E, 300.0f},
};

static inline const AttrType& attr_type(daObjLadder::Act_c::Type_e type) {
    return L_attr_type[type];
}

int daObjLadder::Act_c::CreateHeap() {
    J3DModelData* model_data = (J3DModelData*)dComIfG_getObjectRes(M_arcname, attr_type(mType).field_0x0);
    JUT_ASSERT(382, model_data != NULL);
    mModel = mDoExt_J3DModel__create(model_data, 0x80000, 0x11000084);
    return mModel != NULL;
}

int daObjLadder::Act_c::Create() {
    fopAcM_SetMtx(this, mModel->getBaseTRMtx());
    init_mtx();
    fopAcM_setCullSizeBox(this, -55.0f, -1.0f, -10.0f, 55.0f, attr_type(mType).field_0x4 + 41.0f,
                          10.0f);
    cXyz gndVec;
    mDoMtx_stack_c::push();
    mDoMtx_stack_c::transS(current.pos);
    mDoMtx_stack_c::YrotM(shape_angle.y);
    mDoMtx_stack_c::transM(0.0f, 10.0f, 5.0f);
    mDoMtx_stack_c::multVecZero(&gndVec);
    mDoMtx_stack_c::pop();
    mGndChk.SetPos(&gndVec);
    mGndChk.SetActorPid(base.base.id);
    mHeight = dComIfG_Bgsp().GroundCross(&mGndChk);
    mInDemo = false;
    mEventIdx = dComIfGp_getEventManager().getEventIdx(this, prm_get_evId());
    if (prm_get_swSave() != 0xff && fopAcM_isSwitch(this, prm_get_swSave())) {
        current.pos.y = mHeight;
        set_mtx();
        mode_fell_init();
    } else {
        mode_wait_init();
    }
    
    return 1;
}

int daObjLadder::Act_c::Mthd_Create() {
    fopAcM_ct(this, Act_c);
    int phase_state = dComIfG_resLoad(&mPhase, M_arcname);
    if (phase_state == cPhs_COMPLEATE_e) {
        mType = prm_get_type();
        phase_state = MoveBGCreate(M_arcname, attr_type(mType).field_0x2,
            dBgS_MoveBGProc_Trans, 0xcb0, NULL);
        JUT_ASSERT(486, (phase_state == cPhs_COMPLEATE_e) || (phase_state == cPhs_ERROR_e));
    }
    return phase_state;
}

int daObjLadder::Act_c::Delete() {
    return 1;
}

int daObjLadder::Act_c::Mthd_Delete() {
    int rv = MoveBGDelete();
    dComIfG_resDelete(&mPhase, M_arcname);
    return rv;
}

void daObjLadder::Act_c::demo_end_reset() {
    if (mInDemo && dComIfGp_evmng_endCheck(mEventIdx)) {
        dComIfGp_event_reset();
        mInDemo = false;
    }
}

void daObjLadder::Act_c::mode_wait_init() {
    mMode = MODE_WAIT;
}

void daObjLadder::Act_c::mode_wait() {
    if (fopAcM_isSwitch(this, prm_get_swSave())) {
        mode_demoreq_init();
    }
}

void daObjLadder::Act_c::mode_demoreq_init() {
    mMode = MODE_DEMOREQ;
    mInDemo = false;
}

void daObjLadder::Act_c::mode_demoreq() {
    bool isDemo = false;
    if (dComIfGp_evmng_existence(mEventIdx)) {
        if (eventInfo.checkCommandDemoAccrpt()) {
            isDemo = true;
            mInDemo = true;
        } else {
            fopAcM_orderOtherEventId(this, mEventIdx, prm_get_evId(), 0xffff, 0, 1);
            eventInfo.onCondition(2);
        }
    } else {
        isDemo = true;
    }
    if (isDemo) {
        mode_vib_init();
    }
}

void daObjLadder::Act_c::mode_vib_init() {
    mVibrationTimer = attr().vibrationTimer;
    field_0x610 = 0;
    field_0x612 = 0;
    mMode = MODE_VIB;
}

void daObjLadder::Act_c::mode_vib() {
    field_0x610 += attr().field_0x16;
    field_0x612 += attr().field_0x18;
    field_0x614 = cM_scos(field_0x610) * attr().field_0x1c;
    field_0x618 = cM_scos(field_0x612) * attr().field_0x20;
    if (--mVibrationTimer <= 0) {
        mode_drop_init();
    }
}

void daObjLadder::Act_c::mode_drop_init() {
    gravity = -5.0f;
    speed.set(cXyz::Zero);
    field_0x5b6 = attr().field_0x10;
    mMode = MODE_DROP;
}

void daObjLadder::Act_c::mode_drop() {
    daObj::posMoveF_stream(this, NULL, &cXyz::Zero, attr().field_0x04, attr().field_0x08);
    if (current.pos.y < mHeight) {
        if (field_0x5b6 == attr().field_0x10) {
            fopAcM_seStart(this, Z2SE_SY_DUMMY, dComIfG_Bgsp().GetMtrlSndId(mGndChk));
            dComIfGp_getVibration().StartShock(4, 0x1f, cXyz(0.0f, 1.0f, 0.0f));
        } else {
            int uVar7;
            int iVar5 = attr().field_0x10 - field_0x5b6;
            if (iVar5 == 1) {
                uVar7 = attr().field_0x11;
            } else if (iVar5 == 2) {
                uVar7 = attr().field_0x12;
            } else if (iVar5 == 3) {
                uVar7 = attr().field_0x13;
            } else {
                uVar7 = attr().field_0x14;
            }
            fopAcM_seStart(this, Z2SE_SY_DUMMY, uVar7);
        }
        if (field_0x5b6 >= 0) {
            field_0x5b6--;
            current.pos.y =
                mHeight - (current.pos.y - mHeight) * 0.5f;
            speed.y *= -0.5f;
        } else {
            current.pos.y = mHeight;
            mode_fell_init();
        }
    }
}

void daObjLadder::Act_c::mode_fell_init() {
    mMode = MODE_FELL;
}

void daObjLadder::Act_c::mode_fell() {
}

Mtx daObjLadder::Act_c::M_tmp_mtx;

void daObjLadder::Act_c::set_mtx() {
    mDoMtx_stack_c::transS(current.pos.x, current.pos.y, current.pos.z);
    mDoMtx_stack_c::ZXYrotM(shape_angle.x, shape_angle.y, shape_angle.z);
    cMtx_copy(mDoMtx_stack_c::get(), M_tmp_mtx);
    mDoMtx_stack_c::transM(field_0x614, field_0x618, 0.0f);
    mModel->setBaseTRMtx(mDoMtx_stack_c::get());
}

void daObjLadder::Act_c::init_mtx() {
    mModel->setBaseScale(scale);
    set_mtx();
}

int daObjLadder::Act_c::Execute(f32 (**param_1)[3][4]) {
    static const daObjLadder::Act_c::modeProc mode_proc[5] = {
        &daObjLadder::Act_c::mode_wait, &daObjLadder::Act_c::mode_demoreq,
        &daObjLadder::Act_c::mode_vib,  &daObjLadder::Act_c::mode_drop,
        &daObjLadder::Act_c::mode_fell,
    };

    demo_end_reset();
    (this->*(mode_proc[mMode]))();
    eyePos.y = current.pos.y;
    set_mtx();
    *param_1 = &M_tmp_mtx;
    return 1;
}

int daObjLadder::Act_c::Draw() {
    g_env_light.settingTevStruct(0x10, &current.pos, &tevStr);
    g_env_light.setLightTevColorType_MAJI(mModel, &tevStr);
    dComIfGd_setListBG();
    mDoExt_modelUpdateDL(mModel);
    dComIfGd_setList();
    dComIfG_Bgsp().DebugDrawPoly(mpBgW);
    return 1;
}

static int Mthd_Create(daObjLadder::Act_c* i_this) {
    return i_this->Mthd_Create();
}

static int Mthd_Delete(daObjLadder::Act_c* i_this) {
    return i_this->Mthd_Delete();
}

static int Mthd_Execute(daObjLadder::Act_c* i_this) {
    return i_this->MoveBGExecute();
}

static int Mthd_Draw(daObjLadder::Act_c* i_this) {
    return i_this->MoveBGDraw();
}

static int Mthd_IsDelete(daObjLadder::Act_c* i_this) {
    return i_this->MoveBGIsDelete();
}

static actor_method_class Mthd_Table = {
    (process_method_func)Mthd_Create, 
    (process_method_func)Mthd_Delete, 
    (process_method_func)Mthd_Execute, 
    (process_method_func)Mthd_IsDelete,
    (process_method_func)Mthd_Draw,
};

extern actor_process_profile_definition g_profile_Obj_Ladder = {
  fpcLy_CURRENT_e,        // mLayerID
  3,                      // mListID
  fpcPi_CURRENT_e,        // mListPrio
  PROC_Obj_Ladder,        // mProcName
  &g_fpcLf_Method.base,  // sub_method
  sizeof(daObjLadder::Act_c),    // mSize
  0,                      // mSizeOther
  0,                      // mParameters
  &g_fopAc_Method.base,   // sub_method
  23,                     // mPriority
  &Mthd_Table,         // sub_method
  0x00040100,             // mStatus
  fopAc_ACTOR_e,          // mActorType
  fopAc_CULLBOX_CUSTOM_e, // cullType
};