S800 · Erişilebilirlik ve yerelleştirme · Sağlayıcı preflight ve askıda tutulan yetki

#![allow(unexpected_cfgs)]
#![allow(dead_code)]

//! S800 Accessibility and localization · Provider preflight with withheld authority.
//!
//! Separate typed gate after S799, release track R2->R3,
//! phase T4 (Accessibility and localization), step
//! 3/13 of the acceptance ladder.
//!
//! It advances only the fail-closed readiness ledger.  The retained S571/S575
//! physical observations are carried read-only; new runtime and physical
//! observations, operator authority, external acceptance, cross-profile
//! coverage and release-track completion all remain explicitly absent, and the
//! module is deliberately not linked into the board-rpi5 kernel.

use crate::g8l_target_dispatch_scheduler_owner_scheduler_mutation_production_migration_lifecycle_s799_r2r3_accessibility_localization_instrumentation::S799_SEQUENCE;
use crate::g8l_target_dispatch_scheduler_owner_scheduler_mutation_production_migration_lifecycle_s708_r2_production_platform_isolation_contract::{
    advance_s708_to_s899_model_acceptance_gate, G8lProductAcceptanceError,
    G8lProductAcceptanceGateDescriptor, G8lProductAcceptanceLedger,
    G8lProductAcceptanceOutcome, G8lProductAcceptanceStep,
    S708_TO_S899_LINKED_INTO_BOARD_RPI5,
};

pub const S800_SEQUENCE: usize = 800;
pub const S800_EXPECTED_PREDECESSOR: usize = S799_SEQUENCE;
pub const S800_TRACK: &str = "R2->R3";
pub const S800_PHASE: &str = "T4";
pub const S800_BLOCK_ORDINAL: usize = 10;
pub const S800_BLOCK_STEP_COUNT: usize = 13;
pub const S800_STEP_ORDINAL: usize = 3;
pub const S800_ACCEPTANCE_DOMAIN: &str = "accessibility_localization";
pub const S800_LINKED_INTO_BOARD_RPI5: bool = S708_TO_S899_LINKED_INTO_BOARD_RPI5;
pub const S800_NEW_SUPPORTED_PROFILE_RUNTIME_OBSERVATIONS: usize = 0;
pub const S800_NEW_PHYSICAL_OBSERVATIONS: usize = 0;
pub const S800_OPERATOR_AUTHORIZATIONS: usize = 0;
pub const S800_EXTERNAL_ACCEPTANCES: usize = 0;
pub const S800_PHYSICAL_OR_DEVICE_OPERATIONS: usize = 0;
pub const S800_ACCEPTANCE_COMPLETE: bool = false;
pub const S800_RELEASE_TRACK_COMPLETE: bool = false;
pub const RUNBOOK_EXECUTED_IN_S800: bool = false;

pub const S800_DESCRIPTOR: G8lProductAcceptanceGateDescriptor =
    G8lProductAcceptanceGateDescriptor {
        sequence: S800_SEQUENCE,
        predecessor_sequence: S800_EXPECTED_PREDECESSOR,
        track: S800_TRACK,
        phase: S800_PHASE,
        block_ordinal: S800_BLOCK_ORDINAL,
        block_step_count: S800_BLOCK_STEP_COUNT,
        step_ordinal: S800_STEP_ORDINAL,
        acceptance_domain: S800_ACCEPTANCE_DOMAIN,
        step: G8lProductAcceptanceStep::ProviderPreflight,
        runtime_evidence_required: true,
        physical_evidence_required: true,
        external_authority_required: false,
    };

pub type G8lS800AcceptanceGateOutcome = G8lProductAcceptanceOutcome;
pub type G8lS800AcceptanceGateError = G8lProductAcceptanceError;

pub fn service_s800_model_r2r3_accessibility_localization_preflight(
    ledger: &mut G8lProductAcceptanceLedger,
    caller_cpu: usize,
) -> Result<G8lS800AcceptanceGateOutcome, G8lS800AcceptanceGateError> {
    advance_s708_to_s899_model_acceptance_gate(ledger, caller_cpu, S800_DESCRIPTOR)
}

