summaryrefslogtreecommitdiff
path: root/tests/SomhairlesDream.Modeling.Tests/BridgeTests.fs
diff options
context:
space:
mode:
Diffstat (limited to 'tests/SomhairlesDream.Modeling.Tests/BridgeTests.fs')
-rw-r--r--tests/SomhairlesDream.Modeling.Tests/BridgeTests.fs72
1 files changed, 72 insertions, 0 deletions
diff --git a/tests/SomhairlesDream.Modeling.Tests/BridgeTests.fs b/tests/SomhairlesDream.Modeling.Tests/BridgeTests.fs
new file mode 100644
index 0000000..d9c7347
--- /dev/null
+++ b/tests/SomhairlesDream.Modeling.Tests/BridgeTests.fs
@@ -0,0 +1,72 @@
+module SomhairlesDream.Modeling.Tests.BridgeTests
+
+open System
+open System.IO
+open Xunit
+open SomhairlesDream.Modeling
+
+let private withTempDirectory action =
+ let path = Path.Combine(Path.GetTempPath(), "somhairles-dream-bridge-" + Guid.NewGuid().ToString("N"))
+ Directory.CreateDirectory(path) |> ignore
+
+ try
+ action path
+ finally
+ if Directory.Exists(path) then
+ Directory.Delete(path, true)
+
+let private fixtureScript =
+ [| "import argparse"
+ "import json"
+ "import os"
+ ""
+ "parser = argparse.ArgumentParser()"
+ "parser.add_argument('--step-id', required=True)"
+ "parser.add_argument('--output', required=True)"
+ "parser.add_argument('--render-output')"
+ "parser.add_argument('--result-output')"
+ "args = parser.parse_args()"
+ "os.makedirs(os.path.dirname(args.output), exist_ok=True)"
+ "with open(args.output, 'wb') as stream:"
+ " stream.write(b'glTF')"
+ "result_path = args.result_output or args.output + '.result.json'"
+ "with open(result_path, 'w', encoding='utf-8') as stream:"
+ " json.dump({"
+ " 'ok': True,"
+ " 'blenderVersion': 'test',"
+ " 'exportedAt': '2026-09-20T12:00:05Z',"
+ " 'objectIds': ['heritage.foundation', 'heritage.deck'],"
+ " 'verifiedObjectIds': ['heritage.foundation', 'heritage.deck'],"
+ " 'glbBytes': 4"
+ " }, stream)"
+ "with open(args.output + '.log', 'w', encoding='utf-8') as stream:"
+ " stream.write('fixture log retained separately\\n')"
+ "print('Blender informational output')" |]
+ |> String.concat Environment.NewLine
+
+[<Fact>]
+let ``bridge reads result file instead of polluted stdout and retains process log`` () =
+ withTempDirectory (fun root ->
+ let blenderRoot = Path.Combine(root, "stage", "blender")
+ Directory.CreateDirectory(blenderRoot) |> ignore
+ File.WriteAllText(Path.Combine(blenderRoot, "fixture.py"), fixtureScript)
+
+ let output = Path.Combine(root, "run", "step.glb")
+ let request =
+ { Step = Design.steps[0]
+ GlbPath = output
+ RenderPath = None
+ ResultPath = output + ".result.json"
+ LogPath = output + ".log" }
+
+ let result =
+ (BlenderProcessBridge("python3", Path.Combine(root, "stage")) :> IArtifactBridge)
+ .Export(request, ignore)
+
+ match result with
+ | Error message -> failwith message
+ | Ok value ->
+ Assert.Equal("test", value.BlenderVersion)
+ Assert.Equal(4L, value.GlbBytes)
+ Assert.True(File.Exists(output + ".log"))
+ Assert.Contains("Blender informational output", File.ReadAllText(output + ".log")))