@amalgm/channels 0.1.0

package/supabase/migrations/20260829000000_create_channels.sql

@@ -0,0 +1,222 @@
+CREATE EXTENSION IF NOT EXISTS pgcrypto;
+
+CREATE TABLE IF NOT EXISTS amalgm_channel_deliveries (
+  id uuid PRIMARY KEY DEFAULT gen_random_uuid(),
+  user_id uuid NOT NULL,
+  channel text NOT NULL CHECK (channel = 'email'),
+  title text,
+  message text NOT NULL CHECK (length(message) BETWEEN 1 AND 4000),
+  idempotency_key text NOT NULL CHECK (length(idempotency_key) BETWEEN 1 AND 200),
+  status text NOT NULL DEFAULT 'pending'
+    CHECK (status IN ('pending', 'sending', 'delivered', 'failed')),
+  attempts integer NOT NULL DEFAULT 0 CHECK (attempts BETWEEN 0 AND 5),
+  lease_token uuid,
+  lease_expires_at timestamptz,
+  provider_id text,
+  error text,
+  created_at timestamptz NOT NULL DEFAULT now(),
+  updated_at timestamptz NOT NULL DEFAULT now(),
+  delivered_at timestamptz,
+  UNIQUE (user_id, idempotency_key),
+  CHECK (
+    (status = 'sending' AND lease_token IS NOT NULL AND lease_expires_at IS NOT NULL)
+    OR (status <> 'sending' AND lease_token IS NULL AND lease_expires_at IS NULL)
+  )
+);
+
+CREATE INDEX IF NOT EXISTS amalgm_channel_deliveries_history
+  ON amalgm_channel_deliveries(user_id, created_at DESC, id DESC);
+CREATE INDEX IF NOT EXISTS amalgm_channel_deliveries_work
+  ON amalgm_channel_deliveries(status, lease_expires_at, created_at, id)
+  WHERE status IN ('pending', 'sending');
+
+ALTER TABLE amalgm_channel_deliveries ENABLE ROW LEVEL SECURITY;
+REVOKE ALL ON amalgm_channel_deliveries FROM anon, authenticated;
+GRANT SELECT, INSERT, UPDATE ON amalgm_channel_deliveries TO service_role;
+
+CREATE OR REPLACE FUNCTION amalgm_channel_delivery_json(p_row amalgm_channel_deliveries)
+RETURNS jsonb
+LANGUAGE sql
+IMMUTABLE
+SET search_path = public
+AS $$
+  SELECT jsonb_strip_nulls(jsonb_build_object(
+    'id', p_row.id,
+    'channel', p_row.channel,
+    'title', p_row.title,
+    'message', p_row.message,
+    'idempotency_key', p_row.idempotency_key,
+    'status', p_row.status,
+    'attempts', p_row.attempts,
+    'created_at', p_row.created_at,
+    'updated_at', p_row.updated_at,
+    'delivered_at', p_row.delivered_at,
+    'provider_id', p_row.provider_id,
+    'error', p_row.error
+  ));
+$$;
+
+CREATE OR REPLACE FUNCTION enqueue_amalgm_channel_delivery(
+  p_user_id uuid,
+  p_delivery jsonb
+) RETURNS jsonb
+LANGUAGE plpgsql
+SECURITY DEFINER
+SET search_path = public
+AS $$
+DECLARE
+  v_row public.amalgm_channel_deliveries;
+  v_channel text := CASE WHEN p_delivery->>'channel' = 'auto' THEN 'email'
+    ELSE p_delivery->>'channel' END;
+BEGIN
+  INSERT INTO public.amalgm_channel_deliveries (
+    user_id, channel, title, message, idempotency_key
+  ) VALUES (
+    p_user_id,
+    v_channel,
+    NULLIF(p_delivery->>'title', ''),
+    p_delivery->>'message',
+    p_delivery->>'idempotencyKey'
+  )
+  ON CONFLICT (user_id, idempotency_key) DO NOTHING
+  RETURNING * INTO v_row;
+
+  IF NOT FOUND THEN
+    SELECT * INTO v_row
+    FROM public.amalgm_channel_deliveries
+    WHERE user_id = p_user_id
+      AND idempotency_key = p_delivery->>'idempotencyKey';
+    IF v_row.channel <> v_channel
+      OR v_row.title IS DISTINCT FROM NULLIF(p_delivery->>'title', '')
+      OR v_row.message <> p_delivery->>'message'
+    THEN
+      RAISE EXCEPTION 'idempotency key already names another delivery'
+        USING ERRCODE = '23505';
+    END IF;
+  END IF;
+  RETURN public.amalgm_channel_delivery_json(v_row);
+END;
+$$;
+
+CREATE OR REPLACE FUNCTION list_amalgm_channel_deliveries(
+  p_user_id uuid,
+  p_status text,
+  p_limit integer,
+  p_offset integer
+) RETURNS jsonb
+LANGUAGE sql
+SECURITY DEFINER
+SET search_path = public
+AS $$
+  WITH filtered AS (
+    SELECT * FROM public.amalgm_channel_deliveries
+    WHERE user_id = p_user_id AND (p_status IS NULL OR status = p_status)
+  ), page_rows AS (
+    SELECT * FROM filtered
+    ORDER BY created_at DESC, id DESC
+    LIMIT p_limit OFFSET p_offset
+  )
+  SELECT jsonb_build_object(
+    'items', COALESCE(
+      (SELECT jsonb_agg(public.amalgm_channel_delivery_json(page_rows)) FROM page_rows),
+      '[]'::jsonb
+    ),
+    'total', (SELECT count(*) FROM filtered)
+  );
+$$;
+
+CREATE OR REPLACE FUNCTION get_amalgm_channel_delivery(p_user_id uuid, p_delivery_id uuid)
+RETURNS jsonb
+LANGUAGE sql
+SECURITY DEFINER
+SET search_path = public
+AS $$
+  SELECT public.amalgm_channel_delivery_json(d)
+  FROM public.amalgm_channel_deliveries d
+  WHERE d.user_id = p_user_id AND d.id = p_delivery_id;
+$$;
+
+CREATE OR REPLACE FUNCTION claim_amalgm_channel_deliveries(
+  p_limit integer,
+  p_lease_seconds integer
+) RETURNS SETOF amalgm_channel_deliveries
+LANGUAGE sql
+SECURITY DEFINER
+SET search_path = public
+AS $$
+  WITH candidates AS (
+    SELECT id
+    FROM public.amalgm_channel_deliveries
+    WHERE attempts < 5
+      AND (
+        status = 'pending'
+        OR (status = 'sending' AND lease_expires_at <= now())
+      )
+    ORDER BY created_at, id
+    FOR UPDATE SKIP LOCKED
+    LIMIT LEAST(GREATEST(p_limit, 1), 100)
+  )
+  UPDATE public.amalgm_channel_deliveries d SET
+    status = 'sending',
+    attempts = attempts + 1,
+    lease_token = gen_random_uuid(),
+    lease_expires_at = now() + make_interval(secs => LEAST(GREATEST(p_lease_seconds, 10), 600)),
+    updated_at = now()
+  FROM candidates
+  WHERE d.id = candidates.id
+  RETURNING d.*;
+$$;
+
+CREATE OR REPLACE FUNCTION complete_amalgm_channel_delivery(
+  p_delivery_id uuid,
+  p_lease_token uuid,
+  p_provider_id text,
+  p_now timestamptz
+) RETURNS boolean
+LANGUAGE plpgsql
+SECURITY DEFINER
+SET search_path = public
+AS $$
+BEGIN
+  UPDATE public.amalgm_channel_deliveries SET
+    status = 'delivered', provider_id = p_provider_id, delivered_at = p_now,
+    error = NULL, lease_token = NULL, lease_expires_at = NULL, updated_at = p_now
+  WHERE id = p_delivery_id AND status = 'sending' AND lease_token = p_lease_token;
+  RETURN FOUND;
+END;
+$$;
+
+CREATE OR REPLACE FUNCTION fail_amalgm_channel_delivery(
+  p_delivery_id uuid,
+  p_lease_token uuid,
+  p_error text,
+  p_now timestamptz
+) RETURNS boolean
+LANGUAGE plpgsql
+SECURITY DEFINER
+SET search_path = public
+AS $$
+BEGIN
+  UPDATE public.amalgm_channel_deliveries SET
+    status = CASE WHEN attempts >= 5 THEN 'failed' ELSE 'pending' END,
+    error = left(p_error, 500), lease_token = NULL, lease_expires_at = NULL,
+    updated_at = p_now
+  WHERE id = p_delivery_id AND status = 'sending' AND lease_token = p_lease_token;
+  RETURN FOUND;
+END;
+$$;
+
+REVOKE ALL ON FUNCTION amalgm_channel_delivery_json(amalgm_channel_deliveries) FROM PUBLIC;
+REVOKE ALL ON FUNCTION enqueue_amalgm_channel_delivery(uuid, jsonb) FROM PUBLIC;
+REVOKE ALL ON FUNCTION list_amalgm_channel_deliveries(uuid, text, integer, integer) FROM PUBLIC;
+REVOKE ALL ON FUNCTION get_amalgm_channel_delivery(uuid, uuid) FROM PUBLIC;
+REVOKE ALL ON FUNCTION claim_amalgm_channel_deliveries(integer, integer) FROM PUBLIC;
+REVOKE ALL ON FUNCTION complete_amalgm_channel_delivery(uuid, uuid, text, timestamptz) FROM PUBLIC;
+REVOKE ALL ON FUNCTION fail_amalgm_channel_delivery(uuid, uuid, text, timestamptz) FROM PUBLIC;
+
+GRANT EXECUTE ON FUNCTION enqueue_amalgm_channel_delivery(uuid, jsonb) TO service_role;
+GRANT EXECUTE ON FUNCTION list_amalgm_channel_deliveries(uuid, text, integer, integer) TO service_role;
+GRANT EXECUTE ON FUNCTION get_amalgm_channel_delivery(uuid, uuid) TO service_role;
+GRANT EXECUTE ON FUNCTION claim_amalgm_channel_deliveries(integer, integer) TO service_role;
+GRANT EXECUTE ON FUNCTION complete_amalgm_channel_delivery(uuid, uuid, text, timestamptz) TO service_role;
+GRANT EXECUTE ON FUNCTION fail_amalgm_channel_delivery(uuid, uuid, text, timestamptz) TO service_role;