use aselsan_microkernel_simulation::g8l_target_dispatch_scheduler_owner_scheduler_mutation_production_migration_lifecycle_s708_r2_production_platform_isolation_contract::{
    advance_s708_to_s899_model_acceptance_gate,
    canonical_s708_to_s899_acceptance_descriptor, G8lProductAcceptanceAnchor,
    G8lProductAcceptanceError, G8lProductAcceptanceLedger, G8lProductAcceptanceOutcome,
    S708_CANONICAL_ANCHOR, S708_CHAIN_TIP_SEQUENCE, S708_FIRST_SEQUENCE, S899_LAST_SEQUENCE,
};
use aselsan_microkernel_simulation::g8l_target_dispatch_scheduler_owner_scheduler_mutation_production_migration_lifecycle_s800_r2r3_accessibility_localization_preflight as gate;

fn product_anchor() -> G8lProductAcceptanceAnchor {
    S708_CANONICAL_ANCHOR
}

fn acceptance_ledger() -> G8lProductAcceptanceLedger {
    G8lProductAcceptanceLedger::from_s707(1, product_anchor()).unwrap()
}

fn advance_before(ledger: &mut G8lProductAcceptanceLedger, sequence: usize) {
    for predecessor in S708_FIRST_SEQUENCE..sequence {
        let descriptor = canonical_s708_to_s899_acceptance_descriptor(predecessor).unwrap();
        assert!(matches!(
            advance_s708_to_s899_model_acceptance_gate(ledger, 1, descriptor),
            Ok(G8lProductAcceptanceOutcome::Advanced(_))
        ));
    }
}

#[test]
fn s800_descriptor_is_exact_and_canonical() {
    assert_eq!(gate::S800_SEQUENCE, 800);
    assert_eq!(gate::S800_EXPECTED_PREDECESSOR, 799);
    assert_eq!(gate::S800_TRACK, "R2->R3");
    assert_eq!(gate::S800_PHASE, "T4");
    assert_eq!(gate::S800_BLOCK_ORDINAL, 10);
    assert_eq!(gate::S800_BLOCK_STEP_COUNT, 13);
    assert_eq!(gate::S800_STEP_ORDINAL, 3);
    assert_eq!(gate::S800_ACCEPTANCE_DOMAIN, "accessibility_localization");
    assert_eq!(gate::S800_DESCRIPTOR.external_authority_required, false);
    assert!(gate::S800_DESCRIPTOR.physical_evidence_required);
    assert_eq!(
        canonical_s708_to_s899_acceptance_descriptor(800),
        Some(gate::S800_DESCRIPTOR)
    );
}

#[test]
fn s800_is_cpu1_scoped_and_waits_for_exact_predecessor() {
    let mut ledger = acceptance_ledger();
    assert_eq!(
        gate::service_s800_model_r2r3_accessibility_localization_preflight(&mut ledger, 0),
        Err(G8lProductAcceptanceError::WrongCpu)
    );
    assert_eq!(ledger.last_completed_sequence(), S708_CHAIN_TIP_SEQUENCE);
    if 800 == S708_FIRST_SEQUENCE {
        let future = canonical_s708_to_s899_acceptance_descriptor(709).unwrap();
        assert!(matches!(
            advance_s708_to_s899_model_acceptance_gate(&mut ledger, 1, future),
            Ok(G8lProductAcceptanceOutcome::AwaitingPredecessor {
                expected_predecessor: 708,
                observed_predecessor: 707,
                ..
            })
        ));
    } else {
        assert!(matches!(
            gate::service_s800_model_r2r3_accessibility_localization_preflight(&mut ledger, 1),
            Ok(G8lProductAcceptanceOutcome::AwaitingPredecessor {
                sequence: 800,
                expected_predecessor: 799,
                observed_predecessor: 707,
            })
        ));
    }
}

