package biz.koziolek.adventofcode.year2021.day11

import biz.koziolek.adventofcode.*
import java.util.*

fun main() {
    val inputFile = findInput(object {})
    val lines = inputFile.bufferedReader().readLines()
    val map = parseOctopusMap(lines)

    println("Flashes after 100 steps: ${countFlashes(map, maxStep = 100)}")
    println("First step all flash: ${nextTimeAllFlash(map)}")
}

data class Octopus(val energy: Int, val flashed: Boolean = false) {
    fun increaseEnergy(): Octopus {
        if (flashed) {
            return this
        }

        val newEnergy = energy.inc()
        val flashed = (newEnergy > 9)

        return copy(
            energy = if (flashed) 0 else newEnergy,
            flashed = flashed
        )
    }
}

fun parseOctopusMap(lines: List<String>): Map<Coord, Octopus> =
    lines.parse2DMap { Octopus(it.digitToInt()) }.toMap()

fun countFlashes(map0: Map<Coord, Octopus>, maxStep: Int): Int =
    generateSequence(map0) { map -> calculateNextStep(map) }
        .take(maxStep + 1)
        .sumOf { map -> map.values.count { octopus -> octopus.flashed } }

fun nextTimeAllFlash(map0: Map<Coord, Octopus>): Int =
    generateSequence(map0) { map -> calculateNextStep(map) }
        .takeWhile { map -> !map.values.all { octopus -> octopus.flashed } }
        .count()

fun calculateNextStep(map: Map<Coord, Octopus>): Map<Coord, Octopus> {
    return buildMap {
        map.forEach { (coord, octopus) ->
            put(coord, octopus.copy(flashed = false))
        }

        val toVisit: Queue<Coord> = ArrayDeque(map.keys)
        var currentCoord: Coord? = toVisit.remove()

        while (currentCoord != null) {
            computeIfPresent(currentCoord) { coord, octopus ->
                val newOctopus = octopus.increaseEnergy()
                if (!octopus.flashed && newOctopus.flashed) {
                    toVisit.addAll(this.getAdjacentCoords(coord, includeDiagonal = true))
                }
                newOctopus
            }

            currentCoord = toVisit.poll()
        }
    }
}

fun toString(map: Map<Coord, Octopus>, color: Boolean = true): String {
    val width = map.getWidth()
    val height = map.getHeight()

    return buildString {
        for (y in 0 until height) {
            for (x in 0 until width) {
                val octopus = map[Coord(x, y)]
                if (octopus != null) {
                    if (octopus.flashed) {
                        if (color) {
                            append(AsciiColor.BRIGHT_WHITE.format(octopus.energy))
                        } else {
                            append(octopus.energy)
                        }
                    } else {
                        append(octopus.energy.toString())
                    }
                } else {
                    if (color) {
                        append(AsciiColor.BRIGHT_BLACK.format("?"))
                    } else {
                        append("?")
                    }
                }
            }

            if (y < height - 1) {
                append("\n")
            }
        }
    }
}

package biz.koziolek.adventofcode.year2021.day11

import biz.koziolek.adventofcode.*
import java.util.*

fun main() {
    val inputFile = findInput(object {})
    val lines = inputFile.bufferedReader().readLines()
    val map = parseOctopusMap(lines)

    println("Flashes after 100 steps: ${countFlashes(map, maxStep = 100)}")
    println("First step all flash: ${nextTimeAllFlash(map)}")
}

data class Octopus(val energy: Int, val flashed: Boolean = false) {
    fun increaseEnergy(): Octopus {
        if (flashed) {
            return this
        }

        val newEnergy = energy.inc()
        val flashed = (newEnergy > 9)

        return copy(
            energy = if (flashed) 0 else newEnergy,
            flashed = flashed
        )
    }
}

fun parseOctopusMap(lines: List<String>): Map<Coord, Octopus> =
    lines.parse2DMap { Octopus(it.digitToInt()) }.toMap()

fun countFlashes(map0: Map<Coord, Octopus>, maxStep: Int): Int =
    generateSequence(map0) { map -> calculateNextStep(map) }
        .take(maxStep + 1)
        .sumOf { map -> map.values.count { octopus -> octopus.flashed } }

fun nextTimeAllFlash(map0: Map<Coord, Octopus>): Int =
    generateSequence(map0) { map -> calculateNextStep(map) }
        .takeWhile { map -> !map.values.all { octopus -> octopus.flashed } }
        .count()

fun calculateNextStep(map: Map<Coord, Octopus>): Map<Coord, Octopus> {
    return buildMap {
        map.forEach { (coord, octopus) ->
            put(coord, octopus.copy(flashed = false))
        }

        val toVisit: Queue<Coord> = ArrayDeque(map.keys)
        var currentCoord: Coord? = toVisit.remove()

        while (currentCoord != null) {
            computeIfPresent(currentCoord) { coord, octopus ->
                val newOctopus = octopus.increaseEnergy()
                if (!octopus.flashed && newOctopus.flashed) {
                    toVisit.addAll(this.getAdjacentCoords(coord, includeDiagonal = true))
                }
                newOctopus
            }

            currentCoord = toVisit.poll()
        }
    }
}

fun toString(map: Map<Coord, Octopus>, color: Boolean = true): String {
    val width = map.getWidth()
    val height = map.getHeight()

    return buildString {
        for (y in 0 until height) {
            for (x in 0 until width) {
                val octopus = map[Coord(x, y)]
                if (octopus != null) {
                    if (octopus.flashed) {
                        if (color) {
                            append(AsciiColor.BRIGHT_WHITE.format(octopus.energy))
                        } else {
                            append(octopus.energy)
                        }
                    } else {
                        append(octopus.energy.toString())
                    }
                } else {
                    if (color) {
                        append(AsciiColor.BRIGHT_BLACK.format("?"))
                    } else {
                        append("?")
                    }
                }
            }

            if (y < height - 1) {
                append("\n")
            }
        }
    }
}
