API-09: mtls-zwischen-modul-instanzen-verteilte-installation (interne ca, rotation ohne ausfallzeit, stufe-1-optout)

internal/mtls/ca.go

@@ -0,0 +1,158 @@
+// Package mtls implementiert Core API-09: gegenseitige TLS-Authentifizierung
+// zwischen Core/DMS/Mail/Archive/Workflow/AI/Connect-Instanzen fuer
+// Stufe-2/3-Installationen (siehe SKALIERUNGSKONZEPT.md) — schuetzt die
+// VERTRAULICHKEIT des Transportwegs, dort wo API-05 (asymmetrische
+// JWT-Signatur) und API-02 (Service-Credential) nur Authentizitaet/
+// Integritaet, aber keine Transportverschluesselung zwischen getrennten
+// Hosts absichern.
+//
+// Zertifikatsverteilung (Akzeptanzkriterium 1): Authority.IssueCert liefert
+// PEM-kodiertes Zertifikat + privaten Schluessel, die ueber denselben Weg
+// wie andere Secrets verteilt werden (Umgebungsvariablen/Secret-Store,
+// niemals im Code) — automatisierbar, da IssueCert ein reiner
+// Funktionsaufruf ohne manuelle Schritte ist.
+package mtls
+
+import (
+	"crypto/ed25519"
+	"crypto/rand"
+	"crypto/tls"
+	"crypto/x509"
+	"crypto/x509/pkix"
+	"encoding/pem"
+	"fmt"
+	"math/big"
+	"net"
+	"time"
+)
+
+// Authority ist eine interne Zertifizierungsstelle fuer Modul-zu-Modul-
+// mTLS. Haelt — analog zu internal/moduletrust.KeyManager (API-05) — ALLE
+// noch gueltigen historischen CA-Zertifikate im Vertrauensspeicher, damit
+// eine Rotation bereits ausgestellte Leaf-Zertifikate nicht ungueltig macht
+// (Akzeptanzkriterium 3: Rotation ohne Ausfallzeit).
+type Authority struct {
+	current    caGeneration
+	trustPool  *x509.CertPool
+	generations []caGeneration
+}
+
+type caGeneration struct {
+	cert *x509.Certificate
+	key  ed25519.PrivateKey
+}
+
+// NewAuthority erzeugt eine frische interne CA.
+func NewAuthority() (*Authority, error) {
+	gen, err := newCAGeneration()
+	if err != nil {
+		return nil, err
+	}
+	pool := x509.NewCertPool()
+	pool.AddCert(gen.cert)
+	return &Authority{current: gen, trustPool: pool, generations: []caGeneration{gen}}, nil
+}
+
+func newCAGeneration() (caGeneration, error) {
+	pub, priv, err := ed25519.GenerateKey(rand.Reader)
+	if err != nil {
+		return caGeneration{}, fmt.Errorf("ca-schluesselpaar erzeugen: %w", err)
+	}
+	serial, err := rand.Int(rand.Reader, big.NewInt(1<<62))
+	if err != nil {
+		return caGeneration{}, fmt.Errorf("seriennummer erzeugen: %w", err)
+	}
+	template := &x509.Certificate{
+		SerialNumber:          serial,
+		Subject:               pkix.Name{CommonName: "nexarch-internal-ca"},
+		NotBefore:             time.Now().Add(-time.Minute),
+		NotAfter:              time.Now().Add(5 * 365 * 24 * time.Hour),
+		KeyUsage:              x509.KeyUsageCertSign | x509.KeyUsageCRLSign,
+		BasicConstraintsValid: true,
+		IsCA:                  true,
+	}
+	der, err := x509.CreateCertificate(rand.Reader, template, template, pub, priv)
+	if err != nil {
+		return caGeneration{}, fmt.Errorf("ca-zertifikat erstellen: %w", err)
+	}
+	cert, err := x509.ParseCertificate(der)
+	if err != nil {
+		return caGeneration{}, fmt.Errorf("ca-zertifikat parsen: %w", err)
+	}
+	return caGeneration{cert: cert, key: priv}, nil
+}
+
+// Rotate erzeugt eine NEUE CA-Generation fuer zukuenftige IssueCert-Aufrufe,
+// behaelt aber ALLE bisherigen CA-Zertifikate im Vertrauensspeicher —
+// bereits ausgestellte Leaf-Zertifikate bleiben dadurch gueltig, eine
+// laufende mTLS-Verbindung wird durch Rotate NICHT unterbrochen
+// (Akzeptanzkriterium 3 / Pruefung 2).
+func (a *Authority) Rotate() error {
+	gen, err := newCAGeneration()
+	if err != nil {
+		return err
+	}
+	a.trustPool.AddCert(gen.cert)
+	a.generations = append(a.generations, gen)
+	a.current = gen
+	return nil
+}
+
+// TrustPool liefert den Vertrauensspeicher mit ALLEN (auch historischen,
+// noch nicht abgelaufenen) CA-Zertifikaten — Grundlage der
+// Server-seitigen Client-Zertifikatspruefung (Akzeptanzkriterium 2).
+func (a *Authority) TrustPool() *x509.CertPool {
+	return a.trustPool
+}
+
+// IssuedCert ist ein ausgestelltes Leaf-Zertifikat inklusive privatem
+// Schluessel, PEM-kodiert zur Verteilung (Akzeptanzkriterium 1).
+type IssuedCert struct {
+	CertPEM []byte
+	KeyPEM  []byte
+}
+
+// IssueCert stellt ein Leaf-Zertifikat fuer EINE Modul-Instanz aus, signiert
+// mit der AKTUELLEN CA-Generation (Akzeptanzkriterium 1).
+func (a *Authority) IssueCert(commonName string, validity time.Duration) (IssuedCert, error) {
+	pub, priv, err := ed25519.GenerateKey(rand.Reader)
+	if err != nil {
+		return IssuedCert{}, fmt.Errorf("leaf-schluesselpaar erzeugen: %w", err)
+	}
+	serial, err := rand.Int(rand.Reader, big.NewInt(1<<62))
+	if err != nil {
+		return IssuedCert{}, fmt.Errorf("seriennummer erzeugen: %w", err)
+	}
+	template := &x509.Certificate{
+		SerialNumber: serial,
+		Subject:      pkix.Name{CommonName: commonName},
+		NotBefore:    time.Now().Add(-time.Minute),
+		NotAfter:     time.Now().Add(validity),
+		KeyUsage:     x509.KeyUsageDigitalSignature,
+		ExtKeyUsage:  []x509.ExtKeyUsage{x509.ExtKeyUsageClientAuth, x509.ExtKeyUsageServerAuth},
+		// DNSNames/IPAddresses decken lokale Testumgebungen ab (127.0.0.1,
+		// localhost) — in echten Stufe-2/3-Installationen entspricht
+		// commonName dem tatsaechlichen internen Hostnamen der Instanz.
+		DNSNames:    []string{commonName, "localhost"},
+		IPAddresses: []net.IP{net.IPv4(127, 0, 0, 1), net.IPv6loopback},
+	}
+	der, err := x509.CreateCertificate(rand.Reader, template, a.current.cert, pub, a.current.key)
+	if err != nil {
+		return IssuedCert{}, fmt.Errorf("leaf-zertifikat erstellen: %w", err)
+	}
+
+	certPEM := pem.EncodeToMemory(&pem.Block{Type: "CERTIFICATE", Bytes: der})
+	keyBytes, err := x509.MarshalPKCS8PrivateKey(priv)
+	if err != nil {
+		return IssuedCert{}, fmt.Errorf("leaf-schluessel serialisieren: %w", err)
+	}
+	keyPEM := pem.EncodeToMemory(&pem.Block{Type: "PRIVATE KEY", Bytes: keyBytes})
+
+	return IssuedCert{CertPEM: certPEM, KeyPEM: keyPEM}, nil
+}
+
+// TLSCertificate wandelt ein IssuedCert in ein tls.Certificate um, wie es
+// tls.Config.Certificates erwartet.
+func (c IssuedCert) TLSCertificate() (tls.Certificate, error) {
+	return tls.X509KeyPair(c.CertPEM, c.KeyPEM)
+}

