dusklight/src/d/actor/d_a_obj_mhole.cpp

/**
* @file d_a_obj_mhole.cpp
 *
 */

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

#include "d/actor/d_a_obj_mhole.h"
#include "d/d_cc_d.h"
#include "d/d_com_inf_game.h"
#include "d/d_debug_viewer.h"
#include "m_Do/m_Do_graphic.h"

static u32 const l_bmd[2] = {5, 5};

static u32 const l_brk[2] = {8, 8};

static u32 const l_btk1[2] = {11, 11};

static u32 const l_btk2[2] = {12, 12};

static f32 const l_length[2] = {2000.0f, 1000.0f};

static f32 const l_size[2] = {150.0f, 370.0f};

static char const* l_arcName[2] = {"ef_MgnF_L", "ef_MgnF_S"};

dCcD_SrcCps l_cps_src = {
    {
        {0x0, {{AT_TYPE_40000, 0x0, 0x1d}, {0x0, 0x0}, 0x0}},  // mObj
        {dCcD_SE_NONE, 0x0, 0x0, 0x0, 0x6},                    // mGObjAt
        {dCcD_SE_NONE, 0x0, 0x0, 0x0, 0x4},                    // mGObjTg
        {0x0},                                                 // mGObjCo
    },                                                         // mObjInf
    {
        {{0.0f, 0.0f, 0.0f}, {0.0f, 1000.0f, 0.0f}, 150.0f},  // mCps
    }  // mCpsAttr
};

#if DEBUG
static daObjMHole_HIO_c l_HIO;

daObjMHole_HIO_c::daObjMHole_HIO_c() {
    scale.set(1.0f, 1.0f, 1.0f);
    scale_adjust_on = 0x0;
    collision_display = 0x0;
    angle = 0x0;
    angl.set(0, 0, 0);
}

void daObjMHole_HIO_c::genMessage(JORMContext* mctx) {
    mctx->genLabel("マグネホール", 0);
    mctx->genCheckBox("スケール調整ＯＮ", &scale_adjust_on, 0x1);
    mctx->genSlider("Ｘスケール", &scale.x, 0.1f, 10.0f);
    mctx->genSlider("Ｙスケール", &scale.y, 0.1f, 10.0f);
    mctx->genSlider("Ｚスケール", &scale.z, 0.1f, 10.0f);
    mctx->genCheckBox("当たり表示", &collision_display, 0x1);
    mctx->genCheckBox("アングル", &angle, 0x1);
    mctx->genSlider("Ｘ", &angl.x, -0x7FFF, 0x7FFF);
    mctx->genSlider("Ｙ", &angl.y, -0x7FFF, 0x7FFF);
    mctx->genSlider("Ｚ", &angl.z, -0x7FFF, 0x7FFF);
}
#endif

static void* searchParentSub(void* i_magLift, void* i_mhole) {
    daObjMHole_c* mhole = (daObjMHole_c*)i_mhole;
    fopAc_ac_c* mag_lift = (fopAc_ac_c*)i_magLift;

    if (mag_lift != NULL && fopAcM_IsActor(mag_lift) &&
        fopAcM_GetProfName(mag_lift) == fpcNm_Obj_MagLift_e &&
        mag_lift->home.pos.abs(mhole->home.pos) < 10.0f)
    {
        return mag_lift;
    }

    return NULL;
}

static int CheckCreateHeap(fopAc_ac_c* p_actor) {
    return static_cast<daObjMHole_c*>(p_actor)->CreateHeap();
}

void daObjMHole_c::initBaseMtx() {
    mpModel->setBaseScale(scale);
    setBaseMtx();
}

void daObjMHole_c::setBaseMtx() {
#if DEBUG
    if (l_HIO.scale_adjust_on != 0) {
        scale = l_HIO.scale;
    }
    if (l_HIO.angle != 0) {
        current.angle = l_HIO.angl;
        shape_angle = current.angle;
    }
#endif

    mpModel->setBaseScale(scale);
    mDoMtx_stack_c::transS(current.pos);
    mDoMtx_stack_c::ZXYrotM(shape_angle);
    mpModel->setBaseTRMtx(mDoMtx_stack_c::get());
}

