using System;
using ModernUO.Serialization;
using Server.Collections;
using Server.ContextMenus;
using Server.Engines.Craft;

namespace Server.Items;

[SerializationGenerator(0)]
public partial class SalvageBag : Bag
{
    private bool m_Failure;

    [Constructible]
    public SalvageBag() : this(Utility.RandomBlueHue())
    {
    }

    [Constructible]
    public SalvageBag(int hue)
    {
        Weight = 2.0;
        Hue = hue;
        m_Failure = false;
    }

    public override int LabelNumber => 1079931; // Salvage Bag

    public override void GetContextMenuEntries(Mobile from, ref PooledRefList<ContextMenuEntry> list)
    {
        base.GetContextMenuEntries(from, ref list);

        if (from.Alive)
        {
            var inBackpack = IsChildOf(from.Backpack);
            var resmeltables = inBackpack && Resmeltables();
            var scissorables = inBackpack && Scissorables();
            list.Add(new SalvageIngotsEntry(resmeltables));
            list.Add(new SalvageClothEntry(scissorables));
            list.Add(new SalvageAllEntry(resmeltables && scissorables));
        }
    }

    private bool Resmelt(Mobile from, Item item, CraftResource resource)
    {
        try
        {
            if (CraftResources.GetType(resource) != CraftResourceType.Metal)
            {
                return false;
            }

            var info = CraftResources.GetInfo(resource);

            if (info == null || info.ResourceTypes.Length == 0)
            {
                return false;
            }

            var craftItem = DefBlacksmithy.CraftSystem.CraftItems.SearchFor(item.GetType());

            if (craftItem == null || craftItem.Resources.Count == 0)
            {
                return false;
            }

            var craftResource = craftItem.Resources[0];

            if (craftResource.Amount < 2)
            {
                return false; // Not enough metal to resmelt
            }

            var difficulty = resource switch
            {
                CraftResource.DullCopper => 65.0,
                CraftResource.ShadowIron => 70.0,
                CraftResource.Copper     => 75.0,
                CraftResource.Bronze     => 80.0,
                CraftResource.Gold       => 85.0,
                CraftResource.Agapite    => 90.0,
                CraftResource.Verite     => 95.0,
                CraftResource.Valorite   => 99.0,
                _                        => 0.0
            };

            var ingot = info.ResourceTypes[0].CreateInstance<Item>();

            if (item is DragonBardingDeed || item is BaseArmor armor && armor.PlayerConstructed ||
                item is BaseWeapon weapon && weapon.PlayerConstructed ||
                item is BaseClothing clothing && clothing.PlayerConstructed)
            {
                var mining = from.Skills.Mining.Value;
                if (mining > 100.0)
                {
                    mining = 100.0;
                }

                var amount = ((4 + mining) * craftResource.Amount - 4) * 0.0068;
                if (amount < 2)
                {
                    ingot.Amount = 2;
                }
                else
                {
                    ingot.Amount = (int)amount;
                }
            }
            else
            {
                ingot.Amount = 2;
            }

            if (difficulty > from.Skills.Mining.Value)
            {
                m_Failure = true;
                ingot.Delete();
            }
            else
            {
                item.Delete();
            }

            from.AddToBackpack(ingot);

            from.PlaySound(0x2A);
            from.PlaySound(0x240);

            return true;
        }
        catch (Exception ex)
        {
            Console.WriteLine(ex.ToString());
        }

        return false;
    }

    private bool Resmeltables() // Where context menu checks for metal items and dragon barding deeds
    {
        foreach (var i in Items)
        {
            return i?.Deleted == false && (
                i is BaseWeapon weapon && CraftResources.GetType(weapon.Resource) == CraftResourceType.Metal ||
                i is BaseArmor armor && CraftResources.GetType(armor.Resource) == CraftResourceType.Metal ||
                i is DragonBardingDeed
            );
        }

        return false;
    }

    private bool Scissorables() // Where context menu checks for Leather items and cloth items
    {
        foreach (var i in Items)
        {
            if (i is not IScissorable || i.Deleted)
            {
                continue;
            }

            if (i is BaseClothing or Cloth or BoltOfCloth or Hides or BonePile || i is BaseArmor armor && CraftResources.GetType(armor.Resource) == CraftResourceType.Leather)
            {
                return true;
            }
        }

        return false;
    }

