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

package/tests/IdentityTest.res.mjs

@@ -1,174 +0,0 @@
-// Generated by ReScript, PLEASE EDIT WITH CARE
-
-import * as S from "sury/src/S.res.mjs";
-import * as Identity$Reventless from "@reventlessdev/reventless-spec/src/types/Identity.res.mjs";
-import * as RequestContext$ReventlessCore from "../src/RequestContext.res.mjs";
-
-S.enableJson();
-
-globalThis.describe("Identity", () => {
-  globalThis.describe("anonymous", () => {
-    globalThis.test("has userId 'anonymous'", () => {
-      globalThis.expect(Identity$Reventless.anonymous.userId).toBe("anonymous");
-    });
-    globalThis.test("has empty groups", () => {
-      globalThis.expect(Identity$Reventless.anonymous.groups).toEqual([]);
-    });
-    globalThis.test("has InMemory provider", () => {
-      globalThis.expect(Identity$Reventless.anonymous.provider).toEqual("InMemory");
-    });
-  });
-  globalThis.describe("hasGroup", () => {
-    let identity_groups = [
-      "admin",
-      "editors"
-    ];
-    let identity = {
-      userId: "user-1",
-      username: "alice",
-      groups: identity_groups,
-      provider: "Cognito"
-    };
-    globalThis.test("returns true when group is present", () => {
-      globalThis.expect(Identity$Reventless.hasGroup(identity, "admin")).toBe(true);
-    });
-    globalThis.test("returns false when group is absent", () => {
-      globalThis.expect(Identity$Reventless.hasGroup(identity, "viewers")).toBe(false);
-    });
-  });
-  globalThis.describe("getClaim", () => {
-    let identity_groups = [];
-    let identity_claims = Object.fromEntries([
-      [
-        "tenant",
-        "acme"
-      ],
-      [
-        "role",
-        "manager"
-      ]
-    ]);
-    let identity = {
-      userId: "user-1",
-      username: "alice",
-      groups: identity_groups,
-      claims: identity_claims,
-      provider: "InMemory"
-    };
-    globalThis.test("returns Some for existing claim", () => {
-      globalThis.expect(Identity$Reventless.getClaim(identity, "tenant")).toEqual("acme");
-    });
-    globalThis.test("returns None for missing claim", () => {
-      globalThis.expect(Identity$Reventless.getClaim(identity, "missing")).toEqual(undefined);
-    });
-    globalThis.test("returns None when claims are absent", () => {
-      let noClaims_groups = [];
-      let noClaims = {
-        userId: "user-2",
-        username: "bob",
-        groups: noClaims_groups,
-        provider: "InMemory"
-      };
-      globalThis.expect(Identity$Reventless.getClaim(noClaims, "tenant")).toEqual(undefined);
-    });
-  });
-  globalThis.describe("schema roundtrip", () => {
-    globalThis.test("encode then decode preserves identity", () => {
-      let identity_groups = ["admin"];
-      let identity_claims = Object.fromEntries([[
-          "tenant",
-          "acme"
-        ]]);
-      let identity = {
-        userId: "user-1",
-        username: "alice",
-        groups: identity_groups,
-        claims: identity_claims,
-        provider: "Cognito"
-      };
-      let json = S.reverseConvertToJsonOrThrow(identity, Identity$Reventless.schema);
-      let decoded = S.parseJsonOrThrow(json, Identity$Reventless.schema);
-      globalThis.expect(decoded).toEqual(identity);
-    });
-    globalThis.test("roundtrip with Custom provider", () => {
-      let identity_groups = [];
-      let identity_provider = {
-        TAG: "Custom",
-        _0: "oauth2"
-      };
-      let identity = {
-        userId: "ext-1",
-        username: "external",
-        groups: identity_groups,
-        provider: identity_provider
-      };
-      let json = S.reverseConvertToJsonOrThrow(identity, Identity$Reventless.schema);
-      let decoded = S.parseJsonOrThrow(json, Identity$Reventless.schema);
-      globalThis.expect(decoded).toEqual(identity);
-    });
-    globalThis.test("roundtrip without optional claims", () => {
-      let identity_groups = [];
-      let identity = {
-        userId: "user-3",
-        username: "charlie",
-        groups: identity_groups,
-        provider: "InMemory"
-      };
-      let json = S.reverseConvertToJsonOrThrow(identity, Identity$Reventless.schema);
-      let decoded = S.parseJsonOrThrow(json, Identity$Reventless.schema);
-      globalThis.expect(decoded.userId).toBe("user-3");
-      globalThis.expect(decoded.provider).toEqual("InMemory");
-    });
-  });
-});
-
-globalThis.describe("RequestContext", () => {
-  globalThis.describe("test() constructor", () => {
-    globalThis.test("defaults to anonymous identity", () => {
-      let ctx = RequestContext$ReventlessCore.test(undefined, undefined, undefined);
-      globalThis.expect(ctx.identity.userId).toBe("anonymous");
-    });
-    globalThis.test("accepts custom identity", () => {
-      let identity_groups = ["admin"];
-      let identity = {
-        userId: "user-1",
-        username: "alice",
-        groups: identity_groups,
-        provider: "Cognito"
-      };
-      let ctx = RequestContext$ReventlessCore.test(undefined, identity, undefined);
-      globalThis.expect(ctx.identity.userId).toBe("user-1");
-    });
-    globalThis.test("defaults to empty claims", () => {
-      let ctx = RequestContext$ReventlessCore.test(undefined, undefined, undefined);
-      globalThis.expect(Object.keys(ctx.claims)).toEqual([]);
-    });
-  });
-  globalThis.describe("getClaim", () => {
-    globalThis.test("returns claim value when present", () => {
-      let ctx = RequestContext$ReventlessCore.test(undefined, undefined, Object.fromEntries([[
-          "tenant",
-          "acme"
-        ]]));
-      globalThis.expect(RequestContext$ReventlessCore.getClaim(ctx, "tenant")).toEqual("acme");
-    });
-    globalThis.test("returns None when absent", () => {
-      let ctx = RequestContext$ReventlessCore.test(undefined, undefined, undefined);
-      globalThis.expect(RequestContext$ReventlessCore.getClaim(ctx, "missing")).toEqual(undefined);
-    });
-  });
-  globalThis.describe("withClaim", () => {
-    globalThis.test("adds a claim to the context", () => {
-      let ctx = RequestContext$ReventlessCore.test(undefined, undefined, undefined);
-      let updated = RequestContext$ReventlessCore.withClaim(ctx, "tenant", "acme");
-      globalThis.expect(RequestContext$ReventlessCore.getClaim(updated, "tenant")).toEqual("acme");
-    });
-    globalThis.test("does not mutate the original context", () => {
-      let ctx = RequestContext$ReventlessCore.test(undefined, undefined, undefined);
-      RequestContext$ReventlessCore.withClaim(ctx, "tenant", "acme");
-      globalThis.expect(RequestContext$ReventlessCore.getClaim(ctx, "tenant")).toEqual(undefined);
-    });
-  });
-});
-
-/*  Not a pure module */

