// Package level definierar banformatet och ren spellogik kring det
// (validering, framkomlighet). Paketet importerar inte Ebitengine och
// kan därför testas utan fönster.
//
// Banor lagras som JSON i resources/data/levels/. Rutnätet är en lista av
// lika långa strängar där varje tecken är en ruta (se Tile-konstanterna).
package level

import (
	"encoding/json"
	"fmt"
	"math"
	"os"
	"path/filepath"
	"sort"
	"strings"
)

// Tile är ett tecken i rutnätet.
type Tile byte

// Tecknen som får förekomma i ett rutnät.
const (
	Wall          Tile = '#' // vägg, ej passerbar
	Floor         Tile = '.' // golv
	Spawn         Tile = 'S' // startpunkt (exakt en)
	Platform      Tile = 'P' // perrong med ett tåg (målet om tåget är rätt)
	WrongPlatform Tile = 'p' // perrong med fel tåg
	Gate          Tile = 'G' // spärr (kräver kort/biljett)
	TicketMachine Tile = 'T' // biljett-/påfyllningsautomat
	Sign          Tile = 'i' // skylt
	Toilet        Tile = 'W' // toalett (sällskapets toamätare)
	Kiosk         Tile = 'K' // kiosk/automat för mat och dryck
	StairsUp      Tile = 'U' // trappa upp: leder till 'D' på samma x,y en våning upp
	StairsDown    Tile = 'D' // trappa ner: leder till 'U' på samma x,y en våning ner
	LaneLeft      Tile = '<' // fil för gång uppåt/åt vänster (bredare gångar: håll till vänster)
	LaneRight     Tile = '>' // fil för gång neråt/åt höger
)

var knownTiles = map[Tile]bool{
	Wall: true, Floor: true, Spawn: true, Platform: true, WrongPlatform: true,
	Gate: true, TicketMachine: true, Sign: true, Toilet: true, Kiosk: true,
	StairsUp: true, StairsDown: true, LaneLeft: true, LaneRight: true,
}

// IsLane rapporterar om rutan är en markerad fil.
func (t Tile) IsLane() bool { return t == LaneLeft || t == LaneRight }

// IsStairs rapporterar om rutan är en trappa.
func (t Tile) IsStairs() bool { return t == StairsUp || t == StairsDown }

// Passable rapporterar om en ruta går att gå på (utan hänsyn till spärrar).
func (t Tile) Passable() bool { return t != Wall }

// Text är en flerspråkig sträng, t.ex. {"sv": "Flygplatsen", "en": "The Airport", "ja": "空港"}.
type Text map[string]string

// Get hämtar texten på ett språk med fallback till engelska, sedan vilket som helst.
func (t Text) Get(lang string) string {
	if s, ok := t[lang]; ok {
		return s
	}
	if s, ok := t["en"]; ok {
		return s
	}
	for _, s := range t {
		return s
	}
	return ""
}

// Schedule är ett tågs tidtabell i sekunder från banstart: första ankomst
// vid OffsetSec, därefter var IntervalSec; tåget står DwellSec vid perrongen.
type Schedule struct {
	OffsetSec   float64 `json:"offsetSec"`
	IntervalSec float64 `json:"intervalSec"`
	DwellSec    float64 `json:"dwellSec"`
}

// Standardvärden som fylls i av Validate när fältet är 0.
const (
	DefaultIntervalSec = 30.0
	DefaultDwellSec    = 10.0
	DefaultFareYen     = 200
	MaxParty           = 5
	DefaultRideStops   = 3
)

// Status returnerar om tåget står vid perrongen vid tiden t, och hur många
// sekunder det är kvar – till avgång om det står där, annars till ankomst.
func (s Schedule) Status(t float64) (atPlatform bool, seconds float64) {
	if t < s.OffsetSec {
		return false, s.OffsetSec - t
	}
	phase := math.Mod(t-s.OffsetSec, s.IntervalSec)
	if phase < s.DwellSec {
		return true, s.DwellSec - phase
	}
	return false, s.IntervalSec - phase
}

// Phase är var i cykeln ett tåg befinner sig.
type Phase int