    private void SalvageIngots(Mobile from)
    {
        var hasTool = false;
        if (from.Backpack != null)
        {
            foreach (var tool in from.Backpack.FindItemsByType<BaseTool>())
            {
                if (tool.CraftSystem == DefBlacksmithy.CraftSystem)
                {
                    hasTool = true;
                    break;
                }
            }
        }

        if (!hasTool)
        {
            from.SendLocalizedMessage(1079822); // You need a blacksmithing tool in order to salvage ingots.
            return;
        }

        DefBlacksmithy.CheckAnvilAndForge(from, 2, out _, out var forge);

        if (!forge)
        {
            from.SendLocalizedMessage(1044265); // You must be near a forge.
            return;
        }

        var salvaged = 0;
        var notSalvaged = 0;

        foreach (var item in EnumerateItems())
        {
            if (item?.Deleted != false)
            {
                continue;
            }

            if (item is BaseArmor armor && Resmelt(from, armor, armor.Resource) ||
                item is BaseWeapon weapon && Resmelt(from, weapon, weapon.Resource) ||
                item is DragonBardingDeed)
            {
                salvaged++;
            }
            else
            {
                notSalvaged++;
            }
        }

        if (m_Failure)
        {
            from.SendLocalizedMessage(1079975); // You failed to smelt some metal for lack of skill.
            m_Failure = false;
        }
        else
        {
            // Salvaged: ~1_COUNT~/~2_NUM~ blacksmithed items
            from.SendLocalizedMessage(1079973, $"{salvaged}\t{salvaged + notSalvaged}");
        }
    }

    private static readonly Type[] _clothTypes = {
        typeof(Leather), typeof(Cloth), typeof(SpinedLeather), typeof(HornedLeather), typeof(BarbedLeather),
        typeof(Bandage), typeof(Bone)
    };

    private void SalvageCloth(Mobile from)
    {
        var scissors = from.Backpack.FindItemByType<Scissors>();

        if (scissors == null)
        {
            from.SendLocalizedMessage(1079823); // You need scissors in order to salvage cloth.
            return;
        }

        var salvaged = 0;
        var notSalvaged = 0;

        foreach (var item in EnumerateItems())
        {
            if (item is not IScissorable scissorable)
            {
                continue;
            }

            if (Scissors.CanScissor(from, scissorable) && scissorable.Scissor(from, scissors))
            {
                ++salvaged;
            }
            else
            {
                ++notSalvaged;
            }
        }

        // Salvaged: ~1_COUNT~/~2_NUM~ tailored items
        from.SendLocalizedMessage(1079974, $"{salvaged}\t{salvaged + notSalvaged}");

        foreach (var item in EnumerateItems())
        {
            if (item.InTypeList(_clothTypes))
            {
                from.AddToBackpack(item);
            }
        }
    }

    private void SalvageAll(Mobile from)
    {
        SalvageIngots(from);
        SalvageCloth(from);
    }

    private class SalvageAllEntry : ContextMenuEntry
    {
        public SalvageAllEntry(bool enabled) : base(6276) => Enabled = enabled;

        public override void OnClick(Mobile from, IEntity target)
        {
            if (from.CheckAlive() && target is SalvageBag { Deleted: false } bag)
            {
                bag.SalvageAll(from);
            }
        }
    }

    private class SalvageIngotsEntry : ContextMenuEntry
    {
        public SalvageIngotsEntry(bool enabled) : base(6277) => Enabled = enabled;

        public override void OnClick(Mobile from, IEntity target)
        {
            if (from.CheckAlive() && target is SalvageBag { Deleted: false } bag)
            {
                bag.SalvageIngots(from);
            }
        }
    }

    private class SalvageClothEntry : ContextMenuEntry
    {
        public SalvageClothEntry(bool enabled) : base(6278) => Enabled = enabled;

        public override void OnClick(Mobile from, IEntity target)
        {
            if (from.CheckAlive() && target is SalvageBag { Deleted: false } bag)
            {
                bag.SalvageCloth(from);
            }
        }
    }
}
