S534 · R2 physical acceptance matrix · Fail-closed evidence reconciliation

#![allow(unexpected_cfgs)]

//! S534 R2 physical acceptance matrix · Fail-closed evidence reconciliation.
//!
//! This is a separate typed gate after S533.  It advances only the
//! acceptance-readiness ledger; supported-profile runtime observations,
//! physical observations and product acceptance remain explicitly absent.

use crate::g8l_target_dispatch_scheduler_owner_scheduler_mutation_production_migration_lifecycle_s533_r2_acceptance_journal::S533_SEQUENCE;
use crate::g8l_target_dispatch_scheduler_owner_scheduler_mutation_production_migration_lifecycle_s431_runtime_evidence_contract::{
    advance_s431_to_s535_model_acceptance_gate,
    G8lS431ToS535AcceptanceError, G8lS431ToS535AcceptanceGateDescriptor,
    G8lS431ToS535AcceptanceLedger, G8lS431ToS535AcceptanceOutcome,
    G8lS431ToS535AcceptanceStep, S431_DIRECT_ACCESS_SITES,
    S431_PRODUCTION_GUARDED_DIRECT_ACCESS_SITES, S431_SOURCE_AUDIT_UNITS,
    S431_SOURCE_MODEL_COVERED_DIRECT_ACCESS_SITES, S431_UNROUTED_DIRECT_ACCESS_SITES,
};

pub const S534_SEQUENCE: usize = 534;
pub const S534_EXPECTED_PREDECESSOR: usize = S533_SEQUENCE;
pub const S534_BLOCK_ORDINAL: usize = 15;
pub const S534_STEP_ORDINAL: usize = 6;
pub const S534_ACCEPTANCE_DOMAIN: &str = "r2_acceptance";
pub const S534_SOURCE_AUDIT_UNITS: usize = S431_SOURCE_AUDIT_UNITS;
pub const S534_DIRECT_ACCESS_SITES: usize = S431_DIRECT_ACCESS_SITES;
pub const S534_SOURCE_MODEL_COVERED_DIRECT_ACCESS_SITES: usize =
    S431_SOURCE_MODEL_COVERED_DIRECT_ACCESS_SITES;
pub const S534_PRODUCTION_GUARDED_DIRECT_ACCESS_SITES: usize =
    S431_PRODUCTION_GUARDED_DIRECT_ACCESS_SITES;
pub const S534_UNROUTED_DIRECT_ACCESS_SITES: usize = S431_UNROUTED_DIRECT_ACCESS_SITES;
pub const RUNBOOK_EXECUTED_IN_S534: bool = false;
pub const S534_SUPPORTED_PROFILE_RUNTIME_OBSERVATIONS: usize = 0;
pub const S534_PHYSICAL_OBSERVATIONS: usize = 0;
pub const S534_ACCEPTANCE_COMPLETE: bool = false;

pub const S534_DESCRIPTOR: G8lS431ToS535AcceptanceGateDescriptor =
    G8lS431ToS535AcceptanceGateDescriptor {
        sequence: S534_SEQUENCE,
        predecessor_sequence: S534_EXPECTED_PREDECESSOR,
        block_ordinal: S534_BLOCK_ORDINAL,
        step_ordinal: S534_STEP_ORDINAL,
        acceptance_domain: S534_ACCEPTANCE_DOMAIN,
        step: G8lS431ToS535AcceptanceStep::FailClosedReconciliation,
        runtime_evidence_required: true,
        physical_evidence_required: true,
    };

pub type G8lS534AcceptanceGateOutcome = G8lS431ToS535AcceptanceOutcome;
pub type G8lS534AcceptanceGateError = G8lS431ToS535AcceptanceError;

pub fn service_s534_model_r2_acceptance_reconciliation(
    ledger: &mut G8lS431ToS535AcceptanceLedger,
    caller_cpu: usize,
) -> Result<G8lS534AcceptanceGateOutcome, G8lS534AcceptanceGateError> {
    advance_s431_to_s535_model_acceptance_gate(ledger, caller_cpu, S534_DESCRIPTOR)
}

#[cfg(all(target_arch = "aarch64", target_os = "none", feature = "board-rpi5"))]
pub fn service_s534_r2_acceptance_reconciliation_on_cpu1(
) -> Result<G8lS534AcceptanceGateOutcome, G8lS534AcceptanceGateError> {
    crate::g8l_target_dispatch_scheduler_owner_scheduler_mutation_production_migration_lifecycle_s431_runtime_evidence_contract::service_s431_to_s535_production_acceptance_gate_on_cpu1(
        S534_DESCRIPTOR,
    )
}

