/**
 * d_a_no_chg_room.cpp
 *
 */

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

#include "d/actor/d_a_no_chg_room.h"
#include "d/d_s_room.h"
#include "d/actor/d_a_horse.h"
#include "d/actor/d_a_spinner.h"

static bool isLoadRoom(int i_roomNo) {
    roomRead_class* room = dComIfGp_getStageRoom();

    if (room != NULL && room->num > i_roomNo) {
        int load_room_index;
        int num;
        u8* data;

        num = room->m_entries[i_roomNo]->num;
        data = room->m_entries[i_roomNo]->m_rooms;

        for (int i = 0; i < num; i++) {
            load_room_index = dStage_roomRead_dt_c_GetLoadRoomIndex(data[i]);
            if (dComIfGp_roomControl_checkStatusFlag(load_room_index, 2)) {
                // "Room <%d> loading!\n"
                OS_REPORT("部屋<%d>読み込み中！\n", load_room_index);
                return false;
            }

            if (dComIfGp_roomControl_checkStatusFlag(load_room_index, 9) == (u32)TRUE) {
                room_of_scene_class* roomScene = (room_of_scene_class*)fopScnM_SearchByID(
                    dStage_roomControl_c::getStatusProcID(load_room_index));
                JUT_ASSERT(0, roomScene != NULL);

                if (roomScene->field_0x1d4 >= 0 || !fpcNd_IsDeleteTiming(&roomScene->base)) {
                    // "Room <%d> objects loading!\n"
                    OS_REPORT("部屋<%d>オブジェクト読み込み中！\n", load_room_index);
                    return false;
                }
            }
        }
    }

    return true;
}

int daNocrm_c::execute() {
    daPy_py_c* player_p = daPy_getPlayerActorClass();
    cXyz cur_player_pos(player_p->current.pos);

    if (player_p->checkHorseRide()) {
        cur_player_pos.y = dComIfGp_getHorseActor()->current.pos.y;
    } else if (player_p->checkSpinnerRide()) {
        daSpinner_c* spinner_actor = player_p->getSpinnerActor();

        if (spinner_actor != NULL) {
            cur_player_pos.y = spinner_actor->current.pos.y;
        }
    }

    cXyz sp14;
    mDoMtx_multVec(mInvMtx, &cur_player_pos, &sp14);

    if (sp14.y < 0.0f || sp14.y > scale.y || fabsf(sp14.x) > scale.x || fabsf(sp14.z) > scale.z)
    {
        if (argument == 0 || !mRoomLoading ||
            dStage_stagInfo_GetSTType(dComIfGp_getStage()->getStagInfo()) != 0)
        {
            return 1;
        }

        if (isLoadRoom(getRoomNo(sp14.z < 0.0f ? 0 : 1))) {
            mRoomLoading = false;
            return 1;
        }

        sp14.z = sp14.z < 0.0f ? -scale.z : scale.z;

        cXyz new_player_pos;
        mDoMtx_multVec(mMtx, &sp14, &new_player_pos);

        daPy_getLinkPlayerActorClass()->setPlayerPosAndAngle(&new_player_pos,
                                                             player_p->shape_angle.y, 1);
    }

    if (argument == 0) {
        dStage_roomControl_c::setRoomReadId(getReadRoomId());
    } else {
        dStage_roomControl_c::onNoChangeRoom();
        mRoomLoading = true;
    }

    return 1;
}

int daNocrm_c::getRoomNo(int param_0) {
    if (mRoomNo[param_0] < 0) {
        f32 z_offset = param_0 ? -scale.z : scale.z;

        cXyz offset(0.0f, scale.y, z_offset);
        cXyz check_pos;
        mDoMtx_multVec(mMtx, &offset, &check_pos);

        bool groundHit = fopAcM_gc_c::gndCheck(&check_pos);
        JUT_ASSERT(0, groundHit);

        int roomNo = fopAcM_gc_c::getRoomId();
        JUT_ASSERT(0, 0 <= roomNo && roomNo < 64);

        mRoomNo[param_0] = roomNo;
    }

    return mRoomNo[param_0];
}

int daNocrm_c::create() {
    if (argument == 0 && getReadRoomId() < 0) {
        // "Room Load Rectangle: Load ID is -1, so destroy self!\n"
        OSReport_Warning("部屋読み込み矩形：読み込みＩＤが−１ですので、自滅します！\n");
        return cPhs_ERROR_e;
    }

    mDoMtx_stack_c::transS(current.pos.x, current.pos.y, current.pos.z);
    mDoMtx_stack_c::YrotM(shape_angle.y);
    cMtx_copy(mDoMtx_stack_c::get(), mMtx);
    cMtx_inverse(mDoMtx_stack_c::get(), mInvMtx);

    scale *= getScaleType() ? 1000.0f : 100.0f;
    mRoomNo[0] = -1;
    mRoomNo[1] = -1;
    return cPhs_COMPLEATE_e;
}

static int daNocrm_create(daNocrm_c* i_this) {
    fopAcM_ct(i_this, daNocrm_c);
    return i_this->create();
}

static int daNocrm_Delete(daNocrm_c* i_this) {
    return 1;
}

static int daNocrm_execute(daNocrm_c* i_this) {
    return i_this->execute();
}

static int daNocrm_draw(daNocrm_c* i_this) {
    return 1;
}

static actor_method_class daNocrm_METHODS = {
    (process_method_func)daNocrm_create,  (process_method_func)daNocrm_Delete,
    (process_method_func)daNocrm_execute, (process_method_func)NULL,
    (process_method_func)daNocrm_draw,
};

actor_process_profile_definition g_profile_NO_CHG_ROOM = {
    /* Layer ID     */ fpcLy_CURRENT_e,
    /* List ID      */ 2,
    /* List Prio    */ fpcPi_CURRENT_e,
    /* Proc Name    */ fpcNm_NO_CHG_ROOM_e,
    /* Proc SubMtd  */ &g_fpcLf_Method.base,
    /* Size         */ sizeof(daNocrm_c),
    /* Size Other   */ 0,
    /* Parameters   */ 0,
    /* Leaf SubMtd  */ &g_fopAc_Method.base,
    /* Draw Prio    */ fpcDwPi_NO_CHG_ROOM_e,
    /* Actor SubMtd */ &daNocrm_METHODS,
    /* Status       */ fopAcStts_UNK_0x40000_e | fopAcStts_NOPAUSE_e,
    /* Group        */ fopAc_UNK_GROUP_5_e,
    /* Cull Type    */ fopAc_CULLBOX_0_e,
};