using Microsoft.Extensions.Configuration;
using Phares.Shared;
using System.Globalization;
using System.Text;
using View_by_Distance.Date.Group.Models;
using View_by_Distance.Property.Models;
using View_by_Distance.Shared.Models.Methods;
using WindowsShortcutFactory;

namespace View_by_Distance.Date.Group;

public class DateGroup
{

    private readonly Serilog.ILogger? _Log;
    private readonly AppSettings _AppSettings;
    private readonly List<string> _Exceptions;
    private readonly IsEnvironment _IsEnvironment;
    private readonly Models.Configuration _Configuration;
    private readonly List<KeyValuePair<string, string>> _FileKeyValuePairs;
    private readonly Dictionary<string, List<Tuple<string, Shared.Models.Property>>> _FilePropertiesKeyValuePairs;

    public DateGroup(List<string> args, IsEnvironment isEnvironment, IConfigurationRoot configurationRoot, AppSettings appSettings, string workingDirectory, bool isSilent, IConsole console)
    {
        if (isSilent)
        { }
        if (args is null)
        { }
        if (console is null)
        { }
        _AppSettings = appSettings;
        _IsEnvironment = isEnvironment;
        _Exceptions = new List<string>();
        _Log = Serilog.Log.ForContext<DateGroup>();
        _FileKeyValuePairs = new List<KeyValuePair<string, string>>();
        _FilePropertiesKeyValuePairs = new Dictionary<string, List<Tuple<string, Shared.Models.Property>>>();
        Property.Models.Configuration propertyConfiguration = Property.Models.Binder.Configuration.Get(isEnvironment, configurationRoot);
        Property.Models.Configuration.Verify(propertyConfiguration, requireExist: true);
        Models.Configuration configuration = Models.Stateless.Configuration.Get(isEnvironment, configurationRoot, workingDirectory, propertyConfiguration);
        Verify(configuration);
        bool reverse = false;
        _Configuration = configuration;
        string outputExtension = ".jpg";
        if (configuration.ByHash is null)
            throw new NullReferenceException(nameof(configuration.ByHash));
        if (configuration.ByCreateDateShortcut is null)
            throw new NullReferenceException(nameof(configuration.ByCreateDateShortcut));
        if (!_IsEnvironment.Development)
            throw new Exception("This program only allows development environments!");
        long ticks = DateTime.Now.Ticks;
        A_Property propertyLogic = GetPropertyLogic(reverse, outputExtension);
        string[] dbFiles = Directory.GetFiles(propertyConfiguration.RootDirectory, "*.db", SearchOption.AllDirectories);
        foreach (string dbFile in dbFiles)
            File.Delete(dbFile);
        if (true || appSettings.MaxDegreeOfParallelism < 2)
            ticks = LogDelta(ticks, nameof(File.Delete));
        for (int i = 1; i < 10; i++)
            _ = Shared.Models.Stateless.Methods.IPath.DeleteEmptyDirectories(propertyConfiguration.RootDirectory);
        if (true || appSettings.MaxDegreeOfParallelism < 2)
            ticks = LogDelta(ticks, nameof(Shared.Models.Stateless.Methods.IPath.DeleteEmptyDirectories));
        (int j, int f, int t, Shared.Models.Container[] containers) = Property.Models.Stateless.Container.GetContainers(propertyConfiguration, propertyLogic);
        if (propertyLogic.ExceptionsDirectories.Any())
            throw new Exception();
        if (propertyConfiguration.PopulatePropertyId && (configuration.ByCreateDateShortcut.Value || configuration.ByHash.Value) && Shared.Models.Stateless.Methods.IProperty.Any(containers))
        {
            propertyLogic.SavePropertyParallelWork(ticks, containers);
            if (appSettings.MaxDegreeOfParallelism < 2)
                ticks = LogDelta(ticks, nameof(A_Property.SavePropertyParallelWork));
            if (propertyLogic.ExceptionsDirectories.Any())
                throw new Exception();
        }
        if (configuration.ByCreateDateShortcut.HasValue && configuration.ByCreateDateShortcut.Value)
            CreateDateShortcut(propertyConfiguration, containers);
        else
            MoveFiles(propertyConfiguration, containers);
    }

