diff options
| author | Somhairle H. Marisol <[email protected]> | 2026-09-21 00:58:15 +0800 |
|---|---|---|
| committer | Somhairle H. Marisol <[email protected]> | 2026-09-21 00:58:15 +0800 |
| commit | 7b29dbff7e43e87741476f47df17ad1582b16546 (patch) | |
| tree | 4c9d0832b4e4edd77e59e9cb0a88abf5e729a9f9 /src/SomhairlesDream.Frontend/Bindings.fs | |
| parent | 47add3088d50f12c5f48591f26c53cdb59d8283b (diff) | |
| download | somhairles-dream-fsharp-7b29dbff7e43e87741476f47df17ad1582b16546.tar.gz | |
feat(pipeline): add runnable artifact pipeline increment
[Change Nature]
- This commit adds the first runnable increment of the F# artifact
pipeline: CLI, server, frontend bundle, stage fixture, and tests.
It is feature work, not a bug fix.
[New Capability]
- CLI `run` executes the three-step Blender fixture through the process
bridge and writes GLBs, step logs, events, and a manifest; `verify`
validates a manifest without Blender.
- Server exposes run start, run-scoped SSE, artifact manifest/file
routes, and serves the Fable frontend from its build output.
- Frontend starts runs, follows run-scoped SSE progress, and links the
artifact manifest on completion.
[Implementation]
- Shared layer holds domain, run state, replay, and artifact contracts;
Modeling holds the pipeline, 120s bridge timeout, and result-file
protocol; stage/blender/fixture.py owns geometry in Python (bpy owns
geometry, F# owns orchestration).
- Fable bundle is regenerated into public/ and copied by the server
project; solution includes all projects with warnings-as-errors.
- README documents build, Fable, server, interpreter/env, fixture
limitations, and current verification status.
[Impact]
- Verified: 40/40 solution tests pass; Release build 0 warnings/errors;
real CLI run with bpy 5.0.1 produced 3 GLBs, 3 logs, and a
verify-clean manifest; isolated-port server smoke flow succeeded.
- Not yet verified: browser end-to-end behavior and production
fidelity. Artifacts and caches are gitignored.
Diffstat (limited to 'src/SomhairlesDream.Frontend/Bindings.fs')
| -rw-r--r-- | src/SomhairlesDream.Frontend/Bindings.fs | 109 |
1 files changed, 109 insertions, 0 deletions
diff --git a/src/SomhairlesDream.Frontend/Bindings.fs b/src/SomhairlesDream.Frontend/Bindings.fs new file mode 100644 index 0000000..dc75d7d --- /dev/null +++ b/src/SomhairlesDream.Frontend/Bindings.fs @@ -0,0 +1,109 @@ +module SomhairlesDream.Frontend.Bindings + +open Fable.Core + +[<Erase>] +type ThreeVector = + abstract set: x: float * y: float * z: float -> ThreeVector + abstract x: float with get, set + abstract y: float with get, set + abstract z: float with get, set + +[<Erase>] +type ThreeNode = + abstract add: child: ThreeNode -> unit + abstract clear: unit -> unit + abstract lookAt: x: float * y: float * z: float -> unit + abstract position: ThreeVector with get + abstract rotation: ThreeVector with get + abstract background: obj with get, set + +[<Erase>] +type ThreeRenderer = + abstract setPixelRatio: ratio: float -> unit + abstract setSize: width: float * height: float * updateStyle: bool -> unit + abstract render: scene: ThreeNode * camera: ThreeNode -> unit + +[<Erase>] +type ThreeGeometry = + abstract setAttribute: name: string * attribute: obj -> ThreeGeometry + abstract setIndex: attribute: obj -> ThreeGeometry + abstract computeVertexNormals: unit -> unit + +[<Erase>] +type ServerEvent = + abstract data: string with get + +[<Erase>] +type EventSource = + abstract onerror: (obj -> unit) with get, set + abstract onmessage: (ServerEvent -> unit) with get, set + abstract close: unit -> unit + +[<Erase>] +type FetchResponse = + abstract ok: bool with get + abstract status: int with get + abstract json: unit -> JS.Promise<obj> + +[<Erase>] +type HtmlInput = + abstract value: string with get + abstract ``checked``: bool with get + +[<Emit("new THREE.Scene()")>] +let createScene () : ThreeNode = jsNative + +[<Emit("new THREE.Group()")>] +let createGroup () : ThreeNode = jsNative + +[<Emit("new THREE.PerspectiveCamera($0, $1, $2, $3)")>] +let createPerspectiveCamera (fieldOfView: float, aspect: float, nearPlane: float, farPlane: float) : ThreeNode = jsNative + +[<Emit("new THREE.WebGLRenderer($0)")>] +let createRenderer (options: obj) : ThreeRenderer = jsNative + +[<Emit("new THREE.BufferGeometry()")>] +let createBufferGeometry () : ThreeGeometry = jsNative + +[<Emit("new THREE.Float32BufferAttribute($0, $1)")>] +let createFloat32BufferAttribute (values: float array, itemSize: int) : obj = jsNative + +[<Emit("new THREE.Uint32BufferAttribute($0, 1)")>] +let createUint32BufferAttribute (values: int array) : obj = jsNative + +[<Emit("new THREE.Color($0)")>] +let createColor (value: string) : obj = jsNative + +[<Emit("new THREE.BoxGeometry($0, $1, $2)")>] +let createBoxGeometry (width: float, height: float, depth: float) : obj = jsNative + +[<Emit("new THREE.MeshStandardMaterial($0)")>] +let createMeshStandardMaterial (options: obj) : obj = jsNative + +[<Emit("new THREE.Mesh($0, $1)")>] +let createMesh (geometry: obj, material: obj) : ThreeNode = jsNative + +[<Emit("new THREE.AmbientLight($0, $1)")>] +let createAmbientLight (color: string, intensity: float) : ThreeNode = jsNative + +[<Emit("new THREE.DirectionalLight($0, $1)")>] +let createDirectionalLight (color: string, intensity: float) : ThreeNode = jsNative + +[<Emit("new EventSource($0)")>] +let createEventSource (url: string) : EventSource = jsNative + +[<Global("fetch")>] +let fetch (url: string, options: obj) : JS.Promise<FetchResponse> = jsNative + +[<Global("encodeURIComponent")>] +let encodeURIComponent (value: string) : string = jsNative + +[<Global("setInterval")>] +let setInterval (callback: unit -> unit) (milliseconds: int) : int = jsNative + +[<Global("clearInterval")>] +let clearInterval (handle: int) : unit = jsNative + +[<Global("requestAnimationFrame")>] +let requestAnimationFrame (callback: float -> unit) : int = jsNative |
