using System;
using System.Collections.Generic;
using System.Globalization;
using System.Linq;
#if WPF
using System.Windows;
using System.Windows.Media;
#elif UWP
using Windows.UI.Xaml;
using Windows.UI.Xaml.Media;
#elif WINUI
using Microsoft.UI.Xaml;
using Microsoft.UI.Xaml.Media;
#elif AVALONIA
using Avalonia;
using Avalonia.Layout;
using PathFigureCollection = Avalonia.Media.PathFigures;
#endif

namespace MapControl
{
    /// <summary>
    /// Draws a map graticule, i.e. a lat/lon grid overlay.
    /// </summary>
    public partial class MapGraticule : MapGrid
    {
        protected override void DrawGrid(PathFigureCollection figures, List<Label> labels)
        {
            if (ParentMap.MapProjection.IsNormalCylindrical)
            {
                DrawNormalGraticule(figures, labels);
            }
            else
            {
                DrawGraticule(figures, labels);
            }
        }

        private static readonly double[] lineDistances = [
            1d/3600d, 1d/1800d, 1d/720d, 1d/360d, 1d/240d, 1d/120d,
            1d/60d, 1d/30d, 1d/12d, 1d/6d, 1d/4d, 1d/2d,
            1d, 2d, 5d, 10d, 15d, 30d];

        private static string GetLabelFormat(double lineDistance)
        {
            return lineDistance < 1d / 60d ? "{0} {1}°{2:00}'{3:00}\"" :
                   lineDistance < 1d ? "{0} {1}°{2:00}'" : "{0} {1}°";
        }

        private double GetLineDistance(bool scaleByLatitude)
        {
            var minDistance = MinLineDistance / (ParentMap.ViewTransform.Scale * MapProjection.Wgs84MeterPerDegree);

            if (scaleByLatitude)
            {
                minDistance /= Math.Cos(ParentMap.Center.Latitude * Math.PI / 180d);
            }

            minDistance = Math.Max(minDistance, lineDistances.First());
            minDistance = Math.Min(minDistance, lineDistances.Last());

            return lineDistances.First(d => d >= minDistance);
        }

        private void DrawNormalGraticule(PathFigureCollection figures, List<Label> labels)
        {
            var lineDistance = GetLineDistance(false);
            var labelFormat = GetLabelFormat(lineDistance);
            var mapRect = ParentMap.ViewTransform.ViewToMapBounds(new Rect(0d, 0d, ParentMap.ActualWidth, ParentMap.ActualHeight));
            var southWest = ParentMap.MapProjection.MapToLocation(mapRect.X, mapRect.Y);
            var northEast = ParentMap.MapProjection.MapToLocation(mapRect.X + mapRect.Width, mapRect.Y + mapRect.Height);
            var minLat = Math.Ceiling(southWest.Latitude / lineDistance) * lineDistance;
            var minLon = Math.Ceiling(southWest.Longitude / lineDistance) * lineDistance;

            for (var lat = minLat; lat <= northEast.Latitude; lat += lineDistance)
            {
                var p1 = ParentMap.LocationToView(lat, southWest.Longitude);
                var p2 = ParentMap.LocationToView(lat, northEast.Longitude);
                figures.Add(CreateLineFigure(p1, p2));

                if (ParentMap.ViewTransform.Rotation == 0d)
                {
                    var text = GetLatitudeLabelText(lat, labelFormat);
                    labels.Add(new Label(text, p1.X, p1.Y, 0d, HorizontalAlignment.Left, VerticalAlignment.Bottom));
                    labels.Add(new Label(text, p2.X, p2.Y, 0d, HorizontalAlignment.Right, VerticalAlignment.Bottom));
                }
            }

            for (var lon = minLon; lon <= northEast.Longitude; lon += lineDistance)
            {
                var p1 = ParentMap.LocationToView(southWest.Latitude, lon);
                var p2 = ParentMap.LocationToView(northEast.Latitude, lon);
                figures.Add(CreateLineFigure(p1, p2));

                if (ParentMap.ViewTransform.Rotation == 0d)
                {
                    var text = GetLongitudeLabelText(lon, labelFormat);
                    labels.Add(new Label(text, p1.X, p1.Y, 0d, HorizontalAlignment.Left, VerticalAlignment.Bottom));
                    labels.Add(new Label(text, p2.X, p2.Y, 0d, HorizontalAlignment.Left, VerticalAlignment.Top));
                }
                else
                {
                    for (var lat = minLat; lat <= northEast.Latitude; lat += lineDistance)
                    {
                        AddLabel(labels, labelFormat, lat, lon, ParentMap.LocationToView(lat, lon), 0d);
                    }
                }
            }
        }

