envio 3.2.1 → 3.3.0-alpha.0

package/src/GlobalStateManager.res

@@ -1,57 +0,0 @@
-type t = {
-  mutable state: GlobalState.t,
-  onError: exn => unit,
-  reducers: GlobalState.reducers,
-}
-
-let make = (
-  state: GlobalState.t,
-  ~reducers: GlobalState.reducers,
-  ~onError=e => {
-    e->ErrorHandling.make(~msg="Indexer has failed with an unexpected error")->ErrorHandling.log
-    NodeJs.process->NodeJs.exitWithCode(Failure)
-  },
-) => {
-  state,
-  onError,
-  reducers,
-}
-
-let rec dispatchAction = (~stateId=0, self: t, action: GlobalState.action) => {
-  try {
-    let reducer = if stateId == self.state->GlobalState.getId {
-      self.reducers.actionReducer
-    } else {
-      self.reducers.invalidatedActionReducer
-    }
-    let (nextState, nextTasks) = reducer(self.state, action)
-    self.state = nextState
-    nextTasks->Array.forEach(task => dispatchTask(self, task))
-  } catch {
-  | e => e->self.onError
-  }
-}
-and dispatchTask = (self, task: GlobalState.task) => {
-  let stateId = self.state->GlobalState.getId
-  NodeJs.setImmediate(() => {
-    if stateId !== self.state->GlobalState.getId {
-      Logging.info("Invalidated task discarded")
-    } else {
-      try {
-        self.reducers.taskReducer(self.state, task, ~dispatchAction=action =>
-          dispatchAction(~stateId, self, action)
-        )
-        ->Promise.catch(e => {
-          e->self.onError
-          Promise.resolve()
-        })
-        ->ignore
-      } catch {
-      | e => e->self.onError
-      }
-    }
-  })
-}
-
-let getState = self => self.state
-let setState = (self: t, state: GlobalState.t) => self.state = state

package/src/GlobalStateManager.res.mjs

@@ -1,68 +0,0 @@
-// Generated by ReScript, PLEASE EDIT WITH CARE
-
-import * as Logging from "./Logging.res.mjs";
-import * as Process from "process";
-import * as GlobalState from "./GlobalState.res.mjs";
-import * as ErrorHandling from "./ErrorHandling.res.mjs";
-import * as Stdlib_Promise from "@rescript/runtime/lib/es6/Stdlib_Promise.js";
-import * as Primitive_exceptions from "@rescript/runtime/lib/es6/Primitive_exceptions.js";
-
-function make(state, reducers, onErrorOpt) {
-  let onError = onErrorOpt !== undefined ? onErrorOpt : e => {
-      ErrorHandling.log(ErrorHandling.make(e, undefined, "Indexer has failed with an unexpected error"));
-      Process.exit(1);
-    };
-  return {
-    state: state,
-    onError: onError,
-    reducers: reducers
-  };
-}
-
-function dispatchAction(stateIdOpt, self, action) {
-  let stateId = stateIdOpt !== undefined ? stateIdOpt : 0;
-  try {
-    let reducer = stateId === GlobalState.getId(self.state) ? self.reducers.actionReducer : self.reducers.invalidatedActionReducer;
-    let match = reducer(self.state, action);
-    self.state = match[0];
-    match[1].forEach(task => dispatchTask(self, task));
-    return;
-  } catch (raw_e) {
-    return self.onError(Primitive_exceptions.internalToException(raw_e));
-  }
-}
-
-function dispatchTask(self, task) {
-  let stateId = GlobalState.getId(self.state);
-  setImmediate(() => {
-    if (stateId !== GlobalState.getId(self.state)) {
-      return Logging.info("Invalidated task discarded");
-    }
-    try {
-      Stdlib_Promise.$$catch(self.reducers.taskReducer(self.state, task, action => dispatchAction(stateId, self, action)), e => {
-        self.onError(e);
-        return Promise.resolve();
-      });
-      return;
-    } catch (raw_e) {
-      return self.onError(Primitive_exceptions.internalToException(raw_e));
-    }
-  });
-}
-
-function getState(self) {
-  return self.state;
-}
-
-function setState(self, state) {
-  self.state = state;
-}
-
-export {
-  make,
-  dispatchAction,
-  dispatchTask,
-  getState,
-  setState,
-}
-/* Logging Not a pure module */

