S732 · A/B OTA, recovery ve anahtar yaşam döngüsü · Kabul sözleşmesi kaydı

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

//! S732 A-B OTA, recovery and key lifecycle · Acceptance contract registration.
//!
//! Separate typed gate after S731, release track R2,
//! phase R2.4 (A-B OTA, recovery and key lifecycle), step
//! 1/7 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_s731_r2_trust_chain_data_protection_boundary::S731_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 S732_SEQUENCE: usize = 732;
pub const S732_EXPECTED_PREDECESSOR: usize = S731_SEQUENCE;
pub const S732_TRACK: &str = "R2";
pub const S732_PHASE: &str = "R2.4";
pub const S732_BLOCK_ORDINAL: usize = 4;
pub const S732_BLOCK_STEP_COUNT: usize = 7;
pub const S732_STEP_ORDINAL: usize = 1;
pub const S732_ACCEPTANCE_DOMAIN: &str = "ab_ota_recovery_key_lifecycle";
pub const S732_LINKED_INTO_BOARD_RPI5: bool = S708_TO_S899_LINKED_INTO_BOARD_RPI5;
pub const S732_NEW_SUPPORTED_PROFILE_RUNTIME_OBSERVATIONS: usize = 0;
pub const S732_NEW_PHYSICAL_OBSERVATIONS: usize = 0;
pub const S732_OPERATOR_AUTHORIZATIONS: usize = 0;
pub const S732_EXTERNAL_ACCEPTANCES: usize = 0;
pub const S732_PHYSICAL_OR_DEVICE_OPERATIONS: usize = 0;
pub const S732_ACCEPTANCE_COMPLETE: bool = false;
pub const S732_RELEASE_TRACK_COMPLETE: bool = false;
pub const RUNBOOK_EXECUTED_IN_S732: bool = false;

pub const S732_DESCRIPTOR: G8lProductAcceptanceGateDescriptor =
    G8lProductAcceptanceGateDescriptor {
        sequence: S732_SEQUENCE,
        predecessor_sequence: S732_EXPECTED_PREDECESSOR,
        track: S732_TRACK,
        phase: S732_PHASE,
        block_ordinal: S732_BLOCK_ORDINAL,
        block_step_count: S732_BLOCK_STEP_COUNT,
        step_ordinal: S732_STEP_ORDINAL,
        acceptance_domain: S732_ACCEPTANCE_DOMAIN,
        step: G8lProductAcceptanceStep::ContractRegistration,
        runtime_evidence_required: true,
        physical_evidence_required: true,
        external_authority_required: false,
    };

pub type G8lS732AcceptanceGateOutcome = G8lProductAcceptanceOutcome;
pub type G8lS732AcceptanceGateError = G8lProductAcceptanceError;

pub fn service_s732_model_r2_ab_ota_recovery_key_lifecycle_contract(
    ledger: &mut G8lProductAcceptanceLedger,
    caller_cpu: usize,
) -> Result<G8lS732AcceptanceGateOutcome, G8lS732AcceptanceGateError> {
    advance_s708_to_s899_model_acceptance_gate(ledger, caller_cpu, S732_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_s732_r2_ab_ota_recovery_key_lifecycle_contract 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 s732_descriptor_is_exact_and_canonical() {
    assert_eq!(gate::S732_SEQUENCE, 732);
    assert_eq!(gate::S732_EXPECTED_PREDECESSOR, 731);
    assert_eq!(gate::S732_TRACK, "R2");
    assert_eq!(gate::S732_PHASE, "R2.4");
    assert_eq!(gate::S732_BLOCK_ORDINAL, 4);
    assert_eq!(gate::S732_BLOCK_STEP_COUNT, 7);
    assert_eq!(gate::S732_STEP_ORDINAL, 1);
    assert_eq!(
        gate::S732_ACCEPTANCE_DOMAIN,
        "ab_ota_recovery_key_lifecycle"
    );
    assert_eq!(gate::S732_DESCRIPTOR.external_authority_required, false);
    assert!(gate::S732_DESCRIPTOR.physical_evidence_required);
    assert_eq!(
        canonical_s708_to_s899_acceptance_descriptor(732),
        Some(gate::S732_DESCRIPTOR)
    );
}

#[test]
fn s732_is_cpu1_scoped_and_waits_for_exact_predecessor() {
    let mut ledger = acceptance_ledger();
    assert_eq!(
        gate::service_s732_model_r2_ab_ota_recovery_key_lifecycle_contract(&mut ledger, 0),
        Err(G8lProductAcceptanceError::WrongCpu)
    );
    assert_eq!(ledger.last_completed_sequence(), S708_CHAIN_TIP_SEQUENCE);
    if 732 == 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_s732_model_r2_ab_ota_recovery_key_lifecycle_contract(&mut ledger, 1),
            Ok(G8lProductAcceptanceOutcome::AwaitingPredecessor {
                sequence: 732,
                expected_predecessor: 731,
                observed_predecessor: 707,
            })
        ));
    }
}

