dusklight/src/d/actor/d_a_obj_kaisou.cpp

/**
 * @file d_a_obj_kaisou.cpp
 * 
*/

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

#include "d/actor/d_a_obj_kaisou.h"
#include "d/d_cc_d.h"
#include "d/actor/d_a_player.h"
#include "d/d_s_play.h"
#include <cstring>

enum Joint {
    /* 0x0 */ JNT_JOINT1,
    /* 0x1 */ JNT_JOINT2,
    /* 0x2 */ JNT_JOINT3,
};

int daObjKaisou_c::ctrlJoint(J3DJoint* i_joint, J3DModel* i_model) {
    J3DJoint* joint = i_joint;
    int jntNo = joint->getJntNo();
    mDoMtx_stack_c::copy(i_model->getAnmMtx(jntNo));

    switch (jntNo) {
        case JNT_JOINT1:
            mDoMtx_stack_c::ZrotM((s16)mJoint1ZRot);
            mDoMtx_stack_c::YrotM((s16)mJointYRot);
            mDoMtx_stack_c::XrotM(mJoint1ZRot + field_0x578 * 0.7f);
            mDoMtx_stack_c::YrotM(-mJointYRot);
            break;
        
        case JNT_JOINT2:
            mDoMtx_stack_c::ZrotM((s16)mJoint2ZRot);
            mDoMtx_stack_c::YrotM((s16)mJointYRot);
            mDoMtx_stack_c::XrotM(mJoint2ZRot + field_0x578 * 0.5f);
            mDoMtx_stack_c::YrotM(-mJointYRot);
            break;

        case JNT_JOINT3:
            mDoMtx_stack_c::ZrotM((s16)mJoint3ZRot);
            mDoMtx_stack_c::YrotM((s16)mJointYRot);
            mDoMtx_stack_c::XrotM((s16)mJoint3ZRot);
            mDoMtx_stack_c::YrotM(-mJointYRot);
            break;
    }

    i_model->setAnmMtx(jntNo, mDoMtx_stack_c::get());
    #if DEBUG
    cMtx_copy(mDoMtx_stack_c::get(), J3DSys::mCurrentMtx);
    #else
    MTXCopy(mDoMtx_stack_c::get(), J3DSys::mCurrentMtx);
    #endif
    return 1;
}

static int JointCallBack(J3DJoint* i_joint, int param_2) {
    if (param_2 == 0) {
        J3DModel* model = j3dSys.getModel();
        daObjKaisou_c* i_this = (daObjKaisou_c*)model->getUserArea();
        if (i_this != NULL) {
            i_this->ctrlJoint(i_joint, model);
        }
    }

    return 1;
}

static char* l_arcName = "M_kaisou";

int daObjKaisou_c::CreateHeap() {
    J3DModelData* modelData = (J3DModelData*)dComIfG_getObjectRes(l_arcName, "M_kaisou.bmd");
    JUT_ASSERT(174, modelData != NULL);
    mpModel = mDoExt_J3DModel__create(modelData, 0x80000, 0x11000084);
    if (mpModel == NULL) {
        return 0;
    }

    return 1;
}

static int useHeapInit(fopAc_ac_c* a_this) {
    daObjKaisou_c* i_this = (daObjKaisou_c*)a_this;
    return i_this->CreateHeap();
}

static int daObjKaisou_Create(fopAc_ac_c* a_this) {
    daObjKaisou_c* i_this = (daObjKaisou_c*)a_this;
    fpc_ProcID id = fopAcM_GetID(a_this);
    return i_this->create();
}

static int daObjKaisou_Delete(daObjKaisou_c* i_this) {
    fpc_ProcID id = fopAcM_GetID(i_this);
    i_this->Delete();
    return 1;
}

void daObjKaisou_c::initCcCylinder() {
    mStts.Init(1, 0xFF, this);

    const static dCcD_SrcCyl ccCylSrc = {
        {
            {0x0, {{0x0, 0x0, 0x0}, {0x2, 0x11}, 0x79}}, // mObj
            {dCcD_SE_NONE, 0x0, 0x0, 0x0, 0x0}, // mGObjAt
            {dCcD_SE_NONE, 0x0, 0x0, 0x0, 0x4}, // mGObjTg
            {0x0}, // mGObjCo
        }, // mObjInf
        {
            {
                {0.0f, 0.0f, 0.0f}, // mCenter
                50.0f, // mRadius
                100.0f // mHeight
            } // mCyl
        }
    };
    mCyl.Set(ccCylSrc);
    mCyl.SetStts(&mStts);
    mCyl.SetC(current.pos);
}

