/**
 * d_a_player_swim.inc
 *
 * Code relating to swimming.
 * 
 * This file is not a standalone translation unit and is instead directly 
 * included into d_a_player_main.cpp.
 * 
 * The original name of this file is not known, but a best guess was taken 
 * based on the original names of the functions it contains.
 */

#include "d/dolzel.h" // IWYU pragma: keep
#include "d/actor/d_a_player_main.h"
#include "d/actor/d_a_player_HIO.h"
#include "f_op/f_op_kankyo_mng.h"

/* 8013CC64-8013CF2C       .text setSpeedAndAngleSwim__9daPy_lk_cFv */
void daPy_lk_c::setSpeedAndAngleSwim() {
    f32 fVar1;
    s16 oldAngleY;

    BOOL bVar3 = false;

    if (mCurProc != daPyProc_SWIM_UP_e) {
        if (!checkAttentionLock()) {
            if (mStickDistance > 0.05f) {
                oldAngleY = shape_angle.y;

                if (getDirectionFromShapeAngle() == DIR_BACKWARD) {
                    mSwimTailEcallBack[0].onEnd();
                    mSwimTailEcallBack[1].onEnd();

                    shape_angle.y = m34E8;
                    current.angle.y = m34E8;
                }
                else {
                    cLib_addCalcAngleS(&shape_angle.y, m34E8, m_HIO->mSwim.m.field_0x8, m_HIO->mSwim.m.field_0x4, m_HIO->mSwim.m.field_0x6);     
                }

                fVar1 = mStickDistance * 3.0f * cM_scos(shape_angle.y - oldAngleY);
            }
            else {
                fVar1 = 0.0f;
            }

            cLib_addCalcAngleS(&current.angle.y, shape_angle.y, 2, 0x2000, 0x1000);

            mMaxNormalSpeed = m_HIO->mSwim.m.field_0xC;
        }
        else {
            setShapeAngleToAtnActor();

            if (mStickDistance > 0.05f) {
                oldAngleY = current.angle.y;

                if (getDirectionFromCurrentAngle() == DIR_BACKWARD) {
                    mSwimTailEcallBack[0].onEnd();
                    mSwimTailEcallBack[1].onEnd();

                    fVar1 = 0.0f;
                    bVar3 = TRUE;
                }
                else {
                    cLib_addCalcAngleS(&current.angle.y, m34E8, m_HIO->mSwim.m.field_0x8, m_HIO->mSwim.m.field_0x4, m_HIO->mSwim.m.field_0x6);
                    fVar1 = mStickDistance * 3.0f * cM_scos(current.angle.y - oldAngleY);
                }
            }
            else {
                fVar1 = 0.0f;
            }
            
            mMaxNormalSpeed = ((cM_scos(current.angle.y - shape_angle.y) + 1.0f) * 0.25f + 0.5f) * m_HIO->mSwim.m.field_0xC;
        }
    }
    else {
        fVar1 = 0.0f;
        mMaxNormalSpeed = m_HIO->mSwim.m.field_0xC;
    }

    setNormalSpeedF(fVar1, m_HIO->mSwim.m.field_0x18, m_HIO->mSwim.m.field_0x1C, m_HIO->mSwim.m.field_0x20);

    if (bVar3 && mNormalSpeed < 5.0f) {
        current.angle.y = m34E8;
        mNormalSpeed = 0.0f;
    }
    if (dComIfGp_checkPlayerStatus0(0, daPyStts0_UNK10_e)) {
        mNormalSpeed = 0.0f;
    }
}

/* 8013CF2C-8013CFC0       .text checkNextModeSwim__9daPy_lk_cFv */
BOOL daPy_lk_c::checkNextModeSwim() {
    BOOL res;

    if (mpAttnEntryA && mpAttnEntryA->mType == fopAc_Attn_TYPE_SHIP_e) {
        dComIfGp_setDoStatus(dActStts_GET_IN_SHIP_e);
        if (doTrigger()) { 
            return procShipReady_init();
        }
    }

    if (setTalkStatus() && doTrigger()) {
        res = fopAcM_orderTalkEvent(this, mpAttnActorA);
    }
    else {
        res = FALSE;
    }
    return res;
}

