@effect/platform-browser 0.29.6 → 0.29.7

package/BrowserHttpClient/package.json

@@ -0,0 +1,6 @@
+{
+  "main": "../dist/cjs/BrowserHttpClient.js",
+  "module": "../dist/esm/BrowserHttpClient.js",
+  "types": "../dist/dts/BrowserHttpClient.d.ts",
+  "sideEffects": []
+}

package/dist/cjs/BrowserHttpClient.js

@@ -0,0 +1,48 @@
+"use strict";
+
+Object.defineProperty(exports, "__esModule", {
+  value: true
+});
+exports.xmlHttpRequest = exports.layerXMLHttpRequest = exports.currentXMLHttpRequest = void 0;
+var internal = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("./internal/http/client.js"));
+function _getRequireWildcardCache(e) {
+  if ("function" != typeof WeakMap) return null;
+  var r = new WeakMap(),
+    t = new WeakMap();
+  return (_getRequireWildcardCache = function (e) {
+    return e ? t : r;
+  })(e);
+}
+function _interopRequireWildcard(e, r) {
+  if (!r && e && e.__esModule) return e;
+  if (null === e || "object" != typeof e && "function" != typeof e) return {
+    default: e
+  };
+  var t = _getRequireWildcardCache(r);
+  if (t && t.has(e)) return t.get(e);
+  var n = {
+      __proto__: null
+    },
+    a = Object.defineProperty && Object.getOwnPropertyDescriptor;
+  for (var u in e) if ("default" !== u && Object.prototype.hasOwnProperty.call(e, u)) {
+    var i = a ? Object.getOwnPropertyDescriptor(e, u) : null;
+    i && (i.get || i.set) ? Object.defineProperty(n, u, i) : n[u] = e[u];
+  }
+  return n.default = e, t && t.set(e, n), n;
+}
+/**
+ * @since 1.0.0
+ * @category clients
+ */
+const xmlHttpRequest = exports.xmlHttpRequest = internal.makeXMLHttpRequest;
+/**
+ * @since 1.0.0
+ * @category layers
+ */
+const layerXMLHttpRequest = exports.layerXMLHttpRequest = internal.layerXMLHttpRequest;
+/**
+ * @since 1.0.0
+ * @category fiber refs
+ */
+const currentXMLHttpRequest = exports.currentXMLHttpRequest = internal.currentXMLHttpRequest;
+//# sourceMappingURL=BrowserHttpClient.js.map

package/dist/cjs/BrowserHttpClient.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"BrowserHttpClient.js","names":["internal","_interopRequireWildcard","require","_getRequireWildcardCache","e","WeakMap","r","t","__esModule","default","has","get","n","__proto__","a","Object","defineProperty","getOwnPropertyDescriptor","u","prototype","hasOwnProperty","call","i","set","xmlHttpRequest","exports","makeXMLHttpRequest","layerXMLHttpRequest","currentXMLHttpRequest"],"sources":["../../src/BrowserHttpClient.ts"],"sourcesContent":[null],"mappings":";;;;;;AAMA,IAAAA,QAAA,gBAAAC,uBAAA,eAAAC,OAAA;AAAqD,SAAAC,yBAAAC,CAAA;EAAA,yBAAAC,OAAA;EAAA,IAAAC,CAAA,OAAAD,OAAA;IAAAE,CAAA,OAAAF,OAAA;EAAA,QAAAF,wBAAA,YAAAA,CAAAC,CAAA;IAAA,OAAAA,CAAA,GAAAG,CAAA,GAAAD,CAAA;EAAA,GAAAF,CAAA;AAAA;AAAA,SAAAH,wBAAAG,CAAA,EAAAE,CAAA;EAAA,KAAAA,CAAA,IAAAF,CAAA,IAAAA,CAAA,CAAAI,UAAA,SAAAJ,CAAA;EAAA,aAAAA,CAAA,uBAAAA,CAAA,yBAAAA,CAAA;IAAAK,OAAA,EAAAL;EAAA;EAAA,IAAAG,CAAA,GAAAJ,wBAAA,CAAAG,CAAA;EAAA,IAAAC,CAAA,IAAAA,CAAA,CAAAG,GAAA,CAAAN,CAAA,UAAAG,CAAA,CAAAI,GAAA,CAAAP,CAAA;EAAA,IAAAQ,CAAA;MAAAC,SAAA;IAAA;IAAAC,CAAA,GAAAC,MAAA,CAAAC,cAAA,IAAAD,MAAA,CAAAE,wBAAA;EAAA,SAAAC,CAAA,IAAAd,CAAA,oBAAAc,CAAA,IAAAH,MAAA,CAAAI,SAAA,CAAAC,cAAA,CAAAC,IAAA,CAAAjB,CAAA,EAAAc,CAAA;IAAA,IAAAI,CAAA,GAAAR,CAAA,GAAAC,MAAA,CAAAE,wBAAA,CAAAb,CAAA,EAAAc,CAAA;IAAAI,CAAA,KAAAA,CAAA,CAAAX,GAAA,IAAAW,CAAA,CAAAC,GAAA,IAAAR,MAAA,CAAAC,cAAA,CAAAJ,CAAA,EAAAM,CAAA,EAAAI,CAAA,IAAAV,CAAA,CAAAM,CAAA,IAAAd,CAAA,CAAAc,CAAA;EAAA;EAAA,OAAAN,CAAA,CAAAH,OAAA,GAAAL,CAAA,EAAAG,CAAA,IAAAA,CAAA,CAAAgB,GAAA,CAAAnB,CAAA,EAAAQ,CAAA,GAAAA,CAAA;AAAA;AAErD;;;;AAIO,MAAMY,cAAc,GAAAC,OAAA,CAAAD,cAAA,GAA0BxB,QAAQ,CAAC0B,kBAAkB;AAEhF;;;;AAIO,MAAMC,mBAAmB,GAAAF,OAAA,CAAAE,mBAAA,GAAqD3B,QAAQ,CAAC2B,mBAAmB;AAEjH;;;;AAIO,MAAMC,qBAAqB,GAAAH,OAAA,CAAAG,qBAAA,GAA6C5B,QAAQ,CAAC4B,qBAAqB"}

package/dist/cjs/index.js

@@ -3,7 +3,9 @@
 Object.defineProperty(exports, "__esModule", {
   value: true
 });
-exports.Clipboard = exports.BrowserWorkerRunner = exports.BrowserWorker = exports.BrowserRuntime = exports.BrowserKeyValueStore = void 0;
+exports.Clipboard = exports.BrowserWorkerRunner = exports.BrowserWorker = exports.BrowserRuntime = exports.BrowserKeyValueStore = exports.BrowserHttpClient = void 0;
+var _BrowserHttpClient = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("./BrowserHttpClient.js"));
+exports.BrowserHttpClient = _BrowserHttpClient;
 var _BrowserKeyValueStore = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("./BrowserKeyValueStore.js"));
 exports.BrowserKeyValueStore = _BrowserKeyValueStore;
 var _BrowserRuntime = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("./BrowserRuntime.js"));

package/dist/cjs/internal/http/client.js

