envio 3.0.0-alpha.21 → 3.0.0-alpha.23

package/src/EnvSafe.res.mjs

@@ -0,0 +1,296 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+import * as Primitive_option from "@rescript/runtime/lib/es6/Primitive_option.js";
+import * as S$RescriptSchema from "rescript-schema/src/S.res.mjs";
+import * as Primitive_exceptions from "@rescript/runtime/lib/es6/Primitive_exceptions.js";
+
+function alert(message) {
+  if ((typeof window !== 'undefined' && window.alert)) {
+    return (window.alert(message));
+  }
+}
+
+function mixinMissingIssue(envSafe, issue) {
+  let missingIssues = envSafe.maybeMissingIssues;
+  if (missingIssues !== undefined) {
+    missingIssues.push(issue);
+  } else {
+    envSafe.maybeMissingIssues = [issue];
+  }
+}
+
+function mixinInvalidIssue(envSafe, issue) {
+  let invalidIssues = envSafe.maybeInvalidIssues;
+  if (invalidIssues !== undefined) {
+    invalidIssues.push(issue);
+  } else {
+    envSafe.maybeInvalidIssues = [issue];
+  }
+}
+
+function make(envOpt) {
+  let env = envOpt !== undefined ? envOpt : process.env;
+  return {
+    env: env,
+    isLocked: false,
+    maybeMissingIssues: undefined,
+    maybeInvalidIssues: undefined
+  };
+}
+
+function close(envSafe) {
+  if (envSafe.isLocked) {
+    throw new Error(`[rescript-envsafe] ` + "EnvSafe is already closed.");
+  }
+  envSafe.isLocked = true;
+  let match = envSafe.maybeMissingIssues;
+  let match$1 = envSafe.maybeInvalidIssues;
+  if (match === undefined && match$1 === undefined) {
+    return;
+  }
+  let line = "========================================";
+  let output = [line];
+  if (match$1 !== undefined) {
+    let invalidIssues = Primitive_option.valFromOption(match$1);
+    output.push("❌ Invalid environment variables:");
+    invalidIssues.forEach(issue => {
+      output.push(`    ` + issue.name + `: ` + S$RescriptSchema.$$Error.message(issue.error));
+    });
+  }
+  if (match !== undefined) {
+    let missingIssues = Primitive_option.valFromOption(match);
+    output.push("💨 Missing environment variables:");
+    missingIssues.forEach(issue => {
+      let match = issue.input;
+      let tmp;
+      tmp = match === "" ? "Disallowed empty string" : "Missing value";
+      output.push(`    ` + issue.name + `: ` + tmp);
+    });
+  }
+  output.push(line);
+  let text = output.join("\n");
+  console.error(text);
+  alert(text);
+  throw new TypeError(text);
+}
+
+function boolCoerce(string) {
+  switch (string) {
+    case "0" :
+    case "f" :
+    case "false" :
+      return false;
+    case "1" :
+    case "t" :
+    case "true" :
+      return true;
+    default:
+      return string;
+  }
+}
+
+function numberCoerce(string) {
+  let float = (+string);
+  if (Number.isNaN(float)) {
+    return string;
+  } else {
+    return float;
+  }
+}
+
+function bigintCoerce(string) {
+  try {
+    return BigInt(string);
+  } catch (exn) {
+    return string;
+  }
+}
+
+function jsonCoerce(string) {
+  try {
+    return JSON.parse(string);
+  } catch (exn) {
+    return string;
+  }
+}
+
+function get(envSafe, name, schema, allowEmptyOpt, maybeFallback, maybeDevFallback, maybeInlinedInput) {
+  let allowEmpty = allowEmptyOpt !== undefined ? allowEmptyOpt : false;
+  if (envSafe.isLocked) {
+    throw new Error(`[rescript-envsafe] ` + "EnvSafe is closed. Make a new one to get access to environment variables.");
+  }
+  let input = maybeInlinedInput !== undefined ? Primitive_option.valFromOption(maybeInlinedInput) : envSafe.env[name];
+  let isMissing = input !== undefined ? (
+      input === "" ? !allowEmpty : false
+    ) : true;
+  let match = schema.t;
+  let isOptional;
+  isOptional = typeof match !== "object" ? false : match.TAG === "option";
+  if (isMissing && !isOptional) {
+    if (maybeDevFallback !== undefined && envSafe.env["NODE_ENV"] !== "production") {
+      return Primitive_option.valFromOption(maybeDevFallback);
+    }
+    if (maybeFallback !== undefined) {
+      return Primitive_option.valFromOption(maybeFallback);
+    } else {
+      mixinMissingIssue(envSafe, {
+        name: name,
+        input: input
+      });
+      return undefined;
+    }
+  }
+  let optionalSchema = schema.t;
+  let tagged;
+  tagged = typeof optionalSchema !== "object" || optionalSchema.TAG !== "option" ? optionalSchema : optionalSchema._0.t;
+  let input$1;
+  if (input !== undefined) {
+    let exit = 0;
+    if (input === "" && !allowEmpty) {
+      input$1 = undefined;
+    } else {
+      exit = 1;
+    }
+    if (exit === 1) {
+      let tmp;
+      if (typeof tagged !== "object") {
+        switch (tagged) {
+          case "never" :
+          case "string" :
+            tmp = input;
+            break;
+          case "int32" :
+          case "number" :
+            tmp = numberCoerce(input);
+            break;
+          case "bigint" :
+            tmp = bigintCoerce(input);
+            break;
+          case "boolean" :
+            tmp = boolCoerce(input);
+            break;
+          default:
+            tmp = jsonCoerce(input);
+        }
+      } else {
+        switch (tagged.TAG) {
+          case "literal" :
+            switch (tagged._0.kind) {
+              case "String" :
+                tmp = input;
+                break;
+              case "Number" :
+                tmp = numberCoerce(input);
+                break;
+              case "Boolean" :
+                tmp = boolCoerce(input);
+                break;
+              case "BigInt" :
+                tmp = bigintCoerce(input);
+                break;
+              default:
+                tmp = jsonCoerce(input);
+            }
+            break;
+          case "union" :
+            tmp = input;
+            break;
+          default:
+            tmp = jsonCoerce(input);
+        }
+      }
+      input$1 = tmp;
+    }
+  } else {
+    input$1 = undefined;
+  }
+  let schema$1;
+  schema$1 = typeof tagged !== "object" || tagged.TAG !== "union" ? schema : S$RescriptSchema.preprocess(schema, s => {
+      let optionalSchema = s.schema.t;
+      let tagged;
+      tagged = typeof optionalSchema !== "object" || optionalSchema.TAG !== "option" ? optionalSchema : optionalSchema._0.t;
+      let exit = 0;
+      if (typeof tagged !== "object") {
+        switch (tagged) {
+          case "never" :
+          case "string" :
+            return {};
+          case "int32" :
+          case "number" :
+            exit = 4;
+            break;
+          case "bigint" :
+            exit = 3;
+            break;
+          case "boolean" :
+            exit = 2;
+            break;
+          default:
+            exit = 1;
+        }
+      } else {
+        switch (tagged.TAG) {
+          case "literal" :
+            switch (tagged._0.kind) {
+              case "String" :
+                return {};
+              case "Number" :
+                exit = 4;
+                break;
+              case "Boolean" :
+                exit = 2;
+                break;
+              case "BigInt" :
+                exit = 3;
+                break;
+              default:
+                exit = 1;
+            }
+            break;
+          case "union" :
+            return {};
+          default:
+            exit = 1;
+        }
+      }
+      switch (exit) {
+        case 1 :
+          return {
+            p: jsonCoerce
+          };
+        case 2 :
+          return {
+            p: boolCoerce
+          };
+        case 3 :
+          return {
+            p: bigintCoerce
+          };
+        case 4 :
+          return {
+            p: numberCoerce
+          };
+      }
+    });
+  try {
+    return S$RescriptSchema.parseOrThrow(input$1, schema$1);
+  } catch (raw_error) {
+    let error = Primitive_exceptions.internalToException(raw_error);
+    if (error.RE_EXN_ID === S$RescriptSchema.Raised) {
+      mixinInvalidIssue(envSafe, {
+        name: name,
+        error: error._1,
+        input: input$1
+      });
+      return undefined;
+    }
+    throw error;
+  }
+}
+
+export {
+  make,
+  close,
+  get,
+}
+/* S-RescriptSchema Not a pure module */

