dfx 0.0.1 → 0.0.4

package/DiscordREST/types.js

@@ -0,0 +1,6 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+const tslib_1 = require("tslib");
+const tracing_1 = tslib_1.__importStar(require("@effect-ts/core/Tracing"));
+const fileName_1 = "DiscordREST/types.ts";
+//# sourceMappingURL=types.js.map

package/DiscordREST/types.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"types.js","sourceRoot":"","sources":["types.ts"],"names":[],"mappings":""}

package/DiscordShard/commands.js

@@ -0,0 +1,38 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.presenceUpdate = exports.voiceStateUpdate = exports.requestGuildMembers = exports.resume = exports.identify = exports.heartbeat = void 0;
+const tslib_1 = require("tslib");
+const tracing_1 = tslib_1.__importStar(require("@effect-ts/core/Tracing"));
+const fileName_1 = "DiscordShard/commands.ts";
+const types_1 = require("../types");
+const heartbeat = (d) => ({
+    op: types_1.GatewayOpcode.HEARTBEAT,
+    d,
+});
+exports.heartbeat = heartbeat;
+const identify = (d) => ({
+    op: types_1.GatewayOpcode.IDENTIFY,
+    d,
+});
+exports.identify = identify;
+const resume = (d) => ({
+    op: types_1.GatewayOpcode.RESUME,
+    d,
+});
+exports.resume = resume;
+const requestGuildMembers = (d) => ({
+    op: types_1.GatewayOpcode.REQUEST_GUILD_MEMBERS,
+    d,
+});
+exports.requestGuildMembers = requestGuildMembers;
+const voiceStateUpdate = (d) => ({
+    op: types_1.GatewayOpcode.VOICE_STATE_UPDATE,
+    d,
+});
+exports.voiceStateUpdate = voiceStateUpdate;
+const presenceUpdate = (d) => ({
+    op: types_1.GatewayOpcode.PRESENCE_UPDATE,
+    d,
+});
+exports.presenceUpdate = presenceUpdate;
+//# sourceMappingURL=commands.js.map

package/DiscordShard/commands.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"commands.js","sourceRoot":"","sources":["commands.ts"],"names":[],"mappings":";;;;;;AAAA,oCASiB;AAEV,MAAM,SAAS,GAAG,CAAC,CAAY,EAAkB,EAAE,CAAC,CAAC;IAC1D,EAAE,EAAE,qBAAa,CAAC,SAAS;IAC3B,CAAC;CACF,CAAC,CAAA;AAHW,QAAA,SAAS,aAGpB;AAEK,MAAM,QAAQ,GAAG,CAAC,CAAW,EAAkB,EAAE,CAAC,CAAC;IACxD,EAAE,EAAE,qBAAa,CAAC,QAAQ;IAC1B,CAAC;CACF,CAAC,CAAA;AAHW,QAAA,QAAQ,YAGnB;AAEK,MAAM,MAAM,GAAG,CAAC,CAAS,EAAkB,EAAE,CAAC,CAAC;IACpD,EAAE,EAAE,qBAAa,CAAC,MAAM;IACxB,CAAC;CACF,CAAC,CAAA;AAHW,QAAA,MAAM,UAGjB;AAEK,MAAM,mBAAmB,GAAG,CAAC,CAAqB,EAAkB,EAAE,CAAC,CAAC;IAC7E,EAAE,EAAE,qBAAa,CAAC,qBAAqB;IACvC,CAAC;CACF,CAAC,CAAA;AAHW,QAAA,mBAAmB,uBAG9B;AAEK,MAAM,gBAAgB,GAAG,CAAC,CAAmB,EAAkB,EAAE,CAAC,CAAC;IACxE,EAAE,EAAE,qBAAa,CAAC,kBAAkB;IACpC,CAAC;CACF,CAAC,CAAA;AAHW,QAAA,gBAAgB,oBAG3B;AAEK,MAAM,cAAc,GAAG,CAAC,CAAiB,EAAkB,EAAE,CAAC,CAAC;IACpE,EAAE,EAAE,qBAAa,CAAC,eAAe;IACjC,CAAC;CACF,CAAC,CAAA;AAHW,QAAA,cAAc,kBAGzB"}

package/DiscordShard/commands.ts

@@ -0,0 +1,40 @@
+import {
+  GatewayOpcode,
+  GatewayPayload,
+  Heartbeat,
+  Identify,
+  RequestGuildMember,
+  Resume,
+  UpdatePresence,
+  UpdateVoiceState,
+} from "../types"
+
+export const heartbeat = (d: Heartbeat): GatewayPayload => ({
+  op: GatewayOpcode.HEARTBEAT,
+  d,
+})
+
+export const identify = (d: Identify): GatewayPayload => ({
+  op: GatewayOpcode.IDENTIFY,
+  d,
+})
+
+export const resume = (d: Resume): GatewayPayload => ({
+  op: GatewayOpcode.RESUME,
+  d,
+})
+
+export const requestGuildMembers = (d: RequestGuildMember): GatewayPayload => ({
+  op: GatewayOpcode.REQUEST_GUILD_MEMBERS,
+  d,
+})
+
+export const voiceStateUpdate = (d: UpdateVoiceState): GatewayPayload => ({
+  op: GatewayOpcode.VOICE_STATE_UPDATE,
+  d,
+})
+
+export const presenceUpdate = (d: UpdatePresence): GatewayPayload => ({
+  op: GatewayOpcode.PRESENCE_UPDATE,
+  d,
+})

package/DiscordShard/heartbeats.js

