feat(archive): BAK-08 Checksum-basierte Objekt-Integritaetspruefung

Stichprobenbasierter Scrub-Job: nimmt BAK-05s existing_in_storage,
priorisiert nach eigenem scrub_state.last_scrubbed_at (nicht
file_revisions.created_at, sonst kein echtes Rotationsverhalten),
prueft Inhalt per SHA-256 gegen file_revisions.checksum_sha256.
Meldung ueber echten dauerhaften /metrics-Endpunkt (Pull-Modell,
OPS-03 scrapt, kein Push), Counter monoton steigend. Real registriert
in Core metrics_sources, End-zu-Ende ueber OPS-03-Aggregator bestaetigt,
realer Befund-Durchlauf mit absichtlich falscher Pruefsumme durchgefuehrt.

archive/.golangci.yml

@@ -0,0 +1,18 @@
+version: "2"
+
+run:
+  timeout: 3m
+
+linters:
+  default: none
+  enable:
+    - govet
+    - staticcheck
+    - errcheck
+    - unused
+    - ineffassign
+
+formatters:
+  enable:
+    - gofmt
+    - goimports

archive/Makefile

@@ -0,0 +1,19 @@
+.PHONY: build lint fmt test check
+
+build:
+	go build ./...
+
+lint:
+	golangci-lint run ./...
+
+fmt:
+	gofmt -l .
+	@test -z "$$(gofmt -l .)" || (echo "gofmt-Verstoesse gefunden, siehe oben" && exit 1)
+
+test:
+	go test ./... -p 1 -count=1
+
+check: build
+	go vet ./...
+	golangci-lint run ./...
+	go test ./... -p 1 -count=1

archive/README.md

@@ -0,0 +1,62 @@
+# NEXARCH Archive
+
+Zentrales, modulübergreifendes Modul für Aufbewahrung, WORM, Compliance und
+Backup. Dieses Verzeichnis enthält bisher `internal/backup` (BAK-01,
+Datenbank-Backup-Strategie) — weitere Bausteine folgen ticketweise.
+
+## BAK-01: Datenbank-Backup
+
+`cmd/backup-cli` — Aufrufpunkt für systemd-Timer (siehe
+`../deploy/systemd/nexarch-archive-backup-*.timer`):
+
+```bash
+export NEXARCH_BACKUP_PG_USER=nexarch_backup
+export NEXARCH_BACKUP_PG_PASSWORD=...
+export NEXARCH_BACKUP_DIR=/var/nexarch-archiv/backups/postgres   # NICHT auf einem ephemeren Test-Dataset (siehe Betrieb)
+export NEXARCH_BACKUP_KEEP_GENERATIONS=7   # optional, Default 7
+
+backup-cli full          # neue Vollsicherung + Verifikation
+backup-cli incremental   # inkrementelle Sicherung gegen die neueste Generation
+backup-cli rotate        # entfernt alle bis auf die neuesten N Generationen
+```
+
+Voraussetzung: die konfigurierte Postgres-Rolle braucht das
+`REPLICATION`-Attribut (`pg_basebackup` nutzt eine
+Replikationsverbindung), und `summarize_wal = on` muss serverseitig gesetzt
+sein (PostgreSQL 17s natives inkrementelles Backup, keine WAL-Archivierung
+nötig).
+
+## BAK-02: Objekt-Storage-Backup
+
+`cmd/objectbackup-cli` sichert einen lokalen Verzeichnisbaum (den
+FDN-03-`LocalDriver`-Basisordner direkt, oder — für S3-gestützte
+Deployments — einen vorgelagerten `rclone`-Spiegel) mit
+[restic](https://restic.net) (Content-defined Chunking, verschlüsseltes
+Repository, geprüftes Tooling statt Eigenbau):
+
+```bash
+export NEXARCH_OBJECTBACKUP_REPO_DIR=/var/nexarch-archiv/backups/objects
+export NEXARCH_OBJECTBACKUP_PASSWORD=...
+export NEXARCH_OBJECTBACKUP_KEEP_SNAPSHOTS=30   # optional, Default 7
+
+objectbackup-cli backup /var/nexarch-objects   # Sicherung + Verifikation
+objectbackup-cli check                          # vollständiges Lesen aller Datenblöcke
+objectbackup-cli rotate                          # restic forget --keep-last N --prune
+```
+
+## Betrieb: Backup-Zielverzeichnis
+
+Backup-Ziele liegen unter `/var/nexarch-archiv/` (persistentes ZFS-Dataset,
+`zfs/data/subvol-1131-disk-0` auf 192.168.1.131), NIEMALS unter
+`/var/nexarch-test/` (ephemeres Dataset, wird von den `reset-test-env.sh`-
+Skripten der anderen Module geleert). ZFS-seitige Snapshots/Replikation
+dieses Datasets sind ein eigenständiges Infra-Runbook (siehe
+`../../STORAGE-KONZEPT.md` Abschnitt 7), kein Ticket-Code — `zfs
+dedup=on` bewusst NICHT setzen (hoher RAM-Bedarf), Deduplizierung läuft
+ausschließlich App-seitig über restic.
+
+## Prüfungen
+
+```bash
+make check   # build + vet + lint + test, analog Core/DMS
+```

archive/cmd/backup-cli/main.go

@@ -0,0 +1,107 @@
+// backup-cli ist der Aufrufpunkt für BAK-01, gedacht für systemd-Timer
+// (siehe deploy/systemd/) — "automatisiert nach Zeitplan" (Akzeptanzkriterium
+// 1) entsteht durch die Zeitplan-Definition im Timer-Unit, nicht durch
+// einen eigenen In-Prozess-Scheduler (kein zusätzlicher Dauerprozess nötig,
+// passt zur Produkt-DNA "kein Anwendungsserver mit unnötigem
+// Ressourcenverbrauch").
+package main
+
+import (
+	"context"
+	"fmt"
+	"log"
+	"os"
+	"time"
+
+	"gitea.perlbach24.de/scripte/nexarch/archive/internal/backup"
+)
+
+func loadConfig() backup.Config {
+	cfg := backup.Config{
+		Host:      os.Getenv("NEXARCH_BACKUP_PG_HOST"),
+		Port:      os.Getenv("NEXARCH_BACKUP_PG_PORT"),
+		User:      os.Getenv("NEXARCH_BACKUP_PG_USER"),
+		Password:  os.Getenv("NEXARCH_BACKUP_PG_PASSWORD"),
+		BackupDir: os.Getenv("NEXARCH_BACKUP_DIR"),
+	}
+	if cfg.Host == "" {
+		cfg.Host = "localhost"
+	}
+	if cfg.Port == "" {
+		cfg.Port = "5432"
+	}
+	if cfg.User == "" || cfg.Password == "" || cfg.BackupDir == "" {
+		log.Fatal("NEXARCH_BACKUP_PG_USER, NEXARCH_BACKUP_PG_PASSWORD und NEXARCH_BACKUP_DIR muessen gesetzt sein")
+	}
+	return cfg
+}
+
+func latestManifest(backupDir string) (string, error) {
+	generations, err := backup.ListGenerations(backupDir)
+	if err != nil {
+		return "", err
+	}
+	if len(generations) == 0 {
+		return "", fmt.Errorf("keine vorhandene generation fuer inkrementelle sicherung gefunden - zuerst 'full' ausfuehren")
+	}
+	latest := generations[len(generations)-1]
+	full := backupDir + "/" + latest + "/" + backup.FullBackupDirName + "/" + backup.BackupManifestFile
+	if _, err := os.Stat(full); err == nil {
+		return full, nil
+	}
+	return "", fmt.Errorf("kein backup_manifest in der neuesten generation %q gefunden", latest)
+}
+
+func main() {
+	if len(os.Args) < 2 {
+		log.Fatal("aufruf: backup-cli <full|incremental|verify|rotate> [args]")
+	}
+	cfg := loadConfig()
+	ctx := context.Background()
+
+	switch os.Args[1] {
+	case "full":
+		genID := backup.NewGenerationID(time.Now())
+		manifest, err := backup.FullBackup(ctx, cfg, genID)
+		if err != nil {
+			log.Fatalf("vollsicherung fehlgeschlagen: %v", err)
+		}
+		dir := manifest[:len(manifest)-len("/"+backup.BackupManifestFile)]
+		if err := backup.Verify(dir); err != nil {
+			log.Fatalf("verifikation der vollsicherung fehlgeschlagen: %v", err)
+		}
+		fmt.Printf("vollsicherung %q erstellt und verifiziert: %s\n", genID, manifest)
+
+	case "incremental":
+		manifest, err := latestManifest(cfg.BackupDir)
+		if err != nil {
+			log.Fatal(err)
+		}
+		generations, _ := backup.ListGenerations(cfg.BackupDir)
+		genID := generations[len(generations)-1]
+		incID := backup.NewGenerationID(time.Now())
+		newManifest, err := backup.IncrementalBackup(ctx, cfg, genID, incID, manifest)
+		if err != nil {
+			log.Fatalf("inkrementelle sicherung fehlgeschlagen: %v", err)
+		}
+		dir := newManifest[:len(newManifest)-len("/"+backup.BackupManifestFile)]
+		if err := backup.Verify(dir); err != nil {
+			log.Fatalf("verifikation der inkrementellen sicherung fehlgeschlagen: %v", err)
+		}
+		fmt.Printf("inkrementelle sicherung %q erstellt und verifiziert: %s\n", incID, newManifest)
+
+	case "rotate":
+		keep := 7
+		if v := os.Getenv("NEXARCH_BACKUP_KEEP_GENERATIONS"); v != "" {
+			_, _ = fmt.Sscanf(v, "%d", &keep)
+		}
+		removed, err := backup.Rotate(cfg.BackupDir, keep)
+		if err != nil {
+			log.Fatalf("rotation fehlgeschlagen: %v", err)
+		}
+		fmt.Printf("rotation abgeschlossen, %d generation(en) entfernt: %v\n", len(removed), removed)
+
+	default:
+		log.Fatalf("unbekannter befehl %q", os.Args[1])
+	}
+}

archive/cmd/objectbackup-cli/main.go

@@ -0,0 +1,75 @@
+// objectbackup-cli ist der Aufrufpunkt für BAK-02, für systemd-Timer
+// gedacht (siehe deploy/systemd/) — "automatisiert nach Zeitplan" entsteht
+// durch die Timer-Definition, kein eigener Dauerprozess (dieselbe
+// Begründung wie BAK-01 / cmd/backup-cli).
+package main
+
+import (
+	"context"
+	"fmt"
+	"log"
+	"os"
+	"strconv"
+
+	"gitea.perlbach24.de/scripte/nexarch/archive/internal/objectbackup"
+)
+
+func loadConfig() objectbackup.Config {
+	cfg := objectbackup.Config{
+		RepoDir:  os.Getenv("NEXARCH_OBJECTBACKUP_REPO_DIR"),
+		Password: os.Getenv("NEXARCH_OBJECTBACKUP_PASSWORD"),
+	}
+	if cfg.RepoDir == "" || cfg.Password == "" {
+		log.Fatal("NEXARCH_OBJECTBACKUP_REPO_DIR und NEXARCH_OBJECTBACKUP_PASSWORD muessen gesetzt sein")
+	}
+	return cfg
+}
+
+func main() {
+	if len(os.Args) < 2 {
+		log.Fatal("aufruf: objectbackup-cli <backup <quellverzeichnis>|check|rotate>")
+	}
+	cfg := loadConfig()
+	ctx := context.Background()
+
+	if err := objectbackup.InitRepo(ctx, cfg); err != nil {
+		log.Fatalf("repository initialisieren: %v", err)
+	}
+
+	switch os.Args[1] {
+	case "backup":
+		if len(os.Args) < 3 {
+			log.Fatal("aufruf: objectbackup-cli backup <quellverzeichnis>")
+		}
+		summary, err := objectbackup.Backup(ctx, cfg, os.Args[2])
+		if err != nil {
+			log.Fatalf("sicherung fehlgeschlagen: %v", err)
+		}
+		if err := objectbackup.Check(ctx, cfg, false); err != nil {
+			log.Fatalf("verifikation nach sicherung fehlgeschlagen: %v", err)
+		}
+		fmt.Printf("sicherung %q erstellt und verifiziert (neu=%d geaendert=%d unveraendert=%d)\n",
+			summary.SnapshotID, summary.FilesNew, summary.FilesChanged, summary.FilesUnmodified)
+
+	case "check":
+		if err := objectbackup.Check(ctx, cfg, true); err != nil {
+			log.Fatalf("verifikation fehlgeschlagen: %v", err)
+		}
+		fmt.Println("verifikation (mit vollstaendigem lesen) erfolgreich")
+
+	case "rotate":
+		keep := 7
+		if v := os.Getenv("NEXARCH_OBJECTBACKUP_KEEP_SNAPSHOTS"); v != "" {
+			if n, err := strconv.Atoi(v); err == nil {
+				keep = n
+			}
+		}
+		if err := objectbackup.Forget(ctx, cfg, keep); err != nil {
+			log.Fatalf("rotation fehlgeschlagen: %v", err)
+		}
+		fmt.Println("rotation abgeschlossen")
+
+	default:
+		log.Fatalf("unbekannter befehl %q", os.Args[1])
+	}
+}

archive/cmd/reconcile-cli/main.go

@@ -0,0 +1,55 @@
+// reconcile-cli ist der Aufrufpunkt für BAK-05, für systemd-Timer gedacht
+// (siehe deploy/systemd/) — "geplanter Abgleichs-Job" (Ticket-Vorgabe)
+// entsteht durch die Timer-Definition, kein eigener Dauerprozess.
+package main
+
+import (
+	"context"
+	"encoding/json"
+	"log"
+	"os"
+
+	"github.com/jackc/pgx/v5/pgxpool"
+
+	"gitea.perlbach24.de/scripte/nexarch/archive/internal/reconcile"
+)
+
+func main() {
+	dsn := os.Getenv("NEXARCH_RECONCILE_TENANT_DSN")
+	storageDir := os.Getenv("NEXARCH_RECONCILE_STORAGE_DIR")
+	if dsn == "" || storageDir == "" {
+		log.Fatal("NEXARCH_RECONCILE_TENANT_DSN und NEXARCH_RECONCILE_STORAGE_DIR muessen gesetzt sein")
+	}
+
+	ctx := context.Background()
+	pool, err := pgxpool.New(ctx, dsn)
+	if err != nil {
+		log.Fatalf("datenbankverbindung: %v", err)
+	}
+	defer pool.Close()
+
+	dbEntries, err := reconcile.ListDBStorageKeys(ctx, pool)
+	if err != nil {
+		log.Fatalf("datenbank-eintraege lesen: %v", err)
+	}
+	storageKeys, err := reconcile.ListStorageObjects(storageDir)
+	if err != nil {
+		log.Fatalf("objekt-storage durchlaufen: %v", err)
+	}
+
+	report := reconcile.Reconcile(dbEntries, storageKeys)
+
+	encoder := json.NewEncoder(os.Stdout)
+	encoder.SetIndent("", "  ")
+	if err := encoder.Encode(report); err != nil {
+		log.Fatalf("bericht ausgeben: %v", err)
+	}
+
+	// Nicht-null-Exit-Code bei Abweichungen (Akzeptanzkriterium 3:
+	// Abweichungen werden BERICHTET, nicht automatisch behoben — der
+	// Exit-Code macht das fuer systemd/Monitoring sichtbar, OHNE selbst
+	// irgendetwas zu reparieren).
+	if !report.IsClean() {
+		os.Exit(1)
+	}
+}

archive/cmd/scrub-cli/main.go

@@ -0,0 +1,144 @@
+// scrub-cli ist der Aufrufpunkt fuer BAK-08 (systemd-Timer, konfigurierbare
+// Kadenz) — zieht eine Stichprobe existierender Objekte (BAK-05 als
+// Existenz-Quelle), prueft deren Inhalt per SHA-256 gegen
+// file_revisions.checksum_sha256, meldet Abweichungen (kein Auto-Repair)
+// und schreibt den Befund-Zaehler fuer den OPS-05/OPS-03-Metrik-Export.
+package main
+
+import (
+	"context"
+	"encoding/json"
+	"log"
+	"os"
+	"strconv"
+	"time"
+
+	"github.com/jackc/pgx/v5/pgxpool"
+
+	"gitea.perlbach24.de/scripte/nexarch/archive/internal/reconcile"
+	"gitea.perlbach24.de/scripte/nexarch/archive/internal/scrub"
+)
+
+type finding struct {
+	StorageKey string `json:"storage_key"`
+	DocumentID string `json:"document_id"`
+	RevisionID string `json:"revision_id"`
+	Expected   string `json:"expected_checksum"`
+	Actual     string `json:"actual_checksum,omitempty"`
+	Error      string `json:"error,omitempty"`
+}
+
+type report struct {
+	GeneratedAt time.Time `json:"generated_at"`
+	Sampled     int       `json:"sampled"`
+	Findings    []finding `json:"findings"`
+}
+
+func main() {
+	dsn := os.Getenv("NEXARCH_SCRUB_TENANT_DSN")
+	storageDir := os.Getenv("NEXARCH_SCRUB_STORAGE_DIR")
+	if dsn == "" || storageDir == "" {
+		log.Fatal("NEXARCH_SCRUB_TENANT_DSN und NEXARCH_SCRUB_STORAGE_DIR muessen gesetzt sein")
+	}
+	sampleSize := envInt("NEXARCH_SCRUB_SAMPLE_SIZE", 10)
+	cooldown := envDuration("NEXARCH_SCRUB_COOLDOWN", 24*time.Hour)
+
+	ctx := context.Background()
+	pool, err := pgxpool.New(ctx, dsn)
+	if err != nil {
+		log.Fatalf("datenbankverbindung: %v", err)
+	}
+	defer pool.Close()
+
+	dbEntries, err := reconcile.ListDBStorageKeys(ctx, pool)
+	if err != nil {
+		log.Fatalf("datenbank-eintraege lesen: %v", err)
+	}
+	storageKeys, err := reconcile.ListStorageObjects(storageDir)
+	if err != nil {
+		log.Fatalf("objekt-storage durchlaufen: %v", err)
+	}
+	rec := reconcile.Reconcile(dbEntries, storageKeys)
+
+	lastScrubbed, err := scrub.LoadLastScrubbed(ctx, pool)
+	if err != nil {
+		log.Fatalf("scrub-zustand lesen: %v", err)
+	}
+
+	now := time.Now().UTC()
+	candidates := scrub.Sample(rec.ExistingInStorage, lastScrubbed, cooldown, sampleSize, now)
+
+	keys := make([]string, 0, len(candidates))
+	for _, c := range candidates {
+		keys = append(keys, c.StorageKey)
+	}
+	expected, err := scrub.ExpectedChecksums(ctx, pool, keys)
+	if err != nil {
+		log.Fatalf("erwartete pruefsummen lesen: %v", err)
+	}
+
+	rep := report{GeneratedAt: now, Sampled: len(candidates)}
+	for _, c := range candidates {
+		exp, known := expected[c.StorageKey]
+		if !known {
+			// Objekt in DB nicht (mehr) auffindbar - das ist BAK-05s
+			// Zustaendigkeit (existiert der Datenbankeintrag?), nicht
+			// dieses Jobs; ueberspringen ohne Markierung.
+			continue
+		}
+		actual, readErr := scrub.ActualChecksum(storageDir, c.StorageKey)
+		ok := readErr == nil && actual == exp
+		if err := scrub.MarkScrubbed(ctx, pool, c.StorageKey, ok, now); err != nil {
+			log.Fatalf("scrub-zustand schreiben: %v", err)
+		}
+		if !ok {
+			f := finding{StorageKey: c.StorageKey, DocumentID: c.DocumentID, RevisionID: c.RevisionID, Expected: exp, Actual: actual}
+			if readErr != nil {
+				f.Error = readErr.Error()
+			}
+			rep.Findings = append(rep.Findings, f)
+			if err := scrub.RecordFinding(ctx, pool); err != nil {
+				log.Fatalf("befund-zaehler erhoehen: %v", err)
+			}
+		}
+	}
+
+	encoder := json.NewEncoder(os.Stdout)
+	encoder.SetIndent("", "  ")
+	if err := encoder.Encode(rep); err != nil {
+		log.Fatalf("bericht ausgeben: %v", err)
+	}
+
+	// Befund wird gemeldet, nicht automatisch repariert (Akzeptanzkriterium
+	// 3) - der Exit-Code macht das fuer systemd/Monitoring sichtbar, ohne
+	// selbst etwas zu reparieren; die tatsaechliche Meldung an OPS-05
+	// laeuft ueber den separaten /metrics-Export (cmd/scrub-metrics), nicht
+	// ueber diesen Exit-Code.
+	if len(rep.Findings) > 0 {
+		os.Exit(1)
+	}
+}
+
+func envInt(name string, def int) int {
+	v := os.Getenv(name)
+	if v == "" {
+		return def
+	}
+	n, err := strconv.Atoi(v)
+	if err != nil {
+		log.Fatalf("%s: ungueltiger wert %q: %v", name, v, err)
+	}
+	return n
+}
+
+func envDuration(name string, def time.Duration) time.Duration {
+	v := os.Getenv(name)
+	if v == "" {
+		return def
+	}
+	d, err := time.ParseDuration(v)
+	if err != nil {
+		log.Fatalf("%s: ungueltiger wert %q: %v", name, v, err)
+	}
+	return d
+}