int daObjMHole_c::Create() {
    if (getType() != 0x2) {
        u8 sw_bit = getSwbit();
        u8 state = TRUE;
        if (sw_bit != 0xFF && !fopAcM_isSwitch(this, sw_bit)) {
            state = FALSE;
        }
        mIsOn = state;
    }
    if (mIsOn) {
        mpBtk2Anm->setFrame(mpBtk2Anm->getEndFrame());
    }

    initBaseMtx();
    fopAcM_SetMtx(this, mpModel->getBaseTRMtx());
    fopAcM_setCullSizeBox2(this, mpModel->getModelData());

    mStts.Init(0xFF, 0xFF, this);
    mCps.Set(l_cps_src);
    mCps.SetStts(&mStts);
    mSound.init(&current.pos, 1);

    return 1;
}

int daObjMHole_c::checkParent() {
    parentActorID = fopAcM_GetID(fpcM_Search(searchParentSub, this));
    if (parentActorID == fpcM_ERROR_PROCESS_ID_e) {
        return FALSE;
    }
    return TRUE;
}

int daObjMHole_c::CreateHeap() {
    J3DModelData* modelData = (J3DModelData*)dComIfG_getObjectRes(l_arcName[mKind], l_bmd[mKind]);
    JUT_ASSERT(336, modelData != NULL);
    mpModel = mDoExt_J3DModel__create(modelData, 0, 0x19000284);
    if (mpModel == NULL) {
        return FALSE;
    }

    J3DAnmTevRegKey* pbrk = (J3DAnmTevRegKey*)dComIfG_getObjectRes(l_arcName[mKind], l_brk[mKind]);
    JUT_ASSERT(360,  pbrk != NULL);
    mpBrkAnm = JKR_NEW mDoExt_brkAnm();
    if (mpBrkAnm == NULL ||
        !mpBrkAnm->init(modelData, pbrk, TRUE, J3DFrameCtrl::EMode_LOOP, 1.0f, 0, -1))
    {
        return FALSE;
    }
    mpBrkAnm->setPlaySpeed(1.0f);

    {
        J3DAnmTextureSRTKey* pbtk = (J3DAnmTextureSRTKey*)dComIfG_getObjectRes(l_arcName[mKind], l_btk1[mKind]);
        JUT_ASSERT(375,  pbtk != NULL);
        mpBtk1Anm = JKR_NEW mDoExt_btkAnm();
        if (mpBtk1Anm == NULL ||
            !mpBtk1Anm->init(modelData, pbtk, TRUE, J3DFrameCtrl::EMode_LOOP, 1.0f, 0, -1))
        {
            return FALSE;
        }
        mpBtk1Anm->setPlaySpeed(1.0f);
    }

    {
        J3DAnmTextureSRTKey* pbtk = (J3DAnmTextureSRTKey*)dComIfG_getObjectRes(l_arcName[mKind], l_btk2[mKind]);
        JUT_ASSERT(391,  pbtk != NULL);
        mpBtk2Anm = JKR_NEW mDoExt_btkAnm();
        if (mpBtk2Anm == NULL ||
            !mpBtk2Anm->init(modelData, pbtk, TRUE, J3DFrameCtrl::EMode_NONE, 1.0f, 0, -1))
        {
            return FALSE;
        }
        mpBtk2Anm->setPlaySpeed(0.0f);
        mpBtk2Anm->setFrame(0.0f);
    }

    return TRUE;
}

int daObjMHole_c::create() {
    fopAcM_ct(this, daObjMHole_c);


    mKind = getKind();
    if (getType() == 0x1 && !checkParent()) {
        return cPhs_INIT_e;
    }

    int phase = dComIfG_resLoad(&mPhase, l_arcName[mKind]);
    if (phase == cPhs_COMPLEATE_e) {
        if (!fopAcM_entrySolidHeap(this, CheckCreateHeap, 0x4000)) {
            return cPhs_ERROR_e;
        }
        if (Create() == 0) {
            return cPhs_ERROR_e;
        }
        OS_REPORT("MHole Param<%x> arc<%s>\n", fopAcM_GetParam(this), l_arcName[mKind]);
#if DEBUG
        l_HIO.entryHIO("マグネホール");
#endif
    }

    return phase;
}