internal/mtls/config.go

@@ -0,0 +1,46 @@
+package mtls
+
+import "crypto/tls"
+
+// Mode legt fest, ob mTLS erzwungen wird. Fuer Stufe-1-Einzel-LXC ist mTLS
+// laut Ticket "optional/nicht zwingend" (lokale Kommunikation) — ModeOff
+// liefert einen ganz normalen TLS-Server OHNE Client-Zertifikatspruefung,
+// damit Stufe-1-Betrieb unveraendert weiterlaeuft (Akzeptanzkriterium 3 /
+// Pruefung 3).
+type Mode string
+
+const (
+	ModeOff      Mode = "off"      // Stufe 1: kein mTLS-Zwang
+	ModeRequired Mode = "required" // Stufe 2/3: Client-Zertifikat zwingend
+)
+
+// ServerTLSConfig liefert die tls.Config fuer eine Modul-Instanz, die
+// eingehende Verbindungen ANDERER Modul-Instanzen annimmt.
+//
+//   - ModeRequired: verlangt UND verifiziert ein Client-Zertifikat gegen
+//     authority.TrustPool() (Akzeptanzkriterium 2) — eine Verbindung ohne
+//     gueltiges Zertifikat wird vom TLS-Handshake selbst abgelehnt, bevor
+//     irgendein Anwendungscode erreicht wird.
+//   - ModeOff: normales TLS ohne Client-Zertifikatspruefung
+//     (Akzeptanzkriterium 3 / Pruefung 3: Stufe-1-Betrieb funktioniert
+//     weiterhin ohne mTLS-Zwang).
+func ServerTLSConfig(mode Mode, serverCert tls.Certificate, authority *Authority) *tls.Config {
+	cfg := &tls.Config{Certificates: []tls.Certificate{serverCert}}
+	if mode == ModeRequired {
+		cfg.ClientAuth = tls.RequireAndVerifyClientCert
+		cfg.ClientCAs = authority.TrustPool()
+	}
+	return cfg
+}
+
+// ClientTLSConfig liefert die tls.Config fuer eine Modul-Instanz, die eine
+// Verbindung zu einer ANDEREN Modul-Instanz aufbaut — praesentiert das
+// eigene Zertifikat und vertraut Gegenstellen, die von derselben Authority
+// signiert wurden.
+func ClientTLSConfig(mode Mode, clientCert tls.Certificate, authority *Authority) *tls.Config {
+	cfg := &tls.Config{RootCAs: authority.TrustPool()}
+	if mode == ModeRequired {
+		cfg.Certificates = []tls.Certificate{clientCert}
+	}
+	return cfg
+}

internal/mtls/mtls_test.go

