envio 3.3.2 → 3.4.0

package/src/TestIndexerProxyStorage.res.mjs

@@ -1,121 +0,0 @@
-// Generated by ReScript, PLEASE EDIT WITH CARE
-
-import * as Table from "./db/Table.res.mjs";
-import * as Stdlib_Dict from "@rescript/runtime/lib/es6/Stdlib_Dict.js";
-import * as EntityFilter from "./db/EntityFilter.res.mjs";
-import * as Stdlib_JsError from "@rescript/runtime/lib/es6/Stdlib_JsError.js";
-import * as S$RescriptSchema from "rescript-schema/src/S.res.mjs";
-
-function make(parentPort, initialState) {
-  let proxy = {
-    parentPort: parentPort,
-    initialState: initialState,
-    pendingRequests: {},
-    requestCounter: 0
-  };
-  parentPort.on("message", msg => {
-    let idStr = msg.id.toString();
-    let pending = proxy.pendingRequests[idStr];
-    let match = pending !== undefined ? pending : Stdlib_JsError.throwWithMessage(`TestIndexer: No pending request found for id ` + idStr);
-    Stdlib_Dict.$$delete(proxy.pendingRequests, idStr);
-    let match$1 = msg.payload;
-    if (match$1.type === "response") {
-      return match.resolve(match$1.data);
-    } else {
-      return match.reject(new Error(match$1.message));
-    }
-  });
-  return proxy;
-}
-
-function nextRequestId(proxy) {
-  proxy.requestCounter = proxy.requestCounter + 1 | 0;
-  return proxy.requestCounter;
-}
-
-function sendRequest(proxy, payload) {
-  return new Promise((resolve, reject) => {
-    let id = nextRequestId(proxy);
-    proxy.pendingRequests[id.toString()] = {
-      resolve: resolve,
-      reject: reject
-    };
-    proxy.parentPort.postMessage({
-      id: id,
-      payload: payload
-    });
-  });
-}
-
-function makeStorage(proxy) {
-  return {
-    name: "test-proxy",
-    isInitialized: async () => true,
-    initialize: async (param, param$1, param$2, param$3) => Stdlib_JsError.throwWithMessage("TestIndexer: initialize should not be called. Use resumeInitialState instead."),
-    resumeInitialState: async () => proxy.initialState,
-    loadOrThrow: async (filter, table) => {
-      let serializeLeafOrThrow = (fieldName, fieldValue, isArray) => {
-        let queryField = Table.queryFields(table)[fieldName];
-        let queryField$1 = queryField !== undefined ? queryField : Stdlib_JsError.throwWithMessage(`TestIndexer: The table "` + table.tableName + `" doesn't have the field "` + fieldName + `"`);
-        return S$RescriptSchema.reverseConvertToJsonOrThrow(fieldValue, isArray ? queryField$1.arrayFieldSchema : queryField$1.fieldSchema);
-      };
-      let response = await sendRequest(proxy, {
-        type: "load",
-        tableName: table.tableName,
-        filter: EntityFilter.mapValues(filter, serializeLeafOrThrow)
-      });
-      return S$RescriptSchema.parseOrThrow(response, Table.rowsSchema(table));
-    },
-    dumpEffectCache: async () => {},
-    reset: async () => {},
-    setChainMeta: async param => {},
-    pruneStaleCheckpoints: async param => {},
-    pruneStaleEntityHistory: async (param, param$1, param$2) => {},
-    getRollbackTargetCheckpoint: async (param, param$1) => Stdlib_JsError.throwWithMessage("TestIndexer: Rollback is not supported. Set rollbackOnReorg to false in config."),
-    getRollbackProgressDiff: async param => Stdlib_JsError.throwWithMessage("TestIndexer: Rollback is not supported. Set rollbackOnReorg to false in config."),
-    getRollbackData: async (param, param$1) => Stdlib_JsError.throwWithMessage("TestIndexer: Rollback is not supported. Set rollbackOnReorg to false in config."),
-    writeBatch: async (batch, param, param$1, param$2, param$3, param$4, updatedEntities, param$5, param$6) => {
-      let serializableEntities = updatedEntities.map(param => {
-        let entityConfig = param.entityConfig;
-        let encodeChange = change => {
-          if (change.type === "SET") {
-            return {
-              type: "SET",
-              entityId: change.entityId,
-              entity: S$RescriptSchema.reverseConvertToJsonOrThrow(change.entity, entityConfig.schema),
-              checkpointId: change.checkpointId
-            };
-          } else {
-            return {
-              type: "DELETE",
-              entityId: change.entityId,
-              checkpointId: change.checkpointId
-            };
-          }
-        };
-        return {
-          entityName: entityConfig.name,
-          changes: param.changes.map(encodeChange)
-        };
-      });
-      await sendRequest(proxy, {
-        type: "writeBatch",
-        updatedEntities: serializableEntities,
-        checkpointIds: batch.checkpointIds,
-        checkpointChainIds: batch.checkpointChainIds,
-        checkpointBlockNumbers: batch.checkpointBlockNumbers,
-        checkpointBlockHashes: batch.checkpointBlockHashes,
-        checkpointEventsProcessed: batch.checkpointEventsProcessed
-      });
-    },
-    close: async () => {}
-  };
-}
-
-export {
-  make,
-  nextRequestId,
-  sendRequest,
-  makeStorage,
-}
-/* Table Not a pure module */