#[test]
fn s732_advances_once_with_non_acceptance_receipt() {
    let mut ledger = acceptance_ledger();
    advance_before(&mut ledger, 732);
    let G8lProductAcceptanceOutcome::Advanced(receipt) =
        gate::service_s732_model_r2_ab_ota_recovery_key_lifecycle_contract(&mut ledger, 1).unwrap()
    else {
        panic!("S732 must advance")
    };
    assert_eq!((receipt.sequence, receipt.predecessor_sequence), (732, 731));
    assert_eq!(receipt.track, "R2");
    assert_eq!(receipt.phase, "R2.4");
    assert_eq!((receipt.block_ordinal, receipt.step_ordinal), (4, 1));
    assert_eq!(receipt.acceptance_domain, "ab_ota_recovery_key_lifecycle");
    assert_eq!(receipt.completed_block_count, 3);
    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 s732_replay_is_idempotent_and_historical_reentry_does_not_mutate() {
    let mut ledger = acceptance_ledger();
    advance_before(&mut ledger, 732);
    let G8lProductAcceptanceOutcome::Advanced(receipt) =
        gate::service_s732_model_r2_ab_ota_recovery_key_lifecycle_contract(&mut ledger, 1).unwrap()
    else {
        panic!("advance")
    };
    assert_eq!(
        gate::service_s732_model_r2_ab_ota_recovery_key_lifecycle_contract(&mut ledger, 1),
        Ok(G8lProductAcceptanceOutcome::Retained(receipt))
    );
    if 732 < S899_LAST_SEQUENCE {
        let next = canonical_s708_to_s899_acceptance_descriptor(732 + 1).unwrap();
        assert!(matches!(
            advance_s708_to_s899_model_acceptance_gate(&mut ledger, 1, next),
            Ok(G8lProductAcceptanceOutcome::Advanced(_))
        ));
        assert_eq!(
            gate::service_s732_model_r2_ab_ota_recovery_key_lifecycle_contract(&mut ledger, 1),
            Ok(G8lProductAcceptanceOutcome::AlreadyCompleted {
                requested_sequence: 732,
                last_completed_sequence: 732 + 1,
            })
        );
    }
}

#[test]
fn s732_open_claim_boundary_is_preserved() {
    assert_eq!(gate::S732_NEW_SUPPORTED_PROFILE_RUNTIME_OBSERVATIONS, 0);
    assert_eq!(gate::S732_NEW_PHYSICAL_OBSERVATIONS, 0);
    assert_eq!(gate::S732_OPERATOR_AUTHORIZATIONS, 0);
    assert_eq!(gate::S732_EXTERNAL_ACCEPTANCES, 0);
    assert_eq!(gate::S732_PHYSICAL_OR_DEVICE_OPERATIONS, 0);
    assert!(!gate::S732_ACCEPTANCE_COMPLETE);
    assert!(!gate::S732_RELEASE_TRACK_COMPLETE);
    assert!(!gate::S732_LINKED_INTO_BOARD_RPI5);
    assert!(!gate::RUNBOOK_EXECUTED_IN_S732);
}

#[test]
fn s732_is_simulation_only_and_adds_no_production_callsite() {
    const TARGET: &str = "g8l_target_dispatch_scheduler_owner_scheduler_mutation_production_migration_lifecycle_s732_r2_ab_ota_recovery_key_lifecycle_contract";
    let source = include_str!("../../kernel/src/g8l_target_dispatch_scheduler_owner_scheduler_mutation_production_migration_lifecycle_s732_r2_ab_ota_recovery_key_lifecycle_contract.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 S732_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_s732_").count(), 0);
}

#[test]
fn s732_descriptor_mutation_fails_before_ledger_advance() {
    let mut ledger = acceptance_ledger();
    advance_before(&mut ledger, 732);
    let before = ledger.last_completed_sequence();
    let mut drift = gate::S732_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 s732_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-s732-r2-ab-ota-recovery-key-lifecycle-contract-partial",
    sequence: 732,
    slug: "r2_ab_ota_recovery_key_lifecycle_contract",
    title: "A-B OTA, recovery and key lifecycle · Acceptance contract registration",
    titleTr: "A/B OTA, recovery ve anahtar yaşam döngüsü · Kabul sözleşmesi kaydı",
    track: "R2",
    trackTitle: "Secure field phone",
    trackTitleTr: "Güvenli saha telefonu",
    phase: "R2.4",
    focusedTests: 8,
    sourceBytes: 3156,
    sourceSha256: "280998eaf57dbd48fef019d52e4d8e2eb7c8b1c0f9e2eaae45a3a3f485bb9c0c",
    testBytes: 9406,
    testSha256: "7fcec603d07cb9ed9be7a1fa528fd2608da4c5f311c334654518ea7fac2b7ea3",
    blockOrdinal: 4,
    blockCount: 19,
    blockTitle: "A-B OTA, recovery and key lifecycle",
    blockTitleTr: "A/B OTA, recovery ve anahtar yaşam döngüsü",
    blockStepCount: 7,
    stepOrdinal: 1,
    stepTitle: "Acceptance contract registration",
    stepTitleTr: "Kabul sözleşmesi kaydı",
    externalAuthorityRequired: false,
    acceptance: "S732, Güvenli saha telefonu izinin R2.4 fazındaki A/B OTA, recovery ve anahtar yaşam döngüsü bloğunun 1/7 Kabul sözleşmesi kaydı adımını exact S731 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_S732=NO kalır. Bu faz dış kabul otoritesi gerektirmez; fiziksel gözlem yine de zorunludur.",
  },