@reventlessdev/reventless-core 3.0.0-alpha.134

package/src/components/Api/Api_Naming.res

@@ -0,0 +1,92 @@
+type queryNames = {
+  singleFieldName: string,
+  listFieldName: string,
+  itemsFieldName?: string,
+  returnTypeName: string,
+  pluralTypeName: string,
+  itemsFilterTypeName?: string,
+  connectionFilterTypeName?: string,
+  labelField?: string,
+  includeIdParam: bool,
+  connectionSpec: bool,
+}
+
+let pluralize = (n: string) =>
+  if RegExp.test(%re("/[^aeiou]y$/i"), n) {
+    n->String.slice(~start=0, ~end=String.length(n) - 1) ++ "ies"
+  } else if n->String.endsWith("s") || n->String.endsWith("x") || n->String.endsWith("z") || n->String.endsWith("ch") || n->String.endsWith("sh") {
+    n ++ "es"
+  } else {
+    n ++ "s"
+  }
+
+let singularize = (n: string) =>
+  if n->String.endsWith("ies") {
+    n->String.slice(~start=0, ~end=n->String.length - 3) ++ "y"
+  } else if n->String.endsWith("ses") || n->String.endsWith("xes") || n->String.endsWith("zes") || n->String.endsWith("ches") || n->String.endsWith("shes") {
+    n->String.slice(~start=0, ~end=n->String.length - 2)
+  } else if n->String.endsWith("s") {
+    n->String.slice(~start=0, ~end=n->String.length - 1)
+  } else {
+    n
+  }
+
+let stripViewSuffix = (n: string) =>
+  n->String.endsWith("View") ? n->String.slice(~start=0, ~end=n->String.length - 4) : n
+
+let aggregateMutationField = (~plugin: string, ~aggregate: string, ~command: string) =>
+  `${plugin}_${aggregate}_${command}`
+
+let sliceMutationField = (~plugin: string, ~slice: string) => `${plugin}_${slice}`
+
+// Pluralize via the singular stem so already-plural names normalise correctly:
+// "Orders" → "Order" → "Orders" (was "Orderses"); "Categories" → "Category" →
+// "Categories" (was "Categorieses"). For singular entity names like
+// "ProductDemand" the singularize is a no-op and pluralize behaves as usual.
+let canonicalPlural = (n: string) => pluralize(singularize(n))
+
+let queryFieldNamesForReadModel = (~plugin: string, ~name: string, ~connectionSpec: bool=true): queryNames => {
+  let singular = singularize(name)
+  let plural = canonicalPlural(name)
+  {
+    singleFieldName: `${plugin}_${singular}`,
+    listFieldName: `${plugin}_${plural}`,
+    returnTypeName: `${plugin}_${singular}`,
+    pluralTypeName: `${plugin}_${plural}`,
+    includeIdParam: true,
+    connectionSpec,
+  }
+}
+
+let queryFieldNamesForStateView = (~plugin: string, ~viewName: string, ~connectionSpec: bool=true): queryNames => {
+  let entity = stripViewSuffix(viewName)
+  let singular = singularize(entity)
+  let plural = canonicalPlural(entity)
+  {
+    singleFieldName: `${plugin}_${singular}`,
+    listFieldName: `${plugin}_${plural}`,
+    returnTypeName: `${plugin}_${singular}`,
+    pluralTypeName: `${plugin}_${plural}`,
+    includeIdParam: true,
+    connectionSpec,
+  }
+}
+
+// Slice query DBs (AutomationSlice todo, InboundTranslationSlice audit,
+// OutboundTranslationSlice todo) all use a string `id` partition key — keep
+// `includeIdParam: true` so the SDL single-id query (`Plugin_Foo(id: ID!)`),
+// the resolver path (`GetItem` instead of `Scan`), and the `*ByIds` batch
+// resolver all line up. StateViewSlice uses `queryFieldNamesForStateView`
+// instead and keeps its own (id-free) shape.
+let queryFieldNamesForSliceQueryDb = (~plugin: string, ~queryDbName: string, ~connectionSpec: bool=true): queryNames => {
+  {
+    singleFieldName: `${plugin}_${queryDbName}`,
+    listFieldName: `${plugin}_${canonicalPlural(queryDbName)}`,
+    returnTypeName: `${plugin}_${queryDbName}`,
+    pluralTypeName: `${plugin}_${canonicalPlural(queryDbName)}`,
+    includeIdParam: true,
+    connectionSpec,
+  }
+}
+
+let adminField = (~name: string) => `Platform_${name}`

package/src/components/Api/Api_Naming.res.mjs

