@reventlessdev/reventless-core 3.0.0-alpha.291 → 3.0.0-alpha.293

package/tests/commandgenerator/OwnerActingTest.res.mjs

@@ -72,7 +72,7 @@ let errorSchema = Sury.union([
   Sury.literal("OrderNotFound")
 ]);
 
-function commandAuthorization(param) {
+function authorizationOf(param) {
   return "AllowAuthenticated";
 }
 
@@ -90,7 +90,7 @@ let OrderSlice = {
   consumedEventSchema: consumedEventSchema,
   commandSchema: commandSchema,
   errorSchema: errorSchema,
-  commandAuthorization: commandAuthorization,
+  authorizationOf: authorizationOf,
   commandTransition: commandTransition,
   traits: traits,
   readConsistency: "EscalateOnRetry"
@@ -189,7 +189,7 @@ let OrderHandler = StateChangeSlice_Callback$ReventlessCore.Make({
   errorSchema: errorSchema,
   eventSchema: eventSchema,
   commandSchema: commandSchema,
-  commandAuthorization: commandAuthorization,
+  authorizationOf: authorizationOf,
   commandTransition: commandTransition,
   traits: traits,
   readConsistency: "EscalateOnRetry"
@@ -270,7 +270,7 @@ let errorSchema$1 = Sury.union([
 
 let moduleUrl$1 = import.meta.url;
 
-function commandAuthorization$1(param) {
+function authorizationOf$1(param) {
   return "AllowAuthenticated";
 }
 
@@ -287,7 +287,7 @@ let AccountSpec = {
   eventSchema: eventSchema$1,
   errorSchema: errorSchema$1,
   moduleUrl: moduleUrl$1,
-  commandAuthorization: commandAuthorization$1,
+  authorizationOf: authorizationOf$1,
   commandTransition: commandTransition$1,
   traits: traits$1
 };
@@ -453,7 +453,7 @@ let AccountHandler = Aggregate_Callback$ReventlessCore.Make({
   errorSchema: errorSchema$1,
   commandSchema: commandSchema$1,
   moduleUrl: moduleUrl$1,
-  commandAuthorization: commandAuthorization$1,
+  authorizationOf: authorizationOf$1,
   commandTransition: commandTransition$1,
   traits: traits$1
 })({
@@ -476,7 +476,7 @@ let AccountHandler = Aggregate_Callback$ReventlessCore.Make({
     errorSchema: errorSchema$1,
     commandSchema: commandSchema$1,
     moduleUrl: moduleUrl$1,
-    commandAuthorization: commandAuthorization$1,
+    authorizationOf: authorizationOf$1,
     commandTransition: commandTransition$1,
     traits: traits$1
   },

package/tests/commandtopic/CommandOutcomeHookTest.res.mjs

@@ -63,7 +63,7 @@ let SliceHandler = StateChangeSlice_Callback$ReventlessCore.Make({
   errorSchema: DcbFixtures$ReventlessCore.TestCommandSpec.errorSchema,
   eventSchema: DcbFixtures$ReventlessCore.TestCommandSpec.eventSchema,
   commandSchema: DcbFixtures$ReventlessCore.TestCommandSpec.commandSchema,
-  commandAuthorization: DcbFixtures$ReventlessCore.TestCommandSpec.commandAuthorization,
+  authorizationOf: DcbFixtures$ReventlessCore.TestCommandSpec.authorizationOf,
   commandTransition: DcbFixtures$ReventlessCore.TestCommandSpec.commandTransition,
   traits: DcbFixtures$ReventlessCore.TestCommandSpec.traits,
   readConsistency: DcbFixtures$ReventlessCore.TestCommandSpec.readConsistency

package/tests/commandtopic/CommandTopicCallbackFixtures.res.mjs

@@ -21,7 +21,7 @@ let commandSchema = Sury.union([
   }))
 ]);
 
-function commandAuthorization(param) {
+function authorizationOf(param) {
   return "AllowAuthenticated";
 }
 
@@ -35,7 +35,7 @@ let TestSpec = {
   Id: undefined,
   name: name,
   commandSchema: commandSchema,
-  commandAuthorization: commandAuthorization,
+  authorizationOf: authorizationOf,
   commandTransition: commandTransition,
   traits: traits
 };
@@ -72,7 +72,7 @@ let TestOps_Spec = {
   Id: Id$Reventless.StringPure,
   name: name,
   commandSchema: commandSchema,
-  commandAuthorization: commandAuthorization,
+  authorizationOf: authorizationOf,
   commandTransition: commandTransition,
   traits: traits
 };

package/tests/dcb/DcbFixtures.res.mjs

@@ -152,7 +152,7 @@ function decide(state, command) {
   }
 }
 
-function commandAuthorization(param) {
+function authorizationOf(param) {
   return "AllowAuthenticated";
 }
 
@@ -178,7 +178,7 @@ let TestCommandSpec = {
   initialState: TestCommandSpec_initialState,
   evolve: evolve,
   decide: decide,
-  commandAuthorization: commandAuthorization,
+  authorizationOf: authorizationOf,
   commandTransition: commandTransition,
   traits: traits,
   readConsistency: "EscalateOnRetry"

package/tests/dcb/DcbStateChangeSliceTest.res.mjs

@@ -59,7 +59,7 @@ let TestHandler = StateChangeSlice_Callback$ReventlessCore.Make({
   errorSchema: DcbFixtures$ReventlessCore.TestCommandSpec.errorSchema,
   eventSchema: DcbFixtures$ReventlessCore.TestCommandSpec.eventSchema,
   commandSchema: DcbFixtures$ReventlessCore.TestCommandSpec.commandSchema,
-  commandAuthorization: DcbFixtures$ReventlessCore.TestCommandSpec.commandAuthorization,
+  authorizationOf: DcbFixtures$ReventlessCore.TestCommandSpec.authorizationOf,
   commandTransition: DcbFixtures$ReventlessCore.TestCommandSpec.commandTransition,
   traits: DcbFixtures$ReventlessCore.TestCommandSpec.traits,
   readConsistency: DcbFixtures$ReventlessCore.TestCommandSpec.readConsistency
@@ -77,7 +77,7 @@ let commandSchema = DcbFixtures$ReventlessCore.TestCommandSpec.commandSchema;
 
 let errorSchema = DcbFixtures$ReventlessCore.TestCommandSpec.errorSchema;
 
-let commandAuthorization = DcbFixtures$ReventlessCore.TestCommandSpec.commandAuthorization;
+let authorizationOf = DcbFixtures$ReventlessCore.TestCommandSpec.authorizationOf;
 
 let commandTransition = DcbFixtures$ReventlessCore.TestCommandSpec.commandTransition;
 
@@ -102,7 +102,7 @@ let StrongSpec = {
   initialState: StrongSpec_initialState,
   evolve: StrongSpec_evolve,
   decide: StrongSpec_decide,
-  commandAuthorization: commandAuthorization,
+  authorizationOf: authorizationOf,
   commandTransition: commandTransition,
   traits: traits,
   readConsistency: "AlwaysStrong"
@@ -120,7 +120,7 @@ let commandSchema$1 = DcbFixtures$ReventlessCore.TestCommandSpec.commandSchema;
 
 let errorSchema$1 = DcbFixtures$ReventlessCore.TestCommandSpec.errorSchema;
 
-let commandAuthorization$1 = DcbFixtures$ReventlessCore.TestCommandSpec.commandAuthorization;
+let authorizationOf$1 = DcbFixtures$ReventlessCore.TestCommandSpec.authorizationOf;
 
 let commandTransition$1 = DcbFixtures$ReventlessCore.TestCommandSpec.commandTransition;
 
@@ -145,7 +145,7 @@ let EventualSpec = {
   initialState: EventualSpec_initialState,
   evolve: EventualSpec_evolve,
   decide: EventualSpec_decide,
-  commandAuthorization: commandAuthorization$1,
+  authorizationOf: authorizationOf$1,
   commandTransition: commandTransition$1,
   traits: traits$1,
   readConsistency: "AlwaysEventual"
@@ -158,7 +158,7 @@ let StrongHandler = StateChangeSlice_Callback$ReventlessCore.Make({
   errorSchema: errorSchema,
   eventSchema: eventSchema,
   commandSchema: commandSchema,
-  commandAuthorization: commandAuthorization,
+  authorizationOf: authorizationOf,
   commandTransition: commandTransition,
   traits: traits,
   readConsistency: "AlwaysStrong"
@@ -171,7 +171,7 @@ let EventualHandler = StateChangeSlice_Callback$ReventlessCore.Make({
   errorSchema: errorSchema$1,
   eventSchema: eventSchema$1,
   commandSchema: commandSchema$1,
-  commandAuthorization: commandAuthorization$1,
+  authorizationOf: authorizationOf$1,
   commandTransition: commandTransition$1,
   traits: traits$1,
   readConsistency: "AlwaysEventual"

package/tests/eventmapper/EventMapperFixtures.res.mjs

@@ -161,7 +161,7 @@ let commandSchema = Sury.union([
 
 let moduleUrl$2 = import.meta.url;
 
-function commandAuthorization(param) {
+function authorizationOf(param) {
   return "AllowAuthenticated";
 }
 
@@ -176,7 +176,7 @@ let CmdTargetSpec = {
   name: name$3,
   commandSchema: commandSchema,
   moduleUrl: moduleUrl$2,
-  commandAuthorization: commandAuthorization,
+  authorizationOf: authorizationOf,
   commandTransition: commandTransition,
   traits: traits
 };
@@ -253,7 +253,7 @@ let OrderMappings_Target = {
   name: name$3,
   commandSchema: commandSchema,
   moduleUrl: moduleUrl$2,
-  commandAuthorization: commandAuthorization,
+  authorizationOf: authorizationOf,
   commandTransition: commandTransition,
   traits: traits
 };
@@ -284,7 +284,7 @@ let CountOrderMappings_Target = {
   name: name$3,
   commandSchema: commandSchema,
   moduleUrl: moduleUrl$2,
-  commandAuthorization: commandAuthorization,
+  authorizationOf: authorizationOf,
   commandTransition: commandTransition,
   traits: traits
 };

package/tests/extensionpoint/ExtensionPointFixtures.res.mjs

@@ -26,7 +26,7 @@ let directiveSchema = Sury.literal("DirectiveA");
 
 let moduleUrl = import.meta.url;
 
-function commandAuthorization(param) {
+function authorizationOf(param) {
   return "AllowAuthenticated";
 }
 
@@ -42,7 +42,7 @@ let TestEPSpec = {
   eventSchema: eventSchema,
   directiveSchema: directiveSchema,
   moduleUrl: moduleUrl,
-  commandAuthorization: commandAuthorization,
+  authorizationOf: authorizationOf,
   commandTransition: commandTransition,
   traits: traits
 };

package/tests/extensionpoint/ExtensionPointOperationsTest.res.mjs

@@ -21,7 +21,7 @@ let directiveSchema = Sury.literal("OpsEPNoDirective");
 
 let moduleUrl = import.meta.url;
 
-function commandAuthorization(param) {
+function authorizationOf(param) {
   return "AllowAuthenticated";
 }
 
@@ -37,7 +37,7 @@ let OpsEPSpec = {
   eventSchema: eventSchema,
   directiveSchema: directiveSchema,
   moduleUrl: moduleUrl,
-  commandAuthorization: commandAuthorization,
+  authorizationOf: authorizationOf,
   commandTransition: commandTransition,
   traits: traits
 };

package/tests/plugin/PluginStructureAccessTest.res

@@ -138,3 +138,60 @@ describe("requiredAccess derived from the authorization rule", () => {
     )->toEqual(None)
   )
 })
+
+module PsTwoRuleFeed = {
+  let name = "PsTwoRuleFeed"
+  let moduleUrl = "ps-two-rule-feed://spec"
+  @schema type externalInput = {sku: string}
+  @schema type command = AddProduct({sku: string}) | AddCategory({sku: string})
+  let targetName = "AddProduct"
+  let externalSystem = None
+  type role = Reventless.Role.name
+  let authorizationOf = (name: string): Reventless.Authorization.rule<role> =>
+    switch name {
+    | "AddProduct" => AllowRoles([Reventless.Role.make("Merchandiser")])
+    | "AddCategory" => AllowRoles([Reventless.Role.make("Admin")])
+    | _ => DenyAll
+    }
+}
+
+module PsTwoRuleFeedSlice: ReventlessInfra.InboundTranslationSlice.T = {
+  module Spec = PsTwoRuleFeed
+  module Translation = {
+    let translate = (_: PsTwoRuleFeed.externalInput) => Ok([])
+    let moduleUrl = PsTwoRuleFeed.moduleUrl
+  }
+  type component = Component.t<
+    ReventlessInfra.InboundTranslationSlice.t,
+    ReventlessInfra.InboundTranslationSlice.outputs,
+    ReventlessInfra.InboundTranslationSlice.operations,
+  >
+  let queryDbName = "PsTwoRuleFeedAudit"
+  let make = (~publishJsons as _, ~runtime as _=?, ~opts as _=?): component => Obj.magic(0)
+}
+
+describe("an inbound slice's roles", () => {
+  let door = Dcb_Builder.inboundDoorPermission(
+    PsTwoRuleFeed.commandSchema,
+    PsTwoRuleFeed.authorizationOf,
+  )
+
+  testSync("the door admits any constructor's roles", () =>
+    expect(door->Option.map(Reventless.Authorization.rolesOf))->toEqual(
+      Some([Reventless.Role.make("Merchandiser"), Reventless.Role.make("Admin")]),
+    )
+  )
+
+  testSync("requiredRoles are the door's roles", () => {
+    let inbound =
+      Plugin_Structure.make(
+        ~name="AccessPlugin",
+        ~inboundTranslationSlices=[module(PsTwoRuleFeedSlice)],
+      ).inboundTranslationSlices->Array.get(0)
+    let doorRoles =
+      door->Option.map(
+        rule => rule->Reventless.Authorization.rolesOf->Array.map(r => (r :> string)),
+      )
+    expect(inbound->Option.flatMap(s => s.requiredRoles))->toEqual(doorRoles)
+  })
+})

package/tests/plugin/PluginStructureAccessTest.res.mjs

@@ -1,8 +1,11 @@
 // Generated by ReScript, PLEASE EDIT WITH CARE
 
+import * as Sury from "sury";
 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 Role$Reventless from "@reventlessdev/reventless-spec/src/types/Role.res.mjs";
+import * as Authorization$Reventless from "@reventlessdev/reventless-spec/src/types/Authorization.res.mjs";
+import * as Dcb_Builder$ReventlessCore from "../../src/components/Dcb/Dcb_Builder.res.mjs";
 import * as PsGatedView$ReventlessCore from "./StateView/PsGatedView.res.mjs";
 import * as PsOrdersView$ReventlessCore from "./StateView/PsOrdersView.res.mjs";
 import * as PsGatedCommands$ReventlessCore from "./StateChange/PsGatedCommands.res.mjs";
@@ -27,7 +30,7 @@ let PsGatedCommandsSlice_Spec = {
   errorSchema: PsGatedCommands$ReventlessCore.errorSchema,
   eventSchema: PsGatedCommands$ReventlessCore.eventSchema,
   commandSchema: PsGatedCommands$ReventlessCore.commandSchema,
-  commandAuthorization: PsGatedCommands$ReventlessCore.commandAuthorization,
+  authorizationOf: PsGatedCommands$ReventlessCore.authorizationOf,
   commandTransition: PsGatedCommands$ReventlessCore.commandTransition,
   traits: PsGatedCommands$ReventlessCore.traits,
   readConsistency: PsGatedCommands$ReventlessCore.readConsistency
@@ -175,6 +178,91 @@ globalThis.describe("requiredAccess derived from the authorization rule", () =>
   });
 });
 
+let moduleUrl = "ps-two-rule-feed://spec";
+
+let externalInputSchema = Sury.$schema(s => ({
+  sku: s.m(Sury.string)
+}));
+
+let commandSchema = Sury.union([
+  Sury.$schema(s => ({
+    TAG: "AddProduct",
+    sku: s.m(Sury.string)
+  })),
+  Sury.$schema(s => ({
+    TAG: "AddCategory",
+    sku: s.m(Sury.string)
+  }))
+]);
+
+function authorizationOf(name) {
+  switch (name) {
+    case "AddCategory" :
+      return {
+        TAG: "AllowRoles",
+        _0: ["Admin"]
+      };
+    case "AddProduct" :
+      return {
+        TAG: "AllowRoles",
+        _0: ["Merchandiser"]
+      };
+    default:
+      return "DenyAll";
+  }
+}
+
+let traits = [];
+
+let PsTwoRuleFeed = {
+  name: "PsTwoRuleFeed",
+  moduleUrl: moduleUrl,
+  externalInputSchema: externalInputSchema,
+  commandSchema: commandSchema,
+  targetName: "AddProduct",
+  externalSystem: undefined,
+  authorizationOf: authorizationOf,
+  traits: traits
+};
+
+function translate(param) {
+  return {
+    TAG: "Ok",
+    _0: []
+  };
+}
+
+let Translation = {
+  translate: translate,
+  moduleUrl: moduleUrl
+};
+
+function make$3(param, param$1, param$2) {
+  return 0;
+}
+
+let PsTwoRuleFeedSlice = {
+  Spec: PsTwoRuleFeed,
+  Translation: Translation,
+  queryDbName: "PsTwoRuleFeedAudit",
+  make: make$3
+};
+
+globalThis.describe("an inbound slice's roles", () => {
+  let door = Dcb_Builder$ReventlessCore.inboundDoorPermission(commandSchema, authorizationOf);
+  globalThis.test("the door admits any constructor's roles", () => {
+    globalThis.expect(Stdlib_Option.map(door, Authorization$Reventless.rolesOf)).toEqual([
+      "Merchandiser",
+      "Admin"
+    ]);
+  });
+  globalThis.test("requiredRoles are the door's roles", () => {
+    let inbound = Plugin_Structure$ReventlessCore.make("AccessPlugin", undefined, undefined, undefined, undefined, undefined, undefined, [PsTwoRuleFeedSlice], undefined, undefined, undefined, undefined, undefined).inboundTranslationSlices[0];
+    let doorRoles = Stdlib_Option.map(door, rule => Authorization$Reventless.rolesOf(rule).map(r => r));
+    globalThis.expect(Stdlib_Option.flatMap(inbound, s => s.requiredRoles)).toEqual(doorRoles);
+  });
+});
+
 export {
   PsGatedCommandsSlice,
   PsGatedViewSlice,
@@ -182,5 +270,7 @@ export {
   structure,
   commandNamed,
   viewNamed,
+  PsTwoRuleFeed,
+  PsTwoRuleFeedSlice,
 }
 /* structure Not a pure module */

package/tests/plugin/PluginStructureTest.res.mjs

@@ -53,7 +53,7 @@ let PsPlaceOrderSlice_Spec = {
   errorSchema: PsPlaceOrder$ReventlessCore.errorSchema,
   eventSchema: PsPlaceOrder$ReventlessCore.eventSchema,
   commandSchema: PsPlaceOrder$ReventlessCore.commandSchema,
-  commandAuthorization: PsPlaceOrder$ReventlessCore.commandAuthorization,
+  authorizationOf: PsPlaceOrder$ReventlessCore.authorizationOf,
   commandTransition: PsPlaceOrder$ReventlessCore.commandTransition,
   traits: PsPlaceOrder$ReventlessCore.traits,
   readConsistency: PsPlaceOrder$ReventlessCore.readConsistency
@@ -84,7 +84,7 @@ let PsShipOrderSlice_Spec = {
   errorSchema: PsShipOrder$ReventlessCore.errorSchema,
   eventSchema: PsShipOrder$ReventlessCore.eventSchema,
   commandSchema: PsShipOrder$ReventlessCore.commandSchema,
-  commandAuthorization: PsShipOrder$ReventlessCore.commandAuthorization,
+  authorizationOf: PsShipOrder$ReventlessCore.authorizationOf,
   commandTransition: PsShipOrder$ReventlessCore.commandTransition,
   traits: PsShipOrder$ReventlessCore.traits,
   readConsistency: PsShipOrder$ReventlessCore.readConsistency
@@ -280,7 +280,7 @@ let PsAttachInvoiceSlice_Spec = {
   errorSchema: PsAttachInvoice$ReventlessCore.errorSchema,
   eventSchema: PsAttachInvoice$ReventlessCore.eventSchema,
   commandSchema: PsAttachInvoice$ReventlessCore.commandSchema,
-  commandAuthorization: PsAttachInvoice$ReventlessCore.commandAuthorization,
+  authorizationOf: PsAttachInvoice$ReventlessCore.authorizationOf,
   commandTransition: PsAttachInvoice$ReventlessCore.commandTransition,
   traits: PsAttachInvoice$ReventlessCore.traits,
   readConsistency: PsAttachInvoice$ReventlessCore.readConsistency
@@ -311,7 +311,7 @@ let PsUploadAvatarSlice_Spec = {
   errorSchema: PsUploadAvatar$ReventlessCore.errorSchema,
   eventSchema: PsUploadAvatar$ReventlessCore.eventSchema,
   commandSchema: PsUploadAvatar$ReventlessCore.commandSchema,
-  commandAuthorization: PsUploadAvatar$ReventlessCore.commandAuthorization,
+  authorizationOf: PsUploadAvatar$ReventlessCore.authorizationOf,
   commandTransition: PsUploadAvatar$ReventlessCore.commandTransition,
   traits: PsUploadAvatar$ReventlessCore.traits,
   readConsistency: PsUploadAvatar$ReventlessCore.readConsistency
@@ -342,7 +342,7 @@ let PsUploadImagesSlice_Spec = {
   errorSchema: PsUploadImages$ReventlessCore.errorSchema,
   eventSchema: PsUploadImages$ReventlessCore.eventSchema,
   commandSchema: PsUploadImages$ReventlessCore.commandSchema,
-  commandAuthorization: PsUploadImages$ReventlessCore.commandAuthorization,
+  authorizationOf: PsUploadImages$ReventlessCore.authorizationOf,
   commandTransition: PsUploadImages$ReventlessCore.commandTransition,
   traits: PsUploadImages$ReventlessCore.traits,
   readConsistency: PsUploadImages$ReventlessCore.readConsistency
@@ -373,7 +373,7 @@ let PsTypoStoreSlice_Spec = {
   errorSchema: PsTypoStore$ReventlessCore.errorSchema,
   eventSchema: PsTypoStore$ReventlessCore.eventSchema,
   commandSchema: PsTypoStore$ReventlessCore.commandSchema,
-  commandAuthorization: PsTypoStore$ReventlessCore.commandAuthorization,
+  authorizationOf: PsTypoStore$ReventlessCore.authorizationOf,
   commandTransition: PsTypoStore$ReventlessCore.commandTransition,
   traits: PsTypoStore$ReventlessCore.traits,
   readConsistency: PsTypoStore$ReventlessCore.readConsistency
@@ -404,7 +404,7 @@ let PsChangePhotoSlice_Spec = {
   errorSchema: PsChangePhoto$ReventlessCore.errorSchema,
   eventSchema: PsChangePhoto$ReventlessCore.eventSchema,
   commandSchema: PsChangePhoto$ReventlessCore.commandSchema,
-  commandAuthorization: PsChangePhoto$ReventlessCore.commandAuthorization,
+  authorizationOf: PsChangePhoto$ReventlessCore.authorizationOf,
   commandTransition: PsChangePhoto$ReventlessCore.commandTransition,
   traits: PsChangePhoto$ReventlessCore.traits,
   readConsistency: PsChangePhoto$ReventlessCore.readConsistency
@@ -435,7 +435,7 @@ let PsReserveStockSlice_Spec = {
   errorSchema: PsReserveStock$ReventlessCore.errorSchema,
   eventSchema: PsReserveStock$ReventlessCore.eventSchema,
   commandSchema: PsReserveStock$ReventlessCore.commandSchema,
-  commandAuthorization: PsReserveStock$ReventlessCore.commandAuthorization,
+  authorizationOf: PsReserveStock$ReventlessCore.authorizationOf,
   commandTransition: PsReserveStock$ReventlessCore.commandTransition,
   traits: PsReserveStock$ReventlessCore.traits,
   readConsistency: PsReserveStock$ReventlessCore.readConsistency
@@ -466,7 +466,7 @@ let PsDispatchShipmentSlice_Spec = {
   errorSchema: PsDispatchShipment$ReventlessCore.errorSchema,
   eventSchema: PsDispatchShipment$ReventlessCore.eventSchema,
   commandSchema: PsDispatchShipment$ReventlessCore.commandSchema,
-  commandAuthorization: PsDispatchShipment$ReventlessCore.commandAuthorization,
+  authorizationOf: PsDispatchShipment$ReventlessCore.authorizationOf,
   commandTransition: PsDispatchShipment$ReventlessCore.commandTransition,
   traits: PsDispatchShipment$ReventlessCore.traits,
   readConsistency: PsDispatchShipment$ReventlessCore.readConsistency
@@ -497,7 +497,7 @@ let PsTransitionSwitchSlice_Spec = {
   errorSchema: PsTransitionSwitch$ReventlessCore.errorSchema,
   eventSchema: PsTransitionSwitch$ReventlessCore.eventSchema,
   commandSchema: PsTransitionSwitch$ReventlessCore.commandSchema,
-  commandAuthorization: PsTransitionSwitch$ReventlessCore.commandAuthorization,
+  authorizationOf: PsTransitionSwitch$ReventlessCore.authorizationOf,
   commandTransition: PsTransitionSwitch$ReventlessCore.commandTransition,
   traits: PsTransitionSwitch$ReventlessCore.traits,
   readConsistency: PsTransitionSwitch$ReventlessCore.readConsistency

package/tests/plugin/StateChange/PsAttachInvoice.res.mjs

@@ -32,7 +32,7 @@ function decide(_state, _command) {
   };
 }
 
-function commandAuthorization(param) {
+function authorizationOf(param) {
   return "AllowAuthenticated";
 }
 
@@ -63,7 +63,7 @@ export {
   eventSchema,
   decide,
   moduleUrl,
-  commandAuthorization,
+  authorizationOf,
   readConsistency,
   commandTransition,
   traits,

package/tests/plugin/StateChange/PsChangePhoto.res.mjs

@@ -33,7 +33,7 @@ function decide(_state, _command) {
   };
 }
 
-function commandAuthorization(param) {
+function authorizationOf(param) {
   return "AllowAuthenticated";
 }
 
@@ -64,7 +64,7 @@ export {
   eventSchema,
   decide,
   moduleUrl,
-  commandAuthorization,
+  authorizationOf,
   readConsistency,
   commandTransition,
   traits,

package/tests/plugin/StateChange/PsDispatchShipment.res.mjs

@@ -39,7 +39,7 @@ function commandTransition(command) {
   };
 }
 
-function commandAuthorization(param) {
+function authorizationOf(param) {
   return "AllowAuthenticated";
 }
 
@@ -67,7 +67,7 @@ export {
   decide,
   commandTransition,
   moduleUrl,
-  commandAuthorization,
+  authorizationOf,
   readConsistency,
   traits,
 }

package/tests/plugin/StateChange/PsGatedCommands.res.mjs

@@ -45,8 +45,8 @@ function decide(_state, _command) {
   };
 }
 
-function commandAuthorization(command) {
-  if (command.TAG === "Restock") {
+function authorizationOf(name) {
+  if (name === "Restock") {
     return {
       TAG: "AllowRoles",
       _0: [
@@ -87,7 +87,7 @@ export {
   eventSchema,
   decide,
   moduleUrl,
-  commandAuthorization,
+  authorizationOf,
   readConsistency,
   commandTransition,
   traits,

package/tests/plugin/StateChange/PsPlaceOrder.res.mjs

@@ -31,7 +31,7 @@ function decide(_state, _command) {
   };
 }
 
-function commandAuthorization(param) {
+function authorizationOf(param) {
   return "AllowAuthenticated";
 }
 
@@ -62,7 +62,7 @@ export {
   eventSchema,
   decide,
   moduleUrl,
-  commandAuthorization,
+  authorizationOf,
   readConsistency,
   commandTransition,
   traits,

package/tests/plugin/StateChange/PsReserveStock.res.mjs

@@ -42,7 +42,7 @@ function decide(_state, _command) {
   };
 }
 
-function commandAuthorization(param) {
+function authorizationOf(param) {
   return "AllowAuthenticated";
 }
 
@@ -74,7 +74,7 @@ export {
   eventSchema,
   decide,
   moduleUrl,
-  commandAuthorization,
+  authorizationOf,
   readConsistency,
   commandTransition,
   traits,

package/tests/plugin/StateChange/PsShipOrder.res.mjs

@@ -59,7 +59,7 @@ function commandTransition(command) {
 
 let commandSchema$1 = Api$ReventlessInfra.markNoApiVariants(commandSchema, ["CancelShipment"]);
 
-function commandAuthorization(param) {
+function authorizationOf(param) {
   return "AllowAuthenticated";
 }
 
@@ -87,7 +87,7 @@ export {
   commandTransition,
   commandSchema$1 as commandSchema,
   moduleUrl,
-  commandAuthorization,
+  authorizationOf,
   readConsistency,
   traits,
 }

package/tests/plugin/StateChange/PsTransitionSwitch.res.mjs

@@ -71,7 +71,7 @@ let traits = [{
     posture: "SelfContained"
   }];
 
-function commandAuthorization(param) {
+function authorizationOf(param) {
   return "AllowAuthenticated";
 }
 
@@ -98,7 +98,7 @@ export {
   commandTransition,
   traits,
   moduleUrl,
-  commandAuthorization,
+  authorizationOf,
   readConsistency,
 }
 /* consumedEventSchema Not a pure module */