package web

import (
	"encoding/json"
	"io/fs"
	"net/http"
	"net/http/httptest"
	"net/url"
	"os"
	"path/filepath"
	"regexp"
	"strconv"
	"strings"
	"testing"
	"time"

	"github.com/google/uuid"
	"github.com/gramanas/blogspace/internal/config"
	"github.com/gramanas/blogspace/internal/i18n"
	"github.com/gramanas/blogspace/internal/store"
)

func TestHostname(t *testing.T) {
	cases := map[string]string{"Example.com:8080": "example.com", "a.example.com": "a.example.com", "example.com.": "example.com", "[::1]:80": "::1"}
	for in, want := range cases {
		if got := hostname(in); got != want {
			t.Errorf("hostname(%q) = %q, want %q", in, got, want)
		}
	}
}

// Host routing that does not need the database: unknown hosts and reserved/nested subdomains 404 before any lookup.
func TestHostRoutingWithoutDB(t *testing.T) {
	cfg := &config.Config{BaseDomain: "example.com", JWTSecret: []byte("x"), MaxUploadBytes: 1 << 20}
	s := NewServer(cfg, nil)
	for _, host := range []string{"evil.com", "a.b.example.com", "www.blog.example.com", "static.example.com", "notexample.com"} {
		rec := httptest.NewRecorder()
		req := httptest.NewRequest("GET", "/", nil)
		req.Host = host
		s.ServeHTTP(rec, req)
		if rec.Code != http.StatusNotFound {
			t.Errorf("host %q: got %d, want 404", host, rec.Code)
		}
	}
	// root domain (and www) reach the management mux: /webadmin renders without DB access
	for _, host := range []string{"example.com", "www.example.com", "example.com:8080"} {
		rec := httptest.NewRecorder()
		req := httptest.NewRequest("GET", "/webadmin", nil)
		req.Host = host
		s.ServeHTTP(rec, req)
		if rec.Code != http.StatusOK || !strings.Contains(rec.Body.String(), "Log in") {
			t.Errorf("host %q /webadmin: got %d", host, rec.Code)
		}
	}
}

// On the root domain the literal management routes must win over the blog's /{page} wildcards.
// "blog_" + subdomain must fit a 63-char Postgres database name.
func TestSubdomainLength(t *testing.T) {
	if !subdomainRe.MatchString(strings.Repeat("a", 58)) || subdomainRe.MatchString(strings.Repeat("a", 59)) {
		t.Error("subdomains must be at most 58 chars")
	}
}

func TestRootRoutePrecedence(t *testing.T) {
	cfg := &config.Config{BaseDomain: "example.com", JWTSecret: []byte("x"), MaxUploadBytes: 1 << 20}
	s := NewServer(cfg, nil)
	for path, want := range map[string]int{"/webadmin": 200, "/healthz": 200, "/dashboard": 303, "/admin/": 303, "/b/alice/posts": 303, "/b/alice/announcements": 303, "/b/alice/layout": 303, "/b/alice/media/6ba7b810-9dad-11d1-80b4-00c04fd430c8": 303, "/b/alice/files": 303, "/account/password": 303} {
		rec := httptest.NewRecorder()
		req := httptest.NewRequest("GET", path, nil)
		req.Host = "example.com"
		s.ServeHTTP(rec, req)
		if rec.Code != want {
			t.Errorf("%s: got %d, want %d", path, rec.Code, want)
		}
	}
	for _, slug := range []string{"webadmin", "admin", "b", "media", "feed.xml", "favicon.ico", "tag", "search"} {
		if !reservedPageSlugs[slug] {
			t.Errorf("page slug %q should be reserved", slug)
		}
	}
}

func TestThemeNormalizeAndCSS(t *testing.T) {
	th := ParseTheme([]byte(`{"bg_color":"red;}body{display:none","font":"comic","bg_image":"../etc","logo":"../etc","link_hover":"blue","heading_font":"wingdings","favicon":"x","logo_size":"huge","left_width":5,"right_width":90,"header_rule":"neon\"><script>","custom_font":"x.woff2);}body{display:none"}`))
	if th.BgColor != DefaultTheme().BgColor || th.Font != "sans" || th.BgImage != "" || th.Logo != "" || th.LinkHover != "" || th.HeadingFont != "same" || th.Favicon != "" || th.LogoSize != "medium" || th.HeaderRule != "none" || th.RuleClass() != "" || th.CustomFont != "" {
		t.Errorf("normalize: %+v", th)
	}
	if th.LeftWidth != 15 || th.RightWidth != 40 {
		t.Errorf("width clamp: %+v", th)
	}
	// Themes saved before the new options existed keep today's look: every area on, columns a quarter each.
	if !th.ShowDates || th.LinkUnderline != "always" || th.ContentStyle != "card" || th.DateFormat != "long" {
		t.Errorf("old theme defaults: %+v", th)
	}
	if !th.HeaderOn || !th.LeftOn || !th.RightOn || !th.FooterOn || th.LeftWidth != 15 {
		t.Errorf("old theme layout defaults: %+v", th)
	}
	if th.PostsPerPage != 10 || th.TitleSize != "normal" || th.FooterAlign != "center" {
		t.Errorf("old theme content defaults: %+v", th)
	}
	f := url.Values{"bg_color": {"#ABCDEF"}, "bg_image": {"not-a-uuid"}, "logo_size": {"large"},
		"link_hover": {"#ff0000"}, "nav_hover": {"#00ff00"}, "nav_hover_custom": {"on"}, "nav_style": {"uppercase"}, "nav_align": {"center"},
		"link_underline": {"hover"}, "heading_font": {"serif"}, "content_style": {"flat"}, "content_padding": {"roomy"}, "date_format": {"iso"}, "header_rule": {"stripes"}}
	th = ThemeFromForm(DefaultTheme(), f)
	if th.BgColor != "#abcdef" || th.BgImage != "" || th.LogoSize != "large" || th.RuleClass() != "ruled rule-stripes" {
		t.Errorf("from form: %+v", th)
	}
	if th.LinkHover != "" || th.NavHover != "#00ff00" || th.ShowDates || th.DateFormat != "iso" {
		t.Errorf("hover checkbox / unticked checkboxes: %+v", th)
	}
	css := th.CSS()
	for _, want := range []string{"background-color:#abcdef", "text-transform:uppercase", ".site-nav a:hover { color:#00ff00", "a:hover { text-decoration:underline",
		"h1, h2, h3, h4, h5, h6 { font-family:Georgia", "text-align:center", "border-radius:0", "padding:2.2em 3em", "@media (max-width: 700px)", ".logo { max-height:140px"} {
		if !strings.Contains(css, want) {
			t.Errorf("css missing %q:\n%s", want, css)
		}
	}
	if strings.Contains(css, "display:none") {
		t.Errorf("css: %s", css)
	}
	// Default padding is left to blog.css so its phone override keeps working.
	if css := DefaultTheme().CSS(); strings.Contains(css, "padding:") || strings.Contains(css, "a:hover") {
		t.Errorf("default css should not set padding or hover: %s", css)
	}
	// Plain menu links: regular weight and underlined, instead of blog.css's bold.
	css = ThemeFromForm(DefaultTheme(), url.Values{"nav_style": {"plain"}}).CSS()
	if !strings.Contains(css, ".site-nav a { color:#222222; font-weight:normal; text-decoration:underline; }") {
		t.Errorf("plain nav css: %s", css)
	}
	if css := DefaultTheme().CSS(); strings.Contains(css, "@font-face") || strings.Contains(css, "h1, h2") {
		t.Errorf("default css should declare no font faces or heading rule: %s", css)
	}
}

