using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Media;
using Tango.BL.Entities;
using Tango.BL.Enumerations;
using Tango.ColorConversion;
using Tango.Core;
using Tango.Core.ExtensionMethods;

namespace Tango.Integration.Operation
{
    /// <summary>
    /// Represents the default <see cref="IMachineOperator"/> gradient steps generation configuration.
    /// </summary>
    public class DefaultGradientGenerationConfiguration : ExtendedObject, IGradientGenerationConfiguration
    {
        private class CMYK
        {
            public double C { get; set; }
            public double M { get; set; }
            public double Y { get; set; }
            public double K { get; set; }
            public double OffsetPercent { get; set; }
        }

        private bool aborted;

        private bool _isEnabled;
        /// <summary>
        /// Gets or sets a value indicating whether to generate the gradient steps.
        /// </summary>
        public bool IsEnabled
        {
            get { return _isEnabled; }
            set { _isEnabled = value; RaisePropertyChangedAuto(); }
        }

        private int _resolutionCM;
        /// <summary>
        /// Gets or sets the gradient steps resolution in centimeters.
        /// </summary>
        public int ResolutionCM
        {
            get { return _resolutionCM; }
            set { _resolutionCM = value; RaisePropertyChangedAuto(); }
        }

        /// <summary>
        /// Initializes a new instance of the <see cref="DefaultGradientGenerationConfiguration"/> class.
        /// </summary>
        public DefaultGradientGenerationConfiguration()
        {
            ResolutionCM = 500;
        }

        /// <summary>
        /// Creates a collection of brush stops representing the required gradient steps.
        /// </summary>
        /// <param name="segment">The segment.</param>
        /// <param name="job">The job</param>
        /// <param name="processParameters">The process parameters.</param>
        /// <param name="progress">Progress callback.</param>
        /// <returns></returns>
        public List<BrushStop> Generate(Segment segment, Job job, ProcessParametersTable processParameters, Action<PreparingJobProgressEventArgs> progress = null)
        {
            aborted = false;

            List<BrushStop> stops = new List<BrushStop>();

            var previousSegmentsLength = segment.GetPreviousSegments().Sum(x => x.Length);

            int stopIndex = 1;

            if (ResolutionCM > segment.Length * 100d)
            {
                return segment.BrushStops.ToList();
            }

            IColorConverter converter = new DefaultColorConverter();

            var clonedStops = segment.BrushStops.ToList().Select(x => x.Clone(segment)).ToList();

            foreach (var stop in clonedStops)
            {
                if (aborted) return stops;

                if (stop.LiquidVolumes == null)
                {
                    stop.SetLiquidVolumes(job.Machine.Configuration, job.Rml, processParameters);
                }

                if (stop.BrushColorSpace == ColorSpaces.RGB || stop.BrushColorSpace == ColorSpaces.LAB)
                {
                    var output = converter.Convert(segment.Job, stop.Color, false);
                    output.ApplyOnBrushStop(stop, processParameters);
                }
            }

            var refStop = clonedStops.First().Clone(segment);

            for (double cm = 0; cm <= segment.Length; cm += (ResolutionCM / 100d))
            {
                if (aborted) return stops;

                double offset = (double)cm / segment.Length;

                var cmyk = GetRelativeCMYK(clonedStops.ToList(), offset);
                var stop = refStop.Clone(segment);

                stop.OffsetPercent = offset * 100d;
                stop.OffsetMeters = segment.Length * offset;
                stop.StopIndex = stopIndex++;

                stop.SetVolume(LiquidTypes.Cyan, cmyk.C);
                stop.SetVolume(LiquidTypes.Magenta, cmyk.M);
                stop.SetVolume(LiquidTypes.Yellow, cmyk.Y);
                stop.SetVolume(LiquidTypes.Black, cmyk.K);

                stop.SetLiquidVolumes(job.Machine.Configuration, job.Rml, processParameters);

                stops.Add(stop);

                progress?.Invoke(new PreparingJobProgressEventArgs()
                {
                    Job = job,
                    Total = job.Segments.Sum(x => x.Length),
                    Progress = previousSegmentsLength + cm,
                });
            }

            stops.Last().OffsetPercent = 100;
            stops.Last().OffsetMeters = segment.Length;

            progress?.Invoke(new PreparingJobProgressEventArgs()
            {
                Job = job,
                Total = job.Segments.Sum(x => x.Length),
                Progress = previousSegmentsLength + segment.Length,
            });

            return stops;
        }

