@reventlessdev/reventless-local 3.0.0-alpha.249 → 3.0.0-alpha.251

package/src/adapter/MCP_ServerInstance.res

@@ -26,9 +26,21 @@ type diagnostics = {
 }
 
 type t = {
-  registerTool: (~name: string, ~definition: ReventlessCore.MCP_SchemaGenerator.mcpToolDefinition, ~handler: toolHandler) => unit,
-  registerResource: (~name: string, ~definition: ReventlessCore.MCP_SchemaGenerator.mcpResourceDefinition, ~handler: resourceHandler) => unit,
-  registerResourceTemplate: (~name: string, ~definition: ReventlessCore.MCP_SchemaGenerator.mcpResourceDefinition, ~handler: resourceHandler) => unit,
+  registerTool: (
+    ~name: string,
+    ~definition: ReventlessCore.MCP_SchemaGenerator.mcpToolDefinition,
+    ~handler: toolHandler,
+  ) => unit,
+  registerResource: (
+    ~name: string,
+    ~definition: ReventlessCore.MCP_SchemaGenerator.mcpResourceDefinition,
+    ~handler: resourceHandler,
+  ) => unit,
+  registerResourceTemplate: (
+    ~name: string,
+    ~definition: ReventlessCore.MCP_SchemaGenerator.mcpResourceDefinition,
+    ~handler: resourceHandler,
+  ) => unit,
   registerToolsFromEntries: (
     ~pluginName: string,
     ~mutationEntries: array<ReventlessInfra.Api.mutationSchemaEntry>,
@@ -248,9 +260,7 @@ let make = (~label: string="MCP"): t => {
           }
           await handler(uri)
         | None => {
-            McpSdk.contents: [
-              {McpSdk.uri, text: `{"error": "Resource not found: ${uri}"}`},
-            ],
+            McpSdk.contents: [{McpSdk.uri, text: `{"error": "Resource not found: ${uri}"}`}],
           }
         }
       }