@@ -0,0 +1,33 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.fromHub = void 0;
+const tslib_1 = require("tslib");
+const tracing_1 = tslib_1.__importStar(require("@effect-ts/core/Tracing"));
+const fileName_1 = "DiscordShard/heartbeats.ts";
+const T = tslib_1.__importStar(require("@effect-ts/core/Effect"));
+const S = tslib_1.__importStar(require("@effect-ts/core/Effect/Experimental/Stream"));
+const R = tslib_1.__importStar(require("@effect-ts/core/Effect/Ref"));
+const Function_1 = require("@effect-ts/core/Function");
+const O = tslib_1.__importStar(require("@effect-ts/core/Option"));
+const types_1 = require("../types");
+const WS_1 = require("../WS");
+const Commands = tslib_1.__importStar(require("./commands"));
+const Utils = tslib_1.__importStar(require("./utils"));
+const send = (ref, seqRef) => (T.tap_(T.map_(R.get(seqRef), (o) => Commands.heartbeat(O.toNullable(o)), fileName_1 + ":16:10"), () => R.set_(ref, false), fileName_1 + ":17:10"));
+const maybeSend = (ref, seqRef) => (T.chain_(R.get(ref), (acked) => acked ? send(ref, seqRef) : T.succeed(WS_1.Reconnect, fileName_1 + ":25:46"), fileName_1 + ":23:12"));
+const fromHub = (hub, seqRef) => (S.unwrap(T.map_(R.makeRef(true), (ackedRef) => {
+    const heartbeats = (
+    // Map to gateway message depending on ack state
+    S.mapEffect_(S.chainParSwitch_(
+    // Reset ack state for each hello
+    S.tap_(Utils.opCode(hub)(types_1.GatewayOpcode.HELLO), () => R.set_(ackedRef, true)), (p) => {
+        const initial = p.d.heartbeat_interval * Math.random();
+        return S.merge_(
+        // First random heartbeat
+        S.fromEffect(T.sleep(initial, fileName_1 + ":47:33")), (S.chain_(S.fromEffect(T.sleep(initial, fileName_1 + ":50:35")), () => S.repeatEffect(T.sleep(p.d.heartbeat_interval, fileName_1 + ":51:51")))));
+    }, 1), () => maybeSend(ackedRef, seqRef)));
+    const acks = (S.drain(S.tap_(Utils.opCode(hub)(types_1.GatewayOpcode.HEARTBEAT_ACK), () => R.set_(ackedRef, true))));
+    return S.merge_(heartbeats, acks);
+}, fileName_1 + ":36:10")));
+exports.fromHub = fromHub;
+//# sourceMappingURL=heartbeats.js.map

package/DiscordShard/heartbeats.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"heartbeats.js","sourceRoot":"","sources":["heartbeats.ts"],"names":[],"mappings":";;;;;;AAAA,kEAA2C;AAC3C,sFAA+D;AAE/D,sEAA+C;AAC/C,uDAA+C;AAC/C,kEAA2C;AAE3C,oCAAoE;AACpE,8BAAiC;AACjC,6DAAsC;AACtC,uDAAgC;AAEhC,MAAM,IAAI,GAAG,CAAC,GAAmB,EAAE,MAA+B,EAAE,EAAE,EAIlE,CAAC,MADD,CAAC,MADD,CAAC,CAAC,GAAG,CAAC,MAAM,CAAC,EACP,CAAC,CAAC,EAAE,EAAE,CAAC,QAAQ,CAAC,SAAS,CAAC,CAAC,CAAC,UAAU,CAAC,CAAC,CAAC,CAAC,0BAC1C,GAAG,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC,GAAG,EAAE,KAAK,CAAC,yBAC/B,CAAA;AAEH,MAAM,SAAS,GAAG,CAAC,GAAmB,EAAE,MAA+B,EAAE,EAAE,EAGvE,CAAC,QADD,CAAC,CAAC,GAAG,CAAC,GAAG,CAAC,EAER,CAAC,KAAK,EAAsB,EAAE,CAC5B,KAAK,CAAC,CAAC,CAAC,IAAI,CAAC,GAAG,EAAE,MAAM,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,OAAO,CAAC,cAAS,wBAAC,yBAErD,CAAA;AAEI,MAAM,OAAO,GAAG,CACrB,GAA0B,EAC1B,MAA+B,EAC/B,EAAE,EAqCA,CAAC,CAAC,MAAM,CAjCR,CAAC,MAFD,CAAC,CAAC,OAAO,CAAC,IAAI,CAAC,EAET,CAAC,QAAQ,EAAE,EAAE;IACjB,MAAM,UAAU;IAmBd,gDAAgD;IAChD,CAAC,YAdD,CAAC;IAHD,iCAAiC;IACjC,CAAC,MAHD,KAAK,CAAC,MAAM,CAAC,GAAG,CAAC,CAAa,qBAAa,CAAC,KAAK,CAAC,EAG5C,GAAG,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC,QAAQ,EAAE,IAAI,CAAC,GAEjB,CAAC,CAAC,EAAE,EAAE;QACrB,MAAM,OAAO,GAAG,CAAC,CAAC,CAAE,CAAC,kBAAkB,GAAG,IAAI,CAAC,MAAM,EAAE,CAAA;QACvD,OAAO,CAAC,CAAC,MAAM;QACb,yBAAyB;QACzB,CAAC,CAAC,UAAU,CAAC,CAAC,CAAC,KAAK,CAAC,OAAO,wBAAC,CAAC,GAI5B,CAAC,QADD,CAAC,CAAC,UAAU,CAAC,CAAC,CAAC,KAAK,CAAC,OAAO,wBAAC,CAAC,EACtB,GAAG,EAAE,CAAC,CAAC,CAAC,YAAY,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,CAAE,CAAC,kBAAkB,wBAAC,CAAC,GAEjE,CAAA;IACH,CAAC,EAAE,CAAC,GAGQ,GAAG,EAAE,CAAC,SAAS,CAAC,QAAQ,EAAE,MAAM,CAAC,EAC9C,CAAA;IAED,MAAM,IAAI,IAGR,CAAC,CAAC,KAAK,CADP,CAAC,MADD,KAAK,CAAC,MAAM,CAAC,GAAG,CAAC,CAAC,qBAAa,CAAC,aAAa,CAAC,EACxC,GAAG,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC,QAAQ,EAAE,IAAI,CAAC,GAEnC,CAAA;IAED,OAAO,CAAC,CAAC,MAAM,CAAC,UAAU,EAAE,IAAI,CAAC,CAAA;AACnC,CAAC,0BAGF,CAAA;AAzCU,QAAA,OAAO,WAyCjB"}

