@reventlessdev/reventless-local 3.0.0-alpha.113

package/tests/components/readmodel/DcbReadModelE2ETest.res.mjs

@@ -0,0 +1,37 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+import * as TestRunner$ReventlessLocal from "../../../src/test/TestRunner.res.mjs";
+import * as DcbReadModelE2EFixtures$ReventlessLocal from "./DcbReadModelE2EFixtures.res.mjs";
+
+globalThis.describe("DCB → ReadModel E2E:", () => {
+  globalThis.beforeAll(async () => {
+    await TestRunner$ReventlessLocal.resolve(DcbReadModelE2EFixtures$ReventlessLocal.DcbLogMaker.operations(DcbReadModelE2EFixtures$ReventlessLocal.dcbEventLog));
+    await TestRunner$ReventlessLocal.resolve(DcbReadModelE2EFixtures$ReventlessLocal.ProductsReadModel.operations(DcbReadModelE2EFixtures$ReventlessLocal.rm));
+    let resource = DcbReadModelE2EFixtures$ReventlessLocal.dcbTopicOutputs.resources[0];
+    await TestRunner$ReventlessLocal.resolve(resource.name);
+  });
+  globalThis.test("AddProduct command updates the ReadModel state", async () => {
+    await DcbReadModelE2EFixtures$ReventlessLocal.dispatch(DcbReadModelE2EFixtures$ReventlessLocal.addProductCmd("prod-1", "Laptop"), "prod-1");
+    let states = await DcbReadModelE2EFixtures$ReventlessLocal.loadState("prod-1");
+    globalThis.expect(states.length).toBe(1);
+    let state = states[0];
+    globalThis.expect(state.productId).toBe("prod-1");
+    globalThis.expect(state.name).toBe("Laptop");
+  });
+  globalThis.test("second AddProduct for the same id is a no-op (decide returns Error)", async () => {
+    await DcbReadModelE2EFixtures$ReventlessLocal.dispatch(DcbReadModelE2EFixtures$ReventlessLocal.addProductCmd("prod-1", "Different name"), "prod-1");
+    let states = await DcbReadModelE2EFixtures$ReventlessLocal.loadState("prod-1");
+    globalThis.expect(states.length).toBe(1);
+    let state = states[0];
+    globalThis.expect(state.name).toBe("Laptop");
+  });
+  globalThis.test("a different product id gets its own entry", async () => {
+    await DcbReadModelE2EFixtures$ReventlessLocal.dispatch(DcbReadModelE2EFixtures$ReventlessLocal.addProductCmd("prod-2", "Headphones"), "prod-2");
+    let states = await DcbReadModelE2EFixtures$ReventlessLocal.loadState("prod-2");
+    globalThis.expect(states.length).toBe(1);
+    let state = states[0];
+    globalThis.expect(state.name).toBe("Headphones");
+  });
+});
+
+/*  Not a pure module */

package/tests/components/readmodel/DcbReadModelTypoFailFastTest.res