    private static void Verify(Models.Configuration configuration)
    {
        if (configuration.ByCreateDateShortcut is null)
            throw new NullReferenceException(nameof(configuration.ByCreateDateShortcut));
        if (configuration.ByDay is null)
            throw new NullReferenceException(nameof(configuration.ByDay));
        if (configuration.ByHash is null)
            throw new NullReferenceException(nameof(configuration.ByHash));
        if (configuration.BySeason is null)
            throw new NullReferenceException(nameof(configuration.BySeason));
        if (configuration.ByWeek is null)
            throw new NullReferenceException(nameof(configuration.ByWeek));
        if (!configuration.ByCreateDateShortcut.Value && !configuration.ByDay.Value && !configuration.ByWeek.Value && !configuration.BySeason.Value && !configuration.ByHash.Value)
            throw new Exception("Change configuration!");
        if (configuration.KeepFullPath is null)
            throw new NullReferenceException(nameof(configuration.KeepFullPath));
        if (configuration?.PropertyConfiguration?.PopulatePropertyId is null)
            throw new NullReferenceException(nameof(configuration.PropertyConfiguration.PopulatePropertyId));
        if (configuration.PropertyConfiguration.PopulatePropertyId && !configuration.ByCreateDateShortcut.Value && !configuration.ByHash.Value)
            throw new Exception("Change configuration!");
        if (!configuration.PropertyConfiguration.PopulatePropertyId && configuration.ByHash.Value)
            throw new Exception("Change configuration!");
        if (configuration.ByCreateDateShortcut.Value && configuration.ByDay.Value && configuration.ByWeek.Value && configuration.BySeason.Value && configuration.ByHash.Value)
            throw new Exception("Change configuration!");
    }

    private static bool WriteAllText(string path, string contents, bool compareBeforeWrite)
    {
        bool result;
        string text;
        if (!compareBeforeWrite)
            result = true;
        else
        {
            if (!File.Exists(path))
                text = string.Empty;
            else
                text = File.ReadAllText(path);
            result = text != contents;
        }
        if (result)
        {
            if (path.Contains("()"))
                File.WriteAllText(path, contents);
            else if (path.Contains("{}") && !path.EndsWith(".json"))
                File.WriteAllText(path, contents);
            else if (path.Contains("[]") && !path.EndsWith(".json"))
                File.WriteAllText(path, contents);
            else if (path.Contains("{}") && path.EndsWith(".json") && contents[0] == '{')
                File.WriteAllText(path, contents);
            else if (path.Contains("[]") && path.EndsWith(".json") && contents[0] == '[')
                File.WriteAllText(path, contents);
            else
                File.WriteAllText(path, contents);
        }
        return result;
    }

    private long LogDelta(long ticks, string? methodName)
    {
        long result;
        if (_Log is null)
            throw new NullReferenceException(nameof(_Log));
        double delta = new TimeSpan(DateTime.Now.Ticks - ticks).TotalMilliseconds;
        _Log.Debug($"{methodName} took {Math.Floor(delta)} millisecond(s)");
        result = DateTime.Now.Ticks;
        return result;
    }

