package httpd

import (
	"io/fs"
	"net/http"
	"net/http/httptest"
	"regexp"
	"strings"
	"testing"

	"gitbay.org/gitbay/internal/config"
	"gitbay.org/gitbay/internal/web"
)

// TestStylesheetFontsAreServed: every font URL the embedded stylesheet asks
// for has a route, and that route answers with the file. The route names
// and the @font-face URLs were once maintained by hand and drifted, so
// gitbay.org served no web font at all (#102).
func TestStylesheetFontsAreServed(t *testing.T) {
	s := New(config.Default(), nil)
	byPattern := map[string]http.HandlerFunc{}
	for _, r := range s.Routes() {
		if r.Method == "GET" {
			byPattern[r.Pattern] = r.Handler
		}
	}
	urls := regexp.MustCompile(`url\((/static/fonts/[^)]+)\)`).FindAllSubmatch(web.StyleCSS, -1)
	if len(urls) == 0 {
		t.Fatal("stylesheet declares no font URLs")
	}
	for _, m := range urls {
		u := string(m[1])
		h, ok := byPattern[u]
		if !ok {
			t.Errorf("%s: stylesheet asks for it, route table has no route", u)
			continue
		}
		rec := httptest.NewRecorder()
		h(rec, httptest.NewRequest("GET", u, nil))
		if rec.Code != http.StatusOK || rec.Body.Len() == 0 {
			t.Errorf("%s: status %d, %d bytes", u, rec.Code, rec.Body.Len())
		}
		if ct := rec.Header().Get("Content-Type"); ct != "font/woff2" {
			t.Errorf("%s: content-type %q", u, ct)
		}
	}
}

// TestLandingImagesAreServed: every file under static/img has a route
// that answers 200 with an image or video type, and a video answers Range.
func TestLandingImagesAreServed(t *testing.T) {
	s := New(config.Default(), nil)
	byPattern := map[string]http.HandlerFunc{}
	for _, r := range s.Routes() {
		if r.Method == "GET" {
			byPattern[r.Pattern] = r.Handler
		}
	}
	entries, err := fs.ReadDir(web.ImageFS, "static/img")
	if err != nil {
		t.Fatal(err)
	}
	if len(entries) == 0 {
		t.Fatal("no images embedded")
	}
	for _, e := range entries {
		u := "/static/img/" + e.Name()
		h, ok := byPattern[u]
		if !ok {
			t.Errorf("%s: no route", u)
			continue
		}
		rec := httptest.NewRecorder()
		h(rec, httptest.NewRequest("GET", u, nil))
		ct := rec.Header().Get("Content-Type")
		if rec.Code != http.StatusOK || !(strings.HasPrefix(ct, "image/") || strings.HasPrefix(ct, "video/")) {
			t.Errorf("%s: %d %q", e.Name(), rec.Code, ct)
		}
		if strings.HasPrefix(ct, "video/") {
			rec := httptest.NewRecorder()
			req := httptest.NewRequest("GET", u, nil)
			req.Header.Set("Range", "bytes=0-1")
			h(rec, req)
			if rec.Code != http.StatusPartialContent || rec.Body.Len() != 2 {
				t.Errorf("%s: Range answered %d with %d bytes", e.Name(), rec.Code, rec.Body.Len())
			}
		}
	}
}