package host

import (
	"context"
	"os"
	"testing"

	"github.com/carlosframework/platform/internal/activator"
	"github.com/carlosframework/platform/internal/provision"
	"github.com/carlosframework/platform/internal/registry"
	"github.com/carlosframework/platform/internal/release"
)

func e7RecoveryOptions(f *r2Live) []release.PassOption {
	n := namedUnitRecovery{source: f.source, pub: f.pub, readLive: os.Readlink}
	return []release.PassOption{release.WithRecovery(func(ctx context.Context, rt registry.Route) (bool, error) {
		return n.recover(ctx, rt.Host, f.c, func(string) string { return "5s" }, f.e.root.reg)
	}, f.c.allowLegacy)}
}

func TestR2UnguardedERecoveryUpdate(t *testing.T) {
	if !plan14RootFixture(t) {
		return
	}
	for _, shape := range []string{"no record", "unavailable history", "empty unit", "socket unit", "list failure", "ordinary", "derived", "exec"} {
		t.Run(shape, func(t *testing.T) {
			f := r2Fixture(t, "none")
			var failed *r2ListFailure
			switch shape {
			case "empty unit", "socket unit":
				unit := ""
				if shape == "socket unit" {
					unit = "custom.service"
				}
				plan14PutRecord(t, f.e.store, provision.Record{Schema: 1, Host: f.rt.Host, Account: "bab", App: f.rt.App, Channel: f.rt.Channel, Unit: unit})
			case "list failure":
				failed = &r2ListFailure{Store: f.e.store}
				f.source.store = failed
			case "ordinary", "derived", "exec":
				f.rt.Unit = ""
				f.rt.Backing = registry.BackingUnit
				if shape == "derived" {
					f.rt.Unit = activator.UnitName(f.rt.Host)
				}
				if shape == "exec" {
					f.rt.Backing = "exec"
				}
				if err := f.e.root.reg.Delete(f.rt.Host); err != nil {
					t.Fatal(err)
				}
				if err := f.e.root.reg.Upsert(f.rt); err != nil {
					t.Fatal(err)
				}
				failed = &r2ListFailure{Store: f.e.store}
				f.source.store = failed
			}
			opts := e7RecoveryOptions(f)
			if shape == "unavailable history" {
				opts = append(opts, release.WithRootHistory(nil))
			}
			if err := f.pass(t, opts...); err != nil {
				t.Fatal(err)
			}
			f.wantLive(t, "v2")
			f.wantRunning(t, "v2")
			if failed != nil && shape != "list failure" && failed.lists != 0 {
				t.Fatalf("ordinary recovery made %d store calls", failed.lists)
			}
		})
	}
}

func TestR2UnguardedERecoveryIncidentRecipe(t *testing.T) {
	if !plan14RootFixture(t) {
		return
	}
	for _, before := range []bool{false, true} {
		t.Run(map[bool]string{false: "reset after", true: "reset before"}[before], func(t *testing.T) {
			f := r2Fixture(t, "none")
			if err := release.StageArtifact(f.u.opt, "", "v2", f.rt.App, []byte("new build")); err != nil {
				t.Fatal(err)
			}
			if err := release.PointLive(f.u.opt, f.rt.Host, "", "v2", f.rt.App); err != nil {
				t.Fatal(err)
			}
			if err := f.e.root.reg.SetVersions(f.rt.Host, "v2", "v1"); err != nil {
				t.Fatal(err)
			}
			f.u.exe = release.VersionPath(f.u.opt, "", "v2", f.rt.App)
			f.u.props.ActiveState, f.u.props.SubState, f.u.props.MainPID = "failed", "failed", 0
			if before {
				if err := f.u.ResetFailed(f.rt.Unit); err != nil {
					t.Fatal(err)
				}
			}
			f.promote(t, "v1")
			if err := f.pass(t, e7RecoveryOptions(f)...); err != nil {
				t.Fatal(err)
			}
			f.wantLive(t, "v1")
			if f.u.props.MainPID != 0 {
				t.Fatal("recovery woke stopped console")
			}
			if !before {
				if err := f.u.ResetFailed(f.rt.Unit); err != nil {
					t.Fatal(err)
				}
			}
			if err := f.u.Restart(f.rt.Unit); err != nil {
				t.Fatal(err)
			}
			f.wantRunning(t, "v1")
		})
	}
}

func TestR2ERecoveryKeepsCensusBoundary(t *testing.T) {
	if !plan14RootFixture(t) {
		return
	}
	for _, unreadable := range []bool{false, true} {
		t.Run(map[bool]string{false: "required", true: "unreadable"}[unreadable], func(t *testing.T) {
			f := r2Fixture(t, "none")
			f.c.legacy = func() (bool, error) {
				if unreadable {
					return false, os.ErrPermission
				}
				return false, nil
			}
			opts := append(e7RecoveryOptions(f), release.WithRootHistory(nil))
			if err := f.pass(t, opts...); err == nil {
				t.Fatal("strict census path selected legacy fallback")
			}
			f.wantLive(t, "v1")
			if len(f.u.effects) != 0 || len(f.u.tries) != 0 {
				t.Fatal("strict census path restarted", f.u.effects, f.u.tries)
			}
		})
	}
}

func TestR2ERecoveryFlagWithoutCensus(t *testing.T) {
	if !plan14RootFixture(t) {
		return
	}
	f := r2Fixture(t, "none")
	t.Setenv("CARLOS_HOST_CLAIM", "1")
	if legacy, err := legacyRootRestart(); err != nil || !legacy {
		t.Fatalf("flag selected bound effects without a census: %v %v", legacy, err)
	}
	n := namedUnitRecovery{source: f.source, pub: f.pub, readLive: os.Readlink}
	handled, err := n.recover(t.Context(), f.rt.Host, f.c, func(string) string { return "5s" }, f.e.root.reg)
	if err != nil || handled {
		t.Fatalf("E claimed no-census route: %v %v", handled, err)
	}
}