@@ -0,0 +1,88 @@
+// Verifies Phase 2 of Plan 03: a ReadModel whose `Mapping.sourceName` doesn't
+// match any key in `allEventTopics` fails plugin assembly (here: ReadModel
+// construction) with a clear error, instead of silently producing zero events.
+
+open JestGlobals
+open Reventless
+open Reventless.Projection
+
+// ─────────────────────────────────────────────────────────────
+// Bus setup (isolated from the happy-path E2E test)
+// ─────────────────────────────────────────────────────────────
+
+module Bus = LocalBus.Make()
+let _ = TestRunner.setup()
+
+// ─────────────────────────────────────────────────────────────
+// Source whose name DOES NOT match any key in allEventTopics
+// (intentional typo: "MissingDcb" vs the real "ProductCatalogDcbEventLog")
+// ─────────────────────────────────────────────────────────────
+
+module TypoSource = {
+  module Id = Reventless.Id.String
+  let name = "MissingDcb"
+
+  @schema
+  type event = ProductAdded({productId: string, name: string})
+}
+
+module RmSpec = {
+  module Id = Reventless.Id.String
+  let name = "TypoCheckReadModel"
+  let moduleUrl: string = %raw(`import.meta.url`)
+
+  @schema
+  type state = {productId: string, name: string}
+
+  let config = ReadModel.config()
+  let subIdConfig = None
+}
+
+module TypoMapping = Mapping.Make(
+  TypoSource,
+  RmSpec,
+  {
+    let project = (msg: Message.event'<string, TypoSource.event>) =>
+      switch msg.event {
+      | ProductAdded({productId, name}) => Set(productId, ({productId, name}: RmSpec.state))
+      }
+  },
+)
+
+module TypoMappings: Mappings with module Target := RmSpec = {
+  module Mappings = Mappings.Make(RmSpec)
+  module type Mapping = Mappings.Mapping
+  let moduleUrl: string = %raw(`import.meta.url`)
+  let mappings: array<module(Mapping)> = [module(TypoMapping)]
+}
+
+// allEventTopics has ONE entry — but with a different key than the Mapping uses.
+let topicResource: ReventlessInfra.Adapter.resource = ReventlessInfra.Adapter.make(
+  ~name="ProductCatalogDcbEventLog"->Pulumi.Output.make,
+  ~id="ProductCatalogDcbEventLog"->Pulumi.Output.make,
+  ~urn="ProductCatalogDcbEventLog"->Pulumi.Output.make,
+  ~service="memory:InMemory"->Pulumi.Output.make,
+)
+let allEventTopics: ReventlessInfra.EventTopic.allOutputs = Dict.fromArray([
+  ("ProductCatalogDcbEventLog", {ReventlessInfra.EventTopic.resources: [topicResource]}),
+])
+
+module ReadModelMaker = ReadModel_Builder.Make(Bus)
+module RmMaker = ReadModelMaker.Make(RmSpec, TypoMappings)
+
+describe("ReadModel source-name fail-fast:", () => {
+  testSync("constructing a ReadModel whose Mapping.sourceName is missing throws", () => {
+    let threw = ref(false)
+    let msg = ref("")
+    try {
+      let _ = RmMaker.make(~api=(), ~apiRole=(), ~allEventTopics)
+    } catch {
+    | JsExn(err) =>
+      threw := true
+      msg := err->JsExn.message->Option.getOr("")
+    }
+    expect(threw.contents)->toBe(true)->ignore
+    expect(msg.contents->String.includes("MissingDcb"))->toBe(true)->ignore
+    expect(msg.contents->String.includes("ProductCatalogDcbEventLog"))->toBe(true)
+  })
+})

package/tests/components/readmodel/DcbReadModelTypoFailFastTest.res.mjs

@@ -0,0 +1,152 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+import * as S from "sury/src/S.res.mjs";
+import * as Stdlib_JsExn from "@rescript/runtime/lib/es6/Stdlib_JsExn.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 Primitive_exceptions from "@rescript/runtime/lib/es6/Primitive_exceptions.js";
+import * as ReadModel$Reventless from "@reventlessdev/reventless-spec/src/components/ReadModel.res.mjs";
+import * as Projection$Reventless from "@reventlessdev/reventless-spec/src/types/Projection.res.mjs";
+import * as Adapter$ReventlessInfra from "@reventlessdev/reventless-infra/src/adapter/Adapter.res.mjs";
+import * as LocalBus$ReventlessLocal from "../../../src/adapter/LocalBus.res.mjs";
+import * as TestRunner$ReventlessLocal from "../../../src/test/TestRunner.res.mjs";
+import * as ReadModel_Builder$ReventlessLocal from "../../../src/components/ReadModel_Builder.res.mjs";
+
+let Bus = LocalBus$ReventlessLocal.Make({});
+
+TestRunner$ReventlessLocal.setup();
+
+let name = "MissingDcb";
+
+let eventSchema = S.schema(s => ({
+  TAG: "ProductAdded",
+  productId: s.m(S.string),
+  name: s.m(S.string)
+}));
+
+let TypoSource = {
+  Id: undefined,
+  name: name,
+  eventSchema: eventSchema
+};
+
+let name$1 = "TypoCheckReadModel";
+
+let moduleUrl = import.meta.url;
+
+let stateSchema = S.schema(s => ({
+  productId: s.m(S.string),
+  name: s.m(S.string)
+}));
+
+let config = ReadModel$Reventless.config(undefined, undefined, undefined);
+
+let RmSpec = {
+  Id: undefined,
+  name: name$1,
+  moduleUrl: moduleUrl,
+  stateSchema: stateSchema,
+  config: config,
+  subIdConfig: undefined,
+  authorization: "AllowAuthenticated",
+  visibility: "Public"
+};
+
+function project(msg) {
+  let match = msg.event;
+  let productId = match.productId;
+  return {
+    TAG: "Set",
+    _0: productId,
+    _1: {
+      productId: productId,
+      name: match.name
+    }
+  };
+}
+
+let TypoMapping = Projection$Reventless.Mapping.Make({
+  Id: Id$Reventless.$$String,
+  name: name,
+  eventSchema: eventSchema
+})({
+  Id: Id$Reventless.$$String,
+  name: name$1,
+  stateSchema: stateSchema,
+  subIdConfig: undefined
+})({
+  project: project
+});
+
+Projection$Reventless.Mappings.Make({
+  Id: Id$Reventless.$$String,
+  name: name$1,
+  stateSchema: stateSchema,
+  subIdConfig: undefined
+});
+
+let moduleUrl$1 = import.meta.url;
+
+let mappings = [TypoMapping];
+
+let TypoMappings = {
+  moduleUrl: moduleUrl$1,
+  mappings: mappings
+};
+
+let topicResource = Adapter$ReventlessInfra.make(Pulumi.output("ProductCatalogDcbEventLog"), Pulumi.output("ProductCatalogDcbEventLog"), Pulumi.output("ProductCatalogDcbEventLog"), Pulumi.output("memory:InMemory"), undefined, undefined, undefined, undefined, undefined, undefined);
+
+let allEventTopics = Object.fromEntries([[
+    "ProductCatalogDcbEventLog",
+    {
+      resources: [topicResource]
+    }
+  ]]);
+
+let ReadModelMaker = ReadModel_Builder$ReventlessLocal.Make(Bus);
+
+let RmMaker = ReadModelMaker.Make({
+  Id: Id$Reventless.$$String,
+  name: name$1,
+  moduleUrl: moduleUrl,
+  stateSchema: stateSchema,
+  config: config,
+  subIdConfig: undefined,
+  authorization: "AllowAuthenticated",
+  visibility: "Public"
+})(TypoMappings);
+
+globalThis.describe("ReadModel source-name fail-fast:", () => {
+  globalThis.test("constructing a ReadModel whose Mapping.sourceName is missing throws", () => {
+    let threw = false;
+    let msg = "";
+    try {
+      RmMaker.make(undefined, undefined, allEventTopics, undefined);
+    } catch (raw_err) {
+      let err = Primitive_exceptions.internalToException(raw_err);
+      if (err.RE_EXN_ID === "JsExn") {
+        threw = true;
+        msg = Stdlib_Option.getOr(Stdlib_JsExn.message(err._1), "");
+      } else {
+        throw err;
+      }
+    }
+    globalThis.expect(threw).toBe(true);
+    globalThis.expect(msg.includes("MissingDcb")).toBe(true);
+    globalThis.expect(msg.includes("ProductCatalogDcbEventLog")).toBe(true);
+  });
+});
+
+export {
+  Bus,
+  TypoSource,
+  RmSpec,
+  TypoMapping,
+  TypoMappings,
+  topicResource,
+  allEventTopics,
+  ReadModelMaker,
+  RmMaker,
+}
+/* Bus Not a pure module */

package/tests/components/readmodel/MixedSourceReadModelFixtures.res

@@ -0,0 +1,181 @@
+// Fixtures for testing a ReadModel that subscribes to two independent event sources.
+// Verifies the mixed-source capability where Plugin_Builder merges both aggregate
+// and DCB EventTopics into allEventTopics (Step 1.1 of hybrid improvements).
+
+open TestFixtures
+open Reventless
+open Reventless.Projection
+
+// ─────────────────────────────────────────────────────────────
+// ReadModel spec — unified view combining events from two sources
+// ─────────────────────────────────────────────────────────────
+
+module MixedReadModelSpec = {
+  module Id = Reventless.Id.String
+  let name = "TestMixedReadModel"
+  let moduleUrl: string = %raw(`import.meta.url`)
+
+  @schema
+  type state = {
+    name: string,
+    source: string,
+  }
+
+  let config = ReadModel.config()
+  let subIdConfig = None
+}
+
+// ─────────────────────────────────────────────────────────────
+// Source 1: simulates an aggregate EventTopic
+// ─────────────────────────────────────────────────────────────
+
+module AggregateSource = {
+  module Id = Reventless.Id.String
+  let name = "TestAggregateEventTopic"
+
+  @schema
+  type event =
+    | AggregateItemCreated({name: string})
+    | AggregateItemRenamed({name: string})
+}
+
+// ─────────────────────────────────────────────────────────────
+// Source 2: simulates a DCB EventTopic
+// ─────────────────────────────────────────────────────────────
+
+module DcbSource = {
+  module Id = Reventless.Id.String
+  let name = "TestDcbEventTopic"
+
+  @schema
+  type event =
+    | DcbItemAdded({name: string})
+    | DcbItemNameChanged({name: string})
+}
+
+// ─────────────────────────────────────────────────────────────
+// Mapping 1: Aggregate events → ReadModel state
+// ─────────────────────────────────────────────────────────────
+
+module AggregateMapping = Mapping.Make(
+  AggregateSource,
+  MixedReadModelSpec,
+  {
+    let project = (msg: Message.event'<string, AggregateSource.event>) =>
+      switch msg.event {
+      | AggregateItemCreated({name}) =>
+        Create(msg.id, ({name, source: "aggregate"}: MixedReadModelSpec.state))
+      | AggregateItemRenamed({name}) => Update(msg.id, state => {...state, name})
+      }
+  },
+)
+
+// ─────────────────────────────────────────────────────────────
+// Mapping 2: DCB events → ReadModel state
+// ─────────────────────────────────────────────────────────────
+
+module DcbMapping = Mapping.Make(
+  DcbSource,
+  MixedReadModelSpec,
+  {
+    let project = (msg: Message.event'<string, DcbSource.event>) =>
+      switch msg.event {
+      | DcbItemAdded({name}) =>
+        Create(msg.id, ({name, source: "dcb"}: MixedReadModelSpec.state))
+      | DcbItemNameChanged({name}) => Update(msg.id, state => {...state, name})
+      }
+  },
+)
+
+// ─────────────────────────────────────────────────────────────
+// Mappings module with both sources
+// ─────────────────────────────────────────────────────────────
+
+module MixedMappings: Mappings with module Target := MixedReadModelSpec = {
+  module Mappings = Mappings.Make(MixedReadModelSpec)
+  module type Mapping = Mappings.Mapping
+  let moduleUrl: string = %raw(`import.meta.url`)
+  let mappings: array<module(Mapping)> = [module(AggregateMapping), module(DcbMapping)]
+}
+
+// ─────────────────────────────────────────────────────────────
+// allEventTopics — two entries, one per source
+// ─────────────────────────────────────────────────────────────
+
+let aggregateTopicName = "TestAggregateEventTopic"
+let dcbTopicName = "TestDcbEventTopic"
+
+let aggregateResource: ReventlessInfra.Adapter.resource = ReventlessInfra.Adapter.make(
+  ~name=aggregateTopicName->Pulumi.Output.make,
+  ~id=aggregateTopicName->Pulumi.Output.make,
+  ~urn=aggregateTopicName->Pulumi.Output.make,
+  ~service="memory:InMemory"->Pulumi.Output.make,
+)
+
+let dcbResource: ReventlessInfra.Adapter.resource = ReventlessInfra.Adapter.make(
+  ~name=dcbTopicName->Pulumi.Output.make,
+  ~id=dcbTopicName->Pulumi.Output.make,
+  ~urn=dcbTopicName->Pulumi.Output.make,
+  ~service="memory:InMemory"->Pulumi.Output.make,
+)
+
+let allEventTopics: ReventlessCore.EventTopic.allOutputs = Dict.fromArray([
+  (aggregateTopicName, {ReventlessInfra.EventTopic.resources: [aggregateResource]}),
+  (dcbTopicName, {ReventlessInfra.EventTopic.resources: [dcbResource]}),
+])
+
+// ─────────────────────────────────────────────────────────────
+// Isolated bus + Pulumi mock mode
+// ─────────────────────────────────────────────────────────────
+
+module Bus = LocalBus.Make()
+let _ = TestRunner.setup()
+
+// ─────────────────────────────────────────────────────────────
+// Build ReadModel
+// ─────────────────────────────────────────────────────────────
+
+module ReadModelMaker = ReadModel_Builder.Make(Bus)
+module MixedRM = ReadModelMaker.Make(MixedReadModelSpec, MixedMappings)
+let rm = MixedRM.make(~api=(), ~apiRole=(), ~allEventTopics)
+
+// ─────────────────────────────────────────────────────────────
+// Test helpers
+// ─────────────────────────────────────────────────────────────
+
+let publishAggregateEvent = async (id, event: AggregateSource.event) => {
+  let meta = makeTestMeta(~service="TestAggregateEventTopic")
+  let eventJson = JSON.Encode.object(
+    Dict.fromArray([
+      ("id", id->JSON.Encode.string),
+      ("meta", meta->S.reverseConvertToJsonOrThrow(Message.metaSchema)),
+      ("event", event->S.reverseConvertToJsonOrThrow(AggregateSource.eventSchema)),
+    ]),
+  )
+  await Bus.publishEvent(aggregateTopicName, "test", meta, eventJson)
+}
+
+let publishDcbEvent = async (id, event: DcbSource.event) => {
+  let meta = makeTestMeta(~service="TestDcbEventTopic")
+  let eventJson = JSON.Encode.object(
+    Dict.fromArray([
+      ("id", id->JSON.Encode.string),
+      ("meta", meta->S.reverseConvertToJsonOrThrow(Message.metaSchema)),
+      ("event", event->S.reverseConvertToJsonOrThrow(DcbSource.eventSchema)),
+    ]),
+  )
+  await Bus.publishEvent(dcbTopicName, "test", meta, eventJson)
+}
+
+let loadState = async id => {
+  switch Bus.getQueryDb("TestMixedReadModel") {
+  | None => []
+  | Some(ops) =>
+    let states =
+      await ops.loadStream(id)
+      ->Stream.runCollect
+      ->Effect.catchAll(_ => Effect.succeed([]))
+      ->Effect.runPromise
+    states->Array.map(json => json->S.parseJsonOrThrow(MixedReadModelSpec.stateSchema))
+  }
+}