@@ -0,0 +1,226 @@
+"use strict";
+
+Object.defineProperty(exports, "__esModule", {
+  value: true
+});
+exports.makeXMLHttpRequest = exports.layerXMLHttpRequest = exports.currentXMLHttpRequest = exports.IncomingMessageImpl = void 0;
+var Client = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@effect/platform/Http/Client"));
+var Error = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@effect/platform/Http/ClientError"));
+var ClientResponse = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@effect/platform/Http/ClientResponse"));
+var Headers = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@effect/platform/Http/Headers"));
+var IncomingMessage = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@effect/platform/Http/IncomingMessage"));
+var UrlParams = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@effect/platform/Http/UrlParams"));
+var Effect = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("effect/Effect"));
+var Either = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("effect/Either"));
+var FiberRef = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("effect/FiberRef"));
+var _GlobalValue = /*#__PURE__*/require("effect/GlobalValue");
+var Layer = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("effect/Layer"));
+var Option = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("effect/Option"));
+var Stream = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("effect/Stream"));
+var HeaderParser = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("multipasta/HeadersParser"));
+function _getRequireWildcardCache(e) {
+  if ("function" != typeof WeakMap) return null;
+  var r = new WeakMap(),
+    t = new WeakMap();
+  return (_getRequireWildcardCache = function (e) {
+    return e ? t : r;
+  })(e);
+}
+function _interopRequireWildcard(e, r) {
+  if (!r && e && e.__esModule) return e;
+  if (null === e || "object" != typeof e && "function" != typeof e) return {
+    default: e
+  };
+  var t = _getRequireWildcardCache(r);
+  if (t && t.has(e)) return t.get(e);
+  var n = {
+      __proto__: null
+    },
+    a = Object.defineProperty && Object.getOwnPropertyDescriptor;
+  for (var u in e) if ("default" !== u && Object.prototype.hasOwnProperty.call(e, u)) {
+    var i = a ? Object.getOwnPropertyDescriptor(e, u) : null;
+    i && (i.get || i.set) ? Object.defineProperty(n, u, i) : n[u] = e[u];
+  }
+  return n.default = e, t && t.set(e, n), n;
+}
+/** @internal */
+const currentXMLHttpRequest = exports.currentXMLHttpRequest = /*#__PURE__*/(0, _GlobalValue.globalValue)("@effect/platform-browser/BrowserHttpClient/currentXMLHttpRequest", () => FiberRef.unsafeMake(globalThis.XMLHttpRequest));
+/** @internal */
+const makeXMLHttpRequest = exports.makeXMLHttpRequest = /*#__PURE__*/Client.makeDefault(request => UrlParams.makeUrl(request.url, request.urlParams, _ => Error.RequestError({
+  request,
+  reason: "InvalidUrl",
+  error: _
+})).pipe(Effect.zip(FiberRef.get(currentXMLHttpRequest)), Effect.flatMap(([url, XHR]) => {
+  const xhr = new XHR();
+  xhr.open(request.method, url.toString(), true);
+  xhr.responseType = "text";
+  Object.entries(request.headers).forEach(([k, v]) => {
+    xhr.setRequestHeader(k, v);
+  });
+  return sendBody(xhr, request).pipe(Effect.zipLeft(Effect.async(resume => {
+    const onChange = () => {
+      if (xhr.readyState >= 2) {
+        resume(Effect.unit);
+      }
+    };
+    xhr.onreadystatechange = onChange;
+    onChange();
+  })), Effect.as(new ClientResponseImpl(request, xhr)), Effect.onInterrupt(() => Effect.sync(() => xhr.abort())));
+})));
+const sendBody = (xhr, request) => Effect.suspend(() => {
+  const body = request.body;
+  switch (body._tag) {
+    case "Empty":
+      return Effect.sync(() => xhr.send());
+    case "Raw":
+      return Effect.sync(() => xhr.send(body.body));
+    case "Uint8Array":
+      return Effect.sync(() => xhr.send(body.body));
+    case "FormData":
+      return Effect.sync(() => xhr.send(body.formData));
+    case "Stream":
+      return Effect.matchEffect(Stream.runFold(body.stream, new Uint8Array(0), (acc, chunk) => {
+        const next = new Uint8Array(acc.length + chunk.length);
+        next.set(acc, 0);
+        next.set(chunk, acc.length);
+        return next;
+      }), {
+        onFailure: error => Effect.fail(Error.RequestError({
+          request,
+          reason: "Encode",
+          error
+        })),
+        onSuccess: body => Effect.sync(() => xhr.send(body))
+      });
+  }
+});
+const encoder = /*#__PURE__*/new TextEncoder();
+/** @internal */
+class IncomingMessageImpl {
+  source;
+  onError;
+  [IncomingMessage.TypeId];
+  constructor(source, onError) {
+    this.source = source;
+    this.onError = onError;
+    this[IncomingMessage.TypeId] = IncomingMessage.TypeId;
+  }
+  _headers;
+  get headers() {
+    if (this._headers) {
+      return this._headers;
+    }
+    const headers = this.source.getAllResponseHeaders();
+    if (headers === "") {
+      return Headers.empty;
+    }
+    const parser = HeaderParser.make();
+    const result = parser(encoder.encode(headers + "\r\n"), 0);
+    const parsed = result._tag === "Headers" ? Headers.fromInput(result.headers) : Headers.empty;
+    return this._headers = parsed;
+  }
+  get remoteAddress() {
+    return Option.none();
+  }
+  _textEffect;
+  get text() {
+    if (this._textEffect) {
+      return this._textEffect;
+    }
+    return this._textEffect = Effect.async(resume => {
+      if (this.source.readyState === 4) {
+        resume(Effect.succeed(this.source.response));
+        return;
+      }
+      const onReadyStateChange = () => {
+        if (this.source.readyState === 4) {
+          resume(Effect.succeed(this.source.response));
+        }
+      };
+      const onError = event => {
+        resume(Effect.fail(this.onError(event)));
+      };
+      this.source.addEventListener("readystatechange", onReadyStateChange);
+      this.source.addEventListener("error", onError);
+      return Effect.sync(() => {
+        this.source.removeEventListener("readystatechange", onReadyStateChange);
+        this.source.removeEventListener("error", onError);
+      });
+    }).pipe(Effect.cached, Effect.runSync);
+  }
+  get json() {
+    return Effect.tryMap(this.text, {
+      try: _ => _ === "" ? null : JSON.parse(_),
+      catch: this.onError
+    });
+  }
+  get urlParamsBody() {
+    return Effect.flatMap(this.text, _ => Effect.try({
+      try: () => UrlParams.fromInput(new URLSearchParams(_)),
+      catch: this.onError
+    }));
+  }
+  get stream() {
+    return Stream.asyncInterrupt(emit => {
+      let bytes = 0;
+      const onReadyStateChange = () => {
+        if (this.source.readyState === 3) {
+          emit.single(encoder.encode(this.source.responseText.slice(bytes)));
+          bytes = this.source.responseText.length;
+        } else if (this.source.readyState === 4) {
+          if (bytes < this.source.responseText.length) {
+            emit.single(encoder.encode(this.source.responseText.slice(bytes)));
+          }
+          emit.end();
+        }
+      };
+      const onError = event => {
+        emit.fail(this.onError(event));
+      };
+      this.source.addEventListener("readystatechange", onReadyStateChange);
+      this.source.addEventListener("error", onError);
+      onReadyStateChange();
+      return Either.left(Effect.sync(() => {
+        this.source.removeEventListener("readystatechange", onReadyStateChange);
+        this.source.removeEventListener("error", onError);
+      }));
+    });
+  }
+  get arrayBuffer() {
+    return this.text.pipe(Effect.map(_ => encoder.encode(_).buffer));
+  }
+}
+exports.IncomingMessageImpl = IncomingMessageImpl;
+class ClientResponseImpl extends IncomingMessageImpl {
+  request;
+  [ClientResponse.TypeId];
+  constructor(request, source) {
+    super(source, _ => Error.ResponseError({
+      request,
+      response: this,
+      reason: "Decode",
+      error: _
+    }));
+    this.request = request;
+    this[ClientResponse.TypeId] = ClientResponse.TypeId;
+  }
+  get status() {
+    return this.source.status;
+  }
+  get formData() {
+    return Effect.die("Not implemented");
+  }
+  toString() {
+    return `ClientResponse(${this.status})`;
+  }
+  toJSON() {
+    return {
+      _tag: "ClientResponse",
+      status: this.status,
+      headers: this.headers
+    };
+  }
+}
+/** @internal */
+const layerXMLHttpRequest = exports.layerXMLHttpRequest = /*#__PURE__*/Layer.succeed(Client.Client, makeXMLHttpRequest);
+//# sourceMappingURL=client.js.map

