/**
 * @file d_a_obj_twGate.cpp
 * 
*/

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

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

class daTwGate_HIO_c : public fOpAcm_HIO_entry_c {
public:
    daTwGate_HIO_c();
    ~daTwGate_HIO_c() {}

    void genMessage(JORMContext* ctx);

    /* 0x4 */ f32 mRange;
};

daTwGate_HIO_c::daTwGate_HIO_c() {
    mRange = 1900.0f;
}

#if DEBUG
void daTwGate_HIO_c::genMessage(JORMContext* ctx) {
    // Range
    ctx->genSlider("範囲", &mRange, 0.0f, 500000.0f);
}
#endif

static char* l_resNameIdx[13] = {
    "twGtFiro",
    "twGtK0102",
    "twGtK0709",
    "",
    "",
    "",
    "twGnFiro",
    "twGnK0102",
    "twGnK0709",
    "twGnK079b",
    "twGnK1415",
    "twGnK0616",
    "",
};

void daTwGate_c::setBaseMtx() {
    mDoMtx_stack_c::transS(current.pos.x, current.pos.y, current.pos.z);
    mDoMtx_stack_c::ZXYrotM(current.angle.x, current.angle.y, current.angle.z);
    mModel->setBaseScale(scale);
    mModel->setBaseTRMtx(mDoMtx_stack_c::get());
}

static int const l_bmdIdx[13] = {
    6, 6, 6, -1, -1, -1, 6, 6, 6, 6, 6, 6, -1,
};

static int const l_dzbIdx[13] = {
    15, 15, 15, -1, -1, -1, 15, 15, 15, 15, 15, 15, -1,
};

static int const l_btkIdx[13] = {
    12, 12, 12, -1, -1, -1, 12, 12, 12, 12, 12, 12, -1,
};

static int const l_brkIdx[13] = {
    9, 9, 9, -1, -1, -1, 9, 9, 9, 9, 9, 9, -1,
};

static int const l_twFlagIdx[13] = {
    0, 1, 2, 4, -1, -1, 0, 1, 1, 2, 2, 4, 4,
};

static Vec const l_cheeckPos0[13] = {
    {-572.6072f, 314.9037f, -20792.293f},
    {-24536.904f, -7234.991f, 73427.242f},
    {3821.4783f, 4674.5557f, -59714.414f},
    {0.0f, 0.0f, 0.0f},
    {0.0f, 0.0f, 0.0f},
    {0.0f, 0.0f, 0.0f},
    {0.0f, 0.0f, 0.0f},
    {-23484.578f, -7201.7114f, 73893.843f},
    {2943.5786f, 4804.4688f, -60534.016f},
    {0.0f, 0.0f, 0.0f},
    {0.0f, 0.0f, 0.0f},
    {0.0f, 0.0f, 0.0f},
    {0.0f, 0.0f, 0.0f},
};

static Vec const l_cheeckPos1[13] = {
    {-178.19418f, 308.69842f, -20657.326f},
    {-23610.3066f, -7234.9912f, 74043.75f},
    {2953.5532f, 4674.5556f, -60520.844f},
    {0.0f, 0.0f, 0.0f},
    {0.0f, 0.0f, 0.0f},
    {0.0f, 0.0f, 0.0f},
    {0.0f, 0.0f, 0.0f},
    {-24473.582, -7201.7114f, 73296.75f},
    {3821.1848f, 4804.4687f, -59707.8515f},
    {0.0f, 0.0f, 0.0f},
    {0.0f, 0.0f, 0.0f},
    {0.0f, 0.0f, 0.0f},
    {0.0f, 0.0f, 0.0f},
};

int daTwGate_c::CreateHeap() {
    J3DModelData* modelData =
        (J3DModelData*)dComIfG_getObjectRes(l_resNameIdx[mGateType], l_bmdIdx[mGateType]);
    JUT_ASSERT(292, modelData != NULL);
    mModel = mDoExt_J3DModel__create(modelData, 0x80000, 0x11000284);
    if (mModel == NULL) {
        return 0;
    }
    ;
    int res = mBtk.init(modelData, (J3DAnmTextureSRTKey*)dComIfG_getObjectRes(l_resNameIdx[mGateType], l_btkIdx[mGateType]), 1, 2, 1.0f, 0, -1);
    JUT_ASSERT(309, res == 1);

    res = mBrk.init(modelData, (J3DAnmTevRegKey*)dComIfG_getObjectRes(l_resNameIdx[mGateType], l_brkIdx[mGateType]), 1, 0, 1.0f, 0, -1);
    JUT_ASSERT(317, res == 1);
    return 1;
}

static daTwGate_HIO_c l_HIO;