    private List<(long MinimumDateTimeTicks, string Source, string[] Destination)> GetMoveFileCollection(string destinationDirectory, string topDirectory, Shared.Models.Item[] filteredItems)
    {
        List<(long MinimumDateTimeTicks, string Source, string[] Destination)> results = new();
        if (_Configuration.ByCreateDateShortcut is null)
            throw new NullReferenceException(nameof(_Configuration.ByCreateDateShortcut));
        if (_Configuration.ByDay is null)
            throw new NullReferenceException(nameof(_Configuration.ByDay));
        if (_Configuration.ByHash is null)
            throw new NullReferenceException(nameof(_Configuration.ByHash));
        if (_Configuration.BySeason is null)
            throw new NullReferenceException(nameof(_Configuration.BySeason));
        if (_Configuration.ByWeek is null)
            throw new NullReferenceException(nameof(_Configuration.ByWeek));
        if (_Configuration.KeepFullPath is null)
            throw new NullReferenceException(nameof(_Configuration.KeepFullPath));
        char flag;
        string day;
        int season;
        string year;
        string month;
        string? check;
        string fileName;
        string? pathRoot;
        string seasonName;
        string weekOfYear;
        bool? isWrongYear;
        string seasonValue;
        string directoryName;
        string topDirectoryName;
        string[]? matches = null;
        string[] directorySegments;
        DateTime? minimumDateTime = null;
        List<string> destinationCollection;
        List<string> directoryNames = new();
        List<string> topDirectorySegments = new();
        StringBuilder destinationDirectoryName = new();
        Calendar calendar = new CultureInfo("en-US").Calendar;
        for (int z = 1; z < 3; z++)
        {
            if (z == 1)
            {
                check = Path.Combine(destinationDirectory, ".");
                pathRoot = Path.GetPathRoot(destinationDirectory);
            }
            else if (z == 2)
            {
                check = Path.Combine(topDirectory, ".");
                pathRoot = Path.GetPathRoot(topDirectory);
            }
            else
                throw new Exception();
            if (string.IsNullOrEmpty(pathRoot))
                continue;
            for (int i = 0; i < int.MaxValue; i++)
            {
                check = Path.GetDirectoryName(check);
                if (string.IsNullOrEmpty(check) || check == pathRoot)
                    break;
                directoryName = Path.GetFileName(check);
                directorySegments = directoryName.Split(' ');
                topDirectorySegments.AddRange(directorySegments);
                (_, matches) = Shared.Models.Stateless.Methods.IProperty.IsWrongYear(directorySegments, string.Empty);
                if (matches.Any())
                    break;
            }
            if (matches is not null && matches.Any())
                break;
        }
        if (matches is null)
            matches = Array.Empty<string>();
        foreach (Shared.Models.Item item in filteredItems)
        {
            if (item.Property?.Id is null || item.ImageFileHolder is null)
                continue;
            directoryNames.Clear();
            destinationCollection = new();
            _ = destinationDirectoryName.Clear();
            minimumDateTime = Shared.Models.Stateless.Methods.IProperty.GetMinimumDateTime(item.Property);
            day = minimumDateTime.Value.ToString("MM-dd");
            month = minimumDateTime.Value.ToString("MMMM");
            (isWrongYear, _) = item.Property.IsWrongYear(item.ImageFileHolder, minimumDateTime);
            if (isWrongYear is null)
                flag = '#';
            else
            {
                if (isWrongYear.Value)
                    flag = '~';
                else
                {
                    if (item.Property.DateTimeOriginal.HasValue && minimumDateTime.Value.DayOfYear != item.Property.DateTimeOriginal.Value.DayOfYear && Math.Abs(new TimeSpan(minimumDateTime.Value.Ticks - item.Property.DateTimeOriginal.Value.Ticks).TotalHours) > 8)
                        flag = '^';
                    else
                        flag = '=';
                }
            }
            (season, seasonName) = Shared.Models.Stateless.Methods.IProperty.GetSeason(minimumDateTime.Value.DayOfYear);
            if ((from l in topDirectorySegments where l == "Christmas" select true).Any())
                seasonValue = string.Empty;
            else
                seasonValue = $".{season}";
            if (isWrongYear is null || !isWrongYear.Value)
                year = $"{flag}{minimumDateTime.Value:yyyy}{seasonValue}";
            else
            {
                if (matches[0][0] != '~')
                    year = $"{flag}{matches[0].Split('.')[0]}{seasonValue}";
                else
                    year = $"{flag}{matches[0][1..].Split('.')[0]}{seasonValue}";
            }
            topDirectoryName = Path.GetFileName(topDirectory);
            weekOfYear = calendar.GetWeekOfYear(minimumDateTime.Value, CalendarWeekRule.FirstDay, DayOfWeek.Sunday).ToString("00");
            if (_Configuration.ByHash.Value)
                directoryNames.Add($"{year} {seasonName}");
            else if (_Configuration.BySeason.Value && topDirectoryName.Length == 1 && topDirectoryName[0] == '_')
                directoryNames.Add($"{year} {seasonName}");
            else
            {
                if (!_Configuration.KeepFullPath.Value)
                {
                    _ = destinationDirectoryName.Append(topDirectoryName);
                    if (_Configuration.BySeason.Value)
                        directoryNames.AddRange(new string[] { $"{destinationDirectoryName} {year}", $"{year} {seasonName}" });
                    else if (_Configuration.ByDay.Value)
                        directoryNames.AddRange(new string[] { $"{destinationDirectoryName} {year}", $"{weekOfYear}) {year}-{day}" });
                    else if (_Configuration.ByWeek.Value)
                        directoryNames.AddRange(new string[] { $"{destinationDirectoryName} {year}", $"{weekOfYear}) {year} {month}" });
                    else
                        throw new Exception();
                }
                else
                {
                    foreach (string sourceDirectoryNameSegment in topDirectorySegments)
                    {
                        if (matches.Contains(sourceDirectoryNameSegment))
                            _ = destinationDirectoryName.Append(year);
                        else
                            _ = destinationDirectoryName.Append(sourceDirectoryNameSegment);
                    }
                    if (_Configuration.BySeason.Value)
                        directoryNames.Add($"{year} {seasonName}");
                    else if (_Configuration.ByDay.Value)
                        directoryNames.Add($"{weekOfYear}) {year} {day}");
                    else if (_Configuration.ByWeek.Value)
                        directoryNames.Add($"{weekOfYear}) {month} {year}");
                    else
                        throw new Exception();
                }
            }
            if (!_Configuration.ByHash.Value || item.Property.Id is null)
                fileName = item.ImageFileHolder.Name;
            else
                fileName = $"{item.Property.Id.Value}{item.ImageFileHolder.ExtensionLowered}";
            destinationCollection.Add(destinationDirectory);
            destinationCollection.AddRange(directoryNames);
            destinationCollection.Add(fileName);
            results.Add(new(minimumDateTime.Value.Ticks, item.ImageFileHolder.FullName, destinationCollection.ToArray()));
        }
        return results;
    }

