ModernUO/Projects/UOContent/Items/Maps/MapItem.cs

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

namespace Server.Items
{
    [Flippable(0x14EB, 0x14EC)]
    public class MapItem : Item, ICraftable
    {
        private const int MaxUserPins = 50;
        private bool m_Editable;

        [Constructible]
        public MapItem(Map facet = null) : base(0x14EC)
        {
            Weight = 1.0;

            Width = 200;
            Height = 200;
            Facet = facet;
        }

        public MapItem(Serial serial) : base(serial)
        {
        }

        [CommandProperty(AccessLevel.GameMaster)]
        public bool Protected { get; set; }

        [CommandProperty(AccessLevel.GameMaster)]
        public Rectangle2D Bounds { get; set; }

        [CommandProperty(AccessLevel.GameMaster)]
        public int Width { get; set; }

        [CommandProperty(AccessLevel.GameMaster)]
        public int Height { get; set; }

        [CommandProperty(AccessLevel.GameMaster)]
        public Map Facet { get; set; }

        public List<Point2D> Pins { get; } = new List<Point2D>();

        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 >= 5120)
            {
                x2 = 5119;
            }

            if (y2 >= 4096)
            {
                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) // 7.0.13.0+ supports maps on all facets
            {
                from.Send(new MapDetailsNew(this));
            }
            else if (Facet != null && Facet != Map.Felucca && Facet != Map.Trammel
            ) // Is it Felucca and Trammel, or just Felucca?
            {
                from.SendMessage("You must have client 7.0.13.0 or higher to display this map.");
                return;
            }
            else
            {
                from.Send(new MapDetails(this));
            }

            from.Send(new MapDisplay(this));

            for (var i = 0; i < Pins.Count; ++i)
            {
                from.Send(new MapAddPin(this, Pins[i]));
            }

            from.Send(new MapSetEditable(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))
            {
                m_Editable = !m_Editable;
            }

            from.Send(new MapSetEditable(this, Validate(from) && m_Editable));
        }

        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) => m_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);
            }
        }

        public virtual void ClearPins()
        {
            Pins.Clear();
        }

        public override void Serialize(IGenericWriter writer)
        {
            base.Serialize(writer);

            writer.Write(0);

            writer.Write(Bounds);

            writer.Write(Width);
            writer.Write(Height);

            writer.Write(Protected);

            writer.Write(Pins.Count);
            for (var i = 0; i < Pins.Count; ++i)
            {
                writer.Write(Pins[i]);
            }
        }

        public override void Deserialize(IGenericReader reader)
        {
            base.Deserialize(reader);

            var version = reader.ReadInt();

            switch (version)
            {
                case 0:
                    {
                        Bounds = reader.ReadRect2D();

                        Width = reader.ReadInt();
                        Height = reader.ReadInt();

                        Protected = reader.ReadBool();

                        var count = reader.ReadInt();
                        for (var i = 0; i < count; i++)
                        {
                            Pins.Add(reader.ReadPoint2D());
                        }

                        break;
                    }
            }
        }

        public static void Initialize()
        {
            PacketHandlers.Register(0x56, 11, true, OnMapCommand);
        }

        private static void OnMapCommand(NetState state, PacketReader pvSrc)
        {
            var from = state.Mobile;

            if (!(World.FindItem(pvSrc.ReadUInt32()) is MapItem map))
            {
                return;
            }

            int command = pvSrc.ReadByte();
            int number = pvSrc.ReadByte();

            int x = pvSrc.ReadInt16();
            int y = pvSrc.ReadInt16();

            switch (command)
            {
                case 1:
                    map.OnAddPin(from, x, y);
                    break;
                case 2:
                    map.OnInsertPin(from, number, x, y);
                    break;
                case 3:
                    map.OnChangePin(from, number, x, y);
                    break;
                case 4:
                    map.OnRemovePin(from, number);
                    break;
                case 5:
                    map.OnClearPins(from);
                    break;
                case 6:
                    map.OnToggleEditable(from);
                    break;
            }
        }

        private sealed class MapDetails : Packet
        {
            public MapDetails(MapItem map) : base(0x90, 19)
            {
                Stream.Write(map.Serial);
                Stream.Write((short)0x139D);
                Stream.Write((short)map.Bounds.Start.X);
                Stream.Write((short)map.Bounds.Start.Y);
                Stream.Write((short)map.Bounds.End.X);
                Stream.Write((short)map.Bounds.End.Y);
                Stream.Write((short)map.Width);
                Stream.Write((short)map.Height);
            }
        }

        private sealed class MapDetailsNew : Packet
        {
            public MapDetailsNew(MapItem map) : base(0xF5, 21)
            {
                Stream.Write(map.Serial);
                Stream.Write((short)0x139D);
                Stream.Write((short)map.Bounds.Start.X);
                Stream.Write((short)map.Bounds.Start.Y);
                Stream.Write((short)map.Bounds.End.X);
                Stream.Write((short)map.Bounds.End.Y);
                Stream.Write((short)map.Width);
                Stream.Write((short)map.Height);
                Stream.Write((short)(map.Facet?.MapID ?? 0));
            }
        }

        private abstract class MapCommand : Packet
        {
            public MapCommand(MapItem map, int command, int number, int x, int y) : base(0x56, 11)
            {
                Stream.Write(map.Serial);
                Stream.Write((byte)command);
                Stream.Write((byte)number);
                Stream.Write((short)x);
                Stream.Write((short)y);
            }
        }

        private sealed class MapDisplay : MapCommand
        {
            public MapDisplay(MapItem map) : base(map, 5, 0, 0, 0)
            {
            }
        }

        private sealed class MapAddPin : MapCommand
        {
            public MapAddPin(MapItem map, Point2D point) : base(map, 1, 0, point.X, point.Y)
            {
            }
        }

        private sealed class MapSetEditable : MapCommand
        {
            public MapSetEditable(MapItem map, bool editable) : base(map, 7, editable ? 1 : 0, 0, 0)
            {
            }
        }
    }
}