/*
 *  The Mana World
 *  Copyright 2004 The Mana World Development Team
 *
 *  This file is part of The Mana World.
 *
 *  The Mana World is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  any later version.
 *
 *  The Mana World is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with The Mana World; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
 *  $Id$
 */

#include "char_server.h"
#include "../graphic/graphic.h"
#include "button.h"
#include "window.h"
#include "scrollarea.h"
#include "listbox.h"
#include "ok_dialog.h"

char server[30];
int showServerList = 1;


ServerSelectDialog::ServerSelectDialog():
    Window("Select Server")
{
    serverListModel = new ServerListModel();
    serverList = new ListBox(serverListModel);
    scrollArea = new ScrollArea(serverList);
    okButton = new Button("OK");
    cancelButton = new Button("Cancel");

    setSize(200, 100);

    cancelButton->setPosition(
            200 - cancelButton->getWidth() - 5,
            100 - cancelButton->getHeight() - 5);
    okButton->setPosition(
            cancelButton->getX() - okButton->getWidth() - 5,
            100 - okButton->getHeight() - 5);
    scrollArea->setDimension(gcn::Rectangle(
                5, 5, 200 - 2 * 5,
                100 - 3 * 5 - cancelButton->getHeight() -
                scrollArea->getBorderSize()));

    serverList->setEventId("ok");
    okButton->setEventId("ok");
    cancelButton->setEventId("cancel");

    serverList->addActionListener(this);
    okButton->addActionListener(this);
    cancelButton->addActionListener(this);

    add(scrollArea);
    add(okButton);
    add(cancelButton);

    if (n_server == 0) {
        // Disable Ok button
        //okButton->char_server_dialog[2].flags |= D_DISABLED;
    } else {
        // Select first server
        serverList->setSelected(1);
    }

    setLocationRelativeTo(getParent());
}

ServerSelectDialog::~ServerSelectDialog()
{
    delete serverList;
    delete serverListModel;
    delete scrollArea;
    delete okButton;
    delete cancelButton;
}

void ServerSelectDialog::action(const std::string& eventId)
{
    if (eventId == "ok") {
        server_char_server(serverList->getSelected());
    }
    else if (eventId == "cancel") {
    }
    showServerList = 0;
}


int ServerListModel::getNumberOfElements() {
    return n_server;
}

std::string ServerListModel::getElementAt(int i) {
    static char buffer[30];
    sprintf(buffer, "%s (%i)", server_info[i].name,
            server_info[i].online_users);
    return buffer;
}


void char_server() {
    ServerSelectDialog *dialog = new ServerSelectDialog();

    state = LOGIN;

    showServerList = 1;
    while (showServerList) {
        blit(login_wallpaper, buffer, 0, 0, 0, 0, 800, 600);
        gui->update();
        blit(buffer, screen, 0, 0, 0, 0, 800, 600);
    }

    delete dialog;
}

void server_char_server(int serverIndex) {
    int ret;
    state = LOGIN;

    // Connect to char server
    ret = open_session(iptostring(server_info[serverIndex].address),
            server_info[serverIndex].port);
    if (ret == SOCKET_ERROR) {
        new OkDialog("Error", "Unable to connect to char server");
        return;
    }

    // Send login infos
    WFIFOW(0) = net_w_value(0x0065);
    WFIFOL(2) = net_l_value(account_ID);
    WFIFOL(6) = net_l_value(session_ID1);
    WFIFOL(10) = net_l_value(session_ID2);
    WFIFOW(14) = 0;
    WFIFOB(16) = net_b_value(sex);
    WFIFOSET(17);

    while ((in_size<4)||(out_size>0))flush();
    RFIFOSKIP(4);

    while (in_size<3)flush();

    if (RFIFOW(0) == 0x006b) {
        while(in_size < RFIFOW(2))flush();
        n_character = (RFIFOW(2) - 24) / 106;
        char_info = (PLAYER_INFO *)malloc(sizeof(PLAYER_INFO) * n_character);
        for (int i = 0; i < n_character; i++) {
            int n = 24 + 106 * i;
            char_info[i].id = RFIFOL(n);
            strcpy(char_info[i].name, RFIFOP(n + 74));
            char_info[i].hp = RFIFOW( n+ 42);
            char_info[i].max_hp = RFIFOW(n + 44);
            char_info[i].xp = RFIFOL(n + 4);
            char_info[i].gp = RFIFOL(n + 8);
            char_info[i].job_xp = RFIFOL(n + 12);
            char_info[i].job_lv = RFIFOL(n + 16);
            char_info[i].sp = RFIFOW(n + 46);
            char_info[i].max_sp = RFIFOW(n + 48);
            char_info[i].lv = RFIFOW(n + 58);
            char_info[i].STR = RFIFOB(n + 98);
            char_info[i].AGI = RFIFOB(n + 99);
            char_info[i].VIT = RFIFOB(n + 100);
            char_info[i].INT = RFIFOB(n + 101);
            char_info[i].DEX = RFIFOB(n + 102);
            char_info[i].LUK = RFIFOB(n + 103);
            char_info[i].hair_style = RFIFOW(n + 54);
            char_info[i].hair_color = RFIFOW(n + 70);
            char_info[i].weapon = RFIFOW(n + 56);
        }
        state = CHAR_SELECT;

        log("CharServer", "Player: %s (Packet ID: %x, Length: %d",
                char_info->name, RFIFOW(0), RFIFOW(2));


        RFIFOSKIP(RFIFOW(2));
    }
    else if (RFIFOW(0) == 0x006c) {
        std::string errorStr;
        switch (RFIFOB(2)) {
            case 0: errorStr = "Access denied"; break;
            case 1: errorStr = "Cannot use this ID"; break;
            default: errorStr = "Rejected from server"; break;
        }
        new OkDialog("Error", errorStr);
        RFIFOSKIP(3);
        close_session();
    } else {
        new OkDialog("Error", "Unknown error");
    }
    // Todo: add other packets
}