    private A_Property GetPropertyLogic(bool reverse, string outputExtension)
    {
        A_Property result;
        if (_Configuration?.PropertyConfiguration is null)
            throw new NullReferenceException(nameof(_Configuration.PropertyConfiguration));
        result = new(_AppSettings.MaxDegreeOfParallelism, _Configuration.PropertyConfiguration, outputExtension, reverse);
        return result;
    }

    private static Shared.Models.Item[] GetFilterItems(Shared.Models.Container container)
    {
        List<Shared.Models.Item> results = new();
        foreach (Shared.Models.Item item in container.Items)
        {
            if (item.ImageFileHolder is not null
                && (item.Abandoned is null || !item.Abandoned.Value)
                && item.ValidImageFormatExtension)
                results.Add(item);
        }
        return results.ToArray();
    }

    private (long MinimumDateTimeTicks, string Source, string[] Destination)[] GetFileMoveCollectionAll(Property.Models.Configuration configuration, Shared.Models.Container[] containers, string destinationRoot)
    {
        (long MinimumDateTimeTicks, string Source, string[] Destination)[] results;
        if (_Configuration.KeepFullPath is null)
            throw new NullReferenceException(nameof(_Configuration.KeepFullPath));
        string? topDirectory;
        string? checkDirectory;
        string destinationDirectory;
        Shared.Models.Item[] filteredItems;
        List<(long MinimumDateTimeTicks, string Source, string[] Destination)> fileMoveCollection = new();
        List<(long MinimumDateTimeTicks, string Source, string[] Destination)> fileMoveCollectionDirectory;
        foreach (Shared.Models.Container container in containers)
        {
            if (!container.Items.Any())
                continue;
            if (!_Configuration.KeepFullPath.Value)
                destinationDirectory = destinationRoot;
            else
                destinationDirectory = string.Concat(destinationRoot, container.SourceDirectory[configuration.RootDirectory.Length..]);
            checkDirectory = Path.GetFullPath(container.SourceDirectory);
            for (int z = 0; z < int.MaxValue; z++)
            {
                if (checkDirectory == configuration.RootDirectory)
                    break;
                checkDirectory = Path.GetDirectoryName(checkDirectory);
                if (string.IsNullOrEmpty(checkDirectory))
                    break;
            }
            if (string.IsNullOrEmpty(checkDirectory))
                continue;
            topDirectory = checkDirectory;
            filteredItems = GetFilterItems(container);
            if (!filteredItems.Any())
                continue;
            fileMoveCollectionDirectory = GetMoveFileCollection(destinationDirectory, topDirectory, filteredItems);
            fileMoveCollection.AddRange(fileMoveCollectionDirectory);
        }
        results = (from l in fileMoveCollection orderby l.MinimumDateTimeTicks descending select l).ToArray();
        return results;
    }

