/*
 * 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 3 of the License, or (at your option) 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, see <http://www.gnu.org/licenses/>.
 */
package silentium.gameserver.network.clientpackets;

import silentium.commons.utils.Rnd;
import silentium.gameserver.configs.PlayersConfig;
import silentium.gameserver.data.xml.SkillTreeData;
import silentium.gameserver.model.L2EnchantSkillData;
import silentium.gameserver.model.L2EnchantSkillLearn;
import silentium.gameserver.model.L2ShortCut;
import silentium.gameserver.model.L2Skill;
import silentium.gameserver.model.actor.L2Npc;
import silentium.gameserver.model.actor.instance.L2NpcInstance;
import silentium.gameserver.model.actor.instance.L2PcInstance;
import silentium.gameserver.network.SystemMessageId;
import silentium.gameserver.network.serverpackets.ShortCutRegister;
import silentium.gameserver.network.serverpackets.SystemMessage;
import silentium.gameserver.network.serverpackets.UserInfo;
import silentium.gameserver.tables.SkillTable;

/**
 * Format chdd
 * 
 * @author -Wooden-
 */
public final class RequestExEnchantSkill extends L2GameClientPacket
{
	private int _skillId;
	private int _skillLevel;

	@Override
	protected void readImpl()
	{
		_skillId = readD();
		_skillLevel = readD();
	}

	@Override
	protected void runImpl()
	{
		if (_skillId <= 0 || _skillLevel <= 0)
			return;

		final L2PcInstance activeChar = getClient().getActiveChar();
		if (activeChar == null)
			return;

		if (activeChar.getClassId().level() < 3 || activeChar.getLevel() < 76)
			return;

		final L2Npc trainer = activeChar.getCurrentFolkNPC();
		if (trainer == null)
			return;

		if (!activeChar.isInsideRadius(trainer, L2Npc.INTERACTION_DISTANCE, false, false) && !activeChar.isGM())
			return;

		if (activeChar.getSkillLevel(_skillId) >= _skillLevel)
			return;

		final L2Skill skill = SkillTable.getInstance().getInfo(_skillId, _skillLevel);
		if (skill == null)
			return;

		L2EnchantSkillData data = null;
		int baseLvl = 0;

		// Try to find enchant skill.
		for (L2EnchantSkillLearn esl : SkillTreeData.getInstance().getAvailableEnchantSkills(activeChar))
		{
			if (esl == null)
				continue;

			if (esl.getId() == _skillId && esl.getLevel() == _skillLevel)
			{
				data = SkillTreeData.getInstance().getEnchantSkillData(esl.getEnchant());
				baseLvl = esl.getBaseLevel();
				break;
			}
		}

		if (data == null)
			return;

		// Check exp and sp neccessary to enchant skill.
		if (activeChar.getSp() < data.getCostSp())
		{
			activeChar.sendPacket(SystemMessageId.YOU_DONT_HAVE_ENOUGH_SP_TO_ENCHANT_THAT_SKILL);
			return;
		}
		if (activeChar.getExp() < data.getCostExp())
		{
			activeChar.sendPacket(SystemMessageId.YOU_DONT_HAVE_ENOUGH_EXP_TO_ENCHANT_THAT_SKILL);
			return;
		}

		// Check item restriction, and try to consume item.
		if (PlayersConfig.ES_SP_BOOK_NEEDED)
			if (data.getItemId() != 0 && data.getItemCount() != 0)
			{
				if (!activeChar.destroyItemByItemId("SkillEnchant", data.getItemId(), data.getItemCount(), trainer, false))
				{
					activeChar.sendPacket(SystemMessageId.YOU_DONT_HAVE_ALL_OF_THE_ITEMS_NEEDED_TO_ENCHANT_THAT_SKILL);
					return;
				}
				SystemMessage sm = SystemMessage.getSystemMessage(SystemMessageId.S2_S1_DISAPPEARED);
				sm.addItemName(data.getItemId());
				sm.addItemNumber(data.getItemCount());
				activeChar.sendPacket(sm);
			}

		// All conditions fulfilled, consume exp and sp.
		activeChar.getStat().removeExpAndSp(data.getCostExp(), data.getCostSp());

		// Try to enchant skill.
		if (Rnd.get(100) <= data.getRate(activeChar.getLevel()))
		{
			activeChar.addSkill(skill, true);
			activeChar.sendPacket(SystemMessage.getSystemMessage(SystemMessageId.YOU_HAVE_SUCCEEDED_IN_ENCHANTING_THE_SKILL_S1).addSkillName(_skillId, _skillLevel));
		}
		else
		{
			activeChar.sendPacket(SystemMessage.getSystemMessage(SystemMessageId.YOU_HAVE_FAILED_TO_ENCHANT_THE_SKILL_S1).addSkillName(_skillId, _skillLevel));
			if (_skillLevel > 100)
			{
				_skillLevel = baseLvl;
				activeChar.addSkill(SkillTable.getInstance().getInfo(_skillId, _skillLevel), true);
			}
		}
		activeChar.sendSkillList();
		activeChar.sendPacket(new UserInfo(activeChar));

		// Update shortcuts.
		for (L2ShortCut sc : activeChar.getAllShortCuts())
		{
			if (sc.getId() == _skillId && sc.getType() == L2ShortCut.TYPE_SKILL)
			{
				L2ShortCut newsc = new L2ShortCut(sc.getSlot(), sc.getPage(), L2ShortCut.TYPE_SKILL, _skillId, _skillLevel, 1);
				activeChar.sendPacket(new ShortCutRegister(newsc));
				activeChar.registerShortCut(newsc);
			}
		}

		// Show enchant skill list.
		L2NpcInstance.showEnchantSkillList(activeChar, trainer, activeChar.getClassId());
	}
}