package apply

import (
	"context"
	"strings"
	"testing"

	"github.com/novox/mesh-host/internal/store"
)

// The host's own former archive stops nothing (novox/hq issue 194). A new host's first apply finds
// the version before it as a former target of the archive that delivered it; an archive has no
// removal (issue 162), and the refusal stopped every machine applying anything. A former target of
// such a kind is left in place, said, and forgotten. An archive the declaration dropped still fails,
// as 162 has it.
func TestTheHostsOwnFormerArchiveIsLeftInPlaceNotFatal(t *testing.T) {
	run := func(_ context.Context, name string, args ...string) (string, error) {
		if name == "docker" && args[0] == "info" {
			return "29.0.0\n", nil
		}
		return "", nil
	}
	dir := t.TempDir()
	former := store.FormerID("mesh-host.next", dir+"/versions/old")
	known := store.State{Resources: []store.Applied{
		{ID: "mesh-host.next", Type: "archive", Target: dir + "/versions/new", Origin: store.OriginDeclared},
		{ID: former, Type: "archive", Target: dir + "/versions/old", Origin: store.OriginDeclared},
	}}
	body, digest := anArchive(t, map[string]string{"nox-mesh-host": "#!/bin/sh\n"})
	d := parse(t, `{"declaration":1,"resources":[
	  {"id":"mesh-host.next","type":"archive","path":"`+dir+`/versions/new","source":"`+serving(t, body)+`","digest":"`+digest+`"},
	  {"id":"notes.conf","type":"file","path":"`+dir+`/notes.conf","content":"x"}
	]}`)
	report, state, err := Apply(context.Background(), archHost(t), d, known, store.OriginDeclared, run, nil, nil)
	if err != nil {
		t.Fatalf("the apply failed: %v", err)
	}
	if _, still := state.HeldAt(former); still {
		t.Fatal("held?")
	}
	for _, r := range state.Resources {
		if r.ID == former {
			t.Fatal("the former archive is still on record")
		}
	}
	said := false
	for _, o := range report.Outcomes {
		if o.ID == former && o.Action == "forgotten" && strings.Contains(o.Detail, "left in place") {
			said = true
		}
	}
	if !said {
		t.Fatalf("leaving the former archive was not said: %+v", report.Outcomes)
	}
	applied := false
	for _, o := range report.Outcomes {
		if o.ID == "notes.conf" && o.Action == "created" {
			applied = true
		}
	}
	if !applied {
		t.Fatalf("the rest of the declaration was not applied: %+v", report.Outcomes)
	}

	// An archive the declaration dropped is a different matter: nothing can undo it, and saying
	// it was would report an effect the host declined to have (issue 162).
	dropped := store.State{Resources: []store.Applied{
		{ID: "tool.next", Type: "archive", Target: "/usr/lib/tool/versions/old", Origin: store.OriginDeclared},
	}}
	only := parse(t, `{"declaration":1,"resources":[{"id":"notes.conf","type":"file","path":"`+dir+`/notes.conf","content":"x"}]}`)
	if _, _, err := Apply(context.Background(), archHost(t), only, dropped, store.OriginDeclared, run, nil, nil); err == nil ||
		!strings.Contains(err.Error(), "no way to remove") {
		t.Fatalf("a dropped archive was passed over: %v", err)
	}
}