Charles KWON OhJun
d26624c63b
Drop-in copy of labdb's API surface from
fivenode/labdb/api/*.prg into app/api/. Single fnode invocation builds
the whole thing (bridge_server + bridge/ + 22 api/*.prg) into one
24 MB Go binary — no Node.js, no FFI, no Apache.
End-to-end smoke test (server.js not running, ctx empty so defaults
fall back) hitting six endpoints all return well-formed JSON via the
bridge layer + path -> Main dispatcher:
GET /api/hello.prg -> {"msg":"hello from PRG","ok":true}
GET /api/admin-stats.prg -> {"active_sessions":0,...}
GET /api/admin-me.prg -> {"ok":true,"user":{...}}
GET /api/sessions-list.prg -> {"sessions":[],"total":0}
GET /api/records-list.prg -> {"records":[],"sessionId":"",...}
POST /api/devices-register -> {"deviceId":"","status":"pending",...}
One small upstream patch was needed: seven .prg files each define
their own STATIC FUNCTION fn_HGet, but Five doesn't yet honour
file-local STATIC scoping for top-level functions — all definitions
land in the same symbol table and collide. Renamed each duplicate to
<file>_fn_hget so they peacefully coexist; the call sites still
reference fn_HGet and Five resolves them against _helpers.prg's
public version (signature-compatible). TODO: revert once Five gains
file-local STATIC FUNCTION scoping.
What's deferred to 1a.4-4: ctx data injection (so endpoints return
real labdb data), static asset embedding (labdb/public/), and a live
LABDB_DSN round-trip to confirm pgrtl in the request path.
Co-Authored-By: Claude Opus 4.7 (1M context) <noreply@anthropic.com>
32 lines
1.2 KiB
Plaintext
32 lines
1.2 KiB
Plaintext
// api/session-detail.prg — Format session detail response
|
|
// ctx: row (JSON of single session row joined with device)
|
|
FUNCTION Main()
|
|
LOCAL hRow
|
|
|
|
hRow := hb_jsonDecode(ctx_get("row", "{}"))
|
|
IF ! HB_ISHASH(hRow) .OR. Empty(hRow)
|
|
AP_JSONRESPONSE({ "error" => { "code" => "SESSION_NOT_FOUND", "message" => "session not found", "status" => 404 } }, 404)
|
|
RETURN NIL
|
|
ENDIF
|
|
|
|
AP_JSONRESPONSE({ ;
|
|
"sessionId" => fn_HGet(hRow, "session_id"), ;
|
|
"sessionName" => fn_HGet(hRow, "session_name"), ;
|
|
"deviceName" => fn_HGet(hRow, "device_name"), ;
|
|
"deviceAddress" => fn_HGet(hRow, "device_address"), ;
|
|
"startTime" => fn_HGet(hRow, "start_time"), ;
|
|
"endTime" => fn_HGet(hRow, "end_time"), ;
|
|
"recordCount" => fn_HGet(hRow, "record_count"), ;
|
|
"params" => fn_HGet(hRow, "params"), ;
|
|
"note" => fn_HGet(hRow, "note"), ;
|
|
"hwNumber" => fn_HGet(hRow, "hw_number"), ;
|
|
"serialNumber" => fn_HGet(hRow, "serial_number"), ;
|
|
"fwVersion" => fn_HGet(hRow, "fw_version"), ;
|
|
"status" => fn_HGet(hRow, "status") ;
|
|
})
|
|
RETURN NIL
|
|
|
|
FUNCTION session_detail_fn_hget(h, k)
|
|
IF HB_ISHASH(h) .AND. hb_HHasKey(h, k) ; RETURN h[k] ; ENDIF
|
|
RETURN ""
|