archive/cmd/scrub-metrics/main.go

@@ -0,0 +1,62 @@
+// scrub-metrics stellt BAK-08s Befund-Zaehler unter /metrics bereit — die
+// OPS-05-Anbindung ist Pull-basiert (Core OPS-03 scrapt /metrics-URLs, kein
+// Push-Mechanismus), daher braucht es einen eigenen, dauerhaft laufenden
+// HTTP-Endpunkt getrennt vom Oneshot-scrub-cli (dessen Prozess nach jedem
+// Lauf beendet ist und daher zum Scrape-Zeitpunkt nicht erreichbar waere).
+package main
+
+import (
+	"context"
+	"fmt"
+	"log"
+	"net/http"
+	"os"
+
+	"github.com/jackc/pgx/v5/pgxpool"
+
+	"gitea.perlbach24.de/scripte/nexarch/archive/internal/scrub"
+)
+
+func main() {
+	dsn := os.Getenv("NEXARCH_SCRUB_TENANT_DSN")
+	if dsn == "" {
+		log.Fatal("NEXARCH_SCRUB_TENANT_DSN muss gesetzt sein")
+	}
+	addr := os.Getenv("NEXARCH_SCRUB_METRICS_LISTEN_ADDR")
+	if addr == "" {
+		addr = ":8090"
+	}
+
+	ctx := context.Background()
+	pool, err := pgxpool.New(ctx, dsn)
+	if err != nil {
+		log.Fatalf("datenbankverbindung: %v", err)
+	}
+	defer pool.Close()
+
+	mux := http.NewServeMux()
+	mux.HandleFunc("/metrics", func(w http.ResponseWriter, r *http.Request) {
+		total, err := scrub.FindingsTotal(r.Context(), pool)
+		if err != nil {
+			http.Error(w, err.Error(), http.StatusInternalServerError)
+			return
+		}
+		w.Header().Set("Content-Type", "text/plain; version=0.0.4")
+		// Counter (Akzeptanzkriterium/Nutzervorgabe: monoton steigend, kein
+		// Gauge) - kein Befund => Wert 0, kein Dauer-Alarm ("kein Befund
+		// bedeutet kein Alarm", nicht "kein Wert").
+		body := fmt.Sprintf(
+			"# HELP nexarch_archive_storage_integrity_failures_total Anzahl seit Einrichtung gefundener Pruefsummen-Abweichungen (BAK-08).\n"+
+				"# TYPE nexarch_archive_storage_integrity_failures_total counter\n"+
+				"nexarch_archive_storage_integrity_failures_total %d\n", total)
+		if _, err := w.Write([]byte(body)); err != nil {
+			log.Printf("scrub-metrics: antwort schreiben: %v", err)
+		}
+	})
+	mux.HandleFunc("/healthz", func(w http.ResponseWriter, r *http.Request) { w.WriteHeader(http.StatusOK) })
+
+	log.Printf("scrub-metrics: listening on %s", addr)
+	if err := http.ListenAndServe(addr, mux); err != nil {
+		log.Fatalf("http server: %v", err)
+	}
+}

archive/docs/BAK-01-PRUEFPROTOKOLL.md

@@ -0,0 +1,87 @@
+# BAK-01 – Prüfprotokoll: Datenbank-Backup-Strategie
+
+Welle 1, keine Vorbedingungen. Neues Modul-Verzeichnis `code/archive/`
+(gleiches Monorepo-Muster wie `code/dms/`), eigenes Go-Modul
+`gitea.perlbach24.de/scripte/nexarch/archive`.
+
+## Grundsatzentscheidung: PostgreSQL-17-natives inkrementelles Backup
+
+`pg_dump` kennt nur logische Vollsicherungen — "inkrementell" im Sinne des
+Tickets erfordert das physische Backup-Verfahren. Gewählt: PostgreSQL 17s
+natives `pg_basebackup --incremental` (WAL-Summarization), NICHT klassisches
+WAL-Archiving (`archive_mode`), weil letzteres einen Neustart der
+(geteilten, auch von Core/DMS-Tests genutzten) Postgres-Instanz auf
+192.168.1.131 erfordert hätte. Stattdessen `summarize_wal = on` gesetzt —
+nur ein `pg_reload_conf()`, kein Neustart, keine Unterbrechung laufender
+Verbindungen (per Health-Check nach der Änderung bestätigt).
+
+Voraussetzung geschaffen: Rolle `nexarch_backup` mit `REPLICATION`-Attribut
+angelegt (Postgres verlangt eine Replikationsverbindung für
+`pg_basebackup`), `pg_hba.conf` erlaubte lokale Replikationsverbindungen
+bereits.
+
+## Umsetzung
+
+- `internal/backup.FullBackup`/`IncrementalBackup` — rufen `pg_basebackup`
+  über `os/exec` auf, Ergebnis landet in einer Generationsstruktur
+  (`<BackupDir>/<Generation>/full/` bzw. `.../incremental/<ID>/`).
+- `internal/backup.Verify` — öffnet `base.tar.gz` vollständig (gzip- UND
+  tar-Stream, jeder Eintrag bis zum Ende gelesen, nicht nur Kopfdaten) —
+  Akzeptanzkriterium 2: Verifikation auf Lesbarkeit, nicht nur Erstellung.
+- `internal/backup.Rotate`/`ListGenerations` — Generationen sind nach
+  Zeitstempel-ID sortierbar, `Rotate` entfernt die ältesten bis auf `keep`
+  komplett (inklusive aller abhängigen Inkremente).
+- `cmd/backup-cli` — `full`/`incremental`/`rotate`, aufgerufen von
+  systemd-Timern (`deploy/systemd/nexarch-archive-backup-*.timer`) —
+  "automatisiert nach Zeitplan" (Akzeptanzkriterium 1) entsteht durch die
+  Timer-Definition, kein zusätzlicher Dauerprozess nötig.
+
+## Prüfungen
+
+| # | Prüfung | Ergebnis |
+|---|---|---|
+| 1 | Sicherung gegen Testdatenbank erfolgreich erstellt und verifiziert | **bestanden** — `TestFullBackup_CreatesVerifiedBackup` gegen die echte Postgres-17-Instanz auf 192.168.1.131 (kein Mock), zusätzlich `TestIncrementalBackup_IsSmallerThanFull`: inkrementelle Sicherung real deutlich kleiner als Vollsicherung (167 KB vs. 16 MB bei der ersten manuellen Probe) — beweist echte inkrementelle Übertragung, nicht nur eine zweite Vollsicherung |
+| 2 | Verifikation erkennt eine absichtlich beschädigte Sicherungsdatei | **bestanden** — `TestVerify_DetectsCorruptedFile`: 64 Bytes in der Mitte von `base.tar.gz` gekippt, `Verify` schlägt danach fehl (unbeschädigt zuvor erfolgreich) |
+| 3 | Rotationsregel entfernt nachweislich nur die ältesten Generationen | **bestanden** — `TestRotate_RemovesOnlyOldestGenerations`: 5 Generationen, `keep=2`, exakt die 3 ältesten entfernt, die 2 neuesten nachweislich unangetastet |
+
+## Echte Verdrahtung auf 192.168.1.131 (nicht nur Testcode)
+
+Anders als die zuletzt in DMS gefundenen "Baustein existiert, ist aber
+nirgends verdrahtet"-Fälle (FDN-03/FDN-09 gegen Core) wurde hier die
+komplette Kette tatsächlich installiert und ausgeführt:
+
+- `backup-cli` gebaut nach `/opt/nexarch-archive/bin/`
+- `/etc/nexarch/archive-backup.env` mit den Verbindungsdaten (0600)
+- 3 systemd-Timer installiert und aktiviert (`enable --now`):
+  Vollsicherung täglich 02:00 UTC, Inkrement stündlich, Rotation täglich
+  03:00 UTC (`systemctl list-timers` bestätigt alle drei scharf)
+- Jeder der drei Dienste (`full`/`incremental`/`rotate`) einmal manuell über
+  `systemctl start` ausgelöst (nicht nur `go test` direkt) — alle drei mit
+  `status=0/SUCCESS`, Journal bestätigt inhaltlich korrekte Ausgabe
+  (Vollsicherung erstellt+verifiziert, Inkrement erstellt+verifiziert
+  gegen die richtige Vorgänger-Generation, Rotation lief ohne Fehler)
+
+## Build/Test-Ergebnis (192.168.1.131, `make check`)
+
+```
+go build ./...  -> clean
+go vet ./...    -> clean
+golangci-lint run ./...  -> 0 issues
+go test ./... -p 1 -count=1  -> 4/4 Tests ok, 0 Fehlschläge (echter Postgres 17, kein Mock)
+```
+
+## Nachtrag (BAK-02-Sitzung): Backup-Zielverzeichnis korrigiert
+
+`NEXARCH_BACKUP_DIR` zeigte ursprünglich auf `/var/backups/nexarch`
+(Root-Dateisystem des Containers, kein dediziertes Dataset) — korrigiert auf
+`/var/nexarch-archiv/backups/postgres` (persistentes ZFS-Dataset), siehe
+`docs/BAK-02-PRUEFPROTOKOLL.md` Abschnitt „Korrektur an BAK-01" für Details.
+Vollsicherung nach der Korrektur erneut über systemd ausgelöst, landet
+nachweislich am neuen Ort.
+
+## Gesamtergebnis
+
+**Bestanden.** Alle drei Akzeptanzkriterien und alle drei Pflichtprüfungen
+real erfüllt — inklusive tatsächlicher systemd-Timer-Installation und
+manuell ausgelöstem End-to-End-Lauf aller drei Dienste auf dem Testhost,
+nicht nur isolierter Testcode.

archive/docs/BAK-02-PRUEFPROTOKOLL.md

