using System;
using System.Collections.Generic;
using System.Data.Common;
using System.IO;
using System.Linq;
using AdvenOfCode.Contracts;
using Coordinate = (int x, int y, int z);

namespace AoC_2025;

public class Day08
{
    private Coordinate[] ParsePuzzleInput(string path)
    {
        var puzzleInput = File.ReadAllLines(path)
            .Where(line => !string.IsNullOrWhiteSpace(line))
            .Select(line => line.Split(',', StringSplitOptions.RemoveEmptyEntries).Select(str => int.Parse(str)).ToArray())
            .Select(numbers => (numbers[0], numbers[1], numbers[2]))
            .ToArray();
        return puzzleInput;
    }

    public long SolvePart1(string pathToPuzzleInput, int amountToConnect)
    {
        var jBoxes = ParsePuzzleInput(pathToPuzzleInput);
        var jBoxPairs = GetAllCombinationsSortedByDistance(jBoxes);
        var circuits = CreateCircuits(jBoxes);
        circuits = CombineCircuits(circuits, jBoxPairs, amountToConnect);
        return circuits
            .Select(circuit => circuit.Count)
            .OrderDescending()
            .Take(3)
            .Aggregate((acc, next) => acc * next);
    }

    private List<List<Coordinate>> CreateCircuits(Coordinate[] jBoxes)
    {
        return jBoxes.Select(p => new List<Coordinate> { p }).ToList();
    }

    public long SolvePart2(string pathToPuzzleInput)
    {
        var jBoxes = ParsePuzzleInput(pathToPuzzleInput);
        var jBoxPairs = GetAllCombinationsSortedByDistance(jBoxes);
        var circuits = CreateCircuits(jBoxes);
        var lastConnected = LastCombinedConnectAllCircuits(circuits, jBoxPairs);
        return lastConnected.a.x * lastConnected.b.x;
    }
    
    private List<List<Coordinate>> CombineCircuits(List<List<Coordinate>> circuits,
        (Coordinate boxA, Coordinate boxB)[] jBoxPairs, int amountToConnect)
    {
        for (var i = 0; i < amountToConnect; i++)
        {
            var nextToConnect = jBoxPairs[i];
            circuits = ConnectJBoxes(nextToConnect.boxA, nextToConnect.boxB, circuits);
        }

        return circuits;
    }

    private (Coordinate a, Coordinate b) LastCombinedConnectAllCircuits(List<List<Coordinate>> circuits,
        (Coordinate boxA, Coordinate boxB)[] jBoxPairs)
    {
        foreach (var jBoxPair in jBoxPairs)
        {
            circuits = ConnectJBoxes(jBoxPair.boxA, jBoxPair.boxB, circuits);
            if(circuits.Count <= 1)
                return jBoxPair;
        }
        return jBoxPairs[^1];
    }

    private double GetDistance(Coordinate a, Coordinate b)
    {
        return Math.Sqrt(Math.Pow(a.x - b.x, 2) + Math.Pow(a.y - b.y, 2) + Math.Pow(a.z - b.z, 2));
    }

    private List<List<Coordinate>> ConnectJBoxes(Coordinate a, Coordinate b, List<List<Coordinate>> circuits)
    {
        var circuitToAddBTo = circuits.First(circuit => circuit.Contains(a));
        var circuitToAddATo = circuits.First(circuit => circuit.Contains(b));

        if (circuitToAddATo == circuitToAddBTo)
        {
            return circuits;
        }

        circuitToAddBTo.AddRange(circuitToAddATo);
        circuits.Remove(circuitToAddATo);
        return circuits;
    }

    private (Coordinate boxA, Coordinate boxB)[] GetAllCombinationsSortedByDistance(Coordinate[] jBoxes)
    {
        var combinations = Combinations(jBoxes)
            .OrderBy(x => GetDistance(x.a, x.b))
            .ToArray();
        return combinations;
    }

    private IEnumerable<(TValue a, TValue b)> Combinations<TValue>(IEnumerable<TValue> values)
    {
        var enumeratedValues = values.Index().ToArray();
        var pairs = 
            from a in enumeratedValues
            from b in enumeratedValues
            where a.Index < b.Index
            select (a.Item, b.Item);
        return pairs;
    }
}