Replace env free-variable threading with IO-primitive auto-fetch macros

Layout components now self-resolve context (cart-mini, auth-menu, nav-tree,
rights, URLs) via new IO primitives (root-header-ctx, select-colours,
account-nav-ctx, app-rights) and defmacro wrappers (~root-header-auto,
~auth-header-row-auto, ~root-mobile-auto). This eliminates _ctx_to_env(),
HELPER_CSS_CLASSES, and verbose :key threading across all 10 services.

Co-Authored-By: Claude Opus 4.6 <noreply@anthropic.com>

shared/sx/templates/auth.sx

@@ -30,6 +30,27 @@
     :link-label "account" :icon "fa-solid fa-user"
     :child-id "auth-header-child" :oob oob))
 
+;; Auto-fetching auth header — uses IO primitives, no free variables needed.
+;; Expands inline (defmacro) so IO calls resolve in _aser mode.
+(defmacro ~auth-header-row-auto (oob)
+  (quasiquote
+    (~auth-header-row :account-url (app-url "account" "")
+                       :select-colours (select-colours)
+                       :account-nav (account-nav-ctx)
+                       :oob (unquote oob))))
+
+(defmacro ~auth-header-row-simple-auto (oob)
+  (quasiquote
+    (~auth-header-row-simple :account-url (app-url "account" "")
+                              :oob (unquote oob))))
+
+;; Auto-fetching auth nav items — for mobile menus
+(defmacro ~auth-nav-items-auto ()
+  (quasiquote
+    (~auth-nav-items :account-url (app-url "account" "")
+                      :select-colours (select-colours)
+                      :account-nav (account-nav-ctx))))
+
 ;; Orders header row
 (defcomp ~orders-header-row (&key list-url)
   (~menu-row-sx :id "orders-row" :level 2 :colour "sky"

shared/sx/templates/layout.sx

@@ -162,24 +162,46 @@
 (defcomp ~root-mobile (&key nav-tree auth-menu)
   (~mobile-root-nav :nav-tree nav-tree :auth-menu auth-menu))
 
+;; ---------------------------------------------------------------------------
+;; Auto-fetching header/mobile macros — use IO primitives to self-populate.
+;; These expand inline so IO calls resolve in _aser mode within layout bodies.
+;; Replaces the 10-parameter ~root-header boilerplate in layout defcomps.
+;; ---------------------------------------------------------------------------
+
+(defmacro ~root-header-auto (oob)
+  (quasiquote
+    (let ((__rhctx (root-header-ctx)))
+      (~header-row-sx :cart-mini (get __rhctx "cart-mini")
+                       :blog-url (get __rhctx "blog-url")
+                       :site-title (get __rhctx "site-title")
+                       :app-label (get __rhctx "app-label")
+                       :nav-tree (get __rhctx "nav-tree")
+                       :auth-menu (get __rhctx "auth-menu")
+                       :nav-panel (get __rhctx "nav-panel")
+                       :settings-url (get __rhctx "settings-url")
+                       :is-admin (get __rhctx "is-admin")
+                       :oob (unquote oob)))))
+
+(defmacro ~root-mobile-auto ()
+  (quasiquote
+    (let ((__rhctx (root-header-ctx)))
+      (~mobile-root-nav :nav-tree (get __rhctx "nav-tree")
+                         :auth-menu (get __rhctx "auth-menu")))))
+
 ;; ---------------------------------------------------------------------------
 ;; Built-in layout defcomps — used by register_sx_layout("root", ...)
-;; Free variables (cart-mini, blog-url, etc.) come from _ctx_to_env().
+;; These use ~root-header-auto / ~root-mobile-auto macros (IO primitives).
 ;; ---------------------------------------------------------------------------
 
 (defcomp ~layout-root-full ()
-  (~root-header :cart-mini cart-mini :blog-url blog-url :site-title site-title
-                 :app-label app-label :nav-tree nav-tree :auth-menu auth-menu
-                 :nav-panel nav-panel :settings-url settings-url :is-admin is-admin))
+  (~root-header-auto))
 
 (defcomp ~layout-root-oob ()
   (~oob-header-sx :parent-id "root-header-child"
-    :row (~root-header :cart-mini cart-mini :blog-url blog-url :site-title site-title
-                        :app-label app-label :nav-tree nav-tree :auth-menu auth-menu
-                        :nav-panel nav-panel :settings-url settings-url :is-admin is-admin)))
+    :row (~root-header-auto true)))
 
 (defcomp ~layout-root-mobile ()
-  (~root-mobile :nav-tree nav-tree :auth-menu auth-menu))
+  (~root-mobile-auto))
 
 (defcomp ~error-content (&key errnum message image)
   (div :class "text-center p-8 max-w-lg mx-auto"
@@ -189,6 +211,33 @@
       (div :class "flex justify-center"
         (img :src image :width "300" :height "300")))))
 
+(defcomp ~clear-oob-div (&key id)
+  (div :id id :sx-swap-oob "outerHTML"))
+
+;; ---------------------------------------------------------------------------
+;; Shared nav helpers — used by post_header_sx / post_admin_header_sx
+;; ---------------------------------------------------------------------------
+
+(defcomp ~container-nav-wrapper (&key content)
+  (div :id "entries-calendars-nav-wrapper"
+       :class "flex flex-col sm:flex-row sm:items-center gap-2 border-r border-stone-200 mr-2 sm:max-w-2xl"
+    content))
+
+; @css justify-center cursor-pointer flex flex-row items-center gap-2 rounded bg-stone-200 text-black p-3 !bg-stone-500 !text-white
+(defcomp ~admin-cog-button (&key href is-admin-page)
+  (div :class "relative nav-group"
+    (a :href href
+       :class (str "justify-center cursor-pointer flex flex-row items-center gap-2 rounded bg-stone-200 text-black p-3 "
+                   (if is-admin-page "!bg-stone-500 !text-white" ""))
+      (i :class "fa fa-cog" :aria-hidden "true"))))
+
+(defcomp ~post-admin-label (&key selected)
+  (<>
+    (i :class "fa fa-shield-halved" :aria-hidden "true")
+    " admin"
+    (when selected
+      (span :class "text-white" selected))))
+
 (defcomp ~nav-link (&key href hx-select label icon aclass select-colours is-selected)
   (div :class "relative nav-group"
     (a :href href