#[test]
fn s800_advances_once_with_non_acceptance_receipt() {
    let mut ledger = acceptance_ledger();
    advance_before(&mut ledger, 800);
    let G8lProductAcceptanceOutcome::Advanced(receipt) =
        gate::service_s800_model_r2r3_accessibility_localization_preflight(&mut ledger, 1).unwrap()
    else {
        panic!("S800 must advance")
    };
    assert_eq!((receipt.sequence, receipt.predecessor_sequence), (800, 799));
    assert_eq!(receipt.track, "R2->R3");
    assert_eq!(receipt.phase, "T4");
    assert_eq!((receipt.block_ordinal, receipt.step_ordinal), (10, 3));
    assert_eq!(receipt.acceptance_domain, "accessibility_localization");
    assert_eq!(receipt.completed_block_count, 9);
    assert_eq!(receipt.chain_tip_sequence, 707);
    assert_eq!(receipt.retained_runtime_baselines, 2);
    assert_eq!(receipt.retained_physical_observations, 2);
    assert!(receipt.source_gate_complete);
    assert!(receipt.runtime_evidence_required);
    assert!(receipt.physical_evidence_required);
    assert_eq!(receipt.new_supported_profile_runtime_observations, 0);
    assert_eq!(receipt.new_physical_observations, 0);
    assert!(!receipt.operator_authority_received);
    assert!(!receipt.external_authority_received);
    assert!(!receipt.linked_into_board_rpi5);
    assert!(!receipt.cross_profile_coverage_complete);
    assert!(!receipt.acceptance_complete);
    assert!(!receipt.r2_field_acceptance_complete);
    assert!(!receipt.release_track_complete);
    assert!(!receipt.runbook_executed);
}

#[test]
fn s800_replay_is_idempotent_and_historical_reentry_does_not_mutate() {
    let mut ledger = acceptance_ledger();
    advance_before(&mut ledger, 800);
    let G8lProductAcceptanceOutcome::Advanced(receipt) =
        gate::service_s800_model_r2r3_accessibility_localization_preflight(&mut ledger, 1).unwrap()
    else {
        panic!("advance")
    };
    assert_eq!(
        gate::service_s800_model_r2r3_accessibility_localization_preflight(&mut ledger, 1),
        Ok(G8lProductAcceptanceOutcome::Retained(receipt))
    );
    if 800 < S899_LAST_SEQUENCE {
        let next = canonical_s708_to_s899_acceptance_descriptor(800 + 1).unwrap();
        assert!(matches!(
            advance_s708_to_s899_model_acceptance_gate(&mut ledger, 1, next),
            Ok(G8lProductAcceptanceOutcome::Advanced(_))
        ));
        assert_eq!(
            gate::service_s800_model_r2r3_accessibility_localization_preflight(&mut ledger, 1),
            Ok(G8lProductAcceptanceOutcome::AlreadyCompleted {
                requested_sequence: 800,
                last_completed_sequence: 800 + 1,
            })
        );
    }
}

#[test]
fn s800_open_claim_boundary_is_preserved() {
    assert_eq!(gate::S800_NEW_SUPPORTED_PROFILE_RUNTIME_OBSERVATIONS, 0);
    assert_eq!(gate::S800_NEW_PHYSICAL_OBSERVATIONS, 0);
    assert_eq!(gate::S800_OPERATOR_AUTHORIZATIONS, 0);
    assert_eq!(gate::S800_EXTERNAL_ACCEPTANCES, 0);
    assert_eq!(gate::S800_PHYSICAL_OR_DEVICE_OPERATIONS, 0);
    assert!(!gate::S800_ACCEPTANCE_COMPLETE);
    assert!(!gate::S800_RELEASE_TRACK_COMPLETE);
    assert!(!gate::S800_LINKED_INTO_BOARD_RPI5);
    assert!(!gate::RUNBOOK_EXECUTED_IN_S800);
}

#[test]
fn s800_is_simulation_only_and_adds_no_production_callsite() {
    const TARGET: &str = "g8l_target_dispatch_scheduler_owner_scheduler_mutation_production_migration_lifecycle_s800_r2r3_accessibility_localization_preflight";
    let source = include_str!("../../kernel/src/g8l_target_dispatch_scheduler_owner_scheduler_mutation_production_migration_lifecycle_s800_r2r3_accessibility_localization_preflight.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 S800_DESCRIPTOR"));
    assert_eq!(
        simulation_registry
            .matches(&format!("pub mod {TARGET};"))
            .count(),
        1
    );
    assert_eq!(
        kernel_registry.matches(&format!("mod {TARGET};")).count(),
        0
    );
    assert_eq!(exceptions.matches(TARGET).count(), 0);
    assert_eq!(exceptions.matches("service_s800_").count(), 0);
}

#[test]
fn s800_descriptor_mutation_fails_before_ledger_advance() {
    let mut ledger = acceptance_ledger();
    advance_before(&mut ledger, 800);
    let before = ledger.last_completed_sequence();
    let mut drift = gate::S800_DESCRIPTOR;
    drift.block_ordinal += 1;
    assert_eq!(
        advance_s708_to_s899_model_acceptance_gate(&mut ledger, 1, drift),
        Err(G8lProductAcceptanceError::DescriptorDrift)
    );
    assert_eq!(ledger.last_completed_sequence(), before);
}