/* 8013CFC0-8013D1B0       .text changeSwimProc__9daPy_lk_cFv */
BOOL daPy_lk_c::changeSwimProc() {
    BOOL res;
    cXyz local_18;
    
    if (
        checkNoResetFlg0(daPyFlg0_UNK80) &&
        !checkModeFlg(ModeFlg_IN_SHIP | ModeFlg_SWIM) &&
#if VERSION > VERSION_DEMO
        !checkNoControll() &&
#endif
        mDemo.getDemoMode() != daPy_demo_c::DEMO_PFALL_e &&
        mWaterY - current.pos.y > m_HIO->mSwim.m.field_0x24
    ) {
        dComIfGp_setItemTimeCount(900);
        dComIfGp_setItemTimeMax(900);

        offNoResetFlg0(daPyFlg0_EQUIP_HEAVY_BOOTS);
        offNoResetFlg1(daPyFlg1_EQUIP_DRAGON_SHIELD);

        endFlameDamageEmitter();

        offNoResetFlg0(daPyFlg0_UNK100);

        mMaxNormalSpeed = m_HIO->mSwim.m.field_0xC;
        mNormalSpeed *= 0.75f;

        if (mNormalSpeed >= mMaxNormalSpeed) {
          mNormalSpeed = mMaxNormalSpeed;
        }

        m35C4 = 0.0f;

        setSwimTimerStartStop();
        
        if (checkModeFlg(ModeFlg_MIDAIR)) {
            current.pos.y += m_HIO->mSwim.m.field_0x24;
            speed.y = mOldSpeed.y * m_HIO->mSwim.m.field_0x10;

            if (speed.y < m_HIO->mSwim.m.field_0x14) {
                speed.y = m_HIO->mSwim.m.field_0x14;
            }
            else if (speed.y > 0.0f) {
                speed.y = 0.0f;
            }

            f32 oldSpeedY = mOldSpeed.y * mOldSpeed.y * 0.0004f + 0.2f;

            if (oldSpeedY > 1.0f) {
                oldSpeedY = 1.0f;
            }

            local_18.x = current.pos.x;
            local_18.y = mWaterY;
            local_18.z = current.pos.z;
            fopKyM_createWpillar(&local_18, 1.0f, oldSpeedY, 0);
            seStartOnlyReverb(JA_SE_LK_INTO_WATER);
            res = procSwimWait_init(FALSE);
        }
        else {
            res = procSwimUp_init(FALSE);
        }
    }
    else {
        res = 0;
    }
    return res;
}

/* 8013D1B0-8013D2AC       .text changeSwimUpProc__9daPy_lk_cFv */
BOOL daPy_lk_c::changeSwimUpProc() {
    if (speed.y < m_HIO->mSwim.m.field_0x68) {
        speed.y += m_HIO->mSwim.m.field_0x64;
        if (speed.y > m_HIO->mSwim.m.field_0x68) {
            speed.y = m_HIO->mSwim.m.field_0x68;
        }
        if (speed.y > 0.0f && mEquipItem != daPyItem_NONE_e) {
            deleteEquipItem(TRUE);
        }
    }
    if (mWaterY - current.pos.y < 40.1f + m_HIO->mSwim.m.field_0x28 && speed.y >= 0.0f) {
        if (mCurProc == daPyProc_DEMO_DEAD_e) {
            onNoResetFlg0(daPyFlg0_UNK100);
            current.pos.y = mWaterY;
            return TRUE;
        }
        return procSwimUp_init(TRUE);
    }
    return FALSE;
}

/* 8013D2AC-8013D314       .text swimOutAfter__9daPy_lk_cFi */
void daPy_lk_c::swimOutAfter(BOOL param_1) {
    onNoResetFlg0(daPyFlg0_UNK100);
    m35C4 = 0.0f;
    if (param_1) {
        seStartOnlyReverb(JA_SE_LK_OUTOF_WATER);
    }
    dComIfGp_clearItemTimeCount();
    resetPriTextureAnime();
}

