ace-assign 0.63.1 → 0.66.0

data/lib/ace/assign/molecules/journal_mutation.rb

@@ -0,0 +1,271 @@
+# frozen_string_literal: true
+
+require "json"
+require "digest"
+require "ace/herdr/molecules/bounded_process"
+require_relative "journal_prompt_mutation"
+require_relative "journal_input_inhibition"
+
+module Ace
+  module Assign
+    module Molecules
+      # Protected authority mutations share the execution ref's lock and CAS.
+      # Replies live in chained attempt events, rather than an RPC ledger.
+      module JournalMutation
+        include JournalPromptMutation
+        include JournalInputInhibition
+        ID = /\A[a-zA-Z0-9][a-zA-Z0-9_.-]{0,127}\z/
+
+        # Shared canonical projection used by admission and protected status.
+        # Callers hold the same owner exclusion when projecting current events.
+        def authority_generation(events)
+          unless Models::EvidenceEvent.chain_valid?(events)
+            raise AttemptErrors::EvidenceUnavailable, "Attempt event chain is corrupt"
+          end
+          events.count { |event| event["type"] == "authority_mutation" }
+        end
+
+        def canonical_attempt_state(events)
+          authority_generation(events)
+          derive_state(events)
+        end
+
+        # The block runs against the current ref on every CAS attempt. It
+        # returns events [{type:, payload:}], immutable blobs, and public data.
+        # Only the authority calls this internal journal API; wire requests
+        # cannot select blob paths, event types, or accepted response data.
+        def mutate(assignment_id:, attempt_id:, mutation_id:, operation:, parameters_digest:, expected_generation:, with_replay: false, generation_mode: :expected, prompt_binding: nil, prompt_completion: nil, prompt_observation: nil, input_inhibition: nil)
+          unless (generation_mode == :expected && expected_generation.is_a?(Integer) && expected_generation >= 0) ||
+              (generation_mode == :recorded_completion && %w[complete_service complete_no_effect].include?(operation) && expected_generation.nil?) ||
+              (generation_mode == :prompt_completion && operation == "prompt_attempt" && expected_generation.nil? && prompt_completion.is_a?(Hash)) ||
+              (generation_mode == :prompt_observation && operation == "prompt_observation" && expected_generation.nil? && prompt_observation.is_a?(Hash)) ||
+              (generation_mode == :input_inhibition && operation == "input_inhibition_observation" && expected_generation.nil? && input_inhibition.is_a?(Hash))
+            raise ArgumentError, "invalid fixed mutation generation mode"
+          end
+          if input_inhibition && generation_mode != :input_inhibition
+            raise ArgumentError, "Input inhibition requires its fixed mode"
+          end
+          if operation == "input_inhibition_observation" && !(generation_mode == :input_inhibition && input_inhibition)
+            raise ArgumentError, "Input inhibition observation requires its accepted original selector"
+          end
+          if mutation_id.is_a?(String) && mutation_id.start_with?("input-inhibit.") && !(operation == "input_inhibition_observation" && input_inhibition)
+            raise ArgumentError, "Reserved input inhibition namespace"
+          end
+          if prompt_completion && generation_mode != :prompt_completion
+            raise ArgumentError, "prompt completion selector requires its fixed mode"
+          end
+          if prompt_observation && generation_mode != :prompt_observation
+            raise ArgumentError, "prompt observation selector requires its fixed mode"
+          end
+          if operation == "prompt_issue"
+            validate_prompt_binding!(prompt_binding)
+            digest = Digest::SHA256.hexdigest(JSON.generate(canonical_prompt_value(prompt_binding)))
+            unless parameters_digest == digest && mutation_id == "prompt-issue.#{digest}" &&
+                assignment_id == prompt_binding.fetch("assignment_id") && attempt_id == prompt_binding.fetch("attempt_id")
+              raise ArgumentError, "prompt phase does not match source binding"
+            end
+          elsif prompt_binding
+            raise ArgumentError, "prompt binding is only accepted by its fixed issue phase"
+          end
+          [assignment_id, attempt_id, mutation_id].each { |id| validate_mutation_id!(id) }
+          unless parameters_digest.is_a?(String) && parameters_digest.match?(/\A[0-9a-f]{64}\z/)
+            raise ArgumentError, "invalid mutation parameter digest"
+          end
+          with_lock do
+            self.class::CAS_ATTEMPTS.times do
+              old = ref_value
+              ensure_checkout!
+              old = ref_value if old.nil?
+              sync_checkout(old)
+              if prompt_binding
+                verify_prompt_external_namespace!(prompt_binding.fetch("mutation_id"), parameters_digest,
+                  assignment_id: assignment_id, attempt_id: attempt_id, commit: old)
+              end
+              verify_prompt_completion!(prompt_completion, mutation_id: mutation_id, digest: parameters_digest,
+                assignment_id: assignment_id, attempt_id: attempt_id, commit: old) if prompt_completion
+              verify_prompt_observation!(prompt_observation, mutation_id: mutation_id,
+                assignment_id: assignment_id, attempt_id: attempt_id, commit: old) if prompt_observation
+              verify_input_inhibition!(input_inhibition, mutation_id: mutation_id, digest: parameters_digest,
+                assignment_id: assignment_id, attempt_id: attempt_id, commit: old) if input_inhibition
+              verify_prompt_mutation_namespace!(mutation_id: mutation_id, operation: operation, parameters_digest: parameters_digest,
+                assignment_id: assignment_id, attempt_id: attempt_id, prompt_completion: prompt_completion, prompt_observation: prompt_observation, commit: old)
+              replay = mutation_result(mutation_id, commit: old)
+              if replay
+                unless replay["operation"] == operation && replay["parameters_digest"] == parameters_digest &&
+                    replay["assignment_id"] == assignment_id && replay["attempt_id"] == attempt_id
+                  raise AttemptErrors::Conflict, "Mutation ID is already bound to different input"
+                end
+                result = replay.fetch("data").merge("journal_commit" => replay.fetch("journal_commit"))
+                return with_replay ? {data: result, replayed: true} : result
+              end
+              current = read_events(assignment_id, commit: old).select { |event| event["attempt_id"] == attempt_id }
+              generation = authority_generation(current)
+              unless %i[recorded_completion prompt_completion prompt_observation input_inhibition].include?(generation_mode) || expected_generation == generation
+                raise AttemptErrors::Conflict, "Authority registration generation changed"
+              end
+              plan = yield(current, old, generation)
+              blobs = plan.fetch(:blobs, {})
+              events = chain_mutation_events(attempt_id, current.last&.fetch("digest"), plan.fetch(:events, []))
+              updates = prepare_service_updates(plan.fetch(:service_updates, []), assignment_id: assignment_id,
+                attempt_id: attempt_id, pending: {current_events: current, pending_events: events, blobs: blobs, commit: old, operation: operation,
+                  service_inputs: service_input_context(plan)})
+              events.concat(chain_mutation_events(attempt_id, events.last&.fetch("digest") || current.last&.fetch("digest"),
+                updates.map { |prepared| prepared.fetch(:event) }))
+              data = plan.fetch(:data).merge("generation" => generation + 1)
+              receipt = Models::EvidenceEvent.build(type: "authority_mutation", attempt_id: attempt_id,
+                previous_digest: events.last&.fetch("digest") || current.last&.fetch("digest"),
+                payload: {"mutation_id" => mutation_id, "operation" => operation,
+                          "parameters_digest" => parameters_digest, "assignment_id" => assignment_id,
+                          "attempt_id" => attempt_id, "data" => data})
+              events << receipt
+              write_mutation_blobs(blobs, commit: old)
+              write_service_records(updates)
+              write_event_files(assignment_id, events)
+              git!("-C", checkout_dir, "add", "--", "execution/#{assignment_id}")
+              stage_mutation_blobs(blobs)
+              stage_service_records(updates)
+              git!("-C", checkout_dir, "-c", "user.name=ace-assign", "-c", "user.email=ace-assign@localhost",
+                "-c", "core.hooksPath=/dev/null", "commit", "-m", "evidence: authority #{operation} #{mutation_id}")
+              commit = git!("-C", checkout_dir, "rev-parse", "HEAD").first
+              if update_ref_cas(commit, old)
+                result = data.merge("journal_commit" => commit)
+                return with_replay ? {data: result, replayed: false} : result
+              end
+            end
+            raise AttemptErrors::EvidenceUnavailable, "Authority mutation ref stayed conflicting"
+          end
+        end
+
+        def mutation_result(mutation_id, commit: ref_value)
+          validate_mutation_id!(mutation_id)
+          assignment_ids(commit: commit).each do |assignment_id|
+            events = read_events(assignment_id, commit: commit)
+            events.group_by { |event| event["attempt_id"] }.each_value do |chain|
+              unless Models::EvidenceEvent.chain_valid?(chain)
+                raise AttemptErrors::EvidenceUnavailable, "Authority mutation event chain is corrupt"
+              end
+            end
+            event = events.find do |entry|
+              entry["type"] == "authority_mutation" && entry.dig("payload", "mutation_id") == mutation_id
+            end
+            next unless event
+
+            path = "execution/#{assignment_id}/events/#{event_filename(event)}"
+            acceptance_commit = git!("log", "--diff-filter=A", "-1", "--format=%H", commit, "--", path).first
+            raise AttemptErrors::EvidenceUnavailable, "Mutation acceptance commit is missing" if acceptance_commit.empty?
+            return event.fetch("payload").merge("journal_commit" => acceptance_commit)
+          end
+          nil
+        end
+
+        # Source composition supplies original body bytes only for the current
+        # service CAS callback. They are never part of persisted mutation data.
+        def service_input_context(plan)
+          inputs = plan.fetch(:service_inputs, {})
+          raise ArgumentError, "invalid ephemeral service input context" unless inputs.is_a?(Hash)
+          return {}.freeze if inputs.empty?
+          updates = plan.fetch(:service_updates, [])
+          unless inputs.size == 1 && updates.size == 1 && inputs.keys == [updates.first.fetch(:request_id)] &&
+              inputs.values.first.is_a?(String) && inputs.values.first.bytesize.between?(1, 64 * 1024)
+            raise ArgumentError, "invalid ephemeral service input context"
+          end
+          inputs.to_h { |key, bytes| [key.dup.freeze, bytes.dup.freeze] }.freeze
+        end
+        private :service_input_context
+
+        # Read immutable bytes directly from a selected canonical ref commit.
+        # Worktree projections are never consulted for protected evidence.
+        def blob(path, commit: ref_value)
+          validate_blob_path!(path)
+          raise AttemptErrors::EvidenceUnavailable, "Canonical evidence ref is missing" unless commit
+          return @read_boundary.blob(path, commit: commit, max_bytes: CanonicalEvidence::MAX_ARTIFACT_BYTES) if @read_boundary
+          out, _error, status = Open3.capture3("git", "show", "#{commit}:#{path}",
+            chdir: repo_root, stdin_data: "")
+          raise AttemptErrors::EvidenceUnavailable, "Canonical evidence blob is missing" unless status.success?
+          out.b
+        end
+
+        # Prepared inputs use the same immutable Git owner, with a bounded
+        # capture before any bytes can reach a worker transport.
+        def bounded_blob(path, commit:, max_bytes:)
+          validate_blob_path!(path)
+          unless commit.is_a?(String) && commit.match?(/\A[0-9a-f]{40}(?:[0-9a-f]{24})?\z/) &&
+              max_bytes.is_a?(Integer) && max_bytes.between?(1, 64 * 1024 * 1024)
+            raise AttemptErrors::EvidenceUnavailable, "Canonical prepared blob selector differs"
+          end
+          return @read_boundary.blob(path, commit: commit, max_bytes: max_bytes) if @read_boundary
+          environment = ENV.keys.to_h { |key| [key, nil] }
+          environment.merge!("GIT_CONFIG_NOSYSTEM" => "1", "GIT_CONFIG_GLOBAL" => "/dev/null",
+            "GIT_TERMINAL_PROMPT" => "0", "GIT_NO_REPLACE_OBJECTS" => "1", "PATH" => "/usr/bin:/bin", "LC_ALL" => "C")
+          result = Herdr::Molecules::BoundedProcess.call([environment, "/usr/bin/git", "-C", repo_root,
+            "-c", "core.hooksPath=/dev/null", "cat-file", "blob", "#{commit}:#{path}"],
+            stdin_data: "", timeout_s: 30, output_limit: max_bytes)
+          unless result.status.success? && !result.oversized
+            raise AttemptErrors::EvidenceUnavailable, "Canonical prepared blob is missing or oversized"
+          end
+          result.stdout.b
+        rescue Timeout::Error, Herdr::Molecules::BoundedProcess::PostLaunchError, SystemCallError, IOError
+          raise AttemptErrors::EvidenceUnavailable, "Canonical prepared blob read is unavailable"
+        end
+
+        private
+
+        def validate_mutation_id!(id)
+          raise ArgumentError, "invalid authority ID" unless id.is_a?(String) && id.match?(ID)
+        end
+
+        def validate_blob_path!(path)
+          unless path.is_a?(String) && path.match?(%r{\A(?:evidence/imports|execution/definitions|execution/prepared|candidates/bundles)/[a-zA-Z0-9_.-]+\z}) &&
+              !%w[. ..].include?(File.basename(path))
+            raise ArgumentError, "invalid canonical blob reference"
+          end
+        end
+
+        def chain_mutation_events(attempt_id, previous, entries)
+          entries.map do |entry|
+            recorded_at = entry.fetch(:recorded_at) { Time.now.utc }
+            raise ArgumentError, "internal event timestamp must be a UTC Time" unless recorded_at.is_a?(Time) && recorded_at.utc?
+            event = Models::EvidenceEvent.build(type: entry.fetch(:type), attempt_id: attempt_id,
+              payload: entry.fetch(:payload), previous_digest: previous, recorded_at: recorded_at)
+            previous = event.fetch("digest")
+            event
+          end
+        end
+
+        # Git clean/smudge filters and CRLF conversion cannot redefine accepted
+        # evidence bytes. Insert unfiltered objects after staging the events.
+        def stage_mutation_blobs(blobs)
+          blobs.each do |path, bytes|
+            oid, error, status = Open3.capture3("git", "hash-object", "-w", "--stdin", "--no-filters",
+              chdir: repo_root, stdin_data: bytes.b)
+            unless status.success?
+              raise AttemptErrors::EvidenceUnavailable, "Cannot write canonical evidence object: #{error.strip}"
+            end
+            git!("-C", checkout_dir, "update-index", "--add", "--cacheinfo", "100644,#{oid.strip},#{path}")
+          end
+        end
+
+        def write_mutation_blobs(blobs, commit:)
+          blobs.map do |path, bytes|
+            validate_blob_path!(path)
+            raise ArgumentError, "canonical blob must contain bytes" unless bytes.is_a?(String)
+            target = File.join(checkout_dir, path)
+            if File.exist?(target)
+              # A checkout may have smudged the file; immutability is checked
+              # against accepted bytes at the canonical commit, not projection.
+              unless blob(path, commit: commit) == bytes.b
+                raise AttemptErrors::Conflict, "Canonical evidence blob is immutable"
+              end
+            else
+              FileUtils.mkdir_p(File.dirname(target))
+              File.open(target, File::WRONLY | File::CREAT | File::EXCL | File::NOFOLLOW, 0600) do |file|
+                file.write(bytes.b)
+              end
+            end
+            path
+          end
+        end
+      end
+    end
+  end
+end