package/src/TestIndexerWorker.res

@@ -1,4 +0,0 @@
-// Spawned by `TestIndexer.makeCreateTestIndexer` as a sibling of `Api.res.mjs`
-// so `import.meta.url` resolves inside the envio package.
-
-TestIndexer.initTestWorker()

package/src/TestIndexerWorker.res.mjs

@@ -1,7 +0,0 @@
-// Generated by ReScript, PLEASE EDIT WITH CARE
-
-import * as TestIndexer from "./TestIndexer.res.mjs";
-
-TestIndexer.initTestWorker();
-
-/*  Not a pure module */

package/src/sources/EventRouter.res

@@ -1,165 +0,0 @@
-exception EventDuplicate
-exception WildcardCollision
-
-module Group = {
-  type t<'a> = {
-    mutable wildcard: option<'a>,
-    byContractName: dict<'a>,
-  }
-
-  let empty = () => {
-    wildcard: None,
-    byContractName: Dict.make(),
-  }
-
-  let addOrThrow = (group: t<'a>, event, ~contractName, ~isWildcard) => {
-    let {byContractName, wildcard} = group
-    switch byContractName->Utils.Dict.dangerouslyGetNonOption(contractName) {
-    | Some(_) => throw(EventDuplicate)
-    | None =>
-      if isWildcard && wildcard->Option.isSome {
-        throw(WildcardCollision)
-      } else {
-        if isWildcard {
-          group.wildcard = Some(event)
-        }
-        byContractName->Dict.set(contractName, event)
-      }
-    }
-  }
-
-  // Ownership only: resolve the owning contract from the partition's reverse
-  // index (the partition that fetched the log), not a chain-wide snapshot. The
-  // `effectiveStartBlock` temporal gate now lives in `clientAddressFilter`. The
-  // wildcard partition has an empty index → every log falls back to `wildcard`,
-  // so it can never claim an address-bound contract's logs.
-  let get = (group: t<'a>, ~contractAddress, ~contractNameByAddress: dict<string>) =>
-    switch group {
-    | {wildcard, byContractName} =>
-      switch contractNameByAddress->Utils.Dict.dangerouslyGetNonOption(
-        contractAddress->Address.toString,
-      ) {
-      | Some(contractName) =>
-        switch byContractName->Utils.Dict.dangerouslyGetNonOption(contractName) {
-        // Fall back to the wildcard handler when the owning contract has no
-        // matching event for this tag. This covers addresses registered for
-        // contracts without events (persisted for future config changes) as
-        // well as addresses whose contract has other events but not this one.
-        | None => wildcard
-        | Some(_) as event => event
-        }
-      | None => wildcard
-      }
-    }
-}
-
-type t<'a> = dict<Group.t<'a>>
-
-let empty = () => Dict.make()
-
-let addOrThrow = (
-  router: t<'a>,
-  eventId,
-  event,
-  ~contractName,
-  ~isWildcard,
-  ~eventName,
-  ~chain,
-) => {
-  let group = switch router->Utils.Dict.dangerouslyGetNonOption(eventId) {
-  | None =>
-    let group = Group.empty()
-    router->Dict.set(eventId, group)
-    group
-  | Some(group) => group
-  }
-  try group->Group.addOrThrow(event, ~contractName, ~isWildcard) catch {
-  | EventDuplicate =>
-    JsError.throwWithMessage(
-      `Duplicate event detected: ${eventName} for contract ${contractName} on chain ${chain->ChainMap.Chain.toString}`,
-    )
-  | WildcardCollision =>
-    JsError.throwWithMessage(
-      `Another event is already registered with the same signature that would interfer with wildcard filtering: ${eventName} for contract ${contractName} on chain ${chain->ChainMap.Chain.toString}`,
-    )
-  }
-}
-
-let get = (router: t<'a>, ~tag, ~contractAddress, ~contractNameByAddress) => {
-  switch router->Utils.Dict.dangerouslyGetNonOption(tag) {
-  | None => None
-  | Some(group) => group->Group.get(~contractAddress, ~contractNameByAddress)
-  }
-}
-
-/** Dispatch key for SVM instructions. `None` matches any instruction in the
- program (lowest priority). */
-let getSvmEventId = (~programId: SvmTypes.Pubkey.t, ~discriminator: option<string>) =>
-  switch discriminator {
-  | None => programId->SvmTypes.Pubkey.toString ++ "_none"
-  | Some(d) => programId->SvmTypes.Pubkey.toString ++ "_" ++ d
-  }
-
-/** Discriminator byte-lengths declared by a program, sorted descending. The
- source uses this to probe `(programId, dN)` keys longest-first when routing
- a returned instruction to a handler — matching the locked Q1 answer. */
-type svmProgramOrdering = {
-  programId: SvmTypes.Pubkey.t,
-  /** Byte lengths in descending order, deduplicated. Includes `0` only when
-   a handler is registered with no discriminator (program-wide match). */
-  byteLengthsDesc: array<int>,
-}
-
-let fromSvmEventConfigsOrThrow = (events: array<Internal.svmOnEventRegistration>, ~chain): (
-  t<Internal.svmOnEventRegistration>,
-  array<svmProgramOrdering>,
-) => {
-  let router = empty()
-  events->Array.forEach(config => {
-    let eventConfig =
-      config.eventConfig->(Utils.magic: Internal.eventConfig => Internal.svmInstructionEventConfig)
-    // The router tag must include the programId so two programs declaring the
-    // same discriminator coexist. The source-side lookup uses the same shape
-    // via `getSvmEventId(~programId, ~discriminator)`.
-    let routerTag = getSvmEventId(
-      ~programId=eventConfig.programId,
-      ~discriminator=eventConfig.discriminator,
-    )
-    router->addOrThrow(
-      routerTag,
-      config,
-      ~contractName=eventConfig.contractName,
-      ~eventName=eventConfig.name,
-      ~chain,
-      ~isWildcard=config.isWildcard,
-    )
-  })
-
-  // Per-program list of declared discriminator byte lengths, sorted desc.
-  let byProgram: dict<Utils.Set.t<int>> = Dict.make()
-  events->Array.forEach(config => {
-    let eventConfig =
-      config.eventConfig->(Utils.magic: Internal.eventConfig => Internal.svmInstructionEventConfig)
-    let key = eventConfig.programId->SvmTypes.Pubkey.toString
-    let set = switch byProgram->Utils.Dict.dangerouslyGetNonOption(key) {
-    | Some(s) => s
-    | None =>
-      let s = Utils.Set.make()
-      byProgram->Dict.set(key, s)
-      s
-    }
-    let _ = set->Utils.Set.add(eventConfig.discriminatorByteLen)
-  })
-  let ordering =
-    byProgram
-    ->Dict.toArray
-    ->Array.map(((programIdString, lens)) => {
-      let sorted = lens->Utils.Set.toArray->Array.toSorted((a, b) => (b - a)->Int.toFloat)
-      {
-        programId: programIdString->SvmTypes.Pubkey.fromStringUnsafe,
-        byteLengthsDesc: sorted,
-      }
-    })
-
-  (router, ordering)
-}

