#include <string.h>
#include <unistd.h>

#include <ncurses.h>

#include "log.h"
#include "windows.h"
#include "jabber.h"

#define AWAIT_COMMAND 1
#define START_MAIN 2
#define QUIT_PROF 3

static void main_event_loop(void);
static int handle_pre_command(char *cmd);

void start_profanity(void)
{
    int cmd_result = AWAIT_COMMAND;
    char cmd[50];

    while (cmd_result == AWAIT_COMMAND) {
        inp_get_command_str(cmd);
        cmd_result = handle_pre_command(cmd);
    }

    if (cmd_result == START_MAIN) {
        main_event_loop();
    }
}

static int handle_pre_command(char *cmd)
{
    int result;

    if (strcmp(cmd, "/quit") == 0) {
        result = QUIT_PROF;
    } else if (strncmp(cmd, "/help", 5) == 0) {
        cons_help();
        inp_clear();
        result = AWAIT_COMMAND;
    } else if (strncmp(cmd, "/connect ", 9) == 0) {
        char *user;
        user = strndup(cmd+9, strlen(cmd)-9);

        inp_bar_print_message("Enter password:");
        char passwd[20];
        inp_get_password(passwd);

        inp_bar_print_message(user);
        jabber_connect(user, passwd);
        result = START_MAIN;
    } else {
        cons_bad_command(cmd);
        inp_clear();
        result = AWAIT_COMMAND;
    }

    return result;
}

static void main_event_loop(void)
{
    inp_non_block();

    while(TRUE) {
        int ch = ERR;
        char command[100];
        int size = 0;

        // while not enter, process all events, and try to get another char
        while(ch != '\n') {
            usleep(1);
        
            // handle incoming messages
            jabber_process_events();

            // determine if they changed windows
            if (ch == KEY_F(1)) {
                switch_to(0);
            } else if (ch == KEY_F(2)) {
                switch_to(1);
            } else if (ch == KEY_F(3)) {
                switch_to(2);
            } else if (ch == KEY_F(4)) {
                switch_to(3);
            } else if (ch == KEY_F(5)) {
                switch_to(4);
            } else if (ch == KEY_F(6)) {
                switch_to(5);
            } else if (ch == KEY_F(7)) {
                switch_to(6);
            } else if (ch == KEY_F(8)) {
                switch_to(7);
            } else if (ch == KEY_F(9)) {
                switch_to(8);
            } else if (ch == KEY_F(10)) {
                switch_to(9);
            }

            // get another character from the command box
            inp_poll_char(&ch, command, &size);
        }

        // null terminate the input    
        command[size++] = '\0';

        // deal with input

        // /quit command -> exit
        if (strcmp(command, "/quit") == 0) {
            break;

        // /help -> print help to console
        } else if (strncmp(command, "/help", 5) == 0) {
            cons_help();
            inp_clear();

        // /who -> request roster
        } else if (strncmp(command, "/who", 4) == 0) {
            jabber_roster_request();
            inp_clear();

        // /msg -> send message to a user
        } else if (strncmp(command, "/msg ", 5) == 0) {
            char *usr_msg = NULL;
            char *usr = NULL;
            char *msg = NULL;
            
            usr_msg = strndup(command+5, strlen(command)-5);
            usr = strtok(usr_msg, " ");
            if (usr != NULL) {
                msg = strndup(command+5+strlen(usr)+1, strlen(command)-(5+strlen(usr)+1));
                if (msg != NULL) {
                    jabber_send(msg, usr);
                    show_outgoing_msg("me", usr, msg);
                }
            }
            inp_clear();

        // /close -> close the current chat window, if in chat
        } else if (strncmp(command, "/close", 6) == 0) {
            if (in_chat()) {
                close_win();
            } else {
                cons_bad_command(command);
            }
            inp_clear();

        // send message to recipient, if in chat
        } else {
            if (in_chat()) {
                char recipient[100] = "";
                get_recipient(recipient);
                jabber_send(command, recipient);
                show_outgoing_msg("me", recipient, command);
            } else {
                cons_bad_command(command);
            }
            inp_clear();
        }
    }

    jabber_disconnect();
}