envio 3.9.0 → 3.10.0

package/src/sources/HyperSyncHeightStream.res.mjs

@@ -1,110 +0,0 @@
-// Generated by ReScript, PLEASE EDIT WITH CARE
-
-import * as Utils from "../Utils.res.mjs";
-import * as Logging from "../Logging.res.mjs";
-import * as Stdlib_Int from "@rescript/runtime/lib/es6/Stdlib_Int.js";
-import * as Eventsource from "eventsource";
-import * as Primitive_int from "@rescript/runtime/lib/es6/Primitive_int.js";
-import * as Primitive_option from "@rescript/runtime/lib/es6/Primitive_option.js";
-
-function subscribe(hyperSyncUrl, apiToken, chainId, onHeight) {
-  let eventsourceRef = {
-    contents: undefined
-  };
-  let errorCount = {
-    contents: 0
-  };
-  let timeoutIdRef = {
-    contents: setTimeout(() => {}, 0)
-  };
-  let updateTimeoutId = () => {
-    clearTimeout(timeoutIdRef.contents);
-    let newTimeoutId = setTimeout(() => {
-      Logging.trace({
-        msg: "Timeout fired for height stream",
-        chainId: chainId,
-        url: hyperSyncUrl,
-        staleTimeMillis: 15000
-      });
-      refreshEventSource();
-    }, 15000);
-    timeoutIdRef.contents = newTimeoutId;
-  };
-  let scheduleReconnect = () => {
-    clearTimeout(timeoutIdRef.contents);
-    let delay = 50 * (Math.pow(2.0, errorCount.contents) | 0) | 0;
-    timeoutIdRef.contents = setTimeout(() => refreshEventSource(), Primitive_int.min(delay, 60000));
-  };
-  let refreshEventSource = () => {
-    let es = eventsourceRef.contents;
-    if (es !== undefined) {
-      Primitive_option.valFromOption(es).close();
-    }
-    let userAgent = `hyperindex/` + Utils.EnvioPackage.value.version;
-    let es$1 = new Eventsource.EventSource(hyperSyncUrl + `/height/sse`, {
-      fetch: (url, args) => {
-        let newrecord = {...args};
-        return fetch(url, (newrecord.headers = Object.fromEntries([
-          [
-            "Authorization",
-            `Bearer ` + apiToken
-          ],
-          [
-            "User-Agent",
-            userAgent
-          ]
-        ]), newrecord));
-      }
-    });
-    eventsourceRef.contents = Primitive_option.some(es$1);
-    updateTimeoutId();
-    es$1.onopen = () => {
-      errorCount.contents = 0;
-      Logging.trace({
-        msg: "SSE connection opened for height stream",
-        chainId: chainId,
-        url: hyperSyncUrl
-      });
-    };
-    es$1.onerror = error => {
-      errorCount.contents = errorCount.contents + 1 | 0;
-      Logging.trace({
-        msg: "EventSource error on height stream, reconnecting",
-        chainId: chainId,
-        url: hyperSyncUrl,
-        status: error.status,
-        error: error.message,
-        errorCount: errorCount.contents
-      });
-      scheduleReconnect();
-    };
-    es$1.addEventListener("ping", _event => updateTimeoutId());
-    es$1.addEventListener("height", event => {
-      let height = Stdlib_Int.fromString(event.data, undefined);
-      if (height !== undefined) {
-        updateTimeoutId();
-        return onHeight(height);
-      } else {
-        return Logging.trace({
-          msg: "Height was not a number in event.data",
-          chainId: chainId,
-          data: event.data
-        });
-      }
-    });
-  };
-  refreshEventSource();
-  return () => {
-    clearTimeout(timeoutIdRef.contents);
-    let es = eventsourceRef.contents;
-    if (es !== undefined) {
-      Primitive_option.valFromOption(es).close();
-      return;
-    }
-  };
-}
-
-export {
-  subscribe,
-}
-/* Utils Not a pure module */

package/src/sources/RpcWebSocketHeightStream.res