// The rule under titles is a body class blog.css draws from, coloured by the
// theme CSS; the tag hash is a plain flag the templates read.
func TestTitleRuleAndTagHash(t *testing.T) {
	th := DefaultTheme()
	if th.TitleRuleClass() != "" || th.TagHash || strings.Contains(th.CSS(), ".page-title") {
		t.Errorf("defaults: %+v", th)
	}
	th = ThemeFromForm(th, url.Values{"title_rule": {"dots"}, "tag_hash": {"on"}, "link_color": {"#b03a48"}})
	if th.TitleRuleClass() != "titles-dots" || !th.TagHash || !strings.Contains(th.CSS(), ".page-title, .post-title { border-color:#b03a48; }") {
		t.Errorf("from form: %+v\n%s", th, th.CSS())
	}
	if th = ThemeFromForm(th, url.Values{"title_rule": {"dots2"}}); th.TitleRuleClass() != "titles-dots2" {
		t.Errorf("dots2: %+v", th)
	}
	th = ThemeFromForm(th, url.Values{"title_rule": {"neon"}})
	if th.TitleRuleClass() != "" || th.TagHash {
		t.Errorf("junk rule falls back, unticked box is off: %+v", th)
	}
}

// An uploaded font is declared as a face and put first in the stack, the
// built-in choice behind it; the heading font falls back to the text's stack.
func TestCustomFontCSS(t *testing.T) {
	body, head := "6ba7b810-9dad-11d1-80b4-00c04fd430c8", "6ba7b811-9dad-11d1-80b4-00c04fd430c8"
	th := ThemeFromForm(DefaultTheme(), url.Values{"custom_font": {body}, "font": {"serif"}})
	css := th.CSS()
	for _, want := range []string{`@font-face { font-family:"BlogFont"; src:url(/media/` + body + `); font-display:swap; }`, `font-family:"BlogFont", Georgia`} {
		if !strings.Contains(css, want) {
			t.Errorf("css missing %q:\n%s", want, css)
		}
	}
	if strings.Contains(css, "BlogHeadingFont") || strings.Contains(css, "h1, h2") {
		t.Errorf("no heading font was chosen: %s", css)
	}
	// A heading font with "same as text" still gets its own rule, falling back to the text font.
	th = ThemeFromForm(th, url.Values{"custom_font": {body}, "custom_heading_font": {head}, "font": {"serif"}, "heading_font": {"same"}})
	css = th.CSS()
	for _, want := range []string{`font-family:"BlogHeadingFont"; src:url(/media/` + head + `)`, `h1, h2, h3, h4, h5, h6 { font-family:"BlogHeadingFont", "BlogFont", Georgia`} {
		if !strings.Contains(css, want) {
			t.Errorf("css missing %q:\n%s", want, css)
		}
	}
	th = ThemeFromForm(th, url.Values{"custom_font": {"none"}, "custom_heading_font": {head}, "heading_font": {"mono"}})
	if css = th.CSS(); strings.Contains(css, "BlogFont\"") || !strings.Contains(css, `h1, h2, h3, h4, h5, h6 { font-family:"BlogHeadingFont", "Courier New"`) {
		t.Errorf("heading stack after clearing the text font: %s", css)
	}
}

