@voltro/plugin-economy 0.0.0-stage → 0.88.0

package/dist/iapSpendAdmission.server.js

@@ -0,0 +1,98 @@
+import { EconomyError as e, economyError as t } from "./errors.js";
+import { dataObject as n, identifier as r } from "./capture.js";
+import { shopInteger as i } from "./shop.js";
+import { captureIapOrderReceipt as a } from "./iap.js";
+import { iapOrdersTable as o } from "./iapTables.entity.js";
+import { Effect as s } from "effect";
+import { and as c, eq as l } from "@voltro/database";
+import { prepareSqlMutation as u } from "@voltro/database/sql";
+// src/iapSpendAdmission.server.ts
+var d = (e, t) => BigInt(e.units) * 10n ** BigInt(t - e.scale), f = (e) => new Intl.NumberFormat("en", {
+	style: "currency",
+	currency: e
+}).resolvedOptions().maximumFractionDigits ?? 2, p = (e) => {
+	let t = new Date(e);
+	return [Date.UTC(t.getUTCFullYear(), t.getUTCMonth(), 1), Date.UTC(t.getUTCFullYear(), t.getUTCMonth() + 1, 1)];
+}, m = (m, h) => {
+	let g = n(h, [
+		"namespace",
+		"monthlyLimits",
+		"eligible",
+		"maxOrdersPerMonth"
+	]), _ = r(g.namespace), v = i(g.maxOrdersPerMonth ?? 1e3, 1, 1e5);
+	if (typeof g.eligible != "function") throw t("invalid_input");
+	let y = g.eligible, b = n(g.monthlyLimits, Object.keys(g.monthlyLimits)), x = /* @__PURE__ */ new Map();
+	for (let [e, r] of Object.entries(b)) {
+		if (!/^[A-Z]{3}$/.test(e)) throw t("invalid_input");
+		let a = n(r, ["units", "scale"]);
+		if (typeof a.units != "string" || !/^(0|[1-9]\d{0,30})$/.test(a.units)) throw t("invalid_input");
+		x.set(e, Object.freeze({
+			units: a.units,
+			scale: i(a.scale, 0, 9)
+		}));
+	}
+	if (x.size === 0) throw t("invalid_input");
+	let S = async (e, n, r, i, s) => {
+		let [u, f] = p(r), m = await e.query({
+			table: o.tableName,
+			predicate: c(l("namespace", _), l("tenantId", n.tenantId), l("ownerId", n.ownerId), l("state", "fulfilled")),
+			order: [],
+			take: v + 1,
+			skip: void 0,
+			projection: ["receipt", "fulfilledAt"]
+		});
+		if (m.length > v) throw t("limit_exceeded");
+		let h = 0n;
+		for (let e of m) {
+			let t = e.fulfilledAt instanceof Date ? e.fulfilledAt.getTime() : typeof e.fulfilledAt == "string" ? Date.parse(e.fulfilledAt) : NaN;
+			if (!(t >= u && t < f)) continue;
+			let n = a(e.receipt).pricePaid;
+			n?.currency === i && (h += d(n, Math.max(s, n.scale)) / 10n ** BigInt(Math.max(s, n.scale) - s));
+		}
+		return h;
+	}, C = async (e, t, n) => n.kind !== "subscription" || n.originalTransactionId === null ? !1 : (await e.query({
+		table: o.tableName,
+		predicate: c(l("namespace", _), l("tenantId", t.tenantId), l("ownerId", t.ownerId), l("state", "fulfilled")),
+		order: [],
+		take: v + 1,
+		skip: void 0,
+		projection: ["snapshot"]
+	})).some((e) => {
+		let t = e.snapshot;
+		return t?.facts?.originalTransactionId === n.originalTransactionId && t.facts.channel === n.channel;
+	}), w = (n) => s.fail(n instanceof e ? n : t("unavailable"));
+	return Object.freeze({
+		prepare: (e) => s.sync(() => u(m, async (n) => {
+			if (await y(n, e) !== !0) throw t("forbidden");
+			let r = e.facts.paid, i = r ? x.get(r.currency) : void 0;
+			if (!r || !i) throw t("forbidden");
+			if (await C(n, e.scope, e.facts)) return;
+			let a = Math.max(i.scale, r.scale);
+			if (await S(n, e.scope, e.at, r.currency, a) + d(r, a) > d(i, a)) throw t("limit_exceeded");
+		})).pipe(s.catchDefect(w)),
+		checkout: (n) => s.tryPromise({
+			try: async () => {
+				if (await y(m, n) !== !0) throw t("forbidden");
+				let e = n.product.offer.price, r = e.kind === "real" ? e.prices : e.kind === "mixed" ? e.real.prices : {}, i = Object.entries(r).flatMap(([e, t]) => {
+					let n = x.get(e);
+					return n ? [{
+						currency: e,
+						limit: n,
+						paid: {
+							units: String(t),
+							scale: f(e)
+						}
+					}] : [];
+				});
+				if (i.length === 0) throw t("forbidden");
+				for (let { currency: e, limit: t, paid: r } of i) {
+					let i = Math.max(t.scale, r.scale);
+					if (await S(m, n.scope, n.at, e, i) + d(r, i) <= d(t, i)) return;
+				}
+				throw t("limit_exceeded");
+			},
+			catch: (n) => n instanceof e ? n : t("unavailable")
+		})
+	});
+};
+export { m as iapSpendAdmission };