package/dist/cjs/internal/http/client.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"client.js","names":["Client","_interopRequireWildcard","require","Error","ClientResponse","Headers","IncomingMessage","UrlParams","Effect","Either","FiberRef","_GlobalValue","Layer","Option","Stream","HeaderParser","_getRequireWildcardCache","e","WeakMap","r","t","__esModule","default","has","get","n","__proto__","a","Object","defineProperty","getOwnPropertyDescriptor","u","prototype","hasOwnProperty","call","i","set","currentXMLHttpRequest","exports","globalValue","unsafeMake","globalThis","XMLHttpRequest","makeXMLHttpRequest","makeDefault","request","makeUrl","url","urlParams","_","RequestError","reason","error","pipe","zip","flatMap","XHR","xhr","open","method","toString","responseType","entries","headers","forEach","k","v","setRequestHeader","sendBody","zipLeft","async","resume","onChange","readyState","unit","onreadystatechange","as","ClientResponseImpl","onInterrupt","sync","abort","suspend","body","_tag","send","formData","matchEffect","runFold","stream","Uint8Array","acc","chunk","next","length","onFailure","fail","onSuccess","encoder","TextEncoder","IncomingMessageImpl","source","onError","TypeId","constructor","_headers","getAllResponseHeaders","empty","parser","make","result","encode","parsed","fromInput","remoteAddress","none","_textEffect","text","succeed","response","onReadyStateChange","event","addEventListener","removeEventListener","cached","runSync","json","tryMap","try","JSON","parse","catch","urlParamsBody","URLSearchParams","asyncInterrupt","emit","bytes","single","responseText","slice","end","left","arrayBuffer","map","buffer","ResponseError","status","die","toJSON","layerXMLHttpRequest"],"sources":["../../../../src/internal/http/client.ts"],"sourcesContent":[null],"mappings":";;;;;;AAAA,IAAAA,MAAA,gBAAAC,uBAAA,eAAAC,OAAA;AACA,IAAAC,KAAA,gBAAAF,uBAAA,eAAAC,OAAA;AAEA,IAAAE,cAAA,gBAAAH,uBAAA,eAAAC,OAAA;AACA,IAAAG,OAAA,gBAAAJ,uBAAA,eAAAC,OAAA;AACA,IAAAI,eAAA,gBAAAL,uBAAA,eAAAC,OAAA;AACA,IAAAK,SAAA,gBAAAN,uBAAA,eAAAC,OAAA;AACA,IAAAM,MAAA,gBAAAP,uBAAA,eAAAC,OAAA;AACA,IAAAO,MAAA,gBAAAR,uBAAA,eAAAC,OAAA;AACA,IAAAQ,QAAA,gBAAAT,uBAAA,eAAAC,OAAA;AACA,IAAAS,YAAA,gBAAAT,OAAA;AACA,IAAAU,KAAA,gBAAAX,uBAAA,eAAAC,OAAA;AACA,IAAAW,MAAA,gBAAAZ,uBAAA,eAAAC,OAAA;AACA,IAAAY,MAAA,gBAAAb,uBAAA,eAAAC,OAAA;AACA,IAAAa,YAAA,gBAAAd,uBAAA,eAAAC,OAAA;AAAwD,SAAAc,yBAAAC,CAAA;EAAA,yBAAAC,OAAA;EAAA,IAAAC,CAAA,OAAAD,OAAA;IAAAE,CAAA,OAAAF,OAAA;EAAA,QAAAF,wBAAA,YAAAA,CAAAC,CAAA;IAAA,OAAAA,CAAA,GAAAG,CAAA,GAAAD,CAAA;EAAA,GAAAF,CAAA;AAAA;AAAA,SAAAhB,wBAAAgB,CAAA,EAAAE,CAAA;EAAA,KAAAA,CAAA,IAAAF,CAAA,IAAAA,CAAA,CAAAI,UAAA,SAAAJ,CAAA;EAAA,aAAAA,CAAA,uBAAAA,CAAA,yBAAAA,CAAA;IAAAK,OAAA,EAAAL;EAAA;EAAA,IAAAG,CAAA,GAAAJ,wBAAA,CAAAG,CAAA;EAAA,IAAAC,CAAA,IAAAA,CAAA,CAAAG,GAAA,CAAAN,CAAA,UAAAG,CAAA,CAAAI,GAAA,CAAAP,CAAA;EAAA,IAAAQ,CAAA;MAAAC,SAAA;IAAA;IAAAC,CAAA,GAAAC,MAAA,CAAAC,cAAA,IAAAD,MAAA,CAAAE,wBAAA;EAAA,SAAAC,CAAA,IAAAd,CAAA,oBAAAc,CAAA,IAAAH,MAAA,CAAAI,SAAA,CAAAC,cAAA,CAAAC,IAAA,CAAAjB,CAAA,EAAAc,CAAA;IAAA,IAAAI,CAAA,GAAAR,CAAA,GAAAC,MAAA,CAAAE,wBAAA,CAAAb,CAAA,EAAAc,CAAA;IAAAI,CAAA,KAAAA,CAAA,CAAAX,GAAA,IAAAW,CAAA,CAAAC,GAAA,IAAAR,MAAA,CAAAC,cAAA,CAAAJ,CAAA,EAAAM,CAAA,EAAAI,CAAA,IAAAV,CAAA,CAAAM,CAAA,IAAAd,CAAA,CAAAc,CAAA;EAAA;EAAA,OAAAN,CAAA,CAAAH,OAAA,GAAAL,CAAA,EAAAG,CAAA,IAAAA,CAAA,CAAAgB,GAAA,CAAAnB,CAAA,EAAAQ,CAAA,GAAAA,CAAA;AAAA;AAExD;AACO,MAAMY,qBAAqB,GAAAC,OAAA,CAAAD,qBAAA,gBAAG,IAAA1B,YAAA,CAAA4B,WAAW,EAC9C,kEAAkE,EAClE,MAAM7B,QAAQ,CAAC8B,UAAU,CAACC,UAAU,CAACC,cAAc,CAAC,CACrD;AAED;AACO,MAAMC,kBAAkB,GAAAL,OAAA,CAAAK,kBAAA,gBAAG3C,MAAM,CAAC4C,WAAW,CAAEC,OAAO,IAC3DtC,SAAS,CAACuC,OAAO,CAACD,OAAO,CAACE,GAAG,EAAEF,OAAO,CAACG,SAAS,EAAGC,CAAC,IAClD9C,KAAK,CAAC+C,YAAY,CAAC;EACjBL,OAAO;EACPM,MAAM,EAAE,YAAY;EACpBC,KAAK,EAAEH;CACR,CAAC,CAAC,CAACI,IAAI,CACN7C,MAAM,CAAC8C,GAAG,CAAC5C,QAAQ,CAACc,GAAG,CAACa,qBAAqB,CAAC,CAAC,EAC/C7B,MAAM,CAAC+C,OAAO,CAAC,CAAC,CAACR,GAAG,EAAES,GAAG,CAAC,KAAI;EAC5B,MAAMC,GAAG,GAAG,IAAID,GAAG,EAAE;EACrBC,GAAG,CAACC,IAAI,CAACb,OAAO,CAACc,MAAM,EAAEZ,GAAG,CAACa,QAAQ,EAAE,EAAE,IAAI,CAAC;EAC9CH,GAAG,CAACI,YAAY,GAAG,MAAM;EACzBjC,MAAM,CAACkC,OAAO,CAACjB,OAAO,CAACkB,OAAO,CAAC,CAACC,OAAO,CAAC,CAAC,CAACC,CAAC,EAAEC,CAAC,CAAC,KAAI;IACjDT,GAAG,CAACU,gBAAgB,CAACF,CAAC,EAAEC,CAAC,CAAC;EAC5B,CAAC,CAAC;EACF,OAAOE,QAAQ,CAACX,GAAG,EAAEZ,OAAO,CAAC,CAACQ,IAAI,CAChC7C,MAAM,CAAC6D,OAAO,CAAC7D,MAAM,CAAC8D,KAAK,CAAQC,MAAM,IAAI;IAC3C,MAAMC,QAAQ,GAAGA,CAAA,KAAK;MACpB,IAAIf,GAAG,CAACgB,UAAU,IAAI,CAAC,EAAE;QACvBF,MAAM,CAAC/D,MAAM,CAACkE,IAAI,CAAC;MACrB;IACF,CAAC;IACDjB,GAAG,CAACkB,kBAAkB,GAAGH,QAAQ;IACjCA,QAAQ,EAAE;EACZ,CAAC,CAAC,CAAC,EACHhE,MAAM,CAACoE,EAAE,CAAC,IAAIC,kBAAkB,CAAChC,OAAO,EAAEY,GAAG,CAAC,CAAC,EAC/CjD,MAAM,CAACsE,WAAW,CAAC,MAAMtE,MAAM,CAACuE,IAAI,CAAC,MAAMtB,GAAG,CAACuB,KAAK,EAAE,CAAC,CAAC,CACzD;AACH,CAAC,CAAC,CACH,CACJ;AAED,MAAMZ,QAAQ,GAAGA,CAACX,GAAmB,EAAEZ,OAAoC,KACzErC,MAAM,CAACyE,OAAO,CAAC,MAAK;EAClB,MAAMC,IAAI,GAAGrC,OAAO,CAACqC,IAAI;EACzB,QAAQA,IAAI,CAACC,IAAI;IACf,KAAK,OAAO;MACV,OAAO3E,MAAM,CAACuE,IAAI,CAAC,MAAMtB,GAAG,CAAC2B,IAAI,EAAE,CAAC;IACtC,KAAK,KAAK;MACR,OAAO5E,MAAM,CAACuE,IAAI,CAAC,MAAMtB,GAAG,CAAC2B,IAAI,CAACF,IAAI,CAACA,IAAW,CAAC,CAAC;IACtD,KAAK,YAAY;MACf,OAAO1E,MAAM,CAACuE,IAAI,CAAC,MAAMtB,GAAG,CAAC2B,IAAI,CAACF,IAAI,CAACA,IAAI,CAAC,CAAC;IAC/C,KAAK,UAAU;MACb,OAAO1E,MAAM,CAACuE,IAAI,CAAC,MAAMtB,GAAG,CAAC2B,IAAI,CAACF,IAAI,CAACG,QAAQ,CAAC,CAAC;IACnD,KAAK,QAAQ;MACX,OAAO7E,MAAM,CAAC8E,WAAW,CACvBxE,MAAM,CAACyE,OAAO,CAACL,IAAI,CAACM,MAAM,EAAE,IAAIC,UAAU,CAAC,CAAC,CAAC,EAAE,CAACC,GAAG,EAAEC,KAAK,KAAI;QAC5D,MAAMC,IAAI,GAAG,IAAIH,UAAU,CAACC,GAAG,CAACG,MAAM,GAAGF,KAAK,CAACE,MAAM,CAAC;QACtDD,IAAI,CAACxD,GAAG,CAACsD,GAAG,EAAE,CAAC,CAAC;QAChBE,IAAI,CAACxD,GAAG,CAACuD,KAAK,EAAED,GAAG,CAACG,MAAM,CAAC;QAC3B,OAAOD,IAAI;MACb,CAAC,CAAC,EACF;QACEE,SAAS,EAAG1C,KAAK,IACf5C,MAAM,CAACuF,IAAI,CAAC5F,KAAK,CAAC+C,YAAY,CAAC;UAC7BL,OAAO;UACPM,MAAM,EAAE,QAAQ;UAChBC;SACD,CAAC,CAAC;QACL4C,SAAS,EAAGd,IAAI,IAAK1E,MAAM,CAACuE,IAAI,CAAC,MAAMtB,GAAG,CAAC2B,IAAI,CAACF,IAAI,CAAC;OACtD,CACF;EACL;AACF,CAAC,CAAC;AAEJ,MAAMe,OAAO,gBAAG,IAAIC,WAAW,EAAE;AAEjC;AACM,MAAOC,mBAAmB;EAInBC,MAAA;EACAC,OAAA;EAJF,CAAC/F,eAAe,CAACgG,MAAM;EAEhCC,YACWH,MAAsB,EACtBC,OAA8B;IAD9B,KAAAD,MAAM,GAANA,MAAM;IACN,KAAAC,OAAO,GAAPA,OAAO;IAEhB,IAAI,CAAC/F,eAAe,CAACgG,MAAM,CAAC,GAAGhG,eAAe,CAACgG,MAAM;EACvD;EAEAE,QAAQ;EACR,IAAIzC,OAAOA,CAAA;IACT,IAAI,IAAI,CAACyC,QAAQ,EAAE;MACjB,OAAO,IAAI,CAACA,QAAQ;IACtB;IACA,MAAMzC,OAAO,GAAG,IAAI,CAACqC,MAAM,CAACK,qBAAqB,EAAE;IACnD,IAAI1C,OAAO,KAAK,EAAE,EAAE;MAClB,OAAO1D,OAAO,CAACqG,KAAK;IACtB;IACA,MAAMC,MAAM,GAAG5F,YAAY,CAAC6F,IAAI,EAAE;IAClC,MAAMC,MAAM,GAAGF,MAAM,CAACV,OAAO,CAACa,MAAM,CAAC/C,OAAO,GAAG,MAAM,CAAC,EAAE,CAAC,CAAC;IAC1D,MAAMgD,MAAM,GAAGF,MAAM,CAAC1B,IAAI,KAAK,SAAS,GAAG9E,OAAO,CAAC2G,SAAS,CAACH,MAAM,CAAC9C,OAAO,CAAC,GAAG1D,OAAO,CAACqG,KAAK;IAC5F,OAAO,IAAI,CAACF,QAAQ,GAAGO,MAAM;EAC/B;EAEA,IAAIE,aAAaA,CAAA;IACf,OAAOpG,MAAM,CAACqG,IAAI,EAAE;EACtB;EAEAC,WAAW;EACX,IAAIC,IAAIA,CAAA;IACN,IAAI,IAAI,CAACD,WAAW,EAAE;MACpB,OAAO,IAAI,CAACA,WAAW;IACzB;IACA,OAAO,IAAI,CAACA,WAAW,GAAG3G,MAAM,CAAC8D,KAAK,CAAaC,MAAM,IAAI;MAC3D,IAAI,IAAI,CAAC6B,MAAM,CAAC3B,UAAU,KAAK,CAAC,EAAE;QAChCF,MAAM,CAAC/D,MAAM,CAAC6G,OAAO,CAAC,IAAI,CAACjB,MAAM,CAACkB,QAAQ,CAAC,CAAC;QAC5C;MACF;MAEA,MAAMC,kBAAkB,GAAGA,CAAA,KAAK;QAC9B,IAAI,IAAI,CAACnB,MAAM,CAAC3B,UAAU,KAAK,CAAC,EAAE;UAChCF,MAAM,CAAC/D,MAAM,CAAC6G,OAAO,CAAC,IAAI,CAACjB,MAAM,CAACkB,QAAQ,CAAC,CAAC;QAC9C;MACF,CAAC;MACD,MAAMjB,OAAO,GAAImB,KAAU,IAAI;QAC7BjD,MAAM,CAAC/D,MAAM,CAACuF,IAAI,CAAC,IAAI,CAACM,OAAO,CAACmB,KAAK,CAAC,CAAC,CAAC;MAC1C,CAAC;MACD,IAAI,CAACpB,MAAM,CAACqB,gBAAgB,CAAC,kBAAkB,EAAEF,kBAAkB,CAAC;MACpE,IAAI,CAACnB,MAAM,CAACqB,gBAAgB,CAAC,OAAO,EAAEpB,OAAO,CAAC;MAC9C,OAAO7F,MAAM,CAACuE,IAAI,CAAC,MAAK;QACtB,IAAI,CAACqB,MAAM,CAACsB,mBAAmB,CAAC,kBAAkB,EAAEH,kBAAkB,CAAC;QACvE,IAAI,CAACnB,MAAM,CAACsB,mBAAmB,CAAC,OAAO,EAAErB,OAAO,CAAC;MACnD,CAAC,CAAC;IACJ,CAAC,CAAC,CAAChD,IAAI,CACL7C,MAAM,CAACmH,MAAM,EACbnH,MAAM,CAACoH,OAAO,CACf;EACH;EAEA,IAAIC,IAAIA,CAAA;IACN,OAAOrH,MAAM,CAACsH,MAAM,CAAC,IAAI,CAACV,IAAI,EAAE;MAC9BW,GAAG,EAAG9E,CAAC,IAAKA,CAAC,KAAK,EAAE,GAAG,IAAI,GAAG+E,IAAI,CAACC,KAAK,CAAChF,CAAC,CAAY;MACtDiF,KAAK,EAAE,IAAI,CAAC7B;KACb,CAAC;EACJ;EAEA,IAAI8B,aAAaA,CAAA;IACf,OAAO3H,MAAM,CAAC+C,OAAO,CAAC,IAAI,CAAC6D,IAAI,EAAGnE,CAAC,IACjCzC,MAAM,CAACuH,GAAG,CAAC;MACTA,GAAG,EAAEA,CAAA,KAAMxH,SAAS,CAACyG,SAAS,CAAC,IAAIoB,eAAe,CAACnF,CAAC,CAAC,CAAC;MACtDiF,KAAK,EAAE,IAAI,CAAC7B;KACb,CAAC,CAAC;EACP;EAEA,IAAIb,MAAMA,CAAA;IACR,OAAO1E,MAAM,CAACuH,cAAc,CAAiBC,IAAI,IAAI;MACnD,IAAIC,KAAK,GAAG,CAAC;MACb,MAAMhB,kBAAkB,GAAGA,CAAA,KAAK;QAC9B,IAAI,IAAI,CAACnB,MAAM,CAAC3B,UAAU,KAAK,CAAC,EAAE;UAChC6D,IAAI,CAACE,MAAM,CAACvC,OAAO,CAACa,MAAM,CAAC,IAAI,CAACV,MAAM,CAACqC,YAAY,CAACC,KAAK,CAACH,KAAK,CAAC,CAAC,CAAC;UAClEA,KAAK,GAAG,IAAI,CAACnC,MAAM,CAACqC,YAAY,CAAC5C,MAAM;QACzC,CAAC,MAAM,IAAI,IAAI,CAACO,MAAM,CAAC3B,UAAU,KAAK,CAAC,EAAE;UACvC,IAAI8D,KAAK,GAAG,IAAI,CAACnC,MAAM,CAACqC,YAAY,CAAC5C,MAAM,EAAE;YAC3CyC,IAAI,CAACE,MAAM,CAACvC,OAAO,CAACa,MAAM,CAAC,IAAI,CAACV,MAAM,CAACqC,YAAY,CAACC,KAAK,CAACH,KAAK,CAAC,CAAC,CAAC;UACpE;UACAD,IAAI,CAACK,GAAG,EAAE;QACZ;MACF,CAAC;MACD,MAAMtC,OAAO,GAAImB,KAAU,IAAI;QAC7Bc,IAAI,CAACvC,IAAI,CAAC,IAAI,CAACM,OAAO,CAACmB,KAAK,CAAC,CAAC;MAChC,CAAC;MACD,IAAI,CAACpB,MAAM,CAACqB,gBAAgB,CAAC,kBAAkB,EAAEF,kBAAkB,CAAC;MACpE,IAAI,CAACnB,MAAM,CAACqB,gBAAgB,CAAC,OAAO,EAAEpB,OAAO,CAAC;MAC9CkB,kBAAkB,EAAE;MACpB,OAAO9G,MAAM,CAACmI,IAAI,CAACpI,MAAM,CAACuE,IAAI,CAAC,MAAK;QAClC,IAAI,CAACqB,MAAM,CAACsB,mBAAmB,CAAC,kBAAkB,EAAEH,kBAAkB,CAAC;QACvE,IAAI,CAACnB,MAAM,CAACsB,mBAAmB,CAAC,OAAO,EAAErB,OAAO,CAAC;MACnD,CAAC,CAAC,CAAC;IACL,CAAC,CAAC;EACJ;EAEA,IAAIwC,WAAWA,CAAA;IACb,OAAO,IAAI,CAACzB,IAAI,CAAC/D,IAAI,CACnB7C,MAAM,CAACsI,GAAG,CAAE7F,CAAC,IAAKgD,OAAO,CAACa,MAAM,CAAC7D,CAAC,CAAC,CAAC8F,MAAM,CAAC,CAC5C;EACH;;AACDzG,OAAA,CAAA6D,mBAAA,GAAAA,mBAAA;AAED,MAAMtB,kBAAmB,SAAQsB,mBAAwC;EAI5DtD,OAAA;EAHF,CAACzC,cAAc,CAACkG,MAAM;EAE/BC,YACW1D,OAAoC,EAC7CuD,MAAsB;IAEtB,KAAK,CAACA,MAAM,EAAGnD,CAAC,IACd9C,KAAK,CAAC6I,aAAa,CAAC;MAClBnG,OAAO;MACPyE,QAAQ,EAAE,IAAI;MACdnE,MAAM,EAAE,QAAQ;MAChBC,KAAK,EAAEH;KACR,CAAC,CAAC;IATI,KAAAJ,OAAO,GAAPA,OAAO;IAUhB,IAAI,CAACzC,cAAc,CAACkG,MAAM,CAAC,GAAGlG,cAAc,CAACkG,MAAM;EACrD;EAEA,IAAI2C,MAAMA,CAAA;IACR,OAAO,IAAI,CAAC7C,MAAM,CAAC6C,MAAM;EAC3B;EAEA,IAAI5D,QAAQA,CAAA;IACV,OAAO7E,MAAM,CAAC0I,GAAG,CAAC,iBAAiB,CAAC;EACtC;EAEAtF,QAAQA,CAAA;IACN,OAAO,kBAAkB,IAAI,CAACqF,MAAM,GAAG;EACzC;EAEAE,MAAMA,CAAA;IACJ,OAAO;MACLhE,IAAI,EAAE,gBAAgB;MACtB8D,MAAM,EAAE,IAAI,CAACA,MAAM;MACnBlF,OAAO,EAAE,IAAI,CAACA;KACf;EACH;;AAGF;AACO,MAAMqF,mBAAmB,GAAA9G,OAAA,CAAA8G,mBAAA,gBAAGxI,KAAK,CAACyG,OAAO,CAACrH,MAAM,CAACA,MAAM,EAAE2C,kBAAkB,CAAC"}

