/**
 * @file d_a_obj_inobone.cpp
 * 
*/

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

#include "d/actor/d_a_obj_inobone.h"
#include "d/actor/d_a_player.h"

static void bornTgCallBack(fopAc_ac_c* i_tgActor, dCcD_GObjInf* i_tgObjInf,
                           fopAc_ac_c* i_atActor, dCcD_GObjInf* i_atObjInf) {
    daObjIBone_c* a_tgActor = (daObjIBone_c*)i_tgActor;
    
    if (i_tgActor == NULL) return;
    
    if (i_atObjInf->ChkAtType(AT_TYPE_NORMAL_SWORD) ||
        i_atObjInf->ChkAtType(AT_TYPE_IRON_BALL) ||
        i_atObjInf->ChkAtType(AT_TYPE_SPINNER) ||
        i_atObjInf->ChkAtType(AT_TYPE_UNK) ||
        i_atObjInf->ChkAtType(AT_TYPE_BOMB) ||
        i_atObjInf->ChkAtType(AT_TYPE_HOOKSHOT))
    {
        a_tgActor->field_0x828 = 2;
    } else if (i_atObjInf->ChkAtType(AT_TYPE_CSTATUE_SWING)) {
        a_tgActor->field_0x828 = 3;
    }
}

static void bornCoCallBack(fopAc_ac_c* i_coActorA, dCcD_GObjInf* i_coObjInfA,
                           fopAc_ac_c* i_coActorB, dCcD_GObjInf* i_coObjInfB) {
    daObjIBone_c* a_coActorA = (daObjIBone_c*)i_coActorA;

    if (i_coActorA != NULL && i_coActorB != NULL &&
        fopAcM_GetName(i_coActorB) == fpcNm_HORSE_e &&
        daPy_getPlayerActorClass()->checkHorseRide())
    {
        a_coActorA->field_0x828 = 1;
    }
}

static const dCcD_SrcCyl l_cyl_src = {
    {
        {0x0, {{0x0, 0x0, 0x1f}, {0xd8fafdff, 0x11}, 0x79}}, // mObj
        {dCcD_SE_NONE, 0x0, 0x0, 0x0, 0x0}, // mGObjAt
        {dCcD_SE_NONE, 0x2, 0x0, 0x0, 0x6}, // mGObjTg
        {0x0}, // mGObjCo
    }, // mObjInf
    {
        {
            {0.0f, 0.0f, 0.0f}, // mCenter
            140.0f, // mRadius
            70.0f // mHeight
        } // mCyl
    } // mCylAttr
};

static const dCcD_SrcCyl l_cyl_src2 = {
    {
        {0x0, {{0x0, 0x0, 0x1f}, {0x2000, 0x11}, 0x78}}, // mObj
        {dCcD_SE_NONE, 0x0, 0x0, 0x0, 0x0}, // mGObjAt
        {dCcD_SE_NONE, 0x2, 0x0, 0x0, 0x3}, // mGObjTg
        {0x0}, // mGObjCo
    }, // mObjInf
    {
        {
            {0.0f, 0.0f, 0.0f}, // mCenter
            140.0f, // mRadius
            70.0f // mHeight
        } // mCyl
    } // mCylAttr
};

static void* s_boar_sub(void* i_actor, void* i_data) {
    if (fopAc_IsActor(i_actor)) {
        fopAc_ac_c* actor = (fopAc_ac_c*)i_actor;
        fopAc_ac_c* data = (fopAc_ac_c*)i_data;

        if (fopAcM_GetName(actor) == fpcNm_E_WB_e) {
            f32 xz_dist = fopAcM_searchActorDistanceXZ(data, actor);
            f32 y_dist = fopAcM_searchActorDistanceY(data, actor);

            if (xz_dist < 100.0f && y_dist < 240.0f) {
                return i_actor;
            }
        }
    }

    return NULL;
}

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

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

void daObjIBone_c::setBaseMtx() {
    mDoMtx_stack_c::transS(current.pos);
    mDoMtx_stack_c::ZXYrotM(csXyz(shape_angle.x, 0, 0));

    mpModel->setBaseTRMtx(mDoMtx_stack_c::get());
}

int daObjIBone_c::Create() {
    scale.setall(1.35f);

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

    mStts.Init(0xFF, 0xFF, this);

    mCyl.Set(l_cyl_src);
    mCyl.SetStts(&mStts);
    mCyl.SetCoHitCallback(bornCoCallBack);
    mCyl.SetTgHitCallback(bornTgCallBack);

    mCyl2.Set(l_cyl_src2);
    mCyl2.SetStts(&mStts);

    fopAcM_setCullSizeBox2(this, mpModel->getModelData());

    mSound.init(&current.pos, 1);

    return 1;
}

static const char* l_arcName = "Obj_Ibone";

static const char* l_bmdName = "A_InoBone.bmd";