@@ -1,175 +0,0 @@
-/*
-WebSocket-based implementation for real-time block height tracking.
-Uses eth_subscribe("newHeads") for low-latency block detection.
-Falls back behavior is handled by SourceManager when subscription fails.
-*/
-
-let retryCount = 9
-let baseDuration = 125
-// Close and reconnect if no new block head arrives within this period.
-// Detects silently dropped server-side subscriptions.
-let staleTimeMillis = 60_000
-
-type wsMessage =
-  | NewHead(int)
-  | SubscriptionConfirmed(string)
-  | ErrorResponse
-
-let subscribeRequestJson =
-  {"jsonrpc": "2.0", "id": 1, "method": "eth_subscribe", "params": ["newHeads"]}
-  ->(Utils.magic: {
-    "jsonrpc": string,
-    "id": int,
-    "method": string,
-    "params": array<string>,
-  } => JSON.t)
-  ->JSON.stringify
-
-let wsMessageSchema = S.union([
-  S.object(s => {
-    let _ = s.field("method", S.literal("eth_subscription"))
-    NewHead(
-      s.field(
-        "params",
-        S.object(s => {
-          s.field(
-            "result",
-            S.object(
-              s => {
-                s.field("number", Rpc.hexIntSchema)
-              },
-            ),
-          )
-        }),
-      ),
-    )
-  }),
-  S.object(s => {
-    SubscriptionConfirmed(s.field("result", S.string))
-  }),
-  S.object(s => {
-    let _ = s.field("error", S.unknown)
-    ErrorResponse
-  }),
-])
-
-let subscribe = (~wsUrl, ~chainId, ~onHeight: int => unit): (unit => unit) => {
-  let wsRef: ref<option<WebSocket.t>> = ref(None)
-  let isUnsubscribed = ref(false)
-  let errorCount = ref(0)
-  let staleTimeoutId: ref<option<timeoutId>> = ref(None)
-
-  let clearStaleTimeout = () => {
-    switch staleTimeoutId.contents {
-    | Some(id) =>
-      clearTimeout(id)
-      staleTimeoutId := None
-    | None => ()
-    }
-  }
-
-  let resetStaleTimeout = () => {
-    clearStaleTimeout()
-    staleTimeoutId := Some(setTimeout(() => {
-          // Connection went stale - close to trigger reconnect
-          switch wsRef.contents {
-          | Some(ws) => ws->WebSocket.close
-          | None => ()
-          }
-        }, staleTimeMillis))
-  }
-
-  let rec scheduleReconnect = () => {
-    if !isUnsubscribed.contents && errorCount.contents < retryCount {
-      let duration =
-        baseDuration * Math.pow(2.0, ~exp=errorCount.contents->Int.toFloat)->Float.toInt
-      let _ = setTimeout(() => {
-        if !isUnsubscribed.contents {
-          startConnection()
-        }
-      }, duration)
-    }
-  }
-  and startConnection = () => {
-    if isUnsubscribed.contents || errorCount.contents >= retryCount {
-      ()
-    } else {
-      let ws = WebSocket.create(wsUrl)
-      wsRef := Some(ws)
-
-      ws->WebSocket.onopen(() => {
-        ws->WebSocket.send(subscribeRequestJson)
-        resetStaleTimeout()
-      })
-
-      ws->WebSocket.onmessage(event => {
-        try {
-          switch event.data->JSON.parseOrThrow->S.parseOrThrow(wsMessageSchema) {
-          | NewHead(blockNumber) =>
-            errorCount := 0
-            resetStaleTimeout()
-            onHeight(blockNumber)
-          | SubscriptionConfirmed(_) => resetStaleTimeout()
-          | ErrorResponse =>
-            if errorCount.contents < retryCount {
-              errorCount := errorCount.contents + 1
-            }
-            switch wsRef.contents {
-            | Some(ws) => ws->WebSocket.close
-            | None => ()
-            }
-          }
-        } catch {
-        | S.Raised(_) =>
-          Logging.warn({
-            "msg": "WebSocket height stream received unrecognized message",
-            "chainId": chainId,
-            "data": event.data,
-          })
-        | JsExn(_) as e =>
-          Logging.warn({
-            "msg": "WebSocket height stream failed to parse message",
-            "chainId": chainId,
-            "err": e->Utils.prettifyExn,
-            "data": event.data,
-          })
-        | e =>
-          Logging.error({
-            "msg": "Unexpected error in WebSocket height stream message handler",
-            "chainId": chainId,
-            "err": e->Utils.prettifyExn,
-            "data": event.data,
-          })
-          throw(e)
-        }
-      })
-
-      ws->WebSocket.onerror(_error => {
-        if errorCount.contents < retryCount {
-          errorCount := errorCount.contents + 1
-        }
-        switch wsRef.contents {
-        | Some(ws) if ws->WebSocket.readyState === Open => ws->WebSocket.close
-        | _ => ()
-        }
-      })
-
-      ws->WebSocket.onclose(() => {
-        wsRef := None
-        clearStaleTimeout()
-        scheduleReconnect()
-      })
-    }
-  }
-
-  startConnection()
-
-  () => {
-    isUnsubscribed := true
-    clearStaleTimeout()
-    switch wsRef.contents {
-    | Some(ws) => ws->WebSocket.close
-    | None => ()
-    }
-  }
-}

package/src/sources/RpcWebSocketHeightStream.res.mjs