#[test]
fn s800_rejects_premature_acceptance_and_chain_tip_drift() {
    let mut promoted: G8lProductAcceptanceAnchor = S708_CANONICAL_ANCHOR;
    promoted.r2_field_acceptance_complete = true;
    assert_eq!(
        G8lProductAcceptanceLedger::from_s707(1, promoted).err(),
        Some(G8lProductAcceptanceError::PrematureAcceptanceClaim)
    );
    let mut linked: G8lProductAcceptanceAnchor = S708_CANONICAL_ANCHOR;
    linked.linked_into_board_rpi5 = true;
    assert_eq!(
        G8lProductAcceptanceLedger::from_s707(1, linked).err(),
        Some(G8lProductAcceptanceError::PrematureAcceptanceClaim)
    );
    let mut ran: G8lProductAcceptanceAnchor = S708_CANONICAL_ANCHOR;
    ran.chain_tip_runbook_executed = true;
    assert_eq!(
        G8lProductAcceptanceLedger::from_s707(1, ran).err(),
        Some(G8lProductAcceptanceError::PrematureAcceptanceClaim)
    );
    let mut invented: G8lProductAcceptanceAnchor = S708_CANONICAL_ANCHOR;
    invented.retained_physical_observations = 3;
    assert_eq!(
        G8lProductAcceptanceLedger::from_s707(1, invented).err(),
        Some(G8lProductAcceptanceError::ChainTipDrift)
    );
    let mut moved: G8lProductAcceptanceAnchor = S708_CANONICAL_ANCHOR;
    moved.chain_tip_sequence = 706;
    assert_eq!(
        G8lProductAcceptanceLedger::from_s707(1, moved).err(),
        Some(G8lProductAcceptanceError::ChainTipDrift)
    );
    assert_eq!(
        G8lProductAcceptanceLedger::from_s707(0, S708_CANONICAL_ANCHOR).err(),
        Some(G8lProductAcceptanceError::WrongCpu)
    );
}

  {
    id: "g8l-s800-r2r3-accessibility-localization-preflight-partial",
    sequence: 800,
    slug: "r2r3_accessibility_localization_preflight",
    title: "Accessibility and localization · Provider preflight with withheld authority",
    titleTr: "Erişilebilirlik ve yerelleştirme · Sağlayıcı preflight ve askıda tutulan yetki",
    track: "R2->R3",
    trackTitle: "R2 to R3 transition",
    trackTitleTr: "R2 → R3 geçiş işleri",
    phase: "T4",
    focusedTests: 8,
    sourceBytes: 3165,
    sourceSha256: "a4e067a6d193320f790be6e8cdac17a3f7b2a55b4abd8f726641946a978d9eeb",
    testBytes: 9385,
    testSha256: "08a054ccfbd6a971f613a589dcc1e82237a0ac1009e36fe43a54b125658a241d",
    blockOrdinal: 10,
    blockCount: 19,
    blockTitle: "Accessibility and localization",
    blockTitleTr: "Erişilebilirlik ve yerelleştirme",
    blockStepCount: 13,
    stepOrdinal: 3,
    stepTitle: "Provider preflight with withheld authority",
    stepTitleTr: "Sağlayıcı preflight ve askıda tutulan yetki",
    externalAuthorityRequired: false,
    acceptance: "S800, R2 → R3 geçiş işleri izinin T4 fazındaki Erişilebilirlik ve yerelleştirme bloğunun 3/13 Sağlayıcı preflight ve askıda tutulan yetki adımını exact S799 predecessor sonrasında ayrı typed descriptor ile fail-closed olarak kaydeder.",
    retainedBoundary: "Bu yalnız fail-closed software readiness kaydıdır. S571/S575 fiziksel gözlemleri salt-okunur taşınır (retained=2); yeni runtime/fiziksel gözlem=0, operatör yetkisi=0, dış kabul=0, cross-profile kapsam=false, acceptance_complete=false, release_track_complete=false, board-rpi5 kernel'e link=false ve RUNBOOK_EXECUTED_IN_S800=NO kalır. Bu faz dış kabul otoritesi gerektirmez; fiziksel gözlem yine de zorunludur.",
  },