/*
 *  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
 */

#include "inventory.h"

DIALOG inventory_dialog[] = {
   /* (dialog proc)     (x)   (y)   (w)   (h)   (fg)  (bg)  (key) (flags)     (d1)                    (d2)  (dp)              (dp2) (dp3) */
   { tmw_dialog_proc,   300,  252,  322,   60,    0,  -1,    0,    0,          0,                      0,    (char*)"Inventory",         NULL, NULL  },
   { NULL,                0,    0,   0,     0,    0,   0,    0,    0,          0,                      0,              NULL,         NULL, NULL  },
};

DIALOG_PLAYER *inventory_player;

TmwInventory::TmwInventory()
{
    show_inventory = false;
}

TmwInventory::~TmwInventory()
{
}

void TmwInventory::create(int tempxpos, int tempypos) {
    itemset = load_datafile("./data/graphic/items.dat");

    for (int i = 0; i < INVENTORY_SIZE; i++) {
        items[i].id = -1; // if id is negative there's no item
        items[i].quantity = 0;
    }

    inventory_player = init_dialog(inventory_dialog, -1);
    position_dialog(inventory_dialog, x, y);

    show_inventory = false;
}

void TmwInventory::draw(BITMAP *buffer) {
    if (!show_inventory) return;

    dialog_message(inventory_dialog, MSG_DRAW, 0, 0);
    update_dialog(inventory_player);
    for (int i = 0; i < INVENTORY_SIZE; i++) {
        if (items[i].quantity > 0) {
            if (items[i].id >= 501 && items[i].id <= 511) {
                draw_rle_sprite(gui_bitmap,
                        (RLE_SPRITE *)itemset[items[i].id - 501].dat,
                        inventory_dialog[0].x + 24 * i,
                        inventory_dialog[0].y + 26);
            }
            //else
            //masked_blit((BITMAP *)itemset[0].dat, gui_bitmap, 0, 0, inventory_dialog[0].x+24*i, inventory_dialog[0].y+26, 22, 22);

            textprintf_ex(gui_bitmap, font, inventory_dialog[0].x + 24 * i,
                    inventory_dialog[0].y + 44, makecol(0, 0, 0), -1,
                    "%i", items[i].quantity);
        }
    }

    if (mouse_b & 2) {
        for (int i = 0; i < INVENTORY_SIZE; i++) {
            if (items[i].quantity > 0 &&
                    inventory_dialog[0].x + 24 * i + 24 > mouse_x &&
                    inventory_dialog[0].x + 24 * i < mouse_x &&
                    inventory_dialog[0].y + 44 + 24 > mouse_y &&
                    inventory_dialog[0].y + 44 < mouse_y)
            {
                itemMeny = 1;
                itemMeny_x = 24 * i;
                itemMeny_y = 44 + 24;
                itemMeny_i = i;
            }
        }
    }

    if (itemMeny) {
        if (inventory_dialog[0].y + itemMeny_y < mouse_y &&
                inventory_dialog[0].y + itemMeny_y + 10 > mouse_y)
        {
            if (mouse_b & 1) {
                use_item(itemMeny_i,items[itemMeny_i].id);
                itemMeny = 0;
            }
            textprintf_ex(buffer, font, inventory_dialog[0].x + itemMeny_x,
                    inventory_dialog[0].y + itemMeny_y, makecol(255, 237, 33),
                    -1, "Use item");
        } else {
            textprintf_ex(buffer, font, inventory_dialog[0].x + itemMeny_x,
                    inventory_dialog[0].y + itemMeny_y, MAKECOL_BLACK, -1,
                    "Use item");
        }
        if (inventory_dialog[0].y + itemMeny_y + 10 < mouse_y &&
                inventory_dialog[0].y + itemMeny_y + 20 > mouse_y) {
            if (mouse_b & 1) {
                drop_item(itemMeny_i, 1);
                itemMeny = 0;
            }
            textprintf_ex(buffer, font, inventory_dialog[0].x + itemMeny_x,
                    inventory_dialog[0].y + itemMeny_y + 10,
                    makecol(255, 237, 33), -1, "Del item");
        } else {
            textprintf_ex(buffer, font, inventory_dialog[0].x + itemMeny_x,
                    inventory_dialog[0].y + itemMeny_y + 10, MAKECOL_BLACK, -1,
                    "Del item");
        }
    }
}


void TmwInventory::setVisible(bool visible) {
    show_inventory = visible;
}

bool TmwInventory::isVisible() {
    return show_inventory;
}

int TmwInventory::add_item(int index, int id, int quantity) {
    items[index].id = id;
    items[index].quantity += quantity;
    return 0;
}

int TmwInventory::remove_item(int id) {
    for (int i = 0; i < INVENTORY_SIZE; i++) {
        if (items[i].id == id) {
            items[i].id = -1;
            items[i].quantity = 0;
        }
    }
    return 0;
}

int TmwInventory::change_quantity(int index, int quantity) {
    items[index].quantity = quantity;
    return 0;
}

int TmwInventory::increase_quantity(int index, int quantity) {
    items[index].quantity += quantity;
    return 0;
}

int TmwInventory::use_item(int index, int id) {
    WFIFOW(0) = net_w_value(0x00a7);
    WFIFOW(2) = net_w_value(index);
    WFIFOL(4) = net_l_value(id);
    // Note: id is dest of item, usually player_node->account_ID
    WFIFOSET(8);
    while ((out_size > 0)) flush();
    return 0;
}

int TmwInventory::drop_item(int index, int amunt) {
    WFIFOW(0) = net_w_value(0x00a7);
    WFIFOW(2) = net_w_value(index);
    WFIFOL(4) = net_l_value(amunt);
    WFIFOSET(8);
    while ((out_size > 0)) flush();
    return 0;
}