package/src/sources/EventRouter.res.mjs

@@ -1,153 +0,0 @@
-// Generated by ReScript, PLEASE EDIT WITH CARE
-
-import * as ChainMap from "../ChainMap.res.mjs";
-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 Primitive_exceptions from "@rescript/runtime/lib/es6/Primitive_exceptions.js";
-
-let EventDuplicate = /* @__PURE__ */Primitive_exceptions.create("EventRouter.EventDuplicate");
-
-let WildcardCollision = /* @__PURE__ */Primitive_exceptions.create("EventRouter.WildcardCollision");
-
-function empty() {
-  return {
-    wildcard: undefined,
-    byContractName: {}
-  };
-}
-
-function addOrThrow(group, event, contractName, isWildcard) {
-  let wildcard = group.wildcard;
-  let byContractName = group.byContractName;
-  let match = byContractName[contractName];
-  if (match !== undefined) {
-    throw {
-      RE_EXN_ID: EventDuplicate,
-      Error: new Error()
-    };
-  }
-  if (isWildcard && Stdlib_Option.isSome(wildcard)) {
-    throw {
-      RE_EXN_ID: WildcardCollision,
-      Error: new Error()
-    };
-  }
-  if (isWildcard) {
-    group.wildcard = Primitive_option.some(event);
-  }
-  byContractName[contractName] = event;
-}
-
-function get(group, contractAddress, contractNameByAddress) {
-  let wildcard = group.wildcard;
-  let contractName = contractNameByAddress[contractAddress];
-  if (contractName === undefined) {
-    return wildcard;
-  }
-  let event = group.byContractName[contractName];
-  if (event !== undefined) {
-    return event;
-  } else {
-    return wildcard;
-  }
-}
-
-let Group = {
-  empty: empty,
-  addOrThrow: addOrThrow,
-  get: get
-};
-
-function empty$1() {
-  return {};
-}
-
-function addOrThrow$1(router, eventId, event, contractName, isWildcard, eventName, chain) {
-  let group = router[eventId];
-  let group$1;
-  if (group !== undefined) {
-    group$1 = group;
-  } else {
-    let group$2 = {
-      wildcard: undefined,
-      byContractName: {}
-    };
-    router[eventId] = group$2;
-    group$1 = group$2;
-  }
-  try {
-    return addOrThrow(group$1, event, contractName, isWildcard);
-  } catch (raw_exn) {
-    let exn = Primitive_exceptions.internalToException(raw_exn);
-    if (exn.RE_EXN_ID === EventDuplicate) {
-      return Stdlib_JsError.throwWithMessage(`Duplicate event detected: ` + eventName + ` for contract ` + contractName + ` on chain ` + ChainMap.Chain.toString(chain));
-    }
-    if (exn.RE_EXN_ID === WildcardCollision) {
-      return Stdlib_JsError.throwWithMessage(`Another event is already registered with the same signature that would interfer with wildcard filtering: ` + eventName + ` for contract ` + contractName + ` on chain ` + ChainMap.Chain.toString(chain));
-    }
-    throw exn;
-  }
-}
-
-function get$1(router, tag, contractAddress, contractNameByAddress) {
-  let group = router[tag];
-  if (group !== undefined) {
-    return get(group, contractAddress, contractNameByAddress);
-  }
-}
-
-function getSvmEventId(programId, discriminator) {
-  if (discriminator !== undefined) {
-    return programId + "_" + discriminator;
-  } else {
-    return programId + "_none";
-  }
-}
-
-function fromSvmEventConfigsOrThrow(events, chain) {
-  let router = {};
-  events.forEach(config => {
-    let eventConfig = config.eventConfig;
-    let routerTag = getSvmEventId(eventConfig.programId, eventConfig.discriminator);
-    addOrThrow$1(router, routerTag, config, eventConfig.contractName, config.isWildcard, eventConfig.name, chain);
-  });
-  let byProgram = {};
-  events.forEach(config => {
-    let eventConfig = config.eventConfig;
-    let key = eventConfig.programId;
-    let s = byProgram[key];
-    let set;
-    if (s !== undefined) {
-      set = Primitive_option.valFromOption(s);
-    } else {
-      let s$1 = new Set();
-      byProgram[key] = s$1;
-      set = s$1;
-    }
-    set.add(eventConfig.discriminatorByteLen);
-  });
-  let ordering = Object.entries(byProgram).map(param => {
-    let sorted = Array.from(param[1]).toSorted((a, b) => b - a | 0);
-    return {
-      programId: param[0],
-      byteLengthsDesc: sorted
-    };
-  });
-  return [
-    router,
-    ordering
-  ];
-}
-
-export {
-  EventDuplicate,
-  WildcardCollision,
-  Group,
-  empty$1 as empty,
-  addOrThrow$1 as addOrThrow,
-  get$1 as get,
-  getSvmEventId,
-  fromSvmEventConfigsOrThrow,
-}
-/* ChainMap Not a pure module */

