// Copyright (C) Stichting Deltares 2017. All rights reserved.
//
// This file is part of Ringtoets.
//
// Ringtoets is free software: you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation, either version 3 of the License, or
// (at your option) any later version.
// 
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program. If not, see <http://www.gnu.org/licenses/>.
//
// All names, logos, and references to "Deltares" are registered trademarks of
// Stichting Deltares and remain full property of Stichting Deltares at all times.
// All rights reserved.

using System.Collections.Generic;
using System.Linq;
using Core.Common.Base.Geometry;
using Deltares.WTIPiping;
using RingtoetsPipingSurfaceLine = Ringtoets.Piping.Primitives.PipingSurfaceLine;

namespace Ringtoets.Piping.KernelWrapper.Creators
{
    /// <summary>
    /// Creates <see cref="PipingSurfaceLine"/> instances which are required by the <see cref="PipingCalculator"/>.
    /// </summary>
    internal static class PipingSurfaceLineCreator
    {
        /// <summary>
        /// Creates a <see cref="PipingSurfaceLine"/> for the kernel given a <see cref="RingtoetsPipingSurfaceLine"/>.
        /// </summary>
        /// <param name="line">The surface line configured in the Ringtoets application.</param>
        /// <returns>The surface line to be consumed by the kernel.</returns>
        public static PipingSurfaceLine Create(RingtoetsPipingSurfaceLine line)
        {
            var surfaceLine = new PipingSurfaceLine
            {
                Name = line.Name
            };
            if (line.Points.Any())
            {
                surfaceLine.Points.AddRange(CreatePoints(line));
            }

            return surfaceLine;
        }

        private static IEnumerable<PipingPoint> CreatePoints(RingtoetsPipingSurfaceLine line)
        {
            Point2D[] projectedPoints = line.LocalGeometry.ToArray();
            var pipingPoints = new List<PipingPoint>();

            for (var i = 0; i < line.Points.Count(); i++)
            {
                IEnumerable<PipingPoint> newPoints = CreatePoint(line, projectedPoints, i);
                pipingPoints.AddRange(newPoints);
            }
            return pipingPoints;
        }

        private static IEnumerable<PipingPoint> CreatePoint(RingtoetsPipingSurfaceLine line, IEnumerable<Point2D> projectedPoints, int index)
        {
            Point3D surfaceLinePoint = line.Points.ElementAt(index);
            Point2D projectedPoint = projectedPoints.ElementAt(index);

            var pipingPoints = new List<PipingPoint>();

            if (ReferenceEquals(line.DitchPolderSide, surfaceLinePoint))
            {
                pipingPoints.Add(CreatePipingPointOfType(projectedPoint, PipingCharacteristicPointType.DitchPolderSide));
            }
            if (ReferenceEquals(line.BottomDitchPolderSide, surfaceLinePoint))
            {
                pipingPoints.Add(CreatePipingPointOfType(projectedPoint, PipingCharacteristicPointType.BottomDitchPolderSide));
            }
            if (ReferenceEquals(line.BottomDitchDikeSide, surfaceLinePoint))
            {
                pipingPoints.Add(CreatePipingPointOfType(projectedPoint, PipingCharacteristicPointType.BottomDitchDikeSide));
            }
            if (ReferenceEquals(line.DitchDikeSide, surfaceLinePoint))
            {
                pipingPoints.Add(CreatePipingPointOfType(projectedPoint, PipingCharacteristicPointType.DitchDikeSide));
            }
            if (ReferenceEquals(line.DikeToeAtPolder, surfaceLinePoint))
            {
                pipingPoints.Add(CreatePipingPointOfType(projectedPoint, PipingCharacteristicPointType.DikeToeAtPolder));
            }
            if (!pipingPoints.Any())
            {
                pipingPoints.Add(CreatePipingPointOfType(projectedPoint, PipingCharacteristicPointType.None));
            }

            return pipingPoints;
        }

        private static PipingPoint CreatePipingPointOfType(Point2D projectedPoint, PipingCharacteristicPointType pointType)
        {
            var pipingPoint = new PipingPoint(projectedPoint.X, 0.0, projectedPoint.Y)
            {
                Type = pointType
            };
            return pipingPoint;
        }
    }
}