void daObjKaisou_c::setCcCylinder() {
    mCyl.SetC(current.pos);
    dComIfG_Ccsp()->Set(&mCyl);
}

void daObjKaisou_c::ObjHit() {
    daPy_py_c* player = daPy_getPlayerActorClass();
    f32 playerSpeedF = fopAcM_GetSpeedF(player);
    f32 absXZ = current.pos.absXZ(fopAcM_GetPosition(player));

    if (mInvulnerabilityTimer > 0) {
        mCyl.ClrTgHit();
        mCyl.OffTgSetBit();
    } else {
        mCyl.OnTgSetBit();

        if (mCyl.ChkCoHit()) {
            if (mCyl.GetCoHitObj()->GetStts()->GetWeightUc() != 1) {
                field_0x576 += playerSpeedF * (yREG_F(1) + 4.0f);
                field_0x580 += playerSpeedF * (yREG_F(2) + 1.2f);

                if (field_0x580 > 0x135) {
                    field_0x580 = 0x135;
                }

                field_0x57a = yREG_F(3) + 6144.0f;
                cLib_addCalcAngleS(&field_0x582, (s16)(fopAcM_searchPlayerAngleY(this) + 0x8000), 0x50, 0x1000, 0);
            }
        }

        if (mCyl.ChkTgHit()) {
            if (absXZ < 120.0f) {
                field_0x568++;
            }

            field_0x580 = 0x136;
            field_0x57a += (aREG_F(2) + 4096.0f);
            field_0x576 += (aREG_F(3) + 4096.0f);
            mInvulnerabilityTimer = 20;

            daPy_getPlayerActorClass()->getCutType();

            switch (daPy_getPlayerActorClass()->getCutType()) {
                case daPy_py_c::CUT_TYPE_NM_RIGHT:
                case daPy_py_c::CUT_TYPE_FINISH_RIGHT:
                case daPy_py_c::CUT_TYPE_MORTAL_DRAW_B:
                    field_0x582 = fopAcM_searchPlayerAngleY(this) + 0x4000;
                    break;

                case daPy_py_c::CUT_TYPE_NM_LEFT:
                case daPy_py_c::CUT_TYPE_FINISH_LEFT:
                case daPy_py_c::CUT_TYPE_TURN_LEFT:
                    field_0x582 = fopAcM_searchPlayerAngleY(this) - 0x4000;
                    break;

                default:
                    field_0x582 = fopAcM_searchPlayerAngleY(this) + 0x8000;
                    break;
            }
        }

        if (field_0x57a == 0) {
            field_0x569 = 0;
        }

        if (field_0x57a > 0x2000) {
            field_0x57a = 0x2000;
        }

        if (field_0x576 > 0x1500) {
            field_0x576 = 0x1500;
        }
    }
}

int daObjKaisou_c::Execute() {
    mInvulnerabilityTimer--;
    if (mInvulnerabilityTimer <= 0) {
        mInvulnerabilityTimer = 0;
    }

    ObjHit();

    field_0x57c += field_0x57e;
    mJoint1ZRot = field_0x574 * (HREG_F(0) + 1.0f) * cM_ssin(field_0x57c * 4.0f);
    mJoint2ZRot = field_0x574 * (HREG_F(1) + 1.5) * cM_ssin(field_0x57c * 4.0f - 16384.0f);
    mJoint3ZRot = field_0x574 * (HREG_F(2) + 1.8f) * cM_ssin(field_0x57c * 4.0f - 32768.0f);
    
    cLib_addCalcAngleS(&field_0x57e, field_0x580, 0x15, 0x1000, 0);
    cLib_addCalcAngleS(&field_0x580, 0x80, 0x15, 0x1000, 0);
    cLib_addCalcAngleS(&field_0x574, field_0x576, 0x15, 0x1000, 0);
    cLib_addCalcAngleS(&field_0x578, field_0x57a, 0x15, 0x1000, 0);
    cLib_addCalcAngleS(&field_0x57a, 0, 0x15, 0x1000, 0);
    cLib_addCalcAngleS(&field_0x576, 0x500, 0x20, 0x1000, 0);
    cLib_addCalcAngleS(&field_0x582, 0x1000, 0x20, 0x1000, 0);

    setCcCylinder();
    setBaseMtx();
    return 1;
}

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