// The header rule is drawn beside the title and logo blocks — after them, and
// before them too when the header is centred — and not at all by default.
func TestHeaderRule(t *testing.T) {
	tpl, err := newTemplates(false).get("en", "blog/page.html")
	if err != nil {
		t.Fatal(err)
	}
	logo := uuid.New().String()
	render := func(kind string, th Theme) string {
		var b strings.Builder
		root := view{Blog: &store.Blog{Title: "Gizmo", Tagline: "a hacklab"}, Data: map[string]any{"theme": th, "layout": Layout{}}}
		if err := tpl.ExecuteTemplate(&b, "module", map[string]any{"m": store.Module{Area: "header", Kind: kind}, "root": root}); err != nil {
			t.Fatal(err)
		}
		return b.String()
	}
	plain := DefaultTheme()
	plain.Logo = logo
	for _, kind := range []string{"title", "logo"} {
		if out := render(kind, plain); strings.Contains(out, "header-rule") || strings.Contains(out, "ruled") {
			t.Errorf("%s without a rule: %s", kind, out)
		}
	}
	left := plain
	left.HeaderRule = "stripes"
	out := render("title", left)
	if !strings.Contains(out, `class="wrap header-text ruled rule-stripes"`) || strings.Count(out, `<div class="header-rule"></div>`) != 1 || !strings.HasSuffix(strings.TrimSpace(out), `</div><div class="header-rule"></div></div>`) {
		t.Errorf("left-aligned rule: %s", out)
	}
	if !strings.Contains(out, `<p class="tagline">a hacklab</p>`) {
		t.Errorf("tagline lost: %s", out)
	}
	centred := left
	centred.HeaderAlign, centred.HeaderRule = "center", "line"
	out = render("logo", centred)
	if !strings.Contains(out, `class="wrap header-logo ruled rule-line"`) || strings.Count(out, `<div class="header-rule"></div>`) != 2 ||
		!strings.Contains(out, `<div class="header-rule"></div><div class="brand"><a href="/"><img class="logo" src="/media/`+logo+`"`) {
		t.Errorf("centred rule: %s", out)
	}
}

func TestLayoutTheme(t *testing.T) {
	// The layout switches ride in the design form: the areas are checkboxes, so an unticked one is off.
	th := ThemeFromForm(DefaultTheme(), url.Values{"left_width": {"40"}, "right_width": {"40"}, "keep_columns": {"on"}, "header_on": {"on"}, "left_on": {"on"}, "right_on": {"on"},
		"posts_per_page": {"20"}, "title_size": {"large"}, "footer_align": {"left"}})
	if th.LeftWidth != 40 || th.RightWidth != 30 || th.MainWidth() != 30 || !th.KeepColumns || th.AlignToMain {
		t.Errorf("the right column should give way: %+v", th)
	}
	if th.FooterOn || !th.HeaderOn || th.PostsPerPage != 20 || th.TitleSize != "large" || th.FooterAlign != "left" {
		t.Errorf("switches and the content options: %+v", th)
	}
	if css := th.CSS(); !strings.Contains(css, ".site-title { font-size:2.6em") || !strings.Contains(css, "text-align:left") {
		t.Errorf("css: %s", css)
	}
	th = ThemeFromForm(th, url.Values{"left_width": {"junk"}, "right_width": {"20"}, "posts_per_page": {"7"}})
	if th.LeftWidth != 15 || th.RightWidth != 20 || th.KeepColumns || th.PostsPerPage != 10 {
		t.Errorf("junk clamps to the minimum: %+v", th)
	}
	css := th.CSS()
	for _, want := range []string{"@media (min-width: 701px)", ".col-left { width:15%", ".col-right { width:20%", "body.has-left.has-right .col-main { width:65%",
		"body.has-left:not(.has-right) .col-main { width:85%", "body.has-right:not(.has-left) .col-main { width:80%"} {
		if !strings.Contains(css, want) {
			t.Errorf("css missing %q:\n%s", want, css)
		}
	}
	if strings.Contains(css, ".site-header .wrap") {
		t.Error("header insets emitted without align_to_main")
	}
	th = ThemeFromForm(th, url.Values{"left_width": {"15"}, "right_width": {"20"}, "align_to_main": {"on"}})
	css = th.CSS()
	for _, want := range []string{"body.has-left .site-header .wrap, body.has-left .site-footer .wrap { padding-left:calc(1em + 15%); }",
		"body.has-right .site-header .wrap, body.has-right .site-footer .wrap { padding-right:calc(1em + 20%); }"} {
		if !strings.Contains(css, want) {
			t.Errorf("css missing %q:\n%s", want, css)
		}
	}
	th.LeftOn = false
	if th.AreaOn("left") || !th.AreaOn("above") || !th.AreaOn("bogus") {
		t.Errorf("area switches: %+v", th)
	}
}

// The design form sends every module as indexed fields; pos orders them and
// add.<area> appends. The index only tells rows apart.
func TestParseModulesForm(t *testing.T) {
	f := url.Values{
		"mod.0.id": {"1"}, "mod.0.area": {"header"}, "mod.0.kind": {"title"}, "mod.0.pos": {"1"},
		"mod.1.id": {"2"}, "mod.1.area": {"header"}, "mod.1.kind": {"menu"}, "mod.1.pos": {"0"},
		"mod.2.id": {"3"}, "mod.2.area": {"left"}, "mod.2.kind": {"recent"}, "mod.2.pos": {"0"}, "mod.2.title": {" New "}, "mod.2.count": {"99"},
		"mod.3.id": {"4"}, "mod.3.area": {"footer"}, "mod.3.kind": {"rss"}, "mod.3.pos": {"0"}, "mod.3.del": {"on"},
		"mod.7.id": {"0"}, "mod.7.area": {"below"}, "mod.7.kind": {"html"}, "mod.7.body": {"<b>hi</b>\r\n"},
		"add.left": {"tags"}, "add.footer": {""},
	}
	mods, err := parseModules(f, "en", "el")
	if err != nil {
		t.Fatal(err)
	}
	var got []string
	for _, m := range mods {
		got = append(got, m.Area+"/"+m.Kind)
	}
	if want := "header/menu header/title left/recent left/tags below/html"; strings.Join(got, " ") != want {
		t.Errorf("order: %v, want %s", got, want)
	}
	if mods[2].Title != "New" || mods[2].Count != maxRecentCount || mods[2].ID != 3 || mods[3].ID != 0 || mods[3].Title != "Ετικέτες" || mods[3].Count != 10 || mods[4].Body != "<b>hi</b>\n" {
		t.Errorf("fields: %+v", mods)
	}
	if mods, _ := parseModules(url.Values{"mod.0.area": {"header"}, "mod.0.kind": {"html"}, "add.header": {"rss"}}, "en", "en"); len(mods) != 0 {
		t.Errorf("kinds an area does not take are dropped: %+v", mods)
	}
	// Errors still come with every row, so the form can be shown again as sent.
	if mods, err := parseModules(url.Values{"mod.0.area": {"above"}, "mod.0.kind": {"html"}, "add.above": {"html"}}, "en", "en"); err == nil || len(mods) != 2 {
		t.Errorf("two modules above the posts should be refused: %v %+v", err, mods)
	}
	if mods, err := parseModules(url.Values{"mod.0.area": {"footer"}, "mod.0.kind": {"text"}, "mod.0.body": {strings.Repeat("x", maxModuleBytes+1)}}, "en", "en"); err == nil || len(mods) != 1 {
		t.Errorf("a long body should be refused: %v %+v", err, mods)
	}
}

