// SPDX-License-Identifier: AGPL-3.0-or-later

package web

import (
	"context"
	"net/http"
	"slices"
	"strings"
	"time"

	"github.com/a-h/templ"

	"bnema.dev/ermite/internal/domain"
)

// bothViewsLines is the largest diff, in lines, that is sent in both the
// unified and the split layout so that the toggle needs no round trip. A
// larger one is sent in the layout asked for only, and the toggle is a link.
const bothViewsLines = 4000

// Person is an author or a committer with the date of the action.
type Person struct {
	Name, When, WhenAt, Abs string
}

// CommitPage is a commit with its diff.
type CommitPage struct {
	SHA, Short, Subject, Body string
	Author                    Person
	// Committer is nil when it is the author, at the same time.
	Committer *Person
	Parents   []Link
	Merge     bool
	Root      bool
	Refs      []string
	// NFiles, Adds and Dels are the totals of the commit, including the files
	// that the diff omits.
	NFiles, Adds, Dels int
	Files              []DiffFile
	// Note says the diff is incomplete.
	Note string
	DiffView
	// Invisible is true when some line holds an invisible character, shown as a
	// marker.
	Invisible bool
	// Checks is the combined state of the CI checks of the commit.
	Checks ChecksSummary
}

// DiffView is how a page lays its diff out: the layouts in the page and the
// way to switch between them. The commit page and the merge request pages
// share it.
type DiffView struct {
	// View is the layout shown: "unified" or "split". Pinned is true when the
	// URL chose it, which then wins over the choice remembered by the browser.
	View   string
	Pinned bool
	// Both is true when both layouts are in the page, and the toggle works in
	// the browser; otherwise only View is sent.
	Both                   bool
	ShowUnified, ShowSplit bool
	UnifiedHref, SplitHref string
}

// newDiffView reads ?view= and decides which layouts a diff of that many
// lines sends; the links switch to the other layout.
func newDiffView(r *http.Request, lines int, unifiedHref, splitHref string) DiffView {
	v := DiffView{View: "unified", UnifiedHref: unifiedHref, SplitHref: splitHref}
	switch r.URL.Query().Get("view") {
	case "split":
		v.View, v.Pinned = "split", true
	case "unified":
		v.Pinned = true
	}
	v.Both = lines <= bothViewsLines
	v.ShowUnified, v.ShowSplit = v.Both || v.View == "unified", v.Both || v.View == "split"
	return v
}

// diffLines counts the lines of the hunks of files, and tells whether some
// line holds a marker.
func diffLines(files []DiffFile) (lines int, invisible bool) {
	for _, f := range files {
		for _, h := range f.Hunks {
			lines += len(h.Lines)
			invisible = invisible || slices.ContainsFunc(h.Lines, hasMarker)
		}
	}
	return lines, invisible
}

// commit shows a commit: its message, its totals, the changed files and the
// diff against the first parent. ?view=split selects the split layout.
//
//hexcheck:ignore suspicious-business-logic-in-adapter builds the commit page from the use case results; no rule is decided here
func (s *Server) commit(ctx context.Context, r *http.Request) (templ.Component, int, error) {
	sha := r.PathValue("sha")
	if !isCommitID(sha) {
		return nil, 0, errNotFound
	}
	d, err := s.loadRepo(ctx, r.PathValue("repo"))
	if err != nil {
		return nil, 0, err
	}
	res, err := s.getCommit(ctx, d.repo.Name, sha)
	if err != nil {
		return nil, 0, err
	}
	c := res.Commit
	cid := c.ID.String()
	now := s.cfg.Now()

	p := CommitPage{
		SHA: cid, Short: short(cid),
		Subject: visibleText(c.Summary), Body: commitBody(c),
		Author: person(c.Author, now),
		Merge:  len(c.Parents) > 1,
		Root:   len(c.Parents) == 0,
		NFiles: res.Stats.FilesChanged,
		Adds:   res.Stats.Additions,
		Dels:   res.Stats.Deletions,
		Files:  s.hl.files(ctx, res.Diff.Files),
	}
	contextGaps(p.Files, res.Diff.Files, repoHref(d.name(), "context", cid))
	if cm := person(c.Committer, now); cm != p.Author || c.Committer.Email != c.Author.Email {
		p.Committer = &cm
	}
	for _, pid := range c.Parents {
		id := pid.String()
		p.Parents = append(p.Parents, Link{Label: short(id), Href: repoHref(d.name(), "commit", id)})
	}
	for _, b := range d.branches {
		if b.CommitID.String() == cid {
			p.Refs = append(p.Refs, b.ShortName)
		}
	}
	for _, t := range d.tags {
		if t.CommitID.String() == cid {
			p.Refs = append(p.Refs, "tag: "+t.ShortName)
		}
	}
	p.Note = diffNote(res.Diff, len(p.Files), p.NFiles)
	p.Checks = checksSummary(d.repo.Name, cid, s.checksFor(ctx, d.repo.Name, cid))

	lines, invisible := diffLines(p.Files)
	p.Invisible = invisible
	base := repoHref(d.name(), "commit", cid)
	p.DiffView = newDiffView(r, lines, base+"?view=unified", base+"?view=split")

	l := s.repoLayout(ctx, d, "commits")
	l.Title = p.Short + " " + p.Subject + " · " + d.name() + " · " + s.instance
	pinRef(&l, target{rev: cid, name: p.Short, detached: true})
	history := repoHref(d.name())
	if d.head != nil {
		history = repoHref(d.name(), "commits", d.head.ShortName)
	}
	l.Crumbs = []Crumb{
		{Label: d.name(), Href: repoHref(d.name())},
		{Label: "commit", Href: history},
		{Label: p.Short, Current: true},
	}
	l.HasRail = true
	return Commit(l, p), http.StatusOK, nil
}

// person converts a signature.
func person(s domain.Signature, now time.Time) Person {
	p := Person{Name: visibleText(s.Name)}
	p.When, p.WhenAt = whenOf(now, s.Time)
	if !s.Time.IsZero() {
		p.Abs = absolute(s.Time)
	}
	return p
}

// commitBody is the message without its first line, for display.
func commitBody(c domain.Commit) string {
	msg := strings.ReplaceAll(c.Message, "\r\n", "\n")
	_, body, _ := strings.Cut(msg, "\n")
	return messageText(strings.TrimSpace(body))
}

// diffNote says what is missing from an incomplete diff, "" for a complete one.
func diffNote(d domain.Diff, shown, total int) string {
	if !d.Truncated {
		return ""
	}
	var parts []string
	if shown < total {
		parts = append(parts, plural(total-shown, "file is", "files are")+" not listed")
	}
	cut := 0
	for _, f := range d.Files {
		if f.Truncated {
			cut++
		}
	}
	if cut > 0 {
		parts = append(parts, plural(cut, "file is", "files are")+" too large to show")
	}
	return "this diff is incomplete: " + strings.Join(parts, ", ") + ". the totals above count everything; clone the repository to read the rest."
}