wyreframe 0.1.0

package/src/parser/Semantic/__tests__/ASTBuilder_test.mjs

@@ -0,0 +1,187 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+import * as Types from "../../Core/Types.mjs";
+import * as Vitest from "rescript-vitest/src/Vitest.mjs";
+import * as ASTBuilder from "../ASTBuilder.mjs";
+
+Vitest.describe("ASTBuilder", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+  Vitest.describe("buildScene", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+    Vitest.test("builds scene with all fields provided", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+      let config_title = "Login Page";
+      let config_transition = "slide";
+      let config_device = "Desktop";
+      let config_elements = [];
+      let config_position = Types.Position.make(1, 0);
+      let config = {
+        id: "login",
+        title: config_title,
+        transition: config_transition,
+        device: config_device,
+        elements: config_elements,
+        position: config_position
+      };
+      let result = ASTBuilder.buildScene(config);
+      if (result.TAG !== "Ok") {
+        return t.expect(true).toBe(false);
+      }
+      let scene = result._0;
+      t.expect(scene.id).toBe("login");
+      t.expect(scene.title).toBe("Login Page");
+      t.expect(scene.transition).toBe("slide");
+      t.expect(scene.elements.length).toBe(0);
+    });
+    Vitest.test("derives title from ID when title not provided", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+      let config_device = "Desktop";
+      let config_elements = [];
+      let config_position = Types.Position.make(1, 0);
+      let config = {
+        id: "login-page",
+        title: undefined,
+        transition: undefined,
+        device: config_device,
+        elements: config_elements,
+        position: config_position
+      };
+      let result = ASTBuilder.buildScene(config);
+      if (result.TAG !== "Ok") {
+        return t.expect(true).toBe(false);
+      }
+      let scene = result._0;
+      t.expect(scene.id).toBe("login-page");
+      t.expect(scene.title).toBe("Login Page");
+    });
+    Vitest.test("uses default transition when not provided", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+      let config_title = "Home";
+      let config_device = "Desktop";
+      let config_elements = [];
+      let config_position = Types.Position.make(1, 0);
+      let config = {
+        id: "home",
+        title: config_title,
+        transition: undefined,
+        device: config_device,
+        elements: config_elements,
+        position: config_position
+      };
+      let result = ASTBuilder.buildScene(config);
+      if (result.TAG === "Ok") {
+        return t.expect(result._0.transition).toBe("none");
+      } else {
+        return t.expect(true).toBe(false);
+      }
+    });
+    Vitest.test("rejects empty scene ID", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+      let config_title = "Empty ID";
+      let config_device = "Desktop";
+      let config_elements = [];
+      let config_position = Types.Position.make(1, 0);
+      let config = {
+        id: "",
+        title: config_title,
+        transition: undefined,
+        device: config_device,
+        elements: config_elements,
+        position: config_position
+      };
+      let result = ASTBuilder.buildScene(config);
+      if (result.TAG === "Ok") {
+        return t.expect(true).toBe(false);
+      }
+      switch (result._0.TAG) {
+        case "EmptySceneId" :
+          return;
+        case "DuplicateSceneId" :
+        case "InvalidSceneStructure" :
+          return t.expect(true).toBe(false);
+      }
+    });
+  });
+  Vitest.describe("buildAST", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+    Vitest.test("builds AST with single scene", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+      let configs = [{
+          id: "home",
+          title: "Home",
+          transition: "fade",
+          device: "Desktop",
+          elements: [],
+          position: Types.Position.make(1, 0)
+        }];
+      let result = ASTBuilder.buildAST(configs);
+      if (result.TAG === "Ok") {
+        return t.expect(result._0.scenes.length).toBe(1);
+      } else {
+        return t.expect(true).toBe(false);
+      }
+    });
+    Vitest.test("detects duplicate scene IDs", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+      let configs = [
+        {
+          id: "home",
+          title: "Home",
+          transition: undefined,
+          device: "Desktop",
+          elements: [],
+          position: Types.Position.make(1, 0)
+        },
+        {
+          id: "home",
+          title: "Home Again",
+          transition: undefined,
+          device: "Desktop",
+          elements: [],
+          position: Types.Position.make(20, 0)
+        }
+      ];
+      let result = ASTBuilder.buildAST(configs);
+      if (result.TAG === "Ok") {
+        return t.expect(true).toBe(false);
+      } else {
+        return t.expect(result._0.length).toBeGreaterThan(0);
+      }
+    });
+  });
+  Vitest.describe("helper functions", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+    let testAST = {
+      scenes: [
+        {
+          id: "home",
+          title: "Home",
+          transition: "none",
+          device: "Desktop",
+          elements: []
+        },
+        {
+          id: "about",
+          title: "About",
+          transition: "fade",
+          device: "Desktop",
+          elements: []
+        }
+      ]
+    };
+    Vitest.test("getSceneById finds existing scene", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+      let scene = ASTBuilder.getSceneById(testAST, "about");
+      if (scene !== undefined) {
+        t.expect(scene.id).toBe("about");
+        return t.expect(scene.title).toBe("About");
+      } else {
+        return t.expect(true).toBe(false);
+      }
+    });
+    Vitest.test("hasScene returns true for existing scene", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+      let exists = ASTBuilder.hasScene(testAST, "home");
+      t.expect(exists).toBe(true);
+    });
+    Vitest.test("getSceneIds returns all scene IDs", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+      let ids = ASTBuilder.getSceneIds(testAST);
+      t.expect(ids.length).toBe(2);
+    });
+  });
+});
+
+let pass;
+
+export {
+  pass,
+}
+/*  Not a pure module */