func TestParseMenuForm(t *testing.T) {
	pages := []store.Page{{ID: 1, Title: "Home", Slug: "home", IsHome: true}, {ID: 2, Title: "About", Slug: "about"}}
	f := url.Values{
		"menu.0.id": {"10"}, "menu.0.page": {"2"}, "menu.0.pos": {"1"},
		"menu.1.id": {"11"}, "menu.1.label": {"Photos"}, "menu.1.url": {"example.org/pics"}, "menu.1.pos": {"0"},
		"menu.2.id": {"12"}, "menu.2.page": {"9"}, "menu.2.pos": {"2"}, // deleted meanwhile
		"menu.3.id": {"13"}, "menu.3.page": {"2"}, "menu.3.pos": {"3"}, // listed twice
		"menu_add_page": {"1"}, "menu_add_label": {"Mail"}, "menu_add_url": {"mailto:me@example.org"},
	}
	menu, err := parseMenu(f, "en", pages)
	if err != nil {
		t.Fatal(err)
	}
	if len(menu) != 4 || menu[0].ID != 11 || menu[0].URL != "https://example.org/pics" || menu[1].ID != 10 || menu[1].PageTitle != "About" ||
		menu[2].ID != 0 || !menu[2].IsHome || menu[3].URL != "mailto:me@example.org" || menu[3].Label != "Mail" {
		t.Errorf("menu: %+v", menu)
	}
	if menu, err := parseMenu(url.Values{"menu.0.label": {"x"}, "menu.0.url": {"not a url"}}, "en", pages); err == nil || len(menu) != 1 {
		t.Errorf("a bad address should be refused, and kept for fixing: %v %+v", err, menu)
	}
	if menu, err := parseMenu(url.Values{"menu_add_label": {""}, "menu_add_url": {"https://example.org"}}, "en", pages); err == nil || len(menu) != 1 {
		t.Errorf("a link without text should be refused: %v %+v", err, menu)
	}
}

func TestBuildLayout(t *testing.T) {
	mods := []store.Module{{ID: 1, Area: "header", Kind: "title"}, {ID: 2, Area: "left", Kind: "recent", Count: 3}, {ID: 3, Area: "right", Kind: "recent", Count: 8},
		{ID: 4, Area: "right", Kind: "archive"}, {ID: 5, Area: "footer", Kind: "rss"}, {ID: 6, Area: "above", Kind: "html"}, {ID: 7, Area: "right", Kind: "tagcloud"}}
	th := DefaultTheme()
	l := buildLayout(th, mods)
	if !l.HasLeft || !l.HasRight || len(l.Header) != 1 || len(l.Footer) != 1 || len(l.Above) != 1 || l.MaxRecent() != 8 || !l.NeedsArchive() || !l.NeedsTags() {
		t.Errorf("layout: %+v", l)
	}
	th.RightOn, th.FooterOn = false, false
	l = buildLayout(th, mods)
	if l.HasRight || len(l.Footer) != 0 || l.MaxRecent() != 3 || l.NeedsArchive() || l.NeedsTags() {
		t.Errorf("switched-off areas should drop their modules: %+v", l)
	}
	if buildLayout(th, nil).HasLeft {
		t.Error("an empty column is not shown")
	}
	th.KeepColumns = true
	if k := buildLayout(th, nil); !k.HasLeft || !k.HasRight || len(k.Right) != 0 {
		t.Errorf("keep_columns reserves empty and hidden columns: %+v", k)
	}
	th.KeepColumns = false
	// announcements go to their column, or to the main one when that column is not laid out
	secs := []store.Section{{ID: 1, Placement: "main-top"}, {ID: 2, Placement: "right-bottom"}, {ID: 3, Placement: "left-top"}, {ID: 4, Placement: "left-bottom"}}
	n := placeNotices(secs, l) // l: left laid out, right not
	if len(n["main-top"]) != 1 || len(n["main-bottom"]) != 1 || n["main-bottom"][0].ID != 2 || len(n["left-top"]) != 1 || len(n["left-bottom"]) != 1 || len(n["right-bottom"]) != 0 {
		t.Errorf("left column only: %v", n)
	}
	n = placeNotices(secs, Layout{})
	if len(n["main-top"]) != 2 || n["main-top"][1].ID != 3 || len(n["main-bottom"]) != 2 || len(n) != 2 { // no columns: everything in main, order kept
		t.Errorf("no columns: %v", n)
	}
}