// Tågfaser i ordning över en cykel.
const (
	Away        Phase = iota // borta
	Approaching              // på väg in: melodi, lampor, vind (ApproachSec före ankomst)
	Arriving                 // rullar in och bromsar (ArriveSec), dörrarna stängda
	Dwelling                 // står inne med öppna dörrar
	Closing                  // strax avgång: dörrsignal (sista WarnSec av uppehållet)
	Leaving                  // rullar ut (LeaveSec efter avgång)
)

func (p Phase) String() string {
	return [...]string{"away", "approaching", "arriving", "dwelling", "closing", "leaving"}[p]
}

// Fasernas längder i sekunder.
const (
	ApproachSec = 5.0
	ArriveSec   = 1.5
	WarnSec     = 3.0
	LeaveSec    = 1.5
	MinDwellSec = ArriveSec + WarnSec + 1 // minst en sekund öppna dörrar utan signal
)

// Phase returnerar fasen vid tiden t och hur långt in i fasen man är (0..1).
func (s Schedule) Phase(t float64) (Phase, float64) {
	var phi float64 // tid sedan senaste ankomst, kan vara negativ före första
	if t < s.OffsetSec {
		phi = t - s.OffsetSec
		if -phi <= ApproachSec {
			return Approaching, 1 + phi/ApproachSec
		}
		return Away, 0
	} else {
		phi = math.Mod(t-s.OffsetSec, s.IntervalSec)
	}
	switch {
	case phi < ArriveSec:
		return Arriving, phi / ArriveSec
	case phi < s.DwellSec-WarnSec:
		return Dwelling, (phi - ArriveSec) / max(0.001, s.DwellSec-WarnSec-ArriveSec)
	case phi < s.DwellSec:
		return Closing, (phi - (s.DwellSec - WarnSec)) / WarnSec
	case phi < s.DwellSec+LeaveSec:
		return Leaving, (phi - s.DwellSec) / LeaveSec
	case phi >= s.IntervalSec-ApproachSec:
		return Approaching, (phi - (s.IntervalSec - ApproachSec)) / ApproachSec
	default:
		return Away, (phi - s.DwellSec - LeaveSec) / max(0.001, s.IntervalSec-ApproachSec-s.DwellSec-LeaveSec)
	}
}

// Boardable rapporterar om dörrarna är öppna så att man kan kliva på.
func (s Schedule) Boardable(t float64) bool {
	p, _ := s.Phase(t)
	return p == Dwelling || p == Closing
}

// Present rapporterar om tåget syns vid perrongen (rullar in, står, rullar ut).
func (s Schedule) Present(t float64) bool {
	p, _ := s.Phase(t)
	return p == Arriving || p == Dwelling || p == Closing || p == Leaving
}

// Train är ett tåg (eller en buss) som avgår från en perrong i banan.
type Train struct {
	Platform      string   `json:"platform"`      // vilket perrong-tecken (P/p) tåget står vid
	Track         string   `json:"track"`         // spårnummer som visas på skyltar/HUD, t.ex. "2"
	Line          Text     `json:"line"`          // linjens namn
	Destination   Text     `json:"destination"`   // slutstation
	Correct       bool     `json:"correct"`       // tar spelaren till rätt resmål
	Crowded       bool     `json:"crowded"`       // fullt tåg: minispel för att få plats (gäller alla vagnar)
	Cars          int      `json:"cars"`          // antal vagnar (0 = DefaultCars)
	WomenOnlyCar  int      `json:"womenOnlyCar"`  // 1-baserat vagnnummer för kvinnovagn, 0 = ingen
	WomenOnlyFrom int      `json:"womenOnlyFrom"` // kvinnovagn gäller från den här bantiden (s); 0 och To=0 = alltid
	WomenOnlyTo   int      `json:"womenOnlyTo"`   // …till den här bantiden (s)
	Schedule      Schedule `json:"schedule"`
}

// DefaultCars och gränser för vagnar.
const (
	DefaultCars = 3
	MaxCars     = 8
)

// WomenOnlyActive rapporterar om kvinnovagnen gäller vid bantiden t.
func (tr *Train) WomenOnlyActive(t float64) bool {
	if tr.WomenOnlyCar == 0 {
		return false
	}
	if tr.WomenOnlyFrom == 0 && tr.WomenOnlyTo == 0 {
		return true
	}
	return t >= float64(tr.WomenOnlyFrom) && t < float64(tr.WomenOnlyTo)
}

