@effect-agent/storage-cloudflare 0.1.0-beta.39 → 0.1.0-beta.40

package/dist/index.d.mts

@@ -4,12 +4,7 @@ import { Context, Crypto, Effect, Layer, Schema } from "effect";
 import { SqliteMigrator } from "@effect/sql-sqlite-do";
 import * as SqlClientService from "effect/unstable/sql/SqlClient";
 //#region src/migrations.d.ts
-/**
- * The exact-or-fresh storage version recorded in `effect_agent_meta`. Cloudflare is a fresh
- * platform, so there is exactly ONE migration carrying the complete current schema — no
- * v1→v4 history to replay (deployment spec §9: no rolling data-version promise during
- * private development).
- */
+/** The current storage version recorded in `effect_agent_meta`. */
 declare const CurrentDoStorageVersion = 2;
 //#endregion
 //#region src/do-storage-config.d.ts

package/dist/index.mjs

@@ -146,18 +146,11 @@ var DoStorageFailpointError = class extends Schema.TaggedError()("DoStorageFailp
 };
 //#endregion
 //#region src/migrations.ts
-/**
-* The exact-or-fresh storage version recorded in `effect_agent_meta`. Cloudflare is a fresh
-* platform, so there is exactly ONE migration carrying the complete current schema — no
-* v1→v4 history to replay (deployment spec §9: no rolling data-version promise during
-* private development).
-*/
+/** The current storage version recorded in `effect_agent_meta`. */
 const CurrentDoStorageVersion = 2;
 /**
-* The Thread Durable Object schema. Table names and columns mirror the Node/SQLite v4
-* schema byte-for-byte (`packages/storage-sqlite/src/migrations.ts`, migrations 1–4 collapsed
-* into their final shape) so the shared conformance suites and crash-matrix rows address
-* identical durable state. Two DC-specific additions:
+* The Thread Durable Object schema shares its thread and ledger tables with Node/SQLite.
+* Schedules and subscriptions use separate Durable Objects. Two DC-specific additions:
 *
 * 1. `effect_agent_meta` replaces `PRAGMA user_version` as the exact-or-fresh version gate —
 *    a meta table is portable regardless of which PRAGMAs Durable Object SQL storage allows.
@@ -393,8 +386,6 @@ const BoundedStoredText$1 = Schema.String.check(Schema.isMaxLength(2e6));
 const BoundedIdentifier$1 = Schema.NonEmptyString.check(Schema.isMaxLength(1024));
 const MAX_RECORDS_PER_THREAD = 65536;
 const MAX_IDENTIFIER_LENGTH$1 = 1024;
-/** Durable Object SQL storage allows at most 100 bound parameters per statement. */
-const MAX_BOUND_PARAMETERS = 100;
 const isSqlError = Schema.is(SqlError);
 const storedTextBytes = (value) => new TextEncoder().encode(value).byteLength;
 const chunked = (values, size) => {
@@ -730,7 +721,7 @@ const makeJournal = (sql, failpoint, maxStoredValueBytes) => {
 				message: `Thread record limit ${MAX_RECORDS_PER_THREAD} would be exceeded.`
 			});
 			const existingRecords = [];