@@ -261,43 +271,45 @@ let make = (~label: string="MCP"): t => {
 
   let start = (~port: int=3001, ()) => {
     let httpServer = McpSdk.createHttpServer((req, res) => {
-      let _ = (async () => {
-        let reqMethod = req->McpSdk.method
-        let reqUrl = req->McpSdk.url
+      let _ = (
+        async () => {
+          let reqMethod = req->McpSdk.method
+          let reqUrl = req->McpSdk.url
 
-        res->McpSdk.setHeader("Access-Control-Allow-Origin", "*")
-        res->McpSdk.setHeader("Access-Control-Allow-Methods", "GET, POST, DELETE, OPTIONS")
-        res->McpSdk.setHeader("Access-Control-Allow-Headers", "Content-Type")
+          res->McpSdk.setHeader("Access-Control-Allow-Origin", "*")
+          res->McpSdk.setHeader("Access-Control-Allow-Methods", "GET, POST, DELETE, OPTIONS")
+          res->McpSdk.setHeader("Access-Control-Allow-Headers", "Content-Type")
 
-        if reqUrl == "/mcp" || reqUrl->String.startsWith("/mcp?") {
-          switch reqMethod {
-          | "OPTIONS" =>
-            res->McpSdk.setStatusCode(204)
-            res->McpSdk.endResponseNoBody
-          | "POST" =>
-            let body = await McpSdk_Helpers.parseJsonBody(req)
-            let identity = extractIdentity(req)
-            let server = createServerInstance(identity)
-            let transport = McpSdk.newStreamableHTTPTransport({
-              enableJsonResponse: true,
-            })
-            let _ = await server->McpSdk.connect(transport)
-            let _ = await transport->McpSdk.handleRequest(req, res, body)
-          | "GET" =>
-            res->McpSdk.setHeader("Content-Type", "text/plain")
-            res->McpSdk.endResponse(`${label} server running`)
-          | "DELETE" =>
-            res->McpSdk.setStatusCode(200)
-            res->McpSdk.endResponseNoBody
-          | _ =>
-            res->McpSdk.setStatusCode(405)
-            res->McpSdk.endResponse("Method not allowed")
+          if reqUrl == "/mcp" || reqUrl->String.startsWith("/mcp?") {
+            switch reqMethod {
+            | "OPTIONS" =>
+              res->McpSdk.setStatusCode(204)
+              res->McpSdk.endResponseNoBody
+            | "POST" =>
+              let body = await McpSdk_Helpers.parseJsonBody(req)
+              let identity = extractIdentity(req)
+              let server = createServerInstance(identity)
+              let transport = McpSdk.newStreamableHTTPTransport({
+                enableJsonResponse: true,
+              })
+              let _ = await server->McpSdk.connect(transport)
+              let _ = await transport->McpSdk.handleRequest(req, res, body)
+            | "GET" =>
+              res->McpSdk.setHeader("Content-Type", "text/plain")
+              res->McpSdk.endResponse(`${label} server running`)
+            | "DELETE" =>
+              res->McpSdk.setStatusCode(200)
+              res->McpSdk.endResponseNoBody
+            | _ =>
+              res->McpSdk.setStatusCode(405)
+              res->McpSdk.endResponse("Method not allowed")
+            }
+          } else {
+            res->McpSdk.setStatusCode(404)
+            res->McpSdk.endResponse("Not found")
           }
-        } else {
-          res->McpSdk.setStatusCode(404)
-          res->McpSdk.endResponse("Not found")
         }
-      })()
+      )()
     })
 
     httpServer->McpSdk.listen(port, () => {

package/src/adapter/ObjectStore/LocalObjectStore.res

@@ -83,11 +83,14 @@ let declaredStoreList = (): array<(string, string)> => declaredStores->Dict.toAr
 // key becomes a path, and `uploads/../../etc/passwd` would otherwise escape the
 // store.
 let servedKey = (path: string): option<string> => {
-  let trimmed = path->String.startsWith("/") ? path->String.slice(~start=1, ~end=path->String.length) : path
+  let trimmed =
+    path->String.startsWith("/") ? path->String.slice(~start=1, ~end=path->String.length) : path
   let segments = trimmed->String.split("/")
   let underAPrefix =
     servedPrefixes.contents->Array.some(p =>
-      p->String.length > 0 && trimmed->String.startsWith(p ++ "/") && trimmed->String.length > p->String.length + 1
+      p->String.length > 0 &&
+      trimmed->String.startsWith(p ++ "/") &&
+      trimmed->String.length > p->String.length + 1
     )
   if underAPrefix && segments->Array.every(seg => seg != "" && seg != "." && seg != "..") {
     Some(trimmed)

package/src/adapter/ObjectStore/ObjectStoreStorage_FileSystem.res

@@ -178,8 +178,7 @@ let topLevelPrefixes = (~root: string): array<string> =>
   | _ => None
   } {
   | None => []
-  | Some(entries) =>
-    entries->Array.filter(NodeFs.isDirectory)->Array.map(NodeFs.direntName)
+  | Some(entries) => entries->Array.filter(NodeFs.isDirectory)->Array.map(NodeFs.direntName)
   }
 
 /** Deletes every object under `prefix`, returning how many were removed. Goes

package/src/adapter/PlatformGraphQL_Server.res

@@ -27,17 +27,21 @@
 // — without the wrapper, anonymous callers could trigger admin mutations
 // (Plugin_Activate / _Deactivate, etc.) just by hitting the platform port.
 
-let instance: ReventlessGraphqlServer.GraphQL_ServerInstance.t = ReventlessGraphqlServer.GraphQL_ServerInstance.make(~label="GraphQL:Platform")
+let instance: ReventlessGraphqlServer.GraphQL_ServerInstance.t = ReventlessGraphqlServer.GraphQL_ServerInstance.make(
+  ~label="GraphQL:Platform",
+)
 
 // Wrap a resolver dict so every value enforces the Admin group. Keys are
 // preserved; resolvers fall through to the underlying instance once the
 // group check passes.
-let wrapAdmin = (
-  resolvers: dict<ReventlessGraphqlServer.GraphQL_ServerInstance.resolverFn>,
-): dict<ReventlessGraphqlServer.GraphQL_ServerInstance.resolverFn> => {
+let wrapAdmin = (resolvers: dict<ReventlessGraphqlServer.GraphQL_ServerInstance.resolverFn>): dict<
+  ReventlessGraphqlServer.GraphQL_ServerInstance.resolverFn,
+> => {
   let wrapped = Dict.make()
-  resolvers->Dict.toArray->Array.forEach(((k, v)) =>
-    wrapped->Dict.set(k, Auth_GraphqlContext.requireGroup(~group="Admin", v))
+  resolvers
+  ->Dict.toArray
+  ->Array.forEach(((k, v)) =>
+    wrapped->Dict.set(k, Auth_GraphqlContext.requireGroup(~group=Reventless.AdminGroup.name, v))
   )
   wrapped
 }

package/src/adapter/PlatformGraphQL_Server.res.mjs

@@ -1,5 +1,6 @@
 // Generated by ReScript, PLEASE EDIT WITH CARE
 
+import * as AdminGroup$Reventless from "@reventlessdev/reventless-spec/src/types/AdminGroup.res.mjs";
 import * as Auth_GraphqlContext$ReventlessLocal from "./Auth/Auth_GraphqlContext.res.mjs";
 import * as GraphQL_ServerInstance$ReventlessGraphqlServer from "@reventlessdev/reventless-graphql-server/src/GraphQL_ServerInstance.res.mjs";
 
@@ -8,7 +9,7 @@ let instance = GraphQL_ServerInstance$ReventlessGraphqlServer.make("GraphQL:Plat
 function wrapAdmin(resolvers) {
   let wrapped = {};
   Object.entries(resolvers).forEach(param => {
-    wrapped[param[0]] = Auth_GraphqlContext$ReventlessLocal.requireGroup("Admin", param[1]);
+    wrapped[param[0]] = Auth_GraphqlContext$ReventlessLocal.requireGroup(AdminGroup$Reventless.name, param[1]);
   });
   return wrapped;
 }

package/src/adapter/ProjectionCheckpoint.res

@@ -259,7 +259,14 @@ let missedRows = (
         }
         Some((
           Float.toInt(pos),
-          dcbCatchupEnvelope(~logName, ~eventType, ~dataText, ~metaText, ~recordedAt, ~firstTagValue),
+          dcbCatchupEnvelope(
+            ~logName,
+            ~eventType,
+            ~dataText,
+            ~metaText,
+            ~recordedAt,
+            ~firstTagValue,
+          ),
         ))
       | _ => None
       }

package/src/adapter/ProjectionPending.res

@@ -32,9 +32,7 @@ let enableTracking = () => enabled := true
 
 let trackAppended = (~axis: axis, entries: array<(string, int)>) =>
   if enabled.contents {
-    entries->Array.forEach(((msgId, position)) =>
-      pendingByMsgId->Dict.set(msgId, (axis, position))
-    )
+    entries->Array.forEach(((msgId, position)) => pendingByMsgId->Dict.set(msgId, (axis, position)))
   }
 
 let resolve = (msgIds: array<string>) =>

package/src/adapter/QueryDb/LocalQueryDbStorage.res

@@ -33,7 +33,8 @@ module Make = (Bus: LocalBus.T) => {
     ~ttl=?,
     ~api,
     ~apiRole,
-    ~owner, ~opts,
+    ~owner,
+    ~opts,
   ) =>
     switch BackendState.getSqliteDb() {
     | Some(db) =>