// SignText är texten på en skyltruta ('i').
type SignText struct {
	X    int  `json:"x"`
	Y    int  `json:"y"`
	Z    int  `json:"z"` // våning (0 = första i floors)
	Text Text `json:"text"`
}

// Storey är en våning: ett rutnät med namn ("B1", "1F", "2F").
type Storey struct {
	Name   string   `json:"name"`
	Grid   []string `json:"grid"`
	Floors []Storey `json:"floors,omitempty"` // flervåningsbana; alla våningar lika stora
}

// Rewards är vad en klarad bana ger utöver poäng.
type Rewards struct {
	Items       []string `json:"items"`       // item-id:n (t.ex. skins) som delas ut första gången
	SkillPoints int      `json:"skillPoints"` // extra skillpoäng första gången
}

// Level är en bana.
type Level struct {
	ID              string     `json:"id"`
	Kind            string     `json:"kind"`   // "main" (standard) eller "side"
	Order           int        `json:"order"`  // huvudbanornas ordning på bankartan (1, 2, …); sidobanor ärver förälderns
	Parent          string     `json:"parent"` // sidobanans huvudbana – låses upp när den är klarad
	Rewards         Rewards    `json:"rewards"`
	Shop            []string   `json:"shop"`    // items som kiosken säljer på banan (tom = seedat urval)
	Crowd           int        `json:"crowd"`   // folk på stationen 0–3 (NPC:er)
	Clutter         int        `json:"clutter"` // visuell röra 0–3 (affischer, lockskyltar)
	Noise           int        `json:"noise"`   // ljudröra 0–3 (bakgrundsprat)
	Name            Text       `json:"name"`
	Difficulty      int        `json:"difficulty"`       // 1 (lätt) … 5 (svår)
	Destination     Text       `json:"destination"`      // dit spelaren ska
	TimeLimitSec    int        `json:"timeLimitSec"`     // 0 = ingen tidsgräns
	ParSec          int        `json:"parSec"`           // "bra tid" för tre stjärnor (0 = räknas ut från kortaste vägen)
	Party           int        `json:"party"`            // antal i sällskapet inkl. spelaren (0 = 1)
	TicketRequired  bool       `json:"ticketRequired"`   // spärren kräver pappersbiljett (köps i automaten) i stället för kort
	RideStops       int        `json:"rideStops"`        // antal stationer på tågresan (0 = DefaultRideStops)
	MaxMissedTrains int        `json:"maxMissedTrains"`  // >0: fler missade tåg än så förlorar banan
	IndividualCards bool       `json:"individualCards"`  // alla i sällskapet har egna kort (och biljetter) som spärren kräver
	SeatSelection   bool       `json:"seatSelection"`    // biljettköpet fortsätter med sittplatsval efter sällskapets önskemål
	FareYen         int        `json:"fareYen"`          // vad spärren drar från kortet (0 = standard)
	Grid            []string   `json:"grid,omitempty"`   // envåningsbana (kompatibilitet) – blir Floors[0]
	Floors          []Storey   `json:"floors,omitempty"` // flervåningsbana; alla våningar lika stora
	Trains          []Train    `json:"trains"`
	Signs           []SignText `json:"signs"`
}

// Point är en rutkoordinat: x, y och våning z.
type Point struct{ X, Y, Z int }

// Up/Down ger rutan rakt ovanför/under (via trappa).
func (p Point) Up() Point   { return Point{X: p.X, Y: p.Y, Z: p.Z + 1} }
func (p Point) Down() Point { return Point{X: p.X, Y: p.Y, Z: p.Z - 1} }

// dirs är de fyra grannriktningarna på samma våning.
var dirs = [...]Point{{X: 1}, {X: -1}, {Y: 1}, {Y: -1}}

// Parse avkodar och validerar en bana.
func Parse(data []byte) (*Level, error) {
	var l Level
	if err := json.Unmarshal(data, &l); err != nil {
		return nil, fmt.Errorf("level: ogiltig JSON: %w", err)
	}
	if err := l.Validate(); err != nil {
		return nil, err
	}
	return &l, nil
}

// Width och Height i rutor (alla våningar är lika stora).
func (l *Level) Width() int {
	if len(l.Floors) == 0 || len(l.Floors[0].Grid) == 0 {
		return 0
	}
	return len(l.Floors[0].Grid[0])
}
func (l *Level) Height() int {
	if len(l.Floors) == 0 {
		return 0
	}
	return len(l.Floors[0].Grid)
}