package/tests/adapter/MonitoringTest.res.mjs

@@ -1,82 +0,0 @@
-// Generated by ReScript, PLEASE EDIT WITH CARE
-
-import * as Monitoring$ReventlessCore from "../../src/adapter/Monitoring/Monitoring.res.mjs";
-
-let stubResource = {};
-
-globalThis.describe("Monitoring", () => {
-  globalThis.test("Noop default: notify is silent and does not throw", () => {
-    Monitoring$ReventlessCore.notify("CommandHandler", "before", stubResource);
-    globalThis.expect(true).toBe(true);
-  });
-  globalThis.test("use registers a backend that receives every notify, role and name", () => {
-    let recorded = [];
-    let onProvisioned = (kind, name, param) => {
-      recorded.push([
-        kind,
-        name
-      ]);
-    };
-    let Recorder = {
-      onProvisioned: onProvisioned
-    };
-    Monitoring$ReventlessCore.use(Recorder);
-    Monitoring$ReventlessCore.notify("CommandHandler", "AllAggregatesCmdHandler", stubResource);
-    Monitoring$ReventlessCore.notify("Projection", "AllStateViewSlices", stubResource);
-    Monitoring$ReventlessCore.notify("DeadLetterSink", "DeadLetterQueue", stubResource);
-    Monitoring$ReventlessCore.notify({
-      TAG: "Other",
-      _0: "Counter"
-    }, "ProductCounter", stubResource);
-    globalThis.expect(recorded).toEqual([
-      [
-        "CommandHandler",
-        "AllAggregatesCmdHandler"
-      ],
-      [
-        "Projection",
-        "AllStateViewSlices"
-      ],
-      [
-        "DeadLetterSink",
-        "DeadLetterQueue"
-      ],
-      [
-        {
-          TAG: "Other",
-          _0: "Counter"
-        },
-        "ProductCounter"
-      ]
-    ]);
-    Monitoring$ReventlessCore.use(Monitoring$ReventlessCore.Noop);
-  });
-  globalThis.test("notify forwards the static name and component resource to the backend", () => {
-    let seen = {
-      contents: undefined
-    };
-    let onProvisioned = (param, name, component) => {
-      seen.contents = [
-        name,
-        component
-      ];
-    };
-    let Capture = {
-      onProvisioned: onProvisioned
-    };
-    Monitoring$ReventlessCore.use(Capture);
-    Monitoring$ReventlessCore.notify("Scheduler", "HeartbeatUnit", stubResource);
-    let match = seen.contents;
-    if (match !== undefined) {
-      globalThis.expect(match[0]).toBe("HeartbeatUnit");
-    } else {
-      globalThis.expect("no notify received").toBe("a notify");
-    }
-    Monitoring$ReventlessCore.use(Monitoring$ReventlessCore.Noop);
-  });
-});
-
-export {
-  stubResource,
-}
-/*  Not a pure module */