int daTwGate_c::create() {
    fopAcM_ct(this, daTwGate_c);
    mGateType = getGateType();
    if (l_bmdIdx[mGateType] == -1) {
        // Twilight gate: Invalid argument.
        OS_REPORT("=== トワイライトゲート：無効な引数です (%d) ===\n", mGateType);
        return cPhs_ERROR_e;
    }

    if (dComIfGs_isDarkClearLV(l_twFlagIdx[mGateType]) == TRUE) {
        return cPhs_ERROR_e;
    }

    int rv = dComIfG_resLoad(&mPhase, l_resNameIdx[mGateType]);
    if (rv == cPhs_COMPLEATE_e) {
        if (MoveBGCreate(l_resNameIdx[mGateType], l_dzbIdx[mGateType],
            dBgS_MoveBGProc_TypicalRotY, 0x22a0, NULL) == cPhs_ERROR_e) {
            return cPhs_ERROR_e;
        }

        setBaseMtx();
        fopAcM_SetMtx(this, mModel->getBaseTRMtx());
        fopAcM_setCullSizeBox2(this, mModel->getModelData());
        mLine.SetStartEnd(l_cheeckPos0[mGateType], l_cheeckPos1[mGateType]);
        mBrk.setPlaySpeed(-1.0f);

        #if DEBUG
        // Twilight Gate
        l_HIO.entryHIO("トワイライトゲート");
        #endif
    }
    return rv;
}

int daTwGate_c::Execute(Mtx** i_mtx) {
    if (dComIfGs_isDarkClearLV(l_twFlagIdx[mGateType]) == TRUE) {
        fopAcM_delete(this);
    }
    cXyz cStack_34;
    f32 local_38;
    bool res = cM3d_Len3dSqPntAndSegLine(&mLine, &dComIfGp_getPlayer(0)->current.pos, &cStack_34, &local_38);
    f32 fVar1 = JMAFastSqrt(local_38);
    if (fVar1 <= l_HIO.mRange) {
        if (mBrk.getPlaySpeed() != 1.0f) {
            mBrk.setPlaySpeed(1.0f);
        }
    } else {
        if (mBrk.getPlaySpeed() != -1.0f) {
            mBrk.setPlaySpeed(-1.0f);
        }
    }
    mBtk.play();
    mBrk.play();
    *i_mtx = &mModel->getBaseTRMtx();
    setBaseMtx();
    return 1;
}

int daTwGate_c::Draw() {
    g_env_light.settingTevStruct(0x10, &current.pos, &tevStr);
    g_env_light.setLightTevColorType_MAJI(mModel, &tevStr);
    dComIfGd_setListDarkBG();
    mDoExt_modelUpdateDL(mModel);
    dComIfGd_setList();
    J3DModelData* modelData = mModel->getModelData();
    mBtk.entry(modelData);
    mBrk.entry(modelData);
    return 1;
}

int daTwGate_c::Delete() {
    dComIfG_resDelete(&mPhase, l_resNameIdx[mGateType]);

    #if DEBUG
    l_HIO.removeHIO(this);
    #endif

    return 1;
}

static int daTwGate_Draw(daTwGate_c* i_this) {
    return i_this->MoveBGDraw();
}

static int daTwGate_Execute(daTwGate_c* i_this) {
    return i_this->MoveBGExecute();
}

static int daTwGate_Delete(daTwGate_c* i_this) {
    fopAcM_RegisterDeleteID(i_this, "daTwGate");
    return i_this->MoveBGDelete();
}

static int daTwGate_Create(fopAc_ac_c* i_this) {
    daTwGate_c* a_this = (daTwGate_c*)i_this;
    fopAcM_RegisterCreateID(i_this, "daTwGate");
    return a_this->create();
}

static actor_method_class l_daTwGate_Method = {
    (process_method_func)daTwGate_Create,
    (process_method_func)daTwGate_Delete,
    (process_method_func)daTwGate_Execute,
    NULL,
    (process_method_func)daTwGate_Draw,
};

actor_process_profile_definition g_profile_Obj_TwGate = {
    /* Layer ID     */ fpcLy_CURRENT_e,
    /* List ID      */ 3,
    /* List Prio    */ fpcPi_CURRENT_e,
    /* Proc Name    */ fpcNm_Obj_TwGate_e,
    /* Proc SubMtd  */ &g_fpcLf_Method.base,
    /* Size         */ sizeof(daTwGate_c),
    /* Size Other   */ 0,
    /* Parameters   */ 0,
    /* Leaf SubMtd  */ &g_fopAc_Method.base,
    /* Draw Prio    */ fpcDwPi_Obj_TwGate_e,
    /* Actor SubMtd */ &l_daTwGate_Method,
    /* Status       */ fopAcStts_UNK_0x40000_e | fopAcStts_UNK_0x4000_e,
    /* Group        */ fopAc_ACTOR_e,
    /* Cull Type    */ fopAc_CULLBOX_CUSTOM_e,
};