package/src/EnvSafe.resi

@@ -0,0 +1,18 @@
+@@uncurried
+
+type env
+type t
+
+let make: (~env: env=?) => t
+
+let close: t => unit
+
+let get: (
+  t,
+  string,
+  S.t<'value>,
+  ~allowEmpty: bool=?,
+  ~fallback: 'value=?,
+  ~devFallback: 'value=?,
+  ~input: option<string>=?,
+) => 'value

package/src/Envio.res

@@ -2,28 +2,38 @@
 // Should be an entry point after we get rid of the generated project.
 // Don't forget to keep index.d.ts in sync with this file.
 
-@genType
-type blockEvent = {number: int}
-
-@genType
-type fuelBlockEvent = {height: int}
+// Ecosystem-scoped argument records for `indexer.onBlock` / `indexer.onSlot`
+// handlers. Mirror the TypeScript shapes in `packages/envio/index.d.ts`
+// (`EvmOnBlockHandlerArgs`, `FuelOnBlockHandlerArgs`, `SvmOnSlotHandlerArgs`).
+type evmOnBlockArgs<'context> = {
+  block: {number: int},
+  context: 'context,
+}
 
-@genType
-type svmOnBlockArgs<'context> = {slot: int, context: 'context}
+type fuelOnBlockArgs<'context> = {
+  block: {height: int},
+  context: 'context,
+}
 