int daObjMHole_c::execute() {
    if (getType() == 0x1 && parentActorID != fpcM_ERROR_PROCESS_ID_e) {
        fopAc_ac_c* actor = fopAcM_SearchByID(parentActorID);
        if (actor != NULL) {
            current.pos = actor->current.pos;
            home.pos = current.pos;
        }
    }

    if (getType() != 0x2) {
        u8 sw_bit = getSwbit();
        u8 state = TRUE;
        if (sw_bit != 0xFF && !fopAcM_isSwitch(this, sw_bit)) {
            state = FALSE;
        }
        mIsOn = state;
    }

    cXyz end_pos = home.pos;
    cXyz start_pos;
    f32 start_y;

    if (mIsOn) {
        start_y = scale.y * -l_length[mKind];
    } else {
        start_y = 0.0f;
    }

    start_pos.set(0.0f, start_y, 0.0f);
    mDoMtx_stack_c::transS(home.pos);
    mDoMtx_stack_c::ZXYrotM(shape_angle);
    mDoMtx_stack_c::multVec(&start_pos, &start_pos);
    mCps.cCcD_CpsAttr::Set(start_pos, end_pos, scale.x * l_size[mKind]);
    cXyz length = end_pos - start_pos;
    mCps.SetAtVec(length);
    setBaseMtx();

    if (mIsOn) {
        dComIfG_Ccsp()->Set(&mCps);
        mpBtk2Anm->setPlaySpeed(1.0f);
        effectSet();
    }

    mpBrkAnm->play();
    mpBtk1Anm->play();
    mpBtk2Anm->play();
    if (mpEmitter[0] != NULL) {
        mSound.startLevelSound(Z2SE_OBJ_MAGNE_EFFECT, 0, -1);
    }
    mSound.framework(0, dComIfGp_getReverb(fopAcM_GetRoomNo(this)));
    field_0x701 = mIsOn;

    return 1;
}

void daObjMHole_c::effectSet() {
    static u16 const l_eff_id_L[4] = {0x86EF, 0x86F0, 0x86F1, 0x86F2};
    static u16 const l_eff_id_S[4] = {0x86F3, 0x86F4, 0x86F5, 0x86F6};

    for (int i = 0; i < 4; i++) {
        if (mpEmitter[i] == NULL) {
            if (mKind == EFF_LARGE_e) {
                mpEmitter[i] = dComIfGp_particle_set(l_eff_id_L[i], &current.pos, &shape_angle,
                                                     NULL, -1, NULL, -1, NULL, NULL, NULL);
            } else if (mKind == EFF_SMALL_e) {
                mpEmitter[i] = dComIfGp_particle_set(l_eff_id_S[i], &current.pos, &shape_angle,
                                                     NULL, -1, NULL, -1, NULL, NULL, NULL);
            }
        } else {
            JGeometry::TVec3<s16> emitter_rot;
            emitter_rot.x = shape_angle.x;
            emitter_rot.y = shape_angle.y;
            emitter_rot.z = shape_angle.z;
            mpEmitter[i]->setGlobalTranslation(current.pos);
            mpEmitter[i]->setGlobalRotation(emitter_rot);
        }
    }
}

void daObjMHole_c::effectEnd() {
    for (int i = 0; i < 4; i++) {
        if (mpEmitter[i] != NULL) {
            mpEmitter[i]->becomeInvalidEmitter();
            mpEmitter[i]->quitImmortalEmitter();
            mpEmitter[i] = NULL;
        }
    }
}