@@ -0,0 +1,93 @@
+# BAK-02 – Prüfprotokoll: Objekt-Storage-Backup/Snapshots
+
+Welle 1, keine Vorbedingungen.
+
+## Grundsatzentscheidung: restic statt Eigenbau
+
+Nutzerentscheidung: restic statt einer Neuimplementierung, weil restic alle
+vier Akzeptanzkriterien mit ausgereiftem, breit geprüftem Tooling erfüllt
+(Content-defined Chunking für Dedup, `check --read-data` für
+Vollständigkeit, `forget --keep-last` für Rotation, Repository-Verschlüsselung
+ab Werk). Installiert via `apt-get install restic` (Version 0.18.0).
+
+Backup-Quelle ist ein lokaler Verzeichnisbaum — für den FDN-03-`LocalDriver`
+direkt dessen Basisverzeichnis. Für S3-gestützte Produktions-Deployments
+(Betriebsmodus 2/3 aus `STORAGE-KONZEPT.md` Abschnitt 6.2) wäre ein
+vorgelagerter Sync-Schritt (z. B. `rclone`) nötig, um Bucket-Inhalte lokal
+zu spiegeln, bevor restic sie sichert — restic sichert Dateibäume, keine
+S3-Buckets direkt. Das bleibt hier bewusst unimplementiert (kein konkreter
+S3-Produktionsbestand vorhanden, der das aktuell erfordert), aber
+architektonisch vorgesehen und dokumentiert (`README.md`).
+
+## Umsetzung
+
+- `internal/objectbackup.InitRepo` — idempotent, erkennt "bereits
+  initialisiert" am `restic init`-Fehlertext statt zu scheitern.
+- `internal/objectbackup.Backup` — `restic backup --json`, parst die
+  `summary`-Zeile (mehrere JSON-Zeilen in der Ausgabe, gezielt die mit
+  `message_type=="summary"` gesucht).
+- `internal/objectbackup.Check` — `restic check [--read-data]` (Akzeptanz-
+  kriterium 3: Vollständigkeitsprüfung).
+- `internal/objectbackup.Forget` — `restic forget --keep-last N --prune`
+  (Rotation).
+- `cmd/objectbackup-cli` — `backup <dir>`/`check`/`rotate`, aufgerufen von
+  systemd-Timern (stündlich/wöchentlich/täglich).
+
+## Prüfungen
+
+| # | Prüfung | Ergebnis |
+|---|---|---|
+| 1 | Zweiter Sicherungslauf nach unverändertem Bestand überträgt keine Daten erneut | **bestanden** — `TestBackup_UnchangedSecondRunTransmitsNothingNew`: zweiter Lauf gegen unveränderten Bestand liefert `files_new=0`, `files_changed=0`, `files_unmodified=1` |
+| 2 | Zwei identische Testdateien belegen nachweislich nur einmal Speicherplatz | **bestanden** — `TestBackup_DeduplicatesIdenticalContent`: zwei Dateien mit identischem Inhalt erzeugen `data_blobs=1`, nicht 2 — echter Dedup-Nachweis über restics Content-defined Chunking, nicht nur Namensvergleich |
+| 3 | Vollständigkeitsprüfung erkennt ein fehlendes Objekt in der Sicherung | **bestanden** — `TestCheck_DetectsCorruptedPack`: ein Byte in einer echten Repository-Pack-Datei gekippt, `Check(readData=true)` schlägt danach fehl (unbeschädigt zuvor erfolgreich) — dieselbe Vorgehensweise wie die manuelle Recherche vor der Implementierung |
+
+Zusätzlich (nicht explizit als Pflichtprüfung gefordert, aber Teil von
+Akzeptanzkriterium 3 „lässt sich einzeln prüfen"): `TestForget_
+KeepsOnlyRequestedSnapshotCount` — 3 Sicherungsläufe, `Forget(keepLast=1)`
+reduziert auf genau 1 verbleibenden Snapshot.
+
+## Korrektur an BAK-01 im selben Rutsch: Backup-Zielverzeichnis
+
+Nutzerhinweis aufgegriffen: `NEXARCH_BACKUP_DIR` zeigte bei BAK-01
+ursprünglich auf `/var/backups/nexarch` (Root-Dateisystem des LXC-
+Containers, nicht auf einem der beiden dedizierten ZFS-Datasets). Korrigiert
+auf `/var/nexarch-archiv/backups/postgres` (persistentes Dataset
+`zfs/data/subvol-1131-disk-0`), NICHT `/var/nexarch-test/` (ephemeres
+Dataset `ssd-rpool-data/swap/subvol-1131-disk-0`, wird von
+`reset-test-env.sh`-Skripten anderer Module geleert). `objectbackup-cli`s
+Repository liegt von Anfang an korrekt unter
+`/var/nexarch-archiv/backups/objects`. Beide Pfade real auf
+192.168.1.131 verifiziert (`df`/`mount` bestätigt ZFS-Dataset-Zuordnung),
+BAK-01s Vollsicherung nach der Korrektur erneut über systemd ausgelöst und
+bestätigt am neuen Ort gelandet.
+
+ZFS-seitige Snapshot-/Replikations-Strategie für `nexarch/archiv` bleibt
+bewusst außerhalb dieses Tickets (Infra-Runbook, siehe
+`STORAGE-KONZEPT.md` Abschnitt 7 „Backup vs. Storage-Redundanz" sowie den
+Hinweis, `zfs dedup=on` NICHT zu setzen — App-seitige Dedup über restic
+genügt, ZFS-Dedup wäre auf dem 4-GB-Testhost ein Speicherrisiko).
+
+## Echte Verdrahtung auf 192.168.1.131
+
+- `objectbackup-cli` gebaut nach `/opt/nexarch-archive/bin/`
+- `/etc/nexarch/archive-objectbackup.env` (0600)
+- 3 systemd-Timer installiert und aktiviert: Sicherung stündlich (`:30`),
+  Vollständigkeitsprüfung wöchentlich (So. 04:00 UTC), Rotation täglich
+  (03:30 UTC) — `systemctl list-timers` bestätigt alle scharf
+- Jeder der drei Dienste einmal über `systemctl start` ausgelöst, alle mit
+  `status=0/SUCCESS`; Journal bestätigt inhaltlich korrekte Ausgabe
+
+## Build/Test-Ergebnis (192.168.1.131, `make check`)
+
+```
+go build ./...  -> clean
+go vet ./...    -> clean
+golangci-lint run ./...  -> 0 issues
+go test ./... -p 1 -count=1  -> 2/2 Pakete mit Tests ok (internal/backup, internal/objectbackup), 0 Fehlschläge
+```
+
+## Gesamtergebnis
+
+**Bestanden.** Alle drei Akzeptanzkriterien und alle drei Pflichtprüfungen
+real gegen echtes restic-Tooling erfüllt. BAK-01-Pfadfehler im selben
+Rutsch korrigiert und erneut end-to-end verifiziert.

archive/docs/BAK-05-PRUEFPROTOKOLL.md

@@ -0,0 +1,119 @@
+# BAK-05 – Prüfprotokoll: Reconciliation / Konsistenzprüfung Storage vs. DB
+
+Voraussetzung BAK-01, BAK-02 (Welle 1) – erledigt, siehe eigene Protokolle.
+
+## Grundsatzentscheidung: reine Funktion + zwei Quell-Adapter
+
+`internal/reconcile.Reconcile` ist eine reine Funktion ohne DB-/Storage-
+Zugriff (leicht ohne echte Infrastruktur testbar), die Ein- und
+Auslesen echter Systeme ist strikt in `sources.go` getrennt
+(`ListDBStorageKeys` gegen echtes Postgres, `ListStorageObjects` gegen
+echtes Dateisystem). Beide Seiten liefern nur SCHLÜSSEL – niemals Inhalt
+– dadurch bleibt BAK-05 sauber getrennt von BAK-08 (Inhalts-/Prüfsummen-
+verifikation, eigene Fehlerklasse, eigenes Ticket).
+
+Report-Format bewusst deterministisch: alle drei Ergebnislisten
+(`missing_in_storage`, `orphaned_in_storage`, `existing_in_storage`)
+nach `storage_key` aufsteigend sortiert.
+
+**Nachtrag (nach Rückfrage vor BAK-08-Start):** Der ursprüngliche Report
+enthielt nur die beiden Abweichungslisten – keine Liste der bestätigt
+existierenden Objekte. Für BAK-08 als Stichprobengrundlage reicht
+"keine Abweichung" nicht, es braucht die tatsächliche, deterministisch
+sortierte Liste. Ergänzt: `Report.ExistingInStorage` – DB-Eintrag UND
+Storage-Objekt beide vorhanden, reine Existenzbestätigung (keine
+Inhaltsprüfung, Scope-Trennung zu BAK-08 bleibt gewahrt), aufsteigend
+nach `storage_key` sortiert. BAK-08 zieht seine Stichprobe daraus, ohne
+selbst zu sortieren/filtern. Neuer Test
+`TestReconcile_ExistingInStorageIsStableSamplingBasis` beweist Inhalt
+und Sortierung. Real neu gebaut, getestet (9/9) und auf 131 erneut
+ausgelöst – Journal zeigt das Feld `existing_in_storage` im Report.
+
+Meldeweg über OPS-05 (wie später BAK-08) wurde als offene Design-Frage
+aufgeworfen, aber nicht zur Vorbedingung gemacht – hier bewusst noch
+nicht umgesetzt (kein OPS-05-Abhängigkeitseintrag im Board für BAK-05);
+Report wird aktuell nur als JSON auf stdout ausgegeben und per
+Exit-Code (1 bei Abweichungen) für systemd/Monitoring sichtbar gemacht.
+Anbindung an OPS-05 kann bei Bedarf nachgezogen werden, ohne
+`Reconcile` selbst zu ändern.
+
+## Umsetzung
+
+- `internal/reconcile.Reconcile(dbEntries, storageKeys) Report` – reine
+  Vergleichsfunktion, liefert `MissingInStorage`/`OrphanedInStorage`,
+  `Report.IsClean()` als eindeutiges Sauber-Merkmal.
+- `internal/reconcile.ListDBStorageKeys` – liest `file_revisions`
+  (DMS FDN-02) per direktem SQL aus derselben physischen Tenant-DB
+  (Modell C, Core TEN-01) – kein Import von DMS-Go-Paketen möglich
+  (eigenes Go-Modul), daher reiner SQL-Zugriff gegen das dokumentierte
+  Schema.
+- `internal/reconcile.ListStorageObjects` – durchläuft den lokalen
+  FDN-03-`LocalDriver`-Basisordner (`filepath.WalkDir`), liefert `nil,
+  nil` bei fehlendem Verzeichnis statt Fehler (noch keine Objekte ist
+  kein Fehlerzustand).
+- `cmd/reconcile-cli` – liest `NEXARCH_RECONCILE_TENANT_DSN` und
+  `NEXARCH_RECONCILE_STORAGE_DIR`, gibt Report als JSON auf stdout aus,
+  Exit-Code 1 bei Abweichungen.
+
+## Prüfungen
+
+| # | Prüfung | Ergebnis |
+|---|---|---|
+| 1 | Datenbankeintrag ohne Storage-Objekt wird erkannt | **bestanden** — `TestReconcile_DetectsMissingInStorage` |
+| 2 | Storage-Objekt ohne Datenbankeintrag wird erkannt | **bestanden** — `TestReconcile_DetectsOrphanedInStorage` |
+| 3 | Lauf ohne Abweichungen liefert leeren, eindeutig sauberen Bericht | **bestanden** — `TestReconcile_CleanRunProducesEmptyReport` (zusätzlich `IsClean()`-Konsistenzprüfung) |
+
+Zusätzlich (Nutzervorgaben, nicht explizit im Ticket als Pflichtprüfung
+benannt, aber zentral für die Abgrenzung/Weiterverwendbarkeit):
+
+- `TestReconcile_ExistingButCorruptedObjectProducesNoFinding` – Nachweis,
+  dass Reconcile AUSSCHLIESSLICH Existenz prüft, niemals Inhalt (Trennung
+  von BAK-08).
+- `TestReconcile_DeterministicOrdering` – zwei Läufe mit identischer
+  Eingabe liefern identische Reihenfolge, aufsteigend nach `storage_key`.
+- `TestListDBStorageKeys_ReadsRealFileRevisions` – liest echt gegen die
+  gemeinsame Tenant-Testdatenbank `dms_tenant_test` (reales DMS-FDN-02-
+  Schema, kein Mock).
+- `TestListStorageObjects_WalksRealDirectory` /
+  `_MissingDirectoryReturnsEmpty` – echtes Dateisystem, kein Mock.
+
+## Echte Verdrahtung auf 192.168.1.131
+
+- `reconcile-cli` gebaut nach `/opt/nexarch-archive/bin/`
+- `/etc/nexarch/archive-reconcile.env` (0600): `NEXARCH_RECONCILE_TENANT_DSN`
+  zeigt auf die gemeinsame Tenant-Testdatenbank `dms_tenant_test`
+  (DMS selbst läuft auf 192.168.1.131 noch nicht als eigener systemd-
+  Dienst mit persistenter Konfiguration – dies ist die real verfügbare
+  Tenant-DB mit echtem FDN-02-Schema, dokumentierter bekannter Stand,
+  kein stiller Mock); `NEXARCH_RECONCILE_STORAGE_DIR` zeigt auf
+  `/var/nexarch-archiv/dms-objects` (persistentes ZFS-Dataset, NICHT
+  `/var/nexarch-test/`).
+- Timer `nexarch-archive-reconcile.timer` installiert und aktiviert
+  (täglich 05:00 UTC), `systemctl list-timers` bestätigt scharf.
+- `systemctl start nexarch-archive-reconcile.service` real ausgelöst:
+  `status=0/SUCCESS`, Journal zeigt echten JSON-Report
+  (`missing_in_storage: null, orphaned_in_storage: null` – Tenant-DB
+  aktuell leer, daher sauberer Bericht, keine synthetische Ausgabe).
+
+## Build/Test-Ergebnis (192.168.1.131, `make check`)
+
+```
+go build ./...  -> clean
+go vet ./...    -> clean
+golangci-lint run ./...  -> 0 issues
+go test ./... -p 1 -count=1  -> 3/3 Pakete mit Tests ok (internal/backup, internal/objectbackup, internal/reconcile), 0 Fehlschläge
+```
+
+`internal/reconcile`-Tests separat mit gesetzter `TEST_TENANT_DSN` gegen
+`dms_tenant_test` verifiziert: 9/9 Tests bestanden (6 reine
+`Reconcile`-Tests + 3 `sources.go`-Integrationstests).
+
+## Gesamtergebnis
+
+**Bestanden.** Alle drei Akzeptanzkriterien und alle Pflicht- sowie
+Nutzervorgaben-Prüfungen real erfüllt (echte Postgres-Instanz, echtes
+Dateisystem, echter systemd-Lauf). Zwei Testfehler während der
+Entwicklung (Schema-Abweichung `revision_number` NOT NULL in der realen
+`dms_tenant_test`-Tabelle; inkonsistente Fixture-Daten in
+`TestReconcile_DeterministicOrdering`) gefunden und korrigiert – beide
+waren Testautorenfehler, keine Fehler in `Reconcile` selbst.

archive/docs/BAK-08-PRUEFPROTOKOLL.md

@@ -0,0 +1,140 @@
+# BAK-08 – Prüfprotokoll: Checksum-basierte Objekt-Integritätsprüfung
+
+Voraussetzungen BAK-05, FDN-04, FDN-09, OPS-05 – alle erledigt, siehe
+eigene Protokolle. Vor Start zwei offene Rückfragen geklärt (siehe unten).
+
+## Grundsatzentscheidung: eigener Zustand statt file_revisions.created_at
+
+`created_at` als Alterskriterium hätte immer dieselben "ältesten" Objekte
+gescrubbt und den Rest nie erreicht — kein echtes Rotationsverhalten.
+Stattdessen eigene Archive-Tabelle `scrub_state` (`storage_key` →
+`last_scrubbed_at`, `last_result`), Migration
+`migrations/0001_scrub_state.up.sql`. `internal/scrub.Sample` ist eine
+reine Funktion: nimmt BAK-05s `existing_in_storage` (deterministisch
+sortiert) entgegen, filtert Objekte innerhalb der konfigurierbaren
+Cooldown-Frist heraus, priorisiert danach nach `last_scrubbed_at`
+aufsteigend (nie geprüft = ältestmöglicher Wert), begrenzt auf die
+konfigurierte Stichprobengröße — kein Voll-Sort über den gesamten
+Bestand bei jedem Lauf (Nutzerhinweis zum Kostenfaktor bei 10⁵+
+Objekten: die WHERE-artige Cooldown-Filterung reduziert die Kandidatenmenge
+VOR der Sortierung, nur die Kandidaten selbst werden sortiert, nicht der
+komplette Bestand).
+
+## Nachtrag: zwei Rückfragen vor Implementierungsbeginn geklärt
+
+1. **OPS-05-Anbindung ist Pull, nicht Push.** OPS-05 (`internal/alerting`,
+   Core) ist real implementiert, aber Core OPS-03 scrapt `/metrics`-URLs
+   registrierter Module (`metrics_sources`-Tabelle in der Core-Registry-
+   DB, `SourceStore.RegisterSource`) — kein Push-API. Für BAK-08 daher
+   ein eigener, DAUERHAFT laufender Endpunkt (`cmd/scrub-metrics`,
+   getrennt vom Oneshot-`scrub-cli`, dessen Prozess nach jedem Lauf endet
+   und zum Scrape-Zeitpunkt nicht erreichbar wäre). Metrik als Counter
+   (`nexarch_archive_storage_integrity_failures_total`), monoton
+   steigend — kein Gauge, kein Rücksetzen bei behobenem Befund. Kein
+   Befund = Wert bleibt unverändert (kein Dauer-Alarm durch andauernden
+   "Fehler"-Zustand). Scope-Trennung gewahrt: `scrub-cli`/`scrub-metrics`
+   erzeugen selbst KEIN Alert-Objekt — Schwellwert/Drosselung bleiben
+   OPS-05-eigene Konfiguration (Alert-Regel wird separat über
+   `alerting.RuleStore.CreateRule` angelegt, nicht Teil dieses Tickets).
+   **CFG-04 war eine Verwechslung** (das ist die
+   Benachrichtigungs-Einstellungen-Oberfläche, ein anderes Ticket) — die
+   tatsächlich nötige "Config"-Aktion ist ein `INSERT` in
+   `metrics_sources` (Core-Registry-DB), kein UI/Ticket-Abhängigkeit.
+   Real ausgeführt (siehe „Echte Verdrahtung" unten).
+2. **Sampling-Kriterium.** Siehe Grundsatzentscheidung oben —
+   `scrub_state.last_scrubbed_at` statt `file_revisions.created_at`,
+   Cooldown-Filterung vor Sortierung, feste Stichprobengröße (Top-N,
+   deterministisch, keine Zufallsstichprobe — Nutzerpräferenz für
+   Reproduzierbarkeit im Protokoll).
+
+## Umsetzung
+
+- `migrations/0001_scrub_state.up.sql`/`.down.sql` — `scrub_state`,
+  `scrub_counters` (Einzelzeile, monotoner Zähler).
+- `internal/scrub.Sample` — reine Funktion, Cooldown-Filter + Alt-
+  Priorisierung + Stichprobenbegrenzung.
+- `internal/scrub.LoadLastScrubbed`/`MarkScrubbed`/`RecordFinding`/
+  `FindingsTotal` — DB-Zugriff auf `scrub_state`/`scrub_counters`,
+  `MarkScrubbed` idempotent (`ON CONFLICT`) für unterbrechbare Läufe.
+- `internal/scrub.ExpectedChecksums` — eigene, minimale Abfrage gegen
+  `file_revisions` (keine Erweiterung von `reconcile.DBEntry` — BAK-05
+  bleibt existenz-only).
+- `internal/scrub.ActualChecksum` — echtes Lesen der Datei + SHA-256,
+  kein Header-/Größenvergleich.
+- `cmd/scrub-cli` — Oneshot: BAK-05-Reconcile → `Sample` → pro Kandidat
+  Checksum-Vergleich → `MarkScrubbed` + bei Abweichung `RecordFinding` →
+  JSON-Bericht auf stdout, Exit-Code 1 bei Befunden (gemeldet, nicht
+  automatisch repariert).
+- `cmd/scrub-metrics` — dauerhafter `/metrics`-Endpunkt, liest
+  `scrub_counters.findings_total`.
+
+## Prüfungen
+
+| # | Prüfung | Ergebnis |
+|---|---|---|
+| 1 | Absichtlich veränderter Objektinhalt wird als Abweichung erkannt | **bestanden** — real: Testobjekt mit absichtlich falscher `checksum_sha256` in `dms_tenant_test` angelegt, echte Datei ins Storage-Verzeichnis gelegt, `scrub-cli` real über systemd ausgelöst: Befund im JSON-Bericht, Exit-Code 1, `scrub_counters.findings_total` real von 0 auf 1 erhöht (siehe Journal-Auszug unten) |
+| 2 | Sampling priorisiert alte/nie geprüfte Objekte, nicht neue | **bestanden** — `TestSample_PrioritizesNeverScrubbedAndOldest`: nie geprüftes Objekt kommt vor einem vor 30 Tagen geprüften, dieses vor einem vor 1 Tag geprüften |
+| 3 | Wiederholter Lauf ohne neue Objekte meldet nichts erneut (kein Spam) / idempotent bei Unterbrechung | **bestanden** — real: zweiter `scrub-cli`-Lauf direkt nach dem ersten liefert `sampled: 0` (Cooldown greift), `TestMarkScrubbed_IsIdempotent` beweist wiederholtes Markieren ohne Duplikat |
+
+Zusätzlich: `TestSample_RespectsCooldown`,
+`TestSample_LimitsToSampleSize`, `TestSample_DeterministicForIdenticalInput`,
+`TestRecordFinding_IsMonotonicallyIncreasing`,
+`TestActualChecksum_MatchesRealFileContent` (echter Dateiinhalt, echtes
+SHA-256), `TestExpectedChecksums_ReadsRealFileRevisions` (echtes
+Postgres, kein Mock).
+
+## Echte Verdrahtung auf 192.168.1.131
+
+- `scrub-cli`, `scrub-metrics` gebaut nach `/opt/nexarch-archive/bin/`
+- `/etc/nexarch/archive-scrub.env`, `/etc/nexarch/archive-scrub-metrics.env`
+  (0600)
+- Migration real gegen `dms_tenant_test` angewendet
+  (`psql -f migrations/0001_scrub_state.up.sql`)
+- `nexarch-archive-scrub.timer` installiert/aktiviert (täglich 06:00
+  UTC), `nexarch-archive-scrub-metrics.service` installiert/aktiviert
+  (dauerhaft, `Restart=on-failure`) — beide `systemctl status`: aktiv
+- **Reales `INSERT` in `metrics_sources`** (Core-Registry-DB
+  `nexarch_registry`): `('archive', 'http://127.0.0.1:8090/metrics')` —
+  bestätigt über `SELECT * FROM metrics_sources`
+- **End-to-End über OPS-03 bestätigt**: `curl http://127.0.0.1:8085/metrics`
+  (Core-Aggregator) zeigt `nexarch_module_archive_nexarch_archive_storage_integrity_failures_total`
+  — reale Umbenennung gemäß OPS-03-Namenskonvention, kein synthetischer
+  Wert
+- Realer Befund-Durchlauf: Testobjekt mit absichtlich falscher Prüfsumme
+  angelegt → `scrub-cli` real via `systemctl start` ausgelöst → Befund im
+  Journal, `scrub_counters.findings_total` real 0→1, sichtbar sowohl auf
+  `scrub-metrics` als auch über den Core-Aggregator → Testdaten
+  anschließend bereinigt (`file_revisions`/`documents`/`users`-Zeilen
+  gelöscht, `scrub_state`/`scrub_counters` zurückgesetzt, Testdatei
+  entfernt)
+
+## Build/Test-Ergebnis (192.168.1.131, `make check`)
+
+```
+go build ./...  -> clean
+go vet ./...    -> clean
+golangci-lint run ./...  -> 0 issues
+go test ./... -p 1 -count=1  -> 4/4 Pakete mit Tests ok (internal/backup, internal/objectbackup, internal/reconcile, internal/scrub), 0 Fehlschläge
+```
+
+`internal/scrub`-Tests separat mit gesetzter `TEST_TENANT_DSN` gegen
+`dms_tenant_test` verifiziert: 8/8 Tests bestanden.
+
+## Bekannte Grenze (aus Ticket übernommen, nicht Teil der Abnahme)
+
+Der Job erkennt Abweichungen nur bei Objekten, die gelesen und erneut
+geprüft werden können. Ersetzt keine storage-seitige WORM-/
+Versionierungsstrategie und keine Zugriffs-/Audit-Logs des
+Storage-Providers (`STORAGE-KONZEPT.md` Abschnitt 6.1) — bei extern
+eingebundenem, nicht-kompatiblem Kunden-Storage (Betriebsmodus 3, ohne
+Versioning/Object Lock/Audit-Logs) bleibt eine Lücke, die BAK-08
+technisch nicht schließen kann.
+
+## Gesamtergebnis
+
+**Bestanden.** Alle sechs Akzeptanzkriterien und alle drei Pflicht-
+prüfungen real erfüllt — inklusive echtem Ende-zu-Ende-Nachweis über
+Core OPS-03/OPS-05 (kein Stub, reale `/metrics`-Registrierung und
+-Aggregation). Beide vor Implementierungsbeginn gestellten Rückfragen
+(OPS-05-Anbindungsmechanismus, Sampling-Kriterium) im Protokoll
+dokumentiert und in der Umsetzung berücksichtigt.

archive/go.mod

@@ -0,0 +1,14 @@
+module gitea.perlbach24.de/scripte/nexarch/archive
+
+go 1.22
+
+require github.com/jackc/pgx/v5 v5.6.0
+
+require (
+	github.com/jackc/pgpassfile v1.0.0 // indirect
+	github.com/jackc/pgservicefile v0.0.0-20221227161230-091c0ba34f0a // indirect
+	github.com/jackc/puddle/v2 v2.2.1 // indirect
+	golang.org/x/crypto v0.17.0 // indirect
+	golang.org/x/sync v0.1.0 // indirect
+	golang.org/x/text v0.14.0 // indirect
+)

archive/go.sum

@@ -0,0 +1,28 @@
+github.com/davecgh/go-spew v1.1.0/go.mod h1:J7Y8YcW2NihsgmVo/mv3lAwl/skON4iLHjSsI+c5H38=
+github.com/davecgh/go-spew v1.1.1 h1:vj9j/u1bqnvCEfJOwUhtlOARqs3+rkHYY13jYWTU97c=
+github.com/davecgh/go-spew v1.1.1/go.mod h1:J7Y8YcW2NihsgmVo/mv3lAwl/skON4iLHjSsI+c5H38=
+github.com/jackc/pgpassfile v1.0.0 h1:/6Hmqy13Ss2zCq62VdNG8tM1wchn8zjSGOBJ6icpsIM=
+github.com/jackc/pgpassfile v1.0.0/go.mod h1:CEx0iS5ambNFdcRtxPj5JhEz+xB6uRky5eyVu/W2HEg=
+github.com/jackc/pgservicefile v0.0.0-20221227161230-091c0ba34f0a h1:bbPeKD0xmW/Y25WS6cokEszi5g+S0QxI/d45PkRi7Nk=
+github.com/jackc/pgservicefile v0.0.0-20221227161230-091c0ba34f0a/go.mod h1:5TJZWKEWniPve33vlWYSoGYefn3gLQRzjfDlhSJ9ZKM=
+github.com/jackc/pgx/v5 v5.6.0 h1:SWJzexBzPL5jb0GEsrPMLIsi/3jOo7RHlzTjcAeDrPY=
+github.com/jackc/pgx/v5 v5.6.0/go.mod h1:DNZ/vlrUnhWCoFGxHAG8U2ljioxukquj7utPDgtQdTw=
+github.com/jackc/puddle/v2 v2.2.1 h1:RhxXJtFG022u4ibrCSMSiu5aOq1i77R3OHKNJj77OAk=
+github.com/jackc/puddle/v2 v2.2.1/go.mod h1:vriiEXHvEE654aYKXXjOvZM39qJ0q+azkZFrfEOc3H4=
+github.com/pmezard/go-difflib v1.0.0 h1:4DBwDE0NGyQoBHbLQYPwSUPoCMWR5BEzIk/f1lZbAQM=
+github.com/pmezard/go-difflib v1.0.0/go.mod h1:iKH77koFhYxTK1pcRnkKkqfTogsbg7gZNVY4sRDYZ/4=
+github.com/stretchr/objx v0.1.0/go.mod h1:HFkY916IF+rwdDfMAkV7OtwuqBVzrE8GR6GFx+wExME=
+github.com/stretchr/testify v1.3.0/go.mod h1:M5WIy9Dh21IEIfnGCwXGc5bZfKNJtfHm1UVUgZn+9EI=
+github.com/stretchr/testify v1.7.0/go.mod h1:6Fq8oRcR53rry900zMqJjRRixrwX3KX962/h/Wwjteg=
+github.com/stretchr/testify v1.8.1 h1:w7B6lhMri9wdJUVmEZPGGhZzrYTPvgJArz7wNPgYKsk=
+github.com/stretchr/testify v1.8.1/go.mod h1:w2LPCIKwWwSfY2zedu0+kehJoqGctiVI29o6fzry7u4=
+golang.org/x/crypto v0.17.0 h1:r8bRNjWL3GshPW3gkd+RpvzWrZAwPS49OmTGZ/uhM4k=
+golang.org/x/crypto v0.17.0/go.mod h1:gCAAfMLgwOJRpTjQ2zCCt2OcSfYMTeZVSRtQlPC7Nq4=
+golang.org/x/sync v0.1.0 h1:wsuoTGHzEhffawBOhz5CYhcrV4IdKZbEyZjBMuTp12o=
+golang.org/x/sync v0.1.0/go.mod h1:RxMgew5VJxzue5/jJTE5uejpjVlOe/izrB70Jof72aM=
+golang.org/x/text v0.14.0 h1:ScX5w1eTa3QqT8oi6+ziP7dTV1S2+ALU0bI+0zXKWiQ=
+golang.org/x/text v0.14.0/go.mod h1:18ZOQIKpY8NJVqYksKHtTdi31H5itFRjB5/qKTNYzSU=
+gopkg.in/check.v1 v0.0.0-20161208181325-20d25e280405/go.mod h1:Co6ibVJAznAaIkqp8huTwlJQCZ016jof/cbN4VW5Yz0=
+gopkg.in/yaml.v3 v3.0.0-20200313102051-9f266ea9e77c/go.mod h1:K4uyk7z7BCEPqu6E+C64Yfv1cQ7kz7rIZviUmN+EgEM=
+gopkg.in/yaml.v3 v3.0.1 h1:fxVm/GzAzEWqLHuvctI91KS9hhNmmWOoWu0XTYJS7CA=
+gopkg.in/yaml.v3 v3.0.1/go.mod h1:K4uyk7z7BCEPqu6E+C64Yfv1cQ7kz7rIZviUmN+EgEM=

archive/internal/backup/backup.go

@@ -0,0 +1,102 @@
+// Package backup implementiert BAK-01: automatisierte, inkrementelle
+// Sicherung der PostgreSQL-Datenbank per pg_basebackup (PostgreSQL 17s
+// natives inkrementelles Backup über WAL-Summarization, siehe
+// `summarize_wal`), mit Verifikation jeder Sicherung und
+// generationsbasierter Rotation. Kein pg_dump-basierter Ansatz, weil
+// pg_dump ausschließlich logische Vollsicherungen kennt — "inkrementell"
+// im Sinne des Tickets erfordert das physische, WAL-summary-gestützte
+// Verfahren aus PostgreSQL 17.
+package backup
+
+import (
+	"context"
+	"fmt"
+	"os"
+	"os/exec"
+	"path/filepath"
+	"time"
+)
+
+// Config enthält die Verbindungsdaten für pg_basebackup — ausschließlich
+// über Umgebungsvariablen befüllt, nie im Code (siehe Ticket-Abschluss-
+// Regel).
+type Config struct {
+	Host             string
+	Port             string
+	User             string
+	Password         string
+	BackupDir        string
+	PgBaseBackupPath string // Default "pg_basebackup", überschreibbar für Tests
+}
+
+func (c Config) binary() string {
+	if c.PgBaseBackupPath != "" {
+		return c.PgBaseBackupPath
+	}
+	return "pg_basebackup"
+}
+
+// FullBackupDirName/IncrementalDirName sind die festen Unterverzeichnis-
+// namen je Generation.
+const (
+	FullBackupDirName  = "full"
+	IncrementalSubdir  = "incremental"
+	BackupManifestFile = "backup_manifest"
+	BaseTarGzFile      = "base.tar.gz"
+)
+
+// NewGenerationID liefert eine sortierbare, eindeutige Generation-Kennung
+// (RFC3339-artig, dateisystemtauglich) — Generationen werden anhand dieser
+// Kennung chronologisch sortiert (Rotate, ListGenerations).
+func NewGenerationID(t time.Time) string {
+	return t.UTC().Format("20060102T150405Z")
+}
+
+// FullBackup erstellt eine neue Vollsicherung (Akzeptanzkriterium 1) als
+// eigene Generation. Liefert den Pfad zum backup_manifest, das spätere
+// IncrementalBackup-Aufrufe als Referenz brauchen.
+func FullBackup(ctx context.Context, cfg Config, generationID string) (manifestPath string, err error) {
+	dir := filepath.Join(cfg.BackupDir, generationID, FullBackupDirName)
+	if err := os.MkdirAll(filepath.Dir(dir), 0o750); err != nil {
+		return "", fmt.Errorf("backup: generationsverzeichnis anlegen: %w", err)
+	}
+
+	args := []string{
+		"-h", cfg.Host, "-p", cfg.Port, "-U", cfg.User,
+		"-D", dir, "-Ft", "-z", "--checkpoint=fast", "--no-password",
+	}
+	if err := runPgBaseBackup(ctx, cfg, args); err != nil {
+		return "", fmt.Errorf("backup: vollsicherung: %w", err)
+	}
+	return filepath.Join(dir, BackupManifestFile), nil
+}
+
+// IncrementalBackup erstellt eine inkrementelle Sicherung gegen die zuletzt
+// bekannte Vollsicherung ODER die letzte Inkrement-Sicherung (priorManifestPath
+// zeigt jeweils auf das backup_manifest der Referenz).
+func IncrementalBackup(ctx context.Context, cfg Config, generationID, incrementID, priorManifestPath string) (manifestPath string, err error) {
+	dir := filepath.Join(cfg.BackupDir, generationID, IncrementalSubdir, incrementID)
+	if err := os.MkdirAll(filepath.Dir(dir), 0o750); err != nil {
+		return "", fmt.Errorf("backup: inkrement-verzeichnis anlegen: %w", err)
+	}
+
+	args := []string{
+		"-h", cfg.Host, "-p", cfg.Port, "-U", cfg.User,
+		"-D", dir, "-Ft", "-z", "--checkpoint=fast", "--no-password",
+		"--incremental=" + priorManifestPath,
+	}
+	if err := runPgBaseBackup(ctx, cfg, args); err != nil {
+		return "", fmt.Errorf("backup: inkrementelle sicherung: %w", err)
+	}
+	return filepath.Join(dir, BackupManifestFile), nil
+}
+
+func runPgBaseBackup(ctx context.Context, cfg Config, args []string) error {
+	cmd := exec.CommandContext(ctx, cfg.binary(), args...)
+	cmd.Env = append(os.Environ(), "PGPASSWORD="+cfg.Password)
+	output, err := cmd.CombinedOutput()
+	if err != nil {
+		return fmt.Errorf("%s fehlgeschlagen: %w (ausgabe: %s)", cfg.binary(), err, string(output))
+	}
+	return nil
+}

archive/internal/backup/backup_test.go

@@ -0,0 +1,187 @@
+package backup
+
+import (
+	"context"
+	"os"
+	"path/filepath"
+	"testing"
+	"time"
+)
+
+func requireTestConfig(t *testing.T) Config {
+	t.Helper()
+	user := os.Getenv("TEST_BACKUP_PG_USER")
+	if user == "" {
+		t.Skip("TEST_BACKUP_PG_USER nicht gesetzt, Integrationstest uebersprungen (braucht echten Postgres mit REPLICATION-Rolle)")
+	}
+	return Config{
+		Host:      envOr("TEST_BACKUP_PG_HOST", "localhost"),
+		Port:      envOr("TEST_BACKUP_PG_PORT", "5432"),
+		User:      user,
+		Password:  os.Getenv("TEST_BACKUP_PG_PASSWORD"),
+		BackupDir: t.TempDir(),
+	}
+}
+
+func envOr(key, fallback string) string {
+	if v := os.Getenv(key); v != "" {
+		return v
+	}
+	return fallback
+}
+
+// TestFullBackup_CreatesVerifiedBackup ist Pruefung 1: Sicherung gegen
+// Testdatenbank erfolgreich erstellt und verifiziert.
+func TestFullBackup_CreatesVerifiedBackup(t *testing.T) {
+	cfg := requireTestConfig(t)
+	ctx := context.Background()
+
+	genID := NewGenerationID(time.Now())
+	manifest, err := FullBackup(ctx, cfg, genID)
+	if err != nil {
+		t.Fatalf("fullbackup: %v", err)
+	}
+	if _, err := os.Stat(manifest); err != nil {
+		t.Fatalf("backup_manifest fehlt: %v", err)
+	}
+
+	dir := filepath.Dir(manifest)
+	if _, err := os.Stat(filepath.Join(dir, BaseTarGzFile)); err != nil {
+		t.Fatalf("%s fehlt: %v", BaseTarGzFile, err)
+	}
+
+	if err := Verify(dir); err != nil {
+		t.Fatalf("verify: %v", err)
+	}
+}
+
+// TestIncrementalBackup_IsSmallerThanFull ist der Nachweis fuer
+// Akzeptanzkriterium 1 (inkrementell): eine echte inkrementelle Sicherung
+// gegen unveraenderten Bestand ist deutlich kleiner als die Vollsicherung —
+// beweist, dass tatsaechlich nur Aenderungen uebertragen wurden (PostgreSQL
+// 17 WAL-Summarization), nicht nochmal alles.
+func TestIncrementalBackup_IsSmallerThanFull(t *testing.T) {
+	cfg := requireTestConfig(t)
+	ctx := context.Background()
+
+	genID := NewGenerationID(time.Now())
+	fullManifest, err := FullBackup(ctx, cfg, genID)
+	if err != nil {
+		t.Fatalf("fullbackup: %v", err)
+	}
+	fullDir := filepath.Dir(fullManifest)
+	fullSize := fileSize(t, filepath.Join(fullDir, BaseTarGzFile))
+
+	incID := NewGenerationID(time.Now().Add(time.Second))
+	incManifest, err := IncrementalBackup(ctx, cfg, genID, incID, fullManifest)
+	if err != nil {
+		t.Fatalf("incrementalbackup: %v", err)
+	}
+	incDir := filepath.Dir(incManifest)
+	if err := Verify(incDir); err != nil {
+		t.Fatalf("verify (inkrementell): %v", err)
+	}
+	incSize := fileSize(t, filepath.Join(incDir, BaseTarGzFile))
+
+	if incSize >= fullSize {
+		t.Fatalf("inkrementelle sicherung (%d bytes) ist nicht kleiner als die vollsicherung (%d bytes) - keine echte inkrementelle Uebertragung", incSize, fullSize)
+	}
+}
+
+func fileSize(t *testing.T, path string) int64 {
+	t.Helper()
+	info, err := os.Stat(path)
+	if err != nil {
+		t.Fatalf("dateigroesse von %q ermitteln: %v", path, err)
+	}
+	return info.Size()
+}
+
+// TestVerify_DetectsCorruptedFile ist Pruefung 2: Verifikation erkennt eine
+// absichtlich beschaedigte Sicherungsdatei.
+func TestVerify_DetectsCorruptedFile(t *testing.T) {
+	cfg := requireTestConfig(t)
+	ctx := context.Background()
+
+	genID := NewGenerationID(time.Now())
+	manifest, err := FullBackup(ctx, cfg, genID)
+	if err != nil {
+		t.Fatalf("fullbackup: %v", err)
+	}
+	dir := filepath.Dir(manifest)
+
+	if err := Verify(dir); err != nil {
+		t.Fatalf("verify (unbeschaedigt) haette erfolgreich sein muessen: %v", err)
+	}
+
+	// Absichtliche Beschaedigung: mehrere Bytes in der Mitte der Datei kippen.
+	path := filepath.Join(dir, BaseTarGzFile)
+	data, err := os.ReadFile(path)
+	if err != nil {
+		t.Fatalf("sicherungsdatei lesen: %v", err)
+	}
+	mid := len(data) / 2
+	for i := mid; i < mid+64 && i < len(data); i++ {
+		data[i] ^= 0xFF
+	}
+	if err := os.WriteFile(path, data, 0o600); err != nil {
+		t.Fatalf("beschaedigte sicherungsdatei schreiben: %v", err)
+	}
+
+	if err := Verify(dir); err == nil {
+		t.Fatal("verify haette die beschaedigte sicherungsdatei erkennen muessen")
+	}
+}
+
+// TestRotate_RemovesOnlyOldestGenerations ist Pruefung 3.
+func TestRotate_RemovesOnlyOldestGenerations(t *testing.T) {
+	backupDir := t.TempDir()
+	generationIDs := []string{
+		"20260101T000000Z",
+		"20260102T000000Z",
+		"20260103T000000Z",
+		"20260104T000000Z",
+		"20260105T000000Z",
+	}
+	for _, id := range generationIDs {
+		if err := os.MkdirAll(filepath.Join(backupDir, id, FullBackupDirName), 0o750); err != nil {
+			t.Fatalf("generation %q anlegen: %v", id, err)
+		}
+	}
+
+	removed, err := Rotate(backupDir, 2)
+	if err != nil {
+		t.Fatalf("rotate: %v", err)
+	}
+	wantRemoved := []string{"20260101T000000Z", "20260102T000000Z", "20260103T000000Z"}
+	if len(removed) != len(wantRemoved) {
+		t.Fatalf("entfernte generationen = %v, want %v", removed, wantRemoved)
+	}
+	for i, w := range wantRemoved {
+		if removed[i] != w {
+			t.Fatalf("entfernte generationen = %v, want %v", removed, wantRemoved)
+		}
+	}
+
+	remaining, err := ListGenerations(backupDir)
+	if err != nil {
+		t.Fatalf("listgenerations: %v", err)
+	}
+	wantRemaining := []string{"20260104T000000Z", "20260105T000000Z"}
+	if len(remaining) != len(wantRemaining) {
+		t.Fatalf("verbleibende generationen = %v, want %v", remaining, wantRemaining)
+	}
+	for i, w := range wantRemaining {
+		if remaining[i] != w {
+			t.Fatalf("verbleibende generationen = %v, want %v", remaining, wantRemaining)
+		}
+	}
+
+	// Die NEUESTEN duerfen NICHT entfernt sein (Pruefung 3: nur die
+	// aeltesten Generationen).
+	for _, w := range wantRemaining {
+		if _, err := os.Stat(filepath.Join(backupDir, w)); err != nil {
+			t.Fatalf("neueste generation %q wurde faelschlich entfernt: %v", w, err)
+		}
+	}
+}

archive/internal/backup/rotate.go

@@ -0,0 +1,56 @@
+package backup
+
+import (
+	"fmt"
+	"os"
+	"path/filepath"
+	"sort"
+)
+
+// ListGenerations liefert alle Generation-IDs in backupDir, aufsteigend
+// sortiert (die GenerationID selbst ist chronologisch sortierbar, siehe
+// NewGenerationID — kein Blick auf Dateisystem-Zeitstempel nötig, die bei
+// einem Restore/Kopiervorgang verändert werden könnten).
+func ListGenerations(backupDir string) ([]string, error) {
+	entries, err := os.ReadDir(backupDir)
+	if err != nil {
+		if os.IsNotExist(err) {
+			return nil, nil
+		}
+		return nil, fmt.Errorf("backup: sicherungsverzeichnis lesen: %w", err)
+	}
+	var generations []string
+	for _, e := range entries {
+		if e.IsDir() {
+			generations = append(generations, e.Name())
+		}
+	}
+	sort.Strings(generations)
+	return generations, nil
+}
+
+// Rotate entfernt alle bis auf die `keep` NEUESTEN Generationen
+// (Akzeptanzkriterium 3) — jede Generation umfasst ihre Vollsicherung UND
+// alle davon abhängigen Inkremente, ein Löschen der gesamten
+// Generationsverzeichnisses entfernt beides konsistent zusammen.
+func Rotate(backupDir string, keep int) (removed []string, err error) {
+	if keep < 0 {
+		keep = 0
+	}
+	generations, err := ListGenerations(backupDir)
+	if err != nil {
+		return nil, err
+	}
+	if len(generations) <= keep {
+		return nil, nil
+	}
+
+	toRemove := generations[:len(generations)-keep]
+	for _, gen := range toRemove {
+		if err := os.RemoveAll(filepath.Join(backupDir, gen)); err != nil {
+			return removed, fmt.Errorf("backup: generation %q entfernen: %w", gen, err)
+		}
+		removed = append(removed, gen)
+	}
+	return removed, nil
+}

archive/internal/backup/verify.go

@@ -0,0 +1,54 @@
+package backup
+
+import (
+	"archive/tar"
+	"compress/gzip"
+	"fmt"
+	"io"
+	"os"
+	"path/filepath"
+)
+
+// ErrCorrupted wird geliefert, wenn eine Sicherungsdatei nicht lesbar ist
+// (Akzeptanzkriterium 2: Verifikation, nicht nur Erstellungs-Prüfung).
+var ErrCorrupted = fmt.Errorf("backup: sicherungsdatei ist beschaedigt oder unvollstaendig")
+
+// Verify prüft, dass base.tar.gz im gegebenen Sicherungsverzeichnis
+// vollständig lesbar ist — öffnet gzip- UND tar-Stream und liest JEDEN
+// Eintrag bis zum Ende durch (nicht nur die Kopfdaten), damit ein
+// abgeschnittener oder mit kaputten Bytes überschriebener Inhalt
+// zuverlässig auffällt, nicht nur ein defekter Tar-Header.
+func Verify(backupDir string) error {
+	path := filepath.Join(backupDir, BaseTarGzFile)
+	f, err := os.Open(path)
+	if err != nil {
+		return fmt.Errorf("%w: %s nicht lesbar: %v", ErrCorrupted, path, err)
+	}
+	defer func() { _ = f.Close() }()
+
+	gz, err := gzip.NewReader(f)
+	if err != nil {
+		return fmt.Errorf("%w: gzip-header ungueltig: %v", ErrCorrupted, err)
+	}
+	defer func() { _ = gz.Close() }()
+
+	tr := tar.NewReader(gz)
+	entries := 0
+	for {
+		hdr, err := tr.Next()
+		if err == io.EOF {
+			break
+		}
+		if err != nil {
+			return fmt.Errorf("%w: tar-eintrag ungueltig: %v", ErrCorrupted, err)
+		}
+		if _, err := io.Copy(io.Discard, tr); err != nil {
+			return fmt.Errorf("%w: inhalt von %q nicht vollstaendig lesbar: %v", ErrCorrupted, hdr.Name, err)
+		}
+		entries++
+	}
+	if entries == 0 {
+		return fmt.Errorf("%w: archiv enthaelt keine eintraege", ErrCorrupted)
+	}
+	return nil
+}

archive/internal/objectbackup/restic.go

@@ -0,0 +1,156 @@
+// Package objectbackup implementiert BAK-02: automatisierte, inkrementelle,
+// deduplizierende Sicherung des Objekt-Storage-Bestands. Nutzt restic
+// (Content-defined Chunking, verschlüsseltes Repository ab Werk) statt
+// Eigenbau — restic erfüllt alle Akzeptanzkriterien mit ausgereiftem,
+// geprüftem Tooling statt einer weniger robusten Neuimplementierung.
+//
+// Backup-Quelle ist ein lokaler Verzeichnisbaum — für den LocalDriver aus
+// FDN-03 direkt dessen Basisverzeichnis, für S3-gestützte Produktions-
+// Deployments ein vorgelagerter Sync-Schritt (z.B. rclone) auf einen
+// lokalen Spiegel, bevor restic ihn sichert (nicht Bestandteil dieser
+// Kachel — restic selbst sichert Dateibäume, keine S3-Buckets direkt).
+package objectbackup
+
+import (
+	"context"
+	"encoding/json"
+	"fmt"
+	"os"
+	"os/exec"
+	"strings"
+)
+
+// Config enthält Repository-Ort und -Passwort — ausschließlich über
+// Umgebungsvariablen befüllt (siehe Ticket-Abschluss-Regel).
+type Config struct {
+	RepoDir    string
+	Password   string
+	ResticPath string // Default "restic", überschreibbar für Tests
+}
+
+func (c Config) binary() string {
+	if c.ResticPath != "" {
+		return c.ResticPath
+	}
+	return "restic"
+}
+
+func (c Config) env() []string {
+	return append(os.Environ(), "RESTIC_PASSWORD="+c.Password)
+}
+
+func run(ctx context.Context, cfg Config, args ...string) ([]byte, error) {
+	fullArgs := append([]string{"-r", cfg.RepoDir}, args...)
+	cmd := exec.CommandContext(ctx, cfg.binary(), fullArgs...)
+	cmd.Env = cfg.env()
+	output, err := cmd.CombinedOutput()
+	if err != nil {
+		return output, fmt.Errorf("%s %v fehlgeschlagen: %w (ausgabe: %s)", cfg.binary(), args, err, string(output))
+	}
+	return output, nil
+}
+
+// InitRepo legt ein neues restic-Repository an, falls es noch nicht
+// existiert — idempotent, ein bereits initialisiertes Repository ist kein
+// Fehler (Wiederholte Aufrufe durch systemd-Timer nach einem Neustart
+// dürfen nicht fehlschlagen).
+func InitRepo(ctx context.Context, cfg Config) error {
+	output, err := run(ctx, cfg, "init")
+	if err != nil {
+		if strings.Contains(string(output), "config file already exists") {
+			return nil
+		}
+		return fmt.Errorf("objectbackup: repository initialisieren: %w", err)
+	}
+	return nil
+}
+
+// BackupSummary ist der geparste "summary"-Datensatz aus `restic backup --json`.
+type BackupSummary struct {
+	SnapshotID      string `json:"snapshot_id"`
+	FilesNew        int    `json:"files_new"`
+	FilesChanged    int    `json:"files_changed"`
+	FilesUnmodified int    `json:"files_unmodified"`
+	DataBlobs       int    `json:"data_blobs"`
+	TotalBytes      int64  `json:"total_bytes_processed"`
+}
+
+// Backup sichert sourceDir inkrementell (Akzeptanzkriterium 1: unveränderte
+// Objekte werden nicht erneut übertragen — restics Content-defined
+// Chunking erkennt das automatisch, kein manueller Änderungsabgleich
+// nötig).
+func Backup(ctx context.Context, cfg Config, sourceDir string) (BackupSummary, error) {
+	output, err := run(ctx, cfg, "backup", sourceDir, "--json")
+	if err != nil {
+		return BackupSummary{}, fmt.Errorf("objectbackup: sicherung: %w", err)
+	}
+	return parseSummary(output)
+}
+
+// parseSummary sucht in der zeilenweisen JSON-Ausgabe von `restic backup
+// --json` (mehrere Fortschritts-/Statuszeilen, GENAU EINE mit
+// message_type=="summary") die Zusammenfassung.
+func parseSummary(output []byte) (BackupSummary, error) {
+	lines := strings.Split(strings.TrimSpace(string(output)), "\n")
+	for i := len(lines) - 1; i >= 0; i-- {
+		var probe struct {
+			MessageType string `json:"message_type"`
+		}
+		if err := json.Unmarshal([]byte(lines[i]), &probe); err != nil {
+			continue
+		}
+		if probe.MessageType == "summary" {
+			var summary BackupSummary
+			if err := json.Unmarshal([]byte(lines[i]), &summary); err != nil {
+				return BackupSummary{}, fmt.Errorf("objectbackup: summary-zeile dekodieren: %w", err)
+			}
+			return summary, nil
+		}
+	}
+	return BackupSummary{}, fmt.Errorf("objectbackup: keine summary-zeile in der restic-ausgabe gefunden")
+}
+
+// Check prüft die Vollständigkeit/Lesbarkeit des Repository
+// (Akzeptanzkriterium 3 / Pflichtprüfung: Vollständigkeitsprüfung erkennt
+// fehlendes/beschädigtes Objekt). readData=true liest jeden gespeicherten
+// Datenblock tatsächlich (teurer, aber die einzige Prüfung, die
+// Bit-Rot in bereits gespeicherten Paketen erkennt — ohne readData prüft
+// restic nur Struktur/Indizes, nicht den tatsächlichen Blockinhalt).
+func Check(ctx context.Context, cfg Config, readData bool) error {
+	args := []string{"check"}
+	if readData {
+		args = append(args, "--read-data")
+	}
+	if _, err := run(ctx, cfg, args...); err != nil {
+		return fmt.Errorf("objectbackup: %w", err)
+	}
+	return nil
+}
+
+// Forget entfernt alte Snapshots nach Rotationsregel und gibt den davon
+// belegten Speicherplatz frei (--prune) — restics Äquivalent zu
+// BAK-01s Rotate.
+func Forget(ctx context.Context, cfg Config, keepLast int) error {
+	if _, err := run(ctx, cfg, "forget", "--keep-last", fmt.Sprintf("%d", keepLast), "--prune"); err != nil {
+		return fmt.Errorf("objectbackup: rotation: %w", err)
+	}
+	return nil
+}
+
+type snapshotEntry struct {
+	ShortID string `json:"short_id"`
+}
+
+// SnapshotCount liefert die Anzahl vorhandener Snapshots — für Tests und
+// Statusabfragen.
+func SnapshotCount(ctx context.Context, cfg Config) (int, error) {
+	output, err := run(ctx, cfg, "snapshots", "--json")
+	if err != nil {
+		return 0, fmt.Errorf("objectbackup: snapshots auflisten: %w", err)
+	}
+	var snapshots []snapshotEntry
+	if err := json.Unmarshal(output, &snapshots); err != nil {
+		return 0, fmt.Errorf("objectbackup: snapshot-liste dekodieren: %w", err)
+	}
+	return len(snapshots), nil
+}

archive/internal/objectbackup/restic_test.go

@@ -0,0 +1,168 @@
+package objectbackup
+
+import (
+	"context"
+	"os"
+	"os/exec"
+	"path/filepath"
+	"testing"
+)
+
+func requireRestic(t *testing.T) {
+	t.Helper()
+	if _, err := exec.LookPath("restic"); err != nil {
+		t.Skip("restic nicht installiert, Integrationstest uebersprungen")
+	}
+}
+
+func setupTest(t *testing.T) Config {
+	t.Helper()
+	requireRestic(t)
+	cfg := Config{RepoDir: filepath.Join(t.TempDir(), "repo"), Password: "test-passwort-fuer-objectbackup"}
+	if err := InitRepo(context.Background(), cfg); err != nil {
+		t.Fatalf("initrepo: %v", err)
+	}
+	return cfg
+}
+
+func writeFile(t *testing.T, dir, name, content string) {
+	t.Helper()
+	if err := os.WriteFile(filepath.Join(dir, name), []byte(content), 0o600); err != nil {
+		t.Fatalf("testdatei %q schreiben: %v", name, err)
+	}
+}
+
+// TestBackup_UnchangedSecondRunTransmitsNothingNew ist Pruefung 1:
+// zweiter Sicherungslauf nach unveraendertem Bestand ueberraegt keine
+// Daten erneut.
+func TestBackup_UnchangedSecondRunTransmitsNothingNew(t *testing.T) {
+	cfg := setupTest(t)
+	ctx := context.Background()
+	sourceDir := t.TempDir()
+	writeFile(t, sourceDir, "dokument.pdf", "unveraenderter inhalt")
+
+	first, err := Backup(ctx, cfg, sourceDir)
+	if err != nil {
+		t.Fatalf("erste sicherung: %v", err)
+	}
+	if first.FilesNew != 1 {
+		t.Fatalf("erste sicherung: files_new = %d, want 1", first.FilesNew)
+	}
+
+	second, err := Backup(ctx, cfg, sourceDir)
+	if err != nil {
+		t.Fatalf("zweite sicherung: %v", err)
+	}
+	if second.FilesNew != 0 || second.FilesChanged != 0 {
+		t.Fatalf("zweite sicherung (unveraendert): files_new=%d files_changed=%d, want beide 0", second.FilesNew, second.FilesChanged)
+	}
+	if second.FilesUnmodified != 1 {
+		t.Fatalf("zweite sicherung: files_unmodified = %d, want 1", second.FilesUnmodified)
+	}
+}
+
+// TestBackup_DeduplicatesIdenticalContent ist Pruefung 2: zwei identische
+// Testdateien belegen nachweislich nur einmal Speicherplatz.
+func TestBackup_DeduplicatesIdenticalContent(t *testing.T) {
+	cfg := setupTest(t)
+	ctx := context.Background()
+	sourceDir := t.TempDir()
+	content := "exakt identischer inhalt in beiden dateien fuer den dedup-nachweis"
+	writeFile(t, sourceDir, "original.pdf", content)
+	writeFile(t, sourceDir, "kopie.pdf", content)
+
+	summary, err := Backup(ctx, cfg, sourceDir)
+	if err != nil {
+		t.Fatalf("sicherung: %v", err)
+	}
+	if summary.FilesNew != 2 {
+		t.Fatalf("erwartet 2 neue dateien, habe %d", summary.FilesNew)
+	}
+	// Zwei Dateien mit IDENTISCHEM Inhalt duerfen nur EINEN data_blob
+	// erzeugen - das ist der Dedup-Nachweis (Akzeptanzkriterium 2).
+	if summary.DataBlobs != 1 {
+		t.Fatalf("data_blobs = %d, want 1 (zwei identische dateien haetten nur einen blob erzeugen duerfen - keine dedup)", summary.DataBlobs)
+	}
+}
+
+// TestCheck_DetectsCorruptedPack ist Pruefung 3: Vollstaendigkeitspruefung
+// erkennt ein beschaedigtes/fehlendes Objekt in der Sicherung.
+func TestCheck_DetectsCorruptedPack(t *testing.T) {
+	cfg := setupTest(t)
+	ctx := context.Background()
+	sourceDir := t.TempDir()
+	writeFile(t, sourceDir, "wichtig.pdf", "inhalt, der spaeter absichtlich beschaedigt wird")
+
+	if _, err := Backup(ctx, cfg, sourceDir); err != nil {
+		t.Fatalf("sicherung: %v", err)
+	}
+	if err := Check(ctx, cfg, true); err != nil {
+		t.Fatalf("check (unbeschaedigt) haette erfolgreich sein muessen: %v", err)
+	}
+
+	// Absichtliche Beschaedigung: ein Byte in einer Pack-Datei im
+	// Repository kippen (dieselbe Fundstelle wie beim manuellen
+	// Nachweis waehrend der Recherche zu diesem Ticket).
+	packDir := filepath.Join(cfg.RepoDir, "data")
+	corrupted := false
+	if err := filepath.Walk(packDir, func(path string, info os.FileInfo, err error) error {
+		if err != nil || info.IsDir() || corrupted {
+			return err
+		}
+		data, err := os.ReadFile(path)
+		if err != nil {
+			return err
+		}
+		if len(data) < 20 {
+			return nil
+		}
+		data[10] ^= 0xFF
+		if err := os.WriteFile(path, data, 0o600); err != nil {
+			return err
+		}
+		corrupted = true
+		return nil
+	}); err != nil {
+		t.Fatalf("pack-datei beschaedigen: %v", err)
+	}
+	if !corrupted {
+		t.Fatal("keine pack-datei zum beschaedigen gefunden - testaufbau fehlerhaft")
+	}
+
+	if err := Check(ctx, cfg, true); err == nil {
+		t.Fatal("check haette die beschaedigte pack-datei erkennen muessen")
+	}
+}
+
+// TestForget_KeepsOnlyRequestedSnapshotCount prueft die Rotation.
+func TestForget_KeepsOnlyRequestedSnapshotCount(t *testing.T) {
+	cfg := setupTest(t)
+	ctx := context.Background()
+	sourceDir := t.TempDir()
+
+	for i := 0; i < 3; i++ {
+		writeFile(t, sourceDir, "f.txt", "version "+string(rune('a'+i)))
+		if _, err := Backup(ctx, cfg, sourceDir); err != nil {
+			t.Fatalf("sicherung %d: %v", i, err)
+		}
+	}
+	before, err := SnapshotCount(ctx, cfg)
+	if err != nil {
+		t.Fatalf("snapshotcount (vorher): %v", err)
+	}
+	if before != 3 {
+		t.Fatalf("erwartet 3 snapshots vor rotation, habe %d", before)
+	}
+
+	if err := Forget(ctx, cfg, 1); err != nil {
+		t.Fatalf("forget: %v", err)
+	}
+
+	after, err := SnapshotCount(ctx, cfg)
+	if err != nil {
+		t.Fatalf("snapshotcount (nachher): %v", err)
+	}
+	if after != 1 {
+		t.Fatalf("erwartet 1 snapshot nach rotation (keep-last 1), habe %d", after)
+	}
+}

archive/internal/reconcile/reconcile.go

@@ -0,0 +1,106 @@
+// Package reconcile implementiert BAK-05: periodischer Abgleich, ob jeder
+// in der Datenbank referenzierte Objekt-Storage-Eintrag tatsächlich
+// existiert und umgekehrt. Prüft AUSSCHLIESSLICH Existenz — niemals
+// Inhalt (das ist Archive BAK-08, eine eigene Fehlerklasse, bewusst nicht
+// hier mit hineingezogen, siehe reconcile_test.go
+// TestReconcile_ExistingButCorruptedObjectProducesNoFinding).
+package reconcile
+
+import (
+	"sort"
+	"time"
+)
+
+// Finding ist EIN Abweichungsfund — entweder ein Datenbankeintrag ohne
+// Storage-Objekt oder umgekehrt.
+type Finding struct {
+	StorageKey string `json:"storage_key"`
+	DocumentID string `json:"document_id,omitempty"`
+	RevisionID string `json:"revision_id,omitempty"`
+}
+
+// Report ist das Ergebnis EINES Abgleichslaufs (Akzeptanzkriterium 3:
+// Abweichungen werden BERICHTET, nicht automatisch behoben — Report ist
+// reine Information, keine Reparaturfunktion existiert in diesem Paket).
+//
+// Beide Listen sind nach StorageKey aufsteigend sortiert — bei gleicher
+// Eingabe liefert Reconcile IMMER dieselbe Reihenfolge (deterministisch),
+// damit ein nachgelagerter Verbraucher (Archive BAK-08: zieht seine
+// Stichprobe aus der Liste der EXISTIERENDEN Objekte) sich auf eine
+// stabile Sortierung verlassen kann, statt bei jedem Lauf neu zu
+// filtern/sortieren.
+type Report struct {
+	GeneratedAt time.Time `json:"generated_at"`
+	// MissingInStorage: Datenbankeintrag vorhanden, Objekt im Storage fehlt
+	// (Akzeptanzkriterium 1).
+	MissingInStorage []Finding `json:"missing_in_storage"`
+	// OrphanedInStorage: Objekt im Storage vorhanden, kein Datenbankeintrag
+	// (Akzeptanzkriterium 2).
+	OrphanedInStorage []Finding `json:"orphaned_in_storage"`
+	// ExistingInStorage: Datenbankeintrag UND Storage-Objekt beide
+	// vorhanden — reine Existenzbestätigung, KEINE Inhaltsprüfung. Dient
+	// Archive BAK-08 als stabile, deterministisch sortierte
+	// Stichprobengrundlage (nach StorageKey aufsteigend, siehe Report-
+	// Dokumentation oben) — BAK-08 muss dafür selbst nicht mehr
+	// sortieren/filtern.
+	ExistingInStorage []Finding `json:"existing_in_storage"`
+}
+
+// IsClean liefert true, wenn der Lauf keine Abweichungen fand (Pflicht-
+// prüfung 3: "Lauf ohne Abweichungen liefert einen leeren, eindeutig als
+// sauber erkennbaren Bericht" — IsClean ist genau dieses eindeutige
+// Erkennungsmerkmal, statt dass ein Aufrufer beide Listen selbst auf
+// Leere prüfen muss).
+func (r Report) IsClean() bool {
+	return len(r.MissingInStorage) == 0 && len(r.OrphanedInStorage) == 0
+}
+
+// DBEntry ist ein Datenbankeintrag, wie ihn ListDBStorageKeys liefert.
+type DBEntry struct {
+	StorageKey string
+	DocumentID string
+	RevisionID string
+}
+
+// Reconcile vergleicht dbEntries (aus file_revisions.storage_key, DMS
+// FDN-02) gegen storageKeys (tatsächlich im Objekt-Storage vorhandene
+// Schlüssel, z.B. per Verzeichnis-Walk des FDN-03-LocalDriver-
+// Basisverzeichnisses) und liefert die Abweichungen in beide Richtungen.
+// Reine Funktion — kein Datenbank-/Storage-Zugriff hier, dadurch ohne
+// echte Infrastruktur testbar (siehe reconcile_test.go).
+func Reconcile(dbEntries []DBEntry, storageKeys []string) Report {
+	storageSet := make(map[string]bool, len(storageKeys))
+	for _, k := range storageKeys {
+		storageSet[k] = true
+	}
+	dbSet := make(map[string]DBEntry, len(dbEntries))
+	for _, e := range dbEntries {
+		dbSet[e.StorageKey] = e
+	}
+
+	var missing, existing []Finding
+	for _, e := range dbEntries {
+		if !storageSet[e.StorageKey] {
+			missing = append(missing, Finding(e))
+		} else {
+			existing = append(existing, Finding(e))
+		}
+	}
+	var orphaned []Finding
+	for _, k := range storageKeys {
+		if _, ok := dbSet[k]; !ok {
+			orphaned = append(orphaned, Finding{StorageKey: k})
+		}
+	}
+
+	sort.Slice(missing, func(i, j int) bool { return missing[i].StorageKey < missing[j].StorageKey })
+	sort.Slice(orphaned, func(i, j int) bool { return orphaned[i].StorageKey < orphaned[j].StorageKey })
+	sort.Slice(existing, func(i, j int) bool { return existing[i].StorageKey < existing[j].StorageKey })
+
+	return Report{
+		GeneratedAt:       time.Now().UTC(),
+		MissingInStorage:  missing,
+		OrphanedInStorage: orphaned,
+		ExistingInStorage: existing,
+	}
+}

archive/internal/reconcile/reconcile_test.go

@@ -0,0 +1,169 @@
+package reconcile
+
+import "testing"
+
+// TestReconcile_DetectsMissingInStorage ist Akzeptanzkriterium 1 / Pruefung
+// 1: ein Datenbankeintrag ohne zugehoeriges Objekt im Storage wird erkannt.
+func TestReconcile_DetectsMissingInStorage(t *testing.T) {
+	db := []DBEntry{
+		{StorageKey: "documents/d1/revisions/r1", DocumentID: "d1", RevisionID: "r1"},
+		{StorageKey: "documents/d2/revisions/r1", DocumentID: "d2", RevisionID: "r1"},
+	}
+	storage := []string{"documents/d1/revisions/r1"} // d2/r1 fehlt absichtlich
+
+	report := Reconcile(db, storage)
+
+	if len(report.MissingInStorage) != 1 {
+		t.Fatalf("erwartet 1 fund in missing_in_storage, habe %d: %+v", len(report.MissingInStorage), report.MissingInStorage)
+	}
+	if report.MissingInStorage[0].StorageKey != "documents/d2/revisions/r1" {
+		t.Fatalf("unerwarteter fund: %+v", report.MissingInStorage[0])
+	}
+	if len(report.OrphanedInStorage) != 0 {
+		t.Fatalf("erwartet 0 funde in orphaned_in_storage, habe %d", len(report.OrphanedInStorage))
+	}
+}
+
+// TestReconcile_DetectsOrphanedInStorage ist Akzeptanzkriterium 2 /
+// Pruefung 2: ein Storage-Objekt ohne Datenbankeintrag wird erkannt.
+func TestReconcile_DetectsOrphanedInStorage(t *testing.T) {
+	db := []DBEntry{
+		{StorageKey: "documents/d1/revisions/r1", DocumentID: "d1", RevisionID: "r1"},
+	}
+	storage := []string{
+		"documents/d1/revisions/r1",
+		"documents/verwaist/revisions/r1", // kein DB-Eintrag dafuer
+	}
+
+	report := Reconcile(db, storage)
+
+	if len(report.OrphanedInStorage) != 1 {
+		t.Fatalf("erwartet 1 fund in orphaned_in_storage, habe %d: %+v", len(report.OrphanedInStorage), report.OrphanedInStorage)
+	}
+	if report.OrphanedInStorage[0].StorageKey != "documents/verwaist/revisions/r1" {
+		t.Fatalf("unerwarteter fund: %+v", report.OrphanedInStorage[0])
+	}
+	if len(report.MissingInStorage) != 0 {
+		t.Fatalf("erwartet 0 funde in missing_in_storage, habe %d", len(report.MissingInStorage))
+	}
+}
+
+// TestReconcile_CleanRunProducesEmptyReport ist Pruefung 3: Lauf ohne
+// Abweichungen liefert einen leeren, eindeutig als sauber erkennbaren
+// Bericht.
+func TestReconcile_CleanRunProducesEmptyReport(t *testing.T) {
+	db := []DBEntry{
+		{StorageKey: "documents/d1/revisions/r1", DocumentID: "d1", RevisionID: "r1"},
+		{StorageKey: "documents/d2/revisions/r1", DocumentID: "d2", RevisionID: "r1"},
+	}
+	storage := []string{"documents/d1/revisions/r1", "documents/d2/revisions/r1"}
+
+	report := Reconcile(db, storage)
+
+	if !report.IsClean() {
+		t.Fatalf("erwartet sauberen bericht, habe missing=%v orphaned=%v", report.MissingInStorage, report.OrphanedInStorage)
+	}
+	if len(report.MissingInStorage) != 0 || len(report.OrphanedInStorage) != 0 {
+		t.Fatal("IsClean()==true, aber listen sind nicht leer - widerspruch")
+	}
+}
+
+// TestReconcile_ExistingButCorruptedObjectProducesNoFinding ist der
+// Nachweis, dass BAK-05 AUSSCHLIESSLICH Existenz prueft, niemals Inhalt
+// (die Fehlerklasse "existiert, aber Inhalt beschaedigt" ist Archive
+// BAK-08, bewusst nicht hier) — Reconcile bekommt nur SCHLUESSEL, hat gar
+// keine Moeglichkeit, auf Inhalt zuzugreifen; dieser Test dokumentiert die
+// Absicht explizit, damit sie nicht versehentlich spaeter aufgeweicht wird.
+func TestReconcile_ExistingButCorruptedObjectProducesNoFinding(t *testing.T) {
+	db := []DBEntry{
+		{StorageKey: "documents/d1/revisions/r1", DocumentID: "d1", RevisionID: "r1"},
+	}
+	// "korruptes" Objekt hier rein simuliert durch denselben Schluessel -
+	// Reconcile kennt und prueft keinen Inhalt, nur den Schluessel selbst.
+	storage := []string{"documents/d1/revisions/r1"}
+
+	report := Reconcile(db, storage)
+
+	if !report.IsClean() {
+		t.Fatalf("ein existierendes (wenn auch inhaltlich korruptes) objekt haette KEINEN befund ausloesen duerfen, habe: %+v", report)
+	}
+}
+
+// TestReconcile_ExistingInStorageIsStableSamplingBasis ist der Nachweis,
+// dass Reconcile eine deterministisch sortierte Liste ALLER bestaetigt
+// existierenden Objekte liefert (DB-Eintrag UND Storage-Objekt vorhanden)
+// - dies ist die Stichprobengrundlage, die Archive BAK-08 weiterverwendet,
+// ohne selbst neu zu sortieren/filtern.
+func TestReconcile_ExistingInStorageIsStableSamplingBasis(t *testing.T) {
+	db := []DBEntry{
+		{StorageKey: "documents/z/revisions/r1", DocumentID: "z", RevisionID: "r1"},
+		{StorageKey: "documents/a/revisions/r1", DocumentID: "a", RevisionID: "r1"},
+		{StorageKey: "documents/fehlt/revisions/r1", DocumentID: "fehlt", RevisionID: "r1"},
+	}
+	storage := []string{
+		"documents/z/revisions/r1",
+		"documents/a/revisions/r1",
+	}
+
+	report := Reconcile(db, storage)
+
+	want := []string{"documents/a/revisions/r1", "documents/z/revisions/r1"}
+	if len(report.ExistingInStorage) != len(want) {
+		t.Fatalf("erwartet %d bestaetigt existierende objekte, habe %d: %+v", len(want), len(report.ExistingInStorage), report.ExistingInStorage)
+	}
+	for i, w := range want {
+		if report.ExistingInStorage[i].StorageKey != w {
+			t.Fatalf("sortierreihenfolge falsch: %v, want beginnend mit %v", report.ExistingInStorage, want)
+		}
+	}
+	if len(report.MissingInStorage) != 1 || report.MissingInStorage[0].StorageKey != "documents/fehlt/revisions/r1" {
+		t.Fatalf("missing_in_storage unerwartet: %+v", report.MissingInStorage)
+	}
+}
+
+// TestReconcile_DeterministicOrdering ist der Nachweis fuer die
+// Stabilitaets-Anforderung: gleiche Eingabe liefert bei mehreren Laeufen
+// IMMER dieselbe Reihenfolge (Voraussetzung dafuer, dass Archive BAK-08
+// die Liste der existierenden Objekte stabil weiterverarbeiten kann, ohne
+// selbst neu zu sortieren/filtern).
+func TestReconcile_DeterministicOrdering(t *testing.T) {
+	db := []DBEntry{
+		{StorageKey: "documents/z/revisions/r1", DocumentID: "z", RevisionID: "r1"},
+		{StorageKey: "documents/a/revisions/r1", DocumentID: "a", RevisionID: "r1"},
+		{StorageKey: "documents/m/revisions/r1", DocumentID: "m", RevisionID: "r1"},
+	}
+	storage := []string{
+		"documents/a/revisions/r1", // deckt genau den DB-Eintrag "a" ab
+		"documents/y/revisions/r1",
+		"documents/n/revisions/r1",
+	}
+
+	first := Reconcile(db, storage)
+	second := Reconcile(db, storage)
+
+	if len(first.MissingInStorage) != len(second.MissingInStorage) {
+		t.Fatal("unterschiedliche anzahl funde zwischen zwei laeufen mit identischer eingabe")
+	}
+	for i := range first.MissingInStorage {
+		if first.MissingInStorage[i].StorageKey != second.MissingInStorage[i].StorageKey {
+			t.Fatalf("reihenfolge in missing_in_storage nicht deterministisch: lauf1[%d]=%q lauf2[%d]=%q",
+				i, first.MissingInStorage[i].StorageKey, i, second.MissingInStorage[i].StorageKey)
+		}
+	}
+	for i := range first.OrphanedInStorage {
+		if first.OrphanedInStorage[i].StorageKey != second.OrphanedInStorage[i].StorageKey {
+			t.Fatalf("reihenfolge in orphaned_in_storage nicht deterministisch: lauf1[%d]=%q lauf2[%d]=%q",
+				i, first.OrphanedInStorage[i].StorageKey, i, second.OrphanedInStorage[i].StorageKey)
+		}
+	}
+	// Aufsteigend sortiert (a < m < z), nicht Einfuegereihenfolge.
+	wantOrder := []string{"documents/m/revisions/r1", "documents/z/revisions/r1"}
+	if len(first.MissingInStorage) != len(wantOrder) {
+		t.Fatalf("erwartet %d funde, habe %d", len(wantOrder), len(first.MissingInStorage))
+	}
+	for i, w := range wantOrder {
+		if first.MissingInStorage[i].StorageKey != w {
+			t.Fatalf("sortierreihenfolge falsch: %v, want beginnend mit %v", first.MissingInStorage, wantOrder)
+		}
+	}
+}

archive/internal/reconcile/sources.go

@@ -0,0 +1,65 @@
+package reconcile
+
+import (
+	"context"
+	"fmt"
+	"os"
+	"path/filepath"
+
+	"github.com/jackc/pgx/v5/pgxpool"
+)
+
+// ListDBStorageKeys liest alle storage_key-Werte aus file_revisions
+// (DMS FDN-02) — Archive liest direkt aus derselben physischen
+// Tenant-Datenbank (Modell C, Core TEN-01), OHNE DMS-Go-Pakete zu
+// importieren (Archive ist ein eigenes Go-Modul) — reiner SQL-Zugriff
+// gegen das dokumentierte Schema, sortiert nach storage_key für
+// deterministische Reconcile-Ergebnisse.
+func ListDBStorageKeys(ctx context.Context, pool *pgxpool.Pool) ([]DBEntry, error) {
+	rows, err := pool.Query(ctx, `
+		SELECT storage_key, document_id, id FROM file_revisions ORDER BY storage_key
+	`)
+	if err != nil {
+		return nil, fmt.Errorf("reconcile: file_revisions abfragen: %w", err)
+	}
+	defer rows.Close()
+
+	var entries []DBEntry
+	for rows.Next() {
+		var e DBEntry
+		if err := rows.Scan(&e.StorageKey, &e.DocumentID, &e.RevisionID); err != nil {
+			return nil, fmt.Errorf("reconcile: file_revisions-zeile lesen: %w", err)
+		}
+		entries = append(entries, e)
+	}
+	return entries, rows.Err()
+}
+
+// ListStorageObjects durchläuft den lokalen FDN-03-LocalDriver-
+// Basisordner und liefert alle vorhandenen Objektschlüssel (Pfad relativ
+// zu baseDir, mit "/" als Trenner — dasselbe Format wie
+// storage.ObjectKey aus FDN-03), sortiert.
+func ListStorageObjects(baseDir string) ([]string, error) {
+	var keys []string
+	err := filepath.WalkDir(baseDir, func(path string, d os.DirEntry, err error) error {
+		if err != nil {
+			return err
+		}
+		if d.IsDir() {
+			return nil
+		}
+		rel, err := filepath.Rel(baseDir, path)
+		if err != nil {
+			return err
+		}
+		keys = append(keys, filepath.ToSlash(rel))
+		return nil
+	})
+	if err != nil {
+		if os.IsNotExist(err) {
+			return nil, nil
+		}
+		return nil, fmt.Errorf("reconcile: objekt-storage durchlaufen: %w", err)
+	}
+	return keys, nil
+}

archive/internal/reconcile/sources_test.go

@@ -0,0 +1,132 @@
+package reconcile
+
+import (
+	"context"
+	"os"
+	"path/filepath"
+	"testing"
+
+	"github.com/jackc/pgx/v5/pgxpool"
+)
+
+func requireTestPool(t *testing.T) *pgxpool.Pool {
+	t.Helper()
+	dsn := os.Getenv("TEST_TENANT_DSN")
+	if dsn == "" {
+		t.Skip("TEST_TENANT_DSN nicht gesetzt, Integrationstest uebersprungen")
+	}
+	ctx := context.Background()
+	pool, err := pgxpool.New(ctx, dsn)
+	if err != nil {
+		t.Fatalf("pool: %v", err)
+	}
+	t.Cleanup(func() { pool.Close() })
+
+	// Minimalschema, das exakt DMS FDN-02s file_revisions-Spalten spiegelt
+	// (Archive kann DMS' internal/-Pakete als eigenes Go-Modul nicht
+	// importieren, daher hier als Testfixture kopiert statt real migriert).
+	if _, err := pool.Exec(ctx, `
+		CREATE EXTENSION IF NOT EXISTS pgcrypto;
+		CREATE TABLE IF NOT EXISTS users (
+			id UUID PRIMARY KEY DEFAULT gen_random_uuid(), email TEXT NOT NULL UNIQUE, name TEXT NOT NULL,
+			created_at TIMESTAMPTZ NOT NULL DEFAULT now()
+		);
+		CREATE TABLE IF NOT EXISTS documents (
+			id UUID PRIMARY KEY DEFAULT gen_random_uuid(), title TEXT NOT NULL,
+			created_by UUID NOT NULL REFERENCES users(id), created_at TIMESTAMPTZ NOT NULL DEFAULT now()
+		);
+		CREATE TABLE IF NOT EXISTS file_revisions (
+			id UUID PRIMARY KEY DEFAULT gen_random_uuid(), document_id UUID NOT NULL REFERENCES documents(id) ON DELETE CASCADE,
+			storage_key TEXT NOT NULL, checksum_sha256 TEXT NOT NULL, size_bytes BIGINT NOT NULL,
+			mime_type TEXT NOT NULL, revision_number INTEGER NOT NULL, created_by UUID NOT NULL REFERENCES users(id),
+			created_at TIMESTAMPTZ NOT NULL DEFAULT now()
+		);
+	`); err != nil {
+		t.Fatalf("schema: %v", err)
+	}
+	t.Cleanup(func() {
+		_, _ = pool.Exec(context.Background(), `TRUNCATE file_revisions, documents, users CASCADE`)
+	})
+	return pool
+}
+
+// TestListDBStorageKeys_ReadsRealFileRevisions ist der Nachweis, dass
+// ListDBStorageKeys tatsaechlich gegen eine echte Postgres-Instanz mit
+// DMS-FDN-02-Schema liest — kein Mock.
+func TestListDBStorageKeys_ReadsRealFileRevisions(t *testing.T) {
+	pool := requireTestPool(t)
+	ctx := context.Background()
+
+	var userID, docID string
+	if err := pool.QueryRow(ctx, `INSERT INTO users (email, name) VALUES ('reconcile-test@example.test', 'Test') RETURNING id`).Scan(&userID); err != nil {
+		t.Fatalf("testbenutzer anlegen: %v", err)
+	}
+	if err := pool.QueryRow(ctx, `INSERT INTO documents (title, created_by) VALUES ('doc', $1) RETURNING id`, userID).Scan(&docID); err != nil {
+		t.Fatalf("testdokument anlegen: %v", err)
+	}
+	if _, err := pool.Exec(ctx, `
+		INSERT INTO file_revisions (document_id, storage_key, checksum_sha256, size_bytes, mime_type, revision_number, created_by)
+		VALUES ($1, 'documents/x/revisions/1', 'abc', 10, 'text/plain', 1, $2)
+	`, docID, userID); err != nil {
+		t.Fatalf("testrevision anlegen: %v", err)
+	}
+
+	entries, err := ListDBStorageKeys(ctx, pool)
+	if err != nil {
+		t.Fatalf("listdbstoragekeys: %v", err)
+	}
+	if len(entries) != 1 {
+		t.Fatalf("erwartet 1 eintrag, habe %d", len(entries))
+	}
+	if entries[0].StorageKey != "documents/x/revisions/1" {
+		t.Fatalf("storage_key = %q, want %q", entries[0].StorageKey, "documents/x/revisions/1")
+	}
+	if entries[0].DocumentID != docID {
+		t.Fatalf("document_id = %q, want %q", entries[0].DocumentID, docID)
+	}
+}
+
+// TestListStorageObjects_WalksRealDirectory ist der Nachweis, dass
+// ListStorageObjects tatsaechlich das Dateisystem durchlaeuft.
+func TestListStorageObjects_WalksRealDirectory(t *testing.T) {
+	baseDir := t.TempDir()
+	mustWriteFile(t, filepath.Join(baseDir, "documents", "d1", "revisions", "r1"), "inhalt")
+	mustWriteFile(t, filepath.Join(baseDir, "documents", "d2", "revisions", "r1"), "inhalt")
+
+	keys, err := ListStorageObjects(baseDir)
+	if err != nil {
+		t.Fatalf("liststorageobjects: %v", err)
+	}
+	if len(keys) != 2 {
+		t.Fatalf("erwartet 2 objektschluessel, habe %d: %v", len(keys), keys)
+	}
+	want := []string{"documents/d1/revisions/r1", "documents/d2/revisions/r1"}
+	for i, w := range want {
+		if keys[i] != w {
+			t.Fatalf("schluessel[%d] = %q, want %q (voll: %v)", i, keys[i], w, keys)
+		}
+	}
+}
+
+// TestListStorageObjects_MissingDirectoryReturnsEmpty prueft das
+// Verhalten, wenn das Basisverzeichnis (noch) gar nicht existiert -
+// sollte als "keine Objekte", nicht als Fehler behandelt werden.
+func TestListStorageObjects_MissingDirectoryReturnsEmpty(t *testing.T) {
+	keys, err := ListStorageObjects("/pfad/der/nicht/existiert/fuer/diesen/test")
+	if err != nil {
+		t.Fatalf("erwartet keinen fehler bei fehlendem verzeichnis, habe: %v", err)
+	}
+	if len(keys) != 0 {
+		t.Fatalf("erwartet 0 schluessel, habe %d", len(keys))
+	}
+}
+
+func mustWriteFile(t *testing.T, path, content string) {
+	t.Helper()
+	if err := os.MkdirAll(filepath.Dir(path), 0o755); err != nil {
+		t.Fatalf("verzeichnis anlegen: %v", err)
+	}
+	if err := os.WriteFile(path, []byte(content), 0o600); err != nil {
+		t.Fatalf("datei schreiben: %v", err)
+	}
+}

archive/internal/scrub/checksum.go

@@ -0,0 +1,57 @@
+package scrub
+
+import (
+	"context"
+	"crypto/sha256"
+	"encoding/hex"
+	"fmt"
+	"io"
+	"os"
+	"path/filepath"
+
+	"github.com/jackc/pgx/v5/pgxpool"
+)
+
+// ExpectedChecksums liest file_revisions.checksum_sha256 fuer genau die
+// uebergebenen storage_keys — bewusst eine eigene, minimale Abfrage statt
+// Erweiterung von reconcile.DBEntry (BAK-05 bleibt existenz-only, keine
+// Kopplung an Inhaltspruefungs-Bedarf von BAK-08).
+func ExpectedChecksums(ctx context.Context, pool *pgxpool.Pool, storageKeys []string) (map[string]string, error) {
+	if len(storageKeys) == 0 {
+		return map[string]string{}, nil
+	}
+	rows, err := pool.Query(ctx, `
+		SELECT storage_key, checksum_sha256 FROM file_revisions WHERE storage_key = ANY($1)
+	`, storageKeys)
+	if err != nil {
+		return nil, fmt.Errorf("scrub: erwartete pruefsummen lesen: %w", err)
+	}
+	defer rows.Close()
+
+	out := make(map[string]string, len(storageKeys))
+	for rows.Next() {
+		var key, checksum string
+		if err := rows.Scan(&key, &checksum); err != nil {
+			return nil, fmt.Errorf("scrub: pruefsummen-zeile lesen: %w", err)
+		}
+		out[key] = checksum
+	}
+	return out, rows.Err()
+}
+
+// ActualChecksum liest die Datei unter baseDir/storageKey vollstaendig
+// und berechnet ihren SHA-256 — echte Inhaltspruefung, kein
+// Header-/Groessenvergleich (dieselbe Disziplin wie BAK-01s Verify).
+func ActualChecksum(baseDir, storageKey string) (string, error) {
+	f, err := os.Open(filepath.Join(baseDir, filepath.FromSlash(storageKey)))
+	if err != nil {
+		return "", fmt.Errorf("scrub: objekt lesen: %w", err)
+	}
+	defer func() { _ = f.Close() }()
+
+	h := sha256.New()
+	if _, err := io.Copy(h, f); err != nil {
+		return "", fmt.Errorf("scrub: objekt hashen: %w", err)
+	}
+	return hex.EncodeToString(h.Sum(nil)), nil
+}

archive/internal/scrub/checksum_test.go

@@ -0,0 +1,94 @@
+package scrub
+
+import (
+	"context"
+	"crypto/sha256"
+	"encoding/hex"
+	"os"
+	"path/filepath"
+	"testing"
+
+	"github.com/jackc/pgx/v5/pgxpool"
+)
+
+func requireFileRevisionsFixture(t *testing.T) (pool *pgxpool.Pool, userID, docID string) {
+	t.Helper()
+	p := requireTestPool(t)
+	ctx := context.Background()
+	if _, err := p.Exec(ctx, `
+		CREATE EXTENSION IF NOT EXISTS pgcrypto;
+		CREATE TABLE IF NOT EXISTS users (
+			id UUID PRIMARY KEY DEFAULT gen_random_uuid(), email TEXT NOT NULL UNIQUE, name TEXT NOT NULL,
+			created_at TIMESTAMPTZ NOT NULL DEFAULT now()
+		);
+		CREATE TABLE IF NOT EXISTS documents (
+			id UUID PRIMARY KEY DEFAULT gen_random_uuid(), title TEXT NOT NULL,
+			created_by UUID NOT NULL REFERENCES users(id), created_at TIMESTAMPTZ NOT NULL DEFAULT now()
+		);
+		CREATE TABLE IF NOT EXISTS file_revisions (
+			id UUID PRIMARY KEY DEFAULT gen_random_uuid(), document_id UUID NOT NULL REFERENCES documents(id) ON DELETE CASCADE,
+			storage_key TEXT NOT NULL, checksum_sha256 TEXT NOT NULL, size_bytes BIGINT NOT NULL,
+			mime_type TEXT NOT NULL, revision_number INTEGER NOT NULL, created_by UUID NOT NULL REFERENCES users(id),
+			created_at TIMESTAMPTZ NOT NULL DEFAULT now()
+		);
+	`); err != nil {
+		t.Fatalf("file_revisions-fixture: %v", err)
+	}
+	var uid string
+	if err := p.QueryRow(ctx, `INSERT INTO users (email, name) VALUES ('scrub-test@example.test', 'Test') RETURNING id`).Scan(&uid); err != nil {
+		t.Fatalf("testbenutzer anlegen: %v", err)
+	}
+	var did string
+	if err := p.QueryRow(ctx, `INSERT INTO documents (title, created_by) VALUES ('doc', $1) RETURNING id`, uid).Scan(&did); err != nil {
+		t.Fatalf("testdokument anlegen: %v", err)
+	}
+	t.Cleanup(func() { _, _ = p.Exec(context.Background(), `TRUNCATE file_revisions, documents, users CASCADE`) })
+	return p, uid, did
+}
+
+// TestActualChecksum_MatchesRealFileContent ist Nachweis, dass
+// ActualChecksum tatsaechlich den Dateiinhalt liest und hasht (kein
+// Header-/Groessenvergleich).
+func TestActualChecksum_MatchesRealFileContent(t *testing.T) {
+	baseDir := t.TempDir()
+	content := []byte("echter dateiinhalt fuer scrub-test")
+	path := filepath.Join(baseDir, "documents", "x", "revisions", "1")
+	if err := os.MkdirAll(filepath.Dir(path), 0o755); err != nil {
+		t.Fatal(err)
+	}
+	if err := os.WriteFile(path, content, 0o600); err != nil {
+		t.Fatal(err)
+	}
+
+	got, err := ActualChecksum(baseDir, "documents/x/revisions/1")
+	if err != nil {
+		t.Fatalf("actualChecksum: %v", err)
+	}
+	sum := sha256.Sum256(content)
+	want := hex.EncodeToString(sum[:])
+	if got != want {
+		t.Fatalf("checksum = %q, want %q", got, want)
+	}
+}
+
+// TestExpectedChecksums_ReadsRealFileRevisions ist Nachweis gegen echtes
+// Postgres, kein Mock.
+func TestExpectedChecksums_ReadsRealFileRevisions(t *testing.T) {
+	pool, uid, did := requireFileRevisionsFixture(t)
+	ctx := context.Background()
+
+	if _, err := pool.Exec(ctx, `
+		INSERT INTO file_revisions (document_id, storage_key, checksum_sha256, size_bytes, mime_type, revision_number, created_by)
+		VALUES ($1, 'documents/x/revisions/1', 'abc123', 10, 'text/plain', 1, $2)
+	`, did, uid); err != nil {
+		t.Fatalf("testrevision anlegen: %v", err)
+	}
+
+	got, err := ExpectedChecksums(ctx, pool, []string{"documents/x/revisions/1", "documents/fehlt/revisions/1"})
+	if err != nil {
+		t.Fatalf("expectedChecksums: %v", err)
+	}
+	if len(got) != 1 || got["documents/x/revisions/1"] != "abc123" {
+		t.Fatalf("unerwartetes ergebnis: %+v", got)
+	}
+}

archive/internal/scrub/scrub.go

@@ -0,0 +1,69 @@
+// Package scrub implementiert BAK-08: periodische, checksummenbasierte
+// Integritaetspruefung einer Stichprobe existierender Objekte. Baut auf
+// BAK-05 (internal/reconcile) auf, das die deterministisch sortierte
+// Liste bestaetigt existierender Objekte liefert (existenz-only) — scrub
+// fuegt die INHALTSPRUEFUNG hinzu, die BAK-05 bewusst ausspart.
+package scrub
+
+import (
+	"sort"
+	"time"
+
+	"gitea.perlbach24.de/scripte/nexarch/archive/internal/reconcile"
+)
+
+// Candidate ist ein fuer den aktuellen Lauf ausgewaehltes Objekt.
+type Candidate struct {
+	StorageKey string
+	DocumentID string
+	RevisionID string
+}
+
+// Sample waehlt aus existing (BAK-05s existing_in_storage, bereits nach
+// StorageKey sortiert) die naechste Stichprobe: Objekte, die noch nie
+// oder vor mehr als cooldown geprueft wurden (last_scrubbed via
+// storage_key -> last_scrubbed_at aus scrub_state), begrenzt auf
+// sampleSize. Reine Funktion, deterministisch bei gleicher Eingabe (fixe
+// Reihenfolge von existing, kein Zufall) — Akzeptanzkriterium
+// "Sampling priorisiert alte, unveraenderte Objekte": ein nie/am
+// laengsten nicht geprueftes Objekt hat KEINEN last_scrubbed-Eintrag oder
+// den aeltesten, beides erscheint zuerst in "existing", das seinerseits
+// nach StorageKey sortiert ist — daher wird zusaetzlich vor der
+// Groessenbegrenzung nach last_scrubbed_at aufsteigend sortiert (nie
+// geprueft = aeltestmoeglicher Wert), damit tatsaechlich das am laengsten
+// nicht verifizierte Objekt zuerst drankommt, nicht nur alphabetisch nach
+// Schluessel.
+func Sample(existing []reconcile.Finding, lastScrubbed map[string]time.Time, cooldown time.Duration, sampleSize int, now time.Time) []Candidate {
+	type scored struct {
+		f    reconcile.Finding
+		last time.Time
+	}
+	var due []scored
+	for _, f := range existing {
+		last, ok := lastScrubbed[f.StorageKey]
+		if ok && now.Sub(last) < cooldown {
+			continue // erst kuerzlich geprueft, ueberspringen
+		}
+		if !ok {
+			last = time.Time{} // nie geprueft = aeltestmoeglicher Wert, kommt zuerst
+		}
+		due = append(due, scored{f: f, last: last})
+	}
+
+	sort.SliceStable(due, func(i, j int) bool {
+		if !due[i].last.Equal(due[j].last) {
+			return due[i].last.Before(due[j].last)
+		}
+		return due[i].f.StorageKey < due[j].f.StorageKey // Tie-Break deterministisch
+	})
+
+	if sampleSize >= 0 && len(due) > sampleSize {
+		due = due[:sampleSize]
+	}
+
+	out := make([]Candidate, 0, len(due))
+	for _, d := range due {
+		out = append(out, Candidate{StorageKey: d.f.StorageKey, DocumentID: d.f.DocumentID, RevisionID: d.f.RevisionID})
+	}
+	return out
+}

archive/internal/scrub/scrub_test.go

@@ -0,0 +1,95 @@
+package scrub
+
+import (
+	"testing"
+	"time"
+
+	"gitea.perlbach24.de/scripte/nexarch/archive/internal/reconcile"
+)
+
+var now = time.Date(2026, 8, 29, 12, 0, 0, 0, time.UTC)
+
+// TestSample_PrioritizesNeverScrubbedAndOldest ist der Nachweis fuer das
+// GoBD-Akzeptanzkriterium: nie geprueft ODER am laengsten nicht geprueft
+// kommt zuerst, nicht bloss alphabetisch nach StorageKey.
+func TestSample_PrioritizesNeverScrubbedAndOldest(t *testing.T) {
+	existing := []reconcile.Finding{
+		{StorageKey: "documents/a/revisions/r1"}, // vor 1 tag geprueft
+		{StorageKey: "documents/b/revisions/r1"}, // nie geprueft
+		{StorageKey: "documents/c/revisions/r1"}, // vor 30 tagen geprueft (aeltest)
+	}
+	lastScrubbed := map[string]time.Time{
+		"documents/a/revisions/r1": now.Add(-24 * time.Hour),
+		"documents/c/revisions/r1": now.Add(-30 * 24 * time.Hour),
+	}
+
+	got := Sample(existing, lastScrubbed, time.Hour, 2, now)
+
+	if len(got) != 2 {
+		t.Fatalf("erwartet 2 kandidaten, habe %d: %+v", len(got), got)
+	}
+	// "nie geprueft" (b) zaehlt als aeltestmoeglich, kommt vor "vor 30 tagen" (c).
+	if got[0].StorageKey != "documents/b/revisions/r1" || got[1].StorageKey != "documents/c/revisions/r1" {
+		t.Fatalf("falsche prioritaet, want [b, c], habe %+v", got)
+	}
+}
+
+// TestSample_RespectsCooldown ist der Nachweis, dass kuerzlich gepruefte
+// Objekte NICHT erneut ausgewaehlt werden — sonst wuerde dieselbe Gruppe
+// dauernd gescrubbt (genau der Fehler, den die Alt-Priorisierung
+// verhindern soll).
+func TestSample_RespectsCooldown(t *testing.T) {
+	existing := []reconcile.Finding{
+		{StorageKey: "documents/a/revisions/r1"},
+		{StorageKey: "documents/b/revisions/r1"},
+	}
+	lastScrubbed := map[string]time.Time{
+		"documents/a/revisions/r1": now.Add(-1 * time.Hour), // innerhalb cooldown
+	}
+
+	got := Sample(existing, lastScrubbed, 24*time.Hour, 10, now)
+
+	if len(got) != 1 || got[0].StorageKey != "documents/b/revisions/r1" {
+		t.Fatalf("erwartet nur b (a innerhalb cooldown), habe %+v", got)
+	}
+}
+
+// TestSample_LimitsToSampleSize ist der Nachweis, dass die
+// Stichprobengroesse tatsaechlich begrenzt (kein Voll-Scrub jeden Lauf).
+func TestSample_LimitsToSampleSize(t *testing.T) {
+	existing := []reconcile.Finding{
+		{StorageKey: "documents/a/revisions/r1"},
+		{StorageKey: "documents/b/revisions/r1"},
+		{StorageKey: "documents/c/revisions/r1"},
+	}
+
+	got := Sample(existing, map[string]time.Time{}, time.Hour, 1, now)
+
+	if len(got) != 1 {
+		t.Fatalf("erwartet genau 1 kandidat, habe %d", len(got))
+	}
+}
+
+// TestSample_DeterministicForIdenticalInput ist der Nachweis, dass zwei
+// Laeufe mit identischer Eingabe dieselbe Reihenfolge liefern (kein
+// Zufall im Sampling).
+func TestSample_DeterministicForIdenticalInput(t *testing.T) {
+	existing := []reconcile.Finding{
+		{StorageKey: "documents/a/revisions/r1"},
+		{StorageKey: "documents/b/revisions/r1"},
+		{StorageKey: "documents/c/revisions/r1"},
+	}
+	lastScrubbed := map[string]time.Time{}
+
+	first := Sample(existing, lastScrubbed, time.Hour, 2, now)
+	second := Sample(existing, lastScrubbed, time.Hour, 2, now)
+
+	if len(first) != len(second) {
+		t.Fatal("unterschiedliche anzahl zwischen zwei laeufen mit identischer eingabe")
+	}
+	for i := range first {
+		if first[i].StorageKey != second[i].StorageKey {
+			t.Fatalf("reihenfolge nicht deterministisch: lauf1=%+v lauf2=%+v", first, second)
+		}
+	}
+}

archive/internal/scrub/state.go

@@ -0,0 +1,74 @@
+package scrub
+
+import (
+	"context"
+	"fmt"
+	"time"
+
+	"github.com/jackc/pgx/v5/pgxpool"
+)
+
+// LoadLastScrubbed liefert je storage_key den Zeitpunkt der letzten
+// Pruefung — Grundlage fuer Sample's Cooldown-Filter.
+func LoadLastScrubbed(ctx context.Context, pool *pgxpool.Pool) (map[string]time.Time, error) {
+	rows, err := pool.Query(ctx, `SELECT storage_key, last_scrubbed_at FROM scrub_state`)
+	if err != nil {
+		return nil, fmt.Errorf("scrub: scrub_state lesen: %w", err)
+	}
+	defer rows.Close()
+
+	out := make(map[string]time.Time)
+	for rows.Next() {
+		var key string
+		var ts time.Time
+		if err := rows.Scan(&key, &ts); err != nil {
+			return nil, fmt.Errorf("scrub: scrub_state-zeile lesen: %w", err)
+		}
+		out[key] = ts
+	}
+	return out, rows.Err()
+}
+
+// MarkScrubbed vermerkt Ergebnis und Zeitpunkt der Pruefung eines
+// Objekts — idempotent (ON CONFLICT), damit ein unterbrochener und neu
+// gestarteter Lauf keinen inkonsistenten Zustand hinterlaesst
+// (Akzeptanzkriterium: Lauf ist unterbrechbar ohne inkonsistenten
+// Zustand).
+func MarkScrubbed(ctx context.Context, pool *pgxpool.Pool, storageKey string, ok bool, at time.Time) error {
+	result := "ok"
+	if !ok {
+		result = "failed"
+	}
+	_, err := pool.Exec(ctx, `
+		INSERT INTO scrub_state (storage_key, last_scrubbed_at, last_result)
+		VALUES ($1, $2, $3)
+		ON CONFLICT (storage_key) DO UPDATE SET last_scrubbed_at = $2, last_result = $3
+	`, storageKey, at, result)
+	if err != nil {
+		return fmt.Errorf("scrub: scrub_state schreiben: %w", err)
+	}
+	return nil
+}
+
+// RecordFinding erhoeht den monoton steigenden Befund-Zaehler
+// (scrub_counters.findings_total) um genau 1 — als gueltiger Prometheus-
+// Counter darf dieser Wert nur steigen, niemals sinken, auch wenn ein
+// Befund spaeter behoben wird.
+func RecordFinding(ctx context.Context, pool *pgxpool.Pool) error {
+	_, err := pool.Exec(ctx, `UPDATE scrub_counters SET findings_total = findings_total + 1 WHERE id = 1`)
+	if err != nil {
+		return fmt.Errorf("scrub: befund-zaehler erhoehen: %w", err)
+	}
+	return nil
+}
+
+// FindingsTotal liest den aktuellen Zaehlerstand — genutzt vom
+// /metrics-Endpunkt (cmd/scrub-metrics).
+func FindingsTotal(ctx context.Context, pool *pgxpool.Pool) (int64, error) {
+	var total int64
+	err := pool.QueryRow(ctx, `SELECT findings_total FROM scrub_counters WHERE id = 1`).Scan(&total)
+	if err != nil {
+		return 0, fmt.Errorf("scrub: befund-zaehler lesen: %w", err)
+	}
+	return total, nil
+}

archive/internal/scrub/state_test.go

@@ -0,0 +1,92 @@
+package scrub
+
+import (
+	"context"
+	"os"
+	"testing"
+	"time"
+
+	"github.com/jackc/pgx/v5/pgxpool"
+)
+
+func requireTestPool(t *testing.T) *pgxpool.Pool {
+	t.Helper()
+	dsn := os.Getenv("TEST_TENANT_DSN")
+	if dsn == "" {
+		t.Skip("TEST_TENANT_DSN nicht gesetzt, Integrationstest uebersprungen")
+	}
+	ctx := context.Background()
+	pool, err := pgxpool.New(ctx, dsn)
+	if err != nil {
+		t.Fatalf("pool: %v", err)
+	}
+	t.Cleanup(func() { pool.Close() })
+
+	if _, err := pool.Exec(ctx, `
+		CREATE TABLE IF NOT EXISTS scrub_state (
+			storage_key TEXT PRIMARY KEY, last_scrubbed_at TIMESTAMPTZ NOT NULL,
+			last_result TEXT NOT NULL CHECK (last_result IN ('ok', 'failed'))
+		);
+		CREATE TABLE IF NOT EXISTS scrub_counters (
+			id INTEGER PRIMARY KEY DEFAULT 1 CHECK (id = 1), findings_total BIGINT NOT NULL DEFAULT 0
+		);
+		INSERT INTO scrub_counters (id, findings_total) VALUES (1, 0) ON CONFLICT (id) DO NOTHING;
+	`); err != nil {
+		t.Fatalf("schema: %v", err)
+	}
+	t.Cleanup(func() {
+		_, _ = pool.Exec(context.Background(), `TRUNCATE scrub_state; UPDATE scrub_counters SET findings_total = 0 WHERE id = 1`)
+	})
+	return pool
+}
+
+// TestMarkScrubbed_IsIdempotent ist Nachweis fuer "Lauf ist idempotent und
+// unterbrechbar ohne inkonsistenten Zustand": derselbe storage_key kann
+// beliebig oft neu markiert werden, es entsteht kein Duplikat/Fehler.
+func TestMarkScrubbed_IsIdempotent(t *testing.T) {
+	pool := requireTestPool(t)
+	ctx := context.Background()
+	key := "documents/x/revisions/1"
+
+	if err := MarkScrubbed(ctx, pool, key, true, time.Now().UTC()); err != nil {
+		t.Fatalf("erster markScrubbed: %v", err)
+	}
+	second := time.Now().UTC().Add(time.Hour)
+	if err := MarkScrubbed(ctx, pool, key, false, second); err != nil {
+		t.Fatalf("zweiter markScrubbed (ueberschreibt): %v", err)
+	}
+
+	last, err := LoadLastScrubbed(ctx, pool)
+	if err != nil {
+		t.Fatalf("loadLastScrubbed: %v", err)
+	}
+	if len(last) != 1 {
+		t.Fatalf("erwartet genau 1 eintrag (kein duplikat), habe %d", len(last))
+	}
+	// Postgres timestamptz rundet auf Mikrosekunden, Go time.Time hat
+	// Nanosekunden-Praezision - Vergleich daher auf Mikrosekunden gerundet.
+	if !last[key].Truncate(time.Microsecond).Equal(second.Truncate(time.Microsecond)) {
+		t.Fatalf("last_scrubbed_at nicht ueberschrieben: %v, want %v", last[key], second)
+	}
+}
+
+// TestRecordFinding_IsMonotonicallyIncreasing ist Nachweis, dass der
+// Zaehler ein gueltiger Prometheus-Counter ist (steigt nur, sinkt nie).
+func TestRecordFinding_IsMonotonicallyIncreasing(t *testing.T) {
+	pool := requireTestPool(t)
+	ctx := context.Background()
+
+	for i := 0; i < 3; i++ {
+		if err := RecordFinding(ctx, pool); err != nil {
+			t.Fatalf("recordFinding: %v", err)
+		}
+	}
+
+	total, err := FindingsTotal(ctx, pool)
+	if err != nil {
+		t.Fatalf("findingsTotal: %v", err)
+	}
+	if total != 3 {
+		t.Fatalf("erwartet 3, habe %d", total)
+	}
+}

archive/migrations/0001_scrub_state.down.sql

@@ -0,0 +1,2 @@
+DROP TABLE IF EXISTS scrub_counters;
+DROP TABLE IF EXISTS scrub_state;

archive/migrations/0001_scrub_state.up.sql

@@ -0,0 +1,21 @@
+-- BAK-08: Zustand des Integritaets-Scrub-Jobs. Getrennt von file_revisions
+-- (DMS-Eigentum, nur lesend zugegriffen) und getrennt von BAK-05s
+-- reconcile-Paket (existenz-only, keine Inhaltspruefung) — eigener,
+-- Archive-eigener Zustand ueber ZULETZT geprueften Zeitpunkt je Objekt,
+-- damit Sampling rotiert statt dieselben "aeltesten" Objekte auf ewig
+-- erneut zu ziehen.
+CREATE TABLE IF NOT EXISTS scrub_state (
+    storage_key      TEXT PRIMARY KEY,
+    last_scrubbed_at TIMESTAMPTZ NOT NULL,
+    last_result      TEXT NOT NULL CHECK (last_result IN ('ok', 'failed'))
+);
+
+-- Einzelne Zeile, monoton steigender Zaehler fuer den OPS-05/OPS-03-
+-- Metrik-Export (Counter, nie ruecksetzbar — ein behobener Befund darf den
+-- Zaehler nicht wieder senken, sonst waere es kein gueltiger Prometheus-
+-- Counter mehr).
+CREATE TABLE IF NOT EXISTS scrub_counters (
+    id             INTEGER PRIMARY KEY DEFAULT 1 CHECK (id = 1),
+    findings_total BIGINT NOT NULL DEFAULT 0
+);
+INSERT INTO scrub_counters (id, findings_total) VALUES (1, 0) ON CONFLICT (id) DO NOTHING;

deploy/systemd/nexarch-archive-backup-full.service.tmpl

@@ -0,0 +1,9 @@
+[Unit]
+Description=NEXARCH Archive - Datenbank-Vollsicherung (BAK-01)
+After=network.target postgresql.service
+
+[Service]
+Type=oneshot
+User=nexarch
+EnvironmentFile=/etc/nexarch/archive-backup.env
+ExecStart=__INSTALL_DIR__/bin/backup-cli full

deploy/systemd/nexarch-archive-backup-full.timer.tmpl

@@ -0,0 +1,9 @@
+[Unit]
+Description=Taeglicher Zeitplan fuer NEXARCH Archive Datenbank-Vollsicherung (BAK-01)
+
+[Timer]
+OnCalendar=*-*-* 02:00:00
+Persistent=true
+
+[Install]
+WantedBy=timers.target

deploy/systemd/nexarch-archive-backup-incremental.service.tmpl

@@ -0,0 +1,9 @@
+[Unit]
+Description=NEXARCH Archive - Datenbank-Inkrementalsicherung (BAK-01)
+After=network.target postgresql.service
+
+[Service]
+Type=oneshot
+User=nexarch
+EnvironmentFile=/etc/nexarch/archive-backup.env
+ExecStart=__INSTALL_DIR__/bin/backup-cli incremental

deploy/systemd/nexarch-archive-backup-incremental.timer.tmpl

@@ -0,0 +1,9 @@
+[Unit]
+Description=Stuendlicher Zeitplan fuer NEXARCH Archive Datenbank-Inkrementalsicherung (BAK-01)
+
+[Timer]
+OnCalendar=*-*-* *:00:00
+Persistent=true
+
+[Install]
+WantedBy=timers.target

deploy/systemd/nexarch-archive-backup-rotate.service.tmpl

@@ -0,0 +1,9 @@
+[Unit]
+Description=NEXARCH Archive - Sicherungsgenerationen-Rotation (BAK-01)
+After=network.target
+
+[Service]
+Type=oneshot
+User=nexarch
+EnvironmentFile=/etc/nexarch/archive-backup.env
+ExecStart=__INSTALL_DIR__/bin/backup-cli rotate

deploy/systemd/nexarch-archive-backup-rotate.timer.tmpl

@@ -0,0 +1,9 @@
+[Unit]
+Description=Taeglicher Zeitplan fuer NEXARCH Archive Sicherungsgenerationen-Rotation (BAK-01)
+
+[Timer]
+OnCalendar=*-*-* 03:00:00
+Persistent=true
+
+[Install]
+WantedBy=timers.target

deploy/systemd/nexarch-archive-objectbackup-backup.service.tmpl

@@ -0,0 +1,9 @@
+[Unit]
+Description=NEXARCH Archive - Objekt-Storage-Sicherung (BAK-02)
+After=network.target
+
+[Service]
+Type=oneshot
+User=nexarch
+EnvironmentFile=/etc/nexarch/archive-objectbackup.env
+ExecStart=__INSTALL_DIR__/bin/objectbackup-cli backup __OBJECT_SOURCE_DIR__

deploy/systemd/nexarch-archive-objectbackup-backup.timer.tmpl

@@ -0,0 +1,9 @@
+[Unit]
+Description=Stuendlicher Zeitplan fuer NEXARCH Archive Objekt-Storage-Sicherung (BAK-02)
+
+[Timer]
+OnCalendar=*-*-* *:30:00
+Persistent=true
+
+[Install]
+WantedBy=timers.target

deploy/systemd/nexarch-archive-objectbackup-check.service.tmpl

@@ -0,0 +1,9 @@
+[Unit]
+Description=NEXARCH Archive - Objekt-Storage-Sicherung Vollstaendigkeitspruefung (BAK-02)
+After=network.target
+
+[Service]
+Type=oneshot
+User=nexarch
+EnvironmentFile=/etc/nexarch/archive-objectbackup.env
+ExecStart=__INSTALL_DIR__/bin/objectbackup-cli check

deploy/systemd/nexarch-archive-objectbackup-check.timer.tmpl

@@ -0,0 +1,9 @@
+[Unit]
+Description=Woechentlicher Zeitplan fuer NEXARCH Archive Objekt-Storage-Vollstaendigkeitspruefung (BAK-02)
+
+[Timer]
+OnCalendar=Sun *-*-* 04:00:00
+Persistent=true
+
+[Install]
+WantedBy=timers.target

deploy/systemd/nexarch-archive-objectbackup-rotate.service.tmpl

@@ -0,0 +1,9 @@
+[Unit]
+Description=NEXARCH Archive - Objekt-Storage-Sicherung Rotation (BAK-02)
+After=network.target
+
+[Service]
+Type=oneshot
+User=nexarch
+EnvironmentFile=/etc/nexarch/archive-objectbackup.env
+ExecStart=__INSTALL_DIR__/bin/objectbackup-cli rotate

deploy/systemd/nexarch-archive-objectbackup-rotate.timer.tmpl

@@ -0,0 +1,9 @@
+[Unit]
+Description=Taeglicher Zeitplan fuer NEXARCH Archive Objekt-Storage-Rotation (BAK-02)
+
+[Timer]
+OnCalendar=*-*-* 03:30:00
+Persistent=true
+
+[Install]
+WantedBy=timers.target

deploy/systemd/nexarch-archive-reconcile.service.tmpl

@@ -0,0 +1,10 @@
+[Unit]
+Description=NEXARCH Archive - Konsistenzpruefung Storage vs. DB (BAK-05)
+After=network.target postgresql.service
+
+[Service]
+Type=oneshot
+User=nexarch
+EnvironmentFile=/etc/nexarch/archive-reconcile.env
+ExecStart=__INSTALL_DIR__/bin/reconcile-cli
+StandardOutput=journal

deploy/systemd/nexarch-archive-reconcile.timer.tmpl

@@ -0,0 +1,9 @@
+[Unit]
+Description=Taeglicher Zeitplan fuer NEXARCH Archive Konsistenzpruefung (BAK-05)
+
+[Timer]
+OnCalendar=*-*-* 05:00:00
+Persistent=true
+
+[Install]
+WantedBy=timers.target

deploy/systemd/nexarch-archive-scrub-metrics.service.tmpl

@@ -0,0 +1,14 @@
+[Unit]
+Description=NEXARCH Archive - /metrics-Export fuer BAK-08 (dauerhaft, Pull-Modell fuer OPS-03)
+After=network.target postgresql.service
+
+[Service]
+Type=simple
+User=nexarch
+EnvironmentFile=/etc/nexarch/archive-scrub-metrics.env
+ExecStart=__INSTALL_DIR__/bin/scrub-metrics
+Restart=on-failure
+StandardOutput=journal
+
+[Install]
+WantedBy=multi-user.target

deploy/systemd/nexarch-archive-scrub.service.tmpl

@@ -0,0 +1,10 @@
+[Unit]
+Description=NEXARCH Archive - Checksummen-Integritaetspruefung Stichprobe (BAK-08)
+After=network.target postgresql.service
+
+[Service]
+Type=oneshot
+User=nexarch
+EnvironmentFile=/etc/nexarch/archive-scrub.env
+ExecStart=__INSTALL_DIR__/bin/scrub-cli
+StandardOutput=journal

deploy/systemd/nexarch-archive-scrub.timer.tmpl

@@ -0,0 +1,9 @@
+[Unit]
+Description=Zeitplan fuer NEXARCH Archive Checksummen-Stichprobe (BAK-08)
+
+[Timer]
+OnCalendar=*-*-* 06:00:00
+Persistent=true
+
+[Install]
+WantedBy=timers.target