/**
 * @file d_a_obj_syRock.cpp
 * 
*/

#include "d/actor/d_a_obj_syRock.h"
#include "d/actor/d_a_obj_eff.h"
#include "d/d_bg_w.h"
#include "d/d_com_inf_game.h"
#include "f_op/f_op_kankyo_mng.h"
#include "SSystem/SComponent/c_math.h"

typedef void (daSyRock_c::*actionFunc)();

/* 80D0403C-80D04048 000000 000C+00 1/1 0/0 0/0 .data            cNullVec__6Z2Calc */
UNK_REL_DATA

/* 80D0426C-80D042A0 000014 0034+00 8/8 0/0 0/0 .bss             l_HIO */
static daSyRock_HIO_c l_HIO;

/* 80D0405C-80D040A0 000020 0044+00 2/2 0/0 0/0 .data            mCcDCyl__10daSyRock_c */
dCcD_SrcCyl daSyRock_c::mCcDCyl = {mCcDObjInfo};

/* 80D022AC-80D02334 0000EC 0088+00 1/1 0/0 0/0 .text            __ct__14daSyRock_HIO_cFv */
daSyRock_HIO_c::daSyRock_HIO_c() {
    mShakeAmplitude = 450.0f;
    mShakeXOscillationAngle = 90.0f;
    mShakeZOscillationAngle = 45.0f;
    mShakeDamping = 1.0f / 20.0f;
    mShakeMaxDecay = 5.0f;
    mShakeMinDecay = 1.0f / 10.0f;
    mFallAcceleration = 10.0f;
    mMaxFallSpeed = 200.0f;
    mWaitFrames = 30;
    mEffectScale = 4.0f;
    mShockStrength = 4;
    mFallWaterBouyancy = 3.0f;
    mMaxWaterPillarRange = 5.0f;
}

/* 80D0237C-80D02454 0001BC 00D8+00 2/2 0/0 0/0 .text            setBaseMtx__10daSyRock_cFv */
void daSyRock_c::setBaseMtx() {
    mDoMtx_stack_c::transS(current.pos.x, current.pos.y, current.pos.z);
    mDoMtx_stack_c::ZXYrotM(0, shape_angle.y, shape_angle.z);
    mDoMtx_stack_c::ZXYrotM(mShakeXZAngleOffset.x, mShakeXZAngleOffset.y, mShakeXZAngleOffset.z);
    mDoMtx_stack_c::transM(mUnderwaterRotatedStalactiteOffset.x, mUnderwaterRotatedStalactiteOffset.y, mUnderwaterRotatedStalactiteOffset.z);

    mpModels[mIsUnbroken]->setBaseScale(scale);

    // Set base transform matrix of current model and the background matrix both to the contents of now
    mpModels[mIsUnbroken]->setBaseTRMtx(mDoMtx_stack_c::get());
    MTXCopy(mDoMtx_stack_c::get(), mBgMtx);
}

/* 80D02454-80D02584 000294 0130+00 1/0 0/0 0/0 .text            CreateHeap__10daSyRock_cFv */
int daSyRock_c::CreateHeap() {
    J3DModelData* modelData = static_cast<J3DModelData*>(dComIfG_getObjectRes("syourock", 4));
    JUT_ASSERT(271, modelData != 0);
    mpModels[0] = mDoExt_J3DModel__create(modelData, 1 << 19, 0x11000084);
    
    if(!mpModels[0])
        return 0;

    modelData = static_cast<J3DModelData*>(dComIfG_getObjectRes("syourock", 5));
    JUT_ASSERT(282, modelData != 0);
    mpModels[1] = mDoExt_J3DModel__create(modelData, 1 << 19, 0x11000084);

    if(!mpModels[1])
        return 0;
    
    mpBrokenCollision = new dBgW;

    if(!mpBrokenCollision || mpBrokenCollision->Set(static_cast<cBgD_t*>(dComIfG_getObjectRes("syourock", 9)), 1, &mBgMtx)) {
        mpBrokenCollision = NULL;
        return 0;
    }

    return 1;
}

