#include "../nfc_i.h"

#define NFC_SCENE_EMULATE_NFCV_LOG_SIZE_MAX (200)

enum {
    NfcSceneNfcVEmulateStateWidget,
    NfcSceneNfcVEmulateStateTextBox,
};

bool nfc_scene_nfcv_emulate_worker_callback(NfcWorkerEvent event, void* context) {
    furi_assert(context);
    Nfc* nfc = context;

    switch(event) {
    case NfcWorkerEventNfcVCommandExecuted:
        if(furi_hal_rtc_is_flag_set(FuriHalRtcFlagDebug)) {
            view_dispatcher_send_custom_event(nfc->view_dispatcher, NfcCustomEventUpdateLog);
        }
        break;
    case NfcWorkerEventNfcVContentChanged:
        view_dispatcher_send_custom_event(nfc->view_dispatcher, NfcCustomEventSaveShadow);
        break;
    default:
        break;
    }
    return true;
}

void nfc_scene_nfcv_emulate_widget_callback(GuiButtonType result, InputType type, void* context) {
    furi_assert(context);
    Nfc* nfc = context;
    if(type == InputTypeShort) {
        view_dispatcher_send_custom_event(nfc->view_dispatcher, result);
    }
}

void nfc_scene_nfcv_emulate_textbox_callback(void* context) {
    furi_assert(context);
    Nfc* nfc = context;
    view_dispatcher_send_custom_event(nfc->view_dispatcher, NfcCustomEventViewExit);
}

static void nfc_scene_nfcv_emulate_widget_config(Nfc* nfc, bool data_received) {
    FuriHalNfcDevData* data = &nfc->dev->dev_data.nfc_data;
    Widget* widget = nfc->widget;
    widget_reset(widget);
    FuriString* info_str;
    info_str = furi_string_alloc();

    widget_add_icon_element(widget, 0, 3, &I_NFC_dolphin_emulation_47x61);
    widget_add_string_multiline_element(
        widget, 87, 13, AlignCenter, AlignTop, FontPrimary, "Emulating\nNFC V");
    if(strcmp(nfc->dev->dev_name, "")) {
        furi_string_printf(info_str, "%s", nfc->dev->dev_name);
    } else {
        for(uint8_t i = 0; i < data->uid_len; i++) {
            furi_string_cat_printf(info_str, "%02X ", data->uid[i]);
        }
    }
    furi_string_trim(info_str);
    widget_add_text_box_element(
        widget, 52, 40, 70, 21, AlignCenter, AlignTop, furi_string_get_cstr(info_str), true);
    furi_string_free(info_str);
    if(data_received) {
        if(furi_hal_rtc_is_flag_set(FuriHalRtcFlagDebug)) {
            widget_add_button_element(
                widget, GuiButtonTypeCenter, "Log", nfc_scene_nfcv_emulate_widget_callback, nfc);
        }
    }
}

void nfc_scene_nfcv_emulate_on_enter(void* context) {
    Nfc* nfc = context;

    // Setup Widget
    nfc_scene_nfcv_emulate_widget_config(nfc, false);
    // Setup TextBox
    TextBox* text_box = nfc->text_box;
    text_box_set_font(text_box, TextBoxFontHex);
    text_box_set_focus(text_box, TextBoxFocusEnd);
    text_box_set_text(text_box, "");
    furi_string_reset(nfc->text_box_store);

    // Set Widget state and view
    scene_manager_set_scene_state(
        nfc->scene_manager, NfcSceneNfcVEmulate, NfcSceneNfcVEmulateStateWidget);
    view_dispatcher_switch_to_view(nfc->view_dispatcher, NfcViewWidget);
    // Start worker
    memset(&nfc->dev->dev_data.reader_data, 0, sizeof(NfcReaderRequestData));
    nfc_worker_start(
        nfc->worker,
        NfcWorkerStateNfcVEmulate,
        &nfc->dev->dev_data,
        nfc_scene_nfcv_emulate_worker_callback,
        nfc);

    nfc_blink_emulate_start(nfc);
}

bool nfc_scene_nfcv_emulate_on_event(void* context, SceneManagerEvent event) {
    Nfc* nfc = context;
    NfcVData* nfcv_data = &nfc->dev->dev_data.nfcv_data;
    uint32_t state = scene_manager_get_scene_state(nfc->scene_manager, NfcSceneNfcVEmulate);
    bool consumed = false;

    if(event.type == SceneManagerEventTypeCustom) {
        if(event.event == NfcCustomEventUpdateLog) {
            // Add data button to widget if data is received for the first time
            if(strlen(nfcv_data->last_command) > 0) {
                if(!furi_string_size(nfc->text_box_store)) {
                    nfc_scene_nfcv_emulate_widget_config(nfc, true);
                }
                /* use the last n bytes from the log so there's enough space for the new log entry */
                size_t maxSize =
                    NFC_SCENE_EMULATE_NFCV_LOG_SIZE_MAX - (strlen(nfcv_data->last_command) + 1);
                if(furi_string_size(nfc->text_box_store) >= maxSize) {
                    furi_string_right(nfc->text_box_store, (strlen(nfcv_data->last_command) + 1));
                }
                furi_string_cat_printf(nfc->text_box_store, "%s", nfcv_data->last_command);
                furi_string_push_back(nfc->text_box_store, '\n');
                text_box_set_text(nfc->text_box, furi_string_get_cstr(nfc->text_box_store));

                /* clear previously logged command */
                strcpy(nfcv_data->last_command, "");
            }
            consumed = true;
        } else if(event.event == NfcCustomEventSaveShadow) {
            if(furi_string_size(nfc->dev->load_path)) {
                nfc_device_save_shadow(nfc->dev, furi_string_get_cstr(nfc->dev->load_path));
            }
            consumed = true;
        } else if(event.event == GuiButtonTypeCenter && state == NfcSceneNfcVEmulateStateWidget) {
            if(furi_hal_rtc_is_flag_set(FuriHalRtcFlagDebug)) {
                view_dispatcher_switch_to_view(nfc->view_dispatcher, NfcViewTextBox);
                scene_manager_set_scene_state(
                    nfc->scene_manager, NfcSceneNfcVEmulate, NfcSceneNfcVEmulateStateTextBox);
            }
            consumed = true;
        } else if(event.event == NfcCustomEventViewExit && state == NfcSceneNfcVEmulateStateTextBox) {
            view_dispatcher_switch_to_view(nfc->view_dispatcher, NfcViewWidget);
            scene_manager_set_scene_state(
                nfc->scene_manager, NfcSceneNfcVEmulate, NfcSceneNfcVEmulateStateWidget);
            consumed = true;
        }
    } else if(event.type == SceneManagerEventTypeBack) {
        if(state == NfcSceneNfcVEmulateStateTextBox) {
            view_dispatcher_switch_to_view(nfc->view_dispatcher, NfcViewWidget);
            scene_manager_set_scene_state(
                nfc->scene_manager, NfcSceneNfcVEmulate, NfcSceneNfcVEmulateStateWidget);
            consumed = true;
        }
    }

    return consumed;
}

void nfc_scene_nfcv_emulate_on_exit(void* context) {
    Nfc* nfc = context;

    // Stop worker
    nfc_worker_stop(nfc->worker);

    // Clear view
    widget_reset(nfc->widget);
    text_box_reset(nfc->text_box);
    furi_string_reset(nfc->text_box_store);

    nfc_blink_stop(nfc);
}