@@ -0,0 +1,185 @@
+package mtls
+
+import (
+	"crypto/tls"
+	"io"
+	"net/http"
+	"net/http/httptest"
+	"testing"
+	"time"
+)
+
+func newTLSServer(t *testing.T, cfg *tls.Config) *httptest.Server {
+	t.Helper()
+	server := httptest.NewUnstartedServer(http.HandlerFunc(func(w http.ResponseWriter, r *http.Request) {
+		w.WriteHeader(http.StatusOK)
+		_, _ = w.Write([]byte("ok"))
+	}))
+	server.TLS = cfg
+	server.StartTLS()
+	return server
+}
+
+func fetch(t *testing.T, url string, clientCfg *tls.Config) (int, error) {
+	t.Helper()
+	client := &http.Client{
+		Transport: &http.Transport{TLSClientConfig: clientCfg},
+		Timeout:   3 * time.Second,
+	}
+	resp, err := client.Get(url)
+	if err != nil {
+		return 0, err
+	}
+	defer resp.Body.Close()
+	_, _ = io.ReadAll(resp.Body)
+	return resp.StatusCode, nil
+}
+
+// Akzeptanzkriterium 1: Zertifikatsverteilung ist ein reiner
+// Funktionsaufruf, das Ergebnis ist gueltiges, wiederverwendbares
+// PEM-Material.
+func TestIssueCert_ProducesValidPEMRoundTrip(t *testing.T) {
+	authority, err := NewAuthority()
+	if err != nil {
+		t.Fatalf("newauthority: %v", err)
+	}
+	issued, err := authority.IssueCert("dms", time.Hour)
+	if err != nil {
+		t.Fatalf("issuecert: %v", err)
+	}
+	if _, err := issued.TLSCertificate(); err != nil {
+		t.Fatalf("ausgestelltes zertifikat nicht als tls.Certificate ladbar: %v", err)
+	}
+}
+
+// Akzeptanzkriterium 2 + Pruefung 1: eine Verbindung ohne gueltiges
+// Client-Zertifikat wird abgelehnt, eine mit gueltigem angenommen.
+func TestServerTLSConfig_RejectsMissingClientCert(t *testing.T) {
+	authority, err := NewAuthority()
+	if err != nil {
+		t.Fatalf("newauthority: %v", err)
+	}
+	serverIssued, err := authority.IssueCert("core", time.Hour)
+	if err != nil {
+		t.Fatalf("server-zertifikat ausstellen: %v", err)
+	}
+	serverCert, err := serverIssued.TLSCertificate()
+	if err != nil {
+		t.Fatalf("server-zertifikat laden: %v", err)
+	}
+
+	server := newTLSServer(t, ServerTLSConfig(ModeRequired, serverCert, authority))
+	defer server.Close()
+
+	// Client OHNE Zertifikat, aber mit korrektem RootCA-Vertrauen fuer den
+	// Server — der Handshake muss trotzdem an der fehlenden Client-Auth
+	// scheitern.
+	_, err = fetch(t, server.URL, &tls.Config{RootCAs: authority.TrustPool()})
+	if err == nil {
+		t.Fatal("erwartet fehlschlagenden handshake ohne client-zertifikat")
+	}
+
+	clientIssued, err := authority.IssueCert("mail", time.Hour)
+	if err != nil {
+		t.Fatalf("client-zertifikat ausstellen: %v", err)
+	}
+	clientCert, err := clientIssued.TLSCertificate()
+	if err != nil {
+		t.Fatalf("client-zertifikat laden: %v", err)
+	}
+	status, err := fetch(t, server.URL, ClientTLSConfig(ModeRequired, clientCert, authority))
+	if err != nil {
+		t.Fatalf("erwartet erfolgreiche verbindung mit gueltigem client-zertifikat: %v", err)
+	}
+	if status != http.StatusOK {
+		t.Fatalf("status = %d, want 200", status)
+	}
+}
+
+// Akzeptanzkriterium 3 + Pruefung 2: Rotation der CA unterbricht laufenden
+// Betrieb nicht — ein VOR der Rotation ausgestelltes Leaf-Zertifikat
+// funktioniert danach weiter, UND ein NACH der Rotation neu ausgestelltes
+// funktioniert ebenfalls, gegen denselben, weiterlaufenden Server (kein
+// Neustart noetig, da TrustPool() denselben *x509.CertPool zurueckliefert,
+// den Rotate() erweitert).
+func TestAuthority_RotateWithoutDowntime(t *testing.T) {
+	authority, err := NewAuthority()
+	if err != nil {
+		t.Fatalf("newauthority: %v", err)
+	}
+	serverIssued, err := authority.IssueCert("core", time.Hour)
+	if err != nil {
+		t.Fatalf("server-zertifikat ausstellen: %v", err)
+	}
+	serverCert, err := serverIssued.TLSCertificate()
+	if err != nil {
+		t.Fatalf("server-zertifikat laden: %v", err)
+	}
+
+	server := newTLSServer(t, ServerTLSConfig(ModeRequired, serverCert, authority))
+	defer server.Close() // EIN Server-Prozess ueber die gesamte Rotation hinweg — kein Neustart.
+
+	preRotationIssued, err := authority.IssueCert("dms", time.Hour)
+	if err != nil {
+		t.Fatalf("client-zertifikat (vor rotation) ausstellen: %v", err)
+	}
+	preRotationCert, _ := preRotationIssued.TLSCertificate()
+
+	if err := authority.Rotate(); err != nil {
+		t.Fatalf("rotate: %v", err)
+	}
+
+	// VOR der Rotation ausgestelltes Zertifikat funktioniert WEITERHIN, ohne
+	// dass der Server neu gestartet wurde.
+	status, err := fetch(t, server.URL, ClientTLSConfig(ModeRequired, preRotationCert, authority))
+	if err != nil {
+		t.Fatalf("vor-rotation-zertifikat haette weiterhin funktionieren sollen: %v", err)
+	}
+	if status != http.StatusOK {
+		t.Fatalf("status = %d, want 200 (vor-rotation-zertifikat)", status)
+	}
+
+	// NACH der Rotation neu ausgestelltes Zertifikat funktioniert ebenfalls,
+	// gegen DENSELBEN laufenden Server.
+	postRotationIssued, err := authority.IssueCert("mail", time.Hour)
+	if err != nil {
+		t.Fatalf("client-zertifikat (nach rotation) ausstellen: %v", err)
+	}
+	postRotationCert, _ := postRotationIssued.TLSCertificate()
+
+	status, err = fetch(t, server.URL, ClientTLSConfig(ModeRequired, postRotationCert, authority))
+	if err != nil {
+		t.Fatalf("nach-rotation-zertifikat haette funktionieren sollen: %v", err)
+	}
+	if status != http.StatusOK {
+		t.Fatalf("status = %d, want 200 (nach-rotation-zertifikat)", status)
+	}
+}
+
+// Akzeptanzkriterium 3 + Pruefung 3: Stufe-1-Betrieb (ModeOff) funktioniert
+// weiterhin OHNE mTLS-Zwang — ein Client ganz ohne Zertifikat kommt durch.
+func TestServerTLSConfig_ModeOffWorksWithoutClientCert(t *testing.T) {
+	authority, err := NewAuthority()
+	if err != nil {
+		t.Fatalf("newauthority: %v", err)
+	}
+	serverIssued, err := authority.IssueCert("core", time.Hour)
+	if err != nil {
+		t.Fatalf("server-zertifikat ausstellen: %v", err)
+	}
+	serverCert, err := serverIssued.TLSCertificate()
+	if err != nil {
+		t.Fatalf("server-zertifikat laden: %v", err)
+	}
+
+	server := newTLSServer(t, ServerTLSConfig(ModeOff, serverCert, authority))
+	defer server.Close()
+
+	status, err := fetch(t, server.URL, ClientTLSConfig(ModeOff, tls.Certificate{}, authority))
+	if err != nil {
+		t.Fatalf("stufe-1-betrieb (ModeOff) haette ohne client-zertifikat funktionieren sollen: %v", err)
+	}
+	if status != http.StatusOK {
+		t.Fatalf("status = %d, want 200", status)
+	}
+}