dCcD_SrcGObjInf const daSyRock_c::mCcDObjInfo = {
    {0x0, {{AT_TYPE_BOMB, 0x1, 0x1F}, {AT_TYPE_IRON_BALL | AT_TYPE_BOMB, 0x11}, 0x79}},    // mObj
    {dCcD_SE_SWORD, 0x0, 0x1, dCcD_MTRL_NONE, 0x0},      // mGObjAt
    {dCcD_SE_STONE, 0x0, 0x0, dCcD_MTRL_NONE, 0x2},      // mGObjTg
    {},  // mGObjCo
};

/* 80D02584-80D02930 0003C4 03AC+00 1/1 0/0 0/0 .text            create__10daSyRock_cFv */
cPhs__Step daSyRock_c::create() {
    fopAcM_SetupActor(this, daSyRock_c);

    if(getArg0() == TRUE) {
        mpWaterPillar = static_cast<daWtPillar_c*>(fopAcIt_Judge(searchWaterPillar, this));

        if(!mpWaterPillar)
            return cPhs_INIT_e;
    }

    const cPhs__Step requestedPhaseProcess = static_cast<cPhs__Step>(dComIfG_resLoad(&mPhase, "syourock"));
    if(requestedPhaseProcess == cPhs_COMPLEATE_e) {
        const cPhs__Step bgCreatePhaseProcess = static_cast<cPhs__Step>(MoveBGCreate("syourock", 0x8, dBgS_MoveBGProc_TypicalRotY, 0x2100, NULL));
        if(bgCreatePhaseProcess == cPhs_ERROR_e)
            return cPhs_ERROR_e;

        mAcchCir.SetWall(150.0f, 150.0f);
        mAcch.Set(&current.pos, &old.pos, this, 0x1, &mAcchCir, &speed, NULL, NULL);
        mAcch.SetWaterCheckOffset(10000.0f);
        mShakeOscillationAngleStep = 0;
        mShakeXZAngleOffset.setall(0);

        mShakeXOscillationAngle = mShakeZOscillationAngle = mShakeAmplitude = 0.0f;
        mShakeMinDecay = mShakeMaxDecay = mShakeDamping =  0.0f;
        mUnderwaterRotatedStalactiteOffset.setall(0.0f);

        mStts.Init(0xFF, 0xFF, this);
        mUnbrokenCylinderCollider.Set(mCcDCyl);
        mUnbrokenCylinderCollider.SetStts(&mStts);
        mUnbrokenCylinderCollider.OffAtSetBit();

        const u32 wasBrokenSwitchNo = getSwBit1();
        if(dComIfGs_isSwitch(wasBrokenSwitchNo, fopAcM_GetHomeRoomNo(this))) {
            mIsUnbroken = false;
            mUnbrokenCylinderCollider.OffCoSetBit();
            if(mpBrokenCollision && mpBrokenCollision->ChkUsed()) {
                dComIfG_Bgsp().Release(mpBrokenCollision);
                mpBrokenCollision->Move();
            }

            // Snap already broken stalactite to its appropriate location and set its mode accordingly
            setFallStat();
        }
        else {
            mIsUnbroken = true;

            if(mpBgW)
                dComIfG_Bgsp().Release(mpBgW);
                
            if(mpBrokenCollision) {
                dComIfG_Bgsp().Regist(mpBrokenCollision, this);
                mpBrokenCollision->Move();
            }

            mDropAutomaticallySwitchNo = getSwBit2();
            init_modeWait();

        }

        field_0x779 = 2;
        fopAcM_SetMtx(this, mpModels[mIsUnbroken]->getBaseTRMtx());
        fopAcM_setCullSizeBox2(this, mpModels[mIsUnbroken]->getModelData());
        setBaseMtx();
    }

    return requestedPhaseProcess;
}

/* 80D02AFC-80D02BE0 00093C 00E4+00 1/1 0/0 0/0 .text            setFallStat__10daSyRock_cFv */
void daSyRock_c::setFallStat() {
    mpWaterPillar = static_cast<daWtPillar_c*>(fopAcIt_Judge(searchWaterPillar, this));
    if(mpWaterPillar) {
        mpWaterPillar->onRockFlag();
        mMode = MODE_MOVE;
    }
    else {
        mAcch.CrrPos(dComIfG_Bgsp());

        if(mAcch.ChkWaterHit()) {
            if(mAcch.m_wtr.GetHeight() - mAcch.GetGroundH() >= 200.0f) {
                mUnderwaterRotatedStalactiteOffset.x = 150.0f;
                shape_angle.z = 0x4000;
            }
            current.pos.y = mAcch.GetGroundH();
        }
        else {
            current.pos.y = mAcch.GetGroundH();
        }

        mAcch.CrrPos(dComIfG_Bgsp());
        mMode = MODE_DROP_END;
    }
}