// NumFloors är antalet våningar.
func (l *Level) NumFloors() int { return len(l.Floors) }

// FloorName är våningens namn ("1F" om det saknas).
func (l *Level) FloorName(z int) string {
	if z < 0 || z >= len(l.Floors) || l.Floors[z].Name == "" {
		return "1F"
	}
	return l.Floors[z].Name
}

// At returnerar rutan på p; utanför kartan (eller våningarna) räknas som vägg.
func (l *Level) At(p Point) Tile { return l.FloorAt(p.Z, p.X, p.Y) }

// FloorAt returnerar rutan (x, y) på våning z; utanför kartan räknas som vägg.
func (l *Level) FloorAt(z, x, y int) Tile {
	if z < 0 || z >= len(l.Floors) {
		return Wall
	}
	g := l.Floors[z].Grid
	if y < 0 || y >= len(g) || x < 0 || x >= len(g[y]) {
		return Wall
	}
	return Tile(g[y][x])
}

// Find returnerar alla rutor av en viss typ på alla våningar.
func (l *Level) Find(t Tile) []Point {
	var pts []Point
	for z, f := range l.Floors {
		for y, row := range f.Grid {
			for x := 0; x < len(row); x++ {
				if Tile(row[x]) == t {
					pts = append(pts, Point{X: x, Y: y, Z: z})
				}
			}
		}
	}
	return pts
}

// Neighbors är rutorna man kan gå till från p: de fyra grannarna på samma
// våning samt trappans andra ände. Passerbarhet avgörs av anroparen.
func (l *Level) Neighbors(p Point) []Point {
	out := make([]Point, 0, 5)
	for _, d := range dirs {
		out = append(out, Point{X: p.X + d.X, Y: p.Y + d.Y, Z: p.Z})
	}
	switch l.At(p) {
	case StairsUp:
		out = append(out, p.Up())
	case StairsDown:
		out = append(out, p.Down())
	}
	return out
}

// SpawnPoint returnerar startrutan (valideringen garanterar att den finns).
func (l *Level) SpawnPoint() Point { return l.Find(Spawn)[0] }