/* 8013D314-8013D354       .text checkSwimFallCheck__9daPy_lk_cFv */
BOOL daPy_lk_c::checkSwimFallCheck() {
    if (!checkNoResetFlg0(daPyFlg0_UNK80) || (current.pos.y > mWaterY + 30.1f && !dPa_control_c::isStatus(1))) {
        return TRUE;
    }
    return FALSE;
}

/* 8013D354-8013D530       .text changeSwimOutProc__9daPy_lk_cFv */
BOOL daPy_lk_c::changeSwimOutProc() {
    cM3dGPla* pcVar1;
    
    if (mAcch.GetGroundH() != -G_CM3D_F_INF && dComIfG_Bgsp()->ChkPolySafe(mAcch.m_gnd)) {
        pcVar1 = dComIfG_Bgsp()->GetTriPla(mAcch.m_gnd);   
    }
    else {
        pcVar1 = NULL;
    }

    if (checkSwimFallCheck()) {
        if (mCurProc == daPyProc_SWIM_MOVE_e && mDirection != DIR_FORWARD) {
            current.pos.y += m35C4;
        }

        swimOutAfter(TRUE);

        return procFall_init(1, m_HIO->mWallCatch.m.field_0x54);
    }

    if (!checkNoResetFlg0(daPyFlg0_UNK80) || (pcVar1 && cBgW_CheckBGround(pcVar1->GetNP()->y) && mWaterY - mAcch.GetGroundH() < m_HIO->mSwim.m.field_0x24 - 5.0f)) {
        current.pos.y = mWaterY;

        if (mCurProc == daPyProc_SWIM_MOVE_e && mDirection != DIR_FORWARD) {
            current.pos.y += m35C4;
        }

        swimOutAfter(TRUE);

        return checkNextMode(0);
    }

    if (dComIfGp_getItemTimeCount() <= 0 && startRestartRoom(5, 0xC9, -1.0f, 0)) {
        voiceStart(0x21);
        mFrameCtrlUnder[UNDER_MOVE0_e].setRate(0.0f);
        onNoResetFlg1(daPyFlg1_UNK40000000);
    }
    return FALSE;
}

/* 8013D530-8013D638       .text setSwimMoveAnime__9daPy_lk_cFQ29daPy_lk_c8daPy_ANM */
void daPy_lk_c::setSwimMoveAnime(daPy_ANM swimMoveAnm) {
    f32 endFrame = mFrameCtrlUnder[UNDER_MOVE0_e].getFrame() * mFrameCtrlUnder[UNDER_MOVE0_e].getEnd();
    setSingleMoveAnime(
        swimMoveAnm,
        (std::fabsf(mNormalSpeed) * (m_HIO->mSwim.m.field_0x54 - m_HIO->mSwim.m.field_0x50) / mMaxNormalSpeed) +
            m_HIO->mSwim.m.field_0x50 +
            (getSwimTimerRate() * m_HIO->mSwim.m.field_0x74),
        0.0f,
        -1,
        m_HIO->mSwim.m.field_0x58
    );
    mFrameCtrlUnder[UNDER_MOVE0_e].setFrame(endFrame * mFrameCtrlUnder[UNDER_MOVE0_e].getEnd());
    mAnmRatioUnder[UNDER_MOVE0_e].getAnmTransform()->setFrame(mFrameCtrlUnder[UNDER_MOVE0_e].getFrame());
}

/* 8013D638-8013D6B8       .text getSwimTimerRate__9daPy_lk_cFv */
f32 daPy_lk_c::getSwimTimerRate() {
    f32 swimTimerRate;
    if (dComIfGp_getItemSwimTimerStatus() && !dComIfGp_event_runCheck()) {
        swimTimerRate = (1.0f - dComIfGp_getItemTimeCount() * 0.0011111111f);
    }
    else {
        if (dComIfGp_getItemTimeCount() <= 0) {
            swimTimerRate = 1.0f;
        }
        else {
            swimTimerRate = 0.0f;
        }
    }
    return swimTimerRate;
}

