/**
 * @file percy.c
 * @ingroup NPCs
 *
 * @brief Percy NPC
 */
#include "entity.h"
#include "item.h"
#include "kinstone.h"
#include "message.h"
#include "npc.h"
#include "save.h"
#include "script.h"
#include "common.h"
#include "asm.h"
#include "effects.h"
#include "flags.h"
#include "physics.h"

typedef struct {
    /*0x00*/ Entity base;
    /*0x68*/ u8 fusionOffer;
    /*0x69*/ u8 unused[27];
    /*0x84*/ ScriptExecutionContext* context;
} PercyEntity;

static const SpriteLoadData gUnk_08112E1C[] = {
    { 0x30f6, 0x47, 0x4 },
    { 0xf6, 0x47, 0x4 },
    { 0x1cf6, 0x47, 0x4 },
    { 0, 0, 0 },
};
void sub_0806B41C(PercyEntity*);
void sub_0806B3CC(Entity*);
void sub_0806B504(Entity*);
void sub_0806B540(Entity*);

extern u16* gUnk_08001A7C[40];

void Percy_Head(Entity* this) {
    SetExtraSpriteFrame(this, 0, (this->frameSpriteSettings & 0x3f) + 0x13);
    SetExtraSpriteFrame(this, 1, (this->frame & 0x7f) + 0xb);
    SetExtraSpriteFrame(this, 2, this->frameIndex);
    SetSpriteSubEntryOffsetData1(this, 2, 1);
    SetSpriteSubEntryOffsetData2(this, 2, 0);
    sub_0807000C(this);
}

void Percy(PercyEntity* this) {
    if ((super->flags & ENT_SCRIPTED) != 0) {
        sub_0806B41C(this);
    } else {
        sub_0806B3CC(super);
    }
}

void sub_0806B3CC(Entity* this) {
    if (this->action == 0) {
        if (!LoadExtraSpriteData(this, gUnk_08112E1C)) {
            return;
        }
        this->action = 1;
        InitializeAnimation(this, 0);
        AddInteractableWhenBigObject(this);
    }
    GetNextFrame(this);
    if (this->interactType != INTERACTION_NONE) {
        this->interactType = INTERACTION_NONE;
        MessageFromTarget(0);
    }
    sub_0806ED78(this);
}

void sub_0806B41C(PercyEntity* this) {
    u16* tmp;
    u32 idx;

    switch (super->action) {
        case 0:
            if (LoadExtraSpriteData(super, gUnk_08112E1C)) {
                super->action = 1;
                super->spriteSettings.draw = 1;
                if (super->type2 == 2) {
                    CreateFx(super, FX_SWEAT, 0);
                }
                InitScriptForNPC(super);
            }
            break;
        case 1:
            if (super->interactType == INTERACTION_FUSE) {
                super->action = 2;
                super->interactType = INTERACTION_NONE;
                InitializeAnimation(super,
                                    GetAnimationStateForDirection4(GetFacingDirection(super, &gPlayerEntity.base)) + 4);
                idx = GetFuserId(super);
                tmp = gUnk_08001A7C[idx];
                if (this->fusionOffer == 33)
                    tmp += 3;
                InitializeFuseInfo(super, tmp[0], tmp[1], tmp[2]);
                gPlayerState.controlMode = CONTROL_DISABLED;
            } else {
                ExecuteScriptAndHandleAnimation(super, NULL);
            }
            break;
        case 2:
            if (UpdateFuseInteraction(super)) {
                super->action = 1;
            }
            break;
    }
}

void sub_0806B4F0(Entity* this) {
    static const Dialog gUnk_08112E2C[5] = {
        { 0, 0, DIALOG_CALL_FUNC, 0, { .func = sub_0806B504 } },
        { 0, 0, DIALOG_NORMAL, 1, { 0, TEXT_INDEX(TEXT_PERCY, 0x12) } },
        { 0, 0, DIALOG_NORMAL, 1, { 0, TEXT_INDEX(TEXT_PERCY, 0x11) } },
        { 0, 0, DIALOG_NORMAL, 1, { 0, TEXT_INDEX(TEXT_FESTIVAL, 0x19) } },
        { 0, 0, DIALOG_CALL_FUNC, 0, { .func = sub_0806B540 } },
    };
    ShowNPCDialogue(this, &gUnk_08112E2C[this->type2]);
}

void sub_0806B504(Entity* this) {
    static const u16 messageIndices[4] = {
        TEXT_INDEX(TEXT_PERCY, 0x0c),
        TEXT_INDEX(TEXT_PERCY, 0x0d),
        TEXT_INDEX(TEXT_PERCY, 0x0e),
        TEXT_INDEX(TEXT_PERCY, 0x10),
    };
    int idx;

    idx = 1;
    if (CheckKinstoneFused(KINSTONE_21)) {
        idx = 3;
    } else if (!CheckLocalFlag(URO_POEMN_TALK)) {
        idx = 0;
        SetLocalFlag(URO_POEMN_TALK);
    }

    MessageNoOverlap(messageIndices[idx], this);
}

void sub_0806B540(Entity* this) {
    ScriptExecutionContext* context;

    context = ((PercyEntity*)this)->context;
    switch (context->unk_18) {
        case 0:
            MessageNoOverlap(TEXT_INDEX(TEXT_PERCY, 0x12), this);
            if (CheckLocalFlag(0x3f) != 0) {
                return;
            }
            context->unk_18++;
            SetLocalFlag(0x3f);
            break;
        case 1:
            if ((gMessage.state & MESSAGE_ACTIVE) == 0) {
                context->unk_18 = 2;
                MessageNoOverlap(TEXT_INDEX(TEXT_PERCY, 0x15), this);
            }
            break;
        case 2:
            if ((gMessage.state & MESSAGE_ACTIVE) == 0) {
                context->unk_18 = 3;
                if (gSave.stats.hasAllFigurines != 0) {
                    InitItemGetSequence(ITEM_RUPEE100, 0, 0);
                } else {
                    InitItemGetSequence(ITEM_SHELLS, 100, 0);
                }
                SetRoomFlag(0xf);
            }
            break;
        case 3:
            if ((gPlayerEntity.base.action != PLAYER_ITEMGET)) {
                context->wait = 0x2d;
                return;
            }
            break;
    }

    gActiveScriptInfo.commandSize = 0;
}

void Percy_MakeInteractable(PercyEntity* this) {
    this->fusionOffer = GetFusionToOffer(super);
    AddInteractableWhenBigFuser(super, this->fusionOffer);
}

void Percy_Fusion(Entity* this) {
    if (this->action == 0) {
        if (LoadExtraSpriteData(this, gUnk_08112E1C)) {
            this->action++;
            this->spriteSettings.draw = 1;
            InitializeAnimation(this, 2);
        }
    } else {
        GetNextFrame(this);
    }
}