@@ -1,180 +0,0 @@
-// Generated by ReScript, PLEASE EDIT WITH CARE
-
-import * as Rpc from "./Rpc.res.mjs";
-import * as Utils from "../Utils.res.mjs";
-import * as Logging from "../Logging.res.mjs";
-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";
-
-let subscribeRequestJson = JSON.stringify({
-  jsonrpc: "2.0",
-  id: 1,
-  method: "eth_subscribe",
-  params: ["newHeads"]
-});
-
-let wsMessageSchema = S$RescriptSchema.union([
-  S$RescriptSchema.object(s => {
-    s.f("method", S$RescriptSchema.literal("eth_subscription"));
-    return {
-      TAG: "NewHead",
-      _0: s.f("params", S$RescriptSchema.object(s => s.f("result", S$RescriptSchema.object(s => s.f("number", Rpc.hexIntSchema)))))
-    };
-  }),
-  S$RescriptSchema.object(s => ({
-    TAG: "SubscriptionConfirmed",
-    _0: s.f("result", S$RescriptSchema.string)
-  })),
-  S$RescriptSchema.object(s => {
-    s.f("error", S$RescriptSchema.unknown);
-    return "ErrorResponse";
-  })
-]);
-
-function subscribe(wsUrl, chainId, onHeight) {
-  let wsRef = {
-    contents: undefined
-  };
-  let isUnsubscribed = {
-    contents: false
-  };
-  let errorCount = {
-    contents: 0
-  };
-  let staleTimeoutId = {
-    contents: undefined
-  };
-  let clearStaleTimeout = () => {
-    let id = staleTimeoutId.contents;
-    if (id !== undefined) {
-      clearTimeout(Primitive_option.valFromOption(id));
-      staleTimeoutId.contents = undefined;
-      return;
-    }
-  };
-  let resetStaleTimeout = () => {
-    clearStaleTimeout();
-    staleTimeoutId.contents = Primitive_option.some(setTimeout(() => {
-      let ws = wsRef.contents;
-      if (ws !== undefined) {
-        Primitive_option.valFromOption(ws).close();
-        return;
-      }
-    }, 60000));
-  };
-  let scheduleReconnect = () => {
-    if (!(!isUnsubscribed.contents && errorCount.contents < 9)) {
-      return;
-    }
-    let duration = 125 * (Math.pow(2.0, errorCount.contents) | 0) | 0;
-    setTimeout(() => {
-      if (!isUnsubscribed.contents) {
-        return startConnection();
-      }
-    }, duration);
-  };
-  let startConnection = () => {
-    if (isUnsubscribed.contents || errorCount.contents >= 9) {
-      return;
-    }
-    let ws = new WebSocket(wsUrl);
-    wsRef.contents = Primitive_option.some(ws);
-    ws.onopen = () => {
-      ws.send(subscribeRequestJson);
-      resetStaleTimeout();
-    };
-    ws.onmessage = event => {
-      try {
-        let blockNumber = S$RescriptSchema.parseOrThrow(JSON.parse(event.data), wsMessageSchema);
-        if (typeof blockNumber !== "object") {
-          if (errorCount.contents < 9) {
-            errorCount.contents = errorCount.contents + 1 | 0;
-          }
-          let ws = wsRef.contents;
-          if (ws !== undefined) {
-            Primitive_option.valFromOption(ws).close();
-            return;
-          } else {
-            return;
-          }
-        }
-        if (blockNumber.TAG !== "NewHead") {
-          return resetStaleTimeout();
-        }
-        errorCount.contents = 0;
-        resetStaleTimeout();
-        return onHeight(blockNumber._0);
-      } catch (raw_e) {
-        let e = Primitive_exceptions.internalToException(raw_e);
-        if (e.RE_EXN_ID === S$RescriptSchema.Raised) {
-          return Logging.warn({
-            msg: "WebSocket height stream received unrecognized message",
-            chainId: chainId,
-            data: event.data
-          });
-        }
-        if (e.RE_EXN_ID === "JsExn") {
-          return Logging.warn({
-            msg: "WebSocket height stream failed to parse message",
-            chainId: chainId,
-            err: Utils.prettifyExn(e),
-            data: event.data
-          });
-        }
-        Logging.error({
-          msg: "Unexpected error in WebSocket height stream message handler",
-          chainId: chainId,
-          err: Utils.prettifyExn(e),
-          data: event.data
-        });
-        throw e;
-      }
-    };
-    ws.onerror = _error => {
-      if (errorCount.contents < 9) {
-        errorCount.contents = errorCount.contents + 1 | 0;
-      }
-      let ws = wsRef.contents;
-      if (ws === undefined) {
-        return;
-      }
-      let ws$1 = Primitive_option.valFromOption(ws);
-      if (ws$1.readyState === 1) {
-        ws$1.close();
-        return;
-      }
-    };
-    ws.onclose = () => {
-      wsRef.contents = undefined;
-      clearStaleTimeout();
-      scheduleReconnect();
-    };
-  };
-  startConnection();
-  return () => {
-    isUnsubscribed.contents = true;
-    clearStaleTimeout();
-    let ws = wsRef.contents;
-    if (ws !== undefined) {
-      Primitive_option.valFromOption(ws).close();
-      return;
-    }
-  };
-}
-
-let retryCount = 9;
-
-let baseDuration = 125;
-
-let staleTimeMillis = 60000;
-
-export {
-  retryCount,
-  baseDuration,
-  staleTimeMillis,
-  subscribeRequestJson,
-  wsMessageSchema,
-  subscribe,
-}
-/* subscribeRequestJson Not a pure module */