func TestModuleKinds(t *testing.T) {
	for area, kinds := range moduleKinds {
		if _, ok := areaNames[area]; !ok {
			t.Errorf("area %q has no name", area)
		}
		for _, k := range kinds {
			if moduleNames[k] == "" {
				t.Errorf("kind %q has no name", k)
			}
		}
	}
	if !allowedKind("header", "menu") || allowedKind("header", "archive") || allowedKind("above", "menu") || allowedKind("attic", "html") {
		t.Error("allowedKind")
	}
	if !moduleHasSettings(store.Module{Kind: "html"}) || moduleHasSettings(store.Module{Kind: "rss"}) ||
		!moduleHasSettings(store.Module{Kind: "search", Area: "left"}) || moduleHasSettings(store.Module{Kind: "search", Area: "header"}) {
		t.Error("moduleHasSettings")
	}
	if got := moduleSummary("en", store.Module{Kind: "recent", Count: 5, Title: "Fresh"}); got != "5 posts, heading “Fresh”" {
		t.Errorf("recent summary: %q", got)
	}
	if got := moduleSummary("en", store.Module{Kind: "html", Body: "  <p>hi\n there</p> "}); got != "<p>hi there</p>" {
		t.Errorf("html summary: %q", got)
	}
	if got := moduleSummary("en", store.Module{Kind: "html", Body: strings.Repeat("x", 100)}); len([]rune(got)) != 58 || !strings.HasSuffix(got, "…") {
		t.Errorf("long html summary: %q", got)
	}
	if got := moduleSummary("en", store.Module{Kind: "menu"}); got != "" {
		t.Errorf("menu summary: %q", got)
	}
	if got := moduleSummary("en", store.Module{Kind: "tags", Count: 8}); got != "8 tags" {
		t.Errorf("tags summary: %q", got)
	}
	if got := moduleSummary("en", store.Module{Kind: "tags"}); got != "all tags" {
		t.Errorf("all-tags summary: %q", got)
	}
}

func TestParseTags(t *testing.T) {
	tags, ok := parseTags([]string{" Go ", "go", "GO", "", "tomatoes   plants", "!!!", "Ντομάτες"})
	if !ok || len(tags) != 3 {
		t.Fatalf("parseTags: ok=%v %+v", ok, tags)
	}
	for i, want := range []store.Tag{{Name: "Go", Slug: "go"}, {Name: "tomatoes plants", Slug: "tomatoes-plants"}, {Name: "Ντομάτες", Slug: "ntomates"}} {
		if tags[i] != want {
			t.Errorf("tag %d = %+v, want %+v", i, tags[i], want)
		}
	}
	if tags, ok := parseTags(nil); !ok || len(tags) != 0 {
		t.Errorf("no tags: ok=%v %+v", ok, tags)
	}
	if _, ok := parseTags([]string{strings.Repeat("α", 41)}); ok {
		t.Error("41 runes should be too long")
	}
	if _, ok := parseTags([]string{strings.Repeat("α", 40)}); !ok {
		t.Error("40 runes are fine")
	}
	many := make([]string, 21)
	for i := range many {
		many[i] = "t" + strconv.Itoa(i)
	}
	if _, ok := parseTags(many); ok {
		t.Error("21 tags should be too many")
	}
	if got := tagsText(tags); got != "Go, tomatoes plants, Ντομάτες" {
		t.Errorf("tagsText: %q", got)
	}
}

func TestCloudSizes(t *testing.T) {
	if got := cloudSizes(nil); len(got) != 0 {
		t.Errorf("empty: %+v", got)
	}
	same := cloudSizes([]store.TagCount{{Name: "a", Count: 1}, {Name: "b", Count: 1}})
	if same[0].Size != 3 || same[1].Size != 3 {
		t.Errorf("equal counts get the middle size: %+v", same)
	}
	spread := cloudSizes([]store.TagCount{{Name: "a", Count: 1}, {Name: "b", Count: 5}, {Name: "c", Count: 9}})
	if spread[0].Size != 1 || spread[1].Size != 3 || spread[2].Size != 5 || spread[0].Name != "a" {
		t.Errorf("spread: %+v", spread)
	}
	top := topTags([]store.TagCount{{Name: "a", Count: 1}, {Name: "b", Count: 5}, {Name: "c", Count: 5}})
	if top[0].Name != "b" || top[1].Name != "c" || top[2].Name != "a" {
		t.Errorf("topTags: %+v", top)
	}
}

func TestValidLinkURL(t *testing.T) {
	for _, ok := range []string{"https://example.org", "http://example.org/a?b=c", "mailto:me@example.org", "/about", "/news/hello"} {
		if !validLinkURL(ok) {
			t.Errorf("%q should be accepted", ok)
		}
	}
	for _, bad := range []string{"", "javascript:alert(1)", "//evil.org", "ftp://x", "https://", "example.org", "https://a b", "\"><script>", strings.Repeat("/", 501)} {
		if validLinkURL(bad) {
			t.Errorf("%q should be rejected", bad)
		}
	}
}

func TestParsePostDate(t *testing.T) {
	for in, want := range map[string]time.Time{
		"2026-09-14T08:30":    time.Date(2026, 9, 14, 8, 30, 0, 0, time.Local),
		"2026-09-14 08:30":    time.Date(2026, 9, 14, 8, 30, 0, 0, time.Local),
		"2026-09-14T08:30:15": time.Date(2026, 9, 14, 8, 30, 15, 0, time.Local),
		"2026-09-14":          time.Date(2026, 9, 14, 0, 0, 0, 0, time.Local),
	} {
		if got, ok := parsePostDate(in); !ok || !got.Equal(want) {
			t.Errorf("%q: got %v %v, want %v", in, got, ok, want)
		}
	}
	for _, bad := range []string{"", "14/09/2026", "2026-13-01", "yesterday", "2026-09-14T25:00"} {
		if _, ok := parsePostDate(bad); ok {
			t.Errorf("%q should be rejected", bad)
		}
	}
}