package/src/parser/Semantic/__tests__/ASTBuilder_test.res

@@ -0,0 +1,192 @@
+// ASTBuilder_test.res
+// Unit tests for AST Builder module
+
+open Vitest
+
+let pass = ()
+
+describe("ASTBuilder", t => {
+  describe("buildScene", t => {
+    test("builds scene with all fields provided", t => {
+      let config = {
+        ASTBuilder.id: "login",
+        title: Some("Login Page"),
+        transition: Some("slide"),
+        elements: [],
+        position: Types.Position.make(1, 0),
+        device: Some(Types.Desktop),
+      }
+
+      let result = ASTBuilder.buildScene(config)
+
+      switch result {
+      | Ok(scene) => {
+          t->expect(scene.id)->Expect.toBe("login")
+          t->expect(scene.title)->Expect.toBe("Login Page")
+          t->expect(scene.transition)->Expect.toBe("slide")
+          t->expect(Array.length(scene.elements))->Expect.toBe(0)
+        }
+      | Error(_) => t->expect(true)->Expect.toBe(false) // fail: Expected successful scene build
+      }
+    })
+
+    test("derives title from ID when title not provided", t => {
+      let config = {
+        ASTBuilder.id: "login-page",
+        title: None,
+        transition: None,
+        elements: [],
+        position: Types.Position.make(1, 0),
+        device: Some(Types.Desktop),
+      }
+
+      let result = ASTBuilder.buildScene(config)
+
+      switch result {
+      | Ok(scene) => {
+          t->expect(scene.id)->Expect.toBe("login-page")
+          t->expect(scene.title)->Expect.toBe("Login Page")
+        }
+      | Error(_) => t->expect(true)->Expect.toBe(false) // fail: Expected successful scene build
+      }
+    })
+
+    test("uses default transition when not provided", t => {
+      let config = {
+        ASTBuilder.id: "home",
+        title: Some("Home"),
+        transition: None,
+        elements: [],
+        position: Types.Position.make(1, 0),
+        device: Some(Types.Desktop),
+      }
+
+      let result = ASTBuilder.buildScene(config)
+
+      switch result {
+      | Ok(scene) => {
+          t->expect(scene.transition)->Expect.toBe("none")
+        }
+      | Error(_) => t->expect(true)->Expect.toBe(false) // fail: Expected successful scene build
+      }
+    })
+
+    test("rejects empty scene ID", t => {
+      let config = {
+        ASTBuilder.id: "",
+        title: Some("Empty ID"),
+        transition: None,
+        elements: [],
+        position: Types.Position.make(1, 0),
+        device: Some(Types.Desktop),
+      }
+
+      let result = ASTBuilder.buildScene(config)
+
+      switch result {
+      | Ok(_) => t->expect(true)->Expect.toBe(false) // fail: Expected error for empty scene ID
+      | Error(ASTBuilder.EmptySceneId(_)) => pass
+      | Error(_) => t->expect(true)->Expect.toBe(false) // fail: Expected EmptySceneId error
+      }
+    })
+  })
+
+  describe("buildAST", t => {
+    test("builds AST with single scene", t => {
+      let configs = [
+        {
+          ASTBuilder.id: "home",
+          title: Some("Home"),
+          transition: Some("fade"),
+          elements: [],
+          position: Types.Position.make(1, 0),
+          device: Some(Types.Desktop),
+        },
+      ]
+
+      let result = ASTBuilder.buildAST(configs)
+
+      switch result {
+      | Ok(ast) => {
+          t->expect(Array.length(ast.scenes))->Expect.toBe(1)
+        }
+      | Error(_) => t->expect(true)->Expect.toBe(false) // fail: Expected successful AST build
+      }
+    })
+
+    test("detects duplicate scene IDs", t => {
+      let configs = [
+        {
+          ASTBuilder.id: "home",
+          title: Some("Home"),
+          transition: None,
+          elements: [],
+          position: Types.Position.make(1, 0),
+          device: Some(Types.Desktop),
+        },
+        {
+          ASTBuilder.id: "home",
+          title: Some("Home Again"),
+          transition: None,
+          elements: [],
+          position: Types.Position.make(20, 0),
+          device: Some(Types.Desktop),
+        },
+      ]
+
+      let result = ASTBuilder.buildAST(configs)
+
+      switch result {
+      | Ok(_) => t->expect(true)->Expect.toBe(false) // fail: Expected error for duplicate scene IDs
+      | Error(errors) => {
+          t->expect(Array.length(errors))->Expect.Int.toBeGreaterThan(0)
+        }
+      }
+    })
+  })
+
+  describe("helper functions", t => {
+    let testAST = {
+      Types.scenes: [
+        {
+          id: "home",
+          title: "Home",
+          transition: "none",
+          device: Types.Desktop,
+          elements: [],
+        },
+        {
+          id: "about",
+          title: "About",
+          transition: "fade",
+          device: Types.Desktop,
+          elements: [],
+        },
+      ],
+    }
+
+    test("getSceneById finds existing scene", t => {
+      let scene = ASTBuilder.getSceneById(testAST, "about")
+
+      switch scene {
+      | Some(s) => {
+          t->expect(s.id)->Expect.toBe("about")
+          t->expect(s.title)->Expect.toBe("About")
+        }
+      | None => t->expect(true)->Expect.toBe(false) // fail: Expected to find scene
+      }
+    })
+
+    test("hasScene returns true for existing scene", t => {
+      let exists = ASTBuilder.hasScene(testAST, "home")
+
+      t->expect(exists)->Expect.toBe(true)
+    })
+
+    test("getSceneIds returns all scene IDs", t => {
+      let ids = ASTBuilder.getSceneIds(testAST)
+
+      t->expect(Array.length(ids))->Expect.toBe(2)
+    })
+  })
+})