package/DiscordShard/heartbeats.ts

@@ -0,0 +1,70 @@
+import * as T from "@effect-ts/core/Effect"
+import * as S from "@effect-ts/core/Effect/Experimental/Stream"
+import * as H from "@effect-ts/core/Effect/Hub"
+import * as R from "@effect-ts/core/Effect/Ref"
+import { pipe } from "@effect-ts/core/Function"
+import * as O from "@effect-ts/core/Option"
+import * as DWS from "../DiscordWS"
+import { GatewayOpcode, GatewayPayload, HelloEvent } from "../types"
+import { Reconnect } from "../WS"
+import * as Commands from "./commands"
+import * as Utils from "./utils"
+
+const send = (ref: R.Ref<boolean>, seqRef: R.Ref<O.Option<number>>) =>
+  pipe(
+    R.get(seqRef),
+    T.map((o) => Commands.heartbeat(O.toNullable(o))),
+    T.tap(() => R.set_(ref, false))
+  )
+
+const maybeSend = (ref: R.Ref<boolean>, seqRef: R.Ref<O.Option<number>>) =>
+  pipe(
+    R.get(ref),
+    T.chain(
+      (acked): T.UIO<DWS.Message> =>
+        acked ? send(ref, seqRef) : T.succeed(Reconnect)
+    )
+  )
+
+export const fromHub = (
+  hub: H.Hub<GatewayPayload>,
+  seqRef: R.Ref<O.Option<number>>
+) =>
+  pipe(
+    R.makeRef(true),
+
+    T.map((ackedRef) => {
+      const heartbeats = pipe(
+        Utils.opCode(hub)<HelloEvent>(GatewayOpcode.HELLO),
+
+        // Reset ack state for each hello
+        S.tap(() => R.set_(ackedRef, true)),
+
+        S.chainParSwitch((p) => {
+          const initial = p.d!.heartbeat_interval * Math.random()
+          return S.merge_(
+            // First random heartbeat
+            S.fromEffect(T.sleep(initial)),
+            // Repeated heartbeat
+            pipe(
+              S.fromEffect(T.sleep(initial)),
+              S.chain(() => S.repeatEffect(T.sleep(p.d!.heartbeat_interval)))
+            )
+          )
+        }, 1),
+
+        // Map to gateway message depending on ack state
+        S.mapEffect(() => maybeSend(ackedRef, seqRef))
+      )
+
+      const acks = pipe(
+        Utils.opCode(hub)(GatewayOpcode.HEARTBEAT_ACK),
+        S.tap(() => R.set_(ackedRef, true)),
+        S.drain
+      )
+
+      return S.merge_(heartbeats, acks)
+    }),
+
+    S.unwrap
+  )

package/DiscordShard/identify.js

@@ -0,0 +1,35 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.fromHub = void 0;
+const tslib_1 = require("tslib");
+const tracing_1 = tslib_1.__importStar(require("@effect-ts/core/Tracing"));
+const fileName_1 = "DiscordShard/identify.ts";
+const T = tslib_1.__importStar(require("@effect-ts/core/Effect"));
+const S = tslib_1.__importStar(require("@effect-ts/core/Effect/Experimental/Stream"));
+const R = tslib_1.__importStar(require("@effect-ts/core/Effect/Ref"));
+const Function_1 = require("@effect-ts/core/Function");
+const O = tslib_1.__importStar(require("@effect-ts/core/Option"));
+const OS = tslib_1.__importStar(require("os"));
+const types_1 = require("../types");
+const Commands = tslib_1.__importStar(require("./commands"));
+const Utils = tslib_1.__importStar(require("./utils"));
+const identify = ({ token, intents, shard, presence }) => Commands.identify({
+    token,
+    intents,
+    properties: {
+        $os: OS.platform(),
+        $browser: "dfx",
+        $device: "dfx",
+    },
+    shard,
+    presence,
+});
+const resume = (token, ready, seq) => Commands.resume({
+    token,
+    session_id: ready.session_id,
+    seq,
+});
+const identifyOrResume = (opts, ready, seq) => (T.map_(T.zip_(R.get(ready), R.get(seq), fileName_1 + ":57:10"), ({ tuple }) => (O.fold_(O.zip_(...tuple), () => identify(opts), ({ tuple }) => resume(opts.token, ...tuple))), fileName_1 + ":58:10"));
+const fromHub = (hub, { latestReady, latestSequence, ...opts }) => (S.mapEffect_(Utils.opCode(hub)(types_1.GatewayOpcode.HELLO), () => identifyOrResume(opts, latestReady, latestSequence)));
+exports.fromHub = fromHub;
+//# sourceMappingURL=identify.js.map