data/lib/ace/assign/molecules/journal_prompt_mutation.rb

@@ -0,0 +1,241 @@
+# frozen_string_literal: true
+require "ace/herdr/molecules/guarded_native_origin"
+
+module Ace
+  module Assign
+    module Molecules
+      # Durable N2 phases in the existing canonical journal, never an effect ledger.
+      module JournalPromptMutation
+        # Source-only phase: commit intent before the caller obtains any
+        # native dispatch permit. The scope owner reauthenticates inside this
+        # side-effect-free callback on EVERY journal CAS attempt.
+        def issue_prompt(binding:, issued_by:, &admission)
+          validate_prompt_binding!(binding)
+          unless issued_by.is_a?(Hash) && issued_by.keys.all? { |key| key.is_a?(String) } &&
+              issued_by.keys.sort == %w[gid groups host parent_pid pid started_at uid] &&
+              %w[uid gid groups].all? { |key| issued_by[key] == binding.fetch("caller").fetch(key) } &&
+              %w[pid parent_pid].all? { |key| issued_by[key].is_a?(Integer) && issued_by[key].positive? } &&
+              %w[host started_at].all? { |key| issued_by[key].is_a?(String) && issued_by[key].bytesize.between?(1, 255) }
+            raise ArgumentError, "invalid original prompt issuer evidence"
+          end
+          binding = JSON.parse(JSON.generate(binding))
+          issued_by = JSON.parse(JSON.generate(issued_by))
+          raise ArgumentError, "prompt admission callback is required" unless admission
+          digest = Digest::SHA256.hexdigest(JSON.generate(canonical_prompt_value(binding)))
+          internal_id = "prompt-issue.#{digest}"
+          response = mutate(assignment_id: binding.fetch("assignment_id"), attempt_id: binding.fetch("attempt_id"),
+            mutation_id: internal_id, operation: "prompt_issue", parameters_digest: digest,
+            expected_generation: binding.fetch("expected_generation"), with_replay: true, prompt_binding: binding) do |events, commit, generation|
+            admission.call(events, commit, generation)
+            {events: [{type: "prompt_issued", payload: {"external_mutation_id" => binding.fetch("mutation_id"),
+              "binding_digest" => digest, "binding" => binding, "issued_by" => issued_by}}],
+              data: {"mutation_id" => binding.fetch("mutation_id"), "binding_digest" => digest, "intent_mutation_id" => internal_id}}
+          end
+          response
+        end
+
+        # Fixed source-owned completion. Its selector authenticates the actual
+        # accepted issue on every CAS; the callback rejoins the original scope
+        # and guard without performing an effect. Replay keeps the FIRST public
+        # reply even if a later observation has a different outcome.
+        def finalize_prompt(mutation_id:, intent_event_id:, binding_digest:, evidence:, &authentication)
+          raise ArgumentError, "prompt completion authentication is required" unless authentication
+          intent = prompt_intent(mutation_id)
+          raise AttemptErrors::EvidenceUnavailable, "Prompt issue is unavailable" unless intent
+          binding = intent.fetch("payload").fetch("binding")
+          selector = {"intent_event_id" => intent_event_id, "binding_digest" => binding_digest}
+          mutate(assignment_id: binding.fetch("assignment_id"), attempt_id: binding.fetch("attempt_id"),
+            mutation_id: mutation_id, operation: "prompt_attempt", parameters_digest: binding_digest,
+            expected_generation: nil, generation_mode: :prompt_completion, prompt_completion: selector, with_replay: true) do |events, commit, generation|
+            if events.any? { |event| event["type"] == "authority_mutation" && event.dig("payload", "operation") == "scope_reservation_release" }
+              raise AttemptErrors::EvidenceUnavailable, "Released prompt scope cannot accept new outcome"
+            end
+            original = authentication.call(events, commit, generation)
+            unless original.is_a?(Hash) && original.keys.sort == %w[binding_digest origin] &&
+                original["binding_digest"] == binding.fetch("original_binding_digest")
+              raise AttemptErrors::EvidenceUnavailable, "Original prompt scope binding differs"
+            end
+            validate_prompt_evidence!(evidence, original.fetch("origin"))
+            {events: [{type: "prompt_outcome", payload: {"external_mutation_id" => mutation_id,
+              "intent_event_id" => intent_event_id, "binding_digest" => binding_digest, "evidence" => evidence}}],
+              data: {"mutation_id" => mutation_id, "attempt_id" => binding.fetch("attempt_id"),
+                "intent_event_id" => intent_event_id, "outcome" => evidence.fetch("outcome"), "guarded_evidence" => evidence}}
+          end
+        end
+
+        def verify_prompt_completion!(selector, mutation_id:, digest:, assignment_id:, attempt_id:, commit:)
+          unless selector.is_a?(Hash) && selector.keys.all? { |key| key.is_a?(String) } && selector.keys.sort == %w[binding_digest intent_event_id] &&
+              selector.values.all? { |value| value.is_a?(String) && value.match?(/\A[0-9a-f]{64}\z/) }
+            raise ArgumentError, "invalid fixed prompt completion selector"
+          end
+          intent = prompt_intent(mutation_id, commit: commit)
+          unless intent && intent["digest"] == selector.fetch("intent_event_id") &&
+              intent.dig("payload", "binding_digest") == digest && selector.fetch("binding_digest") == digest &&
+              intent.dig("payload", "binding", "assignment_id") == assignment_id && intent["attempt_id"] == attempt_id
+            raise AttemptErrors::EvidenceUnavailable, "Prompt completion does not join accepted issue"
+          end
+          true
+        end
+        private :verify_prompt_completion!
+
+        # Later authenticated native completion is a separate canonical fact.
+        # It never replaces the first immutable public prompt reply.
+        def observe_prompt_completion(mutation_id:, intent_event_id:, binding_digest:, evidence:, &authentication)
+          raise ArgumentError, "prompt observation authentication is required" unless authentication
+          intent = prompt_intent(mutation_id)
+          raise AttemptErrors::EvidenceUnavailable, "Prompt issue is unavailable" unless intent
+          binding = intent.fetch("payload").fetch("binding")
+          selector = {"external_mutation_id" => mutation_id, "intent_event_id" => intent_event_id, "binding_digest" => binding_digest}
+          digest = Digest::SHA256.hexdigest(JSON.generate(canonical_prompt_value(selector.merge("evidence" => evidence))))
+          mutate(assignment_id: binding.fetch("assignment_id"), attempt_id: binding.fetch("attempt_id"),
+            mutation_id: "prompt-observe.#{intent_event_id}", operation: "prompt_observation", parameters_digest: digest,
+            expected_generation: nil, generation_mode: :prompt_observation, prompt_observation: selector, with_replay: true) do |events, commit, generation|
+            if events.any? { |event| event["type"] == "authority_mutation" && event.dig("payload", "operation") == "scope_reservation_release" }
+              raise AttemptErrors::EvidenceUnavailable, "Released prompt scope cannot accept new observation"
+            end
+            original = authentication.call(events, commit, generation)
+            unless original.is_a?(Hash) && original.keys.sort == %w[binding_digest origin] && original["binding_digest"] == binding.fetch("original_binding_digest")
+              raise AttemptErrors::EvidenceUnavailable, "Original prompt scope binding differs"
+            end
+            validate_prompt_evidence!(evidence, original.fetch("origin"))
+            unless %w[submitted not_issued].include?(evidence.fetch("outcome"))
+              raise AttemptErrors::EvidenceUnavailable, "Unknown native outcome is not completed evidence"
+            end
+            {events: [{type: "prompt_completion_observed", payload: selector.merge("evidence" => evidence)}],
+              data: selector.merge("outcome" => evidence.fetch("outcome"), "guarded_evidence" => evidence)}
+          end
+        end
+
+        def verify_prompt_observation!(selector, mutation_id:, assignment_id:, attempt_id:, commit:)
+          unless selector.is_a?(Hash) && selector.keys.sort == %w[binding_digest external_mutation_id intent_event_id] &&
+              mutation_id == "prompt-observe.#{selector["intent_event_id"]}"
+            raise ArgumentError, "invalid fixed prompt observation selector"
+          end
+          verify_prompt_completion!(selector.slice("intent_event_id", "binding_digest"),
+            mutation_id: selector.fetch("external_mutation_id"), digest: selector.fetch("binding_digest"),
+            assignment_id: assignment_id, attempt_id: attempt_id, commit: commit)
+        end
+        private :verify_prompt_observation!
+
+        def validate_prompt_evidence!(evidence, original)
+          unless original.is_a?(Hash) && evidence.is_a?(Hash) && evidence.keys.all? { |key| key.is_a?(String) } && evidence["origin"] == original
+            raise AttemptErrors::EvidenceUnavailable, "Prompt outcome original guard differs"
+          end
+          Ace::Herdr::Molecules::GuardedNativeOrigin.verify!(original, terminal_id: original.fetch("terminal_id"), child: original.fetch("child"))
+          Ace::Herdr::Molecules::GuardedNativeOrigin.verify!(evidence.fetch("origin"), terminal_id: original.fetch("terminal_id"), child: original.fetch("child"))
+          case evidence["outcome"]
+          when "submitted"
+            valid = evidence.keys.sort == %w[origin outcome submission] && evidence["submission"] == "submitted"
+          when "not_issued"
+            valid = evidence.keys.sort == %w[code origin outcome phase] && evidence["phase"] == "not_issued" &&
+              %w[guard_mismatch origin_unavailable origin_exited agent_blocked agent_not_ready target_missing submission_busy].include?(evidence["code"])
+          when "uncertain"
+            valid = evidence.keys.sort == %w[origin outcome]
+          end
+          raise AttemptErrors::EvidenceUnavailable, "Prompt outcome is malformed" unless valid
+          true
+        rescue KeyError, TypeError, Ace::Runtime::RuntimeUnavailableError
+          raise AttemptErrors::EvidenceUnavailable, "Prompt outcome original guard is malformed"
+        end
+        private :validate_prompt_evidence!
+
+        # A read-only selected canonical chain lookup, never a dispatch permit.
+        def prompt_intent(mutation_id, commit: ref_value)
+          validate_mutation_id!(mutation_id)
+          found = nil
+          assignment_ids(commit: commit).each do |assignment_id|
+            events = read_events(assignment_id, commit: commit)
+            events.group_by { |event| event.fetch("attempt_id") }.each_value do |chain|
+              unless Models::EvidenceEvent.chain_valid?(chain)
+                raise AttemptErrors::EvidenceUnavailable, "Prompt intent event chain is corrupt"
+              end
+            end
+            events.each do |event|
+              next unless event["type"] == "prompt_issued" && event.dig("payload", "external_mutation_id") == mutation_id
+              raise AttemptErrors::EvidenceUnavailable, "Prompt intent is ambiguous" if found
+              payload = event.fetch("payload")
+              validate_prompt_binding!(payload.fetch("binding"))
+              digest = Digest::SHA256.hexdigest(JSON.generate(canonical_prompt_value(payload.fetch("binding"))))
+              binding = payload.fetch("binding")
+              acceptance = events.find { |entry| entry["type"] == "authority_mutation" &&
+                entry.dig("payload", "mutation_id") == "prompt-issue.#{digest}" &&
+                entry.dig("payload", "operation") == "prompt_issue" &&
+                entry.dig("payload", "parameters_digest") == digest && entry["previous_digest"] == event["digest"] }
+              unless acceptance && payload["binding_digest"] == digest && binding["mutation_id"] == mutation_id &&
+                  binding["assignment_id"] == assignment_id && binding["attempt_id"] == event["attempt_id"]
+                raise AttemptErrors::EvidenceUnavailable, "Prompt intent acceptance binding differs"
+              end
+              found = event
+            end
+          end
+          found
+        rescue KeyError, TypeError, ArgumentError
+          raise AttemptErrors::EvidenceUnavailable, "Prompt intent is malformed"
+        end
+
+        def validate_prompt_binding!(binding)
+          fields = %w[action assignment_id attempt_id caller expected_generation mapping_id mutation_id original_binding_digest project_id text_bytes text_sha256]
+          unless binding.is_a?(Hash) && binding.keys.all? { |key| key.is_a?(String) } && binding.keys.sort == fields &&
+              binding["action"] == "prompt_attempt" && binding["expected_generation"].is_a?(Integer) && binding["expected_generation"] >= 0 &&
+              binding["text_bytes"].is_a?(Integer) && binding["text_bytes"].between?(1, 16_384) &&
+              %w[text_sha256 original_binding_digest].all? { |key| binding[key].is_a?(String) && binding[key].match?(/\A[0-9a-f]{64}\z/) }
+            raise ArgumentError, "invalid fixed prompt binding"
+          end
+          %w[assignment_id attempt_id mapping_id mutation_id project_id].each { |key| validate_mutation_id!(binding.fetch(key)) }
+          if binding.fetch("mutation_id").start_with?("prompt-issue.", "prompt-observe.", "input-inhibit.")
+            raise ArgumentError, "public mutation ID uses reserved prompt namespace"
+          end
+          caller = binding.fetch("caller")
+          unless caller.is_a?(Hash) && caller.keys.all? { |key| key.is_a?(String) } && caller.keys.sort == %w[gid groups role uid] &&
+              %w[launcher supervisor].include?(caller["role"]) &&
+              %w[uid gid].all? { |key| caller[key].is_a?(Integer) && caller[key].between?(0, 0xffff_ffff) } &&
+              caller["groups"].is_a?(Array) && caller["groups"].size <= 256 &&
+              caller["groups"].all? { |group| group.is_a?(Integer) && group.between?(0, 0xffff_ffff) } &&
+              caller["groups"] == caller["groups"].sort.uniq
+            raise ArgumentError, "invalid authenticated stable prompt principal"
+          end
+          true
+        end
+        private :validate_prompt_binding!
+
+        def canonical_prompt_value(value)
+          case value
+          when Hash then value.keys.sort.to_h { |key| [key, canonical_prompt_value(value.fetch(key))] }
+          when Array then value.map { |item| canonical_prompt_value(item) }
+          else value
+          end
+        end
+        private :canonical_prompt_value
+
+        def verify_prompt_external_namespace!(external_id, digest, assignment_id:, attempt_id:, commit:)
+          intent = prompt_intent(external_id, commit: commit)
+          accepted = mutation_result(external_id, commit: commit)
+          if accepted || (intent && (intent.dig("payload", "binding_digest") != digest ||
+              intent.dig("payload", "binding", "assignment_id") != assignment_id || intent["attempt_id"] != attempt_id))
+            raise AttemptErrors::Conflict, "Mutation ID is already bound to different input"
+          end
+        end
+        private :verify_prompt_external_namespace!
+
+        def verify_prompt_mutation_namespace!(mutation_id:, operation:, parameters_digest:, assignment_id:, attempt_id:, prompt_completion:, prompt_observation: nil, commit:)
+          # Ordinary mutations cannot steal an external ID while its accepted
+          # prompt issue has no finalized public reply yet.
+          if mutation_id.start_with?("prompt-issue.")
+            raise ArgumentError, "reserved internal prompt namespace" unless operation == "prompt_issue"
+            return
+          end
+          if mutation_id.start_with?("prompt-observe.")
+            raise ArgumentError, "reserved internal prompt observation namespace" unless operation == "prompt_observation" && prompt_observation
+            return
+          end
+          return if operation == "prompt_attempt" && prompt_completion
+          if prompt_intent(mutation_id, commit: commit)
+            raise AttemptErrors::Conflict, "Mutation ID is reserved by accepted prompt intent"
+          end
+        end
+        private :verify_prompt_mutation_namespace!
+
+      end
+    end
+  end
+end