int daObjIBone_c::CreateHeap() {
    J3DModelData* modelData =
        (J3DModelData*)dComIfG_getObjectRes(l_arcName, l_bmdName);
    JUT_ASSERT(407, modelData != NULL);
    
    mpModel =
        mDoExt_J3DModel__create(modelData, J3DMdlFlag_DifferedDLBuffer,
            BMD_DEFAULT_DIFF_FLAGS);

    return mpModel != NULL ? 1 : 0;
}

int daObjIBone_c::create() {
    fopAcM_ct(this, daObjIBone_c)

    int result = dComIfG_resLoad(&mPhase, l_arcName);
            
    if (result == cPhs_COMPLEATE_e) {
        if (!fopAcM_entrySolidHeap(this, CheckCreateHeap, 0x860)) {
            return cPhs_ERROR_e;
        } else if (!Create()) {
            return cPhs_ERROR_e;
        }
    }

    return result;
}

int daObjIBone_c::execute() {
    f32 xz_distance = fopAcM_searchPlayerDistanceXZ(this);
    f32 y_distance = fopAcM_searchPlayerDistanceY(this);

    if (
        xz_distance < 100.0f &&
        y_distance < 240.0f &&
        daPy_getPlayerActorClass()->checkHorseRide())
    {
        field_0x828 = 1;
    }
    if (fopAcM_Search(s_boar_sub, this) != NULL) {
        field_0x828 = 3;
    }
    
    switch (field_0x828) {
        case 0:
            break;
        
        case 1:
            fopAcM_createItemForDirectGet(&current.pos, dItemNo_HEART_e,
                fopAcM_GetRoomNo(this), NULL, NULL, 0.0f, 0.0f);
            setBreakEffect();
            fopAcM_delete(this);
            break;
            
        case 2:
        case 3: {
            csXyz angle(0, home.angle.y, 0);

            fopAcM_createItem(&current.pos, dItemNo_HEART_e, -1,
                fopAcM_GetHomeRoomNo(this), &angle, NULL, 0);
            setBreakEffect();
            fopAcM_delete(this);
            break;
        }
    }
    
    if (mCyl2.ChkTgHit() && mCyl2.GetTgHitObj() != NULL) {
        Z2SoundID se_id = dCcD_GObjInf::getHitSeID(mCyl2.GetTgHitObjSe(), 1);

        mSound.startCollisionSE(se_id, 2, NULL);
    }

    mSound.framework(0, dComIfGp_getReverb(fopAcM_GetRoomNo(this)));

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

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

    return 1;
}

static const char* l_effbmdName = "BreakBoarBone.bmd";  // unused

void daObjIBone_c::setBreakEffect() {
    static const u16 particle_id[] = { dPa_RM(ID_ZM_S_BOARBONEBREAK00) };
    
    cXyz pos = current.pos;

    J3DModelData* tubo_bmd = (J3DModelData*)dComIfG_getObjectRes("Always", 0x20);
    J3DAnmTexPattern* tubo_btp = (J3DAnmTexPattern*)dComIfG_getObjectRes("Always", 0x42);
    
    JUT_ASSERT(561, tubo_bmd != NULL);
    JUT_ASSERT(562, tubo_btp != NULL);

    s8 room_no = fopAcM_GetRoomNo(this);
    dPa_levelEcallBack* callback = &dPa_modelEcallBack::getEcallback();

    JPABaseEmitter* emitter =
        dComIfGp_particle_set(dPa_RM(ID_ZM_S_M_BOARBONEBREAK00), &current.pos,
            NULL, NULL, 0xFF, callback, room_no, NULL, NULL, &scale);
    
    dPa_modelEcallBack::setModel(emitter, tubo_bmd,
        tevStr, 3, tubo_btp, 6);
    
    for (int i = 0; i < 1; i++) {
        dComIfGp_particle_set(particle_id[i], &pos, NULL, &scale,
            0xFF, NULL, -1, NULL, NULL, NULL);
    }

    mDoAud_seStart(Z2SE_OBJ_BONES_BREAK_L, &current.pos, 0, 0);
}

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

    return 1;
}

int daObjIBone_c::_delete() {
    mSound.deleteObject();
    dComIfG_resDelete(&mPhase, l_arcName);

    return 1;
}

static int daObjIBone_Draw(daObjIBone_c* i_this) {
    return i_this->draw();
}

static int daObjIBone_Execute(daObjIBone_c* i_this) {
    return i_this->execute();
}

static int daObjIBone_Delete(daObjIBone_c* i_this) {
    return i_this->_delete();
}

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

static actor_method_class l_daObjIBone_Method = {
    (process_method_func)daObjIBone_Create,
    (process_method_func)daObjIBone_Delete,
    (process_method_func)daObjIBone_Execute,
    (process_method_func)0,
    (process_method_func)daObjIBone_Draw,
};

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