@effect-agent/storage-cloudflare 0.1.0-beta.48 → 0.1.0-beta.50

package/dist/DoSubmissionLedger.mjs

@@ -8,7 +8,7 @@ import { Clock, Context, Crypto, DateTime, Effect, Layer, Option, Schema, Stream
 import * as SqlClientService from "effect/unstable/sql/SqlClient";
 import { ApprovalDecision, CanonicalSequence, DefinitionDigests, Digest, PersistedJson, ProducerEpoch, RecordEnvelope, SettlementOutcome } from "@effect-agent/thread/Records";
 import { EMPTY_TAIL_DIGEST } from "@effect-agent/thread/Digest";
-import { AbortCommand, AbortIntent, AdmissionAdmitted, AdmissionConflict, AdmissionNotAdmitted, AdmissionRequest, AdmissionResult, ApprovalConflict, ApprovalDecisionCommand, ApprovalDecisionIntent, AttachChildToReservationRequest, BeginChildBudgetReleaseRequest, ChildAttachmentSnapshot, ChildBudgetReservationRequest, ChildBudgetReservationSnapshot, ChildReservationConflict, ChildReservationStatus, ChildSettledNotification, Claim, ClaimJoiningRequest, ClaimRequest, InputAppliedMarker, JoinSnapshot, JoinedToHost, JoiningClaim, LedgerCapabilities, LedgerError, MarkInputAppliedRequest, MarkJoinedRequest, MarkReadyRequest, MarkUnknownRequest, OwnershipLost, OwnershipRenewal, OwnershipSnapshot, ParentLinkage, QueueSequence, RecoverySnapshot, RecoverySnapshotRequest, ReleaseChildBudgetRequest, ReleaseOwnershipRequest, RenewOwnershipRequest, ReservedChildBudget, ReservedSettlement, RevertJoiningRequest, Settlement, SettlementConflict, SettlementFinalization, SettlementReservation, SettlementReservationSnapshot, SubmissionLedger, SubmissionLookup, SubmissionLookupByKey, SubmissionSnapshot, SubmissionState, SuspendRequest, SuspensionReason, SuspensionSnapshot, UnknownResolution, UnknownResolutionCommand, UnknownResolutionConflict, UnknownResolutionIntent, settlementFailureFromRecord, submissionAbortRecordId } from "@effect-agent/thread/SubmissionLedger";
+import { AbortCommand, AbortIntent, AbortIntentRequest, AdmissionAdmitted, AdmissionConflict, AdmissionNotAdmitted, AdmissionRequest, AdmissionResult, ApprovalConflict, ApprovalDecisionCommand, ApprovalDecisionIntent, AttachChildToReservationRequest, BeginChildBudgetReleaseRequest, ChildAttachmentSnapshot, ChildBudgetReservationRequest, ChildBudgetReservationSnapshot, ChildReservationConflict, ChildReservationStatus, ChildSettledNotification, Claim, ClaimJoiningRequest, ClaimRequest, InputAppliedMarker, JoinSnapshot, JoinedToHost, JoiningClaim, LedgerCapabilities, LedgerError, MarkInputAppliedRequest, MarkJoinedRequest, MarkReadyRequest, MarkUnknownRequest, OwnershipLost, OwnershipRenewal, OwnershipSnapshot, ParentLinkage, QueueSequence, RecoverySnapshot, RecoverySnapshotRequest, ReleaseChildBudgetRequest, ReleaseOwnershipRequest, RenewOwnershipRequest, ReservedChildBudget, ReservedSettlement, RevertJoiningRequest, Settlement, SettlementConflict, SettlementFinalization, SettlementReservation, SettlementReservationSnapshot, SubmissionLedger, SubmissionLookup, SubmissionLookupByKey, SubmissionSnapshot, SubmissionState, SuspendRequest, SuspensionReason, SuspensionSnapshot, UnknownResolution, UnknownResolutionCommand, UnknownResolutionConflict, UnknownResolutionIntent, settlementFailureFromRecord, submissionAbortRecordId } from "@effect-agent/thread/SubmissionLedger";
 import { BrowserCrypto } from "@effect/platform-browser";
 //#region src/DoSubmissionLedger.ts
 var DoSubmissionLedger_exports = /* @__PURE__ */ __exportAll({
@@ -117,6 +117,14 @@ var AbortIntentRow = class extends Schema.Class("AbortIntentRow")({
 	canonical_record_id: Schema.NullOr(BoundedIdentifier)
 }) {};
 var MaxQueueSequenceRow = class extends Schema.Class("MaxQueueSequenceRow")({ max_queue_sequence: Schema.Int.check(Schema.isGreaterThanOrEqualTo(0)) }) {};
+var AbortIntentLookupRow = class extends Schema.Class("AbortIntentLookupRow")({
+	submission_id: BoundedIdentifier,
+	abort_submission_id: Schema.NullOr(BoundedIdentifier),
+	author: Schema.NullOr(BoundedIdentifier),
+	reason: Schema.NullOr(BoundedStoredText),
+	requested_at: Schema.NullOr(BoundedTimestamp),
+	canonical_record_id: Schema.NullOr(BoundedIdentifier)
+}) {};
 var CanonicalRecordIdRow = class extends Schema.Class("CanonicalRecordIdRow")({ record_id: BoundedIdentifier }) {};
 const SUBMISSION_COLUMNS = `
   submission_id,
@@ -1555,6 +1563,42 @@ const makeServices = Effect.fn("DoSubmissionLedger.makeServices")(function* () {
 		})];
 	});
 	const scanNonterminal = Stream.paginate(void 0, scanPage);
+	const readAbortIntentForSubmission = Effect.fn("DoSubmissionLedger.readAbortIntentForSubmission")(function* (request) {
+		const operation = "ledger read abort intent";
+		const validated = yield* Schema.decodeUnknownEffect(Schema.toType(AbortIntentRequest))(request).pipe(Effect.mapError(internalFailure(operation)));
+		const recordId = submissionAbortRecordId(validated.submissionId);
+		const rows = yield* sql`
+      SELECT
+        submission.submission_id,
+        abort.submission_id AS abort_submission_id,
+        abort.author,
+        abort.reason,
+        abort.requested_at,
+        canonical.record_id AS canonical_record_id
+      FROM effect_agent_submissions AS submission
+      LEFT JOIN effect_agent_abort_intents AS abort
+        ON abort.submission_id = submission.submission_id
+      LEFT JOIN effect_agent_canonical_records AS canonical
+        ON canonical.thread_id = submission.thread_id
+          AND canonical.record_id = ${recordId}
+      WHERE submission.submission_id = ${validated.submissionId}
+    `.pipe(Effect.mapError(sqlFailure(operation)));
+		const decoded = yield* decodeRows(Schema.Array(AbortIntentLookupRow), "effect_agent_abort_intents", validated.submissionId, rows).pipe(Effect.mapError(internalFailure(operation)));
+		if (decoded.length === 0) return yield* LedgerError.make({
+			operation,
+			message: `Unknown submission ${validated.submissionId}.`
+		});
+		if (decoded.length !== 1) return yield* corruptionFailure(operation, "effect_agent_abort_intents", validated.submissionId, "An abort intent lookup returned more than one row.");
+		const row = decoded[0];
+		if (row.abort_submission_id === null) return void 0;
+		return yield* decodeAbortIntent({
+			submissionId: row.abort_submission_id,
+			author: row.author,
+			reason: row.reason,
+			requestedAt: row.requested_at,
+			...row.canonical_record_id === null ? {} : { canonicalRecordId: row.canonical_record_id }
+		}).pipe(Effect.mapError((error) => corruptionFailure(operation, "effect_agent_abort_intents", validated.submissionId, error.message)));
+	});
 	const loadRecoverySnapshot = Effect.fn("DoSubmissionLedger.loadRecoverySnapshot")(function* (request) {
 		const operation = "ledger load recovery snapshot";
 		const validated = yield* Schema.decodeUnknownEffect(Schema.toType(RecoverySnapshotRequest))(request).pipe(Effect.mapError(internalFailure(operation)));
@@ -1696,7 +1740,8 @@ const makeServices = Effect.fn("DoSubmissionLedger.makeServices")(function* () {
 		beginChildBudgetRelease,
 		releaseChildBudget,
 		scanNonterminal,
-		loadRecoverySnapshot
+		loadRecoverySnapshot,
+		readAbortIntent: readAbortIntentForSubmission
 	}));
 });
 /**