/* SPDX-License-Identifier: GPL-3.0-or-later

 * Copyright © 2023-2026 The TokTok team.

 */

#include "events_alloc.h"

#include <assert.h>

#include <string.h>

#include "../attributes.h"

#include "../bin_pack.h"

#include "../bin_unpack.h"

#include "../ccompat.h"

#include "../mem.h"

#include "../tox.h"

#include "../tox_event.h"

#include "../tox_events.h"

#include "../tox_struct.h"

/*****************************************************

 *

 * :: struct and accessors

 *

 *****************************************************/

struct Tox_Event_Dht_Nodes_Response {

    uint8_t public_key[TOX_PUBLIC_KEY_SIZE];

    char *_Nullable ip;

    uint32_t ip_length;

    uint16_t port;

};

static bool tox_event_dht_nodes_response_set_public_key(Tox_Event_Dht_Nodes_Response *_Nonnull dht_nodes_response, const uint8_t public_key[TOX_PUBLIC_KEY_SIZE])

{

    assert(dht_nodes_response != nullptr);

    memcpy(dht_nodes_response->public_key, public_key, TOX_PUBLIC_KEY_SIZE);

    return true;

}

const uint8_t *tox_event_dht_nodes_response_get_public_key(const Tox_Event_Dht_Nodes_Response *dht_nodes_response)

{

    assert(dht_nodes_response != nullptr);

    return dht_nodes_response->public_key;

}

static bool tox_event_dht_nodes_response_set_ip(Tox_Event_Dht_Nodes_Response *_Nonnull dht_nodes_response,

        const Memory *_Nonnull mem, const char *_Nullable ip, uint32_t ip_length)

{

    assert(dht_nodes_response != nullptr);

    if (dht_nodes_response->ip != nullptr) {

        mem_delete(mem, dht_nodes_response->ip);

        dht_nodes_response->ip = nullptr;

        dht_nodes_response->ip_length = 0;

    }

    if (ip == nullptr) {

        assert(ip_length == 0);

        return true;

    }

    if (ip_length == UINT32_MAX) {

        return false;

    }

    char *ip_copy = (char *)mem_balloc(mem, ip_length + 1);

    if (ip_copy == nullptr) {

        return false;

    }

    memcpy(ip_copy, ip, ip_length);

    ip_copy[ip_length] = 0;

    dht_nodes_response->ip = ip_copy;

    dht_nodes_response->ip_length = ip_length;

    return true;

}

uint32_t tox_event_dht_nodes_response_get_ip_length(const Tox_Event_Dht_Nodes_Response *dht_nodes_response)

{

    assert(dht_nodes_response != nullptr);

    return dht_nodes_response->ip_length;

}

const char *tox_event_dht_nodes_response_get_ip(const Tox_Event_Dht_Nodes_Response *dht_nodes_response)

{

    assert(dht_nodes_response != nullptr);

    return dht_nodes_response->ip;

}

static void tox_event_dht_nodes_response_set_port(Tox_Event_Dht_Nodes_Response *_Nonnull dht_nodes_response, uint16_t port)

{

    assert(dht_nodes_response != nullptr);

    dht_nodes_response->port = port;

}

uint16_t tox_event_dht_nodes_response_get_port(const Tox_Event_Dht_Nodes_Response *dht_nodes_response)

{

    assert(dht_nodes_response != nullptr);

    return dht_nodes_response->port;

}

static void tox_event_dht_nodes_response_construct(Tox_Event_Dht_Nodes_Response *_Nonnull dht_nodes_response)

{

    *dht_nodes_response = (Tox_Event_Dht_Nodes_Response) {

        {

            0

        }

    };

}

static void tox_event_dht_nodes_response_destruct(Tox_Event_Dht_Nodes_Response *_Nonnull dht_nodes_response, const Memory *_Nonnull mem)

{

    mem_delete(mem, dht_nodes_response->ip);

}

bool tox_event_dht_nodes_response_pack(

    const Tox_Event_Dht_Nodes_Response *event, Bin_Pack *bp)

{

    return bin_pack_array(bp, 3)

           && bin_pack_bin(bp, event->public_key, TOX_PUBLIC_KEY_SIZE)

           && bin_pack_str(bp, event->ip, event->ip_length)

           && bin_pack_u16(bp, event->port);

}

static bool tox_event_dht_nodes_response_unpack_into(Tox_Event_Dht_Nodes_Response *_Nonnull event, Bin_Unpack *_Nonnull bu)