/* 80D02BE0-80D02C54 000A20 0074+00 1/0 0/0 0/0 .text            Execute__10daSyRock_cFPPA3_A4_f */
int daSyRock_c::Execute(Mtx** i_mtx) {
    eventUpdate();
    move();

    *i_mtx = &mpModels[mIsUnbroken]->getBaseTRMtx();

    mInWaterPreviousFrame = mAcch.ChkWaterIn();
    setBaseMtx();

    return 1;
}

/* 80D02C54-80D02E70 000A94 021C+00 1/1 0/0 0/0 .text            move__10daSyRock_cFv */
void daSyRock_c::move() {
    static actionFunc mode_proc[] = {
    &daSyRock_c::modeWait, &daSyRock_c::modeDropInit,
    &daSyRock_c::modeDrop, &daSyRock_c::modeSink,
    &daSyRock_c::modeMove, &daSyRock_c::modeDropEnd
    };

    (this->*mode_proc[mMode])(); 

    mShakeXZAngleOffset.x = mShakeAmplitude * cM_ssin(mShakeOscillationAngleStep * cM_deg2s(mShakeXOscillationAngle));
    mShakeXZAngleOffset.z = mShakeAmplitude * cM_scos(mShakeOscillationAngleStep * cM_deg2s(mShakeZOscillationAngle));

    cLib_addCalc(&mShakeAmplitude, 0.0f, mShakeDamping, mShakeMaxDecay, mShakeMinDecay);

    mShakeOscillationAngleStep++;

    mUnbrokenCylinderCollider.SetR(150.0f);
    mUnbrokenCylinderCollider.SetH(680.0f);

    cXyz currentPos = current.pos;
    currentPos.y -= 250.0f;

    mUnbrokenCylinderCollider.SetC(currentPos);

    dComIfG_Ccsp()->Set(&mUnbrokenCylinderCollider);
}

/* 80D02E70-80D02E7C 000CB0 000C+00 1/1 0/0 0/0 .text            init_modeWait__10daSyRock_cFv */
void daSyRock_c::init_modeWait() {
    mMode = MODE_WAIT;
}

/* 80D02E7C-80D02F88 000CBC 010C+00 1/0 0/0 0/0 .text            modeWait__10daSyRock_cFv */
void daSyRock_c::modeWait() {
    if(mDropAutomaticallySwitchNo != 0xFF && dComIfGs_isSwitch(mDropAutomaticallySwitchNo, fopAcM_GetHomeRoomNo(this))) {
        field_0x779 = 0;
        if(getEvetID() != 0xFF){
            orderEvent(getEvetID(), 0xFF, 1);
        } else {
            eventStart();
        }
    }
    else if(mUnbrokenCylinderCollider.ChkTgHit()) {
        if(mUnbrokenCylinderCollider.GetTgHitGObj()->GetAtType() == AT_TYPE_BOMB) {
            field_0x779 = 0;
            if(getEvetID() != 0xFF)
                orderEvent(getEvetID(), 0xFF, 1);
            else {
                eventStart();
            }
        }
        mUnbrokenCylinderCollider.ClrTgHit();
    }
}

/* 80D02F88-80D02FB8 000DC8 0030+00 2/1 0/0 0/0 .text            eventStart__10daSyRock_cFv */
bool daSyRock_c::eventStart() {
    // field_0x779 is always 0 when eventStart() is called (see modeWait())
    if(!field_0x779)
        init_modeDropInit();

    return true;
}

/* 80D02FB8-80D03070 000DF8 00B8+00 1/1 0/0 0/0 .text            init_modeDropInit__10daSyRock_cFv
 */
void daSyRock_c::init_modeDropInit() {
    fopAcM_seStartCurrent(this, Z2SE_OBJ_STALAC_BREAK, 0);

    mUnbrokenCylinderCollider.OffCoSetBit();
    mUnbrokenCylinderCollider.OffTgSetBit();

    mWaitFrames = 0;

    mpWaterPillar = static_cast<daWtPillar_c*>(fopAcIt_Judge(searchWaterPillar, this));

    mMode = MODE_DROP_INIT;
}