package/dist/dts/BrowserHttpClient.d.ts

@@ -0,0 +1,22 @@
+/**
+ * @since 1.0.0
+ */
+import type * as Client from "@effect/platform/Http/Client";
+import type * as FiberRef from "effect/FiberRef";
+import type * as Layer from "effect/Layer";
+/**
+ * @since 1.0.0
+ * @category clients
+ */
+export declare const xmlHttpRequest: Client.Client.Default;
+/**
+ * @since 1.0.0
+ * @category layers
+ */
+export declare const layerXMLHttpRequest: Layer.Layer<Client.Client.Default, never, never>;
+/**
+ * @since 1.0.0
+ * @category fiber refs
+ */
+export declare const currentXMLHttpRequest: FiberRef.FiberRef<typeof XMLHttpRequest>;
+//# sourceMappingURL=BrowserHttpClient.d.ts.map

package/dist/dts/BrowserHttpClient.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"BrowserHttpClient.d.ts","sourceRoot":"","sources":["../../src/BrowserHttpClient.ts"],"names":[],"mappings":"AAAA;;GAEG;AACH,OAAO,KAAK,KAAK,MAAM,MAAM,8BAA8B,CAAA;AAC3D,OAAO,KAAK,KAAK,QAAQ,MAAM,iBAAiB,CAAA;AAChD,OAAO,KAAK,KAAK,KAAK,MAAM,cAAc,CAAA;AAG1C;;;GAGG;AACH,eAAO,MAAM,cAAc,EAAE,MAAM,CAAC,MAAM,CAAC,OAAqC,CAAA;AAEhF;;;GAGG;AACH,eAAO,MAAM,mBAAmB,EAAE,KAAK,CAAC,KAAK,CAAC,MAAM,CAAC,MAAM,CAAC,OAAO,EAAE,KAAK,EAAE,KAAK,CAAgC,CAAA;AAEjH;;;GAGG;AACH,eAAO,MAAM,qBAAqB,EAAE,QAAQ,CAAC,QAAQ,CAAC,OAAO,cAAc,CAAkC,CAAA"}

package/dist/dts/index.d.ts

@@ -1,3 +1,7 @@
+/**
+ * @since 1.0.0
+ */
+export * as BrowserHttpClient from "./BrowserHttpClient.js";
 /**
  * @since 1.0.0
  */

package/dist/dts/index.d.ts.map

@@ -1 +1 @@
-{"version":3,"file":"index.d.ts","sourceRoot":"","sources":["../../src/index.ts"],"names":[],"mappings":"AAAA;;GAEG;AACH,OAAO,KAAK,oBAAoB,MAAM,2BAA2B,CAAA;AAEjE;;GAEG;AACH,OAAO,KAAK,cAAc,MAAM,qBAAqB,CAAA;AAErD;;GAEG;AACH,OAAO,KAAK,aAAa,MAAM,oBAAoB,CAAA;AAEnD;;GAEG;AACH,OAAO,KAAK,mBAAmB,MAAM,0BAA0B,CAAA;AAE/D;;GAEG;AACH,OAAO,KAAK,SAAS,MAAM,gBAAgB,CAAA"}
+{"version":3,"file":"index.d.ts","sourceRoot":"","sources":["../../src/index.ts"],"names":[],"mappings":"AAAA;;GAEG;AACH,OAAO,KAAK,iBAAiB,MAAM,wBAAwB,CAAA;AAE3D;;GAEG;AACH,OAAO,KAAK,oBAAoB,MAAM,2BAA2B,CAAA;AAEjE;;GAEG;AACH,OAAO,KAAK,cAAc,MAAM,qBAAqB,CAAA;AAErD;;GAEG;AACH,OAAO,KAAK,aAAa,MAAM,oBAAoB,CAAA;AAEnD;;GAEG;AACH,OAAO,KAAK,mBAAmB,MAAM,0BAA0B,CAAA;AAE/D;;GAEG;AACH,OAAO,KAAK,SAAS,MAAM,gBAAgB,CAAA"}