func TestGroupArchive(t *testing.T) {
	d := func(y int, m time.Month, day int) time.Time { return time.Date(y, m, day, 12, 0, 0, 0, time.UTC) }
	posts := []store.PostRef{{Title: "d", CreatedAt: d(2026, 9, 3)}, {Title: "c", CreatedAt: d(2026, 9, 1)}, {Title: "b", CreatedAt: d(2026, 2, 1)}, {Title: "a", CreatedAt: d(2025, 12, 31)}}
	years := groupArchive(posts)
	if len(years) != 2 || years[0].Year != 2026 || years[0].Count != 3 || years[1].Year != 2025 || years[1].Count != 1 {
		t.Fatalf("years: %+v", years)
	}
	if len(years[0].Months) != 2 || years[0].Months[0].Month != time.September || len(years[0].Months[0].Posts) != 2 || years[0].Months[1].Month != time.February {
		t.Errorf("months: %+v", years[0].Months)
	}
	if years[0].Months[0].Posts[0].Title != "d" || years[1].Months[0].Posts[0].Title != "a" {
		t.Errorf("post order: %+v", years)
	}
	if len(groupArchive(nil)) != 0 {
		t.Error("empty index")
	}
}

func TestMenuItemLinks(t *testing.T) {
	id := int64(7)
	page := store.MenuItem{PageID: &id, PageTitle: "About", PageSlug: "about"}
	home := store.MenuItem{PageID: &id, PageTitle: "Home", PageSlug: "home", IsHome: true}
	link := store.MenuItem{Label: "Photos", URL: "https://example.org/p"}
	if page.Href() != "/about" || page.Text() != "About" || home.Href() != "/" || link.Href() != "https://example.org/p" || link.Text() != "Photos" {
		t.Errorf("%q %q %q", page.Href(), home.Href(), link.Href())
	}
}

func TestRedirectOKKeepsAnchor(t *testing.T) {
	rec := httptest.NewRecorder()
	redirectOK(rec, httptest.NewRequest("GET", "/", nil), "/b/a/design#menu", "hi there")
	if got := rec.Header().Get("Location"); got != "/b/a/design?ok=hi+there#menu" {
		t.Errorf("location: %q", got)
	}
}

func TestThemeImagePick(t *testing.T) {
	id := "6ba7b810-9dad-11d1-80b4-00c04fd430c8"
	cur := DefaultTheme()
	cur.BgImage, cur.Favicon = id, id
	th := ThemeFromForm(cur, url.Values{})
	if th.BgImage != id || th.Favicon != id {
		t.Errorf("missing radio should keep the image: %+v", th)
	}
	th = ThemeFromForm(cur, url.Values{"bg_image": {"none"}, "favicon": {"junk"}})
	if th.BgImage != "" || th.Favicon != "" {
		t.Errorf("none clears, junk is dropped: %+v", th)
	}
	th = ThemeFromForm(DefaultTheme(), url.Values{"header_image": {id}})
	if th.HeaderImage != id {
		t.Errorf("radio selects: %+v", th)
	}
}

func TestPresets(t *testing.T) {
	if len(Presets()) < 4 {
		t.Fatal("expected several presets")
	}
	cur := DefaultTheme()
	cur.BgImage, cur.LeftWidth, cur.Font, cur.LinkHover = "6ba7b810-9dad-11d1-80b4-00c04fd430c8", 30, "mono", "#123456"
	for _, p := range Presets() {
		for _, c := range []string{p.Bg, p.ContentBg, p.Text, p.Link, p.HeaderBg, p.HeaderText, p.NavBg, p.NavText, p.FooterBg, p.FooterText} {
			if !hexColor.MatchString(c) {
				t.Errorf("preset %s: bad colour %q", p.Key, c)
			}
		}
		th := cur.WithPreset(p)
		if th.BgColor != p.Bg || th.FooterColor != p.FooterText || th.LinkHover != "" {
			t.Errorf("preset %s not applied: %+v", p.Key, th)
		}
		if th.BgImage != cur.BgImage || th.LeftWidth != 30 || th.Font != "mono" {
			t.Errorf("preset %s touched non-colour fields: %+v", p.Key, th)
		}
	}
	if _, ok := PresetByKey("nope"); ok {
		t.Error("unknown preset should not resolve")
	}
}

func TestAllTemplatesParse(t *testing.T) {
	tpl := newTemplates(false)
	for _, name := range []string{"auth/login.html", "dashboard/overview.html", "dashboard/pages.html", "dashboard/page_form.html",
		"dashboard/posts.html", "dashboard/post_form.html", "dashboard/design.html", "dashboard/files.html", "dashboard/settings.html",
		"dashboard/password.html", "dashboard/confirm.html", "dashboard/sections.html", "dashboard/section_form.html", "admin/index.html", "admin/new_user.html", "admin/delete_user.html",
		"blog/page.html", "blog/post.html", "blog/tag.html", "blog/search.html", "blog/404.html"} {
		for _, l := range i18n.Languages() {
			if _, err := tpl.get(l.Code, name); err != nil {
				t.Errorf("%s (%s): %v", name, l.Code, err)
			}
		}
	}
}