        private void DrawGraticule(PathFigureCollection figures, List<Label> labels)
        {
            var lineDistance = GetLineDistance(true);
            var labelFormat = GetLabelFormat(lineDistance);
            var pointDistance = Math.Min(lineDistance, 1d);
            var interpolationCount = (int)(lineDistance / pointDistance);
            var center = Math.Round(ParentMap.Center.Longitude / lineDistance) * lineDistance;
            var minLat = Math.Round(ParentMap.Center.Latitude / pointDistance) * pointDistance;
            var maxLat = minLat;
            var minLon = center;
            var maxLon = center;

            for (var lon = center;
                lon >= center - 180d && DrawMeridian(figures, lon, pointDistance, ref minLat, ref maxLat);
                lon -= lineDistance)
            {
                minLon = lon;
            }

            for (var lon = center + lineDistance;
                lon < center + 180d && DrawMeridian(figures, lon, pointDistance, ref minLat, ref maxLat);
                lon += lineDistance)
            {
                maxLon = lon;
            }

            if (minLon + 360d > maxLon)
            {
                minLon -= lineDistance;
            }

            if (maxLon - 360d < minLon)
            {
                maxLon += lineDistance;
            }

            if (pointDistance < lineDistance)
            {
                minLat = Math.Ceiling(minLat / lineDistance - 1e-6) * lineDistance;
                maxLat = Math.Floor(maxLat / lineDistance + 1e-6) * lineDistance;
            }

            maxLat += 1e-6;
            maxLon += 1e-6;

            for (var lat = minLat; lat <= maxLat; lat += lineDistance)
            {
                var points = new List<Point>();

                for (var lon = minLon; lon <= maxLon; lon += lineDistance)
                {
                    var p = ParentMap.LocationToView(lat, lon);
                    points.Add(p);
                    AddLabel(labels, labelFormat, lat, lon, p, -ParentMap.MapProjection.GridConvergence(lat, lon));

                    for (int j = 1; j < interpolationCount; j++)
                    {
                        points.Add(ParentMap.LocationToView(lat, lon + j * pointDistance));
                    }
                }

                if (points.Count >= 2)
                {
                    figures.Add(CreatePolylineFigure(points));
                }
            }
        }

        private bool DrawMeridian(PathFigureCollection figures, double lon,
            double latStep, ref double minLat, ref double maxLat)
        {
            var points = new List<Point>();
            var visible = false;

            for (var lat = minLat + latStep; lat < maxLat; lat += latStep)
            {
                var p = ParentMap.LocationToView(lat, lon);
                points.Add(p);
                visible = visible || ParentMap.InsideViewBounds(p);
            }

            for (var lat = minLat; lat >= -90d; lat -= latStep)
            {
                var p = ParentMap.LocationToView(lat, lon);
                points.Insert(0, p);

                if (!ParentMap.InsideViewBounds(p)) break;

                minLat = lat;
                visible = true;
            }

            for (var lat = maxLat; lat <= 90d; lat += latStep)
            {
                var p = ParentMap.LocationToView(lat, lon);
                points.Add(p);

                if (!ParentMap.InsideViewBounds(p)) break;

                maxLat = lat;
                visible = true;
            }

            if (visible && points.Count >= 2)
            {
                figures.Add(CreatePolylineFigure(points));
            }

            return visible;
        }

        private void AddLabel(List<Label> labels, string labelFormat, double lat, double lon, Point position, double rotation)
        {
            if (lat > -90d && lat < 90d && ParentMap.InsideViewBounds(position))
            {
                rotation = ((rotation + ParentMap.ViewTransform.Rotation) % 360d + 540d) % 360d - 180d;

                if (rotation < -90d)
                {
                    rotation += 180d;
                }
                else if (rotation > 90d)
                {
                    rotation -= 180d;
                }

                var text = GetLatitudeLabelText(lat, labelFormat) +
                    "\n" + GetLongitudeLabelText(lon, labelFormat);

                labels.Add(new Label(text, position.X, position.Y, rotation));
            }
        }

        private static string GetLatitudeLabelText(double value, string labelFormat)
        {
            return GetLabelText(value, labelFormat, "NS");
        }

        private static string GetLongitudeLabelText(double value, string labelFormat)
        {
            return GetLabelText(Location.NormalizeLongitude(value), labelFormat, "EW");
        }

        private static string GetLabelText(double value, string labelFormat, string hemispheres)
        {
            var hemisphere = hemispheres[0];

            if (value < -1e-8) // ~1 mm
            {
                value = -value;
                hemisphere = hemispheres[1];
            }

            var seconds = (int)Math.Round(value * 3600d);

            return string.Format(CultureInfo.InvariantCulture,
                labelFormat, hemisphere, seconds / 3600, seconds / 60 % 60, seconds % 60);
        }
    }
}