package/dist/dts/internal/http/client.d.ts

@@ -0,0 +1,2 @@
+export {};
+//# sourceMappingURL=client.d.ts.map

package/dist/dts/internal/http/client.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"client.d.ts","sourceRoot":"","sources":["../../../../src/internal/http/client.ts"],"names":[],"mappings":""}

package/dist/esm/BrowserHttpClient.js

@@ -0,0 +1,17 @@
+import * as internal from "./internal/http/client.js";
+/**
+ * @since 1.0.0
+ * @category clients
+ */
+export const xmlHttpRequest = internal.makeXMLHttpRequest;
+/**
+ * @since 1.0.0
+ * @category layers
+ */
+export const layerXMLHttpRequest = internal.layerXMLHttpRequest;
+/**
+ * @since 1.0.0
+ * @category fiber refs
+ */
+export const currentXMLHttpRequest = internal.currentXMLHttpRequest;
+//# sourceMappingURL=BrowserHttpClient.js.map

package/dist/esm/BrowserHttpClient.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"BrowserHttpClient.js","names":["internal","xmlHttpRequest","makeXMLHttpRequest","layerXMLHttpRequest","currentXMLHttpRequest"],"sources":["../../src/BrowserHttpClient.ts"],"sourcesContent":[null],"mappings":"AAMA,OAAO,KAAKA,QAAQ,MAAM,2BAA2B;AAErD;;;;AAIA,OAAO,MAAMC,cAAc,GAA0BD,QAAQ,CAACE,kBAAkB;AAEhF;;;;AAIA,OAAO,MAAMC,mBAAmB,GAAqDH,QAAQ,CAACG,mBAAmB;AAEjH;;;;AAIA,OAAO,MAAMC,qBAAqB,GAA6CJ,QAAQ,CAACI,qBAAqB"}

package/dist/esm/index.js

@@ -1,3 +1,7 @@
+/**
+ * @since 1.0.0
+ */
+export * as BrowserHttpClient from "./BrowserHttpClient.js";
 /**
  * @since 1.0.0
  */

package/dist/esm/index.js.map

@@ -1 +1 @@
-{"version":3,"file":"index.js","names":["BrowserKeyValueStore","BrowserRuntime","BrowserWorker","BrowserWorkerRunner","Clipboard"],"sources":["../../src/index.ts"],"sourcesContent":[null],"mappings":"AAAA;;;AAGA,OAAO,KAAKA,oBAAoB,MAAM,2BAA2B;AAEjE;;;AAGA,OAAO,KAAKC,cAAc,MAAM,qBAAqB;AAErD;;;AAGA,OAAO,KAAKC,aAAa,MAAM,oBAAoB;AAEnD;;;AAGA,OAAO,KAAKC,mBAAmB,MAAM,0BAA0B;AAE/D;;;AAGA,OAAO,KAAKC,SAAS,MAAM,gBAAgB"}
+{"version":3,"file":"index.js","names":["BrowserHttpClient","BrowserKeyValueStore","BrowserRuntime","BrowserWorker","BrowserWorkerRunner","Clipboard"],"sources":["../../src/index.ts"],"sourcesContent":[null],"mappings":"AAAA;;;AAGA,OAAO,KAAKA,iBAAiB,MAAM,wBAAwB;AAE3D;;;AAGA,OAAO,KAAKC,oBAAoB,MAAM,2BAA2B;AAEjE;;;AAGA,OAAO,KAAKC,cAAc,MAAM,qBAAqB;AAErD;;;AAGA,OAAO,KAAKC,aAAa,MAAM,oBAAoB;AAEnD;;;AAGA,OAAO,KAAKC,mBAAmB,MAAM,0BAA0B;AAE/D;;;AAGA,OAAO,KAAKC,SAAS,MAAM,gBAAgB"}

package/dist/esm/internal/http/client.js

@@ -0,0 +1,194 @@
+import * as Client from "@effect/platform/Http/Client";
+import * as Error from "@effect/platform/Http/ClientError";
+import * as ClientResponse from "@effect/platform/Http/ClientResponse";
+import * as Headers from "@effect/platform/Http/Headers";
+import * as IncomingMessage from "@effect/platform/Http/IncomingMessage";
+import * as UrlParams from "@effect/platform/Http/UrlParams";
+import * as Effect from "effect/Effect";
+import * as Either from "effect/Either";
+import * as FiberRef from "effect/FiberRef";
+import { globalValue } from "effect/GlobalValue";
+import * as Layer from "effect/Layer";
+import * as Option from "effect/Option";
+import * as Stream from "effect/Stream";
+import * as HeaderParser from "multipasta/HeadersParser";
+/** @internal */
+export const currentXMLHttpRequest = /*#__PURE__*/globalValue("@effect/platform-browser/BrowserHttpClient/currentXMLHttpRequest", () => FiberRef.unsafeMake(globalThis.XMLHttpRequest));
+/** @internal */
+export const makeXMLHttpRequest = /*#__PURE__*/Client.makeDefault(request => UrlParams.makeUrl(request.url, request.urlParams, _ => Error.RequestError({
+  request,
+  reason: "InvalidUrl",
+  error: _
+})).pipe(Effect.zip(FiberRef.get(currentXMLHttpRequest)), Effect.flatMap(([url, XHR]) => {
+  const xhr = new XHR();
+  xhr.open(request.method, url.toString(), true);
+  xhr.responseType = "text";
+  Object.entries(request.headers).forEach(([k, v]) => {
+    xhr.setRequestHeader(k, v);
+  });
+  return sendBody(xhr, request).pipe(Effect.zipLeft(Effect.async(resume => {
+    const onChange = () => {
+      if (xhr.readyState >= 2) {
+        resume(Effect.unit);
+      }
+    };
+    xhr.onreadystatechange = onChange;
+    onChange();
+  })), Effect.as(new ClientResponseImpl(request, xhr)), Effect.onInterrupt(() => Effect.sync(() => xhr.abort())));
+})));
+const sendBody = (xhr, request) => Effect.suspend(() => {
+  const body = request.body;
+  switch (body._tag) {
+    case "Empty":
+      return Effect.sync(() => xhr.send());
+    case "Raw":
+      return Effect.sync(() => xhr.send(body.body));
+    case "Uint8Array":
+      return Effect.sync(() => xhr.send(body.body));
+    case "FormData":
+      return Effect.sync(() => xhr.send(body.formData));
+    case "Stream":
+      return Effect.matchEffect(Stream.runFold(body.stream, new Uint8Array(0), (acc, chunk) => {
+        const next = new Uint8Array(acc.length + chunk.length);
+        next.set(acc, 0);
+        next.set(chunk, acc.length);
+        return next;
+      }), {
+        onFailure: error => Effect.fail(Error.RequestError({
+          request,
+          reason: "Encode",
+          error
+        })),
+        onSuccess: body => Effect.sync(() => xhr.send(body))
+      });
+  }
+});
+const encoder = /*#__PURE__*/new TextEncoder();
+/** @internal */
+export class IncomingMessageImpl {
+  source;
+  onError;
+  [IncomingMessage.TypeId];
+  constructor(source, onError) {
+    this.source = source;
+    this.onError = onError;
+    this[IncomingMessage.TypeId] = IncomingMessage.TypeId;
+  }
+  _headers;
+  get headers() {
+    if (this._headers) {
+      return this._headers;
+    }
+    const headers = this.source.getAllResponseHeaders();
+    if (headers === "") {
+      return Headers.empty;
+    }
+    const parser = HeaderParser.make();
+    const result = parser(encoder.encode(headers + "\r\n"), 0);
+    const parsed = result._tag === "Headers" ? Headers.fromInput(result.headers) : Headers.empty;
+    return this._headers = parsed;
+  }
+  get remoteAddress() {
+    return Option.none();
+  }
+  _textEffect;
+  get text() {
+    if (this._textEffect) {
+      return this._textEffect;
+    }
+    return this._textEffect = Effect.async(resume => {
+      if (this.source.readyState === 4) {
+        resume(Effect.succeed(this.source.response));
+        return;
+      }
+      const onReadyStateChange = () => {
+        if (this.source.readyState === 4) {
+          resume(Effect.succeed(this.source.response));
+        }
+      };
+      const onError = event => {
+        resume(Effect.fail(this.onError(event)));
+      };
+      this.source.addEventListener("readystatechange", onReadyStateChange);
+      this.source.addEventListener("error", onError);
+      return Effect.sync(() => {
+        this.source.removeEventListener("readystatechange", onReadyStateChange);
+        this.source.removeEventListener("error", onError);
+      });
+    }).pipe(Effect.cached, Effect.runSync);
+  }
+  get json() {
+    return Effect.tryMap(this.text, {
+      try: _ => _ === "" ? null : JSON.parse(_),
+      catch: this.onError
+    });
+  }
+  get urlParamsBody() {
+    return Effect.flatMap(this.text, _ => Effect.try({
+      try: () => UrlParams.fromInput(new URLSearchParams(_)),
+      catch: this.onError
+    }));
+  }
+  get stream() {
+    return Stream.asyncInterrupt(emit => {
+      let bytes = 0;
+      const onReadyStateChange = () => {
+        if (this.source.readyState === 3) {
+          emit.single(encoder.encode(this.source.responseText.slice(bytes)));
+          bytes = this.source.responseText.length;
+        } else if (this.source.readyState === 4) {
+          if (bytes < this.source.responseText.length) {
+            emit.single(encoder.encode(this.source.responseText.slice(bytes)));
+          }
+          emit.end();
+        }
+      };
+      const onError = event => {
+        emit.fail(this.onError(event));
+      };
+      this.source.addEventListener("readystatechange", onReadyStateChange);
+      this.source.addEventListener("error", onError);
+      onReadyStateChange();
+      return Either.left(Effect.sync(() => {
+        this.source.removeEventListener("readystatechange", onReadyStateChange);
+        this.source.removeEventListener("error", onError);
+      }));
+    });
+  }
+  get arrayBuffer() {
+    return this.text.pipe(Effect.map(_ => encoder.encode(_).buffer));
+  }
+}
+class ClientResponseImpl extends IncomingMessageImpl {
+  request;
+  [ClientResponse.TypeId];
+  constructor(request, source) {
+    super(source, _ => Error.ResponseError({
+      request,
+      response: this,
+      reason: "Decode",
+      error: _
+    }));
+    this.request = request;
+    this[ClientResponse.TypeId] = ClientResponse.TypeId;
+  }
+  get status() {
+    return this.source.status;
+  }
+  get formData() {
+    return Effect.die("Not implemented");
+  }
+  toString() {
+    return `ClientResponse(${this.status})`;
+  }
+  toJSON() {
+    return {
+      _tag: "ClientResponse",
+      status: this.status,
+      headers: this.headers
+    };
+  }
+}
+/** @internal */
+export const layerXMLHttpRequest = /*#__PURE__*/Layer.succeed(Client.Client, makeXMLHttpRequest);
+//# sourceMappingURL=client.js.map