use aselsan_microkernel_simulation::g8l_target_dispatch_scheduler_owner_scheduler_mutation_production_migration_lifecycle_s430_final_software_boundary::G8lS430FinalSoftwareBoundaryStatus;
use aselsan_microkernel_simulation::g8l_target_dispatch_scheduler_owner_scheduler_mutation_production_migration_lifecycle_s431_runtime_evidence_contract::{
    advance_s431_to_s535_model_acceptance_gate,
    canonical_s431_to_s535_acceptance_descriptor, G8lS431ToS535AcceptanceError,
    G8lS431ToS535AcceptanceLedger, G8lS431ToS535AcceptanceOutcome,
    S431_FIRST_SEQUENCE, S535_LAST_SEQUENCE,
};
use aselsan_microkernel_simulation::g8l_target_dispatch_scheduler_owner_scheduler_mutation_production_migration_lifecycle_s534_r2_acceptance_reconciliation as gate;

fn s430_anchor() -> G8lS430FinalSoftwareBoundaryStatus {
    G8lS430FinalSoftwareBoundaryStatus {
        attempt_id: 4301,
        provider_request_id: 4302,
        exclusive_token: 4303,
        completed_gate_count: 30,
        software_source_path_complete: true,
        whole_scheduler_exclusion_source_handshake_complete: true,
        main_migration_lifecycle_source_path_complete: true,
        supported_profile_runtime_acceptance_complete: false,
        physical_acceptance_complete: false,
        r2_product_acceptance_complete: false,
        runbook_executed: false,
    }
}

fn acceptance_ledger() -> G8lS431ToS535AcceptanceLedger {
    G8lS431ToS535AcceptanceLedger::from_s430(1, s430_anchor()).unwrap()
}

fn advance_before(ledger: &mut G8lS431ToS535AcceptanceLedger, sequence: usize) {
    for predecessor in S431_FIRST_SEQUENCE..sequence {
        let descriptor = canonical_s431_to_s535_acceptance_descriptor(predecessor).unwrap();
        assert!(matches!(
            advance_s431_to_s535_model_acceptance_gate(ledger, 1, descriptor),
            Ok(G8lS431ToS535AcceptanceOutcome::Advanced(_))
        ));
    }
}

#[test]
fn s534_descriptor_is_exact_and_canonical() {
    assert_eq!(gate::S534_SEQUENCE, 534);
    assert_eq!(gate::S534_EXPECTED_PREDECESSOR, 533);
    assert_eq!(gate::S534_BLOCK_ORDINAL, 15);
    assert_eq!(gate::S534_STEP_ORDINAL, 6);
    assert_eq!(gate::S534_ACCEPTANCE_DOMAIN, "r2_acceptance");
    assert_eq!(
        canonical_s431_to_s535_acceptance_descriptor(534),
        Some(gate::S534_DESCRIPTOR)
    );
}

#[test]
fn s534_is_cpu1_scoped_and_waits_for_exact_predecessor() {
    let mut ledger = acceptance_ledger();
    assert_eq!(
        gate::service_s534_model_r2_acceptance_reconciliation(&mut ledger, 0),
        Err(G8lS431ToS535AcceptanceError::WrongCpu)
    );
    assert_eq!(ledger.last_completed_sequence(), 430);
    if 534 == S431_FIRST_SEQUENCE {
        let future = canonical_s431_to_s535_acceptance_descriptor(432).unwrap();
        assert!(matches!(
            advance_s431_to_s535_model_acceptance_gate(&mut ledger, 1, future),
            Ok(G8lS431ToS535AcceptanceOutcome::AwaitingPredecessor {
                expected_predecessor: 431,
                observed_predecessor: 430,
                ..
            })
        ));
    } else {
        assert!(matches!(
            gate::service_s534_model_r2_acceptance_reconciliation(&mut ledger, 1),
            Ok(G8lS431ToS535AcceptanceOutcome::AwaitingPredecessor {
                sequence: 534,
                expected_predecessor: 533,
                observed_predecessor: 430,
            })
        ));
    }
}

#[test]
fn s534_advances_once_with_non_acceptance_receipt() {
    let mut ledger = acceptance_ledger();
    advance_before(&mut ledger, 534);
    let G8lS431ToS535AcceptanceOutcome::Advanced(receipt) =
        gate::service_s534_model_r2_acceptance_reconciliation(&mut ledger, 1).unwrap()
    else {
        panic!("S534 must advance")
    };
    assert_eq!((receipt.sequence, receipt.predecessor_sequence), (534, 533));
    assert_eq!((receipt.block_ordinal, receipt.step_ordinal), (15, 6));
    assert_eq!(receipt.completed_block_count, 14);
    assert!(receipt.source_gate_complete);
    assert!(receipt.runtime_evidence_required);
    assert!(!receipt.supported_profile_runtime_observed);
    assert!(!receipt.physical_observed);
    assert!(!receipt.acceptance_complete);
    assert!(!receipt.runbook_executed);
}

