#include <stdio.h>
#include <string.h>

#define MAX_PARAMS 15
#define MAX_MESSAGE 512

char *g_messages[] = {
    "NOTICE AUTH :*** Processing connection to irc.servercentral.net\r\n"
    "PING :irc.servercentral.net \r\n",
    ":irc.servercentral.net 372 {manpage} :- -  \r\n",
    ":irc.servercentral.net 376 {manpage} :End of /MOTD command.\r\n",
    ":{manpage}!~bot@d23-16-195-6.bchsia.telus.net JOIN :#c-test\r\n",
    ":irc.servercentral.net 353 {manpage} = #c-test :{manpage} tofu1\r\n",
    ":irc.servercentral.net 366 {manpage} #c-test :End of /NAMES list.\r\n",
    ":tofu1!~tofu@rootstorm.com PRIVMSG #c-test :test\r\n",
    ":tofu1!~tofu@rootstorm.com PRIVMSG {manpage} :message test\r\n",
    ":tofu1!~tofu@rootstorm.com PRIVMSG {manpage} :PING 1590092030 937335\r\n",
    ":tofu1!~tofu@rootstorm.com PRIVMSG {manpage} :VERSION\r\n",
    NULL,
};

typedef struct _IRC_MESSAGE_FIELDS
{
    char *message;
    char *trailing;
    char *prefix;
    char *command;
    char *params[MAX_PARAMS + 1];
} IRC_MESSAGE_FIELDS;

void *ParseMessage(char *str, IRC_MESSAGE_FIELDS *msg);
void *ParsePrefix(char *str, IRC_MESSAGE_FIELDS *msg);
void *ParseCommand(char *str, IRC_MESSAGE_FIELDS *msg);
void *ParseParams(char *str, IRC_MESSAGE_FIELDS *msg);

int main(int argc, char **argv)
{
    IRC_MESSAGE_FIELDS msg;
    char *no_prefix = strdup("PING :irc.servercentral.net \r\n");
    char *prefix = strdup("::dude\\!~man@fe80::2 PRIVMSG {manpage} :message test\r\n");

    // ParseMessage(no_prefix, &msg);
    ParseMessage(prefix, &msg);

    puts(msg.message);
    if (msg.prefix != NULL)
        printf("prefix: %s\n", msg.prefix);
    else
        printf("prefix: NULL\n");
    printf("command: %s\n", msg.command);

    printf("params: {\n");
    for (int i = 0; msg.params[i] != NULL; i++)
        printf("\t%s\n", msg.params[i]);
    printf("\t NULL\n }\n");

    printf("trailing: %s\n", msg.trailing);
    return 0;
}

// <message>  ::= [':' <prefix> <SPACE> ] <command> <params> <crlf>
void *ParseMessage(char *str, IRC_MESSAGE_FIELDS *msg)
{
    msg->message = strdup(str);

    if (str[0] == ':')
    {
        ParsePrefix(str, msg);
    }
    else // there was no prefix
    {
        msg->prefix = NULL;
        ParseCommand(str, msg);
    }
}

// <prefix>   ::= <servername> | <nick> [ '!' <user> ] [ '@' <host> ]
void *ParsePrefix(char *str, IRC_MESSAGE_FIELDS *msg)
{
    msg->prefix = strtok(str, " ") + 1; // truncate :
    ParseCommand(NULL, msg);
}

// <command>  ::= <letter> { <letter> } | <number> <number> <number>
void *ParseCommand(char *str, IRC_MESSAGE_FIELDS *msg)
{
    if (str == NULL)
    {
        msg->command = strtok(NULL, " ");
    }
    else // there was no prefix
    {
        msg->command = strtok(str, " ");
    }

    ParseParams(str, msg);
}

// <params>   ::= <SPACE> [ ':' <trailing> | <middle> <params> ]
void *ParseParams(char *str, IRC_MESSAGE_FIELDS *msg)
{
    int i = -1;

    do
    {
        i++;
        msg->params[i] = strtok(NULL, " ");
        char *contains_colon = strstr(msg->params[i], ":");
        if (contains_colon)
        {
            msg->params[i] = NULL;
            msg->trailing = (strstr(msg->message, contains_colon)) + 1; // truncate :
            break;
        }

    } while (msg->params[i] != NULL);
}