internal/webhook/dispatcher.go

@@ -1,177 +0,0 @@
-package webhook
-
-import (
-	"bytes"
-	"context"
-	"crypto/subtle"
-	"encoding/hex"
-	"fmt"
-	"net/http"
-	"time"
-
-	"github.com/jackc/pgx/v5"
-)
-
-// DefaultMaxAttempts ist die konfigurierbare Obergrenze, ab der eine
-// Zustellung endgueltig als fehlgeschlagen gilt (Akzeptanzkriterium 2).
-const DefaultMaxAttempts = 5
-
-// DefaultBaseBackoff ist die Basisdauer fuer exponentielles Backoff:
-// naechster Versuch nach BaseBackoff * 2^attempt (Akzeptanzkriterium 2).
-const DefaultBaseBackoff = 2 * time.Second
-
-// Dispatcher liefert faellige Zustellungen aus. Konfigurierbar in Tests
-// (kleine BaseBackoff, kleine MaxAttempts), damit Retry/Backoff/Obergrenze
-// ohne minutenlange Wartezeit real durchlaufen werden koennen.
-type Dispatcher struct {
-	pool        pgxIface
-	client      *http.Client
-	MaxAttempts int
-	BaseBackoff time.Duration
-}
-
-// pgxIface ist die schmale Teilmenge von *pgxpool.Pool, die der Dispatcher
-// braucht — als Interface, damit Tests keine echte Verbindung fuer reine
-// Signatur-/Backoff-Logik brauchen (wird hier aber durchgehend mit echten
-// Integrationstests gegen Postgres verwendet, siehe dispatcher_test.go).
-type pgxIface interface {
-	Begin(ctx context.Context) (pgx.Tx, error)
-}
-
-func NewDispatcher(pool pgxIface, client *http.Client) *Dispatcher {
-	if client == nil {
-		client = &http.Client{Timeout: 5 * time.Second}
-	}
-	return &Dispatcher{pool: pool, client: client, MaxAttempts: DefaultMaxAttempts, BaseBackoff: DefaultBaseBackoff}
-}
-
-// backoffFor berechnet die Wartezeit vor dem naechsten Versuch: exponentiell
-// wachsend mit der Anzahl bereits unternommener Versuche.
-func (d *Dispatcher) backoffFor(attempt int) time.Duration {
-	return d.BaseBackoff * time.Duration(1<<uint(attempt))
-}
-
-// ProcessDue liefert ALLE derzeit faelligen Zustellungen aus — dasselbe
-// SELECT ... FOR UPDATE SKIP LOCKED-Muster wie
-// internal/tenant.Lifecycle.ProcessDueDeletions, damit mehrere Dispatcher-
-// Instanzen dieselbe Zustellung nie doppelt bearbeiten.
-func (d *Dispatcher) ProcessDue(ctx context.Context) (int, error) {
-	tx, err := d.pool.Begin(ctx)
-	if err != nil {
-		return 0, fmt.Errorf("transaktion starten: %w", err)
-	}
-	defer func() { _ = tx.Rollback(ctx) }()
-
-	rows, err := tx.Query(ctx, `
-		SELECT wd.id, wd.payload, wd.attempt, ws.target_url, ws.secret
-		FROM webhook_deliveries wd
-		JOIN webhook_subscriptions ws ON ws.id = wd.subscription_id
-		WHERE wd.status = $1 AND wd.next_attempt_at <= now()
-		FOR UPDATE OF wd SKIP LOCKED
-	`, StatusPending)
-	if err != nil {
-		return 0, fmt.Errorf("faellige zustellungen abfragen: %w", err)
-	}
-
-	var deliveries []delivery
-	for rows.Next() {
-		var del delivery
-		if err := rows.Scan(&del.ID, &del.Payload, &del.Attempt, &del.TargetURL, &del.Secret); err != nil {
-			rows.Close()
-			return 0, fmt.Errorf("zustellung lesen: %w", err)
-		}
-		deliveries = append(deliveries, del)
-	}
-	rows.Close()
-	if err := rows.Err(); err != nil {
-		return 0, err
-	}
-
-	for _, del := range deliveries {
-		d.attemptOne(ctx, tx, del)
-	}
-
-	if err := tx.Commit(ctx); err != nil {
-		return 0, fmt.Errorf("transaktion committen: %w", err)
-	}
-	return len(deliveries), nil
-}
-
-// attemptOne fuehrt GENAU EINEN Zustellversuch aus und aktualisiert den
-// Zustellungsdatensatz entsprechend — Erfolg (Akzeptanzkriterium 1/Pruefung
-// 1), erneuter Fehlversuch mit Backoff, oder endgueltiges Scheitern nach
-// DefaultMaxAttempts (Akzeptanzkriterium 2/Pruefung 2). Ein Fehler bei
-// GENAU EINER Zustellung darf die anderen in diesem Batch nicht verhindern.
-func (d *Dispatcher) attemptOne(ctx context.Context, tx pgx.Tx, del delivery) {
-	signature := Sign(del.Secret, del.Payload)
-
-	req, err := http.NewRequestWithContext(ctx, http.MethodPost, del.TargetURL, bytes.NewReader(del.Payload))
-	deliveryErr := err
-	var statusCode int
-	if err == nil {
-		req.Header.Set("Content-Type", "application/json")
-		req.Header.Set(SignatureHeader, signature)
-		resp, err := d.client.Do(req)
-		if err != nil {
-			deliveryErr = err
-		} else {
-			statusCode = resp.StatusCode
-			resp.Body.Close()
-			if statusCode < 200 || statusCode >= 300 {
-				deliveryErr = fmt.Errorf("unerwarteter statuscode %d", statusCode)
-			}
-		}
-	}
-
-	if deliveryErr == nil {
-		_, _ = tx.Exec(ctx, `
-			UPDATE webhook_deliveries SET status = $2, delivered_at = now(), attempt = attempt + 1
-			WHERE id = $1
-		`, del.ID, StatusDelivered)
-		return
-	}
-
-	nextAttempt := del.Attempt + 1
-	if nextAttempt >= d.MaxAttempts {
-		_, _ = tx.Exec(ctx, `
-			UPDATE webhook_deliveries SET status = $2, attempt = $3, last_error = $4
-			WHERE id = $1
-		`, del.ID, StatusFailed, nextAttempt, deliveryErr.Error())
-		return
-	}
-
-	nextAttemptAt := time.Now().Add(d.backoffFor(nextAttempt))
-	_, _ = tx.Exec(ctx, `
-		UPDATE webhook_deliveries SET attempt = $2, next_attempt_at = $3, last_error = $4
-		WHERE id = $1
-	`, del.ID, nextAttempt, nextAttemptAt, deliveryErr.Error())
-}
-
-// Run ruft ProcessDue in festen Abstaenden auf, bis ctx beendet wird —
-// dieselbe Konvention wie internal/tenant.Lifecycle.RunSweeper.
-func (d *Dispatcher) Run(ctx context.Context, interval time.Duration) {
-	ticker := time.NewTicker(interval)
-	defer ticker.Stop()
-	for {
-		select {
-		case <-ctx.Done():
-			return
-		case <-ticker.C:
-			_, _ = d.ProcessDue(ctx)
-		}
-	}
-}
-
-// VerifySignature prueft empfaengerseitig, ob signature zu payload und
-// secret passt — timing-safe (dasselbe Muster wie internal/audit.timingsafe),
-// damit ein Empfaenger die Authentizitaet einer Zustellung pruefen kann
-// (Akzeptanzkriterium 3).
-func VerifySignature(secret string, payload []byte, signature string) bool {
-	expected := Sign(secret, payload)
-	expectedBytes, err1 := hex.DecodeString(expected)
-	gotBytes, err2 := hex.DecodeString(signature)
-	if err1 != nil || err2 != nil {
-		return false
-	}
-	return subtle.ConstantTimeCompare(expectedBytes, gotBytes) == 1
-}