/* 8013D6B8-8013D814       .text setSwimTimerStartStop__9daPy_lk_cFv */
void daPy_lk_c::setSwimTimerStartStop() {
    f32 target = 0.0f;

    if (mAcch.GetGroundH() <= mWaterY - 175.0f) {
        dComIfGp_startItemSwimTimer();

        if (checkNoResetFlg0(daPyFlg0_UNK100)) {
            f32 swimTimerRate = getSwimTimerRate();

            if (swimTimerRate > 0.5f) {
                target = cM_fcos((1.0f - swimTimerRate) * M_PI) * -m_HIO->mSwim.m.field_0x78;

                if (mFrameCtrlUnder[UNDER_MOVE0_e].checkPass(0.0f) && mCurProc != daPyProc_SWIM_UP_e) {
                    if (mProcVar6.m3570 && !checkNoResetFlg0(daPyFlg0_UNK4000)) {
                        voiceStart(0x22);
                        mProcVar6.m3570 = 0;
                    }
                    else {
                        mProcVar6.m3570 = 1;
                    }
                }
            }
        }
    }
    else {
        dComIfGp_setItemTimeCount(900);
        dComIfGp_stopItemSwimTimer();
    }

    cLib_chaseF(&m3608, target, 3.0f);
}

/* 8013D814-8013DA18       .text procSwimUp_init__9daPy_lk_cFi */
BOOL daPy_lk_c::procSwimUp_init(BOOL param_1) {
    JPABaseEmitter* emitter;
    
    static JGeometry::TVec3<f32> splash_scale(0.4f, 0.4f, 0.4f);
    static JGeometry::TVec3<f32> ripple_scale(0.3f, 0.3f, 0.3f);

    commonProcInit(daPyProc_SWIM_UP_e);

    gravity = 0.0f;
    speed.y = 0.0f;

    current.pos.y = mWaterY;

    setSingleMoveAnime(ANM_SWIMP, m_HIO->mSwim.m.field_0x2C, m_HIO->mSwim.m.field_0x30, m_HIO->mSwim.m.field_0x0, m_HIO->mSwim.m.field_0x38);

    dComIfGp_setPlayerStatus0(0, daPyStts0_SWIM_e);

    m35C4 = m_HIO->mSwim.m.field_0x3C;

    onNoResetFlg0(daPyFlg0_UNK100);

    if (param_1) {
        emitter = dComIfGp_particle_setP1(dPa_name::ID_IT_JN_WP_SHIBUKI, &current.pos);

        if (emitter) {
            emitter->setRate(15.0f);
            emitter->setGlobalDynamicsScale(splash_scale);
            emitter->setGlobalParticleScale(splash_scale);
        }

        emitter = dComIfGp_particle_setShipTail(dPa_name::ID_IT_JN_WP_HAMON01, &current.pos, NULL, NULL, 0xFF, &dPa_control_c::mSingleRippleEcallBack);
        
        if (emitter) {
            emitter->setGlobalDynamicsScale(ripple_scale);
            emitter->setGlobalParticleScale(ripple_scale);
        }
    }

    mProcVar6.m3570 = 0;
    return TRUE;
}

/* 8013DA18-8013DB24       .text procSwimUp__9daPy_lk_cFv */
BOOL daPy_lk_c::procSwimUp() {
    J3DFrameCtrl& frameCtrl = mFrameCtrlUnder[UNDER_MOVE0_e];

    setSpeedAndAngleSwim();

    if (!changeSwimOutProc()) {
        if (frameCtrl.getRate() < 0.01f) {
            procSwimWait_init(FALSE);
        }
        else {
            if (frameCtrl.getFrame() > m_HIO->mSwim.m.field_0x34) {
                if (mStickDistance > 0.05f) {
                    procSwimMove_init(FALSE);
                }
            }
            else {
                if (frameCtrl.checkPass(4.0f)) {
                    voiceStart(0x1A);
                    seStartOnlyReverb(JA_SE_LK_WALK_IN_WATER);
                    seStartOnlyReverb(JA_SE_LK_SWIM);
                }
                else {
                    m35C4 = m_HIO->mSwim.m.field_0x3C;
                    current.pos.y = mWaterY;
                }
            }
        }
    }
    setSwimTimerStartStop();
    return TRUE;
}