        private CMYK GetRelativeCMYK(List<BrushStop> brushStopsCollection, double offset)
        {
            BrushStop refStop = brushStopsCollection.First().Clone();

            brushStopsCollection = brushStopsCollection.Select(x => x.Clone()).ToList();
            brushStopsCollection.ForEach(x => x.OffsetPercent = x.OffsetPercent / 100d);

            var cmykCollection = brushStopsCollection.Select(x => GetCMYK(x)).ToList();

            var stop = cmykCollection.FirstOrDefault(f => f.OffsetPercent == offset);
            if (stop != null) return stop;

            CMYK before = cmykCollection.Where(w => w.OffsetPercent == cmykCollection.Min(m => m.OffsetPercent)).First();
            CMYK after = cmykCollection.Where(w => w.OffsetPercent == cmykCollection.Max(m => m.OffsetPercent)).First();

            foreach (var gs in cmykCollection)
            {
                if (gs.OffsetPercent < offset && gs.OffsetPercent > before.OffsetPercent)
                {
                    before = gs;
                }
                if (gs.OffsetPercent > offset && gs.OffsetPercent < after.OffsetPercent)
                {
                    after = gs;
                }
            }

            CMYK cmyk = new CMYK();

            cmyk.C = (float)((offset - before.OffsetPercent) * (after.C - before.C) / (after.OffsetPercent - before.OffsetPercent) + before.C);
            cmyk.M = (float)((offset - before.OffsetPercent) * (after.M - before.M) / (after.OffsetPercent - before.OffsetPercent) + before.M);
            cmyk.Y = (float)((offset - before.OffsetPercent) * (after.Y - before.Y) / (after.OffsetPercent - before.OffsetPercent) + before.Y);
            cmyk.K = (float)((offset - before.OffsetPercent) * (after.K - before.K) / (after.OffsetPercent - before.OffsetPercent) + before.K);

            //cmyk.C *= 100d;
            //cmyk.M *= 100d;
            //cmyk.Y *= 100d;
            //cmyk.K *= 100d;

            return cmyk;
        }

        private CMYK GetCMYK(BrushStop stop)
        {
            CMYK cmyk = new CMYK();
            cmyk.C = stop.GetVolume(LiquidTypes.Cyan);
            cmyk.M = stop.GetVolume(LiquidTypes.Magenta);
            cmyk.Y = stop.GetVolume(LiquidTypes.Yellow);
            cmyk.K = stop.GetVolume(LiquidTypes.Black);
            cmyk.OffsetPercent = stop.OffsetPercent;
            return cmyk;
        }

        private Color GetRelativeRGB(List<BrushStop> brushStopsCollection, double offset)
        {
            brushStopsCollection = brushStopsCollection.Select(x => x.ShallowClone()).ToList();
            brushStopsCollection.ForEach(x => x.OffsetPercent = x.OffsetPercent / 100d);

            var point = brushStopsCollection.SingleOrDefault(f => f.OffsetPercent == offset);
            if (point != null) return point.Color;

            BrushStop before = brushStopsCollection.Where(w => w.OffsetPercent == brushStopsCollection.Min(m => m.OffsetPercent)).First();
            BrushStop after = brushStopsCollection.Where(w => w.OffsetPercent == brushStopsCollection.Max(m => m.OffsetPercent)).First();

            foreach (var gs in brushStopsCollection)
            {
                if (gs.OffsetPercent < offset && gs.OffsetPercent > before.OffsetPercent)
                {
                    before = gs;
                }
                if (gs.OffsetPercent > offset && gs.OffsetPercent < after.OffsetPercent)
                {
                    after = gs;
                }
            }

            var color = new Color();

            color.ScA = (float)((offset - before.OffsetPercent) * (after.Color.ScA - before.Color.ScA) / (after.OffsetPercent - before.OffsetPercent) + before.Color.ScA);
            color.ScR = (float)((offset - before.OffsetPercent) * (after.Color.ScR - before.Color.ScR) / (after.OffsetPercent - before.OffsetPercent) + before.Color.ScR);
            color.ScG = (float)((offset - before.OffsetPercent) * (after.Color.ScG - before.Color.ScG) / (after.OffsetPercent - before.OffsetPercent) + before.Color.ScG);
            color.ScB = (float)((offset - before.OffsetPercent) * (after.Color.ScB - before.Color.ScB) / (after.OffsetPercent - before.OffsetPercent) + before.Color.ScB);

            return color;
        }

        /// <summary>
        /// Aborts the current generation.
        /// </summary>
        public void AbortCurrentGeneration()
        {
            aborted = true;
        }
    }
}