package/dist/esm/internal/http/client.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"client.js","names":["Client","Error","ClientResponse","Headers","IncomingMessage","UrlParams","Effect","Either","FiberRef","globalValue","Layer","Option","Stream","HeaderParser","currentXMLHttpRequest","unsafeMake","globalThis","XMLHttpRequest","makeXMLHttpRequest","makeDefault","request","makeUrl","url","urlParams","_","RequestError","reason","error","pipe","zip","get","flatMap","XHR","xhr","open","method","toString","responseType","Object","entries","headers","forEach","k","v","setRequestHeader","sendBody","zipLeft","async","resume","onChange","readyState","unit","onreadystatechange","as","ClientResponseImpl","onInterrupt","sync","abort","suspend","body","_tag","send","formData","matchEffect","runFold","stream","Uint8Array","acc","chunk","next","length","set","onFailure","fail","onSuccess","encoder","TextEncoder","IncomingMessageImpl","source","onError","TypeId","constructor","_headers","getAllResponseHeaders","empty","parser","make","result","encode","parsed","fromInput","remoteAddress","none","_textEffect","text","succeed","response","onReadyStateChange","event","addEventListener","removeEventListener","cached","runSync","json","tryMap","try","JSON","parse","catch","urlParamsBody","URLSearchParams","asyncInterrupt","emit","bytes","single","responseText","slice","end","left","arrayBuffer","map","buffer","ResponseError","status","die","toJSON","layerXMLHttpRequest"],"sources":["../../../../src/internal/http/client.ts"],"sourcesContent":[null],"mappings":"AAAA,OAAO,KAAKA,MAAM,MAAM,8BAA8B;AACtD,OAAO,KAAKC,KAAK,MAAM,mCAAmC;AAE1D,OAAO,KAAKC,cAAc,MAAM,sCAAsC;AACtE,OAAO,KAAKC,OAAO,MAAM,+BAA+B;AACxD,OAAO,KAAKC,eAAe,MAAM,uCAAuC;AACxE,OAAO,KAAKC,SAAS,MAAM,iCAAiC;AAC5D,OAAO,KAAKC,MAAM,MAAM,eAAe;AACvC,OAAO,KAAKC,MAAM,MAAM,eAAe;AACvC,OAAO,KAAKC,QAAQ,MAAM,iBAAiB;AAC3C,SAASC,WAAW,QAAQ,oBAAoB;AAChD,OAAO,KAAKC,KAAK,MAAM,cAAc;AACrC,OAAO,KAAKC,MAAM,MAAM,eAAe;AACvC,OAAO,KAAKC,MAAM,MAAM,eAAe;AACvC,OAAO,KAAKC,YAAY,MAAM,0BAA0B;AAExD;AACA,OAAO,MAAMC,qBAAqB,gBAAGL,WAAW,CAC9C,kEAAkE,EAClE,MAAMD,QAAQ,CAACO,UAAU,CAACC,UAAU,CAACC,cAAc,CAAC,CACrD;AAED;AACA,OAAO,MAAMC,kBAAkB,gBAAGlB,MAAM,CAACmB,WAAW,CAAEC,OAAO,IAC3Df,SAAS,CAACgB,OAAO,CAACD,OAAO,CAACE,GAAG,EAAEF,OAAO,CAACG,SAAS,EAAGC,CAAC,IAClDvB,KAAK,CAACwB,YAAY,CAAC;EACjBL,OAAO;EACPM,MAAM,EAAE,YAAY;EACpBC,KAAK,EAAEH;CACR,CAAC,CAAC,CAACI,IAAI,CACNtB,MAAM,CAACuB,GAAG,CAACrB,QAAQ,CAACsB,GAAG,CAAChB,qBAAqB,CAAC,CAAC,EAC/CR,MAAM,CAACyB,OAAO,CAAC,CAAC,CAACT,GAAG,EAAEU,GAAG,CAAC,KAAI;EAC5B,MAAMC,GAAG,GAAG,IAAID,GAAG,EAAE;EACrBC,GAAG,CAACC,IAAI,CAACd,OAAO,CAACe,MAAM,EAAEb,GAAG,CAACc,QAAQ,EAAE,EAAE,IAAI,CAAC;EAC9CH,GAAG,CAACI,YAAY,GAAG,MAAM;EACzBC,MAAM,CAACC,OAAO,CAACnB,OAAO,CAACoB,OAAO,CAAC,CAACC,OAAO,CAAC,CAAC,CAACC,CAAC,EAAEC,CAAC,CAAC,KAAI;IACjDV,GAAG,CAACW,gBAAgB,CAACF,CAAC,EAAEC,CAAC,CAAC;EAC5B,CAAC,CAAC;EACF,OAAOE,QAAQ,CAACZ,GAAG,EAAEb,OAAO,CAAC,CAACQ,IAAI,CAChCtB,MAAM,CAACwC,OAAO,CAACxC,MAAM,CAACyC,KAAK,CAAQC,MAAM,IAAI;IAC3C,MAAMC,QAAQ,GAAGA,CAAA,KAAK;MACpB,IAAIhB,GAAG,CAACiB,UAAU,IAAI,CAAC,EAAE;QACvBF,MAAM,CAAC1C,MAAM,CAAC6C,IAAI,CAAC;MACrB;IACF,CAAC;IACDlB,GAAG,CAACmB,kBAAkB,GAAGH,QAAQ;IACjCA,QAAQ,EAAE;EACZ,CAAC,CAAC,CAAC,EACH3C,MAAM,CAAC+C,EAAE,CAAC,IAAIC,kBAAkB,CAAClC,OAAO,EAAEa,GAAG,CAAC,CAAC,EAC/C3B,MAAM,CAACiD,WAAW,CAAC,MAAMjD,MAAM,CAACkD,IAAI,CAAC,MAAMvB,GAAG,CAACwB,KAAK,EAAE,CAAC,CAAC,CACzD;AACH,CAAC,CAAC,CACH,CACJ;AAED,MAAMZ,QAAQ,GAAGA,CAACZ,GAAmB,EAAEb,OAAoC,KACzEd,MAAM,CAACoD,OAAO,CAAC,MAAK;EAClB,MAAMC,IAAI,GAAGvC,OAAO,CAACuC,IAAI;EACzB,QAAQA,IAAI,CAACC,IAAI;IACf,KAAK,OAAO;MACV,OAAOtD,MAAM,CAACkD,IAAI,CAAC,MAAMvB,GAAG,CAAC4B,IAAI,EAAE,CAAC;IACtC,KAAK,KAAK;MACR,OAAOvD,MAAM,CAACkD,IAAI,CAAC,MAAMvB,GAAG,CAAC4B,IAAI,CAACF,IAAI,CAACA,IAAW,CAAC,CAAC;IACtD,KAAK,YAAY;MACf,OAAOrD,MAAM,CAACkD,IAAI,CAAC,MAAMvB,GAAG,CAAC4B,IAAI,CAACF,IAAI,CAACA,IAAI,CAAC,CAAC;IAC/C,KAAK,UAAU;MACb,OAAOrD,MAAM,CAACkD,IAAI,CAAC,MAAMvB,GAAG,CAAC4B,IAAI,CAACF,IAAI,CAACG,QAAQ,CAAC,CAAC;IACnD,KAAK,QAAQ;MACX,OAAOxD,MAAM,CAACyD,WAAW,CACvBnD,MAAM,CAACoD,OAAO,CAACL,IAAI,CAACM,MAAM,EAAE,IAAIC,UAAU,CAAC,CAAC,CAAC,EAAE,CAACC,GAAG,EAAEC,KAAK,KAAI;QAC5D,MAAMC,IAAI,GAAG,IAAIH,UAAU,CAACC,GAAG,CAACG,MAAM,GAAGF,KAAK,CAACE,MAAM,CAAC;QACtDD,IAAI,CAACE,GAAG,CAACJ,GAAG,EAAE,CAAC,CAAC;QAChBE,IAAI,CAACE,GAAG,CAACH,KAAK,EAAED,GAAG,CAACG,MAAM,CAAC;QAC3B,OAAOD,IAAI;MACb,CAAC,CAAC,EACF;QACEG,SAAS,EAAG7C,KAAK,IACfrB,MAAM,CAACmE,IAAI,CAACxE,KAAK,CAACwB,YAAY,CAAC;UAC7BL,OAAO;UACPM,MAAM,EAAE,QAAQ;UAChBC;SACD,CAAC,CAAC;QACL+C,SAAS,EAAGf,IAAI,IAAKrD,MAAM,CAACkD,IAAI,CAAC,MAAMvB,GAAG,CAAC4B,IAAI,CAACF,IAAI,CAAC;OACtD,CACF;EACL;AACF,CAAC,CAAC;AAEJ,MAAMgB,OAAO,gBAAG,IAAIC,WAAW,EAAE;AAEjC;AACA,OAAM,MAAOC,mBAAmB;EAInBC,MAAA;EACAC,OAAA;EAJF,CAAC3E,eAAe,CAAC4E,MAAM;EAEhCC,YACWH,MAAsB,EACtBC,OAA8B;IAD9B,KAAAD,MAAM,GAANA,MAAM;IACN,KAAAC,OAAO,GAAPA,OAAO;IAEhB,IAAI,CAAC3E,eAAe,CAAC4E,MAAM,CAAC,GAAG5E,eAAe,CAAC4E,MAAM;EACvD;EAEAE,QAAQ;EACR,IAAI1C,OAAOA,CAAA;IACT,IAAI,IAAI,CAAC0C,QAAQ,EAAE;MACjB,OAAO,IAAI,CAACA,QAAQ;IACtB;IACA,MAAM1C,OAAO,GAAG,IAAI,CAACsC,MAAM,CAACK,qBAAqB,EAAE;IACnD,IAAI3C,OAAO,KAAK,EAAE,EAAE;MAClB,OAAOrC,OAAO,CAACiF,KAAK;IACtB;IACA,MAAMC,MAAM,GAAGxE,YAAY,CAACyE,IAAI,EAAE;IAClC,MAAMC,MAAM,GAAGF,MAAM,CAACV,OAAO,CAACa,MAAM,CAAChD,OAAO,GAAG,MAAM,CAAC,EAAE,CAAC,CAAC;IAC1D,MAAMiD,MAAM,GAAGF,MAAM,CAAC3B,IAAI,KAAK,SAAS,GAAGzD,OAAO,CAACuF,SAAS,CAACH,MAAM,CAAC/C,OAAO,CAAC,GAAGrC,OAAO,CAACiF,KAAK;IAC5F,OAAO,IAAI,CAACF,QAAQ,GAAGO,MAAM;EAC/B;EAEA,IAAIE,aAAaA,CAAA;IACf,OAAOhF,MAAM,CAACiF,IAAI,EAAE;EACtB;EAEAC,WAAW;EACX,IAAIC,IAAIA,CAAA;IACN,IAAI,IAAI,CAACD,WAAW,EAAE;MACpB,OAAO,IAAI,CAACA,WAAW;IACzB;IACA,OAAO,IAAI,CAACA,WAAW,GAAGvF,MAAM,CAACyC,KAAK,CAAaC,MAAM,IAAI;MAC3D,IAAI,IAAI,CAAC8B,MAAM,CAAC5B,UAAU,KAAK,CAAC,EAAE;QAChCF,MAAM,CAAC1C,MAAM,CAACyF,OAAO,CAAC,IAAI,CAACjB,MAAM,CAACkB,QAAQ,CAAC,CAAC;QAC5C;MACF;MAEA,MAAMC,kBAAkB,GAAGA,CAAA,KAAK;QAC9B,IAAI,IAAI,CAACnB,MAAM,CAAC5B,UAAU,KAAK,CAAC,EAAE;UAChCF,MAAM,CAAC1C,MAAM,CAACyF,OAAO,CAAC,IAAI,CAACjB,MAAM,CAACkB,QAAQ,CAAC,CAAC;QAC9C;MACF,CAAC;MACD,MAAMjB,OAAO,GAAImB,KAAU,IAAI;QAC7BlD,MAAM,CAAC1C,MAAM,CAACmE,IAAI,CAAC,IAAI,CAACM,OAAO,CAACmB,KAAK,CAAC,CAAC,CAAC;MAC1C,CAAC;MACD,IAAI,CAACpB,MAAM,CAACqB,gBAAgB,CAAC,kBAAkB,EAAEF,kBAAkB,CAAC;MACpE,IAAI,CAACnB,MAAM,CAACqB,gBAAgB,CAAC,OAAO,EAAEpB,OAAO,CAAC;MAC9C,OAAOzE,MAAM,CAACkD,IAAI,CAAC,MAAK;QACtB,IAAI,CAACsB,MAAM,CAACsB,mBAAmB,CAAC,kBAAkB,EAAEH,kBAAkB,CAAC;QACvE,IAAI,CAACnB,MAAM,CAACsB,mBAAmB,CAAC,OAAO,EAAErB,OAAO,CAAC;MACnD,CAAC,CAAC;IACJ,CAAC,CAAC,CAACnD,IAAI,CACLtB,MAAM,CAAC+F,MAAM,EACb/F,MAAM,CAACgG,OAAO,CACf;EACH;EAEA,IAAIC,IAAIA,CAAA;IACN,OAAOjG,MAAM,CAACkG,MAAM,CAAC,IAAI,CAACV,IAAI,EAAE;MAC9BW,GAAG,EAAGjF,CAAC,IAAKA,CAAC,KAAK,EAAE,GAAG,IAAI,GAAGkF,IAAI,CAACC,KAAK,CAACnF,CAAC,CAAY;MACtDoF,KAAK,EAAE,IAAI,CAAC7B;KACb,CAAC;EACJ;EAEA,IAAI8B,aAAaA,CAAA;IACf,OAAOvG,MAAM,CAACyB,OAAO,CAAC,IAAI,CAAC+D,IAAI,EAAGtE,CAAC,IACjClB,MAAM,CAACmG,GAAG,CAAC;MACTA,GAAG,EAAEA,CAAA,KAAMpG,SAAS,CAACqF,SAAS,CAAC,IAAIoB,eAAe,CAACtF,CAAC,CAAC,CAAC;MACtDoF,KAAK,EAAE,IAAI,CAAC7B;KACb,CAAC,CAAC;EACP;EAEA,IAAId,MAAMA,CAAA;IACR,OAAOrD,MAAM,CAACmG,cAAc,CAAiBC,IAAI,IAAI;MACnD,IAAIC,KAAK,GAAG,CAAC;MACb,MAAMhB,kBAAkB,GAAGA,CAAA,KAAK;QAC9B,IAAI,IAAI,CAACnB,MAAM,CAAC5B,UAAU,KAAK,CAAC,EAAE;UAChC8D,IAAI,CAACE,MAAM,CAACvC,OAAO,CAACa,MAAM,CAAC,IAAI,CAACV,MAAM,CAACqC,YAAY,CAACC,KAAK,CAACH,KAAK,CAAC,CAAC,CAAC;UAClEA,KAAK,GAAG,IAAI,CAACnC,MAAM,CAACqC,YAAY,CAAC7C,MAAM;QACzC,CAAC,MAAM,IAAI,IAAI,CAACQ,MAAM,CAAC5B,UAAU,KAAK,CAAC,EAAE;UACvC,IAAI+D,KAAK,GAAG,IAAI,CAACnC,MAAM,CAACqC,YAAY,CAAC7C,MAAM,EAAE;YAC3C0C,IAAI,CAACE,MAAM,CAACvC,OAAO,CAACa,MAAM,CAAC,IAAI,CAACV,MAAM,CAACqC,YAAY,CAACC,KAAK,CAACH,KAAK,CAAC,CAAC,CAAC;UACpE;UACAD,IAAI,CAACK,GAAG,EAAE;QACZ;MACF,CAAC;MACD,MAAMtC,OAAO,GAAImB,KAAU,IAAI;QAC7Bc,IAAI,CAACvC,IAAI,CAAC,IAAI,CAACM,OAAO,CAACmB,KAAK,CAAC,CAAC;MAChC,CAAC;MACD,IAAI,CAACpB,MAAM,CAACqB,gBAAgB,CAAC,kBAAkB,EAAEF,kBAAkB,CAAC;MACpE,IAAI,CAACnB,MAAM,CAACqB,gBAAgB,CAAC,OAAO,EAAEpB,OAAO,CAAC;MAC9CkB,kBAAkB,EAAE;MACpB,OAAO1F,MAAM,CAAC+G,IAAI,CAAChH,MAAM,CAACkD,IAAI,CAAC,MAAK;QAClC,IAAI,CAACsB,MAAM,CAACsB,mBAAmB,CAAC,kBAAkB,EAAEH,kBAAkB,CAAC;QACvE,IAAI,CAACnB,MAAM,CAACsB,mBAAmB,CAAC,OAAO,EAAErB,OAAO,CAAC;MACnD,CAAC,CAAC,CAAC;IACL,CAAC,CAAC;EACJ;EAEA,IAAIwC,WAAWA,CAAA;IACb,OAAO,IAAI,CAACzB,IAAI,CAAClE,IAAI,CACnBtB,MAAM,CAACkH,GAAG,CAAEhG,CAAC,IAAKmD,OAAO,CAACa,MAAM,CAAChE,CAAC,CAAC,CAACiG,MAAM,CAAC,CAC5C;EACH;;AAGF,MAAMnE,kBAAmB,SAAQuB,mBAAwC;EAI5DzD,OAAA;EAHF,CAAClB,cAAc,CAAC8E,MAAM;EAE/BC,YACW7D,OAAoC,EAC7C0D,MAAsB;IAEtB,KAAK,CAACA,MAAM,EAAGtD,CAAC,IACdvB,KAAK,CAACyH,aAAa,CAAC;MAClBtG,OAAO;MACP4E,QAAQ,EAAE,IAAI;MACdtE,MAAM,EAAE,QAAQ;MAChBC,KAAK,EAAEH;KACR,CAAC,CAAC;IATI,KAAAJ,OAAO,GAAPA,OAAO;IAUhB,IAAI,CAAClB,cAAc,CAAC8E,MAAM,CAAC,GAAG9E,cAAc,CAAC8E,MAAM;EACrD;EAEA,IAAI2C,MAAMA,CAAA;IACR,OAAO,IAAI,CAAC7C,MAAM,CAAC6C,MAAM;EAC3B;EAEA,IAAI7D,QAAQA,CAAA;IACV,OAAOxD,MAAM,CAACsH,GAAG,CAAC,iBAAiB,CAAC;EACtC;EAEAxF,QAAQA,CAAA;IACN,OAAO,kBAAkB,IAAI,CAACuF,MAAM,GAAG;EACzC;EAEAE,MAAMA,CAAA;IACJ,OAAO;MACLjE,IAAI,EAAE,gBAAgB;MACtB+D,MAAM,EAAE,IAAI,CAACA,MAAM;MACnBnF,OAAO,EAAE,IAAI,CAACA;KACf;EACH;;AAGF;AACA,OAAO,MAAMsF,mBAAmB,gBAAGpH,KAAK,CAACqF,OAAO,CAAC/F,MAAM,CAACA,MAAM,EAAEkB,kBAAkB,CAAC"}

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@effect/platform-browser",
-  "version": "0.29.6",
+  "version": "0.29.7",
   "description": "Unified interfaces for common platform-specific services",
   "license": "MIT",
   "repository": {
@@ -8,6 +8,9 @@
     "url": "https://github.com/effect-ts/effect.git"
   },
   "sideEffects": [],
