@reventlessdev/reventless-local 3.0.0-alpha.113

package/tests/adapter/QueryDbListResolverTest.res.mjs

@@ -0,0 +1,426 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+import * as S from "sury/src/S.res.mjs";
+import * as Stdlib_JSON from "@rescript/runtime/lib/es6/Stdlib_JSON.js";
+import * as Id$Reventless from "@reventlessdev/reventless-spec/src/types/Id.res.mjs";
+import * as Stdlib_Option from "@rescript/runtime/lib/es6/Stdlib_Option.js";
+import * as Pulumi from "@pulumi/pulumi";
+import * as Stdlib_JsError from "@rescript/runtime/lib/es6/Stdlib_JsError.js";
+import * as DcbTag$Reventless from "@reventlessdev/reventless-spec/src/components/DcbTag.res.mjs";
+import * as Identity$Reventless from "@reventlessdev/reventless-spec/src/types/Identity.res.mjs";
+import * as ReadModel$Reventless from "@reventlessdev/reventless-spec/src/components/ReadModel.res.mjs";
+import * as Component$ReventlessCore from "@reventlessdev/reventless-core/src/components/Component.res.mjs";
+import * as LocalBus$ReventlessLocal from "../../src/adapter/LocalBus.res.mjs";
+import * as TestRunner$ReventlessLocal from "../../src/test/TestRunner.res.mjs";
+import * as StateAnnotations$Reventless from "@reventlessdev/reventless-spec/src/components/StateAnnotations.res.mjs";
+import * as Plugin_Helpers$ReventlessCore from "@reventlessdev/reventless-core/src/plugin/component/Plugin_Helpers.res.mjs";
+import * as QueryDb_Adapter$ReventlessCore from "@reventlessdev/reventless-core/src/components/QueryDb/QueryDb_Adapter.res.mjs";
+import * as QueryDb_Builder$ReventlessCore from "@reventlessdev/reventless-core/src/components/QueryDb/QueryDb_Builder.res.mjs";
+import * as DomainGraphQL_Server$ReventlessLocal from "../../src/adapter/DomainGraphQL_Server.res.mjs";
+import * as QueryDbStorage_InMemory$ReventlessLocal from "../../src/adapter/QueryDb/QueryDbStorage_InMemory.res.mjs";
+import * as QueryDbResolvers_GraphQL$ReventlessLocal from "../../src/adapter/QueryDb/QueryDbResolvers_GraphQL.res.mjs";
+
+TestRunner$ReventlessLocal.setup();
+
+let rowStateSchema = S.schema(s => ({
+  productId: s.m(DcbTag$Reventless.string),
+  status: s.m(S.string),
+  name: s.m(S.string)
+}));
+
+let rowStateSchemaWithAnnotations = S.Metadata.set(rowStateSchema, StateAnnotations$Reventless.stateAnnotationsId, {
+  ids: ["productId"],
+  compositeIds: [],
+  subIds: [],
+  compositeSubIds: [],
+  indexes: [],
+  hidden: [],
+  summary: [],
+  drillTargets: [],
+  drillTargetKeys: [],
+  collapsed: [],
+  scan: ["status"],
+  scanSort: ["name"],
+  status: undefined,
+  visibility: undefined
+});
+
+let newrecord = {...Identity$Reventless.anonymous};
+
+let emptyCtx = Object.fromEntries([
+  [
+    "request",
+    Object.fromEntries([[
+        "headers",
+        {}
+      ]])
+  ],
+  [
+    "identity",
+    (newrecord.groups = ["User"], newrecord.username = "test-user", newrecord.userId = "test-user", newrecord)
+  ]
+]);
+
+function argsOf(entries) {
+  return Object.fromEntries(entries);
+}
+
+function strJson(prim) {
+  return prim;
+}
+
+function numJson(n) {
+  return n;
+}
+
+function getField(json, key) {
+  return Stdlib_Option.flatMap(Stdlib_JSON.Decode.object(json), d => d[key]);
+}
+
+function getString(json, key) {
+  return Stdlib_Option.flatMap(getField(json, key), Stdlib_JSON.Decode.string);
+}
+
+function getEdges(response) {
+  return Stdlib_Option.getOr(Stdlib_Option.flatMap(getField(response, "edges"), Stdlib_JSON.Decode.array), []);
+}
+
+function edgeCursor(edge) {
+  return Stdlib_Option.getOr(getString(edge, "cursor"), "");
+}
+
+function edgeNodeField(edge, field) {
+  return Stdlib_Option.getOr(Stdlib_Option.flatMap(getField(edge, "node"), n => getString(n, field)), "");
+}
+
+function pageInfo(response) {
+  return Stdlib_Option.getOr(getField(response, "pageInfo"), null);
+}
+
+function pageInfoBool(response, key) {
+  return Stdlib_Option.getOr(Stdlib_Option.flatMap(getField(pageInfo(response), key), Stdlib_JSON.Decode.bool), false);
+}
+
+function pageInfoString(response, key) {
+  return getString(pageInfo(response), key);
+}
+
+async function buildFixture(name) {
+  let Bus = LocalBus$ReventlessLocal.Make({});
+  let Storage = QueryDbStorage_InMemory$ReventlessLocal.Make(Bus);
+  let Resolvers = QueryDbResolvers_GraphQL$ReventlessLocal.Make(Bus);
+  let moduleUrl = import.meta.url;
+  let config = ReadModel$Reventless.config(undefined, undefined, undefined);
+  let QDbResolversAdapter = QueryDb_Adapter$ReventlessCore.NoResolvers({
+    make: Storage.make
+  });
+  let Maker = QueryDb_Builder$ReventlessCore.Make({
+    Id: {
+      schema: Id$Reventless.StringPure.schema,
+      make: prim => prim,
+      makeFromString: prim => prim,
+      toString: prim => prim,
+      cmp: Id$Reventless.StringPure.cmp
+    },
+    name: name,
+    moduleUrl: moduleUrl,
+    stateSchema: rowStateSchema,
+    config: config,
+    subIdConfig: undefined,
+    authorization: "AllowAuthenticated",
+    visibility: "Public"
+  })({
+    make: Storage.make
+  })(QDbResolversAdapter);
+  let listFieldName = name + "s";
+  Plugin_Helpers$ReventlessCore.queryFieldNamesRegistry[name] = {
+    singleFieldName: name,
+    listFieldName: listFieldName,
+    returnTypeName: name,
+    pluralTypeName: "[" + name + "]",
+    includeIdParam: true,
+    connectionSpec: true
+  };
+  Plugin_Helpers$ReventlessCore.stateSchemaRegistry[name] = rowStateSchemaWithAnnotations;
+  let queryDb = Maker.make(undefined, undefined, undefined, undefined);
+  let ops = await TestRunner$ReventlessLocal.resolve(Component$ReventlessCore.operations(queryDb));
+  Resolvers.make(name, undefined, undefined, Pulumi.output(""), [], undefined, [], [], "AllowAuthenticated", {});
+  let r = DomainGraphQL_Server$ReventlessLocal.getQueryResolver(listFieldName);
+  let resolver = r !== undefined ? r : Stdlib_JsError.throwWithMessage("resolver not registered: " + listFieldName);
+  let rows = [
+    [
+      "p-1",
+      "active",
+      "Charlie"
+    ],
+    [
+      "p-2",
+      "active",
+      "Alpha"
+    ],
+    [
+      "p-3",
+      "inactive",
+      "Echo"
+    ],
+    [
+      "p-4",
+      "active",
+      "Bravo"
+    ],
+    [
+      "p-5",
+      "inactive",
+      "Delta"
+    ]
+  ];
+  for (let i = 0, i_finish = rows.length; i < i_finish; ++i) {
+    let match = rows[i];
+    let pid = match[0];
+    await ops.save(pid, {
+      productId: pid,
+      status: match[1],
+      name: match[2]
+    }, "Init", undefined);
+  }
+  return [
+    resolver,
+    listFieldName
+  ];
+}
+
+globalThis.describe("QueryDb list resolver — keyset pagination", () => {
+  globalThis.beforeEach(() => DomainGraphQL_Server$ReventlessLocal.reset());
+  globalThis.test("first: 2 over a 5-row fixture returns 2 edges and hasNextPage = true", async () => {
+    let match = await buildFixture("PageA");
+    let response = await match[0](null, Object.fromEntries([[
+        "first",
+        2
+      ]]), emptyCtx);
+    let edges = getEdges(response);
+    globalThis.expect(edges.length).toBe(2);
+    globalThis.expect(pageInfoBool(response, "hasNextPage")).toBe(true);
+    globalThis.expect(pageInfoBool(response, "hasPreviousPage")).toBe(false);
+    globalThis.expect(edgeNodeField(edges[0], "productId")).toBe("p-1");
+    globalThis.expect(edgeNodeField(edges[1], "productId")).toBe("p-2");
+  });
+  globalThis.test("after: <endCursor> walks forward without overlap", async () => {
+    let match = await buildFixture("PageB");
+    let resolver = match[0];
+    let page1 = await resolver(null, Object.fromEntries([[
+        "first",
+        2
+      ]]), emptyCtx);
+    let endCursor1 = Stdlib_Option.getOr(getString(pageInfo(page1), "endCursor"), "");
+    let page2 = await resolver(null, Object.fromEntries([
+      [
+        "first",
+        2
+      ],
+      [
+        "after",
+        endCursor1
+      ]
+    ]), emptyCtx);
+    let edges2 = getEdges(page2);
+    globalThis.expect(edges2.length).toBe(2);
+    globalThis.expect(edgeNodeField(edges2[0], "productId")).toBe("p-3");
+    globalThis.expect(edgeNodeField(edges2[1], "productId")).toBe("p-4");
+    globalThis.expect(pageInfoBool(page2, "hasNextPage")).toBe(true);
+    let endCursor2 = Stdlib_Option.getOr(getString(pageInfo(page2), "endCursor"), "");
+    let page3 = await resolver(null, Object.fromEntries([
+      [
+        "first",
+        2
+      ],
+      [
+        "after",
+        endCursor2
+      ]
+    ]), emptyCtx);
+    let edges3 = getEdges(page3);
+    globalThis.expect(edges3.length).toBe(1);
+    globalThis.expect(edgeNodeField(edges3[0], "productId")).toBe("p-5");
+    globalThis.expect(pageInfoBool(page3, "hasNextPage")).toBe(false);
+  });
+  globalThis.test("last + before walks backward and flips hasPreviousPage", async () => {
+    let match = await buildFixture("PageC");
+    let resolver = match[0];
+    let page1 = await resolver(null, Object.fromEntries([[
+        "first",
+        2
+      ]]), emptyCtx);
+    let endCursor1 = Stdlib_Option.getOr(getString(pageInfo(page1), "endCursor"), "");
+    let page2 = await resolver(null, Object.fromEntries([
+      [
+        "first",
+        2
+      ],
+      [
+        "after",
+        endCursor1
+      ]
+    ]), emptyCtx);
+    let endCursor2 = Stdlib_Option.getOr(getString(pageInfo(page2), "endCursor"), "");
+    let page3 = await resolver(null, Object.fromEntries([
+      [
+        "first",
+        2
+      ],
+      [
+        "after",
+        endCursor2
+      ]
+    ]), emptyCtx);
+    let startCursor3 = Stdlib_Option.getOr(getString(pageInfo(page3), "startCursor"), "");
+    let backPage = await resolver(null, Object.fromEntries([
+      [
+        "last",
+        2
+      ],
+      [
+        "before",
+        startCursor3
+      ]
+    ]), emptyCtx);
+    let backEdges = getEdges(backPage);
+    globalThis.expect(backEdges.length).toBe(2);
+    globalThis.expect(edgeNodeField(backEdges[0], "productId")).toBe("p-3");
+    globalThis.expect(edgeNodeField(backEdges[1], "productId")).toBe("p-4");
+    globalThis.expect(pageInfoBool(backPage, "hasPreviousPage")).toBe(true);
+    globalThis.expect(pageInfoBool(backPage, "hasNextPage")).toBe(false);
+    let backStart = Stdlib_Option.getOr(getString(pageInfo(backPage), "startCursor"), "");
+    let firstPage = await resolver(null, Object.fromEntries([
+      [
+        "last",
+        2
+      ],
+      [
+        "before",
+        backStart
+      ]
+    ]), emptyCtx);
+    let firstEdges = getEdges(firstPage);
+    globalThis.expect(firstEdges.length).toBe(2);
+    globalThis.expect(edgeNodeField(firstEdges[0], "productId")).toBe("p-1");
+    globalThis.expect(edgeNodeField(firstEdges[1], "productId")).toBe("p-2");
+    globalThis.expect(pageInfoBool(firstPage, "hasPreviousPage")).toBe(false);
+  });
+  globalThis.test("filter.<field>Eq + first / after paginates only the narrowed subset", async () => {
+    let match = await buildFixture("PageD");
+    let resolver = match[0];
+    let activeFilter = Object.fromEntries([[
+        "statusEq",
+        "active"
+      ]]);
+    let page1 = await resolver(null, Object.fromEntries([
+      [
+        "filter",
+        activeFilter
+      ],
+      [
+        "first",
+        2
+      ]
+    ]), emptyCtx);
+    let edges1 = getEdges(page1);
+    globalThis.expect(edges1.length).toBe(2);
+    globalThis.expect(edgeNodeField(edges1[0], "productId")).toBe("p-1");
+    globalThis.expect(edgeNodeField(edges1[1], "productId")).toBe("p-2");
+    globalThis.expect(pageInfoBool(page1, "hasNextPage")).toBe(true);
+    let endCursor1 = Stdlib_Option.getOr(getString(pageInfo(page1), "endCursor"), "");
+    let page2 = await resolver(null, Object.fromEntries([
+      [
+        "filter",
+        activeFilter
+      ],
+      [
+        "first",
+        2
+      ],
+      [
+        "after",
+        endCursor1
+      ]
+    ]), emptyCtx);
+    let edges2 = getEdges(page2);
+    globalThis.expect(edges2.length).toBe(1);
+    globalThis.expect(edgeNodeField(edges2[0], "productId")).toBe("p-4");
+    globalThis.expect(pageInfoBool(page2, "hasNextPage")).toBe(false);
+  });
+  globalThis.test("orderBy DESC + first / after paginates the reverse-sorted view", async () => {
+    let match = await buildFixture("PageE");
+    let resolver = match[0];
+    let orderBy = Object.fromEntries([
+      [
+        "field",
+        "name"
+      ],
+      [
+        "direction",
+        "DESC"
+      ]
+    ]);
+    let page1 = await resolver(null, Object.fromEntries([
+      [
+        "orderBy",
+        orderBy
+      ],
+      [
+        "first",
+        2
+      ]
+    ]), emptyCtx);
+    let edges1 = getEdges(page1);
+    globalThis.expect(edges1.length).toBe(2);
+    globalThis.expect(edgeNodeField(edges1[0], "name")).toBe("Echo");
+    globalThis.expect(edgeNodeField(edges1[1], "name")).toBe("Delta");
+    globalThis.expect(pageInfoBool(page1, "hasNextPage")).toBe(true);
+    let endCursor1 = Stdlib_Option.getOr(getString(pageInfo(page1), "endCursor"), "");
+    let page2 = await resolver(null, Object.fromEntries([
+      [
+        "orderBy",
+        orderBy
+      ],
+      [
+        "first",
+        2
+      ],
+      [
+        "after",
+        endCursor1
+      ]
+    ]), emptyCtx);
+    let edges2 = getEdges(page2);
+    globalThis.expect(edges2.length).toBe(2);
+    globalThis.expect(edgeNodeField(edges2[0], "name")).toBe("Charlie");
+    globalThis.expect(edgeNodeField(edges2[1], "name")).toBe("Bravo");
+  });
+  globalThis.test("bare request (no first / after) returns a single bounded page", async () => {
+    let match = await buildFixture("PageF");
+    let response = await match[0](null, Object.fromEntries([]), emptyCtx);
+    let edges = getEdges(response);
+    globalThis.expect(edges.length).toBe(5);
+    globalThis.expect(pageInfoBool(response, "hasNextPage")).toBe(false);
+    globalThis.expect(pageInfoBool(response, "hasPreviousPage")).toBe(false);
+  });
+});
+
+export {
+  rowStateSchema,
+  rowStateSchemaWithAnnotations,
+  emptyCtx,
+  argsOf,
+  strJson,
+  numJson,
+  getField,
+  getString,
+  getEdges,
+  edgeCursor,
+  edgeNodeField,
+  pageInfo,
+  pageInfoBool,
+  pageInfoString,
+  buildFixture,
+}
+/*  Not a pure module */