/* 8013DB24-8013DCDC       .text procSwimWait_init__9daPy_lk_cFi */
BOOL daPy_lk_c::procSwimWait_init(BOOL param_1) {
    f32 fVar2;
    
    J3DFrameCtrl& frameCtrl = mFrameCtrlUnder[UNDER_MOVE0_e];

    commonProcInit(daPyProc_SWIM_WAIT_e);

    if (param_1) {
        fVar2 = frameCtrl.getFrame() / (f32)frameCtrl.getEnd();
        mNormalSpeed = speedF * (1.0f - m_HIO->mSwim.m.field_0x60) + speedF * std::fabsf(cM_fcos(fVar2 * M_PI)) * m_HIO->mSwim.m.field_0x60;
    }
    else {
        fVar2 = 0.0f;
    }

    gravity = 0.0f;
    setSingleMoveAnime(ANM_SWIMWAIT, (f32)(getSwimTimerRate() * m_HIO->mSwim.m.field_0x70) + m_HIO->mSwim.m.field_0x40, 0.0f, -1, m_HIO->mSwim.m.field_0x44);
    frameCtrl.setFrame(fVar2 * frameCtrl.getEnd());
    mAnmRatioUnder[UNDER_MOVE0_e].getAnmTransform()->setFrame(frameCtrl.getFrame());
    dComIfGp_setPlayerStatus0(0, daPyStts0_SWIM_e);

    if (checkNoResetFlg0(daPyFlg0_UNK100)) {
        if (mEquipItem != daPyItem_NONE_e) {
            deleteEquipItem(TRUE);
        }
        current.pos.y = mWaterY;
        speed.y = 0.0f;
    }

    m35C4 = m_HIO->mSwim.m.field_0x48;
    mProcVar2.m34D4 = 0;
    mProcVar6.m3570 = 0;
    return TRUE;
}

/* 8013DCDC-8013DE8C       .text procSwimWait__9daPy_lk_cFv */
BOOL daPy_lk_c::procSwimWait() {
    setSpeedAndAngleSwim();
    mProcVar2.m34D4 += (s16)((cM_rndF(0.3f) + 0.85f) * m_HIO->mSwim.m.field_0x2);
    m35C4 = cM_ssin(mProcVar2.m34D4) * m_HIO->mSwim.m.field_0x4C + m_HIO->mSwim.m.field_0x48;

    if (changeSwimOutProc()) {
        return TRUE;
    }

    if (!checkNoResetFlg0(daPyFlg0_UNK100)) {
        if (changeSwimUpProc()) {
            return TRUE;
        }
    }
    else {
        current.pos.y = mWaterY;
    }

    if (checkNextModeSwim()) {
        return TRUE;
    }

    if (dComIfGp_checkPlayerStatus0(0, daPyStts0_UNK10_e)) {
        fopAc_ac_c* talkEventPartner = fopAcM_getTalkEventPartner(this);
        if (talkEventPartner) {
            cLib_addCalcAngleS(
                &shape_angle.y,
                cLib_targetAngleY(&current.pos, &talkEventPartner->eyePos),
                m_HIO->mTurn.m.field_0x6,
                m_HIO->mTurn.m.field_0x8,
                m_HIO->mTurn.m.field_0xA
            );
            current.angle.y = shape_angle.y;
        }
    }

    mFrameCtrlUnder[UNDER_MOVE0_e].setRate((getSwimTimerRate() * m_HIO->mSwim.m.field_0x70) + m_HIO->mSwim.m.field_0x40);

    if (mStickDistance > 0.05f) {
        procSwimMove_init(TRUE);
    }

    setSwimTimerStartStop();

    return TRUE;
}