package/DiscordShard/identify.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"identify.js","sourceRoot":"","sources":["identify.ts"],"names":[],"mappings":";;;;;;AAAA,kEAA2C;AAC3C,sFAA+D;AAE/D,sEAA+C;AAC/C,uDAA+C;AAC/C,kEAA2C;AAC3C,+CAAwB;AACxB,oCAMiB;AACjB,6DAAsC;AACtC,uDAAgC;AAchC,MAAM,QAAQ,GAAG,CAAC,EAAE,KAAK,EAAE,OAAO,EAAE,KAAK,EAAE,QAAQ,EAAW,EAAE,EAAE,CAChE,QAAQ,CAAC,QAAQ,CAAC;IAChB,KAAK;IACL,OAAO;IACP,UAAU,EAAE;QACV,GAAG,EAAE,EAAE,CAAC,QAAQ,EAAE;QAClB,QAAQ,EAAE,KAAK;QACf,OAAO,EAAE,KAAK;KACf;IACD,KAAK;IACL,QAAQ;CACT,CAAC,CAAA;AAEJ,MAAM,MAAM,GAAG,CAAC,KAAa,EAAE,KAAiB,EAAE,GAAW,EAAE,EAAE,CAC/D,QAAQ,CAAC,MAAM,CAAC;IACd,KAAK;IACL,UAAU,EAAE,KAAK,CAAC,UAAU;IAC5B,GAAG;CACJ,CAAC,CAAA;AAEJ,MAAM,gBAAgB,GAAG,CACvB,IAAa,EACb,KAAkC,EAClC,GAA4B,EAC5B,EAAE,EAIA,CAAC,MADD,CAAC,MADD,CAAC,CAAC,GAAG,CAAC,KAAK,CAAC,EACN,CAAC,CAAC,GAAG,CAAC,GAAG,CAAC,0BACV,CAAC,EAAE,KAAK,EAAE,EAAE,EAAE,EAGhB,CAAC,OADD,CAAC,CAAC,IAAI,CAAC,GAAG,KAAK,CAAC,EAEd,GAAG,EAAE,CAAC,QAAQ,CAAC,IAAI,CAAC,EACpB,CAAC,EAAE,KAAK,EAAE,EAAE,EAAE,CAAC,MAAM,CAAC,IAAI,CAAC,KAAK,EAAE,GAAG,KAAK,CAAC,EAE9C,yBAEJ,CAAA;AAEI,MAAM,OAAO,GAAG,CACrB,GAA0B,EAC1B,EAAE,WAAW,EAAE,cAAc,EAAE,GAAG,IAAI,EAA0B,EAChE,EAAE,EAGA,CAAC,YADD,KAAK,CAAC,MAAM,CAAC,GAAG,CAAC,CAAa,qBAAa,CAAC,KAAK,CAAC,EACtC,GAAG,EAAE,CAAC,gBAAgB,CAAC,IAAI,EAAE,WAAW,EAAE,cAAc,CAAC,EACtE,CAAA;AAPU,QAAA,OAAO,WAOjB"}

package/DiscordShard/identify.ts

@@ -0,0 +1,76 @@
+import * as T from "@effect-ts/core/Effect"
+import * as S from "@effect-ts/core/Effect/Experimental/Stream"
+import * as H from "@effect-ts/core/Effect/Hub"
+import * as R from "@effect-ts/core/Effect/Ref"
+import { pipe } from "@effect-ts/core/Function"
+import * as O from "@effect-ts/core/Option"
+import * as OS from "os"
+import {
+  GatewayOpcode,
+  GatewayPayload,
+  HelloEvent,
+  ReadyEvent,
+  UpdatePresence,
+} from "../types"
+import * as Commands from "./commands"
+import * as Utils from "./utils"
+
+export interface Options {
+  token: string
+  intents: number
+  shard: [number, number]
+  presence?: UpdatePresence
+}
+
+export interface Requirements {
+  latestReady: R.Ref<O.Option<ReadyEvent>>
+  latestSequence: R.Ref<O.Option<number>>
+}
+
+const identify = ({ token, intents, shard, presence }: Options) =>
+  Commands.identify({
+    token,
+    intents,
+    properties: {
+      $os: OS.platform(),
+      $browser: "dfx",
+      $device: "dfx",
+    },
+    shard,
+    presence,
+  })
+
+const resume = (token: string, ready: ReadyEvent, seq: number) =>
+  Commands.resume({
+    token,
+    session_id: ready.session_id,
+    seq,
+  })
+
+const identifyOrResume = (
+  opts: Options,
+  ready: R.Ref<O.Option<ReadyEvent>>,
+  seq: R.Ref<O.Option<number>>
+) =>
+  pipe(
+    R.get(ready),
+    T.zip(R.get(seq)),
+    T.map(({ tuple }) =>
+      pipe(
+        O.zip_(...tuple),
+        O.fold(
+          () => identify(opts),
+          ({ tuple }) => resume(opts.token, ...tuple)
+        )
+      )
+    )
+  )
+
+export const fromHub = (
+  hub: H.Hub<GatewayPayload>,
+  { latestReady, latestSequence, ...opts }: Options & Requirements
+) =>
+  pipe(
+    Utils.opCode(hub)<HelloEvent>(GatewayOpcode.HELLO),
+    S.mapEffect(() => identifyOrResume(opts, latestReady, latestSequence))
+  )

package/DiscordShard/index.js

