@reventlessdev/reventless-local 3.0.0-alpha.152 → 3.0.0-alpha.154

package/src/adapter/DomainGraphQL_Server.res.mjs

@@ -3,11 +3,17 @@
 import * as S from "sury/src/S.res.mjs";
 import * as Http from "http";
 import * as Graphql from "graphql";
+import * as GraphqlYoga from "@reventlessdev/rescript-graphql-yoga/src/GraphqlYoga.res.mjs";
+import * as Stdlib_Dict from "@rescript/runtime/lib/es6/Stdlib_Dict.js";
 import * as Stdlib_JSON from "@rescript/runtime/lib/es6/Stdlib_JSON.js";
-import * as GraphqlYoga from "graphql-yoga";
+import * as Stdlib_Array from "@rescript/runtime/lib/es6/Stdlib_Array.js";
+import * as Stdlib_JsExn from "@rescript/runtime/lib/es6/Stdlib_JsExn.js";
+import * as GraphqlYoga$1 from "graphql-yoga";
 import * as Stdlib_Option from "@rescript/runtime/lib/es6/Stdlib_Option.js";
+import * as Stdlib_JsError from "@rescript/runtime/lib/es6/Stdlib_JsError.js";
 import * as Primitive_option from "@rescript/runtime/lib/es6/Primitive_option.js";
 import * as Identity$Reventless from "@reventlessdev/reventless-spec/src/types/Identity.res.mjs";
+import * as Primitive_exceptions from "@rescript/runtime/lib/es6/Primitive_exceptions.js";
 import * as Logger$ReventlessCore from "@reventlessdev/reventless-core/src/util/Logger.res.mjs";
 import * as LocalAuth$ReventlessLocal from "./Auth/LocalAuth.res.mjs";
 import * as GraphQL_Stitcher$ReventlessCore from "@reventlessdev/reventless-core/src/components/Api/GraphQL_Stitcher.res.mjs";
@@ -140,65 +146,134 @@ function decodeGlobalId(globalId) {
   }
 }
 
-let mutationResolvers = {
-  contents: {}
-};
+let platformScope = "platform";
 
-let queryResolvers = {
-  contents: {}
-};
+function makeBucket(scope) {
+  return {
+    mutationFields: [],
+    queryFields: [],
+    subscriptionFields: [],
+    typeDefinitions: scope === platformScope ? [] : GraphQL_Stitcher$ReventlessCore.relayBaseTypes.slice(),
+    mutationResolvers: {},
+    queryResolvers: {},
+    subscriptionResolvers: {}
+  };
+}
 
