#include "framework/framework.h"
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

typedef struct {
    const uint8_t *message;
    size_t length;
} RequestData;

static void on_friend_request(const Tox_Event_Friend_Request *event, void *user_data)
{
    ToxNode *self = (ToxNode *)user_data;
    Tox *tox = tox_node_get_tox(self);
    const RequestData *data = (const RequestData *)tox_node_get_script_ctx(self);

    const uint8_t *msg = tox_event_friend_request_get_message(event);
    size_t len = tox_event_friend_request_get_message_length(event);

    if (len == data->length && memcmp(msg, data->message, len) == 0) {
        tox_friend_add_norequest(tox, tox_event_friend_request_get_public_key(event), nullptr);
    }
}

static void alice_script(ToxNode *self, void *ctx)
{
    Tox *tox = tox_node_get_tox(self);
    RequestData *data = (RequestData *)ctx;

    WAIT_UNTIL(tox_node_is_self_connected(self));

    ToxNode *bob = tox_scenario_get_node(tox_node_get_scenario(self), 1);
    uint8_t bob_addr[TOX_ADDRESS_SIZE];
    tox_node_get_address(bob, bob_addr);

    tox_friend_add(tox, bob_addr, data->message, data->length, nullptr);

    WAIT_UNTIL(tox_node_is_friend_connected(self, 0));
}

static void bob_script(ToxNode *self, void *ctx)
{
    tox_events_callback_friend_request(tox_node_get_dispatch(self), on_friend_request);

    WAIT_UNTIL(tox_node_is_self_connected(self));
    WAIT_UNTIL(tox_node_is_friend_connected(self, 0));
}

static void test_with_message(int argc, char *argv[], const char *label, const uint8_t *message, size_t length)
{
    ToxScenario *s = tox_scenario_new(argc, argv, 60000);
    tox_scenario_log(s, "Testing friend request: %s (length %zu)", label, length);
    RequestData data = {message, length};

    ToxNode *alice = tox_scenario_add_node(s, "Alice", alice_script, &data, sizeof(RequestData));
    ToxNode *bob = tox_scenario_add_node(s, "Bob", bob_script, &data, sizeof(RequestData));

    tox_node_bootstrap(bob, alice);

    ToxScenarioStatus res = tox_scenario_run(s);
    if (res != TOX_SCENARIO_DONE) {
        tox_scenario_log(s, "Test failed with status %u", res);
        exit(1);
    }
    tox_scenario_free(s);
}

int main(int argc, char *argv[])
{
    test_with_message(argc, argv, "Short", (const uint8_t *)"a", 1);
    test_with_message(argc, argv, "Medium", (const uint8_t *)"Hello, let\'s be friends!", 24);

    uint8_t long_msg[TOX_MAX_FRIEND_REQUEST_LENGTH];
    memset(long_msg, 'F', sizeof(long_msg));
    test_with_message(argc, argv, "Max length", long_msg, sizeof(long_msg));

    return 0;
}