@@ -0,0 +1,60 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.make = exports.LiveDiscordShard = exports.DiscordShard = void 0;
+const tslib_1 = require("tslib");
+const tracing_1 = tslib_1.__importStar(require("@effect-ts/core/Tracing"));
+const fileName_1 = "DiscordShard/index.ts";
+const T = tslib_1.__importStar(require("@effect-ts/core/Effect"));
+const L = tslib_1.__importStar(require("@effect-ts/core/Effect/Layer"));
+const S = tslib_1.__importStar(require("@effect-ts/core/Effect/Experimental/Stream"));
+const H = tslib_1.__importStar(require("@effect-ts/core/Effect/Hub"));
+const M = tslib_1.__importStar(require("@effect-ts/core/Effect/Managed"));
+const Q = tslib_1.__importStar(require("@effect-ts/core/Effect/Queue"));
+const Function_1 = require("@effect-ts/core/Function");
+const Has_1 = require("@effect-ts/core/Has");
+const O = tslib_1.__importStar(require("@effect-ts/core/Option"));
+const DWS = tslib_1.__importStar(require("../DiscordWS"));
+const types_1 = require("../types");
+const WS_1 = require("../WS");
+const Heartbeats = tslib_1.__importStar(require("./heartbeats"));
+const Identify = tslib_1.__importStar(require("./identify"));
+const Invalid = tslib_1.__importStar(require("./invalidSession"));
+const Utils = tslib_1.__importStar(require("./utils"));
+const makeImpl = (opts) => M.gen(function* (_) {
+    const outbound = yield* _(Q.makeUnbounded(), fileName_1 + ":27:30");
+    const [latestReady, updateLatestReady] = yield* _(Utils.latest((0, Function_1.flow)(O.fromPredicate((p) => p.op === types_1.GatewayOpcode.DISPATCH && p.t === "READY"), O.map((p) => p.d))), fileName_1 + ":29:54");
+    const [latestSequence, updateLatestSequence] = yield* _(Utils.latest((p) => O.fromNullable(p.s)), fileName_1 + ":40:60");
+    const hub = yield* _(H.makeUnbounded(), fileName_1 + ":44:25");
+    const publishToHub = (S.forEach_(updateLatestReady(updateLatestSequence(S.unwrap(DWS.open({
+        outgoing: S.fromQueue_(outbound),
+    })))), (p) => H.publish_(hub, p)));
+    const dispatch = (H.filterOutput_(hub, (p) => p.op === types_1.GatewayOpcode.DISPATCH));
+    const fromDispatch = Utils.fromDispatch(dispatch);
+    // heartbeats
+    const heartbeatEffects = (S.forEach_(Heartbeats.fromHub(hub, latestSequence), (p) => Q.offer_(outbound, p)));
+    // identify
+    const identifyEffects = (S.forEach_(Identify.fromHub(hub, {
+        ...opts,
+        latestSequence,
+        latestReady,
+    }), (p) => Q.offer_(outbound, p)));
+    // invalid session
+    const invalidEffects = (S.forEach_(Invalid.fromHub(hub, latestReady), (p) => Q.offer_(outbound, p)));
+    return {
+        run: (T.ignore(T.zipPar(invalidEffects, fileName_1 + ":88:17")(T.zipPar(identifyEffects, fileName_1 + ":87:17")(T.zipPar(heartbeatEffects, fileName_1 + ":86:17")(publishToHub))), fileName_1 + ":89:17")),
+        raw: hub,
+        dispatch,
+        fromDispatch,
+        send: (p) => Q.offer_(outbound, p),
+        reconnect: () => Q.offer_(outbound, WS_1.Reconnect),
+    };
+});
+const makeService = () => ({
+    _tag: "DiscordShardService",
+    make: makeImpl,
+});
+exports.DiscordShard = (0, Has_1.tag)();
+exports.LiveDiscordShard = L.fromValue(exports.DiscordShard)(makeService());
+const make = (opts) => M.accessServiceM(exports.DiscordShard)(({ make }) => make(opts));
+exports.make = make;
+//# sourceMappingURL=index.js.map

