@reventlessdev/reventless-core 3.0.0-alpha.170 → 3.0.0-alpha.171

package/tests/eventlog/EventLogOperationsTest.res.mjs

@@ -1,192 +0,0 @@
-// Generated by ReScript, PLEASE EDIT WITH CARE
-
-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 Stdlib_Result from "@rescript/runtime/lib/es6/Stdlib_Result.js";
-import * as EventLogFixtures$ReventlessCore from "./EventLogFixtures.res.mjs";
-import * as EventLog_Operations$ReventlessCore from "../../src/components/EventLog/EventLog_Operations.res.mjs";
-
-let $$let = EventLogFixtures$ReventlessCore.MockEventTopic.Spec;
-
-let $$let$1 = $$let.Id;
-
-let TestOps_Spec = {
-  Id: Id$Reventless.StringPure,
-  name: EventLogFixtures$ReventlessCore.ItemEventLogSpec.name,
-  eventSchema: EventLogFixtures$ReventlessCore.ItemEventLogSpec.eventSchema
-};
-
-let TestOps_EventTopic = {
-  Spec: {
-    Id: {
-      schema: $$let$1.schema,
-      make: prim => prim,
-      makeFromString: prim => prim,
-      toString: prim => prim,
-      cmp: $$let$1.cmp
-    },
-    name: $$let.name,
-    eventSchema: $$let.eventSchema
-  },
-  make: EventLogFixtures$ReventlessCore.MockEventTopic.make
-};
-
-let TestOps = {
-  Spec: TestOps_Spec,
-  EventTopic: TestOps_EventTopic,
-  eventTopic: EventLogFixtures$ReventlessCore.mockEventTopicOps,
-  storage: EventLogFixtures$ReventlessCore.mockStorage
-};
-
-let $$let$2 = TestOps_Spec;
-
-let $$let$3 = $$let$2.Id;
-
-let Ops = EventLog_Operations$ReventlessCore.Make({
-  Id: {
-    schema: Id$Reventless.StringPure.schema,
-    make: prim => prim,
-    makeFromString: prim => prim,
-    toString: prim => prim,
-    cmp: Id$Reventless.StringPure.cmp
-  },
-  name: EventLogFixtures$ReventlessCore.ItemEventLogSpec.name,
-  eventSchema: EventLogFixtures$ReventlessCore.ItemEventLogSpec.eventSchema
-})({
-  Spec: {
-    Id: {
-      schema: $$let$3.schema,
-      make: prim => prim,
-      makeFromString: prim => prim,
-      toString: prim => prim,
-      cmp: $$let$3.cmp
-    },
-    name: $$let$2.name,
-    eventSchema: $$let$2.eventSchema
-  },
-  EventTopic: TestOps_EventTopic,
-  eventTopic: EventLogFixtures$ReventlessCore.mockEventTopicOps,
-  storage: EventLogFixtures$ReventlessCore.mockStorage
-});
-
-globalThis.beforeEach(() => EventLogFixtures$ReventlessCore.reset());
-
-globalThis.describe("EventLog_Operations:", () => {
-  globalThis.describe("append", () => {
-    globalThis.test("stores encoded events in storage", async () => {
-      let event$p = EventLogFixtures$ReventlessCore.makeEvent$p("item-1", {
-        TAG: "ItemCreated",
-        name: "Widget"
-      });
-      await Ops.append(1, "item-1", [event$p]);
-      let stored = Stdlib_Option.getOr(EventLogFixtures$ReventlessCore.storedEvents.contents["item-1"], []);
-      globalThis.expect(stored.length).toBe(1);
-    });
-    globalThis.test("publishes events to event topic", async () => {
-      let event$p = EventLogFixtures$ReventlessCore.makeEvent$p("item-1", {
-        TAG: "ItemCreated",
-        name: "Widget"
-      });
-      await Ops.append(1, "item-1", [event$p]);
-      globalThis.expect(EventLogFixtures$ReventlessCore.capturedPublishes.contents.length).toBe(1);
-    });
-    globalThis.test("storage failure returns Error result", async () => {
-      EventLogFixtures$ReventlessCore.failNextAppend.contents = true;
-      let event$p = EventLogFixtures$ReventlessCore.makeEvent$p("item-1", {
-        TAG: "ItemCreated",
-        name: "Widget"
-      });
-      let result = await Ops.append(1, "item-1", [event$p]);
-      globalThis.expect(Stdlib_Result.isError(result)).toBe(true);
-    });
-    globalThis.test("multiple events all stored and published", async () => {
-      let events$p = [
-        EventLogFixtures$ReventlessCore.makeEvent$p("item-1", {
-          TAG: "ItemCreated",
-          name: "First"
-        }),
-        EventLogFixtures$ReventlessCore.makeEvent$p("item-2", {
-          TAG: "ItemCreated",
-          name: "Second"
-        })
-      ];
-      await Ops.append(1, "agg-1", events$p);
-      let stored = Stdlib_Option.getOr(EventLogFixtures$ReventlessCore.storedEvents.contents["agg-1"], []);
-      globalThis.expect([
-        stored.length,
-        EventLogFixtures$ReventlessCore.capturedPublishes.contents.length
-      ]).toEqual([
-        2,
-        2
-      ]);
-    });
-    globalThis.test("returns Ok on success", async () => {
-      let event$p = EventLogFixtures$ReventlessCore.makeEvent$p("item-1", {
-        TAG: "ItemCreated",
-        name: "Widget"
-      });
-      let result = await Ops.append(1, "item-1", [event$p]);
-      globalThis.expect(Stdlib_Result.isOk(result)).toBe(true);
-    });
-  });
-  globalThis.describe("replay", () => {
-    globalThis.test("returns empty array for unknown id", async () => {
-      let events = await Ops.replay("unknown-id");
-      globalThis.expect(events.length).toBe(0);
-    });
-    globalThis.test("decodes stored events back to typed events", async () => {
-      let event = {
-        TAG: "ItemCreated",
-        name: "Widget"
-      };
-      let event$p = EventLogFixtures$ReventlessCore.makeEvent$p("item-1", event);
-      await Ops.append(1, "item-1", [event$p]);
-      let replayed = await Ops.replay("item-1");
-      globalThis.expect(replayed.length).toBe(1);
-      let first = replayed[0];
-      globalThis.expect(first).toEqual(event);
-    });
-    globalThis.test("decodes multiple events in order", async () => {
-      let events = [
-        {
-          TAG: "ItemCreated",
-          name: "Widget"
-        },
-        {
-          TAG: "ItemDeleted",
-          id: "item-1"
-        }
-      ];
-      let events$p = events.map(event => EventLogFixtures$ReventlessCore.makeEvent$p("item-1", event));
-      await Ops.append(1, "item-1", events$p);
-      let replayed = await Ops.replay("item-1");
-      globalThis.expect(replayed.length).toBe(2);
-      globalThis.expect(replayed).toEqual(events);
-    });
-    globalThis.test("separate aggregates have independent event logs", async () => {
-      await Ops.append(1, "agg-A", [EventLogFixtures$ReventlessCore.makeEvent$p("agg-A", {
-          TAG: "ItemCreated",
-          name: "A"
-        })]);
-      await Ops.append(1, "agg-B", [EventLogFixtures$ReventlessCore.makeEvent$p("agg-B", {
-          TAG: "ItemDeleted",
-          id: "B"
-        })]);
-      let eventsA = await Ops.replay("agg-A");
-      let eventsB = await Ops.replay("agg-B");
-      globalThis.expect([
-        eventsA.length,
-        eventsB.length
-      ]).toEqual([
-        1,
-        1
-      ]);
-    });
-  });
-});
-
-export {
-  TestOps,
-  Ops,
-}
-/* Ops Not a pure module */