package/src/parser/Semantic/__tests__/ParserRegistry_test.mjs

@@ -0,0 +1,154 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+import * as Types from "../../Core/Types.mjs";
+import * as Vitest from "rescript-vitest/src/Vitest.mjs";
+import * as LinkParser from "../Elements/LinkParser.mjs";
+import * as TextParser from "../Elements/TextParser.mjs";
+import * as InputParser from "../Elements/InputParser.mjs";
+import * as CheckboxParser from "../Elements/CheckboxParser.mjs";
+import * as ParserRegistry from "../ParserRegistry.mjs";
+
+Vitest.describe("ParserRegistry", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+  Vitest.describe("make", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => Vitest.test("creates an empty registry", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+    let registry = ParserRegistry.make();
+    t.expect(registry.parsers.length).toBe(0);
+  }));
+  Vitest.describe("register", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+    Vitest.test("adds a parser to the registry", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+      let registry = ParserRegistry.make();
+      let parser = TextParser.make();
+      ParserRegistry.register(registry, parser);
+      t.expect(registry.parsers.length).toBe(1);
+    });
+    Vitest.test("sorts parsers by priority (descending)", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+      let registry = ParserRegistry.make();
+      ParserRegistry.register(registry, TextParser.make());
+      ParserRegistry.register(registry, InputParser.make());
+      ParserRegistry.register(registry, CheckboxParser.make());
+      ParserRegistry.register(registry, LinkParser.make());
+      t.expect(registry.parsers[0].priority).toBe(90);
+      t.expect(registry.parsers[1].priority).toBe(85);
+      t.expect(registry.parsers[2].priority).toBe(80);
+      t.expect(registry.parsers[3].priority).toBe(1);
+    });
+    Vitest.test("maintains sort order when registering multiple parsers", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+      let registry = ParserRegistry.make();
+      ParserRegistry.register(registry, LinkParser.make());
+      ParserRegistry.register(registry, InputParser.make());
+      ParserRegistry.register(registry, TextParser.make());
+      t.expect(registry.parsers[0].priority).toBe(90);
+      t.expect(registry.parsers[1].priority).toBe(80);
+      t.expect(registry.parsers[2].priority).toBe(1);
+    });
+  });
+  Vitest.describe("parse", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+    let testPosition = Types.Position.make(0, 0);
+    let testBounds = Types.Bounds.make(0, 0, 10, 10);
+    Vitest.test("tries parsers in priority order", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+      let registry = ParserRegistry.make();
+      ParserRegistry.register(registry, InputParser.make());
+      ParserRegistry.register(registry, TextParser.make());
+      let result = ParserRegistry.parse(registry, "#email", testPosition, testBounds);
+      if (result.TAG === "Input") {
+        return t.expect(result.id).toBe("email");
+      } else {
+        return t.expect(true).toBe(false);
+      }
+    });
+    Vitest.test("falls back to lower priority parser if higher priority fails", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+      let registry = ParserRegistry.make();
+      ParserRegistry.register(registry, InputParser.make());
+      ParserRegistry.register(registry, TextParser.make());
+      let result = ParserRegistry.parse(registry, "plain text", testPosition, testBounds);
+      if (result.TAG === "Text") {
+        return t.expect(result.content).toBe("plain text");
+      } else {
+        return t.expect(true).toBe(false);
+      }
+    });
+    Vitest.test("parses checkbox content correctly", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+      let registry = ParserRegistry.make();
+      ParserRegistry.register(registry, CheckboxParser.make());
+      ParserRegistry.register(registry, TextParser.make());
+      let result = ParserRegistry.parse(registry, "[x] Accept terms", testPosition, testBounds);
+      if (result.TAG !== "Checkbox") {
+        return t.expect(true).toBe(false);
+      }
+      t.expect(result.checked).toBe(true);
+      t.expect(result.label).toBe("Accept terms");
+    });
+    Vitest.test("parses link content correctly", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+      let registry = ParserRegistry.make();
+      ParserRegistry.register(registry, LinkParser.make());
+      ParserRegistry.register(registry, TextParser.make());
+      let result = ParserRegistry.parse(registry, "\"Click Here\"", testPosition, testBounds);
+      if (result.TAG !== "Link") {
+        return t.expect(true).toBe(false);
+      }
+      t.expect(result.text).toBe("Click Here");
+      t.expect(result.id).toBe("click-here");
+    });
+    Vitest.test("returns text element as fallback when no parser matches", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+      let registry = ParserRegistry.make();
+      ParserRegistry.register(registry, InputParser.make());
+      let result = ParserRegistry.parse(registry, "unmatched content", testPosition, testBounds);
+      if (result.TAG === "Text") {
+        return t.expect(result.content).toBe("unmatched content");
+      } else {
+        return t.expect(true).toBe(false);
+      }
+    });
+  });
+  Vitest.describe("makeDefault", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+    Vitest.test("creates registry with built-in parsers", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+      let registry = ParserRegistry.makeDefault();
+      t.expect(registry.parsers.length).toBeGreaterThanOrEqual(4);
+    });
+    Vitest.test("default registry can parse input fields", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+      let registry = ParserRegistry.makeDefault();
+      let testPosition = Types.Position.make(5, 10);
+      let testBounds = Types.Bounds.make(0, 0, 20, 30);
+      let result = ParserRegistry.parse(registry, "#password", testPosition, testBounds);
+      if (result.TAG === "Input") {
+        return t.expect(result.id).toBe("password");
+      } else {
+        return t.expect(true).toBe(false);
+      }
+    });
+    Vitest.test("default registry can parse checkboxes", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+      let registry = ParserRegistry.makeDefault();
+      let testPosition = Types.Position.make(0, 0);
+      let testBounds = Types.Bounds.make(0, 0, 10, 10);
+      let result = ParserRegistry.parse(registry, "[ ] Unchecked", testPosition, testBounds);
+      if (result.TAG === "Checkbox") {
+        return t.expect(result.checked).toBe(false);
+      } else {
+        return t.expect(true).toBe(false);
+      }
+    });
+    Vitest.test("default registry can parse links", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+      let registry = ParserRegistry.makeDefault();
+      let testPosition = Types.Position.make(0, 0);
+      let testBounds = Types.Bounds.make(0, 0, 10, 10);
+      let result = ParserRegistry.parse(registry, "\"Sign Up\"", testPosition, testBounds);
+      if (result.TAG === "Link") {
+        return t.expect(result.text).toBe("Sign Up");
+      } else {
+        return t.expect(true).toBe(false);
+      }
+    });
+    Vitest.test("default registry falls back to text for unrecognized content", undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, t => {
+      let registry = ParserRegistry.makeDefault();
+      let testPosition = Types.Position.make(0, 0);
+      let testBounds = Types.Bounds.make(0, 0, 10, 10);
+      let result = ParserRegistry.parse(registry, "Random text", testPosition, testBounds);
+      if (result.TAG === "Text") {
+        return t.expect(result.content).toBe("Random text");
+      } else {
+        return t.expect(true).toBe(false);
+      }
+    });
+  });
+});
+
+/*  Not a pure module */