-			for (const chunk of chunked(recordIds, MAX_BOUND_PARAMETERS - 10)) {
+			for (const chunk of chunked(recordIds, 90)) {
 				const existingRecordRows = yield* sql`
             SELECT
               thread_id,
@@ -1083,7 +1074,7 @@ var DoStorageConfigValue = class extends Schema.Class("@effect-agent/storage-clo
 var DoStorageConfig = class extends Context.Service()("@effect-agent/storage-cloudflare/DoStorageConfig") {};
 //#endregion
 //#region src/do-thread-store.ts
-const OffsetText = Schema.String.check(Schema.isMaxLength(4 * 1024));
+const OffsetText = Schema.String.check(Schema.isMaxLength(4096));
 const DO_OFFSET_PREFIX = "effect-agent-do@1:";
 const ZERO_CANONICAL_SEQUENCE = Schema.decodeSync(CanonicalSequence)(0);
 const isDigest = Schema.is(Digest);
@@ -2385,7 +2376,8 @@ const makeServices$1 = Effect.fn("DoSubmissionLedger.makeServices")(function* ()
 				submissionId: validated.submissionId,
 				existingOutcome: reservation.value.outcome
 			});
-			const settlementFailure = settlementFailureFromRecord(yield* decodeRecordEnvelopeText(reservation.value.record_json).pipe(Effect.mapError((error) => corruptionFailure(operation, "effect_agent_settlement_reservations", validated.submissionId, error.message))));
+			const reservationRecord = yield* decodeRecordEnvelopeText(reservation.value.record_json).pipe(Effect.mapError((error) => corruptionFailure(operation, "effect_agent_settlement_reservations", validated.submissionId, error.message)));
+			const settlementFailure = settlementFailureFromRecord(reservationRecord);
 			if (reservation.value.outcome === "failed" !== (settlementFailure !== void 0)) return yield* corruptionFailure(operation, "effect_agent_settlement_reservations", validated.submissionId, "The reserved outcome and canonical failure diagnostic disagree.");
 			const submission = yield* requireSubmission(operation, validated.submissionId);
 			if (submission.state === "settled") {
@@ -4042,7 +4034,8 @@ const makeSubscriptionStore = Effect.fn("SqliteSubscriptionStore.make")(function
 				return false;
 			}
 			yield* failpoint.hit("subscription:catch-up:before");
-			if (!subscriptionCanSelect(record, accepted, Math.max(nowMillis, yield* Clock.currentTimeMillis), true)) return yield* error("conflict", "catch-up-eligibility");
+			const effectiveNowMillis = Math.max(nowMillis, yield* Clock.currentTimeMillis);
+			if (!subscriptionCanSelect(record, accepted, effectiveNowMillis, true)) return yield* error("conflict", "catch-up-eligibility");
 			if ((yield* count(sql`SELECT COUNT(*) AS count FROM effect_agent_subscription_deliveries WHERE tenant_id=${partition.tenantId} AND source_address=${partition.address}`, "count deliveries")) >= limits.maxDeliveries) return yield* error("capacity", "deliveries");
 			if ((yield* count(sql`SELECT COUNT(*) AS count FROM effect_agent_subscription_deliveries WHERE tenant_id=${partition.tenantId} AND source_address=${partition.address} AND owner_id=${record.key.ownerId}`, "count owner deliveries")) >= limits.maxDeliveriesPerOwner) return yield* error("capacity", "owner-deliveries");
 			yield* insertDelivery(delivery);
@@ -4276,7 +4269,7 @@ const doSubscriptionStoreLayer = (partition) => Layer.effectContext(makeSubscrip
 const MAX_PORT_DIAGNOSTIC_LENGTH = 4096;
 const BoundedDiagnostic = Schema.String.check(Schema.isMaxLength(MAX_PORT_DIAGNOSTIC_LENGTH));
 /** Truncate a diagnostic string to the protocol's bounded diagnostic length. */
-const boundPortDiagnostic = (value) => value.length > 4096 ? `${value.slice(0, MAX_PORT_DIAGNOSTIC_LENGTH - 3)}...` : value;
+const boundPortDiagnostic = (value) => value.length > 4096 ? `${value.slice(0, 4093)}...` : value;
 /**
 * The envelope itself could not be honored: the receiving Object could not decode the
 * request, or a response could not be encoded/decoded. It never carries port semantics —
@@ -4484,7 +4477,8 @@ const crossThreadStoreError = (operation, target) => ThreadStoreError.make({
 });
 const makeTransportCall = (transport) => Effect.fn("DoPortRouting.transportCall")(function* (target, call) {
 	const encoded = yield* encodePortRequest(call).pipe(Effect.mapError((error) => PortProtocolError.make({ message: boundPortDiagnostic(`The port request could not be encoded: ${error.message}`) })));
-	return yield* decodePortResponse(yield* transport.call(target, encoded)).pipe(Effect.mapError((error) => PortProtocolError.make({ message: boundPortDiagnostic(`The port response could not be decoded: ${error.message}`) })));
+	const raw = yield* transport.call(target, encoded);
+	return yield* decodePortResponse(raw).pipe(Effect.mapError((error) => PortProtocolError.make({ message: boundPortDiagnostic(`The port response could not be decoded: ${error.message}`) })));
 });
 const makeRoutedLedgerServices = Effect.fn("DoPortRouting.makeRoutedLedgerServices")(function* (options) {
 	const local = yield* SubmissionLedger;
@@ -4757,7 +4751,8 @@ const encodedProtocolFailure = (message) => ({
 * transport never has to interpret exceptions as protocol answers.
 */
 const handleEncodedPortRequest = Effect.fn("DoPortRouting.handleEncodedPortRequest")(function* (encoded) {
-	return yield* encodePortResponse(yield* decodePortRequest(encoded).pipe(Effect.flatMap(executePortRequest), Effect.catch((error) => Effect.succeed(PortFailed.make({ failure: PortProtocolError.make({ message: boundPortDiagnostic(`The port request could not be decoded: ${error.message}`) }) }))))).pipe(Effect.catch((error) => Effect.succeed(encodedProtocolFailure(`The port response could not be encoded: ${error.message}`))));
+	const response = yield* decodePortRequest(encoded).pipe(Effect.flatMap(executePortRequest), Effect.catch((error) => Effect.succeed(PortFailed.make({ failure: PortProtocolError.make({ message: boundPortDiagnostic(`The port request could not be decoded: ${error.message}`) }) }))));
+	return yield* encodePortResponse(response).pipe(Effect.catch((error) => Effect.succeed(encodedProtocolFailure(`The port response could not be encoded: ${error.message}`))));
 });
 //#endregion
 export { CurrentDoStorageVersion, DEFAULT_MAX_STORED_VALUE_BYTES, DoAppendConflict, DoCheckpointConflict, DoFenceRejected, DoLedgerError, DoScheduleAlarmControl, DoScheduleTransaction, DoStorageCompatibilityError, DoStorageConfig, DoStorageConfigValue, DoStorageCorruptionError, DoStorageError, DoStorageFailpoint, DoStorageFailpointError, DoStorageFailpointLocation, DoSubscriptionAlarmControl, DoSubscriptionTransaction, DoValueBoundExceeded, LedgerAdmitCall, LedgerAdmitResult, LedgerLookupCall, LedgerLookupResult, LedgerMarkReadyCall, LedgerMarkReadyResult, LedgerRecordChildSettledCall, LedgerRecordChildSettledResult, LedgerRequestAbortCall, LedgerRequestAbortResult, LedgerResolveAdmissionCall, LedgerResolveAdmissionResult, MAX_PORT_DIAGNOSTIC_LENGTH, PortFailed, PortFailure, PortProtocolError, PortRequest, PortResponse, PortResult, PortSucceeded, PortTransportError, StoreAppendCall, StoreAppendResult, StoreExportCall, StoreExportResult, StoreInspectTailCall, StoreInspectTailResult, StoreMaterializeCall, StoreMaterializeResult, StoreReadPageCall, StoreReadPageResult, ThreadPortTransport, boundPortDiagnostic, decodePortRequest, decodePortResponse, doSubscriptionStoreLayer, encodePortRequest, encodePortResponse, executePortRequest, handleEncodedPortRequest, layer, ledgerLayer, observationOffsetAt, portTransportFailure, routedSubmissionLedgerLayer, routedThreadStoreLayer, scheduleStoreLayer, storageConfigLayer, storageFailpointLayer, submissionLedgerLayer, threadStoreLayer };