package/tests/eventlog/EventLogRetryTest.res.mjs

@@ -1,195 +0,0 @@
-// Generated by ReScript, PLEASE EDIT WITH CARE
-
-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 Stdlib_Result from "@rescript/runtime/lib/es6/Stdlib_Result.js";
-import * as EventLogFixtures$ReventlessCore from "./EventLogFixtures.res.mjs";
-import * as EventLog_Operations$ReventlessCore from "../../src/components/EventLog/EventLog_Operations.res.mjs";
-
-let $$let = EventLogFixtures$ReventlessCore.MockEventTopic.Spec;
-
-let $$let$1 = $$let.Id;
-
-let TestOps_Spec = {
-  Id: Id$Reventless.StringPure,
-  name: EventLogFixtures$ReventlessCore.ItemEventLogSpec.name,
-  eventSchema: EventLogFixtures$ReventlessCore.ItemEventLogSpec.eventSchema
-};
-
-let TestOps_EventTopic = {
-  Spec: {
-    Id: {
-      schema: $$let$1.schema,
-      make: prim => prim,
-      makeFromString: prim => prim,
-      toString: prim => prim,
-      cmp: $$let$1.cmp
-    },
-    name: $$let.name,
-    eventSchema: $$let.eventSchema
-  },
-  make: EventLogFixtures$ReventlessCore.MockEventTopic.make
-};
-
-let TestOps = {
-  Spec: TestOps_Spec,
-  EventTopic: TestOps_EventTopic,
-  eventTopic: EventLogFixtures$ReventlessCore.mockEventTopicOps,
-  storage: EventLogFixtures$ReventlessCore.mockStorage
-};
-
-let $$let$2 = TestOps_Spec;
-
-let $$let$3 = $$let$2.Id;
-
-let Ops = EventLog_Operations$ReventlessCore.Make({
-  Id: {
-    schema: Id$Reventless.StringPure.schema,
-    make: prim => prim,
-    makeFromString: prim => prim,
-    toString: prim => prim,
-    cmp: Id$Reventless.StringPure.cmp
-  },
-  name: EventLogFixtures$ReventlessCore.ItemEventLogSpec.name,
-  eventSchema: EventLogFixtures$ReventlessCore.ItemEventLogSpec.eventSchema
-})({
-  Spec: {
-    Id: {
-      schema: $$let$3.schema,
-      make: prim => prim,
-      makeFromString: prim => prim,
-      toString: prim => prim,
-      cmp: $$let$3.cmp
-    },
-    name: $$let$2.name,
-    eventSchema: $$let$2.eventSchema
-  },
-  EventTopic: TestOps_EventTopic,
-  eventTopic: EventLogFixtures$ReventlessCore.mockEventTopicOps,
-  storage: EventLogFixtures$ReventlessCore.mockStorage
-});
-
-globalThis.beforeEach(() => EventLogFixtures$ReventlessCore.reset());
-
-globalThis.describe("EventLog_Operations — retry:", () => {
-  globalThis.describe("isTransient predicate:", () => {
-    globalThis.test("ThrottlingException is transient", async () => {
-      globalThis.expect(EventLog_Operations$ReventlessCore.isTransient({
-        TAG: "StorageFailure",
-        _0: "ThrottlingException: Rate exceeded"
-      })).toBe(true);
-    });
-    globalThis.test("ProvisionedThroughputExceededException is transient", async () => {
-      globalThis.expect(EventLog_Operations$ReventlessCore.isTransient({
-        TAG: "StorageFailure",
-        _0: "ProvisionedThroughputExceededException"
-      })).toBe(true);
-    });
-    globalThis.test("ServiceUnavailable is transient", async () => {
-      globalThis.expect(EventLog_Operations$ReventlessCore.isTransient({
-        TAG: "StorageFailure",
-        _0: "ServiceUnavailable"
-      })).toBe(true);
-    });
-    globalThis.test("RequestLimitExceeded is transient", async () => {
-      globalThis.expect(EventLog_Operations$ReventlessCore.isTransient({
-        TAG: "StorageFailure",
-        _0: "RequestLimitExceeded"
-      })).toBe(true);
-    });
-    globalThis.test("InternalServerError is transient", async () => {
-      globalThis.expect(EventLog_Operations$ReventlessCore.isTransient({
-        TAG: "StorageFailure",
-        _0: "InternalServerError: something went wrong"
-      })).toBe(true);
-    });
-    globalThis.test("ValidationException is not transient", async () => {
-      globalThis.expect(EventLog_Operations$ReventlessCore.isTransient({
-        TAG: "StorageFailure",
-        _0: "ValidationException: invalid field"
-      })).toBe(false);
-    });
-    globalThis.test("generic mock storage failure is not transient", async () => {
-      globalThis.expect(EventLog_Operations$ReventlessCore.isTransient({
-        TAG: "StorageFailure",
-        _0: "mock storage failure"
-      })).toBe(false);
-    });
-    globalThis.test("a Conflict is never transient (retried a layer up, not here)", async () => {
-      globalThis.expect(EventLog_Operations$ReventlessCore.isTransient("Conflict")).toBe(false);
-    });
-  });
-  globalThis.describe("permanent storage failure:", () => {
-    globalThis.test("returns Error immediately without retry", async () => {
-      EventLogFixtures$ReventlessCore.failNextAppend.contents = true;
-      let event$p = EventLogFixtures$ReventlessCore.makeEvent$p("item-1", {
-        TAG: "ItemCreated",
-        name: "Widget"
-      });
-      let result = await Ops.append(1, "item-1", [event$p]);
-      globalThis.expect(Stdlib_Result.isError(result)).toBe(true);
-      globalThis.expect(EventLogFixtures$ReventlessCore.appendCallCount.contents).toBe(1);
-    });
-    globalThis.test("does not publish events after permanent storage failure", async () => {
-      EventLogFixtures$ReventlessCore.failNextAppend.contents = true;
-      let event$p = EventLogFixtures$ReventlessCore.makeEvent$p("item-1", {
-        TAG: "ItemCreated",
-        name: "Widget"
-      });
-      await Ops.append(1, "item-1", [event$p]);
-      globalThis.expect(EventLogFixtures$ReventlessCore.capturedPublishes.contents.length).toBe(0);
-    });
-  });
-  globalThis.describe("transient storage failure — retry:", () => {
-    globalThis.test("1 transient failure retries and returns Ok", async () => {
-      EventLogFixtures$ReventlessCore.failNextAppendsWithTransient.contents = 1;
-      let event$p = EventLogFixtures$ReventlessCore.makeEvent$p("item-1", {
-        TAG: "ItemCreated",
-        name: "Widget"
-      });
-      let result = await Ops.append(1, "item-1", [event$p]);
-      globalThis.expect(Stdlib_Result.isOk(result)).toBe(true);
-      globalThis.expect(EventLogFixtures$ReventlessCore.appendCallCount.contents).toBe(2);
-    });
-    globalThis.test("events are stored and published after successful retry", async () => {
-      EventLogFixtures$ReventlessCore.failNextAppendsWithTransient.contents = 1;
-      let event$p = EventLogFixtures$ReventlessCore.makeEvent$p("item-1", {
-        TAG: "ItemCreated",
-        name: "Widget"
-      });
-      await Ops.append(1, "item-1", [event$p]);
-      let stored = Stdlib_Option.getOr(EventLogFixtures$ReventlessCore.storedEvents.contents["item-1"], []);
-      globalThis.expect(stored.length).toBe(1);
-      globalThis.expect(EventLogFixtures$ReventlessCore.capturedPublishes.contents.length).toBe(1);
-    });
-    globalThis.test("2 transient failures retry twice and return Ok", async () => {
-      EventLogFixtures$ReventlessCore.failNextAppendsWithTransient.contents = 2;
-      let event$p = EventLogFixtures$ReventlessCore.makeEvent$p("item-1", {
-        TAG: "ItemCreated",
-        name: "Widget"
-      });
-      let result = await Ops.append(1, "item-1", [event$p]);
-      globalThis.expect(Stdlib_Result.isOk(result)).toBe(true);
-      globalThis.expect(EventLogFixtures$ReventlessCore.appendCallCount.contents).toBe(3);
-    });
-  });
-  globalThis.describe("retry exhaustion:", () => {
-    globalThis.test("6 transient failures exhaust 5 retries and return Error", async () => {
-      EventLogFixtures$ReventlessCore.failNextAppendsWithTransient.contents = 6;
-      let event$p = EventLogFixtures$ReventlessCore.makeEvent$p("item-1", {
-        TAG: "ItemCreated",
-        name: "Widget"
-      });
-      let result = await Ops.append(1, "item-1", [event$p]);
-      globalThis.expect(Stdlib_Result.isError(result)).toBe(true);
-      globalThis.expect(EventLogFixtures$ReventlessCore.appendCallCount.contents).toBe(6);
-      globalThis.expect(EventLogFixtures$ReventlessCore.capturedPublishes.contents.length).toBe(0);
-    }, 12000);
-  });
-});
-
-export {
-  TestOps,
-  Ops,
-}
-/* Ops Not a pure module */