// Validate kontrollerar att banan är rimlig: rektangulär, bara kända tecken,
// exakt en start, minst en perrong, och att varje tåg står vid ett
// perrong-tecken som finns i rutnätet.
func (l *Level) Validate() error {
	if l.ID == "" {
		return fmt.Errorf("level: saknar id")
	}
	switch l.Kind {
	case "":
		l.Kind = "main"
	case "main", "side":
	default:
		return fmt.Errorf("level %s: kind måste vara main eller side", l.ID)
	}
	if l.Kind == "side" && l.Parent == "" {
		return fmt.Errorf("level %s: sidobana utan parent", l.ID)
	}
	if l.Kind == "main" && l.Parent != "" {
		return fmt.Errorf("level %s: huvudbana med parent", l.ID)
	}
	if l.Order < 0 {
		return fmt.Errorf("level %s: negativ order", l.ID)
	}
	if len(l.Floors) == 0 {
		if len(l.Grid) == 0 {
			return fmt.Errorf("level %s: tomt rutnät", l.ID)
		}
		l.Floors = []Storey{{Name: "1F", Grid: l.Grid}}
	} else if len(l.Grid) > 0 {
		return fmt.Errorf("level %s: ange antingen grid eller floors, inte båda", l.ID)
	}
	l.Grid = l.Floors[0].Grid // kompatibilitet: Grid = första våningen
	if len(l.Floors[0].Grid) == 0 {
		return fmt.Errorf("level %s: tom första våning", l.ID)
	}
	w, h := len(l.Floors[0].Grid[0]), len(l.Floors[0].Grid)
	spawns, platforms := 0, 0
	for z, f := range l.Floors {
		if len(f.Grid) != h {
			return fmt.Errorf("level %s: våning %d har %d rader, förväntade %d", l.ID, z, len(f.Grid), h)
		}
		for y, row := range f.Grid {
			if len(row) != w {
				return fmt.Errorf("level %s: våning %d rad %d har längd %d, förväntade %d", l.ID, z, y, len(row), w)
			}
			for x := 0; x < len(row); x++ {
				t := Tile(row[x])
				if !knownTiles[t] {
					return fmt.Errorf("level %s: okänt tecken %q på (%d,%d,%d)", l.ID, row[x], x, y, z)
				}
				switch t {
				case Spawn:
					spawns++
				case Platform, WrongPlatform:
					platforms++
				case StairsUp:
					if l.FloorAt(z+1, x, y) != StairsDown {
						return fmt.Errorf("level %s: trappa upp på (%d,%d,%d) saknar trappa ner ovanför", l.ID, x, y, z)
					}
				case StairsDown:
					if l.FloorAt(z-1, x, y) != StairsUp {
						return fmt.Errorf("level %s: trappa ner på (%d,%d,%d) saknar trappa upp under", l.ID, x, y, z)
					}
				}
			}
		}
	}
	if spawns != 1 {
		return fmt.Errorf("level %s: förväntade exakt en start (S), hittade %d", l.ID, spawns)
	}
	if platforms == 0 {
		return fmt.Errorf("level %s: saknar perronger (P/p)", l.ID)
	}
	if len(l.Trains) == 0 {
		return fmt.Errorf("level %s: saknar tåg", l.ID)
	}
	correct := 0
	for i := range l.Trains {
		tr := &l.Trains[i]
		if len(tr.Platform) != 1 || (Tile(tr.Platform[0]) != Platform && Tile(tr.Platform[0]) != WrongPlatform) {
			return fmt.Errorf("level %s: tåg %d har ogiltig perrong %q", l.ID, i, tr.Platform)
		}
		if len(l.Find(Tile(tr.Platform[0]))) == 0 {
			return fmt.Errorf("level %s: tåg %d står vid perrong %q som inte finns i rutnätet", l.ID, i, tr.Platform)
		}
		if tr.Correct {
			correct++
		}
		if tr.Cars == 0 {
			tr.Cars = DefaultCars
		}
		if tr.Cars < 1 || tr.Cars > MaxCars {
			return fmt.Errorf("level %s: tåg %d har %d vagnar (1–%d)", l.ID, i, tr.Cars, MaxCars)
		}
		if tr.WomenOnlyCar < 0 || tr.WomenOnlyCar > tr.Cars || tr.WomenOnlyFrom < 0 || tr.WomenOnlyTo < tr.WomenOnlyFrom {
			return fmt.Errorf("level %s: tåg %d har ogiltig kvinnovagn (%d av %d, %d–%d s)", l.ID, i, tr.WomenOnlyCar, tr.Cars, tr.WomenOnlyFrom, tr.WomenOnlyTo)
		}
		sc := &tr.Schedule
		if sc.IntervalSec == 0 {
			sc.IntervalSec = DefaultIntervalSec
		}
		if sc.DwellSec == 0 {
			sc.DwellSec = DefaultDwellSec
		}
		if sc.OffsetSec < 0 || sc.IntervalSec <= 0 || sc.DwellSec <= 0 || sc.DwellSec >= sc.IntervalSec {
			return fmt.Errorf("level %s: tåg %d har orimlig tidtabell %+v (kräver offset ≥ 0, 0 < dwell < interval)", l.ID, i, *sc)
		}
		if sc.DwellSec < MinDwellSec || sc.IntervalSec-sc.DwellSec < LeaveSec+ApproachSec+1 {
			return fmt.Errorf("level %s: tåg %d: uppehållet måste vara ≥ %.1f s och tiden borta ≥ %.1f s för tågfaserna", l.ID, i, MinDwellSec, LeaveSec+ApproachSec+1)
		}
	}
	if correct == 0 {
		return fmt.Errorf("level %s: inget tåg är markerat som rätt", l.ID)
	}
	if l.FareYen == 0 {
		l.FareYen = DefaultFareYen
	}
	if l.FareYen < 0 || l.ParSec < 0 || l.Party < 0 {
		return fmt.Errorf("level %s: negativ avgift/partid/sällskap", l.ID)
	}
	if l.Party == 0 {
		l.Party = 1
	}
	if l.RideStops == 0 {
		l.RideStops = DefaultRideStops
	}
	if l.RideStops < 2 || l.RideStops > 8 {
		return fmt.Errorf("level %s: rideStops måste vara 2–8", l.ID)
	}
	if l.TicketRequired && len(l.Find(TicketMachine)) == 0 {
		return fmt.Errorf("level %s: biljettkrav utan biljettautomat (T)", l.ID)
	}
	if l.SeatSelection && !l.TicketRequired {
		return fmt.Errorf("level %s: sittplatsval kräver biljettbana", l.ID)
	}
	if l.MaxMissedTrains < 0 || l.TimeLimitSec < 0 {
		return fmt.Errorf("level %s: negativ tidsgräns/maxantal missade tåg", l.ID)
	}
	for name, v := range map[string]int{"crowd": l.Crowd, "clutter": l.Clutter, "noise": l.Noise} {
		if v < 0 || v > 3 {
			return fmt.Errorf("level %s: %s måste vara 0–3", l.ID, name)
		}
	}
	if l.Party > MaxParty {
		return fmt.Errorf("level %s: sällskapet får vara högst %d", l.ID, MaxParty)
	}
	// Skyltar: varje post måste stå på en 'i'-ruta och varje 'i'-ruta ha text.
	seen := map[Point]bool{}
	for i, sg := range l.Signs {
		p := Point{X: sg.X, Y: sg.Y, Z: sg.Z}
		if l.At(p) != Sign {
			return fmt.Errorf("level %s: skylt %d på (%d,%d,%d) står inte på en skyltruta", l.ID, i, p.X, p.Y, p.Z)
		}
		if seen[p] {
			return fmt.Errorf("level %s: två skyltar på (%d,%d)", l.ID, p.X, p.Y)
		}
		if len(sg.Text) == 0 {
			return fmt.Errorf("level %s: skylt på (%d,%d) saknar text", l.ID, p.X, p.Y)
		}
		seen[p] = true
	}
	for _, p := range l.Find(Sign) {
		if !seen[p] {
			return fmt.Errorf("level %s: skyltrutan (%d,%d,%d) saknar text i \"signs\"", l.ID, p.X, p.Y, p.Z)
		}
	}
	return nil
}