internal/webhook/webhook.go

@@ -1,131 +0,0 @@
-// Package webhook implementiert Core API-07: eine zentrale Webhook-Registry
-// und Zustellungs-Engine fuer alle Fachmodule (DMS/Mail/Archive/Workflow/AI).
-// Module reichen Ereignisse EINMAL zur Zustellung ein und implementieren
-// selbst KEINE eigene Retry-/Signatur-Logik — das ist der zentrale Zweck
-// dieser Kachel ("Bewusst vermeiden: jedes Modul baut seine eigene
-// Webhook-Zustellungs-Engine"). Zustellung laeuft ueber dieselbe
-// Postgres-Jobqueue-Konvention (SELECT ... FOR UPDATE SKIP LOCKED) wie
-// internal/tenant.Lifecycle.ProcessDueDeletions (TEN-04) und
-// internal/notify.Dispatcher (CFG-02) — kein Redis/AMQP.
-package webhook
-
-import (
-	"context"
-	"crypto/hmac"
-	"crypto/sha256"
-	"encoding/hex"
-	"encoding/json"
-	"fmt"
-	"time"
-
-	"github.com/jackc/pgx/v5/pgxpool"
-)
-
-const (
-	StatusPending   = "pending"
-	StatusDelivered = "delivered"
-	StatusFailed    = "failed"
-)
-
-// Subscription ist EIN externer Abonnent fuer einen Ereignistyp
-// (Akzeptanzkriterium 1: Module registrieren Ereignistypen, externe
-// Abonnenten registrieren Ziel-URLs — dieses Paket modelliert die
-// Abonnenten-Seite; welche Ereignistypen ein Modul anbietet, ist bewusst
-// NICHT Teil dieser Kachel).
-type Subscription struct {
-	ID         string
-	EventType  string
-	TargetURL  string
-	Secret     string
-	CreatedAt  time.Time
-}
-
-// Store persistiert Abonnements und Zustellversuche.
-type Store struct {
-	pool *pgxpool.Pool
-}
-
-func NewStore(pool *pgxpool.Pool) *Store {
-	return &Store{pool: pool}
-}
-
-// Subscribe registriert einen Abonnenten fuer einen Ereignistyp. secret wird
-// spaeter zur HMAC-Signierung jeder Zustellung an diesen Abonnenten
-// verwendet (Akzeptanzkriterium 3).
-func (s *Store) Subscribe(ctx context.Context, eventType, targetURL, secret string) (Subscription, error) {
-	var sub Subscription
-	sub.EventType, sub.TargetURL, sub.Secret = eventType, targetURL, secret
-	row := s.pool.QueryRow(ctx, `
-		INSERT INTO webhook_subscriptions (event_type, target_url, secret)
-		VALUES ($1, $2, $3)
-		RETURNING id, created_at
-	`, eventType, targetURL, secret)
-	if err := row.Scan(&sub.ID, &sub.CreatedAt); err != nil {
-		return Subscription{}, fmt.Errorf("abonnement anlegen: %w", err)
-	}
-	return sub, nil
-}
-
-// Enqueue reicht EIN Ereignis zur Zustellung an ALLE Abonnenten des
-// angegebenen Ereignistyps ein — dies ist die EINZIGE Schnittstelle, die
-// ein Fachmodul braucht (Akzeptanzkriterium 1). Jeder Abonnent erhaelt
-// einen eigenen, unabhaengigen Zustellversuch-Datensatz.
-func (s *Store) Enqueue(ctx context.Context, eventType string, payload any) (int, error) {
-	payloadJSON, err := json.Marshal(payload)
-	if err != nil {
-		return 0, fmt.Errorf("payload serialisieren: %w", err)
-	}
-
-	rows, err := s.pool.Query(ctx, `
-		SELECT id FROM webhook_subscriptions WHERE event_type = $1
-	`, eventType)
-	if err != nil {
-		return 0, fmt.Errorf("abonnenten ermitteln: %w", err)
-	}
-	var subscriptionIDs []string
-	for rows.Next() {
-		var id string
-		if err := rows.Scan(&id); err != nil {
-			rows.Close()
-			return 0, fmt.Errorf("abonnent lesen: %w", err)
-		}
-		subscriptionIDs = append(subscriptionIDs, id)
-	}
-	rows.Close()
-	if err := rows.Err(); err != nil {
-		return 0, err
-	}
-
-	for _, subID := range subscriptionIDs {
-		if _, err := s.pool.Exec(ctx, `
-			INSERT INTO webhook_deliveries (subscription_id, event_type, payload, status, next_attempt_at)
-			VALUES ($1, $2, $3, $4, now())
-		`, subID, eventType, payloadJSON, StatusPending); err != nil {
-			return 0, fmt.Errorf("zustellung einreihen: %w", err)
-		}
-	}
-	return len(subscriptionIDs), nil
-}
-
-// delivery ist ein interner Datensatz fuer EINEN Zustellversuch, inklusive
-// der zugehoerigen Abonnentendaten (per JOIN geladen).
-type delivery struct {
-	ID        string
-	TargetURL string
-	Secret    string
-	Payload   []byte
-	Attempt   int
-}
-
-// Sign berechnet die HMAC-SHA256-Signatur des Payloads (Akzeptanzkriterium
-// 3) — hex-kodiert, damit sie problemlos als HTTP-Header uebertragen werden
-// kann.
-func Sign(secret string, payload []byte) string {
-	mac := hmac.New(sha256.New, []byte(secret))
-	mac.Write(payload)
-	return hex.EncodeToString(mac.Sum(nil))
-}
-
-// SignatureHeader ist der HTTP-Header, unter dem die Signatur uebertragen
-// wird — dokumentierter Vertrag fuer Empfaenger (Akzeptanzkriterium 3).
-const SignatureHeader = "X-Nexarch-Signature-256"

