path: root/src/d/actor/d_a_obj_swpropeller.cpp

/**
 * @file d_a_obj_swpropeller.cpp
 * 
*/

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

#include "d/actor/d_a_obj_swpropeller.h"
#include "d/d_com_inf_game.h"
#include "f_pc/f_pc_name.h"
#include <cstring>

#define MODEL_K_PURO 0
#define MODEL_LV9_PURO 1

#define TYPE_BOOMERANG 0  // only turns when hit with boomerang
#define TYPE_WIND 1       // automatically turns

static int nodeCallBack(J3DJoint* i_joint, int param_1) {
    if (param_1 == 0) {
        int jnt_no = i_joint->getJntNo();
        J3DModel* model_p = j3dSys.getModel();
        daObjSwPr_c* swpr_p = (daObjSwPr_c*)model_p->getUserArea();

        if (jnt_no == swpr_p->mKaitenJntID) {
            cMtx_copy(model_p->getAnmMtx(jnt_no), mDoMtx_stack_c::get());
            mDoMtx_stack_c::YrotM(swpr_p->field_0x82c);
            model_p->setAnmMtx(jnt_no, mDoMtx_stack_c::get());
            mDoMtx_copy(mDoMtx_stack_c::get(), J3DSys::mCurrentMtx);
        }
    }

    return 1;
}

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

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

void daObjSwPr_c::setBaseMtx() {
    mDoMtx_stack_c::transS(current.pos);
    mDoMtx_stack_c::ZXYrotM(shape_angle);
    mpModel->setBaseTRMtx(mDoMtx_stack_c::get());
}

static int const l_bmdName[] = {3, 3};

static u32 const l_heap_size[] = {0xF20, 0x36C0};

static const dCcD_SrcCyl l_cyl_src = {
    {
        {0, {{0, 0, 0}, {0x10040, 0x11}, 0x58}},
        {dCcD_SE_NONE, 0, 0, 0, {0}},
        {dCcD_SE_NONE, 2, 0, 0, {2}},
        {0},
    },
    {
        {
            {0.0f, 0.0f, 0.0f},
            100.0f,
            100.0f,
        },
    },
};

static f32 const l_cull_size[] = {-150.0f, 0.0f, -150.0f, 150.0f, 150.0f, 150.0f};

// This was used for this object's HIO, which was removed in retail
static s16 const l_r00_rot_time[] = {190, 148, 100};

static char* l_arcName[] = {"K_prop00", "Lv9_puro"};

static char* l_joint_name = "kaiten";

int daObjSwPr_c::Create() {
    initBaseMtx();
    fopAcM_SetMtx(this, mpModel->getBaseTRMtx());

    mCcStts.Init(0xFF, 0xFF, this);
    mCyl1.Set(l_cyl_src);
    mCyl1.SetStts(&mCcStts);

    if (mNameArg == 1) {
        mCyl2.Set(l_cyl_src);
        mCyl2.SetStts(&mCcStts);
        mCyl2.SetTgType(0x200);
        mCyl2.SetTgMtrl(3);
    }

    fopAcM_setCullSizeBox(this, l_cull_size[0], l_cull_size[1], l_cull_size[2], l_cull_size[3],
                          l_cull_size[4], l_cull_size[5]);

    JUTNameTab* jnt_nt_p = mpModel->getModelData()->getJointTree().getJointName();
    mKaitenJntID = 0xFFFF;

    for (u16 i = 0; i < mpModel->getModelData()->getJointNum(); i++) {
        if (strcmp(jnt_nt_p->getName(i), l_joint_name) == 0) {
            mKaitenJntID = i;
        }
    }

    J3DJoint* jnt = mpModel->getModelData()->getJointNodePointer(mKaitenJntID);
    jnt->setCallBack(nodeCallBack);
    mpModel->setUserArea((uintptr_t)this);

    eyePos.y += 100.0f;

    // Set CullSizeFar for Outside Bridge room in Forest Temple
    if (strcmp(dComIfGp_getStartStageName(), "D_MN05") == 0 && fopAcM_GetRoomNo(this) == 4) {
        fopAcM_setCullSizeFar(this, 100.0f);
    }

    return 1;
}