package/tests/adapter/QueryDbStorageSqliteTest.res

@@ -0,0 +1,159 @@
+// Round-trip test for QueryDbStorage_Sqlite.
+
+open JestGlobals
+
+let _ = TestRunner.setup()
+let opts: Pulumi.CustomResourceOptions.t = {}
+
+let makeFreshDb = () => SqliteDriver.openDb(~path=":memory:")
+
+describe("QueryDbStorage_Sqlite", () => {
+  testPromise("save then loadStream round-trips an item", async () => {
+    module TestBus = LocalBus.Make()
+    module DbProvider = {
+      let db = makeFreshDb()
+    }
+    module Storage = QueryDbStorage_Sqlite.Make(TestBus, DbProvider)
+
+    let s = Storage.make(~name="rm1", ~indexes=[], ~api=(), ~apiRole=(), ~opts)
+    let ops = await s.operations->TestRunner.resolve
+
+    let _ = await ops.save(
+      "id1",
+      JSON.Encode.string("value1"),
+      ReventlessCore.QueryDb.Any,
+      None,
+    )
+
+    let items =
+      await ops.loadStream("id1")
+      ->Stream.runCollect
+      ->Effect.catchAll(_ => Effect.succeed([]))
+      ->Effect.runPromise
+
+    expect(items->Array.length)->toBe(1)
+    expect(items->Array.getUnsafe(0))->toEqual(JSON.Encode.string("value1"))
+  })
+
+  testPromise("save overwrites existing item at same (id, subKey)", async () => {
+    module TestBus = LocalBus.Make()
+    module DbProvider = {
+      let db = makeFreshDb()
+    }
+    module Storage = QueryDbStorage_Sqlite.Make(TestBus, DbProvider)
+
+    let s = Storage.make(~name="rm2", ~indexes=[], ~api=(), ~apiRole=(), ~opts)
+    let ops = await s.operations->TestRunner.resolve
+
+    let _ = await ops.save("k", JSON.Encode.string("a"), ReventlessCore.QueryDb.Any, None)
+    let _ = await ops.save("k", JSON.Encode.string("b"), ReventlessCore.QueryDb.Any, None)
+
+    let items =
+      await ops.loadStream("k")
+      ->Stream.runCollect
+      ->Effect.catchAll(_ => Effect.succeed([]))
+      ->Effect.runPromise
+
+    expect(items->Array.length)->toBe(1)
+    expect(items->Array.getUnsafe(0))->toEqual(JSON.Encode.string("b"))
+  })
+
+  testPromise("saveBatch atomically writes several items", async () => {
+    module TestBus = LocalBus.Make()
+    module DbProvider = {
+      let db = makeFreshDb()
+    }
+    module Storage = QueryDbStorage_Sqlite.Make(TestBus, DbProvider)
+
+    let s = Storage.make(~name="rm3", ~indexes=[], ~api=(), ~apiRole=(), ~opts)
+    let ops = await s.operations->TestRunner.resolve
+
+    let _ = await ops.saveBatch([
+      ("id1", JSON.Encode.string("one"), None),
+      ("id2", JSON.Encode.string("two"), None),
+      ("id3", JSON.Encode.string("three"), None),
+    ])
+
+    let items1 =
+      await ops.loadStream("id1")
+      ->Stream.runCollect
+      ->Effect.catchAll(_ => Effect.succeed([]))
+      ->Effect.runPromise
+    let items2 =
+      await ops.loadStream("id2")
+      ->Stream.runCollect
+      ->Effect.catchAll(_ => Effect.succeed([]))
+      ->Effect.runPromise
+    let items3 =
+      await ops.loadStream("id3")
+      ->Stream.runCollect
+      ->Effect.catchAll(_ => Effect.succeed([]))
+      ->Effect.runPromise
+
+    expect(items1->Array.length)->toBe(1)
+    expect(items2->Array.length)->toBe(1)
+    expect(items3->Array.length)->toBe(1)
+  })
+
+  testPromise("delete removes an item from a partition", async () => {
+    module TestBus = LocalBus.Make()
+    module DbProvider = {
+      let db = makeFreshDb()
+    }
+    module Storage = QueryDbStorage_Sqlite.Make(TestBus, DbProvider)
+
+    let s = Storage.make(~name="rm4", ~indexes=[], ~api=(), ~apiRole=(), ~opts)
+    let ops = await s.operations->TestRunner.resolve
+
+    let _ = await ops.save("k", JSON.Encode.string("a"), ReventlessCore.QueryDb.Any, None)
+    let _ = await ops.delete("k", None)
+
+    let items =
+      await ops.loadStream("k")
+      ->Stream.runCollect
+      ->Effect.catchAll(_ => Effect.succeed([]))
+      ->Effect.runPromise
+
+    expect(items->Array.length)->toBe(0)
+  })
+
+  testPromise("items persist across a file reopen", async () => {
+    let path = `/tmp/reventless-test-qdb-${Float.toString(Date.now())}.db`
+
+    // Session 1: write
+    {
+      module TestBus = LocalBus.Make()
+      module DbProvider = {
+        let db = SqliteDriver.openDb(~path)
+      }
+      module Storage = QueryDbStorage_Sqlite.Make(TestBus, DbProvider)
+      let s = Storage.make(~name="persist", ~indexes=[], ~api=(), ~apiRole=(), ~opts)
+      let ops = await s.operations->TestRunner.resolve
+      let _ = await ops.save(
+        "k",
+        JSON.Encode.string("hello"),
+        ReventlessCore.QueryDb.Any,
+        None,
+      )
+      DbProvider.db->SqliteDriver.close
+    }
+
+    // Session 2: read back
+    module TestBus2 = LocalBus.Make()
+    module DbProvider2 = {
+      let db = SqliteDriver.openDb(~path)
+    }
+    module Storage2 = QueryDbStorage_Sqlite.Make(TestBus2, DbProvider2)
+    let s2 = Storage2.make(~name="persist", ~indexes=[], ~api=(), ~apiRole=(), ~opts)
+    let ops2 = await s2.operations->TestRunner.resolve
+    let items =
+      await ops2.loadStream("k")
+      ->Stream.runCollect
+      ->Effect.catchAll(_ => Effect.succeed([]))
+      ->Effect.runPromise
+
+    expect(items->Array.length)->toBe(1)
+    expect(items->Array.getUnsafe(0))->toEqual(JSON.Encode.string("hello"))
+    DbProvider2.db->SqliteDriver.close
+  })
+})