package/src/sources/HyperFuel.res

@@ -1,179 +0,0 @@
-type hyperSyncPage<'item> = {
-  items: array<'item>,
-  nextBlock: int,
-  archiveHeight: int,
-}
-
-type block = {
-  id: string,
-  time: int,
-  height: int,
-}
-
-type item = {
-  transactionId: string,
-  contractId: Address.t,
-  receipt: FuelSDK.Receipt.t,
-  receiptIndex: int,
-  block: block,
-}
-
-type logsQueryPage = hyperSyncPage<item>
-
-module GetLogs = {
-  type error =
-    | UnexpectedMissingParams({missingParams: array<string>})
-    | WrongInstance
-
-  exception Error(error)
-
-  // Rust encodes structured failures as a JSON payload in the napi error's
-  // message: `{"kind":"MissingFields","fields":["receipt.txId", ...]}`.
-  // JSON.parse + shape check is the recovery protocol — no string-grepping
-  // on anyhow's Debug format.
-  let extractMissingParams = (exn: exn): option<array<string>> => {
-    let message = switch exn {
-    | JsExn(jsExn) => jsExn->JsExn.message
-    | _ => None
-    }
-    switch message {
-    | None => None
-    | Some(msg) =>
-      switch msg->JSON.parseOrThrow->JSON.Decode.object {
-      | exception _ => None
-      | None => None
-      | Some(obj) =>
-        switch (obj->Dict.get("kind"), obj->Dict.get("fields")) {
-        | (Some(String("MissingFields")), Some(Array(fields))) =>
-          Some(fields->Array.filterMap(JSON.Decode.string))
-        | _ => None
-        }
-      }
-    }
-  }
-
-  let makeRequestBody = (
-    ~fromBlock,
-    ~toBlockInclusive,
-    ~recieptsSelection,
-  ): HyperFuelClient.QueryTypes.query => {
-    {
-      fromBlock,
-      toBlockExclusive: ?switch toBlockInclusive {
-      | Some(toBlockInclusive) => Some(toBlockInclusive + 1)
-      | None => None
-      },
-      receipts: recieptsSelection,
-      fieldSelection: {
-        receipt: [
-          TxId,
-          BlockHeight,
-          RootContractId,
-          Data,
-          ReceiptIndex,
-          ReceiptType,
-          Rb,
-          // TODO: Include them only when there's a mint/burn/transferOut receipt selection
-          SubId,
-          Val,
-          Amount,
-          ToAddress,
-          AssetId,
-          To,
-        ],
-        block: [Id, Height, Time],
-      },
-    }
-  }
-
-  let getParam = (param, name) => {
-    switch param {
-    | Some(v) => v
-    | None =>
-      throw(
-        Error(
-          UnexpectedMissingParams({
-            missingParams: [name],
-          }),
-        ),
-      )
-    }
-  }
-
-  //Note this function can throw an error
-  let decodeLogQueryPageItems = (response_data: HyperFuelClient.queryResponseDataTyped): array<
-    item,
-  > => {
-    let {receipts, blocks} = response_data
-
-    let blocksDict = Dict.make()
-    blocks->Array.forEach(block => {
-      blocksDict->Dict.set(block.height->(Utils.magic: int => string), block)
-    })
-
-    let items = []
-
-    receipts->Array.forEach(receipt => {
-      switch receipt.rootContractId {
-      | None => ()
-      | Some(contractId) => {
-          let block =
-            blocksDict
-            ->Utils.Dict.dangerouslyGetNonOption(receipt.blockHeight->(Utils.magic: int => string))
-            ->getParam("Failed to find block associated to receipt")
-          items
-          ->Array.push({
-            transactionId: receipt.txId,
-            block: {
-              height: block.height,
-              id: block.id,
-              time: block.time,
-            },
-            contractId,
-            receipt: receipt->(Utils.magic: HyperFuelClient.FuelTypes.receipt => FuelSDK.Receipt.t),
-            receiptIndex: receipt.receiptIndex,
-          })
-          ->ignore
-        }
-      }
-    })
-    items
-  }
-
-  let convertResponse = (res: HyperFuelClient.queryResponseTyped): logsQueryPage => {
-    let {nextBlock, ?archiveHeight} = res
-    let page: logsQueryPage = {
-      items: res.data->decodeLogQueryPageItems,
-      nextBlock,
-      archiveHeight: archiveHeight->Option.getOr(0), // TODO: FIXME: Shouldn't have a default here
-    }
-    page
-  }
-
-  let query = async (
-    ~client: HyperFuelClient.t,
-    ~fromBlock,
-    ~toBlock,
-    ~recieptsSelection,
-  ): logsQueryPage => {
-    let query: HyperFuelClient.QueryTypes.query = makeRequestBody(
-      ~fromBlock,
-      ~toBlockInclusive=toBlock,
-      ~recieptsSelection,
-    )
-
-    let res = switch await client->HyperFuelClient.getSelectedData(query) {
-    | res => res
-    | exception exn =>
-      switch exn->extractMissingParams {
-      | Some(missingParams) => throw(Error(UnexpectedMissingParams({missingParams: missingParams})))
-      | None => throw(exn)
-      }
-    }
-    if res.nextBlock <= fromBlock {
-      // Might happen when /height response was from another instance of HyperFuel
-      throw(Error(WrongInstance))
-    }
-    res->convertResponse
-  }
-}