/* 80D03070-80D030A8 000EB0 0038+00 1/0 0/0 0/0 .text            modeDropInit__10daSyRock_cFv */
void daSyRock_c::modeDropInit() {
    if(mWaitFrames)
        mWaitFrames--;
    else
        init_modeDrop();
}

/* 80D030A8-80D03250 000EE8 01A8+00 3/3 0/0 0/0 .text searchWaterPillar__10daSyRock_cFPvPv */
void* daSyRock_c::searchWaterPillar(void* i_proc, void* i_this) {
    daSyRock_c* const syRock = static_cast<daSyRock_c*>(i_this);
    daWtPillar_c* const wtPillar = static_cast<daWtPillar_c*>(i_proc);

    if(wtPillar && fopAcM_IsActor(wtPillar) && fopAcM_GetProfName(wtPillar) == PROC_Obj_WaterPillar) {
        const cXyz vectorToWaterPillar = fopAcM_GetPosition(syRock) - fopAcM_GetPosition(wtPillar);
        const f32 horizontalDistanceToWaterPillar = sqrtf(vectorToWaterPillar.getMagXZ());
         
        if(horizontalDistanceToWaterPillar <= l_HIO.mMaxWaterPillarRange)
            return wtPillar;
        else
            return NULL;
    }
    return NULL;
}

/* 80D03250-80D03384 001090 0134+00 1/1 0/0 0/0 .text            init_modeDrop__10daSyRock_cFv */
void daSyRock_c::init_modeDrop() {
    gravity = -l_HIO.mFallAcceleration;
    maxFallSpeed = -l_HIO.mMaxFallSpeed;
    speedF = 0.0f;

    if(mpBrokenCollision) {
        dComIfG_Bgsp().Release(mpBrokenCollision);
        mpBrokenCollision->Move();
    }

    mIsUnbroken = false;
    fopAcM_SetMtx(this, mpModels[mIsUnbroken]->getBaseTRMtx());
    fopAcM_setCullSizeBox2(this, mpModels[mIsUnbroken]->getModelData());

    const cXyz particlePos = current.pos;
    dComIfGp_particle_set(0x8616, &particlePos, NULL, NULL);
    mUnbrokenCylinderCollider.OnAtSetBit();
    mMode = MODE_DROP;
}

/* 80D03384-80D033D0 0011C4 004C+00 1/0 0/0 0/0 .text            modeDrop__10daSyRock_cFv */
void daSyRock_c::modeDrop() {
    fopAcM_posMoveF(this, mStts.GetCCMoveP());
    mAcch.CrrPos(dComIfG_Bgsp());
    bgCheck();
}

/* 80D033D0-80D03440 001210 0070+00 1/1 0/0 0/0 .text            init_modeSink__10daSyRock_cFv */
void daSyRock_c::init_modeSink() {
    gravity = -l_HIO.mFallAcceleration + l_HIO.mFallWaterBouyancy;
    speed.y = cLib_minMaxLimit(speed.y, -15.0f, 13.0f);

    if(!mpWaterPillar)
        mUnderwaterRotatedStalactiteOffset.x = 150.0f;

    mMode = MODE_SINK;
}

/* 80D03440-80D034E8 001280 00A8+00 1/0 0/0 0/0 .text            modeSink__10daSyRock_cFv */
void daSyRock_c::modeSink() {
    if(!mpWaterPillar)
        cLib_addCalcAngleS(&shape_angle.z, 0x4000, 1, 0x444, 1);

    speed.y = cLib_minMaxLimit(speed.y, -15.0f, 13.0f);

    fopAcM_posMoveF(this, mStts.GetCCMoveP());
    mAcch.CrrPos(dComIfG_Bgsp());

    bgCheck();
}