package/tests/admin/Platform_ComponentDefinitionsApiTest.res.mjs

@@ -1,356 +0,0 @@
-// Generated by ReScript, PLEASE EDIT WITH CARE
-
-import * as Stdlib_JSON from "@rescript/runtime/lib/es6/Stdlib_JSON.js";
-import * as Stdlib_Option from "@rescript/runtime/lib/es6/Stdlib_Option.js";
-import * as Primitive_string from "@rescript/runtime/lib/es6/Primitive_string.js";
-import * as Platform_ComponentDefinitionsApi$ReventlessCore from "../../src/admin/Platform_ComponentDefinitionsApi.res.mjs";
-
-let cmd_references = [{
-    fieldName: "categoryId",
-    entity: "Category",
-    plugin: "Catalog"
-  }];
-
-let cmd_apiExposed = true;
-
-let cmd = {
-  name: "Add",
-  schema: "{}",
-  level: "Collection",
-  aggregateIdField: undefined,
-  mutationField: "AddProduct",
-  references: cmd_references,
-  allowedStates: undefined,
-  apiExposed: cmd_apiExposed
-};
-
-let qbl_consumedEventTypes = ["ProductAdded"];
-
-let qbl_linkedWriteSide = ["Product"];
-
-let qbl_searchableFields = ["displayName"];
-
-let qbl = {
-  name: "Products",
-  queryField: "Catalog_Products",
-  schema: "{}",
-  consumedEventTypes: qbl_consumedEventTypes,
-  linkedWriteSide: qbl_linkedWriteSide,
-  labelField: "displayName",
-  searchableFields: qbl_searchableFields,
-  statusField: undefined,
-  visibility: undefined,
-  chapter: undefined
-};
-
-let wbl_commands = [cmd];
-
-let wbl_producedEventTypes = ["ProductAdded"];
-
-let wbl_consumedEventTypes = [];
-
-let wbl_linkedViews = ["Products"];
-
-let wbl_events = [{
-    name: "ProductAdded",
-    schema: "{}",
-    references: []
-  }];
-
-let wbl = {
-  name: "Product",
-  commands: wbl_commands,
-  producedEventTypes: wbl_producedEventTypes,
-  consumedEventTypes: wbl_consumedEventTypes,
-  linkedViews: wbl_linkedViews,
-  consistencyRead: undefined,
-  events: wbl_events,
-  chapter: undefined
-};
-
-let structure_readModels = [qbl];
-
-let structure_stateViewSlices = [];
-
-let structure_stateChangeSlices = [];
-
-let structure_aggregates = [wbl];
-
-let structure_automationSlices = [{
-    name: "Restocker",
-    consumedEventTypes: ["StockLow"],
-    producedCommandTypes: ["Restock"],
-    targetName: "Product",
-    chapter: undefined
-  }];
-
-let structure_outboundTranslationSlices = [{
-    name: "ToShipper",
-    consumedEventTypes: ["OrderPlaced"],
-    inboundCommandTypes: ["Ship"],
-    targetName: undefined,
-    externalSystem: undefined,
-    chapter: undefined
-  }];
-
-let structure_inboundTranslationSlices = [{
-    name: "FromBilling",
-    commandTypes: ["RecordPayment"],
-    targetName: "Order",
-    externalSystem: undefined,
-    chapter: undefined
-  }];
-
-let structure_extensions = [{
-    name: "Catalog.Products.Watcher",
-    delegateNames: ["onAdded"],
-    eventTypes: ["ProductAdded"],
-    commandTypes: []
-  }];
-
-let structure = {
-  readModels: structure_readModels,
-  stateViewSlices: structure_stateViewSlices,
-  stateChangeSlices: structure_stateChangeSlices,
-  aggregates: structure_aggregates,
-  automationSlices: structure_automationSlices,
-  outboundTranslationSlices: structure_outboundTranslationSlices,
-  inboundTranslationSlices: structure_inboundTranslationSlices,
-  extensions: structure_extensions,
-  extensionPoints: undefined
-};
-
-let encoded = Platform_ComponentDefinitionsApi$ReventlessCore.encodePluginStructureEntry("Catalog", structure);
-
-let json = JSON.stringify(encoded);
-
-globalThis.describe("encodePluginStructureEntry", () => {
-  globalThis.test("produces a JSON object with the expected top-level keys", () => {
-    let dict = Stdlib_Option.getOr(Stdlib_JSON.Decode.object(encoded), {});
-    let keys = Object.keys(dict).toSorted(Primitive_string.compare);
-    globalThis.expect(keys).toEqual([
-      "aggregates",
-      "automationSlices",
-      "extensions",
-      "inboundTranslationSlices",
-      "outboundTranslationSlices",
-      "pluginId",
-      "readModels",
-      "stateChangeSlices",
-      "stateViewSlices"
-    ]);
-  });
-  globalThis.test("encodes pluginId", () => {
-    globalThis.expect(json.includes("\"pluginId\":\"Catalog\"")).toEqual(true);
-  });
-  globalThis.test("encodes commandLevel as a literal string", () => {
-    globalThis.expect(json.includes("\"level\":\"Collection\"")).toEqual(true);
-  });
-  globalThis.test("encodes None aggregateIdField as null", () => {
-    globalThis.expect(json.includes("\"aggregateIdField\":null")).toEqual(true);
-  });
-  globalThis.test("encodes None consistencyRead as null", () => {
-    globalThis.expect(json.includes("\"consistencyRead\":null")).toEqual(true);
-  });
-  globalThis.test("encodes Some plugin reference as its inner string", () => {
-    globalThis.expect(json.includes("\"plugin\":\"Catalog\"")).toEqual(true);
-  });
-  globalThis.test("includes the queryableDef name", () => {
-    globalThis.expect(json.includes("\"name\":\"Products\"")).toEqual(true);
-  });
-  globalThis.test("includes the automation slice name", () => {
-    globalThis.expect(json.includes("\"name\":\"Restocker\"")).toEqual(true);
-  });
-  globalThis.test("encodes None allowedStates as null", () => {
-    globalThis.expect(json.includes("\"allowedStates\":null")).toEqual(true);
-  });
-  globalThis.test("encodes the command's apiExposed flag (drives the event-graph API badge)", () => {
-    globalThis.expect(json.includes("\"apiExposed\":true")).toEqual(true);
-  });
-  globalThis.test("encodes None statusField as null", () => {
-    globalThis.expect(json.includes("\"statusField\":null")).toEqual(true);
-  });
-  globalThis.test("encodes writableDef events", () => {
-    globalThis.expect(json.includes("\"events\":[{\"name\":\"ProductAdded\"")).toEqual(true);
-  });
-  globalThis.test("encodes None outbound externalSystem as null", () => {
-    globalThis.expect(json.includes("\"inboundCommandTypes\":[\"Ship\"],\"externalSystem\":null")).toEqual(true);
-  });
-  globalThis.test("encodes None inbound externalSystem as null", () => {
-    globalThis.expect(json.includes("\"commandTypes\":[\"RecordPayment\"],\"externalSystem\":null")).toEqual(true);
-  });
-});
-
-globalThis.describe("translation-slice externalSystem round-trip", () => {
-  let externalStructure_readModels = structure_readModels;
-  let externalStructure_stateViewSlices = structure_stateViewSlices;
-  let externalStructure_stateChangeSlices = structure_stateChangeSlices;
-  let externalStructure_aggregates = structure_aggregates;
-  let externalStructure_automationSlices = structure_automationSlices;
-  let externalStructure_outboundTranslationSlices = [{
-      name: "ToShipper",
-      consumedEventTypes: ["OrderPlaced"],
-      inboundCommandTypes: ["Ship"],
-      targetName: undefined,
-      externalSystem: "ShipperGateway",
-      chapter: undefined
-    }];
-  let externalStructure_inboundTranslationSlices = [{
-      name: "FromBilling",
-      commandTypes: ["RecordPayment"],
-      targetName: "Order",
-      externalSystem: "BillingProvider",
-      chapter: undefined
-    }];
-  let externalStructure_extensions = structure_extensions;
-  let externalStructure = {
-    readModels: externalStructure_readModels,
-    stateViewSlices: externalStructure_stateViewSlices,
-    stateChangeSlices: externalStructure_stateChangeSlices,
-    aggregates: externalStructure_aggregates,
-    automationSlices: externalStructure_automationSlices,
-    outboundTranslationSlices: externalStructure_outboundTranslationSlices,
-    inboundTranslationSlices: externalStructure_inboundTranslationSlices,
-    extensions: externalStructure_extensions,
-    extensionPoints: undefined
-  };
-  let externalJson = JSON.stringify(Platform_ComponentDefinitionsApi$ReventlessCore.encodePluginStructureEntry("Catalog", externalStructure));
-  globalThis.test("surfaces Some outbound externalSystem as its inner string", () => {
-    globalThis.expect(externalJson.includes("\"externalSystem\":\"ShipperGateway\"")).toEqual(true);
-  });
-  globalThis.test("surfaces Some inbound externalSystem as its inner string", () => {
-    globalThis.expect(externalJson.includes("\"externalSystem\":\"BillingProvider\"")).toEqual(true);
-  });
-});
-
-globalThis.describe("visibility filtering (deployed AutoUI hides Internal)", () => {
-  let internalQbl_consumedEventTypes = ["CatalogProductSynced"];
-  let internalQbl_linkedWriteSide = [];
-  let internalQbl_searchableFields = ["name"];
-  let internalQbl_visibility = "Internal";
-  let internalQbl = {
-    name: "AvailableProducts",
-    queryField: "Ordering_AvailableProducts",
-    schema: "{}",
-    consumedEventTypes: internalQbl_consumedEventTypes,
-    linkedWriteSide: internalQbl_linkedWriteSide,
-    labelField: "name",
-    searchableFields: internalQbl_searchableFields,
-    statusField: undefined,
-    visibility: internalQbl_visibility,
-    chapter: undefined
-  };
-  let mixed_readModels = [
-    qbl,
-    internalQbl
-  ];
-  let mixed_stateViewSlices = [internalQbl];
-  let mixed_stateChangeSlices = structure_stateChangeSlices;
-  let mixed_aggregates = structure_aggregates;
-  let mixed_automationSlices = structure_automationSlices;
-  let mixed_outboundTranslationSlices = structure_outboundTranslationSlices;
-  let mixed_inboundTranslationSlices = structure_inboundTranslationSlices;
-  let mixed_extensions = structure_extensions;
-  let mixed = {
-    readModels: mixed_readModels,
-    stateViewSlices: mixed_stateViewSlices,
-    stateChangeSlices: mixed_stateChangeSlices,
-    aggregates: mixed_aggregates,
-    automationSlices: mixed_automationSlices,
-    outboundTranslationSlices: mixed_outboundTranslationSlices,
-    inboundTranslationSlices: mixed_inboundTranslationSlices,
-    extensions: mixed_extensions,
-    extensionPoints: undefined
-  };
-  let mixedJson = JSON.stringify(Platform_ComponentDefinitionsApi$ReventlessCore.encodePluginStructureEntry("Ordering", mixed));
-  globalThis.test("excludes an Internal queryableDef from the encoded read-side", () => {
-    globalThis.expect(mixedJson.includes("AvailableProducts")).toEqual(false);
-  });
-  globalThis.test("keeps a Public queryableDef", () => {
-    globalThis.expect(mixedJson.includes("\"name\":\"Products\"")).toEqual(true);
-  });
-});
-
-globalThis.describe("allowedStates + statusField populated", () => {
-  let cmdWithStates_aggregateIdField = "id";
-  let cmdWithStates_references = [];
-  let cmdWithStates_allowedStates = ["Inactive"];
-  let cmdWithStates_apiExposed = true;
-  let cmdWithStates = {
-    name: "Activate",
-    schema: "{}",
-    level: "Instance",
-    aggregateIdField: cmdWithStates_aggregateIdField,
-    mutationField: "Platform_Plugin_Activate",
-    references: cmdWithStates_references,
-    allowedStates: cmdWithStates_allowedStates,
-    apiExposed: cmdWithStates_apiExposed
-  };
-  let qblWithStatus_consumedEventTypes = [];
-  let qblWithStatus_linkedWriteSide = ["Plugin"];
-  let qblWithStatus_searchableFields = ["name"];
-  let qblWithStatus_statusField = "status";
-  let qblWithStatus = {
-    name: "Plugin",
-    queryField: "Platform_Plugins",
-    schema: "{}",
-    consumedEventTypes: qblWithStatus_consumedEventTypes,
-    linkedWriteSide: qblWithStatus_linkedWriteSide,
-    labelField: "name",
-    searchableFields: qblWithStatus_searchableFields,
-    statusField: qblWithStatus_statusField,
-    visibility: undefined,
-    chapter: undefined
-  };
-  let wblWithStates_commands = [cmdWithStates];
-  let wblWithStates_producedEventTypes = [];
-  let wblWithStates_consumedEventTypes = [];
-  let wblWithStates_linkedViews = ["Plugin"];
-  let wblWithStates_events = [];
-  let wblWithStates = {
-    name: "Plugin",
-    commands: wblWithStates_commands,
-    producedEventTypes: wblWithStates_producedEventTypes,
-    consumedEventTypes: wblWithStates_consumedEventTypes,
-    linkedViews: wblWithStates_linkedViews,
-    consistencyRead: undefined,
-    events: wblWithStates_events,
-    chapter: undefined
-  };
-  let structureWithStates_readModels = [qblWithStatus];
-  let structureWithStates_stateViewSlices = [];
-  let structureWithStates_stateChangeSlices = [];
-  let structureWithStates_aggregates = [wblWithStates];
-  let structureWithStates_automationSlices = [];
-  let structureWithStates_outboundTranslationSlices = [];
-  let structureWithStates_inboundTranslationSlices = [];
-  let structureWithStates_extensions = [];
-  let structureWithStates = {
-    readModels: structureWithStates_readModels,
-    stateViewSlices: structureWithStates_stateViewSlices,
-    stateChangeSlices: structureWithStates_stateChangeSlices,
-    aggregates: structureWithStates_aggregates,
-    automationSlices: structureWithStates_automationSlices,
-    outboundTranslationSlices: structureWithStates_outboundTranslationSlices,
-    inboundTranslationSlices: structureWithStates_inboundTranslationSlices,
-    extensions: structureWithStates_extensions,
-    extensionPoints: undefined
-  };
-  let json = JSON.stringify(Platform_ComponentDefinitionsApi$ReventlessCore.encodePluginStructureEntry("Platform", structureWithStates));
-  globalThis.test("encodes populated allowedStates as a JSON array", () => {
-    globalThis.expect(json.includes("\"allowedStates\":[\"Inactive\"]")).toEqual(true);
-  });
-  globalThis.test("encodes populated statusField as the field name string", () => {
-    globalThis.expect(json.includes("\"statusField\":\"status\"")).toEqual(true);
-  });
-});
-
-export {
-  cmd,
-  qbl,
-  wbl,
-  structure,
-  encoded,
-  json,
-}
-/* encoded Not a pure module */