Files
Felis/internal/pgint/reaper_test.go

427 lines
16 KiB
Go

//go:build pgint
package pgint
import (
"context"
"database/sql"
"strings"
"testing"
"time"
"felis.lolicon.best/internal/api"
"felis.lolicon.best/internal/backup"
"felis.lolicon.best/internal/reaper"
)
// reclaimCluster knows one server; every other row in the shared schema reads
// as a server whose CRD is gone, which the reaper skips.
type reclaimCluster struct {
name string
deletedPVC []string
}
func (c *reclaimCluster) Inspect(_ context.Context, name string) (reaper.ServerCRD, error) {
if name != c.name {
return reaper.ServerCRD{}, reaper.ErrNotFound
}
return reaper.ServerCRD{PVC: "world-" + name + "-0"}, nil
}
func (c *reclaimCluster) DeletePVC(_ context.Context, pvc string) error {
c.deletedPVC = append(c.deletedPVC, pvc)
return nil
}
func (c *reclaimCluster) HoldWorld(ctx context.Context, _ string) (context.Context, func(), error) {
return ctx, func() {}, nil
}
func (c *reclaimCluster) WorldExists(context.Context, string) (bool, error) { return true, nil }
type reclaimArchiver struct{ archived []string }
func (a *reclaimArchiver) Archive(_ context.Context, server, _ string) (backup.Archived, error) {
ref := "/archives/" + server + "-new.tar.gz"
a.archived = append(a.archived, ref)
return backup.Archived{Ref: backup.ArchiveRef(ref), Size: 42}, nil
}
func (a *reclaimArchiver) Restore(context.Context, backup.ArchiveRef, string) error { return nil }
func (a *reclaimArchiver) Delete(context.Context, backup.ArchiveRef) error { return nil }
// TestReclaimRestartsReaperClock: a world reaped weeks ago and claimed by a new
// owner is not reaped again on the next run, and when it does go idle the reap
// archives the new owner's world instead of reusing the previous owner's
// archive (data-durability-5).
func TestReclaimRestartsReaperClock(t *testing.T) {
ctx := context.Background()
st := reaper.NewPGStore(db)
name := "reclaim-" + suffix(t)
if _, err := db.ExecContext(ctx,
`INSERT INTO servers (name, cached_cpu_milli, cached_memory_mb, cached_storage_mb) VALUES ($1, 100, 128, 1)`,
name); err != nil {
t.Fatalf("seed server: %v", err)
}
first := newUser(t, "user", "reclaim-a")
if ok, err := repo.ClaimServer(ctx, name, first.ID); err != nil || !ok {
t.Fatalf("first claim = (%v, %v)", ok, err)
}
// The first owner went idle and the reaper took the world 20 days ago.
reapedAt := time.Now().Add(-20 * reaper.Day)
if _, err := db.ExecContext(ctx,
`UPDATE servers SET last_active_at = $2, claimed_at = $3 WHERE name = $1`,
name, reapedAt.Add(-16*reaper.Day), reapedAt.Add(-60*reaper.Day)); err != nil {
t.Fatal(err)
}
if _, err := db.ExecContext(ctx,
`INSERT INTO world_backups (id, server_name, former_owner, backup_ref, size_bytes, reason, status, created_at, expires_at)
VALUES ($1, $2, $3, $4, 7, 'inactive_15d', 'present', $5, $6)`,
"bk-"+suffix(t), name, first.ID, "/archives/"+name+"-old.tar.gz", reapedAt, reapedAt.Add(90*reaper.Day)); err != nil {
t.Fatalf("seed the old archive: %v", err)
}
if err := st.ReleaseWorld(ctx, name, reapedAt); err != nil {
t.Fatalf("ReleaseWorld: %v", err)
}
// Leftover warning stamps must not survive into the next ownership.
if _, err := db.ExecContext(ctx,
`UPDATE servers SET warned_3d_at = $2, warned_1d_at = $2 WHERE name = $1`, name, reapedAt); err != nil {
t.Fatal(err)
}
second := newUser(t, "user", "reclaim-b")
before := time.Now()
if ok, err := repo.ClaimServer(ctx, name, second.ID); err != nil || !ok {
t.Fatalf("second claim = (%v, %v)", ok, err)
}
var lastActive time.Time
var w3, w1 sql.NullTime
if err := db.QueryRowContext(ctx,
`SELECT last_active_at, warned_3d_at, warned_1d_at FROM servers WHERE name = $1`, name).Scan(&lastActive, &w3, &w1); err != nil {
t.Fatal(err)
}
if lastActive.Before(before.Add(-time.Minute)) {
t.Fatalf("last_active_at = %v after the claim at %v: the claim did not restart the clock", lastActive, before)
}
if w3.Valid || w1.Valid {
t.Fatalf("warnings survived the claim: 3d=%v 1d=%v", w3, w1)
}
// The previous owner's archive is not this owner's world, whatever since says.
if f, ok, err := st.FreshBackup(ctx, name, reapedAt.Add(-30*reaper.Day)); err != nil || ok {
t.Fatalf("FreshBackup = (%+v, %v, %v): the old archive counted as the new world's", f, ok, err)
}
cl := &reclaimCluster{name: name}
ar := &reclaimArchiver{}
now := time.Now()
r := &reaper.Reaper{Cfg: reaper.DefaultConfig(), Store: st, Cluster: cl, Archiver: ar,
Now: func() time.Time { return now }}
if _, err := r.RunOnce(ctx); err != nil {
t.Fatalf("RunOnce: %v", err)
}
if len(cl.deletedPVC) != 0 || len(ar.archived) != 0 {
t.Fatalf("the reaper took a world claimed moments ago: deleted %v, archived %v", cl.deletedPVC, ar.archived)
}
// Sixteen idle days after the claim it goes, with a fresh archive.
now = time.Now().Add(16 * reaper.Day)
if _, err := r.RunOnce(ctx); err != nil {
t.Fatalf("RunOnce after 16 days: %v", err)
}
if len(ar.archived) != 1 || len(cl.deletedPVC) != 1 {
t.Fatalf("after 16 idle days: archived %v, deleted %v; want one new archive, then the delete", ar.archived, cl.deletedPVC)
}
var owner sql.NullString
var newest string
if err := db.QueryRowContext(ctx, `SELECT owner_id FROM servers WHERE name = $1`, name).Scan(&owner); err != nil {
t.Fatal(err)
}
if err := db.QueryRowContext(ctx,
`SELECT backup_ref FROM world_backups WHERE server_name = $1 ORDER BY created_at DESC LIMIT 1`, name).Scan(&newest); err != nil {
t.Fatal(err)
}
if owner.Valid || newest != ar.archived[0] {
t.Fatalf("owner = %v, newest backup = %q; want released and %q", owner, newest, ar.archived[0])
}
}
// TestManualBackupRationing pins the SQL behind data-durability-9: keep-N
// pruning picks a server's oldest on-demand backups, capacity eviction takes
// on-demand backups before copied reaper archives and never offers the only
// copy of a reaped world, and the API's cooldown and store-size reads see the
// rows the rest of the platform writes.
func TestManualBackupRationing(t *testing.T) {
ctx := context.Background()
st := reaper.NewPGStore(db)
name := "ration-" + suffix(t)
if _, err := db.ExecContext(ctx,
`INSERT INTO servers (name, cached_cpu_milli, cached_memory_mb, cached_storage_mb) VALUES ($1, 100, 128, 1)`,
name); err != nil {
t.Fatalf("seed server: %v", err)
}
storeBefore, err := repo.BackupStoreBytes(ctx)
if err != nil {
t.Fatalf("BackupStoreBytes: %v", err)
}
now := time.Now()
insert := func(id, reason string, created time.Time, offsite bool, size int64) {
t.Helper()
var offsiteAt any
if offsite {
offsiteAt = created
}
if _, err := db.ExecContext(ctx,
`INSERT INTO world_backups (id, server_name, backup_ref, size_bytes, reason, status, created_at, expires_at, offsite_at)
VALUES ($1, $2, $3, $4, $5, 'present', $6, $7, $8)`,
id, name, "/archives/"+id+".tar.gz", size, reason, created, created.Add(90*reaper.Day), offsiteAt); err != nil {
t.Fatalf("seed %s: %v", id, err)
}
}
sfx := suffix(t)
var manual []string
for i := 0; i < 7; i++ {
id := "bk-m" + string(rune('0'+i)) + "-" + sfx
manual = append(manual, id)
insert(id, "manual", now.Add(time.Duration(i-7)*time.Hour), false, 10)
}
sole := "bk-sole-" + sfx
copied := "bk-copied-" + sfx
insert(sole, "inactive_15d", now.Add(-100*reaper.Day), false, 1000)
insert(copied, "inactive_15d", now.Add(-50*reaper.Day), true, 100)
excess, err := st.ExcessBackups(ctx, name, "manual", 5, "")
if err != nil {
t.Fatalf("ExcessBackups: %v", err)
}
if len(excess) != 2 || excess[0].ID != manual[0] || excess[1].ID != manual[1] {
t.Fatalf("excess = %+v; want the two oldest manual backups, oldest first", excess)
}
// The backup a chained restore will extract is never pruned.
excess, err = st.ExcessBackups(ctx, name, "manual", 5, manual[0])
if err != nil {
t.Fatalf("ExcessBackups(protect): %v", err)
}
if len(excess) != 1 || excess[0].ID != manual[1] {
t.Fatalf("excess with %s protected = %+v; want only %s", manual[0], excess, manual[1])
}
if excess, err = st.ExcessBackups(ctx, name, "pre_restore", 0, ""); err != nil || len(excess) != 0 {
t.Fatalf("pre_restore excess = %+v, %v; the manual ones are not its to prune", excess, err)
}
all, err := st.EvictableBackups(ctx)
if err != nil {
t.Fatalf("EvictableBackups: %v", err)
}
var got []string
for _, b := range all {
if b.ServerName == name {
got = append(got, b.ID)
}
}
want := append(append([]string{}, manual...), copied)
if strings.Join(got, ",") != strings.Join(want, ",") {
t.Fatalf("eviction order = %v\nwant %v (manual oldest first, then the copied archive, never the sole copy)", got, want)
}
storeAfter, err := repo.BackupStoreBytes(ctx)
if err != nil {
t.Fatalf("BackupStoreBytes: %v", err)
}
if storeAfter-storeBefore != 7*10+1000+100 {
t.Fatalf("store grew by %d, want %d", storeAfter-storeBefore, 7*10+1000+100)
}
if at, err := repo.LastBackupRequest(ctx, name, now.Add(-10*time.Minute)); err != nil || !at.IsZero() {
t.Fatalf("before any request: LastBackupRequest = (%v, %v)", at, err)
}
if err := repo.Audit(ctx, api.AuditEntry{Actor: "[email protected]", Source: "external",
Action: "backup.create", ServerName: name}); err != nil {
t.Fatalf("Audit: %v", err)
}
at, err := repo.LastBackupRequest(ctx, name, time.Now().Add(-10*time.Minute))
if err != nil || at.IsZero() || time.Since(at) > time.Minute {
t.Fatalf("after a request: LastBackupRequest = (%v, %v)", at, err)
}
if at, err := repo.LastBackupRequest(ctx, name, time.Now().Add(time.Minute)); err != nil || !at.IsZero() {
t.Fatalf("a request before since still counted: (%v, %v)", at, err)
}
}
// TestBackupReadBack pins the SQL behind data-durability-7/15/16: the digest a
// backup is written with survives a later read-back, a corrupt archive is no
// longer offered for reuse, restore or read-back but stays listed, and it is
// the first a keep-N prune removes.
func TestBackupReadBack(t *testing.T) {
ctx := context.Background()
st := reaper.NewPGStore(db)
name := "readback-" + suffix(t)
if _, err := db.ExecContext(ctx,
`INSERT INTO servers (name, cached_cpu_milli, cached_memory_mb, cached_storage_mb) VALUES ($1, 100, 128, 1)`,
name); err != nil {
t.Fatalf("seed server: %v", err)
}
now := time.Now()
sfx := suffix(t)
older, newer := "bk-old-"+sfx, "bk-new-"+sfx
for _, r := range []reaper.BackupRecord{
{ID: older, ServerName: name, BackupRef: "/archives/" + older + ".tar.gz", SizeBytes: 10,
Reason: "inactive_15d", ExpiresAt: now.Add(90 * reaper.Day), SHA256: "aa", SkippedEntries: 2},
{ID: newer, ServerName: name, BackupRef: "/archives/" + newer + ".tar.gz", SizeBytes: 10,
Reason: "inactive_15d", ExpiresAt: now.Add(90 * reaper.Day)},
} {
if err := st.InsertBackup(ctx, r); err != nil {
t.Fatalf("InsertBackup %s: %v", r.ID, err)
}
}
if _, err := db.ExecContext(ctx,
`UPDATE world_backups SET created_at = CASE id WHEN $1 THEN $3::timestamptz ELSE $4::timestamptz END WHERE id IN ($1, $2)`,
older, newer, now.Add(-2*time.Hour), now.Add(-time.Hour)); err != nil {
t.Fatalf("age backups: %v", err)
}
if f, ok, err := st.FreshBackup(ctx, name, now.Add(-reaper.Day)); err != nil || !ok || f.ID != newer || f.SHA256 != "" {
t.Fatalf("FreshBackup = (%+v, %v, %v); want %s with no digest yet", f, ok, err, newer)
}
// A read-back fills in a missing digest and never rewrites a recorded one.
checked := now.Add(-time.Minute)
for id, sum := range map[string]string{newer: "bb", older: "zz"} {
if err := st.MarkBackupVerified(ctx, id, sum, checked); err != nil {
t.Fatalf("MarkBackupVerified %s: %v", id, err)
}
}
due := func(before time.Time) map[string]string {
t.Helper()
bs, err := st.BackupsToVerify(ctx, before, 100000)
if err != nil {
t.Fatalf("BackupsToVerify: %v", err)
}
out := map[string]string{}
for _, b := range bs {
if b.ServerName == name {
out[b.ID] = b.SHA256
}
}
return out
}
if got := due(checked.Add(-time.Second)); len(got) != 0 {
t.Fatalf("due before their read-back = %v; want none", got)
}
if got := due(checked.Add(time.Second)); got[newer] != "bb" || got[older] != "aa" || len(got) != 2 {
t.Fatalf("due after their read-back = %v; want %s=bb and %s=aa", got, newer, older)
}
corruptAt := now.Add(-30 * time.Second)
if err := st.MarkBackupCorrupt(ctx, newer, corruptAt); err != nil {
t.Fatalf("MarkBackupCorrupt: %v", err)
}
if err := st.MarkBackupCorrupt(ctx, newer, now); err != nil {
t.Fatalf("MarkBackupCorrupt again: %v", err)
}
var first time.Time
if err := db.QueryRowContext(ctx, `SELECT corrupt_at FROM world_backups WHERE id = $1`, newer).Scan(&first); err != nil ||
!first.Equal(corruptAt.Truncate(time.Microsecond)) {
t.Fatalf("corrupt_at = (%v, %v); want the first finding %v kept", first, err, corruptAt)
}
if f, ok, err := st.FreshBackup(ctx, name, now.Add(-reaper.Day)); err != nil || !ok || f.ID != older || f.SHA256 != "aa" {
t.Fatalf("FreshBackup after corruption = (%+v, %v, %v); want the intact %s", f, ok, err, older)
}
if got := due(now.Add(reaper.Day)); len(got) != 1 || got[older] == "" {
t.Fatalf("due after corruption = %v; want only %s", got, older)
}
if b, err := repo.LatestBackup(ctx, name); err != nil || b.ID != older {
t.Fatalf("LatestBackup = (%+v, %v); want %s", b, err, older)
}
if b, err := repo.BackupByID(ctx, newer); err != nil || !b.Corrupt {
t.Fatalf("BackupByID(corrupt) = (%+v, %v); want Corrupt", b, err)
}
if b, err := repo.BackupByID(ctx, older); err != nil || b.Corrupt {
t.Fatalf("BackupByID(intact) = (%+v, %v); want not Corrupt", b, err)
}
views, _, err := repo.AllBackups(ctx, api.BackupListOpts{Server: name, Limit: api.MaxBackupListLimit})
if err != nil {
t.Fatalf("AllBackups: %v", err)
}
seen := 0
for _, v := range views {
switch v.ID {
case newer:
seen++
if !v.Corrupt || v.VerifiedAt == nil || v.SkippedEntries != 0 {
t.Fatalf("listed corrupt backup = %+v; want corrupt, verified_at set", v)
}
case older:
seen++
if v.Corrupt || v.VerifiedAt == nil || v.SkippedEntries != 2 {
t.Fatalf("listed intact backup = %+v; want verified_at set and 2 skipped entries", v)
}
}
}
if seen != 2 {
t.Fatalf("AllBackups listed %d of the 2 backups", seen)
}
if excess, err := st.ExcessBackups(ctx, name, "inactive_15d", 1, ""); err != nil || len(excess) != 1 || excess[0].ID != newer {
t.Fatalf("ExcessBackups(keep 1) = (%+v, %v); want the corrupt %s pruned first", excess, err, newer)
}
live := func() map[string]bool {
t.Helper()
refs, err := st.LiveBackupRefs(ctx)
if err != nil {
t.Fatalf("LiveBackupRefs: %v", err)
}
out := map[string]bool{}
for _, r := range refs {
out[r] = true
}
return out
}
if l := live(); !l["/archives/"+older+".tar.gz"] || !l["/archives/"+newer+".tar.gz"] {
t.Fatalf("live refs miss a present backup")
}
if err := st.MarkBackupDeleted(ctx, newer, now); err != nil {
t.Fatalf("MarkBackupDeleted: %v", err)
}
if l := live(); l["/archives/"+newer+".tar.gz"] || !l["/archives/"+older+".tar.gz"] {
t.Fatalf("live refs after deleting %s still claim its archive", newer)
}
}
// TestRestartClock: an idle server with no world to reclaim gets its clock and
// warnings reset, and keeps its owner and resource cache (data-durability-19).
func TestRestartClock(t *testing.T) {
ctx := context.Background()
st := reaper.NewPGStore(db)
name := "clock-" + suffix(t)
old := time.Now().Add(-20 * reaper.Day).UTC().Truncate(time.Microsecond)
if _, err := db.ExecContext(ctx,
`INSERT INTO servers (name, cached_cpu_milli, cached_memory_mb, cached_storage_mb) VALUES ($1, 100, 128, 1)`,
name); err != nil {
t.Fatalf("seed server: %v", err)
}
if _, err := db.ExecContext(ctx,
`UPDATE servers SET last_active_at = $2, warned_3d_at = $2, warned_1d_at = $2 WHERE name = $1`, name, old); err != nil {
t.Fatalf("age server: %v", err)
}
at := time.Now().UTC().Truncate(time.Microsecond)
if err := st.RestartClock(ctx, name, at); err != nil {
t.Fatalf("RestartClock: %v", err)
}
var last time.Time
var w3, w1 sql.NullTime
var cpu int
if err := db.QueryRowContext(ctx,
`SELECT last_active_at, warned_3d_at, warned_1d_at, cached_cpu_milli FROM servers WHERE name = $1`, name).
Scan(&last, &w3, &w1, &cpu); err != nil {
t.Fatalf("read back: %v", err)
}
if !last.Equal(at) || w3.Valid || w1.Valid || cpu != 100 {
t.Fatalf("after RestartClock: last_active_at=%v warned=%v/%v cpu=%d; want %v, cleared, cache kept", last, w3, w1, cpu, at)
}
}