package/tests/eventmapper/EventMapperCallbackTest.res.mjs

@@ -1,141 +0,0 @@
-// Generated by ReScript, PLEASE EDIT WITH CARE
-
-import * as Effect from "effect/Effect";
-import * as Stream from "effect/Stream";
-import * as Message$ReventlessCore from "../../src/Message.res.mjs";
-import * as EventMapperFixtures$ReventlessCore from "./EventMapperFixtures.res.mjs";
-
-globalThis.beforeEach(() => EventMapperFixtures$ReventlessCore.resetMocks());
-
-globalThis.describe("MakeCounterHandler.handleCounterEvents:", () => {
-  globalThis.describe("event with matching source mapping", () => {
-    globalThis.test("publishes command JSON for OrderPlaced", async () => {
-      let eventJson = EventMapperFixtures$ReventlessCore.makeEventJson(undefined, "src-1", Message$ReventlessCore.encode({
-        TAG: "OrderPlaced",
-        orderId: "order-1",
-        amount: 99.99
-      }, EventMapperFixtures$ReventlessCore.CmdSourceSpec.eventSchema));
-      await Effect.runPromise(EventMapperFixtures$ReventlessCore.TestCounterHandler.handleCounterEvents(Stream.fromIterable([eventJson])));
-      globalThis.expect(EventMapperFixtures$ReventlessCore.capturedCmds.contents.length).toBe(1);
-    });
-  });
-  globalThis.describe("event with unknown service", () => {
-    globalThis.test("skipped — no publish", async () => {
-      let eventJson = EventMapperFixtures$ReventlessCore.makeEventJson("UnknownService", "src-1", Message$ReventlessCore.encode({
-        TAG: "OrderPlaced",
-        orderId: "order-1",
-        amount: 50.0
-      }, EventMapperFixtures$ReventlessCore.CmdSourceSpec.eventSchema));
-      await Effect.runPromise(EventMapperFixtures$ReventlessCore.TestCounterHandler.handleCounterEvents(Stream.fromIterable([eventJson])));
-      globalThis.expect(EventMapperFixtures$ReventlessCore.capturedCmds.contents.length).toBe(0);
-    });
-  });
-  globalThis.describe("invalid event JSON", () => {
-    globalThis.test("skipped gracefully — no throw, no publish", async () => {
-      await Effect.runPromise(EventMapperFixtures$ReventlessCore.TestCounterHandler.handleCounterEvents(Stream.fromIterable(["not-an-object"])));
-      globalThis.expect(EventMapperFixtures$ReventlessCore.capturedCmds.contents.length).toBe(0);
-    });
-  });
-});
-
-globalThis.describe("MakeEventCollectorHandler.handleJsonEvents:", () => {
-  globalThis.describe("Count action", () => {
-    globalThis.test("calls count with the countItem", async () => {
-      let countItem = {
-        counterId: "c1",
-        reference: "ref-1",
-        inc: 1
-      };
-      EventMapperFixtures$ReventlessCore.mockCommonHandler.contents = async param => [
-        Promise.resolve([]),
-        [{
-            TAG: "Count",
-            _0: countItem
-          }]
-      ];
-      await Effect.runPromise(EventMapperFixtures$ReventlessCore.TestECHandler.handleJsonEvents(Stream.fromIterable([null])));
-      globalThis.expect(EventMapperFixtures$ReventlessCore.capturedCountItems.contents).toEqual([countItem]);
-    });
-  });
-  globalThis.describe("AddToCounterTarget action", () => {
-    globalThis.test("calls addToCounterTarget with the counterTargetRef", async () => {
-      let target = {
-        counterId: "c1",
-        target: 5,
-        targetRef: "ref-1"
-      };
-      EventMapperFixtures$ReventlessCore.mockCommonHandler.contents = async param => [
-        Promise.resolve([]),
-        [{
-            TAG: "AddToCounterTarget",
-            _0: target
-          }]
-      ];
-      await Effect.runPromise(EventMapperFixtures$ReventlessCore.TestECHandler.handleJsonEvents(Stream.fromIterable([null])));
-      globalThis.expect(EventMapperFixtures$ReventlessCore.capturedCounterTargets.contents).toEqual([target]);
-    });
-  });
-  globalThis.describe("Publisher action", () => {
-    globalThis.test("calls publishJsons with the command", async () => {
-      let cmd = {
-        id: "agg-1",
-        meta: EventMapperFixtures$ReventlessCore.evtMapTestMeta,
-        commandJson: "DoSomething"
-      };
-      EventMapperFixtures$ReventlessCore.mockCommonHandler.contents = async param => [
-        Promise.resolve([cmd]),
-        []
-      ];
-      await Effect.runPromise(EventMapperFixtures$ReventlessCore.TestECHandler.handleJsonEvents(Stream.fromIterable([null])));
-      globalThis.expect(EventMapperFixtures$ReventlessCore.capturedCmds.contents.length).toBe(1);
-    });
-  });
-  globalThis.describe("mixed actions", () => {
-    globalThis.test("both publish and count called", async () => {
-      let cmd = {
-        id: "agg-1",
-        meta: EventMapperFixtures$ReventlessCore.evtMapTestMeta,
-        commandJson: "Cmd"
-      };
-      EventMapperFixtures$ReventlessCore.mockCommonHandler.contents = async param => [
-        Promise.resolve([cmd]),
-        [{
-            TAG: "Count",
-            _0: {
-              counterId: "c1",
-              reference: "ref-1",
-              inc: 2
-            }
-          }]
-      ];
-      await Effect.runPromise(EventMapperFixtures$ReventlessCore.TestECHandler.handleJsonEvents(Stream.fromIterable([null])));
-      globalThis.expect([
-        EventMapperFixtures$ReventlessCore.capturedCmds.contents.length,
-        EventMapperFixtures$ReventlessCore.capturedCountItems.contents.length
-      ]).toEqual([
-        1,
-        1
-      ]);
-    });
-  });
-  globalThis.describe("doCount retry", () => {
-    globalThis.test("retries when count throws, eventually succeeds", async () => {
-      EventMapperFixtures$ReventlessCore.mockCountFailUntil.contents = 1;
-      EventMapperFixtures$ReventlessCore.mockCommonHandler.contents = async param => [
-        Promise.resolve([]),
-        [{
-            TAG: "Count",
-            _0: {
-              counterId: "c1",
-              reference: "ref-1",
-              inc: 1
-            }
-          }]
-      ];
-      await Effect.runPromise(EventMapperFixtures$ReventlessCore.TestECHandler.handleJsonEvents(Stream.fromIterable([null])));
-      globalThis.expect(EventMapperFixtures$ReventlessCore.mockCountCallCount.contents >= 2).toBe(true);
-    });
-  });
-});
-
-/*  Not a pure module */