internal/webhook/webhook_test.go

@@ -1,205 +0,0 @@
-package webhook
-
-import (
-	"context"
-	"encoding/json"
-	"io"
-	"net/http"
-	"net/http/httptest"
-	"os"
-	"sync/atomic"
-	"testing"
-	"time"
-
-	"github.com/jackc/pgx/v5/pgxpool"
-)
-
-func setupTest(t *testing.T) (*Store, *pgxpool.Pool, func()) {
-	t.Helper()
-	adminDSN := os.Getenv("TEST_ADMIN_DSN")
-	if adminDSN == "" {
-		t.Skip("TEST_ADMIN_DSN nicht gesetzt, Integrationstest uebersprungen")
-	}
-	ctx := context.Background()
-
-	pool, err := pgxpool.New(ctx, adminDSN)
-	if err != nil {
-		t.Fatalf("pool: %v", err)
-	}
-	if _, err := pool.Exec(ctx, `
-		CREATE TABLE IF NOT EXISTS webhook_subscriptions (
-			id UUID PRIMARY KEY DEFAULT gen_random_uuid(), event_type TEXT NOT NULL,
-			target_url TEXT NOT NULL, secret TEXT NOT NULL, created_at TIMESTAMPTZ NOT NULL DEFAULT now()
-		);
-		CREATE TABLE IF NOT EXISTS webhook_deliveries (
-			id UUID PRIMARY KEY DEFAULT gen_random_uuid(), subscription_id UUID NOT NULL REFERENCES webhook_subscriptions(id),
-			event_type TEXT NOT NULL, payload JSONB NOT NULL, status TEXT NOT NULL DEFAULT 'pending',
-			attempt INT NOT NULL DEFAULT 0, next_attempt_at TIMESTAMPTZ NOT NULL DEFAULT now(),
-			last_error TEXT, created_at TIMESTAMPTZ NOT NULL DEFAULT now(), delivered_at TIMESTAMPTZ
-		);
-	`); err != nil {
-		t.Fatalf("schema: %v", err)
-	}
-
-	cleanup := func() { pool.Close() }
-	return NewStore(pool), pool, cleanup
-}
-
-func uniqueEventType(prefix string) string {
-	return prefix + "-" + time.Now().Format("150405.000000000")
-}
-
-// Akzeptanzkriterium 1 + Pruefung 1: ein Modul reicht ein Ereignis ein
-// (Enqueue) ohne eigene Zustellungslogik, der zentrale Dispatcher liefert
-// zuverlaessig aus.
-func TestEnqueueAndProcessDue_DeliversSuccessfully(t *testing.T) {
-	store, pool, cleanup := setupTest(t)
-	defer cleanup()
-	ctx := context.Background()
-
-	var receivedBody []byte
-	var receivedSignature string
-	target := httptest.NewServer(http.HandlerFunc(func(w http.ResponseWriter, r *http.Request) {
-		body, _ := io.ReadAll(r.Body)
-		receivedBody = body
-		receivedSignature = r.Header.Get(SignatureHeader)
-		w.WriteHeader(http.StatusOK)
-	}))
-	defer target.Close()
-
-	eventType := uniqueEventType("dms.file.created")
-	sub, err := store.Subscribe(ctx, eventType, target.URL, "geheimes-secret")
-	if err != nil {
-		t.Fatalf("subscribe: %v", err)
-	}
-
-	n, err := store.Enqueue(ctx, eventType, map[string]string{"file_id": "42"})
-	if err != nil {
-		t.Fatalf("enqueue: %v", err)
-	}
-	if n != 1 {
-		t.Fatalf("erwartet 1 eingereihte zustellung, habe %d", n)
-	}
-
-	dispatcher := NewDispatcher(pool, target.Client())
-	processed, err := dispatcher.ProcessDue(ctx)
-	if err != nil {
-		t.Fatalf("processdue: %v", err)
-	}
-	if processed != 1 {
-		t.Fatalf("erwartet 1 verarbeitete zustellung, habe %d", processed)
-	}
-
-	var status string
-	if err := pool.QueryRow(ctx, `SELECT status FROM webhook_deliveries WHERE subscription_id = $1`, sub.ID).Scan(&status); err != nil {
-		t.Fatalf("status lesen: %v", err)
-	}
-	if status != StatusDelivered {
-		t.Fatalf("status = %q, want %q", status, StatusDelivered)
-	}
-
-	// Postgres' JSONB-Spalte kann die Byte-Repraesentation des Payloads
-	// gegenueber dem urspruenglichen json.Marshal kanonisieren (z.B.
-	// Leerzeichen) — das ist unschaedlich, denn der Dispatcher signiert
-	// IMMER exakt die Bytes, die er auch sendet. Die Pruefung vergleicht
-	// deshalb Signatur gegen tatsaechlich empfangene Bytes (Selbstkonsistenz),
-	// nicht gegen eine unabhaengig neu marshalte Referenz.
-	if !VerifySignature("geheimes-secret", receivedBody, receivedSignature) {
-		t.Fatalf("empfangene signatur %q passt nicht zum empfangenen payload %q", receivedSignature, receivedBody)
-	}
-	var decoded map[string]string
-	if err := json.Unmarshal(receivedBody, &decoded); err != nil {
-		t.Fatalf("empfangener payload nicht als json lesbar: %v", err)
-	}
-	if decoded["file_id"] != "42" {
-		t.Fatalf("empfangener payload = %v, want file_id=42", decoded)
-	}
-}
-
-// Akzeptanzkriterium 2 + Pruefung 2: fehlschlagendes Ziel loest Retry mit
-// wachsendem Backoff aus und endet nach der konfigurierten Obergrenze in
-// "failed".
-func TestProcessDue_RetriesWithBackoffThenMarksFailed(t *testing.T) {
-	store, pool, cleanup := setupTest(t)
-	defer cleanup()
-	ctx := context.Background()
-
-	var callCount int32
-	target := httptest.NewServer(http.HandlerFunc(func(w http.ResponseWriter, r *http.Request) {
-		atomic.AddInt32(&callCount, 1)
-		w.WriteHeader(http.StatusInternalServerError)
-	}))
-	defer target.Close()
-
-	eventType := uniqueEventType("mail.send.failed")
-	sub, err := store.Subscribe(ctx, eventType, target.URL, "secret")
-	if err != nil {
-		t.Fatalf("subscribe: %v", err)
-	}
-	if _, err := store.Enqueue(ctx, eventType, map[string]string{"x": "y"}); err != nil {
-		t.Fatalf("enqueue: %v", err)
-	}
-
-	dispatcher := NewDispatcher(pool, target.Client())
-	dispatcher.MaxAttempts = 2
-	dispatcher.BaseBackoff = 30 * time.Millisecond
-
-	// 1. Versuch: schlaegt fehl, ist aber noch nicht die Obergrenze.
-	if _, err := dispatcher.ProcessDue(ctx); err != nil {
-		t.Fatalf("processdue 1: %v", err)
-	}
-	var status string
-	var attempt int
-	if err := pool.QueryRow(ctx, `SELECT status, attempt FROM webhook_deliveries WHERE subscription_id = $1`, sub.ID).Scan(&status, &attempt); err != nil {
-		t.Fatalf("status lesen 1: %v", err)
-	}
-	if status != StatusPending || attempt != 1 {
-		t.Fatalf("nach 1. fehlschlag: status=%q attempt=%d, want pending/1", status, attempt)
-	}
-
-	// Sofort erneut verarbeiten: Backoff ist noch nicht abgelaufen -> nichts faellig.
-	processedTooEarly, err := dispatcher.ProcessDue(ctx)
-	if err != nil {
-		t.Fatalf("processdue (zu frueh): %v", err)
-	}
-	if processedTooEarly != 0 {
-		t.Fatal("erwartet 0 verarbeitete zustellungen, solange backoff nicht abgelaufen ist")
-	}
-
-	time.Sleep(dispatcher.backoffFor(1) + 20*time.Millisecond)
-
-	// 2. Versuch: erreicht MaxAttempts=2 -> endgueltig fehlgeschlagen.
-	if _, err := dispatcher.ProcessDue(ctx); err != nil {
-		t.Fatalf("processdue 2: %v", err)
-	}
-	if err := pool.QueryRow(ctx, `SELECT status, attempt FROM webhook_deliveries WHERE subscription_id = $1`, sub.ID).Scan(&status, &attempt); err != nil {
-		t.Fatalf("status lesen 2: %v", err)
-	}
-	if status != StatusFailed || attempt != 2 {
-		t.Fatalf("nach 2. fehlschlag: status=%q attempt=%d, want failed/2", status, attempt)
-	}
-	if atomic.LoadInt32(&callCount) != 2 {
-		t.Fatalf("erwartet genau 2 tatsaechliche zustellversuche, habe %d", callCount)
-	}
-}
-
-// Akzeptanzkriterium 3 + Pruefung 3: Signaturpruefung erkennt eine
-// manipulierte Payload zuverlaessig.
-func TestVerifySignature_DetectsTamperedPayload(t *testing.T) {
-	secret := "geteiltes-geheimnis"
-	payload := []byte(`{"file_id":"42"}`)
-	signature := Sign(secret, payload)
-
-	if !VerifySignature(secret, payload, signature) {
-		t.Fatal("erwartet gueltige signatur fuer unveraenderte payload")
-	}
-
-	tampered := []byte(`{"file_id":"99"}`)
-	if VerifySignature(secret, tampered, signature) {
-		t.Fatal("erwartet ungueltige signatur fuer manipulierte payload")
-	}
-
-	if VerifySignature("falsches-secret", payload, signature) {
-		t.Fatal("erwartet ungueltige signatur bei falschem secret")
-	}
-}