int daObjMHole_c::draw() {
    g_env_light.settingTevStruct(0x0, &current.pos, &tevStr);
    g_env_light.setLightTevColorType_MAJI(mpModel, &tevStr);

    mpBrkAnm->entry(mpModel->getModelData());
    mpBtk1Anm->entry(mpModel->getModelData());
    mpBtk2Anm->entry(mpModel->getModelData());

    dComIfGd_setListFilter();
    J3DModelData* modelData = mpModel->getModelData();
    for (u16 i = 0; i < modelData->getMaterialNum(); i++) {
        if (i == 0 || i == 1) {
            J3DMaterial* material = modelData->getMaterialNodePointer(i);
            if (material->getTexGenBlock()->getTexMtx(0) != NULL) {
                J3DTexMtxInfo* tex_mtx_info =
                    &material->getTexGenBlock()->getTexMtx(0)->getTexMtxInfo();
                if (tex_mtx_info != NULL) {
                    cXyz* unused = dKyw_get_wind_vec();
                    cXyz unused2;
                    Mtx effect_mtx;
                    MTXLightPerspective(effect_mtx, dComIfGd_getView()->fovy,
                                          dComIfGd_getView()->aspect, 1.0f, 1.0f, -0.01f, 0.0f);
                    #if WIDESCREEN_SUPPORT
                    mDoGph_gInf_c::setWideZoomLightProjection(effect_mtx);
                    #endif
                    tex_mtx_info->setEffectMtx(effect_mtx);
                    modelData->simpleCalcMaterial((MtxP)j3dDefaultMtx);
                }
            }
        }
    }

    mDoExt_modelUpdateDL(mpModel);
    dComIfGd_setList();
    mDoExt_brkAnmRemove(mpModel->getModelData());
    mDoExt_btkAnmRemove(mpModel->getModelData());

#if DEBUG
    if (l_HIO.collision_display != 0) {
        GXColor color = {0xFF, 0x0, 0x0, 0xFF};
        if (mCps.GetAtVecP() != NULL) {
            dDbVw_drawArrowXlu(mCps.GetStart(), mCps.GetEnd(), color, 1, 12);
        }
    }
#endif

    return 1;
}

int daObjMHole_c::_delete() {
    effectEnd();
    mSound.deleteObject();
    dComIfG_resDelete(&mPhase, l_arcName[mKind]);
#if DEBUG
    l_HIO.removeHIO();
#endif

    return 1;
}

static int daObjMHole_Draw(daObjMHole_c* i_this) {
    return i_this->draw();
}

static int daObjMHole_Execute(daObjMHole_c* i_this) {
    return i_this->execute();
}

static int daObjMHole_Delete(daObjMHole_c* i_this) {
    fopAcM_RegisterDeleteID(i_this, "Hasu");
    return i_this->_delete();
}

static int daObjMHole_Create(fopAc_ac_c* i_this) {
    daObjMHole_c* a_this = (daObjMHole_c*)i_this;
    fopAcM_RegisterCreateID(i_this, "MHole");
    return a_this->create();
}

static actor_method_class l_daObjMHole_Method = {
    (process_method_func)daObjMHole_Create,  
    (process_method_func)daObjMHole_Delete,
    (process_method_func)daObjMHole_Execute, 
    NULL,
    (process_method_func)daObjMHole_Draw,
};

actor_process_profile_definition g_profile_Obj_MHole = {
    /* Layer ID     */ fpcLy_CURRENT_e,
    /* List ID      */ 7,
    /* List Prio    */ fpcPi_CURRENT_e,
    /* Proc Name    */ fpcNm_Obj_MHole_e,
    /* Proc SubMtd  */ &g_fpcLf_Method.base,
    /* Size         */ sizeof(daObjMHole_c),
    /* Size Other   */ 0,
    /* Parameters   */ 0,
    /* Leaf SubMtd  */ &g_fopAc_Method.base,
    /* Draw Prio    */ fpcDwPi_Obj_MHole_e,
    /* Actor SubMtd */ &l_daObjMHole_Method,
    /* Status       */ fopAcStts_UNK_0x40000_e | fopAcStts_CULL_e,
    /* Group        */ fopAc_ACTOR_e,
    /* Cull Type    */ fopAc_CULLBOX_CUSTOM_e,
};