/* 8013DE8C-8013DF60       .text procSwimMove_init__9daPy_lk_cFi */
BOOL daPy_lk_c::procSwimMove_init(BOOL param_1) {
    commonProcInit(daPyProc_SWIM_MOVE_e);

    if (!param_1) {
        mFrameCtrlUnder[UNDER_MOVE0_e].setFrame(0.0f);
    }

    gravity = 0.0f;

    setSwimMoveAnime(ANM_SWIMING);

    mDirection = DIR_FORWARD;

    if (checkNoResetFlg0(daPyFlg0_UNK100)) {
        if (mEquipItem != daPyItem_NONE_e) {
            deleteEquipItem(TRUE);
        }

        current.pos.y = mWaterY;
        speed.y = 0.0f;

        setSwimTail();
    }

    dComIfGp_setPlayerStatus0(0, daPyStts0_SWIM_e);

    m35C4 = m_HIO->mSwim.m.field_0x5C;
    mProcVar6.m3570 = 0;

    return TRUE;
}

/* 8013DF60-8013E250       .text procSwimMove__9daPy_lk_cFv */
BOOL daPy_lk_c::procSwimMove() {
    daPy_ANM anm;

    setSpeedAndAngleSwim();

    J3DFrameCtrl& frameCtrl = mFrameCtrlUnder[UNDER_MOVE0_e];

    int direction;
    if (!checkAttentionLock()) {
        direction = DIR_FORWARD;
    }
    else if (mStickDistance > 0.05f) {
        direction = getDirectionFromShapeAngle();
    }
    else {
        direction = DIR_FORWARD;
    }

    if (mDirection != direction) {
        mDirection = direction;
        f32 fVar1 = m35C4;

        if (mDirection == DIR_FORWARD) {
            anm = ANM_SWIMING;
            m35C4 = m_HIO->mSwim.m.field_0x5C;
        }
        else {
            m35C4 = -80.0f;

            if (mDirection == DIR_LEFT) {
                anm = ANM_ATNDLS;
            }
            else if (mDirection == DIR_RIGHT) {
                anm = ANM_ATNDRS;
            }
            else {
                anm = ANM_ATNWB;
            } 
        }

        m_old_fdata->getOldFrameTransInfo(0)->mTranslate.y -= m35C4 - fVar1;
        setSwimMoveAnime(anm);

        if (mDirection != DIR_FORWARD) {
            setTextureAnime(3, 0);
            onModeFlg(ModeFlg_00000100);
            offModeFlg(ModeFlg_00000400);
            mpSeAnmFrameCtrl = NULL;
        }
        else {
            offModeFlg(ModeFlg_00000100);
            onModeFlg(ModeFlg_00000400);
        }
    }
    else {
        frameCtrl.setRate((std::fabsf(mNormalSpeed) * (m_HIO->mSwim.m.field_0x54 - m_HIO->mSwim.m.field_0x50)) / mMaxNormalSpeed + m_HIO->mSwim.m.field_0x50 + (f32)(getSwimTimerRate() * m_HIO->mSwim.m.field_0x74));
    }

    if (mDirection == DIR_BACKWARD) {
        frameCtrl.setRate(frameCtrl.getRate() * 0.5f);
    }

    if (changeSwimOutProc()) {
        return TRUE;
    }

    if (!checkNoResetFlg0(daPyFlg0_UNK100)) {
        if (changeSwimUpProc()) {
            return TRUE;
        }
    }
    else {
        current.pos.y = mWaterY;
        setSwimTail();
    }

    if (checkNextModeSwim()) {
        return TRUE;
    }

    if (changeFrontWallTypeProc()) {
        swimOutAfter(TRUE);
        return TRUE;
    }

    if (mStickDistance <= 0.05f) {
        procSwimWait_init(TRUE);
    }
    else if ((mDirection == DIR_FORWARD && frameCtrl.checkPass(20.0f)) || (mDirection != DIR_FORWARD && frameCtrl.checkPass(0.0f))) {
        seStartOnlyReverb(JA_SE_LK_SWIM);
    }

    setSwimTimerStartStop();

    return TRUE;
}