// Every string the templates and handlers translate must be in the Greek
// catalog, and the catalog must not keep entries nothing uses any more (a
// reworded English key would otherwise silently fall back to English).
func TestGreekCatalogComplete(t *testing.T) {
	used := map[string]bool{}
	add := func(re *regexp.Regexp, src string) {
		for _, m := range re.FindAllStringSubmatch(src, -1) {
			used[m[1]] = true
		}
	}
	tplKey := regexp.MustCompile(`\b(?:t|tf) "((?:[^"\\]|\\.)*)"`)
	goKey := regexp.MustCompile(`\b(?:s\.trf?\(r|i18n\.Tf?\([A-Za-z]+), "((?:[^"\\]|\\.)*)"`)
	if err := fs.WalkDir(assets, "templates", func(path string, d fs.DirEntry, err error) error {
		if err != nil || d.IsDir() {
			return err
		}
		b, err := fs.ReadFile(assets, path)
		add(tplKey, string(b))
		return err
	}); err != nil {
		t.Fatal(err)
	}
	goFiles, _ := filepath.Glob("*.go")
	for _, f := range goFiles {
		if strings.HasSuffix(f, "_test.go") {
			continue
		}
		b, err := os.ReadFile(f)
		if err != nil {
			t.Fatal(err)
		}
		add(goKey, string(b))
	}
	// Keys that reach t/tr through a variable rather than a literal.
	for _, m := range []map[string]string{moduleNames, areaNames, fileKindNames} {
		for _, v := range m {
			used[v] = true
		}
	}
	for _, p := range Presets() {
		used[p.Name] = true
	}
	for _, k := range []string{"top", "bottom", store.RoleSuperadmin, store.RoleBlogger} {
		used[k] = true
	}
	have := map[string]bool{}
	for _, k := range i18n.Keys("el") {
		have[k] = true
		if !used[k] {
			t.Errorf("el catalog: %q is not used anywhere", k)
		}
	}
	for k := range used {
		if !have[k] {
			t.Errorf("el catalog: missing %q", k)
		}
	}
	if len(used) < 100 {
		t.Errorf("only %d keys found; the scan is broken", len(used))
	}
}

// Anonymous pages follow the browser's language; unknown ones fall back to English.
func TestLangFromAcceptLanguage(t *testing.T) {
	s := NewServer(&config.Config{BaseDomain: "example.com", JWTSecret: []byte("x")}, nil)
	req := httptest.NewRequest("GET", "/webadmin", nil)
	if got := s.lang(req); got != "en" {
		t.Errorf("no header: %q", got)
	}
	req.Header.Set("Accept-Language", "el-GR,el;q=0.9,en;q=0.8")
	if got := s.lang(req); got != "el" {
		t.Errorf("greek header: %q", got)
	}
	if got := s.lang(withLang(req, "en")); got != "en" {
		t.Errorf("context wins: %q", got)
	}
}

// /webadmin on a blog's own host bounces to the root login page and back to that blog's dashboard.
func TestSubdomainWebadminRedirect(t *testing.T) {
	cfg := &config.Config{BaseDomain: "example.com", JWTSecret: []byte("x"), MaxUploadBytes: 1 << 20}
	s := NewServer(cfg, nil)
	rec := httptest.NewRecorder()
	req := httptest.NewRequest("GET", "/webadmin", nil)
	req.Host = "alice.example.com"
	s.ServeHTTP(rec, req)
	if want := "http://example.com/webadmin?next=%2Fb%2Falice%2F"; rec.Code != http.StatusSeeOther || rec.Header().Get("Location") != want {
		t.Errorf("got %d %q, want 303 %q", rec.Code, rec.Header().Get("Location"), want)
	}
}

func TestFileMarkdown(t *testing.T) {
	id := uuid.MustParse("6ba7b810-9dad-11d1-80b4-00c04fd430c8")
	img := &store.File{ID: id, Filename: "cat].png", Kind: "image"}
	doc := &store.File{ID: id, Filename: "notes\nv2.pdf", Kind: "document"}
	line := "![cat.png](/media/6ba7b810-9dad-11d1-80b4-00c04fd430c8)"
	if got := fileMarkdown(img); got != line {
		t.Errorf("image: %q", got)
	}
	if got := fileMarkdown(doc); got != "[notes v2.pdf](/media/6ba7b810-9dad-11d1-80b4-00c04fd430c8)" {
		t.Errorf("document should be a link: %q", got)
	}
	if got := appendFile("", img, store.FormatMarkdown); got != line+"\n" {
		t.Errorf("empty body: %q", got)
	}
	if got := appendFile("hello\n", img, store.FormatMarkdown); got != "hello\n\n"+line+"\n" {
		t.Errorf("appended: %q", got)
	}
	if got := appendFile("hello", nil, store.FormatMarkdown); got != "hello" {
		t.Errorf("nil file should not change the body: %q", got)
	}
	// HTML mode: tags, with the name escaped
	img.Filename = `a "cat" <3.png`
	tag := `<img src="/media/6ba7b810-9dad-11d1-80b4-00c04fd430c8" alt="a &#34;cat&#34; &lt;3.png">`
	if got := fileHTML(img); got != tag {
		t.Errorf("image tag: %q", got)
	}
	if got := fileHTML(doc); got != `<a href="/media/6ba7b810-9dad-11d1-80b4-00c04fd430c8">notes
v2.pdf</a>` {
		t.Errorf("document link: %q", got)
	}
	if got := appendFile("<p>hi</p>", img, store.FormatHTML); got != "<p>hi</p>\n\n"+tag+"\n" {
		t.Errorf("html appended: %q", got)
	}
}

func TestRenderBody(t *testing.T) {
	raw := "**x**\n\n<script>1</script>"
	if got := renderBody(store.FormatHTML, raw); got != raw {
		t.Errorf("html must pass through untouched: %q", got)
	}
	if got := renderBody(store.FormatMarkdown, raw); !strings.Contains(got, "<strong>x</strong>") || strings.Contains(got, "<script>") {
		t.Errorf("markdown must be rendered and sanitised: %q", got)
	}
	if got := renderBody("", "**x**"); !strings.Contains(got, "<strong>") {
		t.Errorf("an unset format is markdown: %q", got)
	}
}