void daObjKaisou_c::setBaseMtx() {
    cXyz scale(yREG_F(5) + 2.0f, yREG_F(5) + 2.0f, yREG_F(5) + 2.0f);
    mDoMtx_stack_c::transS(current.pos);
    mDoMtx_stack_c::ZXYrotM(shape_angle);
    mDoMtx_stack_c::scaleM(scale);
    mpModel->setBaseTRMtx(mDoMtx_stack_c::get());
}

int daObjKaisou_c::Draw() {
    g_env_light.settingTevStruct(0, &current.pos, &tevStr);
    g_env_light.setLightTevColorType_MAJI(mpModel, &tevStr);
    dComIfGd_setListBG();
    mDoExt_modelUpdateDL(mpModel);
    return 1;
}

static int daObjKaisou_Draw(daObjKaisou_c* i_this) {
    return i_this->Draw();
}

static int daObjKaisou_Execute(daObjKaisou_c* i_this) {
    return i_this->Execute();
}

cPhs_Step daObjKaisou_c::create() {
    fopAcM_ct(this, daObjKaisou_c);

    cPhs_Step phase = dComIfG_resLoad(&mPhase, l_arcName);
    if (phase == cPhs_COMPLEATE_e) {
        if (dComIfGs_isStageBossEnemy() && dComIfGp_getStartStageRoomNo() == 50) {
            if (strcmp("D_MN01A", dComIfGp_getStartStageName()) == 0) {
                return cPhs_ERROR_e;
            }
        }

        OS_REPORT("Kaisou PARAM %x\n", fopAcM_GetParam(this));
        if (!fopAcM_entrySolidHeap(this, useHeapInit, 0x8D0)) {
            return cPhs_ERROR_e;
        }

        gravity = nREG_F(0) + -9.0f;

        fopAcM_SetMtx(this, mpModel->getBaseTRMtx());
        
        cXyz pos(current.pos.x, current.pos.y + 100.0f, current.pos.z);
        if (fopAcM_gc_c::gndCheck(&pos)) {
            current.pos.y = fopAcM_gc_c::getGroundY();
        }

        mpModel->setUserArea((uintptr_t)this);
        for (u16 i = 0; i < mpModel->getModelData()->getJointNum(); i++) {
            mpModel->getModelData()->getJointNodePointer(i)->setCallBack(JointCallBack);
        }

        field_0x57e = 0x80;
        field_0x574 = 0x500;
        field_0x576 = 0x500;
        field_0x57a = 0;
        initCcCylinder();
        fopAcM_setCullSizeBox(this, -1000.0f, -500.0f, -1000.0f, 1000.0f, 500.0f, 1000.0f);
        daObjKaisou_Execute(this);
    }

    return phase;
}

static int daObjKaisou_IsDelete(daObjKaisou_c* i_this) {
    return 1;
}

static actor_method_class l_daObjKaisou_Method = {
    (process_method_func)daObjKaisou_Create,
    (process_method_func)daObjKaisou_Delete,
    (process_method_func)daObjKaisou_Execute,
    (process_method_func)daObjKaisou_IsDelete,
    (process_method_func)daObjKaisou_Draw,
};

actor_process_profile_definition g_profile_Obj_Kaisou = {
    /* Layer ID     */ fpcLy_CURRENT_e,
    /* List ID      */ 3,
    /* List Prio    */ fpcPi_CURRENT_e,
    /* Proc Name    */ fpcNm_Obj_Kaisou_e,
    /* Proc SubMtd  */ &g_fpcLf_Method.base,
    /* Size         */ sizeof(daObjKaisou_c),
    /* Size Other   */ 0,
    /* Parameters   */ 0,
    /* Leaf SubMtd  */ &g_fopAc_Method.base,
    /* Draw Prio    */ fpcDwPi_Obj_Kaisou_e,
    /* Actor SubMtd */ &l_daObjKaisou_Method,
    /* Status       */ fopAcStts_UNK_0x40000_e,
    /* Group        */ fopAc_ACTOR_e,
    /* Cull Type    */ fopAc_CULLBOX_CUSTOM_e,
};