+  "dependencies": {
+    "multipasta": "^0.1.21"
+  },
   "peerDependencies": {
     "@effect/platform": "^0.44.6",
     "effect": "^2.3.4"
@@ -22,6 +25,11 @@
       "import": "./dist/esm/index.js",
       "default": "./dist/cjs/index.js"
     },
+    "./BrowserHttpClient": {
+      "types": "./dist/dts/BrowserHttpClient.d.ts",
+      "import": "./dist/esm/BrowserHttpClient.js",
+      "default": "./dist/cjs/BrowserHttpClient.js"
+    },
     "./BrowserKeyValueStore": {
       "types": "./dist/dts/BrowserKeyValueStore.d.ts",
       "import": "./dist/esm/BrowserKeyValueStore.js",
@@ -50,6 +58,9 @@
   },
   "typesVersions": {
     "*": {
+      "BrowserHttpClient": [
+        "./dist/dts/BrowserHttpClient.d.ts"
+      ],
       "BrowserKeyValueStore": [
         "./dist/dts/BrowserKeyValueStore.d.ts"
       ],

package/src/BrowserHttpClient.ts

@@ -0,0 +1,25 @@
+/**
+ * @since 1.0.0
+ */
+import type * as Client from "@effect/platform/Http/Client"
+import type * as FiberRef from "effect/FiberRef"
+import type * as Layer from "effect/Layer"
+import * as internal from "./internal/http/client.js"
+
+/**
+ * @since 1.0.0
+ * @category clients
+ */
+export const xmlHttpRequest: Client.Client.Default = internal.makeXMLHttpRequest
+
+/**
+ * @since 1.0.0
+ * @category layers
+ */
+export const layerXMLHttpRequest: Layer.Layer<Client.Client.Default, never, never> = internal.layerXMLHttpRequest
+
+/**
+ * @since 1.0.0
+ * @category fiber refs
+ */
+export const currentXMLHttpRequest: FiberRef.FiberRef<typeof XMLHttpRequest> = internal.currentXMLHttpRequest

package/src/index.ts

@@ -1,3 +1,8 @@
+/**
+ * @since 1.0.0
+ */
+export * as BrowserHttpClient from "./BrowserHttpClient.js"
+
 /**
  * @since 1.0.0
  */

package/src/internal/http/client.ts

@@ -0,0 +1,240 @@
+import * as Client from "@effect/platform/Http/Client"
+import * as Error from "@effect/platform/Http/ClientError"
+import type * as ClientRequest from "@effect/platform/Http/ClientRequest"
+import * as ClientResponse from "@effect/platform/Http/ClientResponse"
+import * as Headers from "@effect/platform/Http/Headers"
+import * as IncomingMessage from "@effect/platform/Http/IncomingMessage"
+import * as UrlParams from "@effect/platform/Http/UrlParams"
+import * as Effect from "effect/Effect"
+import * as Either from "effect/Either"
+import * as FiberRef from "effect/FiberRef"
+import { globalValue } from "effect/GlobalValue"
+import * as Layer from "effect/Layer"
+import * as Option from "effect/Option"
+import * as Stream from "effect/Stream"
+import * as HeaderParser from "multipasta/HeadersParser"
+
+/** @internal */
+export const currentXMLHttpRequest = globalValue(
+  "@effect/platform-browser/BrowserHttpClient/currentXMLHttpRequest",
+  () => FiberRef.unsafeMake(globalThis.XMLHttpRequest)
+)
+
+/** @internal */
+export const makeXMLHttpRequest = Client.makeDefault((request) =>
+  UrlParams.makeUrl(request.url, request.urlParams, (_) =>
+    Error.RequestError({
+      request,
+      reason: "InvalidUrl",
+      error: _
+    })).pipe(
+      Effect.zip(FiberRef.get(currentXMLHttpRequest)),
+      Effect.flatMap(([url, XHR]) => {
+        const xhr = new XHR()
+        xhr.open(request.method, url.toString(), true)
+        xhr.responseType = "text"
+        Object.entries(request.headers).forEach(([k, v]) => {
+          xhr.setRequestHeader(k, v)
+        })
+        return sendBody(xhr, request).pipe(
+          Effect.zipLeft(Effect.async<void>((resume) => {
+            const onChange = () => {
+              if (xhr.readyState >= 2) {
+                resume(Effect.unit)
+              }
+            }
+            xhr.onreadystatechange = onChange
+            onChange()
+          })),
+          Effect.as(new ClientResponseImpl(request, xhr)),
+          Effect.onInterrupt(() => Effect.sync(() => xhr.abort()))
+        )
+      })
+    )
+)
+
+const sendBody = (xhr: XMLHttpRequest, request: ClientRequest.ClientRequest): Effect.Effect<void, Error.RequestError> =>
+  Effect.suspend(() => {
+    const body = request.body
+    switch (body._tag) {
+      case "Empty":
+        return Effect.sync(() => xhr.send())
+      case "Raw":
+        return Effect.sync(() => xhr.send(body.body as any))
+      case "Uint8Array":
+        return Effect.sync(() => xhr.send(body.body))
+      case "FormData":
+        return Effect.sync(() => xhr.send(body.formData))
+      case "Stream":
+        return Effect.matchEffect(
+          Stream.runFold(body.stream, new Uint8Array(0), (acc, chunk) => {
+            const next = new Uint8Array(acc.length + chunk.length)
+            next.set(acc, 0)
+            next.set(chunk, acc.length)
+            return next
+          }),
+          {
+            onFailure: (error) =>
+              Effect.fail(Error.RequestError({
+                request,
+                reason: "Encode",
+                error
+              })),
+            onSuccess: (body) => Effect.sync(() => xhr.send(body))
+          }
+        )
+    }
+  })
+
+const encoder = new TextEncoder()
+
+/** @internal */
+export class IncomingMessageImpl<E> implements IncomingMessage.IncomingMessage<E> {
+  readonly [IncomingMessage.TypeId]: IncomingMessage.TypeId
+
+  constructor(
+    readonly source: XMLHttpRequest,
+    readonly onError: (error: unknown) => E
+  ) {
+    this[IncomingMessage.TypeId] = IncomingMessage.TypeId
+  }
+
+  _headers: Headers.Headers | undefined
+  get headers() {
+    if (this._headers) {
+      return this._headers
+    }
+    const headers = this.source.getAllResponseHeaders()
+    if (headers === "") {
+      return Headers.empty
+    }
+    const parser = HeaderParser.make()
+    const result = parser(encoder.encode(headers + "\r\n"), 0)
+    const parsed = result._tag === "Headers" ? Headers.fromInput(result.headers) : Headers.empty
+    return this._headers = parsed
+  }
+
+  get remoteAddress() {
+    return Option.none()
+  }
+
+  _textEffect: Effect.Effect<string, E> | undefined
+  get text(): Effect.Effect<string, E> {
+    if (this._textEffect) {
+      return this._textEffect
+    }
+    return this._textEffect = Effect.async<string, E>((resume) => {
+      if (this.source.readyState === 4) {
+        resume(Effect.succeed(this.source.response))
+        return
+      }
+
+      const onReadyStateChange = () => {
+        if (this.source.readyState === 4) {
+          resume(Effect.succeed(this.source.response))
+        }
+      }
+      const onError = (event: any) => {
+        resume(Effect.fail(this.onError(event)))
+      }
+      this.source.addEventListener("readystatechange", onReadyStateChange)
+      this.source.addEventListener("error", onError)
+      return Effect.sync(() => {
+        this.source.removeEventListener("readystatechange", onReadyStateChange)
+        this.source.removeEventListener("error", onError)
+      })
+    }).pipe(
+      Effect.cached,
+      Effect.runSync
+    )
+  }
+
+  get json(): Effect.Effect<unknown, E> {
+    return Effect.tryMap(this.text, {
+      try: (_) => _ === "" ? null : JSON.parse(_) as unknown,
+      catch: this.onError
+    })
+  }
+
+  get urlParamsBody(): Effect.Effect<UrlParams.UrlParams, E> {
+    return Effect.flatMap(this.text, (_) =>
+      Effect.try({
+        try: () => UrlParams.fromInput(new URLSearchParams(_)),
+        catch: this.onError
+      }))
+  }
+
+  get stream(): Stream.Stream<Uint8Array, E> {
+    return Stream.asyncInterrupt<Uint8Array, E>((emit) => {
+      let bytes = 0
+      const onReadyStateChange = () => {
+        if (this.source.readyState === 3) {
+          emit.single(encoder.encode(this.source.responseText.slice(bytes)))
+          bytes = this.source.responseText.length
+        } else if (this.source.readyState === 4) {
+          if (bytes < this.source.responseText.length) {
+            emit.single(encoder.encode(this.source.responseText.slice(bytes)))
+          }
+          emit.end()
+        }
+      }
+      const onError = (event: any) => {
+        emit.fail(this.onError(event))
+      }
+      this.source.addEventListener("readystatechange", onReadyStateChange)
+      this.source.addEventListener("error", onError)
+      onReadyStateChange()
+      return Either.left(Effect.sync(() => {
+        this.source.removeEventListener("readystatechange", onReadyStateChange)
+        this.source.removeEventListener("error", onError)
+      }))
+    })
+  }
+
+  get arrayBuffer(): Effect.Effect<ArrayBuffer, E> {
+    return this.text.pipe(
+      Effect.map((_) => encoder.encode(_).buffer)
+    )
+  }
+}
+
+class ClientResponseImpl extends IncomingMessageImpl<Error.ResponseError> implements ClientResponse.ClientResponse {
+  readonly [ClientResponse.TypeId]: ClientResponse.TypeId
+
+  constructor(
+    readonly request: ClientRequest.ClientRequest,
+    source: XMLHttpRequest
+  ) {
+    super(source, (_) =>
+      Error.ResponseError({
+        request,
+        response: this,
+        reason: "Decode",
+        error: _
+      }))
+    this[ClientResponse.TypeId] = ClientResponse.TypeId
+  }
+
+  get status() {
+    return this.source.status
+  }
+
+  get formData(): Effect.Effect<FormData, Error.ResponseError> {
+    return Effect.die("Not implemented")
+  }
+
+  toString(): string {
+    return `ClientResponse(${this.status})`
+  }
+
+  toJSON(): unknown {
+    return {
+      _tag: "ClientResponse",
+      status: this.status,
+      headers: this.headers
+    }
+  }
+}
+
+/** @internal */
+export const layerXMLHttpRequest = Layer.succeed(Client.Client, makeXMLHttpRequest)