using System;
using System.Collections.Generic;
using Server.Collections;
using Server.Engines.PartySystem;
using Server.Spells.Second;

namespace Server.Spells.Fourth
{
    public class ArchProtectionSpell : MagerySpell, ITargetingSpell<IPoint3D>
    {
        private static readonly SpellInfo _info = new(
            "Arch Protection",
            "Vas Uus Sanct",
            Core.AOS ? 239 : 215,
            9011,
            Reagent.Garlic,
            Reagent.Ginseng,
            Reagent.MandrakeRoot,
            Reagent.SulfurousAsh
        );

        private static readonly Dictionary<Mobile, int> _table = new();

        public ArchProtectionSpell(Mobile caster, Item scroll = null) : base(caster, scroll, _info)
        {
        }

        public override SpellCircle Circle => SpellCircle.Fourth;

        public void Target(IPoint3D p)
        {
            if (Caster.Map == null)
            {
                return;
            }

            if (CheckSequence())
            {
                SpellHelper.Turn(Caster, p);
                SpellHelper.GetSurfaceTop(ref p);

                var loc = new Point3D(p);

                if (!Core.AOS)
                {
                    Effects.PlaySound(loc, Caster.Map, 0x299);
                }

                using var targets = PooledRefQueue<Mobile>.Create();
                foreach (var m in Caster.Map.GetMobilesInRange(loc, Core.AOS ? 2 : 3))
                {
                    if (Caster.CanBeBeneficial(m, false))
                    {
                        targets.Enqueue(m);
                    }
                }

                if (Core.AOS)
                {
                    var party = Party.Get(Caster);

                    while (targets.Count > 0)
                    {
                        var m = targets.Dequeue();
                        if (m == Caster || party?.Contains(m) == true)
                        {
                            Caster.DoBeneficial(m);
                            ProtectionSpell.Toggle(Caster, m);
                        }
                    }
                }
                else
                {
                    var val = (int)(Caster.Skills.Magery.Value / 10.0 + 1);

                    while (targets.Count > 0)
                    {
                        var m = targets.Dequeue();
                        if (m.BeginAction<ArchProtectionSpell>())
                        {
                            Caster.DoBeneficial(m);
                            m.VirtualArmorMod += val;

                            AddEntry(m, val);
                            new InternalTimer(m, Caster).Start();

                            m.FixedParticles(0x375A, 9, 20, 5027, EffectLayer.Waist);
                            m.PlaySound(0x1F7);
                        }
                    }
                }
            }
        }

        public override void OnCast()
        {
            Caster.Target = new SpellTarget<IPoint3D>(this, allowGround: true);
        }

        private static void AddEntry(Mobile m, int v)
        {
            _table[m] = v;
        }

        public static void RemoveEntry(Mobile m)
        {
            if (_table.Remove(m, out var v))
            {
                m.EndAction<ArchProtectionSpell>();
                m.VirtualArmorMod -= Math.Min(v, m.VirtualArmorMod);
            }
        }

        private class InternalTimer : Timer
        {
            private readonly Mobile _owner;

            public InternalTimer(Mobile target, Mobile caster) : base(GetDelay(caster)) => _owner = target;

            private static TimeSpan GetDelay(Mobile caster) =>
                TimeSpan.FromSeconds(Math.Min(144, caster.Skills.Magery.Value * 1.2));

            protected override void OnTick()
            {
                RemoveEntry(_owner);
            }
        }
    }
}