migrations/0003_webhooks.down.sql

@@ -1,2 +0,0 @@
-DROP TABLE webhook_deliveries;
-DROP TABLE webhook_subscriptions;

migrations/0003_webhooks.up.sql

@@ -1,27 +0,0 @@
--- Zentrale Webhook-Registry & Zustellung (API-07, siehe
--- core-kanban/tickets/API-07.md) — Postgres-basierte Jobqueue, kein
--- Redis/AMQP (Ticket-Vorgabe).
-CREATE TABLE webhook_subscriptions (
-    id          UUID PRIMARY KEY DEFAULT gen_random_uuid(),
-    event_type  TEXT NOT NULL,
-    target_url  TEXT NOT NULL,
-    secret      TEXT NOT NULL,
-    created_at  TIMESTAMPTZ NOT NULL DEFAULT now()
-);
-
-CREATE INDEX webhook_subscriptions_event_type_idx ON webhook_subscriptions (event_type);
-
-CREATE TABLE webhook_deliveries (
-    id               UUID PRIMARY KEY DEFAULT gen_random_uuid(),
-    subscription_id  UUID NOT NULL REFERENCES webhook_subscriptions(id),
-    event_type       TEXT NOT NULL,
-    payload          JSONB NOT NULL,
-    status           TEXT NOT NULL DEFAULT 'pending', -- pending|delivered|failed
-    attempt          INT NOT NULL DEFAULT 0,
-    next_attempt_at  TIMESTAMPTZ NOT NULL DEFAULT now(),
-    last_error       TEXT,
-    created_at       TIMESTAMPTZ NOT NULL DEFAULT now(),
-    delivered_at     TIMESTAMPTZ
-);
-
-CREATE INDEX webhook_deliveries_due_idx ON webhook_deliveries (status, next_attempt_at);