    private void MoveFiles(Property.Models.Configuration configuration, Shared.Models.Container[] containers)
    {
        if (_Log is null)
            throw new NullReferenceException(nameof(_Log));
        if (_Configuration.ByHash is null)
            throw new NullReferenceException(nameof(_Configuration.ByHash));
        string directoryName;
        List<string> distinct = new();
        string duplicate = "-Duplicate";
        string destinationRoot = Property.Models.Stateless.IResult.GetResultsGroupDirectory(configuration, "Z) Moved");
        (long MinimumDateTimeTicks, string Source, string[] Destination)[] fileMoveCollectionAll = GetFileMoveCollectionAll(configuration, containers, destinationRoot);
        foreach ((long _, string source, string[] destination) in fileMoveCollectionAll)
        {
            directoryName = Path.Combine(destination.Take(destination.Length - 1).ToArray());
            if (distinct.Contains(directoryName))
                continue;
            distinct.Add(directoryName);
            if (!Directory.Exists(directoryName))
                _ = Directory.CreateDirectory(directoryName);
            if (_Configuration.ByHash.Value)
            {
                if (!Directory.Exists(string.Concat(directoryName, duplicate)))
                    _ = Directory.CreateDirectory(string.Concat(directoryName, duplicate));
            }
        }
        _Log.Information("Ready to move files?");
        for (int y = 0; y < int.MaxValue; y++)
        {
            _Log.Information("Press \"Y\" key to move file(s) or close console to not move files");
            if (Console.ReadKey().Key == ConsoleKey.Y)
                break;
        }
        _Log.Information(". . .");
        int moved = 0;
        string fullFileName;
        foreach ((long _, string source, string[] destination) in fileMoveCollectionAll)
        {
            fullFileName = Path.Combine(destination);
            if (File.Exists(fullFileName))
            {
                if (!_Configuration.ByHash.Value)
                    continue;
                else
                {
                    destination[1] = string.Concat(destination[1], duplicate);
                    fullFileName = Path.Combine(destination);
                    if (File.Exists(fullFileName))
                        continue;
                }
            }
            File.Move(source, fullFileName);
            moved += 1;
        }
        if (_Configuration.ByHash.Value)
            _ = Shared.Models.Stateless.Methods.IPath.DeleteEmptyDirectories(destinationRoot);
        _Log.Information($"{moved} file(s) moved");
        for (int y = 0; y < int.MaxValue; y++)
        {
            _Log.Information("Press \"Y\" key to move file(s) back or close console to leave them moved");
            if (Console.ReadKey().Key == ConsoleKey.Y)
                break;
        }
        _Log.Information(". . .");
        foreach ((long _, string source, string[] destination) in fileMoveCollectionAll)
        {
            fullFileName = Path.Combine(destination);
            if (File.Exists(source))
                continue;
            if (!File.Exists(fullFileName))
                continue;
            File.Move(fullFileName, source);
            moved += 1;
        }
        _Log.Information($"Done moving back {moved} file(s)");
        for (int i = 1; i < 10; i++)
            _ = Shared.Models.Stateless.Methods.IPath.DeleteEmptyDirectories(configuration.RootDirectory);
    }

