S724 · Güven zinciri ve veri koruması · Kabul sözleşmesi kaydı

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

//! S724 Trust chain and data protection · Acceptance contract registration.
//!
//! Separate typed gate after S723, release track R2,
//! phase R2.3 (Trust chain and data protection), step
//! 1/8 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_s723_r2_field_phone_functions_resilience_boundary::S723_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 S724_SEQUENCE: usize = 724;
pub const S724_EXPECTED_PREDECESSOR: usize = S723_SEQUENCE;
pub const S724_TRACK: &str = "R2";
pub const S724_PHASE: &str = "R2.3";
pub const S724_BLOCK_ORDINAL: usize = 3;
pub const S724_BLOCK_STEP_COUNT: usize = 8;
pub const S724_STEP_ORDINAL: usize = 1;
pub const S724_ACCEPTANCE_DOMAIN: &str = "trust_chain_data_protection";
pub const S724_LINKED_INTO_BOARD_RPI5: bool = S708_TO_S899_LINKED_INTO_BOARD_RPI5;
pub const S724_NEW_SUPPORTED_PROFILE_RUNTIME_OBSERVATIONS: usize = 0;
pub const S724_NEW_PHYSICAL_OBSERVATIONS: usize = 0;
pub const S724_OPERATOR_AUTHORIZATIONS: usize = 0;
pub const S724_EXTERNAL_ACCEPTANCES: usize = 0;
pub const S724_PHYSICAL_OR_DEVICE_OPERATIONS: usize = 0;
pub const S724_ACCEPTANCE_COMPLETE: bool = false;
pub const S724_RELEASE_TRACK_COMPLETE: bool = false;
pub const RUNBOOK_EXECUTED_IN_S724: bool = false;

pub const S724_DESCRIPTOR: G8lProductAcceptanceGateDescriptor =
    G8lProductAcceptanceGateDescriptor {
        sequence: S724_SEQUENCE,
        predecessor_sequence: S724_EXPECTED_PREDECESSOR,
        track: S724_TRACK,
        phase: S724_PHASE,
        block_ordinal: S724_BLOCK_ORDINAL,
        block_step_count: S724_BLOCK_STEP_COUNT,
        step_ordinal: S724_STEP_ORDINAL,
        acceptance_domain: S724_ACCEPTANCE_DOMAIN,
        step: G8lProductAcceptanceStep::ContractRegistration,
        runtime_evidence_required: true,
        physical_evidence_required: true,
        external_authority_required: true,
    };

pub type G8lS724AcceptanceGateOutcome = G8lProductAcceptanceOutcome;
pub type G8lS724AcceptanceGateError = G8lProductAcceptanceError;

pub fn service_s724_model_r2_trust_chain_data_protection_contract(
    ledger: &mut G8lProductAcceptanceLedger,
    caller_cpu: usize,
) -> Result<G8lS724AcceptanceGateOutcome, G8lS724AcceptanceGateError> {
    advance_s708_to_s899_model_acceptance_gate(ledger, caller_cpu, S724_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_s724_r2_trust_chain_data_protection_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 s724_descriptor_is_exact_and_canonical() {
    assert_eq!(gate::S724_SEQUENCE, 724);
    assert_eq!(gate::S724_EXPECTED_PREDECESSOR, 723);
    assert_eq!(gate::S724_TRACK, "R2");
    assert_eq!(gate::S724_PHASE, "R2.3");
    assert_eq!(gate::S724_BLOCK_ORDINAL, 3);
    assert_eq!(gate::S724_BLOCK_STEP_COUNT, 8);
    assert_eq!(gate::S724_STEP_ORDINAL, 1);
    assert_eq!(gate::S724_ACCEPTANCE_DOMAIN, "trust_chain_data_protection");
    assert_eq!(gate::S724_DESCRIPTOR.external_authority_required, true);
    assert!(gate::S724_DESCRIPTOR.physical_evidence_required);
    assert_eq!(
        canonical_s708_to_s899_acceptance_descriptor(724),
        Some(gate::S724_DESCRIPTOR)
    );
}

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

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

#[test]
fn s724_open_claim_boundary_is_preserved() {
    assert_eq!(gate::S724_NEW_SUPPORTED_PROFILE_RUNTIME_OBSERVATIONS, 0);
    assert_eq!(gate::S724_NEW_PHYSICAL_OBSERVATIONS, 0);
    assert_eq!(gate::S724_OPERATOR_AUTHORIZATIONS, 0);
    assert_eq!(gate::S724_EXTERNAL_ACCEPTANCES, 0);
    assert_eq!(gate::S724_PHYSICAL_OR_DEVICE_OPERATIONS, 0);
    assert!(!gate::S724_ACCEPTANCE_COMPLETE);
    assert!(!gate::S724_RELEASE_TRACK_COMPLETE);
    assert!(!gate::S724_LINKED_INTO_BOARD_RPI5);
    assert!(!gate::RUNBOOK_EXECUTED_IN_S724);
}

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

#[test]
fn s724_descriptor_mutation_fails_before_ledger_advance() {
    let mut ledger = acceptance_ledger();
    advance_before(&mut ledger, 724);
    let before = ledger.last_completed_sequence();
    let mut drift = gate::S724_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 s724_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-s724-r2-trust-chain-data-protection-contract-partial",
    sequence: 724,
    slug: "r2_trust_chain_data_protection_contract",
    title: "Trust chain and data protection · Acceptance contract registration",
    titleTr: "Güven zinciri ve veri koruması · Kabul sözleşmesi kaydı",
    track: "R2",
    trackTitle: "Secure field phone",
    trackTitleTr: "Güvenli saha telefonu",
    phase: "R2.3",
    focusedTests: 8,
    sourceBytes: 3148,
    sourceSha256: "198d0bb88d617ce3fc19e9564560c162b9a0151b050c16e808caf0d7f861044c",
    testBytes: 9361,
    testSha256: "aabbd95513bb42c164655d36d1e1e9ebedb97dc7f35945da1af4fda8c7d8dc9e",
    blockOrdinal: 3,
    blockCount: 19,
    blockTitle: "Trust chain and data protection",
    blockTitleTr: "Güven zinciri ve veri koruması",
    blockStepCount: 8,
    stepOrdinal: 1,
    stepTitle: "Acceptance contract registration",
    stepTitleTr: "Kabul sözleşmesi kaydı",
    externalAuthorityRequired: true,
    acceptance: "S724, Güvenli saha telefonu izinin R2.3 fazındaki Güven zinciri ve veri koruması bloğunun 1/8 Kabul sözleşmesi kaydı adımını exact S723 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_S724=NO kalır. Operatör/şebeke, RF-EMC-SAR, bağımsız güvenlik veya yasal kabul bu faz için zorunludur ve henüz alınmamıştır.",
  },