package/DiscordShard/index.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"index.js","sourceRoot":"","sources":["index.ts"],"names":[],"mappings":";;;;;;AAAA,kEAA2C;AAC3C,wEAAiD;AACjD,sFAA+D;AAE/D,sEAA+C;AAC/C,0EAAmD;AACnD,wEAAiD;AACjD,uDAAqD;AACrD,6CAAyC;AACzC,kEAA2C;AAE3C,0DAAmC;AACnC,oCAKiB;AACjB,8BAAiC;AACjC,iEAA0C;AAC1C,6DAAsC;AACtC,kEAA2C;AAC3C,uDAAgC;AAEhC,MAAM,QAAQ,GAAG,CAAC,IAAsB,EAAE,EAAE,CAC1C,CAAC,CAAC,GAAG,CAAC,QAAQ,CAAC,EAAE,CAAC;IAChB,MAAM,QAAQ,GAAG,KAAK,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,aAAa,EAAe,wBAAC,CAAA;IAEzD,MAAM,CAAC,WAAW,EAAE,iBAAiB,CAAC,GAAG,KAAK,CAAC,CAAC,CAAC,CAC/C,KAAK,CAAC,MAAM,CACV,IAAA,eAAI,EACF,CAAC,CAAC,aAAa,CACb,CAAC,CAAC,EAAmC,EAAE,CACrC,CAAC,CAAC,EAAE,KAAK,qBAAa,CAAC,QAAQ,IAAI,CAAC,CAAC,CAAC,KAAK,OAAO,CACrD,EACD,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,CAAE,CAAC,CACnB,CACF,wBACF,CAAA;IACD,MAAM,CAAC,cAAc,EAAE,oBAAoB,CAAC,GAAG,KAAK,CAAC,CAAC,CAAC,CACrD,KAAK,CAAC,MAAM,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,YAAY,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,wBACzC,CAAA;IAED,MAAM,GAAG,GAAG,KAAK,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,aAAa,EAAkB,wBAAC,CAAA;IACvD,MAAM,YAAY,IAOhB,CAAC,UADD,iBAAiB,CADjB,oBAAoB,CADpB,CAAC,CAAC,MAAM,CAHR,GAAG,CAAC,IAAI,CAAC;QACP,QAAQ,EAAE,CAAC,CAAC,UAAU,CAAC,QAAQ,CAAC;KACjC,CAAC,KAIQ,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,QAAQ,CAAC,GAAG,EAAE,CAAC,CAAC,EACpC,CAAA;IAED,MAAM,QAAQ,IAEZ,CAAC,eADD,GAAG,EACY,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,EAAE,KAAK,qBAAa,CAAC,QAAQ,EACtD,CAAA;IACD,MAAM,YAAY,GAAG,KAAK,CAAC,YAAY,CAAC,QAAQ,CAAC,CAAA;IAEjD,aAAa;IACb,MAAM,gBAAgB,IAEpB,CAAC,UADD,UAAU,CAAC,OAAO,CAAC,GAAG,EAAE,cAAc,CAAC,EAC7B,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,MAAM,CAAC,QAAQ,EAAE,CAAC,CAAC,EACvC,CAAA;IAED,WAAW;IACX,MAAM,eAAe,IAMnB,CAAC,UALD,QAAQ,CAAC,OAAO,CAAC,GAAG,EAAE;QACpB,GAAG,IAAI;QACP,cAAc;QACd,WAAW;KACZ,CAAC,EACQ,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,MAAM,CAAC,QAAQ,EAAE,CAAC,CAAC,EACvC,CAAA;IAED,kBAAkB;IAClB,MAAM,cAAc,IAElB,CAAC,UADD,OAAO,CAAC,OAAO,CAAC,GAAG,EAAE,WAAW,CAAC,EACvB,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,MAAM,CAAC,QAAQ,EAAE,CAAC,CAAC,EACvC,CAAA;IAED,OAAO;QACL,GAAG,GAKD,CAAC,CAAC,MAAM,CADR,CAAC,CAAC,MAAM,CAAC,cAAc,wBAAC,CADxB,CAAC,CAAC,MAAM,CAAC,eAAe,wBAAC,CADzB,CAAC,CAAC,MAAM,CAAC,gBAAgB,wBAAC,CAD1B,YAAY,4BAKb;QACD,GAAG,EAAE,GAAG;QACR,QAAQ;QACR,YAAY;QACZ,IAAI,EAAE,CAAC,CAAiB,EAAE,EAAE,CAAC,CAAC,CAAC,MAAM,CAAC,QAAQ,EAAE,CAAC,CAAC;QAClD,SAAS,EAAE,GAAG,EAAE,CAAC,CAAC,CAAC,MAAM,CAAC,QAAQ,EAAE,cAAS,CAAC;KACtC,CAAA;AACZ,CAAC,CAAC,CAAA;AAEJ,MAAM,WAAW,GAAG,GAAG,EAAE,CACvB,CAAC;IACC,IAAI,EAAE,qBAAqB;IAC3B,IAAI,EAAE,QAAQ;CACL,CAAA,CAAA;AAGA,QAAA,YAAY,GAAG,IAAA,SAAG,GAAgB,CAAA;AAClC,QAAA,gBAAgB,GAAG,CAAC,CAAC,SAAS,CAAC,oBAAY,CAAC,CAAC,WAAW,EAAE,CAAC,CAAA;AAEjE,MAAM,IAAI,GAAG,CAAC,IAAsB,EAAE,EAAE,CAC7C,CAAC,CAAC,cAAc,CAAC,oBAAY,CAAC,CAAC,CAAC,EAAE,IAAI,EAAE,EAAE,EAAE,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC,CAAA;AAD7C,QAAA,IAAI,QACyC"}

package/DiscordShard/index.ts