#[test]
fn s534_replay_is_idempotent_and_historical_reentry_does_not_mutate() {
    let mut ledger = acceptance_ledger();
    advance_before(&mut ledger, 534);
    let first = gate::service_s534_model_r2_acceptance_reconciliation(&mut ledger, 1).unwrap();
    let G8lS431ToS535AcceptanceOutcome::Advanced(receipt) = first else {
        panic!("advance")
    };
    assert_eq!(
        gate::service_s534_model_r2_acceptance_reconciliation(&mut ledger, 1),
        Ok(G8lS431ToS535AcceptanceOutcome::Retained(receipt))
    );
    if 534 < S535_LAST_SEQUENCE {
        let next = canonical_s431_to_s535_acceptance_descriptor(534 + 1).unwrap();
        assert!(matches!(
            advance_s431_to_s535_model_acceptance_gate(&mut ledger, 1, next),
            Ok(G8lS431ToS535AcceptanceOutcome::Advanced(_))
        ));
        assert_eq!(
            gate::service_s534_model_r2_acceptance_reconciliation(&mut ledger, 1),
            Ok(G8lS431ToS535AcceptanceOutcome::AlreadyCompleted {
                requested_sequence: 534,
                last_completed_sequence: 534 + 1,
            })
        );
    }
}

#[test]
fn s534_coverage_and_open_claim_boundary_are_preserved() {
    assert_eq!(gate::S534_SOURCE_AUDIT_UNITS, 7);
    assert_eq!(gate::S534_DIRECT_ACCESS_SITES, 113);
    assert_eq!(gate::S534_SOURCE_MODEL_COVERED_DIRECT_ACCESS_SITES, 113);
    assert_eq!(gate::S534_PRODUCTION_GUARDED_DIRECT_ACCESS_SITES, 113);
    assert_eq!(gate::S534_UNROUTED_DIRECT_ACCESS_SITES, 0);
    assert_eq!(gate::S534_SUPPORTED_PROFILE_RUNTIME_OBSERVATIONS, 0);
    assert_eq!(gate::S534_PHYSICAL_OBSERVATIONS, 0);
    assert!(!gate::S534_ACCEPTANCE_COMPLETE);
    assert!(!gate::RUNBOOK_EXECUTED_IN_S534);
}

#[test]
fn s534_has_separate_kernel_simulation_and_production_wiring() {
    const TARGET: &str = "g8l_target_dispatch_scheduler_owner_scheduler_mutation_production_migration_lifecycle_s534_r2_acceptance_reconciliation";
    const SERVICE: &str = "service_s534_r2_acceptance_reconciliation_on_cpu1";
    let source = include_str!("../../kernel/src/g8l_target_dispatch_scheduler_owner_scheduler_mutation_production_migration_lifecycle_s534_r2_acceptance_reconciliation.rs");
    let kernel_registry = include_str!("../../kernel/src/main.rs");
    let simulation_registry = include_str!("../src/lib.rs");
    let exceptions = include_str!("../../kernel/src/arch/aarch64/exceptions.rs");
    assert!(source.contains("pub const S534_DESCRIPTOR"));
    assert_eq!(
        kernel_registry.matches(&format!("mod {TARGET};")).count(),
        1
    );
    assert_eq!(
        simulation_registry
            .matches(&format!("pub mod {TARGET};"))
            .count(),
        1
    );
    assert_eq!(exceptions.matches(SERVICE).count(), 1);
    let previous = exceptions
        .find("service_s533_r2_acceptance_journal_on_cpu1")
        .unwrap();
    let current = exceptions.find(SERVICE).unwrap();
    assert!(previous < current);
    let successor_service = "service_s535_r2_acceptance_boundary_on_cpu1";
    if !successor_service.is_empty() {
        assert!(current < exceptions.find(successor_service).unwrap());
    }
}

#[test]
fn s534_descriptor_mutation_fails_before_ledger_advance() {
    let mut ledger = acceptance_ledger();
    advance_before(&mut ledger, 534);
    let before = ledger.last_completed_sequence();
    let mut drift = gate::S534_DESCRIPTOR;
    drift.block_ordinal += 1;
    assert_eq!(
        advance_s431_to_s535_model_acceptance_gate(&mut ledger, 1, drift),
        Err(G8lS431ToS535AcceptanceError::DescriptorDrift)
    );
    assert_eq!(ledger.last_completed_sequence(), before);
}

  {
    id: "g8l-s534-r2-acceptance-reconciliation-partial",
    sequence: 534,
    slug: "r2_acceptance_reconciliation",
    title: "R2 physical acceptance matrix · Fail-closed evidence reconciliation",
    focusedTests: 7,
    sourceBytes: 3271,
    sourceSha256: "3e6d95fb86c0d0cac7d4454a92961f6fe118aa721dc1cf7c3f1a743be3e89c67",
    testBytes: 7847,
    testSha256: "42b73efa938411e513b1d0ddfeb3ce4456909a1a5f94d5af2eebf86801d1fe11",
    blockOrdinal: 15,
    blockTitle: "R2 physical acceptance matrix",
    stepOrdinal: 6,
    stepTitle: "Fail-closed evidence reconciliation",
    acceptance: "S534, R2 physical acceptance matrix bloğının Fail-closed evidence reconciliation adımını exact S533 predecessor sonrasında ayrı typed descriptor ve ayrı CPU1 production service callsite ile kaydeder.",
    retainedBoundary: "Bu yalnız fail-closed software readiness kaydıdır; supported-profile runtime observation=0, physical observation=0, acceptance_complete=false ve RUNBOOK_EXECUTED_IN_S534=NO kalır.",
  },