// SignAt returnerar skylten på en ruta, eller nil.
func (l *Level) SignAt(p Point) *SignText {
	for i := range l.Signs {
		if l.Signs[i].X == p.X && l.Signs[i].Y == p.Y && l.Signs[i].Z == p.Z {
			return &l.Signs[i]
		}
	}
	return nil
}

// Path returnerar kortaste vägen från from till to (båda inkluderade) via
// rutor som canEnter godkänner, eller nil om ingen väg finns.
func (l *Level) Path(from, to Point, canEnter func(Point) bool) []Point {
	prev := map[Point]Point{from: from}
	queue := []Point{from}
	for len(queue) > 0 {
		p := queue[0]
		queue = queue[1:]
		if p == to {
			var path []Point
			for ; p != from; p = prev[p] {
				path = append(path, p)
			}
			path = append(path, from)
			for i, j := 0, len(path)-1; i < j; i, j = i+1, j-1 {
				path[i], path[j] = path[j], path[i]
			}
			return path
		}
		for _, n := range l.Neighbors(p) {
			if _, ok := prev[n]; ok || !canEnter(n) {
				continue
			}
			prev[n] = p
			queue = append(queue, n)
		}
	}
	return nil
}

// Reachable returnerar alla rutor som nås från start via passerbara rutor
// (4-riktningars BFS). Spärrar räknas som passerbara.
func (l *Level) Reachable() map[Point]bool {
	start := l.SpawnPoint()
	seen := map[Point]bool{start: true}
	queue := []Point{start}
	for len(queue) > 0 {
		p := queue[0]
		queue = queue[1:]
		for _, n := range l.Neighbors(p) {
			if seen[n] || !l.At(n).Passable() {
				continue
			}
			seen[n] = true
			queue = append(queue, n)
		}
	}
	return seen
}

// Solvable rapporterar om minst en perrong med ett rätt tåg kan nås från start.
func (l *Level) Solvable() bool {
	reach := l.Reachable()
	for _, tr := range l.Trains {
		if !tr.Correct {
			continue
		}
		for _, p := range l.Find(Tile(tr.Platform[0])) {
			if reach[p] {
				return true
			}
		}
	}
	return false
}