-@genType
-type onBlockArgs<'block, 'context> = {
-  block: 'block,
+type svmOnSlotArgs<'context> = {
+  slot: int,
   context: 'context,
 }
 
-@genType
+// Internal-only type for the `indexer.onBlock` (and SVM `onSlot`) `where`
+// callback argument. The canonical TypeScript shape lives in
+// `packages/envio/index.d.ts`; the ReScript declaration here is free to
+// diverge.
+type onBlockWhereArgs<'chain> = {chain: 'chain}
+
+// `where` returns a value interpreted at runtime by `Main.res::onBlockHandlerFn`:
+//   - `false` → skip this chain
+//   - `true` / omit → register on this chain with no extra filter
+//   - a filter object whose shape is ecosystem-specific (see the `Evm*` /
+//     `Fuel*` / `Svm*` `OnBlock`/`OnSlot` types in `packages/envio/index.d.ts`)
 type onBlockOptions<'chain> = {
   name: string,
-  chain: 'chain,
-  interval?: int,
-  startBlock?: int,
-  endBlock?: int,
+  where?: onBlockWhereArgs<'chain> => unknown,
 }
 
 type whereOperator<'fieldType> = {
@@ -41,7 +51,6 @@ type whereOperator<'fieldType> = {
   _in?: array<'fieldType>,
 }
 
-@genType.import(("./Types.ts", "Logger"))
 type logger = {
   debug: 'params. (string, ~params: {..} as 'params=?) => unit,
   info: 'params. (string, ~params: {..} as 'params=?) => unit,
@@ -51,18 +60,16 @@ type logger = {
 }
 
 @@warning("-30") // Duplicated type names (input)
-@genType.import(("./Types.ts", "Effect"))
 type rec effect<'input, 'output>
-@genType @unboxed
+@unboxed
 and rateLimitDuration =
   | @as("second") Second
   | @as("minute") Minute
   | Milliseconds(int)
-@genType @unboxed
+@unboxed
 and rateLimit =
   | @as(false) Disable
   | Enable({calls: int, per: rateLimitDuration})