{

    assert(event != nullptr);

    if (!bin_unpack_array_fixed(bu, 3, nullptr)) {

        return false;

    }

    return bin_unpack_bin_fixed(bu, event->public_key, TOX_PUBLIC_KEY_SIZE)

           && bin_unpack_str(bu, &event->ip, &event->ip_length)

           && bin_unpack_u16(bu, &event->port);

}

/*****************************************************

 *

 * :: new/free/add/get/size/unpack

 *

 *****************************************************/

const Tox_Event_Dht_Nodes_Response *tox_event_get_dht_nodes_response(const Tox_Event *event)

{

    return event->type == TOX_EVENT_DHT_NODES_RESPONSE ? event->data.dht_nodes_response : nullptr;

}

Tox_Event_Dht_Nodes_Response *tox_event_dht_nodes_response_new(const Memory *mem)

{

    Tox_Event_Dht_Nodes_Response *const dht_nodes_response =

        (Tox_Event_Dht_Nodes_Response *)mem_alloc(mem, sizeof(Tox_Event_Dht_Nodes_Response));

    if (dht_nodes_response == nullptr) {

        return nullptr;

    }

    tox_event_dht_nodes_response_construct(dht_nodes_response);

    return dht_nodes_response;

}

void tox_event_dht_nodes_response_free(Tox_Event_Dht_Nodes_Response *dht_nodes_response, const Memory *mem)

{

    if (dht_nodes_response != nullptr) {

        tox_event_dht_nodes_response_destruct(dht_nodes_response, mem);

    }

    mem_delete(mem, dht_nodes_response);

}

static Tox_Event_Dht_Nodes_Response *_Nullable tox_events_add_dht_nodes_response(Tox_Events *_Nonnull events, const Memory *_Nonnull mem)

{

    Tox_Event_Dht_Nodes_Response *const dht_nodes_response = tox_event_dht_nodes_response_new(mem);

    if (dht_nodes_response == nullptr) {

        return nullptr;

    }

    Tox_Event event;

    event.type = TOX_EVENT_DHT_NODES_RESPONSE;

    event.data.dht_nodes_response = dht_nodes_response;

    if (!tox_events_add(events, &event)) {

        tox_event_dht_nodes_response_free(dht_nodes_response, mem);

        return nullptr;

    }

    return dht_nodes_response;

}

bool tox_event_dht_nodes_response_unpack(

    Tox_Event_Dht_Nodes_Response **event, Bin_Unpack *bu, const Memory *mem)

{

    assert(event != nullptr);

    assert(*event == nullptr);

    *event = tox_event_dht_nodes_response_new(mem);

    if (*event == nullptr) {

        return false;

    }

    return tox_event_dht_nodes_response_unpack_into(*event, bu);

}

static Tox_Event_Dht_Nodes_Response *_Nullable tox_event_dht_nodes_response_alloc(Tox_Events_State *_Nonnull state)

{

    if (state->events == nullptr) {

        return nullptr;

    }

    Tox_Event_Dht_Nodes_Response *dht_nodes_response = tox_events_add_dht_nodes_response(state->events, state->mem);

    if (dht_nodes_response == nullptr) {

        state->error = TOX_ERR_EVENTS_ITERATE_MALLOC;

        return nullptr;

    }

    return dht_nodes_response;

}

/*****************************************************

 *

 * :: event handler

 *

 *****************************************************/

void tox_events_handle_dht_nodes_response(

    Tox *tox,

    const uint8_t *public_key,

    const char *ip, uint32_t ip_length,

    uint16_t port,

    void *user_data)

{

    Tox_Events_State *state = tox_events_alloc(user_data);

    Tox_Event_Dht_Nodes_Response *dht_nodes_response = tox_event_dht_nodes_response_alloc(state);

    if (dht_nodes_response == nullptr) {

        return;

    }

    tox_event_dht_nodes_response_set_public_key(dht_nodes_response, public_key);

    if (!tox_event_dht_nodes_response_set_ip(dht_nodes_response, state->mem, ip, ip_length)) {

        tox_event_dht_nodes_response_free(dht_nodes_response, state->mem);

        state->error = TOX_ERR_EVENTS_ITERATE_MALLOC;

        return;

    }

    tox_event_dht_nodes_response_set_port(dht_nodes_response, port);

}

void tox_events_handle_dht_nodes_response_dispatch(Tox *tox, const Tox_Event_Dht_Nodes_Response *event, void *user_data)

{

    if (tox->dht_nodes_response_callback == nullptr) {

        return;

    }

    tox_unlock(tox);

    tox->dht_nodes_response_callback(tox, event->public_key, (const char *)event->ip, event->ip_length, event->port, user_data);

    tox_lock(tox);

}