fix(publish): prevent stuck publish queue and duplicate posting

The desktop publish queue could stall for a long time and end users assumed
the software was broken. Root cause: a hung adapter held its execution slot
with no wall-clock timeout while auto-renewing its lease forever, so the
server never reclaimed it and every queued task behind it stayed 等待发布.
Auto-recovery also risked silently re-posting a non-idempotent article.

Client (Electron):
- per-task wall-clock deadline + abort; progress-gated lease renewal that
  stops and aborts a stalled task instead of renewing it forever
- decouple the concurrency cap from CDP-induced CPU/memory pressure
  (admission gate instead of self-throttling collapse); 15s watchdog pump
- all adapter network I/O now has fetch timeouts and honors context.signal;
  bounded image-upload concurrency with per-image timeout
- surface live adapter progress, elapsed time, queue position and a
  working-vs-queued distinction in the publish view

Server (tenant-api):
- publish lease-recovery worker (every 3m) + supporting index: reclaim
  expired in_progress publish leases, requeue (<3 attempts) or terminal-fail
- 3-minute lease TTL with client-presence-gated extension; max 3 attempts

Idempotency (production-grade core):
- durable publish_submit_started_at marker, set before the irreversible
  platform submit POST; recovery and abort route a maybe-submitted task to
  unknown (manual reconcile, kept in the dedup set) instead of re-posting
- desktop UI requires explicit confirmation before retrying a possibly-
  already-published task

Verified: go build/vet/test (incl. resolvePublishRecoveryOutcome), vue-tsc,
vitest 141/141, gofmt all clean.

Co-Authored-By: Claude Opus 4.8 (1M context) <noreply@anthropic.com>

server/internal/tenant/repository/queries/desktop_task.sql

@@ -69,6 +69,10 @@ WITH candidate AS (
         sqlc.narg(kind)::text IS NULL
         OR dt.kind = sqlc.narg(kind)::text
       )
+      AND (
+        dt.kind <> 'publish'
+        OR dt.attempts < 3
+      )
       AND (
         dt.kind <> 'publish'
         OR NOT EXISTS (
@@ -89,9 +93,10 @@ WITH candidate AS (
 UPDATE desktop_tasks AS t
 SET active_attempt_id = sqlc.arg(attempt_id),
     lease_token_hash = sqlc.arg(lease_token_hash),
-    lease_expires_at = now() + interval '10 minutes',
+    lease_expires_at = now() + CASE WHEN t.kind = 'publish' THEN interval '3 minutes' ELSE interval '10 minutes' END,
     status = 'in_progress',
     attempts = t.attempts + 1,
+    started_at = COALESCE(t.started_at, now()),
     updated_at = now()
 FROM candidate
 WHERE t.desktop_id = candidate.desktop_id
@@ -101,18 +106,23 @@ RETURNING t.*;
 UPDATE desktop_tasks
 SET active_attempt_id = sqlc.arg(attempt_id),
     lease_token_hash = sqlc.arg(lease_token_hash),
-    lease_expires_at = now() + interval '10 minutes',
+    lease_expires_at = now() + CASE WHEN kind = 'publish' THEN interval '3 minutes' ELSE interval '10 minutes' END,
     status = 'in_progress',
     attempts = attempts + 1,
+    started_at = COALESCE(started_at, now()),
     updated_at = now()
 WHERE desktop_id = sqlc.arg(desktop_id)
   AND target_client_id = sqlc.arg(client_id)
   AND status = 'queued'
+  AND (
+    kind <> 'publish'
+    OR attempts < 3
+  )
 RETURNING *;
 
 -- name: ExtendDesktopTaskLease :one
 UPDATE desktop_tasks
-SET lease_expires_at = now() + interval '10 minutes',
+SET lease_expires_at = now() + CASE WHEN kind = 'publish' THEN interval '3 minutes' ELSE interval '10 minutes' END,
     updated_at = now()
 WHERE desktop_id = sqlc.arg(desktop_id)
   AND lease_token_hash = sqlc.arg(lease_token_hash)
@@ -186,7 +196,7 @@ SET status = CASE
     active_attempt_id = NULL,
     lease_token_hash = NULL,
     lease_expires_at = NULL,
-    attempts = attempts + CASE WHEN sqlc.arg(status)::text = 'retry' THEN 1 ELSE 0 END,
+    attempts = CASE WHEN sqlc.arg(status)::text = 'retry' THEN 0 ELSE attempts END,
     updated_at = now()
 WHERE desktop_id = sqlc.arg(desktop_id)
   AND workspace_id = sqlc.arg(workspace_id)