@@ -0,0 +1,110 @@
+import * as T from "@effect-ts/core/Effect"
+import * as L from "@effect-ts/core/Effect/Layer"
+import * as S from "@effect-ts/core/Effect/Experimental/Stream"
+import * as SK from "@effect-ts/core/Effect/Experimental/Stream/Sink"
+import * as H from "@effect-ts/core/Effect/Hub"
+import * as M from "@effect-ts/core/Effect/Managed"
+import * as Q from "@effect-ts/core/Effect/Queue"
+import { flow, pipe } from "@effect-ts/core/Function"
+import { tag } from "@effect-ts/core/Has"
+import * as O from "@effect-ts/core/Option"
+import { _A } from "@effect-ts/core/Utils"
+import * as DWS from "../DiscordWS"
+import {
+  GatewayEvent,
+  GatewayOpcode,
+  GatewayPayload,
+  ReadyEvent,
+} from "../types"
+import { Reconnect } from "../WS"
+import * as Heartbeats from "./heartbeats"
+import * as Identify from "./identify"
+import * as Invalid from "./invalidSession"
+import * as Utils from "./utils"
+
+const makeImpl = (opts: Identify.Options) =>
+  M.gen(function* (_) {
+    const outbound = yield* _(Q.makeUnbounded<DWS.Message>())
+
+    const [latestReady, updateLatestReady] = yield* _(
+      Utils.latest(
+        flow(
+          O.fromPredicate(
+            (p): p is GatewayPayload<ReadyEvent> =>
+              p.op === GatewayOpcode.DISPATCH && p.t === "READY"
+          ),
+          O.map((p) => p.d!)
+        )
+      )
+    )
+    const [latestSequence, updateLatestSequence] = yield* _(
+      Utils.latest((p) => O.fromNullable(p.s))
+    )
+
+    const hub = yield* _(H.makeUnbounded<GatewayPayload>())
+    const publishToHub = pipe(
+      DWS.open({
+        outgoing: S.fromQueue_(outbound),
+      }),
+      S.unwrap,
+      updateLatestSequence,
+      updateLatestReady,
+      S.forEach((p) => H.publish_(hub, p))
+    )
+
+    const dispatch: H.Hub<GatewayPayload<GatewayEvent>> = pipe(
+      hub,
+      H.filterOutput((p) => p.op === GatewayOpcode.DISPATCH)
+    )
+    const fromDispatch = Utils.fromDispatch(dispatch)
+
+    // heartbeats
+    const heartbeatEffects = pipe(
+      Heartbeats.fromHub(hub, latestSequence),
+      S.forEach((p) => Q.offer_(outbound, p))
+    )
+
+    // identify
+    const identifyEffects = pipe(
+      Identify.fromHub(hub, {
+        ...opts,
+        latestSequence,
+        latestReady,
+      }),
+      S.forEach((p) => Q.offer_(outbound, p))
+    )
+
+    // invalid session
+    const invalidEffects = pipe(
+      Invalid.fromHub(hub, latestReady),
+      S.forEach((p) => Q.offer_(outbound, p))
+    )
+
+    return {
+      run: pipe(
+        publishToHub,
+        T.zipPar(heartbeatEffects),
+        T.zipPar(identifyEffects),
+        T.zipPar(invalidEffects),
+        T.ignore
+      ),
+      raw: hub,
+      dispatch,
+      fromDispatch,
+      send: (p: GatewayPayload) => Q.offer_(outbound, p),
+      reconnect: () => Q.offer_(outbound, Reconnect),
+    } as const
+  })
+
+const makeService = () =>
+  ({
+    _tag: "DiscordShardService",
+    make: makeImpl,
+  } as const)
+
+export interface DiscordShard extends ReturnType<typeof makeService> {}
+export const DiscordShard = tag<DiscordShard>()
+export const LiveDiscordShard = L.fromValue(DiscordShard)(makeService())
+
+export const make = (opts: Identify.Options) =>
+  M.accessServiceM(DiscordShard)(({ make }) => make(opts))

package/DiscordShard/invalidSession.js

@@ -0,0 +1,17 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.fromHub = void 0;
+const tslib_1 = require("tslib");
+const tracing_1 = tslib_1.__importStar(require("@effect-ts/core/Tracing"));
+const fileName_1 = "DiscordShard/invalidSession.ts";
+const T = tslib_1.__importStar(require("@effect-ts/core/Effect"));
+const S = tslib_1.__importStar(require("@effect-ts/core/Effect/Experimental/Stream"));
+const R = tslib_1.__importStar(require("@effect-ts/core/Effect/Ref"));
+const Function_1 = require("@effect-ts/core/Function");
+const O = tslib_1.__importStar(require("@effect-ts/core/Option"));
+const types_1 = require("../types");
+const WS_1 = require("../WS");
+const Utils = tslib_1.__importStar(require("./utils"));
+const fromHub = (hub, latestReady) => (S.map_(S.tap_(Utils.opCode(hub)(types_1.GatewayOpcode.INVALID_SESSION), (p) => (p.d ? T.unit : R.set_(latestReady, O.none))), () => WS_1.Reconnect));
+exports.fromHub = fromHub;
+//# sourceMappingURL=invalidSession.js.map

package/DiscordShard/invalidSession.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"invalidSession.js","sourceRoot":"","sources":["invalidSession.ts"],"names":[],"mappings":";;;;;;AAAA,kEAA2C;AAC3C,sFAA+D;AAE/D,sEAA+C;AAC/C,uDAA+C;AAC/C,kEAA2C;AAE3C,oCAKiB;AACjB,8BAAiC;AACjC,uDAAgC;AAEzB,MAAM,OAAO,GAAG,CACrB,GAA0B,EAC1B,WAAwC,EACxC,EAAE,EAIA,CAAC,MADD,CAAC,MADD,KAAK,CAAC,MAAM,CAAC,GAAG,CAAC,CAAsB,qBAAa,CAAC,eAAe,CAAC,EAC/D,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,WAAW,EAAE,CAAC,CAAC,IAAI,CAAC,CAAC,GACnD,GAAY,EAAE,CAAC,cAAS,EAC/B,CAAA;AARU,QAAA,OAAO,WAQjB"}

package/DiscordShard/invalidSession.ts

@@ -0,0 +1,25 @@
+import * as T from "@effect-ts/core/Effect"
+import * as S from "@effect-ts/core/Effect/Experimental/Stream"
+import * as H from "@effect-ts/core/Effect/Hub"
+import * as R from "@effect-ts/core/Effect/Ref"
+import { pipe } from "@effect-ts/core/Function"
+import * as O from "@effect-ts/core/Option"
+import { Message } from "../DiscordWS"
+import {
+  GatewayOpcode,
+  GatewayPayload,
+  InvalidSessionEvent,
+  ReadyEvent,
+} from "../types"
+import { Reconnect } from "../WS"
+import * as Utils from "./utils"
+
+export const fromHub = (
+  hub: H.Hub<GatewayPayload>,
+  latestReady: R.Ref<O.Option<ReadyEvent>>
+) =>
+  pipe(
+    Utils.opCode(hub)<InvalidSessionEvent>(GatewayOpcode.INVALID_SESSION),
+    S.tap((p) => (p.d ? T.unit : R.set_(latestReady, O.none))),
+    S.map((): Message => Reconnect)
+  )

