using System;
using System.Collections.Generic;
using ModernUO.Serialization;
using Server.Engines.Craft;
using Server.Network;

namespace Server.Items;

[Flippable(0x14EB, 0x14EC)]
[SerializationGenerator(1, false)]
public partial class MapItem : Item, ICraftable
{
    private const int MaxUserPins = 50;

    [SerializableField(0)]
    [SerializedCommandProperty(AccessLevel.GameMaster)]
    private Rectangle2D _bounds;

    [SerializableField(1)]
    [SerializedCommandProperty(AccessLevel.GameMaster)]
    private int _width;

    [SerializableField(2)]
    [SerializedCommandProperty(AccessLevel.GameMaster)]
    private int _height;

    [SerializableField(3)]
    [SerializedCommandProperty(AccessLevel.GameMaster)]
    private bool _protected;

    [SerializableField(4, setter: "private")]
    [SerializedCommandProperty(AccessLevel.GameMaster)]
    private List<Point2D> _pins;

    [SerializableField(5)]
    [SerializedCommandProperty(AccessLevel.GameMaster)]
    private Map _facet;

    [SerializableField(6)]
    private bool _editable;

    [Constructible]
    public MapItem(Map facet = null) : base(0x14EC)
    {
        _width = 200;
        _height = 200;
        _facet = facet;
        _pins = new List<Point2D>();
    }

    public override double DefaultWeight => 1.0;

    public int OnCraft(
        int quality, bool makersMark, Mobile from, CraftSystem craftSystem, Type typeRes, BaseTool tool,
        CraftItem craftItem, int resHue
    )
    {
        CraftInit(from);
        return 1;
    }

    public virtual void CraftInit(Mobile from)
    {
    }

    public void SetDisplay(int x1, int y1, int x2, int y2, int w, int h)
    {
        Width = w;
        Height = h;

        if (x1 < 0)
        {
            x1 = 0;
        }

        if (y1 < 0)
        {
            y1 = 0;
        }

        if (x2 > 5119)
        {
            x2 = 5119;
        }

        if (y2 > 4095)
        {
            y2 = 4095;
        }

        Bounds = new Rectangle2D(x1, y1, x2 - x1, y2 - y1);
    }

    public override void OnDoubleClick(Mobile from)
    {
        if (from.InRange(GetWorldLocation(), 2))
        {
            DisplayTo(from);
        }
        else
        {
            from.SendLocalizedMessage(500446); // That is too far away.
        }
    }

    public virtual void DisplayTo(Mobile from)
    {
        var ns = from.NetState;

        if (!ns.NewCharacterList && _facet != null && _facet != Map.Veridia && _facet != Map.Underworld)
        {
            from.SendMessage("You must have client 7.0.13.0 or higher to display this map.");
            return;
        }

        ns.SendMapDetails(this);
        ns.SendMapDisplay(this);

        for (var i = 0; i < Pins.Count; ++i)
        {
            ns.SendMapAddPin(this, Pins[i]);
        }

        ns.SendMapSetEditable(this, ValidateEdit(from));
    }

    public virtual void OnAddPin(Mobile from, int x, int y)
    {
        if (!ValidateEdit(from))
        {
            return;
        }

        if (Pins.Count >= MaxUserPins)
        {
            return;
        }

        Validate(ref x, ref y);
        AddPin(x, y);
    }

    public virtual void OnRemovePin(Mobile from, int number)
    {
        if (!ValidateEdit(from))
        {
            return;
        }

        RemovePin(number);
    }

    public virtual void OnChangePin(Mobile from, int number, int x, int y)
    {
        if (!ValidateEdit(from))
        {
            return;
        }

        Validate(ref x, ref y);
        ChangePin(number, x, y);
    }

    public virtual void OnInsertPin(Mobile from, int number, int x, int y)
    {
        if (!ValidateEdit(from))
        {
            return;
        }

        if (Pins.Count >= MaxUserPins)
        {
            return;
        }

        Validate(ref x, ref y);
        InsertPin(number, x, y);
    }

    public virtual void OnClearPins(Mobile from)
    {
        if (!ValidateEdit(from))
        {
            return;
        }

        ClearPins();
    }

    public virtual void OnToggleEditable(Mobile from)
    {
        if (Validate(from))
        {
            _editable = !_editable;
        }

        from.NetState.SendMapSetEditable(this, _editable && Validate(from));
    }

    public virtual void Validate(ref int x, ref int y)
    {
        x = Math.Clamp(x, 0, Width - 1);
        y = Math.Clamp(y, 0, Height - 1);
    }

    public virtual bool ValidateEdit(Mobile from) => _editable && Validate(from);

    public virtual bool Validate(Mobile from)
    {
        if (!from.CanSee(this) || from.Map != Map || !from.Alive || InSecureTrade)
        {
            return false;
        }

        if (from.AccessLevel >= AccessLevel.GameMaster)
        {
            return true;
        }

        if (!Movable || Protected || !from.InRange(GetWorldLocation(), 2))
        {
            return false;
        }

        return !(RootParent is Mobile && RootParent != from);
    }

    public void ConvertToWorld(int x, int y, out int worldX, out int worldY)
    {
        worldX = Bounds.Width * x / Width + Bounds.X;
        worldY = Bounds.Height * y / Height + Bounds.Y;
    }

    public void ConvertToMap(int x, int y, out int mapX, out int mapY)
    {
        mapX = (x - Bounds.X) * Width / Bounds.Width;
        mapY = (y - Bounds.Y) * Width / Bounds.Height;
    }

    public virtual void AddWorldPin(int x, int y)
    {
        ConvertToMap(x, y, out var mapX, out var mapY);
        AddPin(mapX, mapY);
    }

    public virtual void AddPin(int x, int y)
    {
        Pins.Add(new Point2D(x, y));
    }

    public virtual void RemovePin(int index)
    {
        if (index > 0 && index < Pins.Count)
        {
            Pins.RemoveAt(index);
        }
    }

    public virtual void InsertPin(int index, int x, int y)
    {
        if (index < 0 || index >= Pins.Count)
        {
            Pins.Add(new Point2D(x, y));
        }
        else
        {
            Pins.Insert(index, new Point2D(x, y));
        }
    }

    public virtual void ChangePin(int index, int x, int y)
    {
        if (index >= 0 && index < Pins.Count)
        {
            Pins[index] = new Point2D(x, y);
        }
    }

    private void Deserialize(IGenericReader reader, int version)
    {
        // Version 0 doesn't serialize Facet/Editable, and count is not encoded

        _bounds = reader.ReadRect2D();

        _width = reader.ReadInt();
        _height = reader.ReadInt();

        _protected = reader.ReadBool();

        var count = reader.ReadInt();
        _pins = new List<Point2D>(count);
        for (var i = 0; i < count; i++)
        {
            _pins.Add(reader.ReadPoint2D());
        }
    }
}