// UngatedPlatforms listar perronger som går att nå från start utan att
// passera någon spärr. Speldesignen kräver att alla perronger ligger
// innanför spärrar, så listan ska vara tom för skeppade banor.
func (l *Level) UngatedPlatforms() []Point {
	start := l.SpawnPoint()
	seen := map[Point]bool{start: true}
	queue := []Point{start}
	for len(queue) > 0 {
		p := queue[0]
		queue = queue[1:]
		for _, n := range l.Neighbors(p) {
			t := l.At(n)
			if seen[n] || !t.Passable() || t == Gate {
				continue
			}
			seen[n] = true
			queue = append(queue, n)
		}
	}
	var out []Point
	for _, t := range []Tile{Platform, WrongPlatform} {
		for _, p := range l.Find(t) {
			if seen[p] {
				out = append(out, p)
			}
		}
	}
	return out
}

// Unreachable listar interaktiva rutor (perronger, automater, skyltar) som
// inte går att nå – praktiskt som varning när man bygger banor.
func (l *Level) Unreachable() []Point {
	reach := l.Reachable()
	var out []Point
	for _, t := range []Tile{Platform, WrongPlatform, TicketMachine, Sign, Gate, Toilet, Kiosk} {
		for _, p := range l.Find(t) {
			if !reach[p] {
				out = append(out, p)
			}
		}
	}
	return out
}

// BoardText är avgångstavlans text på japanska, t.ex. "2番線 成田エクスプレス 新宿方面".
func (tr *Train) BoardText() string {
	return tr.Track + "番線 " + tr.Line.Get("ja") + " " + tr.Destination.Get("ja") + "方面"
}

// TrackTile är rutan "bortom perrongkanten" där rälsen går: första väggruta
// nedanför, till höger, till vänster eller ovanför perrongen. horizontal
// anger om rälsen (och tågets rörelse) går i sidled.
func (l *Level) TrackTile(p Point) (tile Point, horizontal bool) {
	for _, d := range [...]Point{{X: 0, Y: 1}, {X: 1, Y: 0}, {X: -1, Y: 0}, {X: 0, Y: -1}} {
		n := Point{X: p.X + d.X, Y: p.Y + d.Y, Z: p.Z}
		if l.At(n) == Wall {
			return n, d.Y != 0
		}
	}
	return p, true
}

// CorrectPlatform returnerar en perrongruta med rätt tåg (valideringen
// garanterar att det finns minst ett rätt tåg vid en befintlig perrong).
func (l *Level) CorrectPlatform() Point {
	for _, tr := range l.Trains {
		if tr.Correct {
			if pts := l.Find(Tile(tr.Platform[0])); len(pts) > 0 {
				return pts[0]
			}
		}
	}
	return l.SpawnPoint()
}

// CanEnter rapporterar om rutan går att gå in på (för sim.Mover).
func (l *Level) CanEnter(p Point) bool { return l.At(p).Passable() }

// TrainAt returnerar tåget vid en perrongruta, eller nil.
func (l *Level) TrainAt(t Tile) *Train {
	for i := range l.Trains {
		if Tile(l.Trains[i].Platform[0]) == t {
			return &l.Trains[i]
		}
	}
	return nil
}

// LoadFile läser och validerar en bana från disk.
func LoadFile(path string) (*Level, error) {
	b, err := os.ReadFile(path)
	if err != nil {
		return nil, fmt.Errorf("level: %w", err)
	}
	return Parse(b)
}

// IsSide rapporterar om banan är en sidobana.
func (l *Level) IsSide() bool { return l.Kind == "side" }

// LoadAll läser alla banor i en mapp, sorterade på id.
func LoadAll(dir string) ([]*Level, error) {
	ids, err := List(dir)
	if err != nil {
		return nil, err
	}
	var out []*Level
	for _, id := range ids {
		l, err := LoadFile(filepath.Join(dir, id+".json"))
		if err != nil {
			return nil, err
		}
		out = append(out, l)
	}
	return out, nil
}

// List returnerar id:n (filnamn utan .json) för alla banor i en mapp, sorterade.
func List(dir string) ([]string, error) {
	files, err := filepath.Glob(filepath.Join(dir, "*.json"))
	if err != nil {
		return nil, err
	}
	ids := make([]string, 0, len(files))
	for _, f := range files {
		ids = append(ids, strings.TrimSuffix(filepath.Base(f), ".json"))
	}
	sort.Strings(ids)
	return ids, nil
}