int daObjSwPr_c::CreateHeap() {
    J3DModelData* modelData =
        (J3DModelData*)dComIfG_getObjectRes(l_arcName[mModelType], l_bmdName[mModelType]);
    mpModel = mDoExt_J3DModel__create(modelData, 0x80000, 0x11000084);

    if (mpModel == NULL) {
        return 0;
    }

    return 1;
}

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

    mNameArg = getNameArg();

    if (getMdlType() == 15 || getMdlType() == 0) {
        mModelType = MODEL_K_PURO;
    } else if (getMdlType() == 1) {
        mModelType = MODEL_LV9_PURO;
    }

    int phase = dComIfG_resLoad(&mPhase, l_arcName[mModelType]);
    if (phase == cPhs_COMPLEATE_e) {
        if (!fopAcM_entrySolidHeap(this, CheckCreateHeap, l_heap_size[mModelType])) {
            return cPhs_ERROR_e;
        }

        if (!Create()) {
            return cPhs_ERROR_e;
        }
    }

    return phase;
}

int daObjSwPr_c::setRotateTime() {
    field_0x83a = 0;
    return 100;
}

void daObjSwPr_c::switchCtrl() {
    int sw = getSwbit();

    if (mRotateSpeed == 0) {
        fopAcM_offSwitch(this, sw);
    } else if (cLib_calcTimer(&mSwDelayTimer) == 0) {
        fopAcM_onSwitch(this, sw);
    }
}

void daObjSwPr_c::execute_type_boomerang() {
    bool tg_hit = mCyl1.ChkTgHit();

    field_0x82c += mRotateSpeed;
    cLib_chaseAngleS(&mRotateSpeed, 0, mRotateInitSpeed / mRotateTime);

    BOOL start_rotate = false;
    if (mCyl1.ChkTgHit() && field_0x838 == 0) {
        cCcD_Obj* tg_obj = mCyl1.GetTgHitObj();

        if (tg_obj != NULL && ((tg_obj->ChkAtType(AT_TYPE_40) && mCyl1.GetTgHitGObj() != NULL &&
                                mCyl1.GetTgHitGObj()->GetAtMtrl() == dCcD_MTRL_WIND) ||
                               tg_obj->ChkAtType(AT_TYPE_BOOMERANG)))
        {
            start_rotate = true;
        }

        mCyl1.ClrTgHit();
    }

    if (start_rotate) {
        field_0x839++;
        mRotateInitSpeed = 0x2000;
        mRotateSpeed = 0x2000;
        mRotateTime = setRotateTime();
        fopAcM_seStart(this, Z2SE_OBJ_BOOMSHTR_HIT_SW, 0);

        // Set delay to 0 if in Forest Temple Central Room
        if (strcmp(dComIfGp_getStartStageName(), "D_MN05") == 0 && fopAcM_GetRoomNo(this) == 0) {
            mSwDelayTimer = 0;
        } else {
            mSwDelayTimer = 8;
        }
    }

    if (cLib_calcTimer(&field_0x83a) != 0) {
        mRotateSpeed = 0x2000;
    }

    switchCtrl();
    setBaseMtx();

    cXyz pos_offset(cXyz::Zero);
    mCyl1.SetC(current.pos + pos_offset);
    dComIfG_Ccsp()->Set(&mCyl1);

    field_0x838 = tg_hit;
}