/* 80D034E8-80D035F8 001328 0110+00 1/1 0/0 0/0 .text            init_modeMove__10daSyRock_cFv */
void daSyRock_c::init_modeMove() {
    fopAcM_seStartCurrent(this, Z2SE_OBJ_STALAC_LAND_WATER, 0);

    if(mpBgW)
        dComIfG_Bgsp().Regist(mpBgW, this);

    mpWaterPillar->onRockFlag();

    mShakeAmplitude = l_HIO.mShakeAmplitude;
    mShakeZOscillationAngle = l_HIO.mShakeZOscillationAngle;
    mShakeXOscillationAngle = l_HIO.mShakeXOscillationAngle;
    mShakeDamping = l_HIO.mShakeDamping;
    mShakeMaxDecay = l_HIO.mShakeMaxDecay;
    mShakeMinDecay = l_HIO.mShakeMinDecay;

    mUnbrokenCylinderCollider.OffAtSetBit();

    const u32 swBit = getSwBit1();
    dComIfGs_onSwitch(swBit, fopAcM_GetHomeRoomNo(this));

    mMode = MODE_MOVE;
}

/* 80D035F8-80D036B8 001438 00C0+00 1/0 0/0 0/0 .text            modeMove__10daSyRock_cFv */
void daSyRock_c::modeMove() {
    mpWaterPillar->onRockFlag();

    current.pos = mpWaterPillar->getPos();
    current.pos.y -= 50.0f;
    
    if(mpWaterPillar->isRockYure()) {
        mShakeAmplitude = l_HIO.mShakeAmplitude;
        mShakeZOscillationAngle = l_HIO.mShakeZOscillationAngle;
        mShakeXOscillationAngle = l_HIO.mShakeXOscillationAngle;
        mShakeDamping = l_HIO.mShakeDamping;
        mShakeMaxDecay = l_HIO.mShakeMaxDecay;
        mShakeMinDecay = l_HIO.mShakeMinDecay;

        mpWaterPillar->clearRockYure();
    }
}

/* 80D036B8-80D036DC 0014F8 0024+00 1/1 0/0 0/0 .text            chkWaterLineIn__10daSyRock_cFv */
BOOL daSyRock_c::chkWaterLineIn() {
    return mAcch.m_wtr.GetHeight() > current.pos.y + 150.0f;
}

/* 80D036DC-80D03984 00151C 02A8+00 2/2 0/0 0/0 .text            bgCheck__10daSyRock_cFv */
void daSyRock_c::bgCheck() {
    // Note stack ordering issues arise if fopAcM_seStartCurrent() is used instead of mDoAud_seStart()
    const u32 hitGround = mAcch.ChkGroundHit() ? TRUE : FALSE;
    const u32 hitWater = mAcch.ChkWaterHit() ? TRUE : FALSE;
    const u32 inWater = mAcch.ChkWaterIn() ? TRUE : FALSE;
    bool inWaterPillar = false;

    if(mMode == MODE_DROP) {
        if(mpWaterPillar) {
            const f32 waterPillarHeight = mpWaterPillar->getPillarHeight();
            const f32 waterPillarVerticalPos = fopAcM_GetPosition(mpWaterPillar).y;
            if(waterPillarVerticalPos + waterPillarHeight - 50.0f >= current.pos.y)
                inWaterPillar = true;
        }

        const f32 waterHeight = mAcch.m_wtr.GetHeight();
        if(hitWater) {
            const f32 verticalSpeed = speed.y;
            
            if(chkWaterLineIn())
                init_modeSink();

            if(inWater && !mInWaterPreviousFrame) {
                cXyz currentRockPos = current.pos;
                currentRockPos.y = waterHeight;
                fopKyM_createWpillar(&currentRockPos, l_HIO.mEffectScale, 3);

                if(verticalSpeed < -15.0f)
                    fopAcM_seStart(this, Z2SE_OBJ_FALL_WATER_M, 0);
                else
                    mDoAud_seStart(Z2SE_OBJ_STALAC_LAND_WATER, &current.pos, 0, dComIfGp_getReverb(fopAcM_GetRoomNo(this)));
            }
        }

        if(inWaterPillar)
            init_modeMove();
    }

    if(hitGround) {
        if(!hitWater && !mpWaterPillar) {
            mDoAud_seStart(Z2SE_OBJ_STALAC_LAND, &current.pos, 0, dComIfGp_getReverb(fopAcM_GetRoomNo(this)));
            daObjEff::Act_c::make_land_smoke(&current.pos, l_HIO.mEffectScale);
        }

        if(mpWaterPillar)
            init_modeMove();
        else
            init_modeDropEnd();
    }
}

