/*
 *  The Mana World
 *  Copyright (C) 2004  The Mana World Development Team
 *
 *  This file is part of The Mana World.
 *
 *  This program 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.
 *
 *  This program 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 this program; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 */

#include <cassert>
#include <iostream>

#include <guichan/focushandler.hpp>

#include "browserbox.h"
#include "chat.h"
#include "inventorywindow.h"
#include "item_amount.h"
#include "popupmenu.h"
#include "windowcontainer.h"

#include "../being.h"
#include "../floor_item.h"
#include "../item.h"
#include "../localplayer.h"
#include "../npc.h"
#include "../player_relations.h"

#include "../net/messageout.h"
#include "../net/protocol.h"

#include "../resources/itemdb.h"
#include "../resources/iteminfo.h"

#include "../utils/gettext.h"
#include "../utils/strprintf.h"

extern std::string tradePartnerName;

PopupMenu::PopupMenu():
    Window(),
    mBeing(NULL),
    mFloorItem(NULL),
    mItem(NULL)
{
    setResizable(false);
    setTitleBarHeight(0);
    setShowTitle(false);

    mBrowserBox = new BrowserBox();
    mBrowserBox->setPosition(4, 4);
    mBrowserBox->setHighlightMode(BrowserBox::BACKGROUND);
    mBrowserBox->setOpaque(false);
    add(mBrowserBox);
    mBrowserBox->setLinkHandler(this);
}

void PopupMenu::showPopup(int x, int y, Being *being)
{
    mBeing = being;
    mBrowserBox->clearRows();

    switch (mBeing->getType())
    {
	case Being::PLAYER:
	    {
		// Players can be traded with. Later also attack, follow and
		// add as buddy will be options in this menu.
		const std::string &name = mBeing->getName();
		mBrowserBox->addRow(_("@@trade|Trade With ") + name + "@@");
		mBrowserBox->addRow(_("@@attack|Attack ") + name + "@@");

		mBrowserBox->addRow("##3---");

		switch (player_relations.getRelation(name)) {
		case PlayerRelation::NEUTRAL:
		    mBrowserBox->addRow(_("@@friend|Befriend ") + name + "@@");

		case PlayerRelation::FRIEND:
		    mBrowserBox->addRow(_("@@disregard|Disregard ") + name + "@@");
		    mBrowserBox->addRow(_("@@ignore|Ignore ") + name + "@@");
		    break;

		case PlayerRelation::DISREGARDED:
		    mBrowserBox->addRow(_("@@unignore|Un-Ignore ") + name + "@@");
		    mBrowserBox->addRow(_("@@ignore|Completely ignore ") + name + "@@");
		    break;

		case PlayerRelation::IGNORED:
		    mBrowserBox->addRow(_("@@unignore|Un-Ignore ") + name + "@@");
		    break;
		}

		//mBrowserBox->addRow(_("@@follow|Follow ") + name + "@@");
		//mBrowserBox->addRow(_("@@buddy|Add ") + name + " to Buddy List@@");

		mBrowserBox->addRow("##3---");
		mBrowserBox->addRow(_("@@party-invite|Invite ") + name +
				    " to party@@");
	    }
	    break;

	case Being::NPC:
	    // NPCs can be talked to (single option, candidate for removal
	    // unless more options would be added)
	    mBrowserBox->addRow(_("@@talk|Talk To NPC@@"));
	    break;

	default:
	    /* Other beings aren't interesting... */
	    break;
    }

    //browserBox->addRow("@@look|Look To@@");
    mBrowserBox->addRow("##3---");
    mBrowserBox->addRow(_("@@cancel|Cancel@@"));

    showPopup(x, y);
}

void PopupMenu::showPopup(int x, int y, FloorItem *floorItem)
{
    mFloorItem = floorItem;
    mBrowserBox->clearRows();

    // Floor item can be picked up (single option, candidate for removal)
    std::string name = ItemDB::get(mFloorItem->getItemId()).getName();
    mBrowserBox->addRow(strprintf(_("@@pickup|Pick Up %s@@"), name.c_str()));

    //browserBox->addRow("@@look|Look To@@");
    mBrowserBox->addRow("##3---");
    mBrowserBox->addRow(_("@@cancel|Cancel@@"));

    showPopup(x, y);
}

