/**
 * @file datarouter.c
 * @brief 数据路由库 —— 实现
 */

#include "datarouter.h"
#include <string.h>

#if defined(__GNUC__) || defined(__clang__)
#define DATAROUTER_WEAK __attribute__((weak))
#else
#define DATAROUTER_WEAK
#endif

#ifndef DATAROUTER_MAX_PORTS
#define DATAROUTER_MAX_PORTS 64
#endif

typedef struct {
    int                       send_type;
    int                       recv_type;
    datarouter_send_handler_t handlers[DATAROUTER_MAX_HANDLERS_PER_PORT];
    int                       count;
    uint8_t                   in_use;
} port_entry_t;

static port_entry_t ports[DATAROUTER_MAX_PORTS];
static uint8_t      initialized;

/* ---- 发送能力元数据 ---- */

static const char *send_names[] = {
#define DATAROUTER_SEND(id, desc) #id,
    DATAROUTER_SEND_CAPABILITIES
#undef DATAROUTER_SEND
};

static const char *send_descs[] = {
#define DATAROUTER_SEND(id, desc) desc,
    DATAROUTER_SEND_CAPABILITIES
#undef DATAROUTER_SEND
};

/* ---- 接收能力元数据 ---- */

static const char *recv_names[] = {
#define DATAROUTER_RECV(id, desc) #id,
    DATAROUTER_RECV_CAPABILITIES
#undef DATAROUTER_RECV
};

static const char *recv_descs[] = {
#define DATAROUTER_RECV(id, desc) desc,
    DATAROUTER_RECV_CAPABILITIES
#undef DATAROUTER_RECV
};

/* ---- 弱符号接收回调默认实现 ---- */

#define DATAROUTER_RECV(id, desc) \
    DATAROUTER_WEAK void datarouter_on_recv_##id( \
        uint32_t port_id, const void *data, size_t len) \
    { \
        (void)port_id; (void)data; (void)len; \
    }
DATAROUTER_RECV_CAPABILITIES
#undef DATAROUTER_RECV

/* ---- 发送触发函数实现 ---- */

#define DATAROUTER_SEND(id, desc) \
    int datarouter_send_##id(uint32_t port_id, const void *data, size_t len) \
    { \
        if (!initialized) return -1; \
        if (port_id >= DATAROUTER_MAX_PORTS || !ports[port_id].in_use) return -2; \
        if (ports[port_id].send_type != DATAROUTER_SEND_##id) return -3; \
        if (ports[port_id].count == 0) return -4; \
        for (int _i = 0; _i < ports[port_id].count; _i++) \
            ports[port_id].handlers[_i](port_id, data, len); \
        return 0; \
    }
DATAROUTER_SEND_CAPABILITIES
#undef DATAROUTER_SEND

/* ---- 端口管理 ---- */

void datarouter_init(void)
{
    if (initialized) return;
    memset(ports, 0, sizeof(ports));
    initialized = 1;
}

void datarouter_reset(void)
{
    initialized = 0;
    memset(ports, 0, sizeof(ports));
}

datarouter_port_t datarouter_port_create(void)
{
    if (!initialized) return DATAROUTER_INVALID_PORT;
    for (int i = 0; i < DATAROUTER_MAX_PORTS; i++) {
        if (!ports[i].in_use) {
            ports[i].in_use    = 1;
            ports[i].send_type = -1;
            ports[i].recv_type = -1;
            ports[i].count     = 0;
            return (datarouter_port_t)i;
        }
    }
    return DATAROUTER_INVALID_PORT;
}

void datarouter_port_delete(datarouter_port_t port)
{
    if (!initialized) return;
    if (port < 0 || port >= DATAROUTER_MAX_PORTS) return;
    ports[port].in_use = 0;
}

void datarouter_port_set_send_type(datarouter_port_t port, int cap_id)
{
    if (!initialized) return;
    if (port < 0 || port >= DATAROUTER_MAX_PORTS || !ports[port].in_use) return;
    ports[port].send_type = cap_id;
}

int datarouter_port_get_send_type(datarouter_port_t port)
{
    if (!initialized) return -1;
    if (port < 0 || port >= DATAROUTER_MAX_PORTS || !ports[port].in_use) return -1;
    return ports[port].send_type;
}

void datarouter_port_set_recv_type(datarouter_port_t port, int cap_id)
{
    if (!initialized) return;
    if (port < 0 || port >= DATAROUTER_MAX_PORTS || !ports[port].in_use) return;
    ports[port].recv_type = cap_id;
}

int datarouter_port_get_recv_type(datarouter_port_t port)
{
    if (!initialized) return -1;
    if (port < 0 || port >= DATAROUTER_MAX_PORTS || !ports[port].in_use) return -1;
    return ports[port].recv_type;
}

int datarouter_port_add_handler(datarouter_port_t port, datarouter_send_handler_t handler)
{
    if (!initialized) return -1;
    if (port < 0 || port >= DATAROUTER_MAX_PORTS || !ports[port].in_use) return -1;
    if (ports[port].count >= DATAROUTER_MAX_HANDLERS_PER_PORT) return -2;
    for (int i = 0; i < ports[port].count; i++)
        if (ports[port].handlers[i] == handler) return -3;
    ports[port].handlers[ports[port].count++] = handler;
    return 0;
}

int datarouter_port_remove_handler(datarouter_port_t port, datarouter_send_handler_t handler)
{
    if (!initialized) return -1;
    if (port < 0 || port >= DATAROUTER_MAX_PORTS || !ports[port].in_use) return -1;
    for (int i = 0; i < ports[port].count; i++) {
        if (ports[port].handlers[i] == handler) {
            ports[port].handlers[i] = ports[port].handlers[--ports[port].count];
            return 0;
        }
    }
    return -2;
}

void datarouter_port_clear_handlers(datarouter_port_t port)
{
    if (!initialized) return;
    if (port < 0 || port >= DATAROUTER_MAX_PORTS || !ports[port].in_use) return;
    ports[port].count = 0;
}

int datarouter_port_handler_count(datarouter_port_t port)
{
    if (!initialized) return -1;
    if (port < 0 || port >= DATAROUTER_MAX_PORTS || !ports[port].in_use) return -1;
    return ports[port].count;
}

/* ---- 元数据查询 ---- */

int datarouter_send_cap_count(void)
{
    return DATAROUTER_SEND_CAP_COUNT;
}

const char *datarouter_send_cap_name(int cap_id)
{
    if (cap_id < 0 || cap_id >= DATAROUTER_SEND_CAP_COUNT) return NULL;
    return send_names[cap_id];
}

const char *datarouter_send_cap_desc(int cap_id)
{
    if (cap_id < 0 || cap_id >= DATAROUTER_SEND_CAP_COUNT) return NULL;
    return send_descs[cap_id];
}

int datarouter_recv_cap_count(void)
{
    return DATAROUTER_RECV_CAP_COUNT;
}

const char *datarouter_recv_cap_name(int cap_id)
{
    if (cap_id < 0 || cap_id >= DATAROUTER_RECV_CAP_COUNT) return NULL;
    return recv_names[cap_id];
}

const char *datarouter_recv_cap_desc(int cap_id)
{
    if (cap_id < 0 || cap_id >= DATAROUTER_RECV_CAP_COUNT) return NULL;
    return recv_descs[cap_id];
}