/*
 * Copyright (C) 2012-2020 CypherCore <http://github.com/CypherCore>
 * 
 * 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/>.
 */

using Framework.Constants;
using Framework.IO;
using Game.DataStorage;
using Game.Entities;
using System.Collections.Generic;
using System.Linq;

namespace Game.Chat
{
    [CommandGroup("quest", RBACPermissions.CommandQuest)]
    class QuestCommands
    {
        [Command("add", RBACPermissions.CommandQuestAdd)]
        static bool Add(CommandHandler handler, StringArguments args)
        {
            Player player = handler.GetSelectedPlayer();
            if (!player)
            {
                handler.SendSysMessage(CypherStrings.NoCharSelected);
                return false;
            }

            // .addquest #entry'
            // number or [name] Shift-click form |color|Hquest:quest_id:quest_level:min_level:max_level:scaling_faction|h[name]|h|r
            string cId = handler.ExtractKeyFromLink(args, "Hquest");
            if (!uint.TryParse(cId, out uint entry))
                return false;

            Quest quest = Global.ObjectMgr.GetQuestTemplate(entry);
            if (quest == null || Global.DisableMgr.IsDisabledFor(DisableType.Quest, entry, null))
            {
                handler.SendSysMessage(CypherStrings.CommandQuestNotfound, entry);
                return false;
            }

            // check item starting quest (it can work incorrectly if added without item in inventory)
            var itc = Global.ObjectMgr.GetItemTemplates();
            var result = itc.Values.FirstOrDefault(p => p.GetStartQuest() == entry);

            if (result != null)
            {
                handler.SendSysMessage(CypherStrings.CommandQuestStartfromitem, entry, result.GetId());
                return false;
            }

            if (player.IsActiveQuest(entry))
                return false;

            // ok, normal (creature/GO starting) quest
            if (player.CanAddQuest(quest, true))
                player.AddQuestAndCheckCompletion(quest, null);

            return true;
        }

        [Command("complete", RBACPermissions.CommandQuestComplete)]
        static bool Complete(CommandHandler handler, StringArguments args)
        {
            Player player = handler.GetSelectedPlayer();
            if (!player)
            {
                handler.SendSysMessage(CypherStrings.NoCharSelected);
                return false;
            }

            // .quest complete #entry
            // number or [name] Shift-click form |color|Hquest:quest_id:quest_level:min_level:max_level:scaling_faction|h[name]|h|r
            string cId = handler.ExtractKeyFromLink(args, "Hquest");
            if (!uint.TryParse(cId, out uint entry))
                return false;

            Quest quest = Global.ObjectMgr.GetQuestTemplate(entry);

            // If player doesn't have the quest
            if (quest == null || player.GetQuestStatus(entry) == QuestStatus.None || Global.DisableMgr.IsDisabledFor(DisableType.Quest, entry, null))
            {
                handler.SendSysMessage(CypherStrings.CommandQuestNotfound, entry);
                return false;
            }

            for (int i = 0; i < quest.Objectives.Count; ++i)
            {
                QuestObjective obj = quest.Objectives[i];

                switch (obj.Type)
                {
                    case QuestObjectiveType.Item:
                    {
                        uint curItemCount = player.GetItemCount((uint)obj.ObjectID, true);
                        List<ItemPosCount> dest = new();
                        InventoryResult msg = player.CanStoreNewItem(ItemConst.NullBag, ItemConst.NullSlot, dest, (uint)obj.ObjectID, (uint)(obj.Amount - curItemCount));
                        if (msg == InventoryResult.Ok)
                        {
                            Item item = player.StoreNewItem(dest, (uint)obj.ObjectID, true);
                            player.SendNewItem(item, (uint)(obj.Amount - curItemCount), true, false);
                        }
                        break;
                    }
                    case QuestObjectiveType.Monster:
                    {
                        CreatureTemplate creatureInfo = Global.ObjectMgr.GetCreatureTemplate((uint)obj.ObjectID);
                        if (creatureInfo != null)
                            for (int z = 0; z < obj.Amount; ++z)
                                player.KilledMonster(creatureInfo, ObjectGuid.Empty);
                        break;
                    }
                    case QuestObjectiveType.GameObject:
                    {
                        for (int z = 0; z < obj.Amount; ++z)
                            player.KillCreditGO((uint)obj.ObjectID);
                        break;
                    }
                    case QuestObjectiveType.MinReputation:
                    {
                        int curRep = player.GetReputationMgr().GetReputation((uint)obj.ObjectID);
                        if (curRep < obj.Amount)
                        {
                            FactionRecord factionEntry = CliDB.FactionStorage.LookupByKey(obj.ObjectID);
                            if (factionEntry != null)
                                player.GetReputationMgr().SetReputation(factionEntry, obj.Amount);
                        }
                        break;
                    }
                    case QuestObjectiveType.MaxReputation:
                    {
                        int curRep = player.GetReputationMgr().GetReputation((uint)obj.ObjectID);
                        if (curRep > obj.Amount)
                        {
                            FactionRecord factionEntry = CliDB.FactionStorage.LookupByKey(obj.ObjectID);
                            if (factionEntry != null)
                                player.GetReputationMgr().SetReputation(factionEntry, obj.Amount);
                        }
                        break;
                    }
                    case QuestObjectiveType.Money:
                    {
                        player.ModifyMoney(obj.Amount);
                        break;
                    }
                    case QuestObjectiveType.PlayerKills:
                    {
                        for (var z = 0; z < obj.Amount; ++z)
                            player.KilledPlayerCredit(ObjectGuid.Empty);
                        break;
                    }
                }

            }

            player.CompleteQuest(entry);
            return true;
        }