@@ -0,0 +1,103 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+
+function pluralize(n) {
+  if (/[^aeiou]y$/i.test(n)) {
+    return n.slice(0, n.length - 1 | 0) + "ies";
+  } else if (n.endsWith("s") || n.endsWith("x") || n.endsWith("z") || n.endsWith("ch") || n.endsWith("sh")) {
+    return n + "es";
+  } else {
+    return n + "s";
+  }
+}
+
+function singularize(n) {
+  if (n.endsWith("ies")) {
+    return n.slice(0, n.length - 3 | 0) + "y";
+  } else if (n.endsWith("ses") || n.endsWith("xes") || n.endsWith("zes") || n.endsWith("ches") || n.endsWith("shes")) {
+    return n.slice(0, n.length - 2 | 0);
+  } else if (n.endsWith("s")) {
+    return n.slice(0, n.length - 1 | 0);
+  } else {
+    return n;
+  }
+}
+
+function stripViewSuffix(n) {
+  if (n.endsWith("View")) {
+    return n.slice(0, n.length - 4 | 0);
+  } else {
+    return n;
+  }
+}
+
+function aggregateMutationField(plugin, aggregate, command) {
+  return plugin + `_` + aggregate + `_` + command;
+}
+
+function sliceMutationField(plugin, slice) {
+  return plugin + `_` + slice;
+}
+
+function canonicalPlural(n) {
+  return pluralize(singularize(n));
+}
+
+function queryFieldNamesForReadModel(plugin, name, connectionSpecOpt) {
+  let connectionSpec = connectionSpecOpt !== undefined ? connectionSpecOpt : true;
+  let singular = singularize(name);
+  let plural = pluralize(singularize(name));
+  return {
+    singleFieldName: plugin + `_` + singular,
+    listFieldName: plugin + `_` + plural,
+    returnTypeName: plugin + `_` + singular,
+    pluralTypeName: plugin + `_` + plural,
+    includeIdParam: true,
+    connectionSpec: connectionSpec
+  };
+}
+
+function queryFieldNamesForStateView(plugin, viewName, connectionSpecOpt) {
+  let connectionSpec = connectionSpecOpt !== undefined ? connectionSpecOpt : true;
+  let entity = stripViewSuffix(viewName);
+  let singular = singularize(entity);
+  let plural = pluralize(singularize(entity));
+  return {
+    singleFieldName: plugin + `_` + singular,
+    listFieldName: plugin + `_` + plural,
+    returnTypeName: plugin + `_` + singular,
+    pluralTypeName: plugin + `_` + plural,
+    includeIdParam: true,
+    connectionSpec: connectionSpec
+  };
+}
+
+function queryFieldNamesForSliceQueryDb(plugin, queryDbName, connectionSpecOpt) {
+  let connectionSpec = connectionSpecOpt !== undefined ? connectionSpecOpt : true;
+  return {
+    singleFieldName: plugin + `_` + queryDbName,
+    listFieldName: plugin + `_` + pluralize(singularize(queryDbName)),
+    returnTypeName: plugin + `_` + queryDbName,
+    pluralTypeName: plugin + `_` + pluralize(singularize(queryDbName)),
+    includeIdParam: true,
+    connectionSpec: connectionSpec
+  };
+}
+
+function adminField(name) {
+  return `Platform_` + name;
+}
+
+export {
+  pluralize,
+  singularize,
+  stripViewSuffix,
+  aggregateMutationField,
+  sliceMutationField,
+  canonicalPlural,
+  queryFieldNamesForReadModel,
+  queryFieldNamesForStateView,
+  queryFieldNamesForSliceQueryDb,
+  adminField,
+}
+/* No side effect */

package/src/components/Api/Api_Operations.res

@@ -0,0 +1,13 @@
+// Api_Operations — thin runtime wrapper for Api component operations.
+
+/**
+Trigger a schema rebuild on the given Api component with the supplied plugin fragments.
+Returns a promise that resolves once the provider has published the new schema.
+*/
+let updateSchema = (
+  api: ReventlessInfra.Api.component,
+  fragments: array<Reventless.Plugin.apiSchemaFragment>,
+): Pulumi.Output.t<promise<unit>> =>
+  api
+  ->Component.operations
+  ->Pulumi.Output.apply(ops => ops.updateSchema(fragments))

package/src/components/Api/Api_Operations.res.mjs

@@ -0,0 +1,12 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+import * as Component$ReventlessCore from "../Component.res.mjs";
+
+function updateSchema(api, fragments) {
+  return Component$ReventlessCore.operations(api).apply(ops => ops.updateSchema(fragments));
+}
+
+export {
+  updateSchema,
+}
+/* Component-ReventlessCore Not a pure module */