package/DiscordShard/utils.js

@@ -0,0 +1,24 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.fromDispatch = exports.latest = exports.opCode = void 0;
+const tslib_1 = require("tslib");
+const tracing_1 = tslib_1.__importStar(require("@effect-ts/core/Tracing"));
+const fileName_1 = "DiscordShard/utils.ts";
+const T = tslib_1.__importStar(require("@effect-ts/core/Effect"));
+const S = tslib_1.__importStar(require("@effect-ts/core/Effect/Experimental/Stream"));
+const R = tslib_1.__importStar(require("@effect-ts/core/Effect/Ref"));
+const Function_1 = require("@effect-ts/core/Function");
+const O = tslib_1.__importStar(require("@effect-ts/core/Option"));
+const opCode = (hub) => (code) => (S.filter_(S.fromHub_(hub), (p) => p.op === code));
+exports.opCode = opCode;
+const latest = (f) => T.gen(function* (_) {
+    const ref = yield* _(R.makeRef(O.none), fileName_1 + ":24:25");
+    return [
+        ref,
+        S.tap((0, Function_1.flow)(f, O.fold(() => T.unit, (a) => R.set_(ref, O.some(a))))),
+    ];
+}, fileName_1 + ":23:8");
+exports.latest = latest;
+const fromDispatch = (hub) => (event) => (S.map_(S.filter_(S.fromHub_(hub), (p) => p.t === event), (p) => p.d));
+exports.fromDispatch = fromDispatch;
+//# sourceMappingURL=utils.js.map

package/DiscordShard/utils.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"utils.js","sourceRoot":"","sources":["utils.ts"],"names":[],"mappings":";;;;;;AAAA,kEAA2C;AAC3C,sFAA+D;AAE/D,sEAA+C;AAC/C,uDAAqD;AACrD,kEAA2C;AAQpC,MAAM,MAAM,GACjB,CAAC,GAA0B,EAAE,EAAE,CAC/B,CAAU,IAAmB,EAA4B,EAAE,EAGvD,CAAC,SADD,CAAC,CAAC,QAAQ,CAAC,GAAG,CAAC,EACN,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,EAAE,KAAK,IAAI,EAC9B,CAAA;AANQ,QAAA,MAAM,UAMd;AAEE,MAAM,MAAM,GAAG,CAAI,CAAqC,EAAE,EAAE,CACjE,CAAC,CAAC,GAAG,CAAC,QAAQ,CAAC,EAAE,CAAC;IAChB,MAAM,GAAG,GAAG,KAAK,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,OAAO,CAAc,CAAC,CAAC,IAAI,CAAC,wBAAC,CAAA;IAEpD,OAAO;QACL,GAAG;QACH,CAAC,CAAC,GAAG,CACH,IAAA,eAAI,EACF,CAAC,EACD,CAAC,CAAC,IAAI,CACJ,GAAG,EAAE,CAAC,CAAC,CAAC,IAAI,EACZ,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC,GAAG,EAAE,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAC9B,CACF,CACF;KACO,CAAA;AACZ,CAAC,uBAAC,CAAA;AAhBS,QAAA,MAAM,UAgBf;AAEG,MAAM,YAAY,GACvB,CAAC,GAAwC,EAAE,EAAE,CAC7C,CAAgC,KAAQ,EAAE,EAAE,EAIxC,CAAC,MADD,CAAC,SADD,CAAC,CAAC,QAAQ,CAAC,GAAG,CAAC,EACN,CAAC,CAAC,EAAyC,EAAE,CAAC,CAAC,CAAC,CAAC,KAAK,KAAK,GAC9D,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,CAAqB,EACrC,CAAA;AAPQ,QAAA,YAAY,gBAOpB"}

package/DiscordShard/utils.ts

@@ -0,0 +1,47 @@
+import * as T from "@effect-ts/core/Effect"
+import * as S from "@effect-ts/core/Effect/Experimental/Stream"
+import * as H from "@effect-ts/core/Effect/Hub"
+import * as R from "@effect-ts/core/Effect/Ref"
+import { flow, pipe } from "@effect-ts/core/Function"
+import * as O from "@effect-ts/core/Option"
+import {
+  GatewayEvent,
+  GatewayEvents,
+  GatewayOpcode,
+  GatewayPayload,
+} from "../types"
+
+export const opCode =
+  (hub: H.Hub<GatewayPayload>) =>
+  <T = any>(code: GatewayOpcode): S.UIO<GatewayPayload<T>> =>
+    pipe(
+      S.fromHub_(hub),
+      S.filter((p) => p.op === code)
+    )
+
+export const latest = <T>(f: (p: GatewayPayload) => O.Option<T>) =>
+  T.gen(function* (_) {
+    const ref = yield* _(R.makeRef<O.Option<T>>(O.none))
+
+    return [
+      ref,
+      S.tap(
+        flow(
+          f,
+          O.fold(
+            () => T.unit,
+            (a) => R.set_(ref, O.some(a))
+          )
+        )
+      ),
+    ] as const
+  })
+
+export const fromDispatch =
+  (hub: H.Hub<GatewayPayload<GatewayEvent>>) =>
+  <K extends keyof GatewayEvents>(event: K) =>
+    pipe(
+      S.fromHub_(hub),
+      S.filter((p): p is GatewayPayload<GatewayEvents[K]> => p.t === event),
+      S.map((p) => p.d as GatewayEvents[K])
+    )