-let subscriptionResolvers = {
+let buckets = {
   contents: {}
 };
 
-let mutationFields = {
-  contents: []
+let currentScope = {
+  contents: platformScope
 };
 
-let queryFields = {
-  contents: []
-};
+function bucketFor(scope) {
+  let b = buckets.contents[scope];
+  if (b !== undefined) {
+    return b;
+  }
+  let b$1 = makeBucket(scope);
+  buckets.contents[scope] = b$1;
+  return b$1;
+}
 
-let subscriptionFields = {
-  contents: []
-};
+function currentBucket() {
+  return bucketFor(currentScope.contents);
+}
 
-let typeDefinitions = {
-  contents: []
-};
+function setScope(name) {
+  currentScope.contents = name;
+  bucketFor(name);
+}
+
+function resetScope() {
+  currentScope.contents = platformScope;
+}
+
+function relabelScope(from, to_) {
+  if (from === to_) {
+    return;
+  }
+  let b = buckets.contents[from];
+  if (b === undefined) {
+    return;
+  }
+  Stdlib_Dict.$$delete(buckets.contents, from);
+  let existing = buckets.contents[to_];
+  if (existing !== undefined) {
+    existing.mutationFields = existing.mutationFields.concat(b.mutationFields);
+    existing.queryFields = existing.queryFields.concat(b.queryFields);
+    existing.subscriptionFields = existing.subscriptionFields.concat(b.subscriptionFields);
+    b.typeDefinitions.forEach(t => {
+      if (!existing.typeDefinitions.includes(t)) {
+        existing.typeDefinitions.push(t);
+        return;
+      }
+    });
+    Object.entries(b.mutationResolvers).forEach(param => {
+      existing.mutationResolvers[param[0]] = param[1];
+    });
+    Object.entries(b.queryResolvers).forEach(param => {
+      existing.queryResolvers[param[0]] = param[1];
+    });
+    Object.entries(b.subscriptionResolvers).forEach(param => {
+      existing.subscriptionResolvers[param[0]] = param[1];
+    });
+  } else {
+    buckets.contents[to_] = b;
+  }
+  if (currentScope.contents === from) {
+    currentScope.contents = to_;
+    return;
+  }
+}
+
+function orderedBuckets() {
+  let entries = Object.entries(buckets.contents);
+  return entries.filter(param => param[0] === platformScope).concat(entries.filter(param => param[0] !== platformScope));
+}
 
 function registerMutations(sdlFields, resolvers) {
-  mutationFields.contents = mutationFields.contents.concat(sdlFields);
+  let b = bucketFor(currentScope.contents);
+  b.mutationFields = b.mutationFields.concat(sdlFields);
   Object.entries(resolvers).forEach(param => {
-    mutationResolvers.contents[param[0]] = param[1];
+    b.mutationResolvers[param[0]] = param[1];
   });
 }
 
 function registerQueries(sdlFields, resolvers) {
-  queryFields.contents = queryFields.contents.concat(sdlFields);
+  let b = bucketFor(currentScope.contents);
+  b.queryFields = b.queryFields.concat(sdlFields);
   Object.entries(resolvers).forEach(param => {
-    queryResolvers.contents[param[0]] = param[1];
+    b.queryResolvers[param[0]] = param[1];
   });
 }
 
 function registerSubscriptions(sdlFields, resolvers) {
-  subscriptionFields.contents = subscriptionFields.contents.concat(sdlFields);
+  let b = bucketFor(currentScope.contents);
+  b.subscriptionFields = b.subscriptionFields.concat(sdlFields);
   Object.entries(resolvers).forEach(param => {
-    subscriptionResolvers.contents[param[0]] = param[1];
+    b.subscriptionResolvers[param[0]] = param[1];
   });
 }
 
 function getMutationResolver(fieldName) {
-  return mutationResolvers.contents[fieldName];
+  return Stdlib_Array.findMap(Object.values(buckets.contents), b => b.mutationResolvers[fieldName]);
 }
 
 function getQueryResolver(fieldName) {
-  return queryResolvers.contents[fieldName];
+  return Stdlib_Array.findMap(Object.values(buckets.contents), b => b.queryResolvers[fieldName]);
 }
 
 function registerTypes(sdlTypes) {
-  typeDefinitions.contents = typeDefinitions.contents.concat(sdlTypes);
+  let b = bucketFor(currentScope.contents);
+  sdlTypes.forEach(t => {
+    if (!b.typeDefinitions.includes(t)) {
+      b.typeDefinitions.push(t);
+      return;
+    }
+  });
 }
 
 let nodeTypeRegistry = {
@@ -255,44 +330,153 @@ let lastFullSdl = {
   contents: undefined
 };
 
+function assembleBucketSdl(typeDefinitions, queryFields, mutationFields, subscriptionFields, withRootDefaults) {
+  let sections = [];
+  if (typeDefinitions.length !== 0) {
+    sections.push(typeDefinitions.join("\n\n"));
+  }
+  if (withRootDefaults || queryFields.length !== 0) {
+    let queries = queryFields.length !== 0 ? queryFields.join("\n") : "  _noop: String";
+    sections.push(`type Query {\n` + queries + `\n}`);
+  }
+  if (withRootDefaults || mutationFields.length !== 0) {
+    let mutations = mutationFields.length !== 0 ? mutationFields.join("\n") : "  _noop: String";
+    sections.push(`type Mutation {\n` + mutations + `\n}`);
+  }
+  if (subscriptionFields.length !== 0) {
+    sections.push(`type Subscription {\n` + subscriptionFields.join("\n") + `\n}`);
+  }
+  return sections.join("\n\n");
+}
+
+function buildScopeSdl(b) {
+  return assembleBucketSdl(b.typeDefinitions, b.queryFields, b.mutationFields, b.subscriptionFields, false);
+}
+
 function buildSdl() {
-  let typesSdl = typeDefinitions.contents.length !== 0 ? typeDefinitions.contents.join("\n\n") : "";
-  let mutations = mutationFields.contents.length !== 0 ? mutationFields.contents.join("\n") : "  _noop: String";
-  let queries = queryFields.contents.length !== 0 ? queryFields.contents.join("\n") : "  _noop: String";
-  let queriesMutationsSdl = `type Query {
-` + queries + `
+  let seenTypes = new Set();
+  let allTypes = [];
+  let allQueries = [];
+  let allMutations = [];
+  let allSubscriptions = [];
+  orderedBuckets().forEach(param => {
+    let b = param[1];
+    b.typeDefinitions.forEach(t => {
+      if (!seenTypes.has(t)) {
+        seenTypes.add(t);
+        allTypes.push(t);
+        return;
+      }
+    });
+    allQueries.push(...b.queryFields);
+    allMutations.push(...b.mutationFields);
+    allSubscriptions.push(...b.subscriptionFields);
+  });
+  return assembleBucketSdl(allTypes, allQueries, allMutations, allSubscriptions, true);
+}
+
+function exnMessage(exn) {
+  return Stdlib_Option.getOr(Stdlib_Option.flatMap(Stdlib_JsExn.fromException(exn), Stdlib_JsExn.message), "unknown error");
+}
+
+function scopeResolverMap(b, withRootDefaults) {
+  let resolvers = {};
+  if (withRootDefaults || Object.keys(b.queryResolvers).length !== 0) {
+    resolvers["Query"] = b.queryResolvers;
+  }
+  if (withRootDefaults || Object.keys(b.mutationResolvers).length !== 0) {
+    resolvers["Mutation"] = b.mutationResolvers;
+  }
+  if (Object.keys(b.subscriptionResolvers).length !== 0) {
+    resolvers["Subscription"] = b.subscriptionResolvers;
+  }
+  return resolvers;
+}
+
+function scopeHasFields(b) {
+  if (b.mutationFields.length !== 0 || b.queryFields.length !== 0) {
+    return true;
+  } else {
+    return b.subscriptionFields.length !== 0;
+  }
 }
-type Mutation {
-` + mutations + `
-}`;
-  let subscriptionsSdl = subscriptionFields.contents.length !== 0 ? `\n\ntype Subscription {\n` + subscriptionFields.contents.join("\n") + `\n}` : "";
-  let base = typesSdl.length > 0 ? typesSdl + "\n\n" + queriesMutationsSdl : queriesMutationsSdl;
-  return base + subscriptionsSdl;
+
+function composeSchema() {
+  orderedBuckets().forEach(param => {
+    let b = param[1];
+    let scope = param[0];
+    if (!(scope !== platformScope && scopeHasFields(b))) {
+      return;
+    }
+    let doc = buildScopeSdl(b);
+    try {
+      GraphqlYoga$1.createSchema({
+        typeDefs: doc,
+        resolvers: scopeResolverMap(b, false)
+      });
+      return;
+    } catch (raw_e) {
+      let e = Primitive_exceptions.internalToException(raw_e);
+      return Stdlib_JsError.throwWithMessage(`Plugin "` + scope + `" subgraph document is not valid standalone: ` + exnMessage(e));
+    }
+  });
+  let platformBucket = bucketFor(platformScope);
+  let docs = [assembleBucketSdl(platformBucket.typeDefinitions, platformBucket.queryFields, platformBucket.mutationFields, platformBucket.subscriptionFields, true)];
+  let resolverMaps = [scopeResolverMap(platformBucket, true)];
+  orderedBuckets().forEach(param => {
+    if (param[0] === platformScope) {
+      return;
+    }
+    let b = param[1];
+    let doc = buildScopeSdl(b);
+    if (doc.length > 0) {
+      docs.push(doc);
+      resolverMaps.push(scopeResolverMap(b, false));
+      return;
+    }
+  });
+  try {
+    return GraphqlYoga$1.createSchema({
+      typeDefs: docs,
+      resolvers: resolverMaps
+    });
+  } catch (raw_e) {
+    let e = Primitive_exceptions.internalToException(raw_e);
+    return Stdlib_JsError.throwWithMessage(`Cross-plugin schema merge failed (mirrors AWS MERGE_FAILED): ` + exnMessage(e));
+  }
 }
 
 function start(portOpt, param, param$1) {
   let port = portOpt !== undefined ? portOpt : 4000;
   let match = buildNodeResolver();
   if (match !== undefined) {
-    queryResolvers.contents[match[0]] = match[1];
+    bucketFor(platformScope).queryResolvers[match[0]] = match[1];
   }
-  let resolvers = {};
-  resolvers["Query"] = queryResolvers.contents;
-  resolvers["Mutation"] = mutationResolvers.contents;
-  if (Object.keys(subscriptionResolvers.contents).length !== 0) {
-    resolvers["Subscription"] = subscriptionResolvers.contents;
-  }
-  let sdl = buildSdl();
-  lastFullSdl.contents = sdl;
-  let schema = GraphqlYoga.createSchema({
-    typeDefs: sdl,
-    resolvers: resolvers
-  });
+  lastFullSdl.contents = buildSdl();
+  let schema = composeSchema();
   activeSchema.contents = Primitive_option.some(schema);
-  let yoga = GraphqlYoga.createYoga({
+  let yogaLogging_debug = a => {
+    if (debug) {
+      return log.debug("GraphQL:Domain", undefined, GraphqlYoga.logArgToString(a));
+    }
+  };
+  let yogaLogging_info = a => {
+    if (debug) {
+      return log.info("GraphQL:Domain", undefined, GraphqlYoga.logArgToString(a));
+    }
+  };
+  let yogaLogging_warn = a => log.warn("GraphQL:Domain", undefined, GraphqlYoga.logArgToString(a));
+  let yogaLogging_error = a => log.error("GraphQL:Domain", undefined, GraphqlYoga.logArgToString(a));
+  let yogaLogging = {
+    debug: yogaLogging_debug,
+    info: yogaLogging_info,
+    warn: yogaLogging_warn,
+    error: yogaLogging_error
+  };
+  let yoga = GraphqlYoga$1.createYoga({
     schema: schema,
     graphiql: true,
-    logging: debug,
+    logging: yogaLogging,
     maskedErrors: !debug,
     context: Auth_GraphqlContext$ReventlessLocal.buildAuthContext
   });
@@ -319,64 +503,9 @@ function stop() {
   }
 }
 
-function rebuildSchema(baseFragment, pluginFragments) {
-  stop();
-  let allFragments = [baseFragment].concat(pluginFragments);
-  let fragmentTypes = allFragments.flatMap(frag => GraphQL_Stitcher$ReventlessCore.decode(frag).types);
-  let existingNames = new Set(typeDefinitions.contents.map(GraphQL_Stitcher$ReventlessCore.extractLeadingName));
-  fragmentTypes.forEach(typeDef => {
-    let name = GraphQL_Stitcher$ReventlessCore.extractLeadingName(typeDef);
-    if (!existingNames.has(name)) {
-      typeDefinitions.contents.push(typeDef);
-      existingNames.add(name);
-      return;
-    }
-  });
-  let match = buildNodeResolver();
-  if (match !== undefined) {
-    queryResolvers.contents[match[0]] = match[1];
-  }
-  let fullSdl = buildSdl();
-  lastFullSdl.contents = fullSdl;
-  let resolvers = {};
-  resolvers["Query"] = queryResolvers.contents;
-  resolvers["Mutation"] = mutationResolvers.contents;
-  if (Object.keys(subscriptionResolvers.contents).length !== 0) {
-    resolvers["Subscription"] = subscriptionResolvers.contents;
-  }
-  let schema = GraphqlYoga.createSchema({
-    typeDefs: fullSdl,
-    resolvers: resolvers
-  });
-  activeSchema.contents = Primitive_option.some(schema);
-  let yoga = GraphqlYoga.createYoga({
-    schema: schema,
-    graphiql: true,
-    logging: debug,
-    maskedErrors: !debug,
-    context: Auth_GraphqlContext$ReventlessLocal.buildAuthContext
-  });
-  let getSdl = () => {
-    let s = activeSchema.contents;
-    if (s !== undefined) {
-      return Graphql.printSchema(Primitive_option.valFromOption(s));
-    } else {
-      return Stdlib_Option.getOr(lastFullSdl.contents, "");
-    }
-  };
-  let server = Http.createServer((req, res) => _dispatch(req, res, yoga, getSdl));
-  server.listen(4000, () => log.info("GraphQL:Domain", undefined, "rebuilt schema - http://localhost:4000/graphql (SDL: /sdl)"));
-  activeServer.contents = Primitive_option.some(server);
-}
-
 function reset() {
-  mutationResolvers.contents = {};
-  queryResolvers.contents = {};
-  subscriptionResolvers.contents = {};
-  mutationFields.contents = [];
-  queryFields.contents = [];
-  subscriptionFields.contents = [];
-  typeDefinitions.contents = [];
+  buckets.contents = {};
+  currentScope.contents = platformScope;
   nodeTypeRegistry.contents = {};
   nodeResolverCallback.contents = undefined;
   activeSchema.contents = undefined;
@@ -389,8 +518,8 @@ function getRegisteredSdl() {
 
 function getRegisteredResolverNames() {
   return {
-    mutations: Object.keys(mutationResolvers.contents),
-    queries: Object.keys(queryResolvers.contents)
+    mutations: orderedBuckets().flatMap(param => Object.keys(param[1].mutationResolvers)),
+    queries: orderedBuckets().flatMap(param => Object.keys(param[1].queryResolvers))
   };
 }
 
@@ -423,10 +552,11 @@ function extractFieldName(sdlField) {
 }
 
 function diagnostics() {
-  let mutFieldNames = mutationFields.contents.map(extractFieldName).filter(n => n !== "_noop");
-  let queryFieldNames = queryFields.contents.map(extractFieldName).filter(n => n !== "_noop");
-  let mutResolverNames = Object.keys(mutationResolvers.contents);
-  let queryResolverNames = Object.keys(queryResolvers.contents);
+  let allBuckets = orderedBuckets().map(param => param[1]);
+  let mutFieldNames = allBuckets.flatMap(b => b.mutationFields).map(extractFieldName).filter(n => n !== "_noop");
+  let queryFieldNames = allBuckets.flatMap(b => b.queryFields).map(extractFieldName).filter(n => n !== "_noop");
+  let mutResolverNames = allBuckets.flatMap(b => Object.keys(b.mutationResolvers));
+  let queryResolverNames = allBuckets.flatMap(b => Object.keys(b.queryResolvers));
   let mismatches = [];
   let mutResolverSet = new Set(mutResolverNames);
   mutFieldNames.forEach(name => {
@@ -456,7 +586,17 @@ function diagnostics() {
       return;
     }
   });
-  let typeNames = typeDefinitions.contents.map(GraphQL_Stitcher$ReventlessCore.extractLeadingName);
+  let seenTypeBlocks = new Set();
+  let typeNames = [];
+  allBuckets.forEach(b => {
+    b.typeDefinitions.forEach(t => {
+      if (!seenTypeBlocks.has(t)) {
+        seenTypeBlocks.add(t);
+        typeNames.push(GraphQL_Stitcher$ReventlessCore.extractLeadingName(t));
+        return;
+      }
+    });
+  });
   return {
     registeredTypeDefinitions: typeNames,
     registeredMutationFields: mutFieldNames,
@@ -535,13 +675,16 @@ export {
   buildAuthContext,
   encodeGlobalId,
   decodeGlobalId,
-  mutationResolvers,
-  queryResolvers,
-  subscriptionResolvers,
-  mutationFields,
-  queryFields,
-  subscriptionFields,
-  typeDefinitions,
+  platformScope,
+  makeBucket,
+  buckets,
+  currentScope,
+  bucketFor,
+  currentBucket,
+  setScope,
+  resetScope,
+  relabelScope,
+  orderedBuckets,
   registerMutations,
   registerQueries,
   registerSubscriptions,
@@ -557,10 +700,15 @@ export {
   activeServer,
   activeSchema,
   lastFullSdl,
+  assembleBucketSdl,
+  buildScopeSdl,
   buildSdl,
+  exnMessage,
+  scopeResolverMap,
+  scopeHasFields,
+  composeSchema,
   start,
   stop,
-  rebuildSchema,
   reset,
   getRegisteredSdl,
   getRegisteredResolverNames,

package/src/adapter/GraphQL_Server.res.mjs

@@ -26,19 +26,25 @@ let encodeGlobalId = DomainGraphQL_Server$ReventlessLocal.encodeGlobalId;
 
 let decodeGlobalId = DomainGraphQL_Server$ReventlessLocal.decodeGlobalId;
 
-let mutationResolvers = DomainGraphQL_Server$ReventlessLocal.mutationResolvers;
+let platformScope = DomainGraphQL_Server$ReventlessLocal.platformScope;
 
-let queryResolvers = DomainGraphQL_Server$ReventlessLocal.queryResolvers;
+let makeBucket = DomainGraphQL_Server$ReventlessLocal.makeBucket;
 
-let subscriptionResolvers = DomainGraphQL_Server$ReventlessLocal.subscriptionResolvers;
+let buckets = DomainGraphQL_Server$ReventlessLocal.buckets;
 
-let mutationFields = DomainGraphQL_Server$ReventlessLocal.mutationFields;
+let currentScope = DomainGraphQL_Server$ReventlessLocal.currentScope;
 
-let queryFields = DomainGraphQL_Server$ReventlessLocal.queryFields;
+let bucketFor = DomainGraphQL_Server$ReventlessLocal.bucketFor;
 
-let subscriptionFields = DomainGraphQL_Server$ReventlessLocal.subscriptionFields;
+let currentBucket = DomainGraphQL_Server$ReventlessLocal.currentBucket;
 
-let typeDefinitions = DomainGraphQL_Server$ReventlessLocal.typeDefinitions;
+let setScope = DomainGraphQL_Server$ReventlessLocal.setScope;
+
+let resetScope = DomainGraphQL_Server$ReventlessLocal.resetScope;
+
+let relabelScope = DomainGraphQL_Server$ReventlessLocal.relabelScope;
+
+let orderedBuckets = DomainGraphQL_Server$ReventlessLocal.orderedBuckets;
 
 let registerMutations = DomainGraphQL_Server$ReventlessLocal.registerMutations;
 
@@ -70,14 +76,24 @@ let activeSchema = DomainGraphQL_Server$ReventlessLocal.activeSchema;
 
 let lastFullSdl = DomainGraphQL_Server$ReventlessLocal.lastFullSdl;
 
+let assembleBucketSdl = DomainGraphQL_Server$ReventlessLocal.assembleBucketSdl;
+
+let buildScopeSdl = DomainGraphQL_Server$ReventlessLocal.buildScopeSdl;
+
 let buildSdl = DomainGraphQL_Server$ReventlessLocal.buildSdl;
 
+let exnMessage = DomainGraphQL_Server$ReventlessLocal.exnMessage;
+
+let scopeResolverMap = DomainGraphQL_Server$ReventlessLocal.scopeResolverMap;
+
+let scopeHasFields = DomainGraphQL_Server$ReventlessLocal.scopeHasFields;
+
+let composeSchema = DomainGraphQL_Server$ReventlessLocal.composeSchema;
+
 let start = DomainGraphQL_Server$ReventlessLocal.start;
 
 let stop = DomainGraphQL_Server$ReventlessLocal.stop;
 
-let rebuildSchema = DomainGraphQL_Server$ReventlessLocal.rebuildSchema;
-
 let reset = DomainGraphQL_Server$ReventlessLocal.reset;
 
 let getRegisteredSdl = DomainGraphQL_Server$ReventlessLocal.getRegisteredSdl;
@@ -113,13 +129,16 @@ export {
   buildAuthContext,
   encodeGlobalId,
   decodeGlobalId,
-  mutationResolvers,
-  queryResolvers,
-  subscriptionResolvers,
-  mutationFields,
-  queryFields,
-  subscriptionFields,
-  typeDefinitions,
+  platformScope,
+  makeBucket,
+  buckets,
+  currentScope,
+  bucketFor,
+  currentBucket,
+  setScope,
+  resetScope,
+  relabelScope,
+  orderedBuckets,
   registerMutations,
   registerQueries,
   registerSubscriptions,
@@ -135,10 +154,15 @@ export {
   activeServer,
   activeSchema,
   lastFullSdl,
+  assembleBucketSdl,
+  buildScopeSdl,
   buildSdl,
+  exnMessage,
+  scopeResolverMap,
+  scopeHasFields,
+  composeSchema,
   start,
   stop,
-  rebuildSchema,
   reset,
   getRegisteredSdl,
   getRegisteredResolverNames,