/* 80D03984-80D03A48 0017C4 00C4+00 1/1 0/0 0/0 .text            init_modeDropEnd__10daSyRock_cFv */
void daSyRock_c::init_modeDropEnd() {
    if(!mAcch.ChkWaterIn()) {
        dComIfGp_getVibration().StartShock(l_HIO.mShockStrength, 0xF, cXyz(0.0f, 1.0f, 0.0f));
    }

    if(mpBgW)
        dComIfG_Bgsp().Regist(mpBgW, this);

    mUnbrokenCylinderCollider.OffAtSetBit();

    const u32 switchBitIndex = getSwBit1(); 
    dComIfGs_onSwitch(switchBitIndex, fopAcM_GetHomeRoomNo(this));

    mMode = MODE_DROP_END;
}

/* 80D03A48-80D03A4C 001888 0004+00 1/0 0/0 0/0 .text            modeDropEnd__10daSyRock_cFv */
void daSyRock_c::modeDropEnd() {
    /* empty function */
}

/* 80D03A4C-80D03B08 00188C 00BC+00 1/0 0/0 0/0 .text            Draw__10daSyRock_cFv */
int daSyRock_c::Draw() {
    g_env_light.settingTevStruct(0x10, fopAcM_GetPosition_p(this), &tevStr);
    g_env_light.setLightTevColorType_MAJI(mpModels[mIsUnbroken], &tevStr);
    
    dComIfGd_setListBG();
    mDoExt_modelUpdateDL(mpModels[mIsUnbroken]);
    dComIfGd_setList();

    return 1;
}

/* 80D03B08-80D03B70 001948 0068+00 1/0 0/0 0/0 .text            Delete__10daSyRock_cFv */
int daSyRock_c::Delete() {
    dComIfG_resDelete(&mPhase, "syourock");

    if(mpBrokenCollision && mpBrokenCollision->ChkUsed())
        dComIfG_Bgsp().Release(mpBrokenCollision);

    return 1;
}

/* 80D03B70-80D03B9C 0019B0 002C+00 1/0 0/0 0/0 .text            daSyRock_Draw__FP10daSyRock_c */
static int daSyRock_Draw(daSyRock_c* i_this) {
    return i_this->Draw();
    return 1;
}

/* 80D03B9C-80D03BBC 0019DC 0020+00 1/0 0/0 0/0 .text            daSyRock_Execute__FP10daSyRock_c */
static int daSyRock_Execute(daSyRock_c* i_this) {
    return i_this->MoveBGExecute();
}

/* 80D03BBC-80D03BDC 0019FC 0020+00 1/0 0/0 0/0 .text            daSyRock_Delete__FP10daSyRock_c */
static int daSyRock_Delete(daSyRock_c* i_this) {
    return i_this->MoveBGDelete();
}

/* 80D03BDC-80D03BFC 001A1C 0020+00 1/0 0/0 0/0 .text            daSyRock_Create__FP10fopAc_ac_c */
static int daSyRock_Create(fopAc_ac_c* i_this) {
    return static_cast<daSyRock_c*>(i_this)->create();
}

/* 80D04130-80D04150 -00001 0020+00 1/0 0/0 0/0 .data            l_daSyRock_Method */
static actor_method_class l_daSyRock_Method = {
    (process_method_func)daSyRock_Create,
    (process_method_func)daSyRock_Delete,
    (process_method_func)daSyRock_Execute,
    0,
    (process_method_func)daSyRock_Draw,
};

/* 80D04150-80D04180 -00001 0030+00 0/0 0/0 1/0 .data            g_profile_Obj_SyRock */
extern actor_process_profile_definition g_profile_Obj_SyRock = {
  fpcLy_CURRENT_e,        // mLayerID
  3,                      // mListID
  fpcPi_CURRENT_e,        // mListPrio
  PROC_Obj_SyRock,        // mProcName
  &g_fpcLf_Method.base,  // sub_method
  sizeof(daSyRock_c),     // mSize
  0,                      // mSizeOther
  0,                      // mParameters
  &g_fopAc_Method.base,   // sub_method
  515,                    // mPriority
  &l_daSyRock_Method,     // sub_method
  0x00040100,             // mStatus
  fopAc_ACTOR_e,          // mActorType
  fopAc_CULLBOX_CUSTOM_e, // cullType
};