Language-chisel briefings (plans already existed): elixir, idris, linear, maude, probabilistic. host-on-sx briefing (native server now, Dream framework layer next). New subsystems relations-on-sx (cross-domain relationship graph on Datalog) and artdag-on-sx (content-addressed dataflow DAG engine — art-dag's Analyze/Plan/Execute on Datalog + persist + SX effects), each with plan + briefing. Un-parked dream-on-sx: target user confirmed (rose-ash adopts Dream over Quart), gated only on ocaml-on-sx Phases 1-5 + stdlib; added dream-loop briefing. Co-Authored-By: Claude Opus 4.8 (1M context) <noreply@anthropic.com>
6.9 KiB
Dream-on-SX: OCaml's Dream web framework on the SX CEK
[activated — target user confirmed; gated only on ocaml-on-sx]
Carved out of plans/ocaml-on-sx.md. The OCaml-on-SX plan was scoped down to substrate validation + HM + reference oracle (Phases 1–5 + minimal stdlib slice). Dream is the practical alternative-stack story — the opposite framing — and is now the chosen framework layer for the rose-ash host: the decision is to move off Quart and adopt Dream (not Quart) as the ergonomic HTTP front door over the native SX server. plans/host-on-sx.md Phase 4 is the concrete consumer that pulls Dream.
Target user — CONFIRMED. The earlier "needs a concrete target user" condition is met: rose-ash itself is the user — the subsystems (feed/acl/mod/commerce/identity/…) need an ergonomic HTTP front door, and the project owner has chosen Dream over Quart for it. This plan is no longer cold; it is gated, not deferred.
Do not start without (the one remaining gate):
- OCaml-on-SX Phases 1–5 + Phase 6 minimal stdlib green. (As of writing ocaml-on-sx is at 480/480 and advancing — verify its scoreboard covers Phases 1–5 + the stdlib slice before starting.)
Until that gate is green, the native server (host-on-sx Phases 1–3) carries the host; do not block host migration on Dream.
Why this might be worth doing (when the time comes)
Dream is the cleanest middleware-shaped HTTP framework in any language:
handler = request -> response promisemiddleware = handler -> handlerm1 @@ m2 @@ handler— left-fold composition
It maps onto SX with almost no impedance — @@ is function composition, request → response promise is (perform (:http-respond ...)), middleware chain is plain SX function composition. So the integration cost is low if the OCaml-on-SX foundation is in place.
The user-facing story: rose-ash users who'd never touch s-expressions might write Dream/OCaml apps that integrate with the same federation, auth, and storage primitives. Demo: a Dream app serving sx.rose-ash.com — the framework that describes the runtime it runs on.
Dream semantic mappings
| Dream construct | SX mapping |
|---|---|
handler = request -> response promise |
(fn (req) (perform (:http-respond ...))) |
middleware = handler -> handler |
(fn (next) (fn (req) ...)) |
Dream.router [routes] |
(ocaml-dream-router routes) — dispatch on method+path |
Dream.get "/path" h |
route record {:method "GET" :path "/path" :handler h} |
Dream.scope "/p" [ms] [rs] |
prefix mount with middleware chain |
Dream.param req "name" |
path param extracted during routing |
m1 @@ m2 @@ handler |
(m1 (m2 handler)) — left-fold composition |
Dream.session_field req "k" |
(perform (:session-get req "k")) |
Dream.set_session_field req "k" v |
(perform (:session-set req "k" v)) |
Dream.flash req |
(perform (:flash-get req)) |
Dream.form req |
(perform (:form-parse req)) — returns Ok/Error ADT |
Dream.websocket handler |
(perform (:websocket handler)) |
Dream.run handler |
starts SX HTTP server with handler as root |
Roadmap
The five types: request, response, handler = request -> response, middleware = handler -> handler, route. Everything else is a function over these.
- Core types in
lib/dream/types.sx: request/response records, route record. - Router in
lib/dream/router.sx: -dream-get path handler,dream-post path handler, etc. for all HTTP methods. -dream-scope prefix middlewares routes— prefix mount with middleware chain. -dream-router routes— dispatch tree, returns handler; no match → 404. - Path param extraction::namesegments,**wildcard. -dream-param req name— retrieve matched path param. - Middleware in
lib/dream/middleware.sx: -dream-pipeline middlewares handler— compose middleware left-to-right. -dream-no-middleware— identity. - Logger:(dream-logger next req)— logs method, path, status, timing. - Content-type sniffer. - Sessions in
lib/dream/session.sx: - Cookie-backed session middleware. -dream-session-field req key,dream-set-session-field req key val. -dream-invalidate-session req. - Flash messages in
lib/dream/flash.sx: -dream-flash-middleware— single-request cookie store. -dream-add-flash-message req category msg. -dream-flash-messages req— returns list of(category, msg). - Forms + CSRF in
lib/dream/form.sx: -dream-form req— returns(Ok fields)or(Err :csrf-token-invalid). -dream-multipart req— streaming multipart form data. - CSRF middleware: stateless signed tokens, session-scoped. -dream-csrf-tag req— returns hidden input fragment for SX templates. - WebSockets in
lib/dream/websocket.sx: -dream-websocket handler— upgrades request; handler(fn (ws) ...). -dream-send ws msg,dream-receive ws,dream-close ws. - Static files:
dream-static root-path— serves files, ETags, range requests. dream-run: wires root handler into SX'sperform (:http-listen ...).- Demos in
lib/dream/demos/: -hello.ml→lib/dream/demos/hello.sx: "Hello, World!" route. -counter.ml→lib/dream/demos/counter.sx: in-memory counter with sessions. -chat.ml→lib/dream/demos/chat.sx: multi-room WebSocket chat. -todo.ml→lib/dream/demos/todo.sx: CRUD list with forms + CSRF. - Tests in
lib/dream/tests/: routing dispatch, middleware composition, session round-trip, CSRF accept/reject, flash read-after-write — 60+ tests.
Stdlib additions Dream will need
Dream pushes beyond OCaml-on-SX's Phase 6 minimal stdlib slice. When this plan activates, OCaml-on-SX gets a follow-on phase that adds at minimum:
Bytes(binary buffers — request bodies, websocket frames)Buffer(mutable string building)Format(full pretty-printer, not justPrintf.sprintf)- More
String(index_opt,contains,starts_with,ends_with,replace_all) Sys(argv,getenv_opt,getcwd)Hashtblextensions (iter,fold,length,remove)Map.Make/Set.Makefunctors
Confirm scope before starting; some of these may be addable as Dream-internal helpers rather than full stdlib modules.
Ground rules
- Scope: only
lib/dream/**andplans/dream-on-sx.md. Plus the stdlib additions listed above which land inlib/ocaml/runtime.sx. - Hard prerequisite: OCaml-on-SX Phases 1–5 + Phase 6 minimal stdlib. Verify scoreboard before starting.
- SX files:
sx-treeMCP tools only. - Don't reinvent the SX HTTP server. Dream wraps the existing
perform (:http-listen ...)— it does not implement its own listener loop.
Progress log
(awaiting activation conditions)
Blockers
(none yet — plan is cold)