        [Command("remove", RBACPermissions.CommandQuestRemove)]
        static bool Remove(CommandHandler handler, StringArguments args)
        {
            Player player = handler.GetSelectedPlayer();
            if (!player)
            {
                handler.SendSysMessage(CypherStrings.NoCharSelected);
                return false;
            }

            // .removequest #entry'
            // number or [name] Shift-click form |color|Hquest:quest_id:quest_level:min_level:max_level:scaling_faction|h[name]|h|r
            string cId = handler.ExtractKeyFromLink(args, "Hquest");
            if (!uint.TryParse(cId, out uint entry))
                return false;

            Quest quest = Global.ObjectMgr.GetQuestTemplate(entry);
            if (quest == null)
            {
                handler.SendSysMessage(CypherStrings.CommandQuestNotfound, entry);
                return false;
            }

            QuestStatus oldStatus = player.GetQuestStatus(entry);

            if (player.GetQuestStatus(entry) != QuestStatus.None)
            {
                // remove all quest entries for 'entry' from quest log
                for (byte slot = 0; slot < SharedConst.MaxQuestLogSize; ++slot)
                {
                    uint logQuest = player.GetQuestSlotQuestId(slot);
                    if (logQuest == entry)
                    {
                        player.SetQuestSlot(slot, 0);

                        // we ignore unequippable quest items in this case, its' still be equipped
                        player.TakeQuestSourceItem(logQuest, false);

                        if (quest.HasFlag(QuestFlags.Pvp))
                        {
                            player.pvpInfo.IsHostile = player.pvpInfo.IsInHostileArea || player.HasPvPForcingQuest();
                            player.UpdatePvPState();
                        }
                    }
                }

                player.RemoveActiveQuest(entry, false);
                player.RemoveRewardedQuest(entry);

                Global.ScriptMgr.OnQuestStatusChange(player, entry);
                Global.ScriptMgr.OnQuestStatusChange(player, quest, oldStatus, QuestStatus.None);

                handler.SendSysMessage(CypherStrings.CommandQuestRemoved);
                return true;
            }
            else
            {
                handler.SendSysMessage(CypherStrings.CommandQuestNotfound, entry);
                return false;
            }
        }

        [Command("reward", RBACPermissions.CommandQuestReward)]
        static bool Reward(CommandHandler handler, StringArguments args)
        {
            Player player = handler.GetSelectedPlayer();
            if (!player)
            {
                handler.SendSysMessage(CypherStrings.NoCharSelected);
                return false;
            }

            // .quest reward #entry
            // number or [name] Shift-click form |color|Hquest:quest_id:quest_level:min_level:max_level:scaling_faction|h[name]|h|r
            string cId = handler.ExtractKeyFromLink(args, "Hquest");
            if (!uint.TryParse(cId, out uint entry))
                return false;

            Quest quest = Global.ObjectMgr.GetQuestTemplate(entry);

            // If player doesn't have the quest
            if (quest == null || player.GetQuestStatus(entry) != QuestStatus.Complete || Global.DisableMgr.IsDisabledFor(DisableType.Quest, entry, null))
            {
                handler.SendSysMessage(CypherStrings.CommandQuestNotfound, entry);
                return false;
            }

            player.RewardQuest(quest, LootItemType.Item, 0, player);
            return true;
        }
    }
}