package/src/GlobalStateManager.resi

@@ -1,7 +0,0 @@
-type t
-
-let make: (GlobalState.t, ~reducers: GlobalState.reducers, ~onError: exn => unit=?) => t
-let dispatchAction: (~stateId: int=?, t, GlobalState.action) => unit
-let dispatchTask: (t, GlobalState.task) => unit
-let getState: t => GlobalState.t
-let setState: (t, GlobalState.t) => unit

package/src/Ports.res

@@ -1,5 +0,0 @@
-module MarkBatchProcessed = {
-  type input = unit
-  type output = unit
-  type t = input => output
-}

package/src/Ports.res.mjs

@@ -1,9 +0,0 @@
-// Generated by ReScript, PLEASE EDIT WITH CARE
-
-
-let MarkBatchProcessed = {};
-
-export {
-  MarkBatchProcessed,
-}
-/* No side effect */

package/src/adapters/MarkBatchProcessedAdapter.res

@@ -1,5 +0,0 @@
-let make = (~inMemoryStore: InMemoryStore.t): Ports.MarkBatchProcessed.t =>
-  () => {
-    inMemoryStore.isProcessing = false
-    inMemoryStore.processedBatchesCount = inMemoryStore.processedBatchesCount + 1
-  }

package/src/adapters/MarkBatchProcessedAdapter.res.mjs

@@ -1,14 +0,0 @@
-// Generated by ReScript, PLEASE EDIT WITH CARE
-
-
-function make(inMemoryStore) {
-  return () => {
-    inMemoryStore.isProcessing = false;
-    inMemoryStore.processedBatchesCount = inMemoryStore.processedBatchesCount + 1 | 0;
-  };
-}
-
-export {
-  make,
-}
-/* No side effect */

package/src/sources/EnvioApiClient.res

@@ -1,15 +0,0 @@
-// Rest client for envio's own REST endpoints (e.g. the HyperSync/HyperFuel
-// /height poll). Tags requests with the hyperindex User-Agent so they're
-// attributable on the server, mirroring the SSE height stream and the Rust
-// data-query client which already set it.
-let make = (baseUrl: string): Rest.client => {
-  let userAgent = `hyperindex/${Utils.EnvioPackage.value.version}`
-  Rest.client(baseUrl, ~fetcher=(args: Rest.ApiFetcher.args) => {
-    let headers = switch args.headers {
-    | Some(headers) => headers
-    | None => Dict.make()
-    }
-    headers->Dict.set("User-Agent", userAgent->(Utils.magic: string => unknown))
-    Rest.ApiFetcher.default({...args, headers: Some(headers)})
-  })
-}

package/src/sources/EnvioApiClient.res.mjs

@@ -1,24 +0,0 @@
-// Generated by ReScript, PLEASE EDIT WITH CARE
-
-import * as Rest from "../vendored/Rest.res.mjs";
-import * as Utils from "../Utils.res.mjs";
-
-function make(baseUrl) {
-  let userAgent = `hyperindex/` + Utils.EnvioPackage.value.version;
-  return Rest.client(baseUrl, args => {
-    let headers = args.headers;
-    let headers$1 = headers !== undefined ? headers : ({});
-    headers$1["User-Agent"] = userAgent;
-    return Rest.ApiFetcher.$$default({
-      body: args.body,
-      headers: headers$1,
-      method: args.method,
-      path: args.path
-    });
-  });
-}
-
-export {
-  make,
-}
-/* Rest Not a pure module */