func TestPreviewRendersMarkdown(t *testing.T) {
	s := NewServer(&config.Config{BaseDomain: "example.com", JWTSecret: []byte("x")}, nil)
	req := httptest.NewRequest("POST", "/b/www/preview", strings.NewReader("body=**x**+<script>1</script>"))
	req.Header.Set("Content-Type", "application/x-www-form-urlencoded")
	rec := httptest.NewRecorder()
	s.handlePreview(rec, req)
	if ct := rec.Header().Get("Content-Type"); ct != "application/json" {
		t.Errorf("content type %q", ct)
	}
	var out map[string]string
	if err := json.Unmarshal(rec.Body.Bytes(), &out); err != nil {
		t.Fatal(err)
	}
	if h := out["html"]; !strings.Contains(h, "<strong>x</strong>") || strings.Contains(h, "<script>") {
		t.Errorf("unexpected preview %q", h)
	}
}

func TestNormalizeSection(t *testing.T) {
	sec := &store.Section{Placement: "footer", Style: "<script>"}
	normalizeSection(sec)
	if sec.Placement != "main-top" || sec.Style != "note" {
		t.Errorf("normalize: %+v", sec)
	}
	sec = &store.Section{Placement: "right-bottom"}
	normalizeSection(sec)
	if sec.Placement != "right-bottom" || sec.Column() != "right" || sec.Position() != "bottom" {
		t.Errorf("valid placement kept: %+v", sec)
	}
	sec = &store.Section{Placement: "left-sideways"}
	normalizeSection(sec)
	if sec.Placement != "left-top" {
		t.Errorf("half-valid placement: %+v", sec)
	}
}

func TestPostSummary(t *testing.T) {
	md := func(s string) *store.Post {
		return &store.Post{Format: store.FormatMarkdown, BodyMD: s, BodyHTML: renderBody(store.FormatMarkdown, s)}
	}
	// the marker wins, whatever the length
	p := md("first\n\n<!--more-->\n\nsecond")
	if html, more := postSummary(p); !more || !strings.Contains(html, "first") || strings.Contains(html, "second") {
		t.Errorf("marker: got %q, %v", html, more)
	}
	// short posts are shown whole
	if html, more := postSummary(md("just a line")); more || html != p.BodyHTML && !strings.Contains(html, "just a line") {
		t.Errorf("short: got %q, %v", html, more)
	}
	// a long one is cut at a block boundary after summaryWords words
	long := strings.Repeat("word ", 50) + "\n\n" + strings.Repeat("word ", 50) + "\n\nlast block"
	if html, more := postSummary(md(long)); !more || strings.Contains(html, "last block") || strings.Count(html, "word") != 100 {
		t.Errorf("auto cut: got %d words, more=%v", strings.Count(html, "word"), more)
	}
	// never inside a code fence
	fenced := "intro\n\n```\n" + strings.Repeat("code ", 80) + "\n\nstill code\n```\n\nafter"
	if html, more := postSummary(md(fenced)); !more || !strings.Contains(html, "still code") || strings.Contains(html, "after") {
		t.Errorf("fence: got %q, %v", html, more)
	}
	// HTML posts are only cut at the marker
	h := &store.Post{Format: store.FormatHTML, BodyMD: "<div>" + strings.Repeat("w ", 200) + "</div>"}
	h.BodyHTML = h.BodyMD
	if html, more := postSummary(h); more || html != h.BodyHTML {
		t.Errorf("html: cut without a marker")
	}
	h.BodyMD = "<p>a</p><!--more--><p>b</p>"
	if html, more := postSummary(h); !more || html != "<p>a</p>" {
		t.Errorf("html marker: got %q, %v", html, more)
	}
	// fillExcerpts follows the theme
	posts := []store.Post{*md(long)}
	fillExcerpts(Theme{ListStyle: "full"}, posts)
	if posts[0].HasMore || posts[0].Excerpt != posts[0].BodyHTML {
		t.Error("full: excerpt should be the whole body")
	}
	fillExcerpts(Theme{ListStyle: "summary"}, posts)
	if !posts[0].HasMore {
		t.Error("summary: expected a cut")
	}
}

// A chosen image older than the recent ones the picker lists must still be
// the select's selected option, else saving the form clears it (the logo of
// a blog with more than recentImages images vanished on every save).
func TestImagePickKeepsOlderChoice(t *testing.T) {
	tpl, err := newTemplates(false).get("en", "dashboard/design.html")
	if err != nil {
		t.Fatal(err)
	}
	recent := uuid.New()
	old := uuid.New()
	for _, tc := range []struct {
		name  string
		names map[string]string
		want  string
	}{
		{"known name", map[string]string{recent.String(): "new.png", old.String(): "logo.png"}, `<option value="` + old.String() + `" selected>logo.png</option>`},
		{"unknown name", map[string]string{recent.String(): "new.png"}, `<option value="` + old.String() + `" selected>Current image</option>`},
	} {
		var b strings.Builder
		err := tpl.ExecuteTemplate(&b, "imagepick", map[string]any{
			"name": "logo", "current": old.String(), "sub": "x", "label": "Logo",
			"images": []store.File{{ID: recent, Filename: "new.png"}}, "names": tc.names,
		})
		if err != nil {
			t.Fatal(err)
		}
		out := b.String()
		if !strings.Contains(out, tc.want) {
			t.Errorf("%s: the chosen image is not the selected option:\n%s", tc.name, out)
		}
		if strings.Contains(out, `<option value="none" selected>`) {
			t.Errorf("%s: None must not be selected when an image is chosen", tc.name)
		}
	}
}