VcardModule.cpp

Go to the documentation of this file.

#include "mod_vcard/VcardModule.h"
#include "mod_vcard/VcardWizard.h"
#include "mod_vcard/vcard_store.h"
#include "cdc_msg/MessageTransfer.h"
#include "serial_cmd/ICommandRegistry.h"
#include "serial_cmd/SubCommand.h"
#include "serial_cmd/Console.h"
#include "cdc_core/ModuleRegistry.h"
#include "cdc_core/EventBus.h"
#include "cdc_core/Raii.h"
#include "cdc_ui/BackupImport.h"
#include "cJSON.h"
#include "cdc_ui/I18n.h"
#include "cdc_ui/ViewStack.h"
#include "cdc_views/ListView.h"
#include "cdc_views/InfoView.h"
#include "cdc_views/ConfirmView.h"
#include "cdc_views/ContextMenuView.h"
#include "cdc_views/QRCodeView.h"
#include "esp_timer.h"
#include "cdc_views/ToastView.h"
#include "cdc_log.h"
#include "esp_attr.h"
#include "freertos/FreeRTOS.h"
#include "freertos/semphr.h"
#include <cstring>
#include <cstdio>
#include <cstdlib>
 
static const char* TAG = "VCARD";
 
namespace cdc::mod_vcard {
 
constexpr ui::I18nEntry kStrings[] = {
    {"mod_vcard.title",            "vCards"},          // 0  STR_VCARD
    {"mod_vcard.my_vcard",         "My vCard"},        // 1  STR_MY_VCARD
    {"mod_vcard.nearby",           "Nearby"},          // 2  STR_NEARBY
    {"mod_vcard.scan",             "Start Scan"},      // 3  STR_SCAN
    {"mod_vcard.stop_scan",        "Stop Scan"},       // 4  STR_STOP_SCAN
    {"mod_vcard.advertising",      "Start Advertising"},// 5 STR_ADVERTISING
    {"mod_vcard.stop_adv",         "Stop Advertising"},// 6  STR_STOP_ADV
    {"mod_vcard.exchange",         "Exchange"},        // 7  STR_EXCHANGE
    {"mod_vcard.no_peers",         "No peers found"},  // 8  STR_NO_PEERS
    {"mod_vcard.scanning",         "Scanning..."},     // 9  STR_SCANNING
    {"mod_vcard.exchange_req",     "Exchange Request"},// 10 STR_EXCHANGE_REQ
    {"mod_vcard.accept",           "Accept"},          // 11 STR_ACCEPT
    {"mod_vcard.decline",          "Decline"},         // 12 STR_DECLINE
    {"mod_vcard.exchange_ok",      "Exchange successful"},// 13 STR_EXCHANGE_OK
    {"mod_vcard.exchange_fail",    "Exchange failed"}, // 14 STR_EXCHANGE_FAIL
    {"mod_vcard.connecting",       "Connecting..."},   // 15 STR_CONNECTING
    {"mod_vcard.edit_my_vcard",    "Edit my vCard"},   // 16 STR_EDIT_MY_VCARD
    {"mod_vcard.no_vcard",         "No vCard set"},    // 17 STR_NO_VCARD
    {"mod_vcard.saved",            "Saved"},           // 18 STR_SAVED
    {"mod_vcard.given_name",       "First name"},      // 19 STR_GIVEN_NAME
    {"mod_vcard.family_name",      "Last name"},       // 20 STR_FAMILY_NAME
    {"mod_vcard.formatted_name",   "Display name"},    // 21 STR_FORMATTED_NAME
    {"mod_vcard.organization",     "Organization"},    // 22 STR_ORGANIZATION
    {"mod_vcard.position",         "Position"},        // 23 STR_POSITION
    {"mod_vcard.email",            "Email"},           // 24 STR_EMAIL
    {"mod_vcard.tel_cell",         "Phone (Mobile)"},  // 25 STR_TEL_CELL
    {"mod_vcard.tel_home",         "Phone (Home)"},    // 26 STR_TEL_HOME
    {"mod_vcard.tel_work",         "Phone (Work)"},    // 27 STR_TEL_WORK
    {"mod_vcard.url",              "Website"},         // 28 STR_URL
    {"mod_vcard.telegram",         "Telegram"},        // 29 STR_TELEGRAM
    {"mod_vcard.signal",           "Signal"},          // 30 STR_SIGNAL
    {"mod_vcard.matrix",           "Matrix"},          // 31 STR_MATRIX
    {"mod_vcard.threema",          "Threema"},         // 32 STR_THREEMA
    {"mod_vcard.social_profile",   "Social Profile"},  // 33 STR_SOCIAL_PROFILE
    {"mod_vcard.note",             "Note"},            // 34 STR_NOTE
    {"mod_vcard.send",             "Send vCard"},      // 35 STR_SEND
    {"mod_vcard.received",         "Contact (vCard)"}, // 36 STR_RECEIVED
    {"mod_vcard.received_title",   "Received vCards"}, // 37 STR_RECEIVED_TITLE
    {"mod_vcard.no_received",      "No received vCards"},// 38 STR_NO_RECEIVED
    {"mod_vcard.show_qr",          "Show QR"},         // 39 STR_SHOW_QR
    {"mod_vcard.forward",          "Forward"},         // 40 STR_FORWARD
    {"mod_vcard.confirm_delete",   "Delete this contact?"},// 41 STR_CONFIRM_DELETE
};
 
// Numeric offsets retained because VcardWizard takes an offset-array + resolver.
static constexpr uint16_t STR_VCARD = 0;
static constexpr uint16_t STR_MY_VCARD = 1;
static constexpr uint16_t STR_NEARBY = 2;
static constexpr uint16_t STR_SCAN = 3;
static constexpr uint16_t STR_STOP_SCAN = 4;
static constexpr uint16_t STR_ADVERTISING = 5;
static constexpr uint16_t STR_STOP_ADV = 6;
static constexpr uint16_t STR_EXCHANGE = 7;
static constexpr uint16_t STR_NO_PEERS = 8;
static constexpr uint16_t STR_SCANNING = 9;
static constexpr uint16_t STR_EXCHANGE_REQ = 10;
static constexpr uint16_t STR_ACCEPT = 11;
static constexpr uint16_t STR_DECLINE = 12;
static constexpr uint16_t STR_EXCHANGE_OK = 13;
static constexpr uint16_t STR_EXCHANGE_FAIL = 14;
static constexpr uint16_t STR_CONNECTING = 15;
static constexpr uint16_t STR_EDIT_MY_VCARD = 16;
static constexpr uint16_t STR_NO_VCARD = 17;
static constexpr uint16_t STR_SAVED = 18;
static constexpr uint16_t STR_GIVEN_NAME = 19;
static constexpr uint16_t STR_FAMILY_NAME = 20;
static constexpr uint16_t STR_FORMATTED_NAME = 21;
static constexpr uint16_t STR_ORGANIZATION = 22;
static constexpr uint16_t STR_POSITION = 23;
static constexpr uint16_t STR_EMAIL = 24;
static constexpr uint16_t STR_TEL_CELL = 25;
static constexpr uint16_t STR_TEL_HOME = 26;
static constexpr uint16_t STR_TEL_WORK = 27;
static constexpr uint16_t STR_URL = 28;
static constexpr uint16_t STR_TELEGRAM = 29;
static constexpr uint16_t STR_SIGNAL = 30;
static constexpr uint16_t STR_MATRIX = 31;
static constexpr uint16_t STR_THREEMA = 32;
static constexpr uint16_t STR_SOCIAL_PROFILE = 33;
static constexpr uint16_t STR_NOTE = 34;
static constexpr uint16_t STR_SEND = 35;
static constexpr uint16_t STR_RECEIVED = 36;
static constexpr uint16_t STR_RECEIVED_TITLE = 37;
static constexpr uint16_t STR_NO_RECEIVED = 38;
static constexpr uint16_t STR_SHOW_QR = 39;
static constexpr uint16_t STR_FORWARD = 40;
static constexpr uint16_t STR_CONFIRM_DELETE = 41;
 
static const uint16_t s_wizardStepOffsets[16] = {
    STR_GIVEN_NAME, STR_FAMILY_NAME, STR_FORMATTED_NAME, STR_ORGANIZATION,
    STR_POSITION, STR_EMAIL, STR_TEL_CELL, STR_TEL_HOME, STR_TEL_WORK,
    STR_URL, STR_TELEGRAM, STR_SIGNAL, STR_MATRIX, STR_THREEMA,
    STR_SOCIAL_PROFILE, STR_NOTE,
};
 
static const char* mstr(uint16_t offset) {
    if (offset >= std::size(kStrings)) return "?";
    return ui::tr(kStrings[offset].key);
}
 
static void registerStrings() {
    ui::I18n::instance().registerEnglishTable(kStrings, std::size(kStrings));
}

static ui::ListView s_mainMenu;
static bool s_viewsInitialized = false;

enum MainMenuItem {
    MENU_MY_VCARD = 0,
    MENU_EDIT_MY_VCARD,
    MENU_SEND,
    MENU_RECEIVED,
    MENU_COUNT
};
static ui::ListItem s_mainMenuItems[MENU_COUNT] = {};
 
// Received-contacts list view and its backing buffers (PSRAM).
static ui::ListView s_receivedMenu;
static bool s_receivedInitialized = false;
static EXT_RAM_BSS_ATTR ui::ListItem s_recvItems[VCARD_MAX_CARDS];
static EXT_RAM_BSS_ATTR char s_recvLabels[VCARD_MAX_CARDS][64];
static uint16_t s_recvSlots[VCARD_MAX_CARDS];
static uint16_t s_recvCount = 0;
// Slot the context menu / confirm dialog currently acts on.
static uint16_t s_activeSlot = 0;
 
static void rebuildMainMenu();
static void onMainMenuSelect(uint16_t index, void* userData);
static void openReceivedList();
static void rebuildReceivedList();
static void showVcardDetails(const char* title, const char* raw, bool withActions);
static void showVcardQr(const char* raw, const char* fallbackTitle);
static void onReceivedViewMenu(void* userData);

static bool deliverVcard(const uint8_t* data, uint32_t len, const char* /*mime*/,
                         const char* /*peerName*/) {
    if (!data || len == 0 || len > VCARD_MAX_LEN) return false;
    static EXT_RAM_BSS_ATTR char buf[VCARD_MAX_LEN + 1];
    memcpy(buf, data, len);
    buf[len] = '\0';
    char err[64] = {0};
    if (!vcard_store_add(buf, len, err, sizeof(err))) {
        LOG_W(TAG, "Failed to store received vCard: %s", err);
        return false;
    }
    return true;
}

static void showVcardDetails(const char* title, const char* raw, bool withActions) {
    static EXT_RAM_BSS_ATTR vcard_data_t s_parsed;
    static EXT_RAM_BSS_ATTR char s_text[ui::InfoView::MAX_TEXT_LEN];
 
    memset(&s_parsed, 0, sizeof(s_parsed));
    vcard_parse_to_struct(raw, &s_parsed);
 
    int n = 0;
    const int cap = static_cast<int>(sizeof(s_text));
    auto append = [&](const char* fmt, const char* a, const char* b) {
        if (n >= cap - 1) return;
        int w = snprintf(s_text + n, static_cast<size_t>(cap - n), fmt, a, b);
        if (w > 0) n += w;
        if (n > cap - 1) n = cap - 1;
    };
 
    if (s_parsed.formatted_name[0]) {
        append("%s%s\n\n", s_parsed.formatted_name, "");
    } else if (s_parsed.given_name[0] || s_parsed.family_name[0]) {
        append("%s %s\n\n", s_parsed.given_name, s_parsed.family_name);
    }
 
    auto field = [&](uint16_t label, const char* value) {
        if (value[0]) append("%s: %s\n", mstr(label), value);
    };
    field(STR_ORGANIZATION,   s_parsed.organization);
    field(STR_POSITION,       s_parsed.title);
    field(STR_EMAIL,          s_parsed.email);
    field(STR_TEL_CELL,       s_parsed.tel_cell);
    field(STR_TEL_HOME,       s_parsed.tel_home);
    field(STR_TEL_WORK,       s_parsed.tel_work);
    field(STR_URL,            s_parsed.url);
    field(STR_TELEGRAM,       s_parsed.impp_telegram);
    field(STR_SIGNAL,         s_parsed.impp_signal);
    field(STR_MATRIX,         s_parsed.impp_matrix);
    field(STR_THREEMA,        s_parsed.impp_threema);
    field(STR_SOCIAL_PROFILE, s_parsed.social_profile);
    field(STR_NOTE,           s_parsed.note);
 
    if (n == 0) snprintf(s_text, sizeof(s_text), "%s", raw);
 
    static ui::InfoView s_detailView;
    s_detailView.init(title, s_text);
    s_detailView.setOnMenu(withActions ? onReceivedViewMenu : nullptr);
    ui::ViewStack::instance().push(&s_detailView);
}

static void showVcardQr(const char* raw, const char* fallbackTitle) {
    static EXT_RAM_BSS_ATTR vcard_data_t s_parsed;
    static char s_qrTitle[96];
    static char s_qrSubtitle[96];
 
    memset(&s_parsed, 0, sizeof(s_parsed));
    vcard_parse_to_struct(raw, &s_parsed);
 
    if (s_parsed.formatted_name[0]) {
        snprintf(s_qrTitle, sizeof(s_qrTitle), "%s", s_parsed.formatted_name);
    } else if (s_parsed.given_name[0] || s_parsed.family_name[0]) {
        snprintf(s_qrTitle, sizeof(s_qrTitle), "%s %s",
                 s_parsed.given_name, s_parsed.family_name);
    } else {
        snprintf(s_qrTitle, sizeof(s_qrTitle), "%s", fallbackTitle);
    }
 
    const char* sub = s_parsed.organization[0] ? s_parsed.organization
                    : s_parsed.title[0]        ? s_parsed.title
                    : s_parsed.email[0]        ? s_parsed.email
                    : "";
    snprintf(s_qrSubtitle, sizeof(s_qrSubtitle), "%s", sub);
 
    ui::showQRCode(raw, s_qrTitle, s_qrSubtitle[0] ? s_qrSubtitle : nullptr);
}

static void rebuildMainMenu() {
    s_mainMenuItems[MENU_MY_VCARD]      = {mstr(STR_MY_VCARD),      0, false, nullptr};
    s_mainMenuItems[MENU_EDIT_MY_VCARD] = {mstr(STR_EDIT_MY_VCARD), 0, false, nullptr};
    s_mainMenuItems[MENU_SEND]          = {mstr(STR_SEND),          0, false, nullptr};
    s_mainMenuItems[MENU_RECEIVED]      = {mstr(STR_RECEIVED_TITLE), 0, false, nullptr};
    s_mainMenu.init(mstr(STR_VCARD), s_mainMenuItems, MENU_COUNT);
}

static void onMainMenuSelect(uint16_t index, void* userData) {
    (void)userData;
 
    switch (index) {
        case MENU_MY_VCARD: {
            static EXT_RAM_BSS_ATTR char vcardText[VCARD_MAX_LEN + 1];
            size_t len = vcard_store_get_own(vcardText, sizeof(vcardText));
            if (len > 0) {
                showVcardDetails(mstr(STR_MY_VCARD), vcardText, false);
            } else {
                ui::showToastInfo(mstr(STR_NO_VCARD));
            }
            break;
        }
 
        case MENU_EDIT_MY_VCARD:
            if (vcard_store_has_own()) {
                VcardWizard::edit(&s_mainMenu);
            } else {
                VcardWizard::start(&s_mainMenu);
            }
            break;
 
        case MENU_SEND: {
            // Push our own card to a nearby badge; the framework owns the peer
            // picker, consent, encryption and progress UI.
            static EXT_RAM_BSS_ATTR char own[VCARD_MAX_LEN + 1];
            size_t len = vcard_store_get_own(own, sizeof(own));
            if (len == 0) {
                ui::showToastInfo(mstr(STR_NO_VCARD));
                break;
            }
            cdc::msg::MessageTransfer::instance().beginInteractiveSend(
                "text/vcard", reinterpret_cast<const uint8_t*>(own),
                static_cast<uint32_t>(len));
            break;
        }
 
        case MENU_RECEIVED:
            openReceivedList();
            break;
    }
}
 
// ============================================================================
// Received contacts: list, detail, context menu (view / QR / forward / delete).
// ============================================================================

static void rebuildReceivedList() {
    s_recvCount = vcard_store_get_sorted(s_recvSlots, VCARD_MAX_CARDS);
    for (uint16_t i = 0; i < s_recvCount; i++) {
        uint16_t slot = s_recvSlots[i];
        if (!vcard_store_get_display(slot, s_recvLabels[i], sizeof(s_recvLabels[i]))) {
            s_recvLabels[i][0] = '\0';
        }
        s_recvItems[i] = {s_recvLabels[i], 0, false,
                          reinterpret_cast<void*>(static_cast<uintptr_t>(slot))};
    }
    s_receivedMenu.setEmptyText(mstr(STR_NO_RECEIVED));
    s_receivedMenu.init(mstr(STR_RECEIVED_TITLE), s_recvItems, s_recvCount);
}

static void onReceivedSelect(uint16_t index, void* userData) {
    (void)index;
    s_activeSlot = static_cast<uint16_t>(reinterpret_cast<uintptr_t>(userData));
    static EXT_RAM_BSS_ATTR char raw[VCARD_MAX_LEN + 1];
    if (vcard_store_get(s_activeSlot, raw, sizeof(raw)) == 0) return;
    showVcardDetails(mstr(STR_RECEIVED_TITLE), raw, true);
}

static void ctxReceivedAdd() {
    VcardWizard::startReceived(&s_receivedMenu, rebuildReceivedList);
}

static void ctxReceivedEdit() {
    VcardWizard::editReceived(&s_receivedMenu, s_activeSlot, rebuildReceivedList);
}

static void ctxReceivedQr() {
    static EXT_RAM_BSS_ATTR char raw[VCARD_MAX_LEN + 1];
    if (vcard_store_get(s_activeSlot, raw, sizeof(raw)) == 0) return;
    showVcardQr(raw, mstr(STR_RECEIVED_TITLE));
}

static void ctxReceivedForward() {
    static EXT_RAM_BSS_ATTR char raw[VCARD_MAX_LEN + 1];
    size_t len = vcard_store_get(s_activeSlot, raw, sizeof(raw));
    if (len == 0) return;
    cdc::msg::MessageTransfer::instance().beginInteractiveSend(
        "text/vcard", reinterpret_cast<const uint8_t*>(raw),
        static_cast<uint32_t>(len));
}

static void onReceivedDeleteConfirm(void* userData) {
    uint16_t slot = *static_cast<uint16_t*>(userData);
    if (vcard_store_delete(slot)) {
        ui::showToastSuccess(ui::tr("core.deleted"));
        s_receivedMenu.preservePosition();
        rebuildReceivedList();
        ui::ViewStack::instance().popToAnchor(&s_receivedMenu);
    } else {
        ui::showToastError(ui::tr("core.failed"));
    }
}

static void ctxReceivedDelete() {
    ui::showConfirm(mstr(STR_CONFIRM_DELETE), onReceivedDeleteConfirm, nullptr,
                    ui::ConfirmView::Icon::WARNING, &s_activeSlot);
}

static void onReceivedViewMenu(void* userData) {
    (void)userData;
    const ui::ContextMenuItem items[] = {
        {ui::tr("core.edit"),   ctxReceivedEdit},
        {mstr(STR_FORWARD),     ctxReceivedForward},
        {mstr(STR_SHOW_QR),     ctxReceivedQr},
        {ui::tr("core.delete"), ctxReceivedDelete},
    };
    ui::showContextMenu(ui::tr("core.actions"), items, 4);
}

static void onReceivedMenu(uint16_t index, void* userData) {
    (void)index;
    ui::ContextMenuItem items[4] = {};
    uint8_t n = 0;
    items[n++] = {ui::tr("core.add"), ctxReceivedAdd};
    if (s_recvCount > 0) {
        s_activeSlot = static_cast<uint16_t>(reinterpret_cast<uintptr_t>(userData));
        items[n++] = {ui::tr("core.edit"),   ctxReceivedEdit};
        items[n++] = {mstr(STR_FORWARD),     ctxReceivedForward};
        items[n++] = {ui::tr("core.delete"), ctxReceivedDelete};
    }
    ui::showContextMenu(ui::tr("core.actions"), items, n);
}

static void openReceivedList() {
    if (!s_receivedInitialized) {
        s_receivedMenu.setOnSelect(onReceivedSelect);
        s_receivedMenu.setOnMenu(onReceivedMenu);
        s_receivedInitialized = true;
    }
    rebuildReceivedList();
    ui::ViewStack::instance().push(&s_receivedMenu);
}
 
// ============================================================================
// Lock-screen quick action: show own vCard as a QR code.
// ============================================================================

static const char* getMyVcardLockscreenLabel() {
    return mstr(STR_MY_VCARD);
}

static void onMyVcardLockscreenSelect() {
    static EXT_RAM_BSS_ATTR char s_qrBuf[VCARD_MAX_LEN + 1];
    size_t len = vcard_store_get_own(s_qrBuf, sizeof(s_qrBuf));
    if (len == 0) {
        ui::showToastError(mstr(STR_NO_VCARD));
        return;
    }
    showVcardQr(s_qrBuf, mstr(STR_MY_VCARD));
}
 
// ============================================================================
// Serial Commands (VCARD_SET / VCARD_GET / VCARD_DELETE)
// ============================================================================
 
EXT_RAM_BSS_ATTR static char s_vcardBuf[VCARD_MAX_LEN + 64];
static int  s_vcardBufPos = 0;
static bool s_vcardInputMode = false;
// Paste target: -1 sets the own card, otherwise the received slot to overwrite.
static int  s_vcardSetSlot = -1;
static esp_timer_handle_t s_vcardIdleTimer = nullptr;
// Cancel a stalled paste session after this many seconds of inactivity so a
// crashed/interrupted client cannot lock the serial console forever.
static constexpr int64_t VCARD_IDLE_LIMIT_US = 30 * 1000000LL;
 
static void vcard_session_clear() {
    s_vcardInputMode = false;
    s_vcardBufPos = 0;
    s_vcardSetSlot = -1;
    memset(s_vcardBuf, 0, sizeof(s_vcardBuf));
    serial::getCommandRegistry().setLineInterceptor(nullptr);
    if (s_vcardIdleTimer) esp_timer_stop(s_vcardIdleTimer);
}
 
static void vcard_idle_fired(void*) {
    if (!s_vcardInputMode) return;
    serial::Console::printf("\r\nERROR: vCard paste timed out\r\n");
    vcard_session_clear();
    serial::Console::showPrompt();
}
 
static void vcard_arm_idle_timer() {
    if (!s_vcardIdleTimer) {
        esp_timer_create_args_t args = {
            .callback = vcard_idle_fired,
            .arg = nullptr,
            .dispatch_method = ESP_TIMER_TASK,
            .name = "vcard_idle",
            .skip_unhandled_events = true,
        };
        esp_timer_create(&args, &s_vcardIdleTimer);
    }
    esp_timer_stop(s_vcardIdleTimer);
    esp_timer_start_once(s_vcardIdleTimer, VCARD_IDLE_LIMIT_US);
}

static bool vcardLineInterceptor(const char* line) {
    if (!s_vcardInputMode) return false;
 
    using Console = serial::Console;
    vcard_arm_idle_timer();
 
    if (strncmp(line, "---", 3) == 0) {
        s_vcardBuf[s_vcardBufPos] = '\0';
 
        char err[64] = {};
        bool ok = (s_vcardSetSlot >= 0)
            ? vcard_store_update(static_cast<uint16_t>(s_vcardSetSlot), s_vcardBuf,
                                 static_cast<size_t>(s_vcardBufPos), err, sizeof(err))
            : vcard_store_set_own(s_vcardBuf, static_cast<size_t>(s_vcardBufPos), err, sizeof(err));
        if (ok) {
            Console::printf("OK: vCard updated\r\n");
        } else {
            Console::printf("ERROR: %s\r\n", err[0] ? err : "Invalid vCard");
        }
 
        vcard_session_clear();
        Console::showPrompt();
        return true;
    }
 
    if (strcmp(line, "ABORT") == 0 || strcmp(line, "VCARD_ABORT") == 0) {
        Console::printf("ABORTED\r\n");
        vcard_session_clear();
        Console::showPrompt();
        return true;
    }
 
    size_t lineLen = strlen(line);
    if (s_vcardBufPos + static_cast<int>(lineLen) + 2 < static_cast<int>(sizeof(s_vcardBuf))) {
        memcpy(s_vcardBuf + s_vcardBufPos, line, lineLen);
        s_vcardBufPos += static_cast<int>(lineLen);
        s_vcardBuf[s_vcardBufPos++] = '\n';
    } else {
        Console::printf("ERROR: vCard too large\r\n");
        vcard_session_clear();
        Console::showPrompt();
    }
    return true;
}

static void cmdVcardSet(const char* args) {
    using Console = serial::Console;
 
    s_vcardSetSlot = -1;
    if (args && *args) {
        int slot = atoi(args);
        char probe[2];
        if (slot < 0 || slot >= VCARD_MAX_CARDS ||
            !vcard_store_get_display(static_cast<uint16_t>(slot), probe, sizeof(probe))) {
            Console::printf("ERROR: no vCard at id %d\r\n", slot);
            return;
        }
        s_vcardSetSlot = slot;
    }
 
    Console::printf("Paste vCard 4.0, end with '---' on a new line "
                    "(or 'ABORT' to cancel):\r\n");
    s_vcardBufPos = 0;
    s_vcardInputMode = true;
    serial::getCommandRegistry().setLineInterceptor(vcardLineInterceptor);
    vcard_arm_idle_timer();
}

static void vcardPrintLines(char* out) {
    using Console = serial::Console;
    char* line = out;
    char* next;
    while ((next = strchr(line, '\n')) != nullptr) {
        *next = '\0';
        Console::printf("%s\r\n", line);
        line = next + 1;
    }
    if (*line) {
        Console::printf("%s\r\n", line);
    }
}

static void cmdVcardGet(const char* args) {
    using Console = serial::Console;
    char out[VCARD_MAX_LEN + 1];
 
    if (args && *args) {
        int slot = atoi(args);
        if (slot < 0 || slot >= VCARD_MAX_CARDS ||
            vcard_store_get(static_cast<uint16_t>(slot), out, sizeof(out)) == 0) {
            Console::printf("ERROR: no vCard at id %d\r\n", slot);
            return;
        }
        vcardPrintLines(out);
        return;
    }
 
    size_t len = vcard_store_get_own(out, sizeof(out));
    if (len == 0) {
        Console::printf("BEGIN:VCARD\r\n");
        Console::printf("VERSION:4.0\r\n");
        Console::printf("N:;;\r\n");
        Console::printf("FN:\r\n");
        Console::printf("NOTE:\r\n");
        Console::printf("TEL;TYPE=HOME:\r\n");
        Console::printf("TEL;TYPE=CELL:\r\n");
        Console::printf("TEL;TYPE=WORK:\r\n");
        Console::printf("EMAIL:\r\n");
        Console::printf("URL:\r\n");
        Console::printf("ORG:\r\n");
        Console::printf("TITLE:\r\n");
        Console::printf("X-SOCIALPROFILE:\r\n");
        Console::printf("IMPP:telegram:\r\n");
        Console::printf("IMPP:signal:\r\n");
        Console::printf("IMPP:matrix:\r\n");
        Console::printf("IMPP:threema:\r\n");
        Console::printf("END:VCARD\r\n");
        return;
    }
 
    vcardPrintLines(out);
}

static void cmdVcardList(const char* args) {
    (void)args;
    using Console = serial::Console;
 
    uint16_t slots[VCARD_MAX_CARDS];
    uint16_t count = vcard_store_get_sorted(slots, VCARD_MAX_CARDS);
    if (count == 0) {
        Console::printf("No received vCards\r\n");
        return;
    }
 
    char name[64];
    for (uint16_t i = 0; i < count; i++) {
        if (!vcard_store_get_display(slots[i], name, sizeof(name))) name[0] = '\0';
        Console::printf("%2u  %s\r\n", slots[i], name);
    }
}

static void cmdVcardDelete(const char* args) {
    using Console = serial::Console;
 
    if (args && *args) {
        int slot = atoi(args);
        if (slot < 0 || slot >= VCARD_MAX_CARDS ||
            !vcard_store_delete(static_cast<uint16_t>(slot))) {
            Console::printf("ERROR: no vCard at id %d\r\n", slot);
            return;
        }
        Console::printf("OK: vCard %d deleted\r\n", slot);
        return;
    }
 
    if (vcard_store_clear_own()) {
        Console::printf("OK: vCard deleted\r\n");
    } else {
        Console::printf("ERROR: Failed to delete vCard\r\n");
    }
}
 
static const serial::SubCommand kVcardSubs[] = {
    {"SET",    "[id]", "Set own vCard, or overwrite received vCard <id> (multiline paste, end with '---' or 'ABORT')", cmdVcardSet},
    {"GET",    "[id]", "Show own vCard, or received vCard <id>",                       cmdVcardGet},
    {"LIST",   "", "List received vCards",                                             cmdVcardList},
    {"DELETE", "[id]", "Delete own vCard, or received vCard <id>",                     cmdVcardDelete},
    {nullptr, nullptr, nullptr, nullptr},
};
 
static void cmdVcard(const char* args) {
    serial::dispatchSubCommand("VCARD", args, kVcardSubs);
}

static void registerSerialCommands() {
    auto& reg = serial::getCommandRegistry();
    reg.registerCommand({"VCARD",
                         "vCard storage: SET/GET/LIST/DELETE",
                         cmdVcard, "vcard", false, kVcardSubs});
}
 
// ============================================================================
// Module Implementation
// ============================================================================

VcardModule& VcardModule::instance() {
    static VcardModule inst;
    return inst;
}

bool VcardModule::init() {
    LOG_I(TAG, "Initializing vCard module");
    registerStrings();
    registerSerialCommands();
 
    VcardWizard::configure(mstr, s_wizardStepOffsets, STR_SAVED, STR_EXCHANGE_FAIL);
 
    // Register as the handler for incoming "text/vcard" message transfers.
    cdc::msg::MessageTransfer::instance().registerHandler(
        "text/vcard", "mod_vcard.received", deliverVcard);
 
    core::ModuleRegistry::instance().registerModule(this);
    state_ = core::ServiceState::INITIALIZED;
    return true;
}

bool VcardModule::start() {
    if (state_ != core::ServiceState::INITIALIZED && state_ != core::ServiceState::STOPPED) {
        return false;
    }
    state_ = core::ServiceState::STARTED;
    return true;
}

void VcardModule::stop() {
    cdc::msg::MessageTransfer::instance().unregisterHandler("text/vcard");
    state_ = core::ServiceState::STOPPED;
}

uint8_t VcardModule::getMenuItems(core::ModuleMenuItem* items, uint8_t maxItems) {
    if (!items || maxItems == 0) return 0;
 
    items[0] = {
        mstr(STR_VCARD),
        110,
        []() -> ui::IView* {
            if (!s_viewsInitialized) {
                s_mainMenu.setOnSelect(onMainMenuSelect);
                s_viewsInitialized = true;
            }
            rebuildMainMenu();
            return &s_mainMenu;
        },
        nullptr,
        getName(),
        core::MenuLocation::TOOLS_MENU,
        nullptr
    };
 
    return 1;
}

uint8_t VcardModule::getLockScreenContextItems(core::LockScreenContextItem* items, uint8_t maxItems) {
    if (!items || maxItems == 0) return 0;
    items[0] = {
        getMyVcardLockscreenLabel,
        onMyVcardLockscreenSelect,
        60,
        nullptr,
    };
    return 1;
}

void VcardModule::onTick(uint32_t nowMs) {
    (void)nowMs;
}

static constexpr int kSchemaVer = 1;

bool VcardModule::exportBackup(cJSON* out) {
    if (!out) return false;
 
    cJSON_AddNumberToObject(out, "schema_ver", kSchemaVer);
 
    bool any = false;
 
    char buf[VCARD_MAX_LEN + 1];
    if (vcard_store_get_own(buf, sizeof(buf)) > 0) {
        cJSON_AddStringToObject(out, "own", buf);
        any = true;
    }
 
    cJSON* received = cJSON_AddArrayToObject(out, "received");
    if (!received) return any;
 
    uint16_t slots[VCARD_MAX_CARDS];
    uint16_t count = vcard_store_get_sorted(slots, VCARD_MAX_CARDS);
    for (uint16_t i = 0; i < count; i++) {
        if (vcard_store_get(slots[i], buf, sizeof(buf)) == 0) continue;
        cJSON* item = cJSON_CreateString(buf);
        if (!item) continue;
        cJSON_AddItemToArray(received, item);
        any = true;
    }
 
    return any;
}

static bool importReceivedVcard(const cJSON* je, void* user) {
    (void)user;
    if (!cJSON_IsString(je) || !je->valuestring || je->valuestring[0] == '\0') return false;
 
    const char* text = je->valuestring;
    size_t len = strlen(text);
    char err[32] = {};
    if (vcard_store_add(text, len, err, sizeof(err))) return true;
 
    // An already-present card means the identity is satisfied (no-op upsert);
    // only genuine validation/storage failures count as failed.
    return vcard_store_contains(text, len);
}

core::IModule::BackupResult VcardModule::importBackup(const cJSON* in) {
    if (!in) return {};
 
    const cJSON* schemaVer = cJSON_GetObjectItemCaseSensitive(in, "schema_ver");
    if (cJSON_IsNumber(schemaVer) && static_cast<int>(schemaVer->valuedouble) != kSchemaVer) {
        LOG_W(TAG, "vCard backup schema_ver %d != expected %d, skipping",
              static_cast<int>(schemaVer->valuedouble), kSchemaVer);
        return {};
    }
 
    core::IModule::BackupResult result = {};
 
    const cJSON* own = cJSON_GetObjectItemCaseSensitive(in, "own");
    if (cJSON_IsString(own) && own->valuestring && own->valuestring[0] != '\0') {
        char err[32] = {};
        if (vcard_store_set_own(own->valuestring, strlen(own->valuestring), err, sizeof(err))) {
            result.imported++;
        } else {
            LOG_W(TAG, "vCard import: own vCard rejected (%s)", err);
            result.failed++;
        }
    }
 
    const cJSON* received = cJSON_GetObjectItemCaseSensitive(in, "received");
    core::IModule::BackupResult rx = cdc::ui::importJsonArray(received, importReceivedVcard, nullptr);
    result.imported = static_cast<uint16_t>(result.imported + rx.imported);
    result.failed = static_cast<uint16_t>(result.failed + rx.failed);
 
    return result;
}
 
} // namespace cdc::mod_vcard

extern "C" void mod_vcard_register() {
    cdc::core::ModuleRegistry::instance().registerInitializer([]() {
        auto& module = cdc::mod_vcard::VcardModule::instance();
        module.init();
    });
}