-@genType
 and effectOptions<'input, 'output> = {
   /** The name of the effect. Used for logging and debugging. */
   name: string,
@@ -75,13 +82,11 @@ and effectOptions<'input, 'output> = {
   /** Whether the effect should be cached. */
   cache?: bool,
 }
-@genType.import(("./Types.ts", "EffectContext"))
 and effectContext = {
   log: logger,
   effect: 'input 'output. (effect<'input, 'output>, 'input) => promise<'output>,
   mutable cache: bool,
 }
-@genType
 and effectArgs<'input> = {
   input: 'input,
   context: effectContext,
@@ -138,7 +143,7 @@ let createEffect = (
         callsPerDuration: calls,
         durationMs: per->durationToMs,
         availableCalls: calls,
-        windowStartTime: Js.Date.now(),
+        windowStartTime: Date.now(),
         queueCount: 0,
         nextWindowPromise: None,
       })
@@ -157,7 +162,7 @@ type fuelTransactionInput = {id?: string}
 type evmSimulateItem = {
   contract: string,
   event: string,
-  params?: Js.Json.t,
+  params?: JSON.t,
   srcAddress?: Address.t,
   logIndex?: int,
   block?: Internal.evmBlockInput,
@@ -167,13 +172,19 @@ type evmSimulateItem = {
 type fuelSimulateItem = {
   contract: string,
   event: string,
-  params: Js.Json.t,
+  params: JSON.t,
   srcAddress?: Address.t,
   logIndex?: int,
   block?: fuelBlockInput,
   transaction?: fuelTransactionInput,
 }
 
+// Read at call time, not as a module-level binding. `Bin.res::applyEnv`
+// populates `process.env.ENVIO_DEV_MODE` *after* the JS bundle has loaded,
+// so a top-level `envSafe->EnvSafe.get(...)` in Env.res would always
+// snapshot the pre-applyEnv value (undefined → false).
+let isDevMode = () => NodeJs.Process.process.env->Dict.get("ENVIO_DEV_MODE") === Some("true")
+
 module TestHelpers = {
   module Addresses = {
     let mockAddresses =
@@ -199,6 +210,6 @@ module TestHelpers = {
         "0xdD2FD4581271e230360230F9337D5c0430Bf44C0",
         "0x8626f6940E2eb28930eFb4CeF49B2d1F2C9C1199",
       ]->Belt.Array.map(Address.Evm.fromStringOrThrow)
-    let defaultAddress = mockAddresses[0]
+    let defaultAddress = mockAddresses->Belt.Array.getUnsafe(0)
   }
 }

package/src/Envio.res.mjs

@@ -1,9 +1,9 @@
 // Generated by ReScript, PLEASE EDIT WITH CARE
 
 import * as Address from "./Address.res.mjs";
+import * as Process from "process";
 import * as Internal from "./Internal.res.mjs";
-import * as Belt_Array from "rescript/lib/es6/belt_Array.js";
-import * as Caml_array from "rescript/lib/es6/caml_array.js";
+import * as Belt_Array from "@rescript/runtime/lib/es6/Belt_Array.js";
 import * as S$RescriptSchema from "rescript-schema/src/S.res.mjs";
 
 function durationToMs(duration) {
@@ -19,22 +19,18 @@ function durationToMs(duration) {
 }
 
 function createEffect(options, handler) {
-  var outputSchema = S$RescriptSchema.schema(function (param) {
-        return options.output;
-      });
-  var itemSchema = S$RescriptSchema.schema(function (s) {
-        return {
-                id: s.m(S$RescriptSchema.string),
-                output: s.m(outputSchema)
-              };
-      });
-  var match = options.cache;
-  var match$1 = options.rateLimit;
-  var tmp;
-  if (typeof match$1 !== "object") {
+  let outputSchema = S$RescriptSchema.schema(param => options.output);
+  let itemSchema = S$RescriptSchema.schema(s => ({
+    id: s.m(S$RescriptSchema.string),
+    output: s.m(outputSchema)
+  }));
+  let match = options.cache;
+  let match$1 = options.rateLimit;
+  let tmp;
+  if (match$1 === false) {
     tmp = undefined;
   } else {
-    var calls = match$1.calls;
+    let calls = match$1.calls;
     tmp = {
       callsPerDuration: calls,
       durationMs: durationToMs(match$1.per),
@@ -45,61 +41,64 @@ function createEffect(options, handler) {
     };
   }
   return {
-          name: options.name,
-          handler: handler,
-          storageMeta: {
-            itemSchema: itemSchema,
-            outputSchema: outputSchema,
-            table: Internal.makeCacheTable(options.name)
-          },
-          defaultShouldCache: match !== undefined && match ? true : false,
-          output: outputSchema,
-          input: S$RescriptSchema.schema(function (param) {
-                return options.input;
-              }),
-          activeCallsCount: 0,
-          prevCallStartTimerRef: null,
-          rateLimit: tmp
-        };
+    name: options.name,
+    handler: handler,
+    storageMeta: {
+      itemSchema: itemSchema,
+      outputSchema: outputSchema,
+      table: Internal.makeCacheTable(options.name)
+    },
+    defaultShouldCache: match !== undefined ? match : false,
+    output: outputSchema,
+    input: S$RescriptSchema.schema(param => options.input),
+    activeCallsCount: 0,
+    prevCallStartTimerRef: null,
+    rateLimit: tmp
+  };
 }
 
-var mockAddresses = Belt_Array.map([
-      "0xf39Fd6e51aad88F6F4ce6aB8827279cffFb92266",
-      "0x70997970C51812dc3A010C7d01b50e0d17dc79C8",
-      "0x3C44CdDdB6a900fa2b585dd299e03d12FA4293BC",
-      "0x90F79bf6EB2c4f870365E785982E1f101E93b906",
-      "0x15d34AAf54267DB7D7c367839AAf71A00a2C6A65",
-      "0x9965507D1a55bcC2695C58ba16FB37d819B0A4dc",
-      "0x976EA74026E726554dB657fA54763abd0C3a0aa9",
-      "0x14dC79964da2C08b23698B3D3cc7Ca32193d9955",
-      "0x23618e81E3f5cdF7f54C3d65f7FBc0aBf5B21E8f",
-      "0xa0Ee7A142d267C1f36714E4a8F75612F20a79720",
-      "0xBcd4042DE499D14e55001CcbB24a551F3b954096",
-      "0x71bE63f3384f5fb98995898A86B02Fb2426c5788",
-      "0xFABB0ac9d68B0B445fB7357272Ff202C5651694a",
-      "0x1CBd3b2770909D4e10f157cABC84C7264073C9Ec",
-      "0xdF3e18d64BC6A983f673Ab319CCaE4f1a57C7097",
-      "0xcd3B766CCDd6AE721141F452C550Ca635964ce71",
-      "0x2546BcD3c84621e976D8185a91A922aE77ECEc30",
-      "0xbDA5747bFD65F08deb54cb465eB87D40e51B197E",
-      "0xdD2FD4581271e230360230F9337D5c0430Bf44C0",
-      "0x8626f6940E2eb28930eFb4CeF49B2d1F2C9C1199"
-    ], Address.Evm.fromStringOrThrow);
+function isDevMode() {
+  return Process.env["ENVIO_DEV_MODE"] === "true";
+}
+
+let mockAddresses = Belt_Array.map([
+  "0xf39Fd6e51aad88F6F4ce6aB8827279cffFb92266",
+  "0x70997970C51812dc3A010C7d01b50e0d17dc79C8",
+  "0x3C44CdDdB6a900fa2b585dd299e03d12FA4293BC",
+  "0x90F79bf6EB2c4f870365E785982E1f101E93b906",
+  "0x15d34AAf54267DB7D7c367839AAf71A00a2C6A65",
+  "0x9965507D1a55bcC2695C58ba16FB37d819B0A4dc",
+  "0x976EA74026E726554dB657fA54763abd0C3a0aa9",
+  "0x14dC79964da2C08b23698B3D3cc7Ca32193d9955",
+  "0x23618e81E3f5cdF7f54C3d65f7FBc0aBf5B21E8f",
+  "0xa0Ee7A142d267C1f36714E4a8F75612F20a79720",
+  "0xBcd4042DE499D14e55001CcbB24a551F3b954096",
+  "0x71bE63f3384f5fb98995898A86B02Fb2426c5788",
+  "0xFABB0ac9d68B0B445fB7357272Ff202C5651694a",
+  "0x1CBd3b2770909D4e10f157cABC84C7264073C9Ec",
+  "0xdF3e18d64BC6A983f673Ab319CCaE4f1a57C7097",
+  "0xcd3B766CCDd6AE721141F452C550Ca635964ce71",
+  "0x2546BcD3c84621e976D8185a91A922aE77ECEc30",
+  "0xbDA5747bFD65F08deb54cb465eB87D40e51B197E",
+  "0xdD2FD4581271e230360230F9337D5c0430Bf44C0",
+  "0x8626f6940E2eb28930eFb4CeF49B2d1F2C9C1199"
+], Address.Evm.fromStringOrThrow);
 
-var defaultAddress = Caml_array.get(mockAddresses, 0);
+let defaultAddress = mockAddresses[0];
 
-var Addresses = {
+let Addresses = {
   mockAddresses: mockAddresses,
   defaultAddress: defaultAddress
 };
 
-var TestHelpers = {
+let TestHelpers = {
   Addresses: Addresses
 };
 
 export {
-  durationToMs ,
-  createEffect ,
-  TestHelpers ,
+  durationToMs,
+  createEffect,
+  isDevMode,
+  TestHelpers,
 }
 /* mockAddresses Not a pure module */

package/src/ErrorHandling.res

@@ -12,13 +12,13 @@ let log = (self: t) => {
 }
 
 let raiseExn = (self: t) => {
-  self.exn->Utils.prettifyExn->raise
+  self.exn->Utils.prettifyExn->throw
 }
 
 let mkLogAndRaise = (~logger=?, ~msg=?, exn) => {
   let exn = exn->Utils.prettifyExn
   exn->make(~logger?, ~msg?)->log
-  exn->raise
+  exn->throw
 }
 
 let unwrapLogAndRaise = (~logger=?, ~msg=?, result) => {

package/src/ErrorHandling.res.mjs

@@ -4,18 +4,18 @@ import * as Utils from "./Utils.res.mjs";
 import * as Logging from "./Logging.res.mjs";
 
 function make(exn, loggerOpt, msg) {
-  var logger = loggerOpt !== undefined ? loggerOpt : Logging.getLogger();
+  let logger = loggerOpt !== undefined ? loggerOpt : Logging.getLogger();
   return {
-          logger: logger,
-          exn: exn,
-          msg: msg
-        };
+    logger: logger,
+    exn: exn,
+    msg: msg
+  };
 }
 
 function log(self) {
-  var msg = self.msg;
-  var exn = self.exn;
-  var logger = self.logger;
+  let msg = self.msg;
+  let exn = self.exn;
+  let logger = self.logger;
   if (msg !== undefined) {
     return Logging.childErrorWithExn(logger, Utils.prettifyExn(exn), msg);
   } else {
@@ -28,7 +28,7 @@ function raiseExn(self) {
 }
 
 function mkLogAndRaise(logger, msg, exn) {
-  var exn$1 = Utils.prettifyExn(exn);
+  let exn$1 = Utils.prettifyExn(exn);
   log(make(exn$1, logger, msg));
   throw exn$1;
 }
@@ -47,11 +47,11 @@ function logAndRaise(self) {
 }
 
 export {
-  make ,
-  log ,
-  raiseExn ,
-  mkLogAndRaise ,
-  unwrapLogAndRaise ,
-  logAndRaise ,
+  make,
+  log,
+  raiseExn,
+  mkLogAndRaise,
+  unwrapLogAndRaise,
+  logAndRaise,
 }
 /* Utils Not a pure module */