    private static void CreateDateShortcut(Property.Models.Configuration configuration, Shared.Models.Container[] containers)
    {
        string path;
        string fileName;
        string directory;
        int selectedTotal;
        const int minimum = 3;
        List<DateTime> dateTimes;
        DateTime? minimumDateTime;
        const int maximumHours = 24;
        string? relativePathDirectory;
        WindowsShortcut windowsShortcut;
        TimeSpan threeStandardDeviationHigh;
        List<Shared.Models.Item> selectedItems;
        string aPropertyContentDirectory = Property.Models.Stateless.IResult.GetResultsDateGroupDirectory(configuration, nameof(A_Property), "()");
        foreach (Shared.Models.Container container in containers)
        {
            if (!container.Items.Any())
                continue;
            selectedTotal = 0;
            threeStandardDeviationHigh = Shared.Models.Stateless.Methods.IProperty.GetThreeStandardDeviationHigh(minimum, container);
            if (threeStandardDeviationHigh.TotalHours > maximumHours)
                threeStandardDeviationHigh = new(maximumHours, 0, 0);
            for (int i = 0; i < container.Items.Count; i++)
            {
                (i, dateTimes, selectedItems) = Shared.Models.Stateless.Methods.IProperty.Get(container, threeStandardDeviationHigh, i);
                selectedTotal += selectedItems.Count;
                foreach (Shared.Models.Item item in selectedItems)
                {
                    if (item.Property is null)
                        continue;
                    relativePathDirectory = Path.GetDirectoryName(item.RelativePath);
                    if (string.IsNullOrEmpty(relativePathDirectory))
                        continue;
                    minimumDateTime = Shared.Models.Stateless.Methods.IProperty.GetMinimumDateTime(item.Property);
                    if (minimumDateTime is null)
                        continue;
                    path = Path.GetFullPath($"{configuration.RootDirectory}{item.RelativePath[..^5]}");
                    directory = Path.Combine($"{aPropertyContentDirectory}{relativePathDirectory}", $"{dateTimes.Min():yyyy-MM-dd_HH-mm-ss}---{dateTimes.Max():yyyy-MM-dd_HH-mm-ss}");
                    if (!Directory.Exists(directory))
                        _ = Directory.CreateDirectory(directory);
                    fileName = Path.Combine(directory, $"{Path.GetFileName(item.RelativePath[..^5])}.lnk");
                    if (File.Exists(fileName))
                        continue;
                    windowsShortcut = new() { Path = path };
                    windowsShortcut.Save(fileName);
                    windowsShortcut.Dispose();
                    if (!File.Exists(fileName))
                        continue;
                    File.SetLastWriteTime(fileName, minimumDateTime.Value);
                }
            }
            if (selectedTotal < container.Items.Count && selectedTotal < (from l in container.Items where l.Property is not null select true).Count())
                continue;
        }
    }

}