package catalogue

import (
	"os"
	"path/filepath"
	"strings"
	"testing"
)

// TestEveryCatalogueManifestParses runs the real catalogue through the real gate.
//
// Not a fixture: the point is whether the manifests as written are accepted by the control plane that
// will read them, and a copy of one manifest proves nothing about the other seventy-one.
// catalogueRoot is the catalogue these checks run over: MESH_CATALOGUE when set, else the checkout
// beside this one, the way the main layout has it. A check that only ran when somebody remembered a
// variable was a check nobody ran (novox/hq issue 134, 2026-09-30); it skips only when there is no
// catalogue to be found at all.
func catalogueRoot(t *testing.T) string {
	t.Helper()
	if root := os.Getenv("MESH_CATALOGUE"); root != "" {
		return root
	}
	sibling := filepath.Join("..", "..", "..", "mesh-catalog")
	if _, err := os.Stat(filepath.Join(sibling, "modules")); err != nil {
		t.Skip("no catalogue beside this checkout and MESH_CATALOGUE unset")
	}
	return sibling
}

func TestEveryCatalogueManifestParses(t *testing.T) {
	root := catalogueRoot(t)
	found, err := filepath.Glob(filepath.Join(root, "modules", "*", "module.json"))
	if err != nil || len(found) == 0 {
		t.Fatalf("no manifests under %s: %v", root, err)
	}
	named, routed := 0, 0
	for _, p := range found {
		raw, err := os.ReadFile(p)
		if err != nil {
			t.Fatalf("%s: %v", p, err)
		}
		m, err := ParseManifest(raw)
		if err != nil {
			t.Errorf("%s: %v", filepath.Base(filepath.Dir(p)), err)
			continue
		}
		for _, l := range m.Listens {
			if l.Name != "" {
				named++
			}
		}
		for port := range RoutedPorts(m) {
			_ = port
			routed++
		}
	}
	t.Logf("%d manifests, %d named endpoints, %d routed endpoints resolved", len(found), named, routed)
	if named == 0 {
		t.Fatal("no endpoint in the catalogue is named, so this proved nothing")
	}
}

// TestNoCatalogueManifestNamesAnInstallation is ADR 0112's check, run over the real catalogue: no
// definition names a domain or a public address the mesh acts on, and every value that must for now
// carries its reason (novox/hq ADR 0155, issue 134). The list it prints is the one that shrinks.
func TestNoCatalogueManifestNamesAnInstallation(t *testing.T) {
	root := catalogueRoot(t)
	found, err := filepath.Glob(filepath.Join(root, "modules", "*", "module.json"))
	if err != nil || len(found) == 0 {
		t.Fatalf("no manifests under %s: %v", root, err)
	}
	var named []string
	for _, p := range found {
		raw, err := os.ReadFile(p)
		if err != nil {
			t.Fatalf("%s: %v", p, err)
		}
		m, err := ParseManifest(raw)
		if err != nil {
			t.Errorf("%s: %v", p, err)
			continue
		}
		named = append(named, InstallationProblems(m)...)
	}
	if len(named) > 0 {
		t.Fatalf("%d value(s) name an installation:\n  %s", len(named), strings.Join(named, "\n  "))
	}
}