void PopupMenu::handleLink(const std::string& link)
{
    // Talk To action
    if (link == "talk" &&
	mBeing != NULL &&
	mBeing->getType() == Being::NPC &&
	current_npc == 0)
    {
	dynamic_cast<NPC*>(mBeing)->talk();
    }

    // Trade action
    else if (link == "trade" &&
	     mBeing != NULL &&
	     mBeing->getType() == Being::PLAYER)
    {
	player_node->trade(mBeing);
	tradePartnerName = mBeing->getName();
    }

    // Attack action
    else if (link == "attack" &&
	     mBeing != NULL &&
	     mBeing->getType() == Being::PLAYER)
    {
	player_node->attack(mBeing, true);
    }

    else if (link == "unignore" &&
	     mBeing != NULL &&
	     mBeing->getType() == Being::PLAYER)
    {
	player_relations.setRelation(mBeing->getName(), PlayerRelation::NEUTRAL);
    }

    else if (link == "ignore" &&
	     mBeing != NULL &&
	     mBeing->getType() == Being::PLAYER)
    {
	player_relations.setRelation(mBeing->getName(), PlayerRelation::IGNORED);
    }

    else if (link == "disregard" &&
	     mBeing != NULL &&
	     mBeing->getType() == Being::PLAYER)
    {
	player_relations.setRelation(mBeing->getName(), PlayerRelation::DISREGARDED);
    }

    else if (link == "friend" &&
	     mBeing != NULL &&
	     mBeing->getType() == Being::PLAYER)
    {
	player_relations.setRelation(mBeing->getName(), PlayerRelation::FRIEND);
    }

    /*
    // Follow Player action
    else if (link == "follow")
    {
    }*/

    /*
    // Add Buddy action
    else if ((link == "buddy") && mBeing != NULL && mBeing->isPlayer())
    {
	if (!buddyWindow->isVisible())
	    buddyWindow->setVisible(true);

	buddyWindow->addBuddy(mBeing->getName());
    }*/

    // Pick Up Floor Item action
    else if ((link == "pickup") && mFloorItem != NULL)
    {
	player_node->pickUp(mFloorItem);
    }

    // Look To action
    else if (link == "look")
    {
    }

    else if (link == "use")
    {
	assert(mItem);
	if (mItem->isEquipment())
	{
	    if (mItem->isEquipped())
	    {
		player_node->unequipItem(mItem);
	    }
	    else
	    {
		player_node->equipItem(mItem);
	    }
	}
	else
	{
	    player_node->useItem(mItem);
	}
    }

    else if (link == "chat")
    {
	chatWindow->addItemText(mItem->getId(), mItem->getInfo().getName());
    }

    else if (link == "drop")
    {
	new ItemAmountWindow(AMOUNT_ITEM_DROP, inventoryWindow, mItem);
    }

    else if (link == "description")
    {
	// do nothing for now, I need to write
	// a window for the description first
    }
    else if (link == "party-invite" &&
	     mBeing != NULL &&
	     mBeing->getType() == Being::PLAYER)
    {
	MessageOut outMsg(player_node->getNetwork());
	outMsg.writeInt16(CMSG_PARTY_INVITE);
	outMsg.writeInt32(mBeing->getId());
    }

    // Unknown actions
    else
    {
	std::cout << link << std::endl;
    }

    setVisible(false);

    mBeing = NULL;
    mFloorItem = NULL;
    mItem = NULL;
}

void PopupMenu::showPopup(int x, int y, Item *item)
{
    assert(item);
    mItem = item;
    mBrowserBox->clearRows();

    if (item->isEquipment())
    {
        if (item->isEquipped())
            mBrowserBox->addRow(_("@@use|Unequip@@"));
        else
            mBrowserBox->addRow(_("@@use|Equip@@"));
    }
    else
        mBrowserBox->addRow(_("@@use|Use@@"));

    mBrowserBox->addRow(_("@@drop|Drop@@"));
    mBrowserBox->addRow(_("@@chat|Add to Chat@@"));
    mBrowserBox->addRow(_("@@description|Description@@"));
    mBrowserBox->addRow("##3---");
    mBrowserBox->addRow(_("@@cancel|Cancel@@"));

    showPopup(x, y);
}

void PopupMenu::showPopup(int x, int y)
{
    setContentSize(mBrowserBox->getWidth() + 8, mBrowserBox->getHeight() + 8);
    if (windowContainer->getWidth() < (x + getWidth() + 5))
	x = windowContainer->getWidth() - getWidth();
    if (windowContainer->getHeight() < (y + getHeight() + 5))
	y = windowContainer->getHeight() - getHeight();
    setPosition(x, y);
    setVisible(true);
    requestMoveToTop();
}