void daObjSwPr_c::execute_type_wind() {
    s16 target_speed = 0;
    int sw = getSwbit();
    BOOL var_r29 = 0;

    if (mCyl2.ChkTgHit()) {
        if (mCyl2.GetTgHitGObj() != NULL) {
            if (mCyl2.GetTgHitGObj()->GetAtMtrl() == dCcD_MTRL_WIND && mCyl2.GetTgHitObj() != NULL) {
                target_speed = 7000;
                mRotateInitSpeed = 7000;
                var_r29 = 1;

                field_0x834++;
                if (field_0x834 == 20) {
                    fopAcM_onSwitch(this, sw);
                } else if (field_0x834 == 25) {
                    fopAcM_offSwitch(this, sw);
                }
            }
        }
    } else {
        field_0x834 = 0;
    }

    if (mCyl1.ChkTgHit()) {
        if (mCyl1.GetTgHitGObj() != NULL && mCyl1.GetTgHitGObj()->GetAtMtrl() == dCcD_MTRL_WIND) {
            cCcD_Obj* tg_obj = mCyl1.GetTgHitObj();

            if (tg_obj != NULL &&
                (tg_obj->ChkAtType(AT_TYPE_40) || tg_obj->ChkAtType(AT_TYPE_BOOMERANG)))
            {
                mRotateSpeed = 7000;
                mRotateInitSpeed = mRotateSpeed;
                fopAcM_onSwitch(this, sw);
                mSwOffDelayTimer = 10;

                if (getSwbit2() != 0xFF) {
                    fopAcM_onSwitch(this, getSwbit2());
                }
            }
        }
    } else if (mSwOffDelayTimer != 0 && cLib_calcTimer(&mSwOffDelayTimer) == 0) {
        fopAcM_offSwitch(this, sw);
    }

    cLib_addCalcAngleS(&mRotateSpeed, target_speed, 30, 100, 50);
    field_0x82c += mRotateSpeed;

    setBaseMtx();

    mCyl1.SetC(current.pos);
    dComIfG_Ccsp()->Set(&mCyl1);
    mCyl2.SetC(current.pos);
    dComIfG_Ccsp()->Set(&mCyl2);

    field_0x83d = var_r29;
}

int daObjSwPr_c::execute() {
    switch (mNameArg) {
    case TYPE_BOOMERANG:
        execute_type_boomerang();
        break;
    case TYPE_WIND:
        execute_type_wind();
        break;
    }

    if (mRotateSpeed != 0 && mRotateInitSpeed != 0) {
        fopAcM_seStartLevel(this, Z2SE_OBJ_BOOMSHTR_SWITCH,
                            ((f32)mRotateSpeed / (f32)mRotateInitSpeed) * 127.0f);
    }

    dComIfGp_att_LookRequest(this, 1200.0f, 600.0f, 0.0f, 27000, 2);
    return 1;
}

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

    mDoExt_modelUpdateDL(mpModel);
    return 1;
}

int daObjSwPr_c::_delete() {
    dComIfG_resDelete(&mPhase, l_arcName[mModelType]);
    return 1;
}

static int daObjSwPr_Draw(daObjSwPr_c* i_this) {
    return i_this->draw();
}

static int daObjSwPr_Execute(daObjSwPr_c* i_this) {
    return i_this->execute();
}

static int daObjSwPr_Delete(daObjSwPr_c* i_this) {
    return i_this->_delete();
}

static int daObjSwPr_Create(fopAc_ac_c* i_this) {
    return static_cast<daObjSwPr_c*>(i_this)->create();
}

static actor_method_class l_daObjSwPr_Method = {
    (process_method_func)daObjSwPr_Create,  (process_method_func)daObjSwPr_Delete,
    (process_method_func)daObjSwPr_Execute, (process_method_func)NULL,
    (process_method_func)daObjSwPr_Draw,
};

actor_process_profile_definition g_profile_Obj_Swpropeller = {
    /* Layer ID     */ fpcLy_CURRENT_e,
    /* List ID      */ 3,
    /* List Prio    */ fpcPi_CURRENT_e,
    /* Proc Name    */ fpcNm_Obj_Swpropeller_e,
    /* Proc SubMtd  */ &g_fpcLf_Method.base,
    /* Size         */ sizeof(daObjSwPr_c),
    /* Size Other   */ 0,
    /* Parameters   */ 0,
    /* Leaf SubMtd  */ &g_fopAc_Method.base,
    /* Draw Prio    */ fpcDwPi_Obj_Swpropeller_e,
    /* Actor SubMtd */ &l_daObjSwPr_Method,
    /* Status       */ fopAcStts_UNK_0x40000_e | fopAcStts_UNK_0x4000_e | fopAcStts_CULL_e,
    /* Group        */ fopAc_ACTOR_e,
    /* Cull Type    */ fopAc_CULLBOX_CUSTOM_e,
};