synth_backend/arm_backend.rs
1//! ARM Backend — wraps the instruction selector + optimizer + encoder as a Backend
2//!
3//! This is Synth's custom ARM compiler targeting Cortex-M (Thumb-2).
4//! It's the only backend that supports per-rule formal verification (ASIL D path).
5
6use crate::ArmEncoder;
7use synth_core::backend::{
8 Backend, BackendCapabilities, BackendError, CodeRelocation, CompilationResult, CompileConfig,
9 CompiledFunction, LineMap, SafetyBounds,
10};
11use synth_core::target::{IsaVariant, TargetSpec};
12use synth_core::wasm_decoder::DecodedModule;
13use synth_core::wasm_op::WasmOp;
14use synth_synthesis::{
15 ArmInstruction, ArmOp, BoundsCheckConfig, InstructionSelector, OptimizationConfig,
16 OptimizerBridge, RuleDatabase, validate_instructions,
17};
18
19/// ARM Cortex-M backend using Synth's custom compiler pipeline
20pub struct ArmBackend;
21
22impl ArmBackend {
23 pub fn new() -> Self {
24 Self
25 }
26}
27
28impl Default for ArmBackend {
29 fn default() -> Self {
30 Self::new()
31 }
32}
33
34impl Backend for ArmBackend {
35 fn name(&self) -> &str {
36 "arm"
37 }
38
39 fn capabilities(&self) -> BackendCapabilities {
40 BackendCapabilities {
41 produces_elf: false,
42 supports_rule_verification: true,
43 supports_binary_verification: true,
44 is_external: false,
45 }
46 }
47
48 fn supported_targets(&self) -> Vec<TargetSpec> {
49 vec![
50 TargetSpec::cortex_m3(),
51 TargetSpec::cortex_m4(),
52 TargetSpec::cortex_m4f(),
53 TargetSpec::cortex_m7(),
54 TargetSpec::cortex_m7dp(),
55 ]
56 }
57
58 fn compile_module(
59 &self,
60 module: &DecodedModule,
61 config: &CompileConfig,
62 ) -> Result<CompilationResult, BackendError> {
63 let exports: Vec<_> = module
64 .functions
65 .iter()
66 .filter(|f| f.export_name.is_some())
67 .collect();
68
69 if exports.is_empty() {
70 return Err(BackendError::CompilationFailed(
71 "no exported functions found".into(),
72 ));
73 }
74
75 let mut functions = Vec::new();
76 for func in &exports {
77 let name = func.export_name.clone().unwrap();
78 // #359: copy THIS function's declared param widths into the config so
79 // `compile_function` (which carries no function index) can refuse a
80 // 64-bit param on the AAPCS stack-argument path. Cheap clone only when
81 // a signature table is present and this function has a width entry —
82 // otherwise reuse the shared config (every existing module unchanged).
83 // #509: same per-function pattern for the blocktype-arity side-table
84 // (value-carrying-branch lowering).
85 let params = config
86 .func_params_i64
87 .get(func.index as usize)
88 .filter(|p| !p.is_empty());
89 // #457: THIS function's DECLARED param count (imports-first full
90 // index), so the backend can cap the access-pattern inference that
91 // mistook a read-before-write local for a param. `None` when the
92 // driver supplied no arg-count table (hand-built modules).
93 let declared_params = config.func_arg_counts.get(func.index as usize).copied();
94 // GI-FPU-002 (#619/#369): THIS function's declared f32-param mask.
95 let params_f32 = config
96 .func_params_f32
97 .get(func.index as usize)
98 .filter(|p| !p.is_empty());
99 // GI-FPU-002 phase 2 (#369): THIS function's declared f64-param
100 // mask (hard-float targets decline f64 params loudly).
101 let params_f64 = config
102 .func_params_f64
103 .get(func.index as usize)
104 .filter(|p| !p.is_empty());
105 // GI-FPU-002 phase 2 (#719/#369): THIS function's declared f32/f64
106 // return flag, so the epilogue soundness guard fires on every driver
107 // path (not only the CLI loops).
108 let ret_f32 = config
109 .func_ret_f32
110 .get(func.index as usize)
111 .copied()
112 .unwrap_or(false);
113 let ret_f64 = config
114 .func_ret_f64
115 .get(func.index as usize)
116 .copied()
117 .unwrap_or(false);
118 // #1214: THIS function's declared-i64-local side-table. Guarded by
119 // `.any(i64)`, not `!is_empty()` — every function with ANY declared
120 // local (i32 included) has a non-empty vector, and that would
121 // widen this memoization guard to nearly every function for no
122 // reason; only a function that actually declares an i64 local
123 // needs the extra clone.
124 let declared_i64_locals = &func.declared_i64_locals;
125 let func_config = if params.is_some()
126 || params_f32.is_some()
127 || params_f64.is_some()
128 || !func.block_arity.is_empty()
129 || declared_params.is_some()
130 || ret_f32
131 || ret_f64
132 || declared_i64_locals.iter().any(|&b| b)
133 {
134 Some(CompileConfig {
135 current_func_params_i64: params.cloned().unwrap_or_default(),
136 current_func_params_f32: params_f32.cloned().unwrap_or_default(),
137 current_func_params_f64: params_f64.cloned().unwrap_or_default(),
138 current_func_ret_f32: ret_f32,
139 current_func_ret_f64: ret_f64,
140 current_func_block_arity: func.block_arity.clone(),
141 current_func_declared_i64_locals: declared_i64_locals.clone(),
142 current_func_param_count: declared_params,
143 ..config.clone()
144 })
145 } else {
146 None
147 };
148 let cfg = func_config.as_ref().unwrap_or(config);
149 let compiled = self.compile_function(&name, &func.ops, cfg)?;
150 functions.push(compiled);
151 }
152
153 Ok(CompilationResult {
154 functions,
155 elf: None,
156 backend_name: self.name().to_string(),
157 })
158 }
159
160 fn compile_function(
161 &self,
162 name: &str,
163 ops: &[WasmOp],
164 config: &CompileConfig,
165 ) -> Result<CompiledFunction, BackendError> {
166 let (code, relocations, line_map, branch_map, final_instrs) =
167 compile_wasm_to_arm(ops, config).map_err(BackendError::CompilationFailed)?;
168
169 // #778: derive the SOUND static WCET intermediate from the final Thumb-2
170 // stream. Only present for the Thumb-2 path; the core class (from the
171 // triple) decides whether the bound is sound (M3/M4) or declined (M7).
172 // Phase 2: any --wcet-hints entry for THIS function is verified (never
173 // trusted) by the loop analyzer. Phase 3: the intermediate carries the
174 // own-body cycles + direct call sites; the module driver composes it across
175 // the call graph. `wcet` here is the SINGLE-FUNCTION view (unresolved direct
176 // calls decline `call`) — a valid standalone answer, overwritten by the
177 // composed result when the driver runs the second pass.
178 let wcet_intermediate = final_instrs.as_ref().map(|instrs| {
179 let hints = config
180 .wcet_hints
181 .as_ref()
182 .and_then(|h| h.functions.get(name));
183 let self_label = config.current_func_index.map(|i| format!("func_{i}"));
184 crate::wcet::function_wcet_intermediate(
185 name,
186 instrs,
187 &config.target.triple,
188 hints,
189 self_label.as_deref(),
190 )
191 });
192 // The SINGLE-FUNCTION standalone view (unresolved direct calls decline
193 // `call`). Kept as a per-function fallback for any consumer that reads a
194 // lone `CompiledFunction` without running the module composer; the CLI
195 // `--emit-wcet` path IGNORES this and composes `wcet_intermediate` across
196 // the whole call graph instead (its result overwrites the report).
197 let wcet = final_instrs.map(|instrs| {
198 let hints = config
199 .wcet_hints
200 .as_ref()
201 .and_then(|h| h.functions.get(name));
202 crate::wcet::function_wcet_with_hints(name, &instrs, &config.target.triple, hints)
203 });
204
205 Ok(CompiledFunction {
206 name: name.to_string(),
207 code,
208 wasm_ops: ops.to_vec(),
209 relocations,
210 line_map,
211 branch_map,
212 wcet,
213 wcet_intermediate,
214 })
215 }
216
217 fn is_available(&self) -> bool {
218 true // Always available — it's a library backend
219 }
220}
221
222/// Count the number of function parameters by analyzing LocalGet patterns
223/// RQ-58-MIRRORS (#242): was a private copy of the read-before-write param
224/// heuristic, byte-equivalent to the other two backends'. Now the ONE shared
225/// definition in `synth-core`, so a correction reaches every backend.
226fn count_params(wasm_ops: &[WasmOp]) -> u32 {
227 synth_core::count_params_heuristic(wasm_ops)
228}
229
230/// #457/#970: the parameter count the selector is given.
231///
232/// With a DECLARED count from the driver the bound is
233/// `min(`[`synth_core::referenced_locals`]`(ops), declared)` — the highest
234/// local index the body touches, clamped by the signature. That is exact in
235/// both directions: the clamp stops a read-before-write NON-PARAM local (which
236/// WASM zero-initializes) from being homed in an argument register and reading
237/// caller garbage (#457), and taking the max over ALL accesses — writes as well
238/// as reads — stops a PARAM from being demoted to a local.
239///
240/// The previous rule capped [`count_params`] (a READ-FIRST heuristic) with the
241/// declared count, which got the second direction wrong: a param written on ONE
242/// arm of an `if` is "written first" in linear op order, so it was demoted, and
243/// because the demoted local's first access is a WRITE the #457 zero-init
244/// skipped it too. The arm that does NOT write it then read an UNINITIALISED
245/// frame slot — measured under unicorn with the sub-SP stack poisoned,
246/// `cond_write_param(0, 42)` returned the poison word, i.e. previous-frame
247/// bytes rather than 42 (#970; the aarch64 instance was #851).
248///
249/// `min` rather than a plain `declared` override preserves the leniency for a
250/// body that only touches the first few of many declared params.
251///
252/// `None` (no declared signature: hand-built op streams, direct
253/// `compile_function` callers) keeps the legacy pure inference — see the
254/// residual documented on [`CompileConfig::current_func_param_count`].
255fn effective_num_params(wasm_ops: &[WasmOp], config: &CompileConfig) -> u32 {
256 match config.current_func_param_count {
257 Some(declared) => synth_core::referenced_locals(wasm_ops).min(declared),
258 None => count_params(wasm_ops),
259 }
260}
261
262/// #539: fold the `i32.const 0; memory.grow m` idiom to `memory.size m`.
263/// Moved to `synth_core::rewrite_memory_grow_zero` (#242, VCR-SEL-005) so the
264/// ARM and RISC-V backends share ONE implementation and cannot drift; re-export
265/// here keeps the existing `rewrite_memory_grow_zero(...)` call sites working.
266use synth_core::rewrite_memory_grow_zero;
267
268/// #509: does the op stream contain a `br`/`br_if`/`br_table` that CARRIES a
269/// value — i.e. one targeting a result-typed block/if (forward edge with
270/// results > 0) or a parameterized loop header (backward edge with loop
271/// params > 0)?
272///
273/// The optimized path's wasm→IR lowering drops the carried value on such
274/// edges (the taken arm returns the fall-through result — same class as the
275/// #507 `br_table` drop, observed on `pick_br`/`pick_br_fall`), so — like
276/// #507 — the shape is detected on the raw op stream and routed to the direct
277/// selector, whose #509 designated-result-register lowering lands the value
278/// correctly. `block_arity` is the decoder's ordinal blocktype-arity
279/// side-table; when it is empty (hand-built op streams) every block reads as
280/// void and this never fires, keeping the optimized path byte-identical for
281/// every existing caller. Frozen-safe for the same reason as #507: the frozen
282/// fixtures compile `--relocatable` (already direct), and no optimized-path
283/// fixture branches to a result-typed block.
284fn has_value_carrying_branch(wasm_ops: &[WasmOp], block_arity: &[(u8, u8)]) -> bool {
285 // Open control constructs: (is_loop, params, results), innermost last.
286 let mut open: Vec<(bool, u8, u8)> = Vec::new();
287 let mut ctrl_ord = 0usize;
288 // A branch edge carries a value when its target is a result-typed forward
289 // join (block/if) or a parameterized loop header.
290 let carries = |open: &[(bool, u8, u8)], depth: u32| -> bool {
291 let Some(&(is_loop, params, results)) = open
292 .len()
293 .checked_sub(1 + depth as usize)
294 .and_then(|i| open.get(i))
295 else {
296 return false; // function-level target — handled by Return lowering
297 };
298 if is_loop { params > 0 } else { results > 0 }
299 };
300 for op in wasm_ops {
301 match op {
302 WasmOp::Block | WasmOp::If => {
303 let (p, r) = block_arity.get(ctrl_ord).copied().unwrap_or((0, 0));
304 ctrl_ord += 1;
305 open.push((false, p, r));
306 }
307 WasmOp::Loop => {
308 let (p, r) = block_arity.get(ctrl_ord).copied().unwrap_or((0, 0));
309 ctrl_ord += 1;
310 open.push((true, p, r));
311 }
312 WasmOp::End => {
313 open.pop(); // None only at the function-level end — harmless
314 }
315 WasmOp::Br(d) | WasmOp::BrIf(d) if carries(&open, *d) => return true,
316 WasmOp::BrTable { targets, default }
317 if targets
318 .iter()
319 .chain(std::iter::once(default))
320 .any(|d| carries(&open, *d)) =>
321 {
322 return true;
323 }
324 _ => {}
325 }
326 }
327 false
328}
329
330/// Core compilation: WASM ops → ARM machine code bytes + relocations
331///
332/// Returns (code_bytes, relocations) where relocations record BL instructions
333/// that target external symbols (e.g., `__meld_dispatch_import` for import calls).
334type CompileArmOutput = (
335 Vec<u8>,
336 Vec<CodeRelocation>,
337 LineMap,
338 synth_core::backend::BranchMap,
339 // #778: the SOUND static WCET result over the final Thumb-2 stream, computed
340 // by `compile_function` (which knows the function name); `None` for the A32
341 // path. Purely additive metadata — does not touch `code`.
342 Option<Vec<synth_synthesis::ArmInstruction>>,
343);
344
345fn compile_wasm_to_arm(
346 wasm_ops: &[WasmOp],
347 config: &CompileConfig,
348) -> Result<CompileArmOutput, String> {
349 // #1093: a PARAMETER-taking block type (`if`/`block`/`loop (param ..)`,
350 // wasm multi-value) declines LOUDLY here — the single choke point BOTH
351 // ARM codegen paths pass through, so neither the optimized route nor the
352 // #197 direct route can reach the selectors' frame-entry stack
353 // checkpoints, which cannot represent params consumed below them (the
354 // `split_off` panic with an `else`; a silently-wrong false-path value
355 // without one — see `find_param_block_type`). This is the aarch64
356 // VCR-A64-CF-001 frame-open refusal ported, NOT multi-value support.
357 // Checked on the driver's ORIGINAL stream, which is what the ordinal
358 // side-table was built against. Empty side-table (hand-built op streams)
359 // ⇒ never fires ⇒ byte-identical for every existing caller.
360 //
361 // RQ-64-MVLOWER (#1093): the guard is relaxed PER CONSTRUCT and PER PATH,
362 // from the one policy in synth-core (`arm_param_block_lowering`), on the
363 // configuration the #1097 oracle executes — `--relocatable`. The
364 // self-contained image path keeps the full decline: no oracle leg
365 // executes its images, so there is no evidence to relax on.
366 let lowered = synth_core::arm_param_block_lowering(config.relocatable);
367 if let Some((what, ord, arity)) = synth_core::find_unlowered_param_block_type(
368 wasm_ops,
369 &config.current_func_block_arity,
370 lowered,
371 ) {
372 return Err(synth_core::param_block_decline_msg(
373 if config.relocatable {
374 "the ARM direct selector (--relocatable)"
375 } else {
376 "the ARM selector (self-contained image path — no #1097 oracle \
377 leg executes it)"
378 },
379 what,
380 ord,
381 arity,
382 ));
383 }
384 // #539: `memory.grow(0)` must return the CURRENT page count, not the
385 // fixed-memory `-1` sentinel — growing by zero pages can never fail (WASM
386 // Core §4.4.7), so a guest doing `if (memory.grow(0) < 0) trap;` wrongly
387 // faulted. Every lowering path emitted a delta-agnostic `-1`. `memory.grow(0)`
388 // is semantically identical to `memory.size`, which the backend already
389 // computes from the runtime memory-size register (R10 >> 16 = pages), so fold
390 // the `i32.const 0; memory.grow` idiom to `memory.size` up front — backend-
391 // and path-agnostic. A non-zero delta keeps `-1` (fixed memory genuinely
392 // cannot grow); a runtime delta that happens to be 0 is the documented
393 // follow-up.
394 let rewritten = rewrite_memory_grow_zero(wasm_ops);
395 // #494 phase 2b: the fact-spec guard-elision marks are keyed by op index
396 // into the stream the DRIVER handed us. The memory.grow(0) fold above can
397 // only shift indices AT OR AFTER a `memory.grow` — an op the fact-spec
398 // walk never crosses (it stops at the first untracked op, so no mark can
399 // follow one). Defense in depth: if the fold fired at all, drop the marks
400 // loudly rather than risk keying a guard elision to the wrong op.
401 //
402 // VCR-MEM-004 (#901): scry's externally-proven bounds-guard marks ride the
403 // SAME defensive gate for the SAME reason — they are op-index keyed, so an
404 // index shift would strip the guard off the wrong access. They are unioned
405 // with #494's certificate-discharged marks here (one consumption point,
406 // two authorities; `CompileConfig` keeps them separate so the attestation
407 // can say which one covered each site).
408 let (fact_div_zero_elide, fact_div_ovf_elide, mem_bounds_elide): (
409 &[usize],
410 &[usize],
411 Vec<usize>,
412 ) = if rewritten.len() == wasm_ops.len() {
413 let mut mem = config.fact_mem_bounds_elide.clone();
414 mem.extend_from_slice(&config.proven_safe_mem_elide);
415 mem.sort_unstable();
416 mem.dedup();
417 (&config.fact_div_zero_elide, &config.fact_div_ovf_elide, mem)
418 } else {
419 if !config.fact_div_zero_elide.is_empty()
420 || !config.fact_div_ovf_elide.is_empty()
421 || !config.fact_mem_bounds_elide.is_empty()
422 {
423 eprintln!(
424 "fact-spec: DECLINE guard elision marks dropped — the memory.grow(0) fold shifted op indices (#494 defensive gate); general lowering emitted"
425 );
426 }
427 if !config.proven_safe_mem_elide.is_empty() {
428 eprintln!(
429 "proven-safe: DECLINE {} bounds-guard elision mark(s) dropped — the \
430 memory.grow(0) fold shifted op indices, so the (func, pc) keys no longer \
431 name the accesses scry proved (VCR-MEM-004 defensive gate, #901); every \
432 guard is retained",
433 config.proven_safe_mem_elide.len()
434 );
435 }
436 (&[], &[], Vec::new())
437 };
438 let wasm_ops: &[WasmOp] = &rewritten;
439
440 // #457: `count_params` INFERS the param count from access patterns (a local
441 // whose first access is a read is assumed to be a param), so a
442 // read-before-write NON-PARAM local — which WASM zero-initializes — was
443 // indistinguishable from a param: it got homed in a parameter register and
444 // read caller garbage instead of 0. The driver supplies the DECLARED count
445 // (`current_func_param_count`, from the module's type section) to settle it.
446 //
447 // #970 (RQ-57-CONDPARAM): see [`effective_num_params`] for the bound and
448 // why the read-first inference is not it.
449 let inferred_params = count_params(wasm_ops);
450 let num_params = effective_num_params(wasm_ops, config);
451 // A read-before-write non-param local exists iff the ACCESS-PATTERN
452 // inference overshot the declared count — the read-first rule can only
453 // exceed it via a read-first index >= the declared count, which is exactly
454 // such a local. (Unchanged by #970: `referenced >= inferred` always, so
455 // `num_params < inferred_params` still holds iff `inferred > declared`;
456 // stated directly here rather than left to that algebra.)
457 let has_rbw_local = match config.current_func_param_count {
458 Some(declared) => inferred_params > declared,
459 None => false,
460 };
461
462 let bounds_config = match config.effective_safety_bounds() {
463 SafetyBounds::None => BoundsCheckConfig::None,
464 SafetyBounds::Mpu => BoundsCheckConfig::Mpu,
465 SafetyBounds::Software => BoundsCheckConfig::Software,
466 SafetyBounds::Mask => {
467 // #651 (mirroring the RISC-V backend's compile-time decline):
468 // index masking wraps `ea & (size-1)` — a modulo only when the
469 // linear-memory size is a power of two. With a non-power-of-two
470 // size the AND would silently REMAP in-bounds addresses (e.g.
471 // 0x18000 & 0x2FFFF = 0x8000 for a 192 KiB memory). Decline
472 // loudly rather than miscompile.
473 //
474 // RQ-57-SENTINEL (#953 sibling): `bytes == 0` used to be EXEMPT
475 // from this check, because 0 was read as "unknown — plain
476 // per-function path, no module context". But 0 is also exactly
477 // what a module declaring `(memory 0)` produces, and for that
478 // module the emitted guard (`SUB R12, R10, #1; AND addr, R12`,
479 // R10 = 0 baked by the startup) computes `0 - 1 = 0xFFFFFFFF` —
480 // an IDENTITY mask. Every access then executes unmasked at
481 // `[R11 + addr]` for any 32-bit addr: an unbounded OOB read/write
482 // in the mode whose purpose is bounding. Same sentinel/value
483 // collision as #932/#953, third backend-mode instance.
484 //
485 // 0 now means what #953 made it mean everywhere: a zero-byte
486 // memory. No mask can bound an access into a memory with no bytes
487 // (wasm semantics: every access traps), and wrap-not-trap has
488 // nothing to wrap into — refuse. Callers with no module context
489 // must state the size (the #953 contract; the CLI single-function
490 // path now threads the module's declared size for all backends).
491 let bytes = config.linear_memory_bytes;
492 if bytes == 0 {
493 return Err("--safety-bounds mask: the linear memory has ZERO bytes \
494 (`(memory 0)`, or a driver that did not state the size) — \
495 every access is out of bounds and a mask cannot express a \
496 trap. Use --safety-bounds software (traps every access) \
497 or declare a non-zero memory (RQ-57-SENTINEL, #953)"
498 .to_string());
499 }
500 if !bytes.is_power_of_two() {
501 return Err(format!(
502 "--safety-bounds mask requires a power-of-two linear-memory \
503 size, got {bytes} bytes — switch to --safety-bounds software \
504 for the deterministic check (#651)"
505 ));
506 }
507 BoundsCheckConfig::Masking
508 }
509 };
510
511 // The non-optimized (direct) instruction-selection path. Handles f32 via
512 // VFP/FPU. Used directly when `--no-optimize` is set, and as the fallback
513 // when the optimized path declines a module (see issue #120 below).
514 //
515 // VCR-RA-001 step 3b-lite (#242): a FRESH selector per attempt, with
516 // `spill_on_exhaustion` set only on the retry — the first pass is the
517 // unmodified default, so every function that compiles today is selected by
518 // exactly the code that compiled it yesterday (bit-identity is structural,
519 // not behavioural).
520 let select_direct_attempt = |spill_on_exhaustion: bool,
521 param_backing_on_exhaustion: bool,
522 local_promote: bool,
523 i64_spill_slots: Option<usize>,
524 vfp_spill_on_exhaustion: bool,
525 vfp_frame_home_locals: bool,
526 vfp_wide_file: bool|
527 -> Result<Vec<ArmInstruction>, synth_core::Error> {
528 let db = RuleDatabase::with_standard_rules();
529 let mut selector =
530 InstructionSelector::with_bounds_check(db.rules().to_vec(), bounds_config);
531 selector.set_target(config.target.fpu, &config.target.triple);
532 if config.num_imports > 0 {
533 selector.set_num_imports(config.num_imports);
534 }
535 // #195: plumb the callee argument-count tables so the direct selector can
536 // marshal call arguments into R0–R3 per AAPCS.
537 selector.set_func_arg_counts(
538 config.func_arg_counts.clone(),
539 config.type_arg_counts.clone(),
540 );
541 // #197: in relocatable host-link mode, emit direct `func_N` BLs for
542 // imports (rewritten to the wasm field name by build_relocatable_elf)
543 // instead of `__meld_dispatch_import`.
544 selector.set_relocatable(config.relocatable);
545 // #642: call_indirect guard inputs (compile-time table size for the
546 // bounds guard + closed-world type verdicts). Without them, every
547 // call_indirect lowering declines loudly.
548 selector.set_call_indirect_guards(config.call_indirect_guards.clone());
549 // #275: on the self-contained image path (NOT --relocatable) the R11
550 // funcref-table dispatch is a silent miscompile — the region is only
551 // populated by an external runtime, which a self-contained ELF does
552 // not have, so the dispatch would read function pointers from
553 // linear-memory data. Two outcomes:
554 // - the Thumb-2 `--cortex-m` image path (CLI-flagged: the builder
555 // that emits and patches the flash-resident funcref table will
556 // run) lowers call_indirect through that table, PC-relative,
557 // never via R11;
558 // - every OTHER self-contained configuration (A32/Cortex-R5, the
559 // simple-ELF builder, imports present) keeps the loud decline.
560 // The host-linked (--relocatable) path keeps the guarded R11
561 // dispatch: there a runtime places the table region at R11.
562 let self_contained_table = config.self_contained_funcref_table
563 && matches!(config.target.isa, IsaVariant::Thumb2 | IsaVariant::Thumb);
564 selector
565 .set_reject_self_contained_call_indirect(!config.relocatable && !self_contained_table);
566 selector.set_self_contained_funcref_table(self_contained_table);
567 // #237: native-pointer ABI — wasm statics become __synth_wasm_data-relative.
568 selector.set_native_pointer_abi(config.native_pointer_abi, config.linear_memory_bytes);
569 // VCR-MEM-002 phase 1 (#406): per-memory initial page counts — enables
570 // the multi-memory arms (memory-0 lowering never reads it; empty ⇒
571 // every multi-memory op declines loudly).
572 selector.set_memory_pages(config.memory_pages.clone());
573 // #311: i64 call results are register PAIRS — tag them.
574 selector.set_result_types(config.func_ret_i64.clone(), config.type_ret_i64.clone());
575 // #1210: per-function result COUNT (0 = void) — `func_ret_i64` alone
576 // cannot tell a void callee from an i32-returning one.
577 selector.set_func_result_counts(config.func_result_counts.clone());
578 // #359: declared param widths of THIS function, so the AAPCS stack-arg
579 // path can refuse 64-bit params (Ok-or-Err). Empty ⇒ assume i32.
580 selector.set_params_i64(config.current_func_params_i64.clone());
581 // GI-FPU-002 (#619/#369): declared f32-param mask — home hard-float f32
582 // args in S0..S15 (AAPCS-VFP) instead of the R0..R3 integer path.
583 selector.set_params_f32(config.current_func_params_f32.clone());
584 // GI-FPU-002 phase 2 (#369): declared f64-param mask — hard-float
585 // targets decline f64-param functions loudly (no D-register homing yet).
586 selector.set_params_f64(config.current_func_params_f64.clone());
587 // GI-FPU-002 phase 2 (#719/#369): THIS function's f32/f64 return flag, so
588 // the epilogue loudly declines a float result reaching it in a core
589 // register (never a silent integer R0 return where a caller reads S0/D0).
590 selector.set_ret_float(config.current_func_ret_f32, config.current_func_ret_f64);
591 // GI-FPU-002 phase 3 (#369): per-callee float-signature tables. `Call`
592 // marshals the AAPCS-VFP boundary from these (float args into S0../D0..,
593 // float results out of S0/D0); `CallIndirect` still declines a
594 // float-returning static type loudly.
595 selector.set_float_call_signatures(
596 config.func_ret_f32.clone(),
597 config.func_ret_f64.clone(),
598 config.type_ret_f32.clone(),
599 config.type_ret_f64.clone(),
600 config.func_params_f32.clone(),
601 config.func_params_f64.clone(),
602 );
603 // #509: blocktype-arity side-table of THIS function, so value-carrying
604 // br/br_if/br_table land the carried value in the target block's
605 // designated result register instead of dropping it. Empty ⇒ legacy
606 // void-block lowering.
607 selector.set_block_arity(config.current_func_block_arity.clone());
608 // #1214: THIS function's declared-i64-local side-table — see
609 // `compute_local_layout`'s use of it. Empty ⇒ exactly the prior
610 // dataflow-only width inference.
611 selector.set_declared_i64_locals(config.current_func_declared_i64_locals.clone());
612 // Stack-pointer promotion is meaningful only under the native-pointer ABI;
613 // gating here keeps every non-native compile (all frozen fixtures) on the
614 // legacy R9 globals-table path, bit-identical.
615 if config.native_pointer_abi
616 && let Some((sp_idx, sp_init)) = config.stack_pointer_global
617 {
618 selector.set_native_pointer_stack(sp_idx, sp_init);
619 }
620 // #643: per-global slot widths — i64/f64 globals occupy 8-byte slots
621 // (register-pair store/load) and shift every later global's offset.
622 // Empty for i32-only modules ⇒ the legacy `idx * 4` layout, unchanged.
623 selector.set_global_widths(config.global_widths.clone());
624 selector.set_spill_on_exhaustion(spill_on_exhaustion);
625 selector.set_param_backing_on_exhaustion(param_backing_on_exhaustion);
626 // #881 (VCR-RA-004): VFP register-file spilling, set ONLY on the retry
627 // after an attempt failed with a GI-FPU-002 exhaustion Err — functions
628 // that compile without it keep byte-identical output by construction.
629 selector.set_vfp_spill_on_exhaustion(vfp_spill_on_exhaustion);
630 // #1069: LAST-resort residence lever — set ONLY by the final VFP
631 // retry below, after the plain #881 rung also exhausted, so every
632 // function that compiles through base path or plain rung is produced
633 // by exactly yesterday's path (byte-identity is structural).
634 selector.set_vfp_frame_home_locals(vfp_frame_home_locals);
635 // RQ-67-VFPREACH (#1267): the AAPCS callee-saved VFP half.
636 selector.set_vfp_wide_file(vfp_wide_file);
637 // #587 pool-grow rung: a larger i64 spill-slot pool, set ONLY on the
638 // retry after an attempt failed with the slot-pool-exhausted Err —
639 // functions that compile with the default pool keep their frame
640 // byte-identical by construction.
641 if let Some(slots) = i64_spill_slots {
642 selector.set_i64_spill_slots(slots);
643 }
644 // VCR-RA local promotion (#390, #242): keep eligible non-param i32 locals
645 // in callee-saved registers instead of frame slots — the structural lever
646 // toward native parity. DEFAULT-ON as of v0.14.0: gale's G474RE DWT gate
647 // cleared it as a net win (gust_mix dissolved 58→50 cyc/call −14%, all 5
648 // stack spill/reloads eliminated, correctness bit-identical over [0,2047],
649 // 2.00×→1.72× vs LLVM). Escape hatch: `SYNTH_NO_LOCAL_PROMOTE=1` restores
650 // the frame-slot path. Leaf-only / i32-only / ARM-only (see
651 // compute_local_promotion); the leaf-only lift + i64 locals are follow-ons.
652 // #474: `local_promote` is now a per-attempt parameter so the retry ladder
653 // can drop promotion as an exhaustion-recovery rung (promotion pins r4-r8,
654 // which on a dense function leaves the spill allocator with nothing to
655 // free → the frame-slot path is the escape that restores compilability).
656 selector.set_local_promote(local_promote);
657 // #494 phase 2b: certificate-discharged div/rem trap-guard elision
658 // marks (empty in every compile without SYNTH_FACT_SPEC + facts).
659 selector
660 .set_fact_div_guard_elisions(fact_div_zero_elide.to_vec(), fact_div_ovf_elide.to_vec());
661 // #494 bounds-elision + VCR-MEM-004 (#901): per-site memory
662 // bounds-guard marks, unioned above. Empty in every compile without
663 // SYNTH_FACT_SPEC + facts or --proven-safe.
664 selector.set_fact_mem_bounds_elisions(mem_bounds_elide.clone());
665 selector.select_with_stack(wasm_ops, num_params)
666 };
667 let select_direct = || -> Result<Vec<ArmInstruction>, String> {
668 const SINGLE_EXHAUSTION: &str = "all allocatable registers are live on the stack";
669 const PAIR_EXHAUSTION: &str = "no consecutive pair of free registers for i64";
670 const SLOT_EXHAUSTION: &str = "i64 spill-slot pool exhausted";
671 // The full exhaustion-recovery ladder, parameterized on whether local
672 // promotion is enabled. Each rung is reached only when the previous one
673 // returned a recoverable register-exhaustion Err, so a function that
674 // compiles on the first attempt is untouched by the later rungs. Returns
675 // the result AND which rung produced it (for the #242 measurement below).
676 let recovery_ladder =
677 |promote: bool,
678 i64_spill_slots: Option<usize>,
679 vfp_spill: bool,
680 vfp_frame: bool,
681 vfp_wide: bool|
682 -> (Result<Vec<ArmInstruction>, synth_core::Error>, &'static str) {
683 let mut attempt = select_direct_attempt(
684 false,
685 false,
686 promote,
687 i64_spill_slots,
688 vfp_spill,
689 vfp_frame,
690 vfp_wide,
691 );
692 let mut rung = "base";
693 // VCR-RA-001 step 3b-lite (#242): the i32 register-exhaustion
694 // hard-fail is recoverable — retry with spill-on-exhaustion, which
695 // reserves the spill area and spills the deepest stack value when
696 // the pool is full.
697 if let Err(e) = &attempt
698 && e.to_string().contains(SINGLE_EXHAUSTION)
699 {
700 attempt = select_direct_attempt(
701 true,
702 false,
703 promote,
704 i64_spill_slots,
705 vfp_spill,
706 vfp_frame,
707 vfp_wide,
708 );
709 rung = "spill";
710 }
711 // VCR-RA-001 acceptance increment (#242): the i64 consecutive-PAIR
712 // exhaustion is recoverable too — not by stack spilling (the pair
713 // allocator already spills stack values, #171) but by frame-backing
714 // the params (#204) so they stop pinning R0-R3, with spill kept on.
715 if let Err(e) = &attempt
716 && e.to_string().contains(PAIR_EXHAUSTION)
717 {
718 attempt = select_direct_attempt(
719 true,
720 true,
721 promote,
722 i64_spill_slots,
723 vfp_spill,
724 vfp_frame,
725 vfp_wide,
726 );
727 rung = "param-backing";
728 }
729 (attempt, rung)
730 };
731 // #474: local promotion (default-on since v0.14.0) is an OPTIMIZATION — it
732 // must never be the reason a function fails to compile. Run the full ladder
733 // with promotion first (so every function that compiles today is
734 // bit-identical), and if it still ends in register exhaustion, fall back to
735 // the promotion-off ladder (the v0.12.0 frame-slot lowering — exactly what
736 // the `SYNTH_NO_LOCAL_PROMOTE=1` workaround does, now automatic). Promotion
737 // pins r4-r8 for the locals; on a dense function that leaves the allocator
738 // with nothing to free, so dropping it restores compilability. The fallback
739 // is reached ONLY by functions that exhaust WITH promotion, so promotion-on
740 // output is untouched by construction (frozen byte gate stays green).
741 let promote = std::env::var("SYNTH_NO_LOCAL_PROMOTE").is_err();
742 // The full pre-#587 recovery sequence (promotion-on ladder, then the
743 // #474 promotion-off fallback), parameterized on the pool size so the
744 // pool-grow retry below reruns it verbatim.
745 let full_sequence = |slots: Option<usize>,
746 vfp_spill: bool,
747 vfp_frame: bool,
748 vfp_wide: bool|
749 -> (
750 Result<Vec<ArmInstruction>, synth_core::Error>,
751 &'static str,
752 bool,
753 ) {
754 let (mut attempt, mut rung) =
755 recovery_ladder(promote, slots, vfp_spill, vfp_frame, vfp_wide);
756 let mut promotion_dropped = false;
757 if promote
758 && attempt
759 .as_ref()
760 .err()
761 .is_some_and(|e| e.to_string().contains("register exhaustion"))
762 {
763 let (rescued, off_rung) =
764 recovery_ladder(false, slots, vfp_spill, vfp_frame, vfp_wide);
765 if rescued.is_ok() {
766 attempt = rescued;
767 rung = off_rung;
768 promotion_dropped = true;
769 }
770 }
771 (attempt, rung, promotion_dropped)
772 };
773 let (mut attempt, mut rung, mut promotion_dropped) =
774 full_sequence(None, false, false, false);
775 // #587 pool-grow retry (the falcon func_60/func_73 remainder): the fixed
776 // 8-slot i64 spill pool can exhaust while spilling is otherwise working —
777 // an i64-dense function simply has more values simultaneously live than
778 // the pool holds. Rerun the ENTIRE sequence (every rung, both promotion
779 // modes) with the pool sized from a conservative operand-stack-depth
780 // bound: the number of simultaneously spilled values can never exceed
781 // the operand-stack depth, plus a few transient slots (the arg-move
782 // cycle resolver and call-result parking each borrow one). The selector
783 // clamps the request to its 12-bit-friendly cap; a function that still
784 // exhausts stays an honest loud skip. Deliberately LAST — after the #474
785 // promotion-off fallback — so any function that compiled yesterday
786 // (through any rung or fallback) is produced by exactly yesterday's
787 // path, byte-identical; the grown pool only ever fires for functions
788 // whose every existing escape ended in the slot-pool Err.
789 if attempt
790 .as_ref()
791 .err()
792 .is_some_and(|e| e.to_string().contains(SLOT_EXHAUSTION))
793 {
794 let depth = synth_core::wasm_stack_check::max_depth_bound(wasm_ops) as usize;
795 let (grown, _, grown_dropped) =
796 full_sequence(Some(depth.saturating_add(4)), false, false, false);
797 if grown.is_ok() {
798 attempt = grown;
799 rung = "pool-grow";
800 promotion_dropped = grown_dropped;
801 }
802 }
803 // #881 (VCR-RA-004): the GI-FPU-002 VFP register-file exhaustion is
804 // recoverable too — retry the ENTIRE sequence with VFP spilling
805 // enabled (the pre-op pressure guard spills the deepest segment-local
806 // f32/f64 stack value into the shared spill area and reloads spilled
807 // operands before their consumers). Deliberately LAST, after every
808 // integer rung, so any function that compiled yesterday is produced
809 // by exactly yesterday's path; the VFP rung only ever fires for
810 // functions whose every existing escape ended in a GI-FPU-002
811 // exhaustion Err (previously an unconditional loud skip). A VFP-
812 // spilling function can in turn exhaust the shared slot pool — the
813 // #587 pool-grow retry composes inside the rung.
814 const VFP_S_EXHAUSTION: &str = "VFP register file exhausted";
815 const VFP_D_EXHAUSTION: &str = "VFP D-register file exhausted";
816 if attempt.as_ref().err().is_some_and(|e| {
817 let msg = e.to_string();
818 msg.contains(VFP_S_EXHAUSTION) || msg.contains(VFP_D_EXHAUSTION)
819 }) {
820 // Stage 1 — the plain #881 rung, exactly yesterday's path
821 // (sequence, pool sizing and all): any function it rescues is
822 // byte-identical to what it shipped yesterday, by construction.
823 let (vfp, vfp_rung, vfp_dropped) = full_sequence(None, true, false, false);
824 let (vfp, vfp_rung, vfp_dropped) = if vfp.as_ref().err().is_some_and(|e| {
825 let msg = e.to_string();
826 msg.contains(SLOT_EXHAUSTION) || msg.contains("spilling the VFP register file")
827 }) {
828 let depth = synth_core::wasm_stack_check::max_depth_bound(wasm_ops) as usize;
829 let (grown, grown_rung, grown_dropped) =
830 full_sequence(Some(depth.saturating_add(4)), true, false, false);
831 if grown.is_ok() {
832 (grown, grown_rung, grown_dropped)
833 } else {
834 (vfp, vfp_rung, vfp_dropped)
835 }
836 } else {
837 (vfp, vfp_rung, vfp_dropped)
838 };
839 if vfp.is_ok() {
840 attempt = vfp;
841 rung = match vfp_rung {
842 "base" => "vfp-spill",
843 _ => "vfp-spill+int",
844 };
845 promotion_dropped = vfp_dropped;
846 } else {
847 // Stage 2 (#1069, RQ-60-VFPPRESSURE increment 2) — LAST
848 // resort: the plain rung ALSO failed, i.e. the pressure is
849 // not (only) operand-stack values but PINNED LOCAL HOMES,
850 // which the #881 victim search rightly never touches (a home
851 // lives for the function's extent). Rerun the entire
852 // sequence with frame-homed overflow locals: a fresh
853 // f32/f64 local whose home grant would pin above the S7/D3
854 // cap lives in the frame from its first def. Reached ONLY by
855 // functions that failed every prior escape, so nothing that
856 // compiles today moves a byte.
857 let (fh, fh_rung, fh_dropped) = full_sequence(None, true, true, false);
858 let (fh, fh_rung, fh_dropped) = if fh.as_ref().err().is_some_and(|e| {
859 let msg = e.to_string();
860 // The frame-homed-local slot demand (a PERMANENT slot per
861 // frame-resident float local) is a third way the shared
862 // pool exhausts — its trigger substring is the selector's
863 // own pub const, not a second copy that could drift (the
864 // #881 substring-is-control-flow lesson, pinned red-first
865 // by the live24 fixture test).
866 msg.contains(SLOT_EXHAUSTION)
867 || msg.contains("spilling the VFP register file")
868 || msg.contains(
869 synth_synthesis::instruction_selector::VFP_FRAME_HOME_SLOT_EXHAUSTION,
870 )
871 }) {
872 let depth = synth_core::wasm_stack_check::max_depth_bound(wasm_ops) as usize;
873 // Frame-homed locals hold their slots for the function's
874 // extent, OUTSIDE the operand-stack depth bound — size
875 // the grown pool for both. Distinct `local.set`/
876 // `local.tee` targets over-approximate the frame-homed
877 // local count; the selector clamps the request to its
878 // cap, and a function that still exhausts stays an
879 // honest loud skip.
880 let local_targets: std::collections::HashSet<u32> = wasm_ops
881 .iter()
882 .filter_map(|op| match op {
883 synth_synthesis::WasmOp::LocalSet(i)
884 | synth_synthesis::WasmOp::LocalTee(i) => Some(*i),
885 _ => None,
886 })
887 .collect();
888 let (grown, grown_rung, grown_dropped) = full_sequence(
889 Some(depth.saturating_add(local_targets.len()).saturating_add(4)),
890 true,
891 true,
892 false,
893 );
894 if grown.is_ok() {
895 (grown, grown_rung, grown_dropped)
896 } else {
897 (fh, fh_rung, fh_dropped)
898 }
899 } else {
900 (fh, fh_rung, fh_dropped)
901 };
902 if fh.is_ok() {
903 attempt = fh;
904 rung = match fh_rung {
905 "base" => "vfp-frame-locals",
906 _ => "vfp-frame-locals+int",
907 };
908 promotion_dropped = fh_dropped;
909 } else {
910 // Stage 3 (#1267, RQ-67-VFPREACH) — THE LAST RESORT, and the
911 // reach half of #1204's root shape. Every escape above has
912 // now ended in GI-FPU-002, so this function DECLINES today.
913 //
914 // It declines against HALF the register file: synth
915 // allocates S0-S15/D0-D7 because S16-S31/D8-D15 are AAPCS
916 // CALLEE-saved and, until this release, nothing could save
917 // them — VPUSH/VPOP did not exist in the encoder. Every FPU
918 // target synth supports actually has D0-D15 = S0-S31.
919 //
920 // Reached ONLY here, so a function that compiles today is
921 // produced by exactly today's path and cannot move a byte —
922 // the #881 rung discipline, measured over the corpus rather
923 // than asserted. The selector emits the VPUSH/VPOP pair and
924 // REFUSES functions with stack-passed params (#1273), so a
925 // failure here stays the honest loud decline it already was.
926 let (wide, wide_rung, wide_dropped) = full_sequence(None, true, true, true);
927 if wide.is_ok() {
928 attempt = wide;
929 rung = match wide_rung {
930 "base" => "vfp-wide-file",
931 _ => "vfp-wide-file+int",
932 };
933 promotion_dropped = wide_dropped;
934 } else {
935 attempt = fh;
936 promotion_dropped = fh_dropped;
937 }
938 }
939 }
940 }
941 // VCR-RA measurement (#242): log which recovery rung produced the result,
942 // so the per-rung distribution across a corpus can be measured — the size
943 // of the failure surface a verified allocator must subsume (see
944 // scripts/repro/register_exhaustion_recovery_ladder.md). Logging only:
945 // emitted bytes are unchanged, so the frozen byte gate is unaffected.
946 if std::env::var("SYNTH_RECOVERY_STATS").is_ok() {
947 eprintln!(
948 "[recovery-stats] rung={rung}{} result={}",
949 if promotion_dropped {
950 " promotion-off"
951 } else {
952 ""
953 },
954 if attempt.is_ok() { "ok" } else { "exhausted" },
955 );
956 }
957 attempt.map_err(|e| format!("instruction selection failed: {}", e))
958 };
959
960 // Instruction selection: optimized or direct.
961 //
962 // #197: `--relocatable` (host-link ET_REL) forces the direct selector. The
963 // optimized path materializes an absolute linmem base (0x20000100) and does
964 // not preserve caller-saved registers across calls — both wrong for a
965 // host-linked object, where the linmem base arrives via `fp` at runtime and
966 // callees follow AAPCS. `select_with_stack` (now i64-spill capable after
967 // #171) handles fp-relative memory + caller-saved preservation correctly.
968 //
969 // #507: `br_table` is DROPPED during the optimized path's wasm→IR lowering
970 // (`optimize_full`), so `ir_to_arm` never sees the dispatch — it emits the
971 // arm bodies in fall-through sequence with no `cmp`/branch on the selector, a
972 // SILENT miscompile (every input hits the last arm). The selector value isn't
973 // even loaded. Because the drop happens before `ir_to_arm`, there's no `Err`
974 // to fall back on; detect it on the raw wasm op stream here and force the
975 // direct selector (`select_with_stack` lowers `br_table` correctly as a
976 // cmp-chain — confirmed on the `--relocatable` path). Same honest-degradation
977 // contract as the issue-#120 f32 decline: the function still compiles
978 // correctly, just without IR-level optimization. Frozen-safe: the frozen
979 // fixtures compile `--relocatable` (already direct), and no optimized-path
980 // fixture (control_step, flight_algo) contains `br_table`.
981 let has_br_table = wasm_ops
982 .iter()
983 .any(|op| matches!(op, WasmOp::BrTable { .. }));
984 // #509: the optimized path also drops the value carried by a `br`/`br_if`
985 // to a result-typed block (the taken edge returns the wrong arm's value —
986 // same silent-miscompile class as the #507 br_table drop). Route the shape
987 // to the direct selector, whose designated-result-register lowering (#509)
988 // lands the carried value at the join. Never fires for void-block control
989 // flow (all frozen/optimized fixtures), so those stay byte-identical.
990 let has_value_carry = has_value_carrying_branch(wasm_ops, &config.current_func_block_arity);
991 // #503-i64/#518: route any signature with a 64-bit (i64/f64) param to the
992 // direct selector. The optimized path's param homing is width-naive — its
993 // #518 decline covers only functions that READ an i64 param (an `I64Load`
994 // from a param index), so a function that reads an i32 param whose AAPCS
995 // home a preceding wide param SHIFTED (e.g. p1 of `(i64 i32)` lives in R2,
996 // not R1; p3 of `(i64 i32 i32 i32)` lives on the stack, not in R3) was
997 // silently miscompiled rather than falling back. The direct selector's
998 // `aapcs_param_layout` homing handles every such shape (i64-param READS
999 // already fell back to it via the ir_to_arm Err, so those functions emit
1000 // the same bytes as before). `num_params` counts read-first locals, so a
1001 // function that never touches any param keeps the optimized path.
1002 let has_wide_param = config
1003 .current_func_params_i64
1004 .iter()
1005 .take(num_params as usize)
1006 .any(|&w| w);
1007 // #782(b): a HARD-float (FPU) target passes f32 args in VFP S-registers
1008 // and returns floats in S0/D0 (AAPCS-VFP) — but the optimized path's
1009 // param/return homing is float-naive (integer R0..R3 args, R0 return). A
1010 // function whose ops ALL lower on the optimized path but whose SIGNATURE
1011 // carries a float — e.g. the pure value-pick
1012 // `(param f32 f32 i32) (result f32) select`, no float OP to trip the
1013 // issue-#120 ir_to_arm fallback — was silently compiled with the integer
1014 // ABI: callers marshal S0/S1, the body reads R0/R1. Route every
1015 // float-signature function to the direct selector (AAPCS-VFP homing, or
1016 // an honest decline). Soft-float targets (no FPU) keep the optimized
1017 // path: the integer treatment IS the ABI there — byte-identical. (f64
1018 // params already route direct via `has_wide_param`; this adds f32 params
1019 // and f32/f64 returns.)
1020 let has_float_sig = config.target.fpu.is_some()
1021 && (config.current_func_ret_f32
1022 || config.current_func_ret_f64
1023 || config
1024 .current_func_params_f32
1025 .iter()
1026 .take(num_params as usize)
1027 .any(|&f| f)
1028 || config
1029 .current_func_params_f64
1030 .iter()
1031 .take(num_params as usize)
1032 .any(|&f| f));
1033 // #494 phase 2b: div/rem guard-elision marks are consumed by the DIRECT
1034 // selector only — the optimized path's IR passes (const-fold/CSE/DCE)
1035 // renumber instructions, so an op-index-keyed mark cannot soundly survive
1036 // them. Route marked functions direct (the #507/#509 honest-degradation
1037 // pattern). Never fires without SYNTH_FACT_SPEC + facts + a discharged
1038 // obligation, so every existing compile keeps its path byte-identical.
1039 let has_fact_div_elide = !fact_div_zero_elide.is_empty()
1040 || !fact_div_ovf_elide.is_empty()
1041 // #494 bounds-elision + VCR-MEM-004 (#901): memory bounds-guard marks
1042 // are direct-selector keyed for the same reason (IR passes renumber
1043 // instructions). This is ALSO why the optimized path's
1044 // `push_software_bounds_guard` sites never need mark plumbing: a
1045 // marked function is routed away from that path entirely.
1046 || !mem_bounds_elide.is_empty();
1047 // #643: the optimized path's global lowering is width-naive — `GlobalGet`/
1048 // `GlobalSet` are single-word `[R9, idx*4]` accesses, which (a) silently
1049 // dropped the high word of every i64 global and (b) mis-address every
1050 // global whose offset an earlier wide (i64/f64) slot shifted. When the
1051 // module has any wide global, route every global-touching function to the
1052 // direct selector, whose type-aware summed layout pairs the access (or
1053 // declines loudly). Modules with only 4-byte globals — every existing
1054 // fixture — keep the optimized path byte-identical.
1055 let has_wide_global_module = config.global_widths.iter().any(|&w| w > 4);
1056 let has_global_access = has_wide_global_module
1057 && wasm_ops
1058 .iter()
1059 .any(|op| matches!(op, WasmOp::GlobalGet(_) | WasmOp::GlobalSet(_)));
1060 // VCR-VER-001 (#242): `post_exhaust` scopes the post-exhaustion cleanup
1061 // extensions to functions whose bytes the #580 spill-on-exhaustion
1062 // machinery actually shaped (bridge-reported). Everything else — the
1063 // direct path, non-exhausted optimized functions — stays byte-identical
1064 // flag-on (the `vcr_ver_001_gate_242` lock's contract).
1065 let (arm_instrs, post_exhaust) = if config.no_optimize
1066 || config.relocatable
1067 || has_br_table
1068 || has_value_carry
1069 || has_wide_param
1070 || has_float_sig
1071 || has_global_access
1072 || has_fact_div_elide
1073 // #457: route read-before-write non-param locals to the direct
1074 // selector, whose prologue zero-init lands the wasm-mandated 0.
1075 || has_rbw_local
1076 {
1077 if std::env::var("SYNTH_PATH_DEBUG").is_ok() {
1078 // RQ-65-PARITY (#197): name WHICH pre-gate predicate diverted the
1079 // function and which function it was, so the selector-parity
1080 // oracle can record every "only one path accepted this" case with
1081 // its reason instead of a bare count. The leading text is kept
1082 // verbatim — the #377/#1021 harnesses match on it.
1083 let reasons: Vec<&str> = [
1084 (config.no_optimize, "no-optimize"),
1085 (config.relocatable, "relocatable"),
1086 (has_br_table, "br-table"),
1087 (has_value_carry, "value-carry"),
1088 (has_wide_param, "wide-param"),
1089 (has_float_sig, "float-sig"),
1090 (has_global_access, "wide-global-access"),
1091 (has_fact_div_elide, "fact-elide"),
1092 (has_rbw_local, "rbw-local"),
1093 ]
1094 .iter()
1095 .filter(|(on, _)| *on)
1096 .map(|(_, name)| *name)
1097 .collect();
1098 eprintln!(
1099 "[path-debug] direct (pre-gate) func={} reasons={}",
1100 config
1101 .current_func_index
1102 .map_or("?".to_string(), |i| i.to_string()),
1103 reasons.join(",")
1104 );
1105 }
1106 (select_direct()?, false)
1107 } else {
1108 let opt_config = if config.loom_compat {
1109 OptimizationConfig::loom_compat()
1110 } else {
1111 OptimizationConfig::all()
1112 };
1113
1114 let mut bridge = OptimizerBridge::with_config(opt_config);
1115 // #188: tell the bridge how many imports there are so it declines only
1116 // LOCAL calls (and leaves import calls on the optimized path, keeping
1117 // the #173 field-name relocation rewrite intact).
1118 bridge.set_num_imports(config.num_imports);
1119 // #543 Phase 2: thread the integrator-marked volatile DMA-window ranges
1120 // (`--volatile-segment <base>:<len>`) to the bridge's address-caching
1121 // levers — base-CSE (#468) excludes any access inside a marked range
1122 // from its fold set, and the bridge-level const-CSE declines wholesale
1123 // while any range is marked. Empty (the default) ⇒ byte-identical.
1124 bridge.set_volatile_segments(config.volatile_segments.clone());
1125 // #377: thread `--safety-bounds` to the bridge. Pre-fix the optimized
1126 // path ignored it — `software`/`mask` were SILENT NO-OPS on the path
1127 // that lowers the bulk of a flight loop's i32 loads/stores (byte-
1128 // identical to `none`, while the safety manifest claimed otherwise).
1129 // `Software` now emits the inline guard per access; `Masking` declines
1130 // memory-accessing functions to the direct selector; `None`/`Mpu` are
1131 // byte-identical to before.
1132 bridge.set_bounds_check(bounds_config);
1133 // #687: thread the absolute linear-memory base the optimized path
1134 // materializes. Defaults to 0x2000_0100 (byte-identical);
1135 // `--stack-layout=low` shifts it up by the reserved stack size so
1136 // const-address accesses follow the moved linear memory.
1137 bridge.set_linmem_base(config.linmem_base);
1138 // `ir_to_arm` now returns `Result` — an `Err` means the optimized path
1139 // hit an unmapped vreg (issue-#93-class). Treat it identically to an
1140 // `optimize_full` failure: fall back to the direct selector rather
1141 // than propagating, so the function still compiles correctly.
1142 match bridge
1143 .optimize_full(wasm_ops)
1144 .and_then(|(opt_ir, _cfg, _stats)| bridge.ir_to_arm(&opt_ir, num_params as usize))
1145 {
1146 Ok(arm_ops) => {
1147 if std::env::var("SYNTH_PATH_DEBUG").is_ok() {
1148 eprintln!(
1149 "[path-debug] optimized (ir_to_arm ok) func={}",
1150 config
1151 .current_func_index
1152 .map_or("?".to_string(), |i| i.to_string())
1153 );
1154 }
1155 (
1156 arm_ops
1157 .into_iter()
1158 .map(|op| ArmInstruction {
1159 op,
1160 source_line: None,
1161 })
1162 .collect(),
1163 bridge.spill_on_exhaust_fired(),
1164 )
1165 }
1166 // Issue #120: the optimized path declines modules it cannot lower
1167 // (notably scalar f32/f64 ops — the IR has no float opcodes). Fall
1168 // back to the direct instruction selector, which handles f32 via
1169 // VFP/FPU. This is honest degradation: the function still compiles
1170 // correctly, just without IR-level optimization.
1171 Err(e) => {
1172 if std::env::var("SYNTH_PATH_DEBUG").is_ok() {
1173 eprintln!(
1174 "[path-debug] direct (fallback: {e}) func={}",
1175 config
1176 .current_func_index
1177 .map_or("?".to_string(), |i| i.to_string())
1178 );
1179 }
1180 (select_direct()?, false)
1181 }
1182 }
1183 };
1184
1185 // #257/#277: `mul`+`add`→`mla` fusion is intentionally NOT wired here.
1186 // The transform is correct and ready (`synth_synthesis::liveness::fuse_mul_add`,
1187 // fully tested), but it is **register-allocation-coupled**: over the current
1188 // greedy single-pass selector, folding `mul rM,..; add rD,rM,rX` → `mla`
1189 // extends the live ranges of the mul inputs to the mla point, and the added
1190 // pressure (extra moves/spills) costs more than the single-cycle MLA saves —
1191 // gale measured a +2 cyc on-target REGRESSION (flat_flight 255→257, G474RE)
1192 // even though it removes 2 instructions and the seam stays 0x07FDF307. So the
1193 // fusion stays unwired until the spill-aware allocator (VCR-RA-001) chooses
1194 // registers, at which point it becomes net-positive (per #272's plan and the
1195 // wiring design note). Lesson (#277): a register-pressure-affecting transform
1196 // needs an on-target/allocator-aware gate, not a byte-count gate, before it
1197 // can default on.
1198
1199 // VCR-RA-001 const-CSE / rematerialization-avoidance (#209): moved to run
1200 // LAST, after the immediate-folds — see the apply_const_cse call below
1201 // (#242). Earlier it ran here (before range-realloc and the folds), which is
1202 // what let it grow gale's --relocatable `gust_mix` 90→92 B (#242 burndown,
1203 // 2026-06-26): retargeting a read defeated a *downstream* immediate-fold that
1204 // would otherwise have absorbed the constant. Running CSE-last makes those
1205 // foldable consts already-folded-and-gone, so CSE only ever touches genuinely
1206 // redundant materializations.
1207
1208 // VCR-RA-001 RANGE RE-ALLOCATION (#209/#242, wiring step 3a) — the first
1209 // CONSEQUENTIAL allocator pass: re-colour each maximal straight-line
1210 // segment over the R0-R8 pool with value ranges as the allocation unit
1211 // (segment inputs + per-register live-outs pinned to their original
1212 // registers, reserved R9-R12/SP identity-assigned — each segment is
1213 // independently sound, no cross-segment liveness assumed). Renames
1214 // registers only: never adds, removes, or reorders instructions, so
1215 // labels/branch offsets are unaffected.
1216 //
1217 // DEFAULT-ON since v0.11.36: gale cleared the gate on-target (G474RE,
1218 // #209 2026-06-10) — flag-on output byte-identical to flag-off on
1219 // flat_flight/controller/control_step, fires on the filter family with
1220 // zero cycle delta and a small size win, all selfchecks green on silicon.
1221 // Opt out with `SYNTH_RANGE_REALLOC=0`; per-function stats with
1222 // `SYNTH_REALLOC_STATS=1`.
1223 //
1224 // The companion dead callee-saved-save elimination (gale's "next
1225 // consequential lever", same issue comment) then shrinks the prologue
1226 // `push {r4-r8,lr}` / epilogue `pop {r4-r8,pc}` to the callee-saved
1227 // registers the re-allocated body still touches (leaf-only,
1228 // SP-untouched, even-count-padded — see shrink_callee_saved_saves):
1229 // ~12 cycles of pure save/restore overhead removed on small leaves.
1230 let realloc_on = std::env::var("SYNTH_RANGE_REALLOC").map_or(true, |v| v != "0");
1231 let (arm_instrs, ran_realloc) = if realloc_on {
1232 use synth_synthesis::rules::Reg;
1233 const POOL: [Reg; 9] = [
1234 Reg::R0,
1235 Reg::R1,
1236 Reg::R2,
1237 Reg::R3,
1238 Reg::R4,
1239 Reg::R5,
1240 Reg::R6,
1241 Reg::R7,
1242 Reg::R8,
1243 ];
1244 // VCR-DEC-001 (epic #242, the North Star's first foothold): the
1245 // SYNTH_GRAPH_ALLOC graph-colouring allocator SPIKE. When enabled it
1246 // replaces STEP 1 of the re-allocation (the segment-based
1247 // `reallocate_function`) with a whole-function Chaitin/Briggs colouring
1248 // (`graph_alloc::reallocate`) built against the SAME acceptance oracle
1249 // (`validate_segment_rewrite` trace-equality); the later dead-frame /
1250 // callee-saved-prologue / shrink passes still run on its output, so a
1251 // value it homes in R4-R8 still gets its callee-saved push (the
1252 // invariant the unconditional VCR-RA-003 validator guards). It is
1253 // BOUNDED to whole straight-line functions and DECLINES (returns None)
1254 // to the shipping `reallocate_function` on any control flow, spill, or
1255 // unmodeled op — never a hard-fail. Flag-OFF (`SYNTH_GRAPH_ALLOC` unset)
1256 // never enters this branch, so the shipping bytes are byte-identical
1257 // (the GOLDEN trick — frozen fixtures unchanged). NO default flip: the
1258 // spike ships flag-off; the flip is a later, evidence-gated step.
1259 //
1260 // VCR-VER-001 (#242): on a function the spill-on-exhaustion machinery
1261 // shaped, the terminal segment gets relaxed live-out pinning (only
1262 // R0/R1 are observable past `bx lr` at this pre-prologue position) so
1263 // the colourer can lower R4-R8-homed tails into caller-saved R0-R3 —
1264 // shrinking the `push {r4-r8,lr}` the #580 exhaustion shapes pay for.
1265 // `post_exhaust == false` selects the shipping pass bit for bit.
1266 let (out, stats) = if synth_synthesis::graph_alloc::enabled() {
1267 // RQ-60-RACOST increment 2 (#242): the colourer prices every
1268 // colour choice in REAL-ENCODER bytes. The sizer is the same
1269 // encoder family the emit loop below constructs — Thumb-2 (with
1270 // the target's FPU) or A32 — asked per candidate instruction, so
1271 // there is no hand size table to drift (#936). On the fixed-width
1272 // A32 ISA every candidate ties and the cost model degenerates to
1273 // the identity hint (zero churn).
1274 let sizing_encoder =
1275 if matches!(config.target.isa, IsaVariant::Thumb2 | IsaVariant::Thumb) {
1276 ArmEncoder::new_thumb2_with_fpu(config.target.fpu)
1277 } else {
1278 ArmEncoder::new_arm32()
1279 };
1280 let enc = |op: &synth_synthesis::rules::ArmOp| {
1281 sizing_encoder.encode(op).ok().map(|b| b.len())
1282 };
1283 let stats_on = std::env::var("SYNTH_GRAPH_ALLOC_STATS").is_ok();
1284 match synth_synthesis::graph_alloc::reallocate(&arm_instrs, &POOL, &enc) {
1285 // SYNTH_GRAPH_ALLOC_FORCE (test seam, RQ-60-RACOST
1286 // increment 2): ship every validated candidate WITHOUT the
1287 // final-byte arbiter — the pre-arbiter behaviour. Used by
1288 // `vcr_dec_001_join_alloc_execution_differential.py` so the
1289 // unicorn-vs-wasmtime oracle executes the colourer's
1290 // proposals on EVERY reachable shape (call, i64-pair,
1291 // shift-expansion), not only the ones the arbiter lets ship —
1292 // an arbiter-declined candidate is still a candidate a future
1293 // change could promote, and the execution teeth must stay
1294 // ahead of that. Never set in production; the arbiter is the
1295 // shipping behaviour.
1296 Some(candidate)
1297 if std::env::var("SYNTH_GRAPH_ALLOC_FORCE").is_ok_and(|v| v != "0") =>
1298 {
1299 if stats_on {
1300 eprintln!(
1301 "[graph-alloc] whole-function colouring APPLIED \
1302 (validated; FORCED — arbiter bypassed)"
1303 );
1304 }
1305 (
1306 candidate,
1307 synth_synthesis::liveness::ReallocStats::default(),
1308 )
1309 }
1310 Some(candidate) => {
1311 // FINAL-BYTE ARBITER (RQ-60-RACOST increment 2). A
1312 // colour-time cost model — however faithful its byte sizes
1313 // — cannot price DOWNSTREAM PASS INTERACTIONS: measured on
1314 // const_cse.wat::spill12, an identity-shaped colouring
1315 // that merely PRESERVED the greedy allocator's register
1316 // rotation defeated const-CSE's canonicalization and grew
1317 // the function 148 -> 244 B (+96), with not one occurrence
1318 // priced differently at colour time. So the candidate is
1319 // sized through the REAL downstream pipeline
1320 // (`finish_allocated_stream` — the exact passes the
1321 // shipped stream runs, not a mirror) plus label resolution
1322 // and the REAL encoder, against the shipping allocator's
1323 // stream sized identically, and it ships only when it is
1324 // STRICTLY smaller. A tie or a refusal keeps the shipping
1325 // bytes — growth on an applied function is structurally
1326 // impossible, which is exactly the wired
1327 // vcr_dec_001_graph_alloc_differential no-growth
1328 // assertion, promoted from a gate into a construction.
1329 let ship = synth_synthesis::liveness::reallocate_function_post_exhaust(
1330 &arm_instrs,
1331 &POOL,
1332 post_exhaust,
1333 );
1334 let size_of = |stream: &[synth_synthesis::ArmInstruction]| -> Option<usize> {
1335 let finished = match finish_allocated_stream(
1336 stream.to_vec(),
1337 config,
1338 post_exhaust,
1339 true,
1340 ) {
1341 Ok(f) => f,
1342 Err(e) => {
1343 if stats_on {
1344 // The differential greps for the RA-003
1345 // hard-error string to detect a SHIPPED
1346 // violation; a candidate refused during
1347 // sizing is a decline, not a shipped
1348 // violation, so that marker is rewritten.
1349 let e = e.replace(
1350 "register-allocation validation FAILED",
1351 "register-allocation validation refused the candidate",
1352 );
1353 eprintln!(
1354 "[graph-alloc] arbiter: stream refused by the \
1355 pipeline/validators: {e}"
1356 );
1357 }
1358 return None;
1359 }
1360 };
1361 let finished = if matches!(
1362 config.target.isa,
1363 IsaVariant::Thumb2 | IsaVariant::Thumb
1364 ) {
1365 resolve_label_branches(finished, &sizing_encoder).ok()?
1366 } else {
1367 finished
1368 };
1369 let mut total = 0usize;
1370 let mut literals = 0usize;
1371 for ins in &finished {
1372 total += sizing_encoder.encode(&ins.op).ok()?.len();
1373 if matches!(ins.op, synth_synthesis::rules::ArmOp::LdrSym { .. }) {
1374 literals += 1;
1375 }
1376 }
1377 if literals > 0 {
1378 // The emit loop 4-aligns the literal pool and
1379 // appends one word per LdrSym (no dedup — each
1380 // site carries its own addend).
1381 total += (4 - total % 4) % 4 + 4 * literals;
1382 }
1383 Some(total)
1384 };
1385 match (size_of(&candidate), size_of(&ship.0)) {
1386 (Some(cand), Some(base)) if cand < base => {
1387 if stats_on {
1388 eprintln!(
1389 "[graph-alloc] whole-function colouring APPLIED \
1390 (validated; arbiter: {cand} B < shipping {base} B)"
1391 );
1392 }
1393 (
1394 candidate,
1395 synth_synthesis::liveness::ReallocStats::default(),
1396 )
1397 }
1398 (cand, base) => {
1399 if stats_on {
1400 eprintln!(
1401 "[graph-alloc] arbiter kept shipping bytes \
1402 (candidate {cand:?} B vs shipping {base:?} B) → \
1403 shipping reallocate_function"
1404 );
1405 }
1406 ship
1407 }
1408 }
1409 }
1410 None => {
1411 if stats_on {
1412 eprintln!("[graph-alloc] DECLINED → shipping reallocate_function");
1413 }
1414 synth_synthesis::liveness::reallocate_function_post_exhaust(
1415 &arm_instrs,
1416 &POOL,
1417 post_exhaust,
1418 )
1419 }
1420 }
1421 } else {
1422 synth_synthesis::liveness::reallocate_function_post_exhaust(
1423 &arm_instrs,
1424 &POOL,
1425 post_exhaust,
1426 )
1427 };
1428 if std::env::var("SYNTH_REALLOC_STATS").is_ok() {
1429 eprintln!(
1430 "[range-realloc] {} segments: {} reallocated, {} declined ({} validator-rejected), {} need spill (step 4)",
1431 stats.segments,
1432 stats.reallocated,
1433 stats.declined,
1434 stats.validator_rejects,
1435 stats.needs_spill
1436 );
1437 }
1438 // VCR-VER-004 AUDIT (#242) — report-only, opt-in, never gating.
1439 //
1440 // The ABI observable-contract validator is a GATE on the flag-off
1441 // graph-colouring spike. This hook asks the same question of the
1442 // SHIPPING allocator's rewrite, so the answer is a MEASUREMENT rather
1443 // than a claim: how much of the shipping path can a value-level,
1444 // ABI-anchored check actually see today? Report-only DELIBERATELY —
1445 // making it gate here would risk a false rejection on the default
1446 // path, and the honest sequence is measure first, flip on evidence.
1447 // `SYNTH_ABI_CONTRACT_AUDIT=1` prints one verdict per function.
1448 if std::env::var_os("SYNTH_ABI_CONTRACT_AUDIT").is_some() {
1449 eprintln!(
1450 "[abi-contract-audit] {:?}",
1451 synth_synthesis::abi_contract::validate_abi_contract(&arm_instrs, &out)
1452 );
1453 }
1454 (out, true)
1455 } else {
1456 (arm_instrs, false)
1457 };
1458 // RQ-60-RACOST increment 2 (#242): every rewrite pass between the chosen
1459 // allocation and the encoder now lives in `finish_allocated_stream`, so
1460 // the SYNTH_GRAPH_ALLOC final-byte arbiter can size a candidate through
1461 // the REAL pipeline. Flag-off this is the exact pre-extraction sequence,
1462 // called once, in the same place.
1463 let arm_instrs = finish_allocated_stream(arm_instrs, config, post_exhaust, ran_realloc)?;
1464
1465 // Encode to binary — use Thumb-2 for Cortex-M targets
1466 let use_thumb2 = matches!(config.target.isa, IsaVariant::Thumb2 | IsaVariant::Thumb);
1467
1468 let encoder = if use_thumb2 {
1469 ArmEncoder::new_thumb2_with_fpu(config.target.fpu)
1470 } else {
1471 ArmEncoder::new_arm32()
1472 };
1473
1474 // #202: resolve local label branches (Bcc/B/Bhs/Blo) to byte-accurate
1475 // offsets before encoding. `select_with_stack` emits them as label
1476 // placeholders and never resolves them — without this they encode as
1477 // `bne.n #0` and land mid-instruction whenever a 32-bit Thumb-2 instruction
1478 // sits between the branch and its target (UsageFault on real hardware).
1479 // Only meaningful for Thumb-2 (the offset units are halfword/PC+4).
1480 let arm_instrs = if use_thumb2 {
1481 let resolved = resolve_label_branches(arm_instrs, &encoder)?;
1482 // SC-5 (#740/#930): hard-gate every branch target onto the
1483 // instruction-start set of the final stream — both codegen paths
1484 // funnel through here. See `validate_branch_targets`.
1485 validate_branch_targets(&resolved, &encoder)?;
1486 resolved
1487 } else {
1488 arm_instrs
1489 };
1490
1491 // #778: capture the FINAL Thumb-2 instruction stream (post label-resolution,
1492 // the exact list the encode loop below consumes) so `compile_function` can
1493 // derive the sound WCET bound. Cheap clone; frozen-safe (the WCET walk is a
1494 // pure observation and never touches `code`). Only the Thumb-2 path — the A32
1495 // (Cortex-R5) cycle model is a follow-up.
1496 let final_instrs_for_wcet: Option<Vec<synth_synthesis::ArmInstruction>> = if use_thumb2 {
1497 Some(arm_instrs.clone())
1498 } else {
1499 None
1500 };
1501
1502 let mut code = Vec::new();
1503 let mut relocations = Vec::new();
1504
1505 // #345: literal-pool address loads. Each `LdrSym` was encoded as a placeholder
1506 // `LDR.W rd,[pc,#0]`; record where its instruction sits and what it loads so
1507 // we can append a pooled word (carrying the symbol address via R_ARM_ABS32)
1508 // and patch the PC-relative offset once the pool position is known.
1509 struct PendingLiteral {
1510 ldr_offset: u32,
1511 symbol: String,
1512 addend: i32,
1513 }
1514 let mut pending_literals: Vec<PendingLiteral> = Vec::new();
1515
1516 // VCR-DBG-001: per-instruction source map for DWARF `.debug_line`. Captured
1517 // here because `code.len()` immediately before `encode()` is the final
1518 // machine offset of the instruction within this function's `.text` — nothing
1519 // after the loop shifts earlier instructions (the literal pool is appended at
1520 // the end; the LDR patch below is in-place/length-preserving). Purely
1521 // additive: it does not touch `code`, so `.text` is byte-identical.
1522 let mut line_map: LineMap = Vec::new();
1523 // VCR-DEC-003 (#396): object-branch class per emitted instruction, parallel
1524 // to `line_map`. Cheap, additive, does not touch `code`.
1525 let mut branch_map: synth_core::backend::BranchMap = Vec::new();
1526
1527 for instr in &arm_instrs {
1528 // Record a relocation for every BL: the encoder emits `bl #0` and
1529 // relies on a relocation to patch the target. This covers BOTH import
1530 // dispatch stubs (`__meld_*`, undefined externals) AND internal calls
1531 // (`func_N`, defined in this object). Previously only `__meld_*` was
1532 // recorded, so internal `BL func_N` calls were left as unpatched
1533 // `bl #0` placeholders branching to a garbage address (#167).
1534 if let ArmOp::Bl { label } = &instr.op {
1535 // #1040: the relocation type is ISA-STATE-dependent and this is the
1536 // only site that knows the state. An A32 (Cortex-R) `bl` is
1537 // R_ARM_CALL (28); a Thumb `bl` is R_ARM_THM_CALL (10). Emitting
1538 // the Thumb type for an A32 word made any consumer that trusts the
1539 // declared type patch Thumb halfwords into an ARM-state
1540 // instruction. Decided here rather than in the ELF emitter, where
1541 // `config.target` is no longer in scope and the ISA would have to
1542 // be re-derived — the shape that produced the bug.
1543 let kind = if config.target.isa == synth_core::target::IsaVariant::Arm32 {
1544 synth_core::backend::RelocKind::ArmCall
1545 } else {
1546 synth_core::backend::RelocKind::ThmCall
1547 };
1548 relocations.push(CodeRelocation {
1549 offset: code.len() as u32,
1550 symbol: label.clone(),
1551 kind,
1552 });
1553 }
1554 // #237: symbol-relative MOVW/MOVT (the `--native-pointer-abi` static-data
1555 // addressing). The encoder writes the addend in place; record the matching
1556 // R_ARM_MOVW_ABS_NC / R_ARM_MOVT_ABS so the linker adds the symbol address.
1557 if let ArmOp::MovwSym { symbol, .. } = &instr.op {
1558 relocations.push(CodeRelocation {
1559 offset: code.len() as u32,
1560 symbol: symbol.clone(),
1561 kind: synth_core::backend::RelocKind::MovwAbs,
1562 });
1563 }
1564 if let ArmOp::MovtSym { symbol, .. } = &instr.op {
1565 relocations.push(CodeRelocation {
1566 offset: code.len() as u32,
1567 symbol: symbol.clone(),
1568 kind: synth_core::backend::RelocKind::MovtAbs,
1569 });
1570 }
1571 // #345: defer the literal-pool word + reloc + offset patch to the
1572 // post-loop pass (the pool address is not yet known).
1573 if let ArmOp::LdrSym { symbol, addend, .. } = &instr.op {
1574 pending_literals.push(PendingLiteral {
1575 ldr_offset: code.len() as u32,
1576 symbol: symbol.clone(),
1577 addend: *addend,
1578 });
1579 }
1580
1581 // The machine offset of this instruction is the current code length,
1582 // captured before the bytes are appended.
1583 line_map.push((code.len() as u32, instr.source_line));
1584 branch_map.push((code.len() as u32, classify_arm_branch(&instr.op)));
1585
1586 let encoded = encoder
1587 .encode(&instr.op)
1588 .map_err(|e| format!("ARM encoding failed: {}", e))?;
1589 code.extend_from_slice(&encoded);
1590 }
1591
1592 // #345: place the literal pool at the end of this function's `.text`. Gated on
1593 // there being at least one `LdrSym` — functions without one are byte-identical
1594 // to before (no trailing padding, so downstream `func_offsets` are unchanged
1595 // and the frozen differential fixtures stay bit-for-bit equal).
1596 if !pending_literals.is_empty() {
1597 if !use_thumb2 {
1598 return Err("LdrSym literal-pool addressing requires Thumb-2".to_string());
1599 }
1600 // 4-byte align the pool start (Thumb-2 word loads require it, and
1601 // `Align(PC,4)` in the LDR-literal semantics assumes a word-aligned pool).
1602 while code.len() % 4 != 0 {
1603 code.push(0x00);
1604 }
1605 // One distinct pooled word per LdrSym (no dedup: different sites carry
1606 // different addends, and the REL addend lives in the word).
1607 for lit in &pending_literals {
1608 let word_offset = code.len() as u32;
1609
1610 // REL semantics: the linker computes `S + A`, where A is the in-place
1611 // value of the relocated word. Initialize the word to the addend so
1612 // the final loaded address is `symbol + addend`.
1613 code.extend_from_slice(&(lit.addend as u32).to_le_bytes());
1614 relocations.push(CodeRelocation {
1615 offset: word_offset,
1616 symbol: lit.symbol.clone(),
1617 kind: synth_core::backend::RelocKind::Abs32,
1618 });
1619
1620 // Patch the placeholder `LDR.W rd,[pc,#imm12]`. Thumb-2 LDR (literal):
1621 // address = Align(PC,4) + imm12, with PC = ldr_offset + 4. The pool is
1622 // always after the LDR, so U=1 (already set in hw1 = 0xF8DF).
1623 let pc = lit.ldr_offset + 4;
1624 let aligned_pc = pc & !3u32;
1625 let imm12 = word_offset - aligned_pc;
1626 if imm12 > 0xFFF {
1627 // Wide LDR-literal range is ±4 KB; these function bodies are far
1628 // smaller, but fail cleanly rather than miscompile if exceeded.
1629 return Err(format!(
1630 "LdrSym literal pool out of range (#345): imm12={} > 4095 \
1631 for symbol {}",
1632 imm12, lit.symbol
1633 ));
1634 }
1635 let hw2_off = (lit.ldr_offset + 2) as usize;
1636 let mut hw2 = u16::from_le_bytes([code[hw2_off], code[hw2_off + 1]]);
1637 hw2 = (hw2 & 0xF000) | (imm12 as u16); // keep Rt, set imm12
1638 let hw2_bytes = hw2.to_le_bytes();
1639 code[hw2_off] = hw2_bytes[0];
1640 code[hw2_off + 1] = hw2_bytes[1];
1641 }
1642 }
1643
1644 Ok((
1645 code,
1646 relocations,
1647 line_map,
1648 branch_map,
1649 final_instrs_for_wcet,
1650 ))
1651}
1652
1653/// RQ-60-RACOST increment 2 (#242): every rewrite pass between a CHOSEN
1654/// register allocation and the encoder, as ONE reusable sequence.
1655///
1656/// Extracted VERBATIM from `compile_wasm_to_arm` (pure code motion) so the
1657/// `SYNTH_GRAPH_ALLOC` final-byte arbiter can size a candidate allocation
1658/// through the REAL downstream pipeline — the same passes, in the same order,
1659/// reading the same flags — rather than through a hand-mirrored predicate of
1660/// them (the #936 drift class: a hand mirror of the encoder's offset-fold
1661/// threshold was UNSOUND at authoring; a hand mirror of eleven rewrite passes
1662/// would be worse). Flag-off behaviour is byte-identical: the shipping path
1663/// calls this exactly once, on the same stream, in the same place it always
1664/// ran.
1665///
1666/// `ran_realloc` selects the historical branch: the dead-frame /
1667/// callee-saved-prologue / shrink trio runs only downstream of the range
1668/// re-allocation lever (`SYNTH_RANGE_REALLOC` on), exactly as before the
1669/// extraction. Diagnostics inside (SYNTH_FUSE_STATS, SYNTH_SHADOW_ALLOC,
1670/// SYNTH_SPILL_REPORT) print once per CALL, so an arbiter sizing run repeats
1671/// them — measurement noise under two opt-in flags, never a byte change.
1672fn finish_allocated_stream(
1673 arm_instrs: Vec<synth_synthesis::ArmInstruction>,
1674 config: &CompileConfig,
1675 post_exhaust: bool,
1676 ran_realloc: bool,
1677) -> Result<Vec<synth_synthesis::ArmInstruction>, String> {
1678 let arm_instrs = if ran_realloc {
1679 let out = arm_instrs;
1680 // VCR-RA-002 (#390, epic #242): eliminate a provably-dead stack frame
1681 // (`sub sp,#N`/`add sp,#N` reserved by `compute_local_layout` for locals
1682 // that promotion homed in registers, never accessed). Removing it saves
1683 // the two instructions AND restores the SP-untouched precondition that
1684 // `shrink_callee_saved_saves` requires — so it must run FIRST.
1685 // DEFAULT-ON (#242 flag audit flip-wave, #592 audit item): evidence
1686 // basis was the 2-path × repro-corpus sweep — 0 functions grow, 58
1687 // shrink (flight_seam controller_step 250→242 −8 / filter_step 180→168
1688 // −12, native_pointer frame_roundtrip 46→34 −12), locked by the
1689 // `dead_frame_elim_no_grow_corpus_242` cargo gate; execution
1690 // differentials re-run green on the new default bytes BEFORE the
1691 // frozen ARM anchors were re-pinned (leaf_dead_frame, flight_seam,
1692 // frame_slot_dce — see the flip PR). Escape hatch:
1693 // `SYNTH_DEAD_FRAME_ELIM=0` opts out and restores the pre-flip bytes
1694 // (CI-gated in `frozen_codegen_bytes.rs`).
1695 let out = if !std::env::var("SYNTH_DEAD_FRAME_ELIM").is_ok_and(|v| v == "0") {
1696 synth_synthesis::liveness::elide_dead_frame(&out).unwrap_or(out)
1697 } else {
1698 out
1699 };
1700 // #490 (epic #242): the optimized selector uses r4-r8 as scratch /
1701 // promoted locals but emits no prologue, silently clobbering a caller's
1702 // callee-saved registers. Add the missing `push {r4-r8,lr}` /
1703 // `pop {r4-r8,pc}` HERE — on the post-realloc body, where realloc has
1704 // lowered low-pressure r4-r8 scratch back to r0-r3, so a save is added
1705 // only for registers genuinely clobbered. `shrink_callee_saved_saves`
1706 // (next) then trims it to the used set. No-op on the direct path (it
1707 // already has its own prologue) and on callee-saved-free leaves.
1708 let out = synth_synthesis::liveness::ensure_callee_saved_prologue(&out);
1709 synth_synthesis::liveness::shrink_callee_saved_saves(&out).unwrap_or(out)
1710 } else {
1711 // Range-realloc off (`SYNTH_RANGE_REALLOC=0`): the optimized path still
1712 // must preserve the callee-saved registers it clobbers (#490). No shrink
1713 // (it is coupled to the realloc lever), so the conservative full save
1714 // stays — correct, just not minimised in this debug configuration.
1715 synth_synthesis::liveness::ensure_callee_saved_prologue(&arm_instrs)
1716 };
1717 // VCR-RA-001 SHADOW ALLOCATION (#209/#242): run the register allocator on
1718 // the selected stream and LOG what it finds — without changing a single
1719 // emitted byte. This is the measure-only bridge between the built analysis
1720 // layer and the eventual virtual-register wiring: it shows, per real
1721 // function, whether the allocator can colour it within the R0–R8 pool and
1722 // how much const-CSE / rematerialization headroom exists (#209). Enable with
1723 // `SYNTH_SHADOW_ALLOC=1`; off by default and side-effect-free either way.
1724 if std::env::var("SYNTH_SHADOW_ALLOC").is_ok() {
1725 use synth_synthesis::liveness::{
1726 AllocationOutcome, allocate_function, function_peak_pressure,
1727 };
1728 // R9 globals / R10 mem-size / R11 mem-base / R12 IP-scratch are reserved;
1729 // pin them above the 0..9 allocatable pool so the colourer keeps R0–R8.
1730 let precolored = std::collections::BTreeMap::from([
1731 (synth_synthesis::rules::Reg::R9, 9usize),
1732 (synth_synthesis::rules::Reg::R10, 10),
1733 (synth_synthesis::rules::Reg::R11, 11),
1734 (synth_synthesis::rules::Reg::R12, 12),
1735 ]);
1736 // True VALUE pressure (one node per value, not per reused physical reg):
1737 // a NeedsSpill with peak ≤ 9 is a SPURIOUS physical-register spill — the
1738 // function fits once virtually allocated.
1739 let peak = function_peak_pressure(&arm_instrs);
1740 match allocate_function(&arm_instrs, 9, &precolored) {
1741 AllocationOutcome::Allocated {
1742 remat_opportunities,
1743 coloring,
1744 } => eprintln!(
1745 "[shadow-alloc] OK: {} pregs coloured within R0-R8 pool, peak value-pressure {}, {} const-CSE/remat opportunities",
1746 coloring.len(),
1747 peak,
1748 remat_opportunities
1749 ),
1750 AllocationOutcome::NeedsSpill(s) => eprintln!(
1751 "[shadow-alloc] physical-graph would spill {:?}, but peak value-pressure is {} (≤9 ⇒ spurious; fits once virtually allocated)",
1752 s, peak
1753 ),
1754 AllocationOutcome::Declined => {
1755 eprintln!(
1756 "[shadow-alloc] declined (unmodeled construct — calls/i64/fp/offset-branch)"
1757 )
1758 }
1759 }
1760 }
1761
1762 // VCR-SEL-004 cmp→select → IT-block predication fusion (#242). The selector
1763 // lowers a `select` whose condition is a comparison to a *materialize then
1764 // re-test* sequence (`cmp a,b; SetCond D,c; cmp D,#0; movne dst,v1; moveq
1765 // dst,v2`); this collapses it onto the comparison's own flags — deleting the
1766 // `SetCond` and the `cmp D,#0` and retargeting the predicated moves to `c` /
1767 // `invert(c)` — yielding the textbook predicated clamp (`cmp a,b; movc dst,v1;
1768 // mov{!c} dst,v2`). −2 instructions per fused select. gale #428 measured this
1769 // as the #1 hot-path size/cycle lever on the gust_mix clamp chain.
1770 //
1771 // Run LATE: after range re-allocation (so the dead-D proof sees final register
1772 // identities) and before encode. Removal-only + rename-only ⇒ no spill
1773 // regression and labels/branch offsets are unaffected. Each fusion is proven
1774 // sound (flags reused only when nothing clobbers them in the window; the
1775 // boolean deleted only when provably dead) — see `fuse_cmp_select`.
1776 //
1777 // DEFAULT-ON as of v0.13.0 (#428): cmp→select fusion ships by default. The
1778 // byte-changing flip is validated by (a) the unicorn execution oracle that runs
1779 // the two-move `mov{invert(c)}` arm (cmp_select_two_move_differential.py), (b)
1780 // gale's gale_decider_diff 10,596-case sweep across all 8 verified primitives
1781 // (native ≡ flag-off ≡ flag-on = 0x88e73178d232bcf5), and (c) the named-anchor
1782 // differentials re-run with fusion ON — control_step still 0x00210A55, flat+
1783 // inlined flight_algo still 0x07FDF307 (results preserved; bytes deliberately
1784 // changed, re-frozen on this commit). Escape hatch: `SYNTH_NO_CMP_SELECT_FUSE=1`
1785 // reverts to the pre-fusion lowering. The on-silicon G474RE DWT no-regression
1786 // check is a tracked post-ship follow-up (gale owns it).
1787 let arm_instrs = if std::env::var("SYNTH_NO_CMP_SELECT_FUSE").is_err() {
1788 // The rewritten stream is identical to `fuse_cmp_select`'s 2-tuple form;
1789 // the extra `two_move` count is diagnostic only (the fusion census /
1790 // blast-radius datum — #7 made that arm reachable).
1791 let (out, fused, two_move) =
1792 synth_synthesis::liveness::fuse_cmp_select_with_stats(&arm_instrs);
1793 if std::env::var("SYNTH_FUSE_STATS").is_ok() {
1794 let in_place = fused - two_move;
1795 eprintln!(
1796 "[cmp-select-fuse] {fused} select(s) fused to predicated moves \
1797 ({two_move} two-move, {in_place} in-place)"
1798 );
1799 }
1800 out
1801 } else {
1802 arm_instrs
1803 };
1804
1805 // Perf lever 1 toward native parity (#390): redundant stack-reload elimination.
1806 // synth lowers every wasm local to a frame slot, so `local.set; local.get` emits
1807 // `str rX,[sp,#N]; … ; ldr rY,[sp,#N]`; when rX still holds the value the reload
1808 // (a ~2-cycle M4 load) becomes `mov rY,rX`. Removal-of-a-load + rename only ⇒ no
1809 // new instruction form and no label/offset change. DEFAULT-ON (#242 feature
1810 // loop): validated bit-identical RESULTS on every frozen anchor (control_step
1811 // 0x00210A55 13/13, flat+inlined flight_algo 0x07FDF307) with .text reduced on
1812 // the shipped --relocatable path, plus 8 unit tests + the frame_slot_dce
1813 // execution differential — the same gated path cmp→select took to default-on in
1814 // v0.13.0 (G474RE silicon confirms perf post-ship). Escape hatch:
1815 // `SYNTH_NO_STACK_FWD=1` restores the frame-resident bytes (frozen-old goldens).
1816 let stack_fwd = std::env::var("SYNTH_NO_STACK_FWD").is_err();
1817 let arm_instrs = if stack_fwd {
1818 let (out, fwd) = synth_synthesis::liveness::forward_stack_reloads(&arm_instrs);
1819 if std::env::var("SYNTH_FUSE_STATS").is_ok() {
1820 eprintln!("[stack-fwd] {fwd} stack reload(s) forwarded to register moves");
1821 }
1822 out
1823 } else {
1824 arm_instrs
1825 };
1826
1827 // VCR-RA frame-slot DCE (#242): once `forward_stack_reloads` has turned the
1828 // reloads of a spill slot into register moves, the `str rX,[sp,#N]` that fed
1829 // them is a dead store — its slot is never loaded again. Remove it. Pairs
1830 // with (and only pays after) stack-reload forwarding, so it shares the flag.
1831 let arm_instrs = if stack_fwd {
1832 let (out, n) = synth_synthesis::liveness::eliminate_dead_frame_stores(&arm_instrs);
1833 if std::env::var("SYNTH_FUSE_STATS").is_ok() {
1834 eprintln!("[frame-slot-dce] {n} dead frame store(s) removed");
1835 }
1836 out
1837 } else {
1838 arm_instrs
1839 };
1840
1841 // VCR-RA-001 spill re-choice (#242), two stages behind one flag.
1842 // Stage 1 (the #569 spike): slot-value forwarding BETWEEN reloads.
1843 // `forward_stack_reloads` (above) forwards only from a spill store's
1844 // SOURCE register, so when register pressure clobbers that source its
1845 // reloads survive; this stage tracks which registers provably still hold
1846 // a frame slot's value (through earlier reloads and reg-reg moves) and
1847 // turns reload #2..#n into a 1-cycle `mov` (or deletes it when the target
1848 // already holds the value). Stage 2 (the Belady re-choice): where NO
1849 // register still holds the value — the genuine-spill case, flat_flight's
1850 // peak-11 hot segment — the value was usually evicted while a dead
1851 // register existed; the clobbering def(s) are renamed onto a provably-dead
1852 // register (`spill_rechoice_segment`) so the value stays resident and the
1853 // reload dissolves outright. A dissolved reload can leave the feeding
1854 // store dead, so the frame-slot DCE sweep runs once more behind the same
1855 // flag. Per-segment commit gates: executable same-value-flow trace
1856 // equality, strict shrink, pool-pressure fit, sub-word/unknown-slot
1857 // conservatism (see `apply_spill_realloc` / `spill_rechoice_segment`).
1858 // Stage 3 (whole-function slot liveness): the segment-local DCE keeps a
1859 // store whose slot reaches function end ("reach-end ≠ dead" — it cannot
1860 // see other segments); `eliminate_unread_frame_stores` walks the whole
1861 // function (labels/branches/loops, SP-displacement tracked) and drops a
1862 // store whose slot NO reachable instruction can read — flat_flight's two
1863 // surviving stores (#576), completing Belady's 0-load side with a 0-store
1864 // side. Same flag: the three stages are one lever, flipped together.
1865 // DEFAULT-ON (#242 feature loop, the v0.14.0 local-promotion pattern):
1866 // Belady spilling ships by default. Evidence basis for the flip: three
1867 // landed flag-off increments (#569 forwarding, #576 Belady re-choice,
1868 // #579 whole-fn slot liveness), 40+ functions shrink / 0 grow across the
1869 // 68-fixture × 2-path sweep, per-segment executable value-trace equality
1870 // guards, and the unicorn-vs-wasmtime execution differentials re-run
1871 // green on the new default bytes (flat+inlined flight_algo 0x07FDF307,
1872 // const_cse, frame_slot_dce, spill_rung_581, r12_spill_496 — which covers
1873 // control_step_decide vs wasmtime; control_step's .text is byte-identical
1874 // under the flip) BEFORE the frozen goldens were re-pinned. Escape hatch:
1875 // `SYNTH_SPILL_REALLOC=0` is the OPT-OUT — it disables all three stages
1876 // and restores the pre-flip bytes (CI-gated by
1877 // `frozen_fixtures_spill_realloc_escape_hatch_restores_old_bytes`). Any
1878 // other value (or unset) runs the pass.
1879 // VCR-VER-001 post-exhaustion extensions (#242, the PR #659 verdict): with
1880 // `SYNTH_SPILL_ON_EXHAUST` active the #580 allocation-time Belady spill
1881 // keeps exhausted functions on the optimized path, and its slots present
1882 // shapes the shipping pass structurally cannot fire on (fresh-monotonic
1883 // slots defeat the overwrite-only DCE; the eviction store's source is
1884 // redefined immediately, defeating store→reload forwarding; R2/R3 are
1885 // never touched again, so the rename-target deadness proof declines them).
1886 // `post_exhaust` (bridge-scoped, see above) enables const
1887 // rematerialization of spilled constants, R2/R3 exit-dead rename targets,
1888 // and per-pair pressure commit — see `apply_spill_realloc_post_exhaust`.
1889 // Flag off (the default): `false` selects the shipping behavior bit for
1890 // bit.
1891 let arm_instrs = if !std::env::var("SYNTH_SPILL_REALLOC").is_ok_and(|v| v == "0") {
1892 let (out, n) =
1893 synth_synthesis::liveness::apply_spill_realloc_post_exhaust(&arm_instrs, post_exhaust);
1894 let (out, d) = synth_synthesis::liveness::eliminate_dead_frame_stores(&out);
1895 let (mut out, u) = synth_synthesis::liveness::eliminate_unread_frame_stores(&out);
1896 let (mut tn, mut td, mut tu) = (n, d, u);
1897 // Post-exhaustion only: iterate the triple to a bounded fixpoint. Each
1898 // dissolved spill pair frees registers and removes stores, exposing
1899 // rename windows and holder chains the previous iteration could not
1900 // prove — the allocation-time Belady slots (#580) routinely need two
1901 // or three rounds where the shipping single round suffices for the
1902 // default path's slots. Every iteration is individually gate-proven
1903 // (value-trace equality, pool pressure, strict shrink), so iterating
1904 // composes soundly; the bound keeps compile time deterministic.
1905 if post_exhaust {
1906 let mut progress = n + d + u > 0;
1907 for _ in 0..3 {
1908 if !progress {
1909 break;
1910 }
1911 let (o, n) =
1912 synth_synthesis::liveness::apply_spill_realloc_post_exhaust(&out, true);
1913 let (o, d) = synth_synthesis::liveness::eliminate_dead_frame_stores(&o);
1914 let (o, u) = synth_synthesis::liveness::eliminate_unread_frame_stores(&o);
1915 progress = n + d + u > 0;
1916 (tn, td, tu) = (tn + n, td + d, tu + u);
1917 out = o;
1918 }
1919 // The cleanup can leave the spill frame with zero surviving
1920 // accesses (every reload rematerialized/dissolved, every store
1921 // swept) — the balanced `sub sp,#K`/`add sp,#K` is then pure
1922 // overhead. `elide_dead_frame` proves that and removes the pair;
1923 // its early run (post-realloc) could not, because the spill
1924 // traffic was still in the stream at that point.
1925 out = synth_synthesis::liveness::elide_dead_frame(&out).unwrap_or(out);
1926 }
1927 if std::env::var("SYNTH_FUSE_STATS").is_ok() {
1928 eprintln!(
1929 "[spill-realloc] {tn} reload(s) forwarded/eliminated, {td} newly-dead frame store(s) removed, {tu} unread-slot store(s) removed"
1930 );
1931 }
1932 out
1933 } else {
1934 arm_instrs
1935 };
1936
1937 // VCR-RA immediate-shift folding (#390, #242): a constant shift amount the
1938 // stack selector materialized into a scratch register (`movw rM,#C; lsl rD,rN,rM`)
1939 // folds to the immediate form (`lsl rD,rN,#C`), removing the dead `movw` — −1
1940 // instruction, −1 live register. Removal-only (offset-neutral before branch
1941 // resolution, like the dead-store pass). DEFAULT-ON as of v0.15.0: validated
1942 // bit-identical results + a net cycle win on the dissolved hot path (−2
1943 // cyc/call, .text 100→90 B on gust_mix). Escape hatch: `SYNTH_NO_IMM_SHIFT_FOLD=1`.
1944 let arm_instrs = if std::env::var("SYNTH_NO_IMM_SHIFT_FOLD").is_err() {
1945 let (out, folds) = synth_synthesis::liveness::fold_immediate_shifts(&arm_instrs);
1946 if std::env::var("SYNTH_FUSE_STATS").is_ok() {
1947 eprintln!(
1948 "[imm-shift-fold] {folds} register shift(s) folded to immediate, movw dropped"
1949 );
1950 }
1951 out
1952 } else {
1953 arm_instrs
1954 };
1955
1956 // #686: elide the #682 mod-32 shift-amount mask (`and r12,rK,#31` before
1957 // every register-controlled i32 shl/shr) when the amount is STATICALLY
1958 // provable < 32 — a const amount folds to the immediate-shift form
1959 // (reduced mod 32, so >= 32 shrinks too), and an already-masked amount
1960 // (`rK = rX & c`, c < 32) drops the redundant re-mask. gale measured the
1961 // unconditional mask at ~12% cyc/call (+14 B) on gust_mix, whose Q8
1962 // fixed-point shifts are all constants (#686). The mask stays wherever
1963 // the bound is unproven — elision is an optimization, the mask is the
1964 // sound default (`liveness::elide_shift_masks` has the proof
1965 // obligations). Runs after `fold_immediate_shifts` (whose movw→shift
1966 // window the #682 mask intercepts, so it declines every masked const
1967 // shift) and before branch resolution (removal/rewrite-only ⇒
1968 // offset-neutral).
1969 //
1970 // DEFAULT-ON since v0.50.1 (opt-out via `SYNTH_SHIFT_MASK_ELIDE=0`; #846).
1971 // gale's gpio-thin driver regressed +44 B / +9% on synth 0.49 — its pin
1972 // bit-arithmetic (`pin & 31` then a register shift) emits the source
1973 // `and rN,#0x1f` IMMEDIATELY followed by the #682 mod-32 re-mask
1974 // `and r12,rN,#0x1f`; the second is provably redundant (Pattern B: an
1975 // operand produced by `and X,#c`, c<32, is already in [0,31]), so the
1976 // pass drops it. Flipping default-on is a deliberate byte-changing
1977 // refreeze: the elision also moves the frozen anchors (const-amount
1978 // shifts fold back to the immediate form) — control_step −20 B,
1979 // flight_seam −166 B, flight_seam_flat −168 B — all size DECREASES with
1980 // the mask soundly kept for every unproven amount. All differentials were
1981 // re-run on the new bytes and the goldens re-pinned (see #846 PR /
1982 // `frozen_codegen_bytes.rs`). `SYNTH_SHIFT_MASK_ELIDE=0` restores the
1983 // pre-flip bytes (opt-out gate in `shift_mask_elide_686.rs`).
1984 let arm_instrs = if std::env::var("SYNTH_SHIFT_MASK_ELIDE").is_ok_and(|v| v == "0") {
1985 arm_instrs
1986 } else {
1987 let (out, elisions) = synth_synthesis::liveness::elide_shift_masks(&arm_instrs);
1988 if std::env::var("SYNTH_FUSE_STATS").is_ok() {
1989 eprintln!(
1990 "[shift-mask-elide] {elisions} provably-<32 shift-amount mask(s) elided (#686)"
1991 );
1992 }
1993 out
1994 };
1995
1996 // VCR-RA uxth/uxtb fold (#428, #242): `movw rM,#0xffff; and rD,rN,rM` →
1997 // `uxth rD,rN` (and the 0xff/uxtb form), removing the dead `movw` — −1
1998 // instruction, −1 live register per 16/8-bit mask. 0xffff/0xff are not Thumb-2
1999 // modified immediates so the selector materializes them into a register; the
2000 // dedicated zero-extend expresses the same masking inline. Removal-only +
2001 // rewrite-in-place (offset-neutral). DEFAULT-ON (#242 flag audit flip-wave,
2002 // #592 audit item): evidence basis was the 2-path × repro-corpus sweep —
2003 // 0 functions grow, 13 shrink (control_step 300→294 −6, gust_mix 38→32 −6,
2004 // uxth_fold pack 36→24 −12), locked by the `uxth_fold_no_grow_corpus_242`
2005 // cargo gate; execution differentials re-run green on the new default
2006 // bytes BEFORE the frozen ARM anchors were re-pinned (uxth_fold,
2007 // control_step — see the flip PR). Escape hatch: `SYNTH_UXTH_FOLD=0` opts
2008 // out and restores the pre-flip bytes (CI-gated in
2009 // `frozen_codegen_bytes.rs`).
2010 let arm_instrs = if !std::env::var("SYNTH_UXTH_FOLD").is_ok_and(|v| v == "0") {
2011 let (out, folds) = synth_synthesis::liveness::fold_uxth(&arm_instrs);
2012 if std::env::var("SYNTH_FUSE_STATS").is_ok() {
2013 eprintln!("[uxth-fold] {folds} mask-and folded to uxth/uxtb, movw dropped");
2014 }
2015 out
2016 } else {
2017 arm_instrs
2018 };
2019
2020 // VCR-RA-001 const-CSE / rematerialization-avoidance (#209, #242). Drops a
2021 // `movw`/`mov #imm` that re-materializes a constant already resident in
2022 // another register and retargets the reads — every rewrite proven by the
2023 // liveness analysis. Runs LAST, after every immediate-fold (shift, uxth) and
2024 // range-realloc, but BEFORE branch resolution/encoding (it removes
2025 // instructions, shifting byte offsets). CSE-last is the #242 no-regression
2026 // fix: the folds have already absorbed every foldable constant, so CSE can no
2027 // longer defeat one (the gust_mix 90→92 mechanism). The pass additionally
2028 // size-guards each segment via the byte-estimator — it commits a segment's
2029 // rewrites only if they do not grow its estimated size — so a retarget that
2030 // would flip a 16-bit encoding to 32-bit (higher base register) is declined.
2031 // DEFAULT-ON (#242 flip-wave, the SYNTH_SPILL_REALLOC/SYNTH_BASE_CSE
2032 // template): const-CSE ships by default. The flip prerequisites recorded in
2033 // `const_cse_reduction_242.rs` were retired first — the bridge-level INLINE
2034 // aliasing (the alias-eviction spill-bijection hazard) was DELETED from
2035 // `optimizer_bridge::ir_to_arm`, so this post-hoc, liveness-proven pass is
2036 // the flag's ONLY effect. Evidence basis: 152 fixture×path corpus sweep — 0
2037 // functions grow (size-guarded per segment), 40 shrink (const_cse::spill12
2038 // 236→148 B), total −536 B — and the execution differentials re-run green
2039 // on the new default bytes BEFORE the frozen goldens were re-pinned
2040 // (const_cse, frame_slot_dce, flight_seam 0x07FDF307, spill_rung_581,
2041 // volatile_segment_543, control_step 0x00210A55). Escape hatch:
2042 // `SYNTH_CONST_CSE=0` is the OPT-OUT — it restores the pre-flip bytes
2043 // (CI-gated by `const_cse_escape_hatch_restores_old_bytes_242` and the
2044 // frozen-anchor escape-hatch gate). Any other value (or unset) runs the pass.
2045 //
2046 // #543 Phase 2: const-CSE declines WHOLESALE while any volatile DMA range
2047 // (`--volatile-segment`) is marked. At the ArmOp level a cached constant
2048 // cannot be classified as address-vs-data (a retargeted read may be a
2049 // memory-access base carrying a per-use immediate offset), so the
2050 // conservative stance for statically-unknown addressing is to decline every
2051 // aliasing rewrite — each constant is re-materialized at each occurrence,
2052 // the documented volatile contract (`CompileConfig::volatile_segments`).
2053 let arm_instrs = if !std::env::var("SYNTH_CONST_CSE").is_ok_and(|v| v == "0")
2054 && config.volatile_segments.is_empty()
2055 {
2056 let (out, removed) = synth_synthesis::liveness::apply_const_cse(&arm_instrs);
2057 if std::env::var("SYNTH_FUSE_STATS").is_ok() {
2058 eprintln!("[const-cse] {removed} redundant constant materialization(s) removed");
2059 }
2060 out
2061 } else {
2062 arm_instrs
2063 };
2064
2065 // VCR-RA-001 spill-choice REPORT (#242): measure-only, like SYNTH_SHADOW_ALLOC.
2066 // Per straight-line segment, the frame-slot traffic actually emitted vs the
2067 // reload/store count a farthest-next-use (Belady) allocation over the R0-R8
2068 // pool would need — the measured headroom for the full spill-choice rewrite.
2069 // Printed on the FINAL stream (post all rewrite passes), so a flag-off run
2070 // reports the greedy baseline and a flag-on run reports what remains.
2071 if std::env::var("SYNTH_SPILL_REPORT").is_ok() {
2072 for seg in synth_synthesis::liveness::spill_choice_report(&arm_instrs, 9) {
2073 if seg.actual_reloads + seg.actual_spill_stores > 0 || seg.peak_pressure > 9 {
2074 eprintln!(
2075 "[spill-report] seg@{} len={} peak={} actual={}ld+{}st belady(k=9)={}ld+{}st",
2076 seg.start,
2077 seg.len,
2078 seg.peak_pressure,
2079 seg.actual_reloads,
2080 seg.actual_spill_stores,
2081 seg.belady_reloads,
2082 seg.belady_spill_stores
2083 );
2084 }
2085 }
2086 }
2087
2088 // ISA feature gate: validate that all generated instructions are supported
2089 // by the target. This catches FPU instructions on no-FPU targets, double-precision
2090 // instructions on single-precision targets, etc.
2091 validate_instructions(&arm_instrs, config.target.fpu, &config.target.triple)
2092 .map_err(|e| format!("ISA validation failed: {}", e))?;
2093
2094 // VCR-RA-003 (epic #242): UNCONDITIONAL per-compilation register-allocation
2095 // validation. The register allocator is the last major unverified codegen
2096 // component; this whole-function checker proves — by construction, on the
2097 // EXACT emitted stream about to be encoded — that the allocation preserves
2098 // FOUR invariants whose reference lives in the stream (or the ABI): (1)
2099 // callee-saved preservation (#490), (2) spill-slot non-aliasing (#331), and
2100 // — PHASE 2 (#49), extending past straight-line — (3) caller-saved
2101 // preservation across calls (a value in R2/R3/R12 live across a `bl` the
2102 // AAPCS boundary destroys), and (4) value availability across control-flow
2103 // joins (a live-in to a join must be defined on every incoming edge). It runs
2104 // on every ARM compile in the DEFAULT shipping build (NOT behind
2105 // `--features verify`; a verify-gated check would be dormant in exactly the
2106 // build that ships — the #757 / VCR-VER-003 lesson) and hard-errors the
2107 // compile on a VIOLATION. A `NotAttempted` verdict (the join check declines
2108 // on an unmodeled-CF function: numeric branch, `BrTable`, etc.) is NON-FATAL
2109 // — the compile proceeds; the other three invariants were still checked and
2110 // held. This is the decline>guess doctrine applied to the checker itself: it
2111 // never claims join coherence it cannot prove, but it also never blocks a
2112 // correct compile for a construct it simply doesn't model yet. Frozen-safe:
2113 // it emits nothing, so `.text` is byte-identical (proven by the frozen suite).
2114 match synth_synthesis::liveness::validate_final_allocation(&arm_instrs) {
2115 synth_synthesis::liveness::RaFinalVerdict::Violation(v) => {
2116 return Err(format!(
2117 "VCR-RA-003: register-allocation validation FAILED — {v:?}. \
2118 The emitted stream violates a register-allocation invariant \
2119 (callee-saved preservation #490 / spill-slot non-aliasing #331 \
2120 / caller-saved-across-call / join-value-availability / the #881 \
2121 VFP twins); this is a \
2122 compiler bug, not a program error. Refusing to emit a \
2123 miscompiled object."
2124 ));
2125 }
2126 // Loud honest decline (join reasoning skipped for an unmodeled-CF
2127 // function). Non-fatal — the straight-line / callee-saved / across-call
2128 // invariants still ran and held; only the across-JOIN availability
2129 // reasoning is skipped. Since the #819 redo the optimized path's
2130 // pre-resolved NUMERIC branches are modeled too (build_join_cfg_numeric
2131 // + the PRESERVED entry-availability discriminator), so this fires only
2132 // on genuinely unmodeled shapes: BrTable, computed Bx, mixed
2133 // label+numeric streams, off-boundary numeric targets.
2134 // Surfaced only under `SYNTH_RA003_VERBOSE` so a production compile stays
2135 // quiet: emitting it unconditionally would print on every branchy
2136 // optimized-path compile (new stderr noise phase 1 never produced), yet
2137 // it must remain observable on demand for the honest-scope audit.
2138 synth_synthesis::liveness::RaFinalVerdict::NotAttempted { reason } => {
2139 if std::env::var_os("SYNTH_RA003_VERBOSE").is_some() {
2140 eprintln!(
2141 "VCR-RA-003: across-join validation NOT ATTEMPTED ({reason}) — \
2142 straight-line / callee-saved / across-call invariants held; \
2143 join-availability reasoning declined on this control-flow shape."
2144 );
2145 }
2146 }
2147 synth_synthesis::liveness::RaFinalVerdict::Consistent => {
2148 if std::env::var_os("SYNTH_RA003_VERBOSE").is_some() {
2149 eprintln!("VCR-RA-003: Consistent");
2150 }
2151 }
2152 }
2153 Ok(arm_instrs)
2154}
2155
2156/// VCR-DEC-003 (#396): classify one emitted `ArmOp` into its object-level
2157/// control-flow role for the `synth-provenance-v1` map. Conditional branches are
2158/// the object decision points MC/DC must reconcile; `SelectMove` is the folded
2159/// (IT-block) predicated form the cmp→select fuse produces — a decision with no
2160/// branch.
2161fn classify_arm_branch(op: &ArmOp) -> synth_core::backend::BranchClass {
2162 use synth_core::backend::BranchClass;
2163 match op {
2164 ArmOp::Bcc { .. } | ArmOp::Bhs { .. } | ArmOp::Blo { .. } | ArmOp::BCondOffset { .. } => {
2165 BranchClass::CondBranch
2166 }
2167 ArmOp::B { .. } | ArmOp::BOffset { .. } => BranchClass::UncondBranch,
2168 ArmOp::SelectMove { .. } => BranchClass::Predicated,
2169 _ => BranchClass::Other,
2170 }
2171}
2172
2173/// Resolve local label branches to byte-accurate offsets (#202).
2174///
2175/// `select_with_stack` emits conditional/unconditional branches as label
2176/// placeholders (`Bcc`/`B`/`Bhs`/`Blo` + `Label`) and never resolves them; the
2177/// encoder then emits a `0xD000`/`0xE000` placeholder with offset 0. Before #197
2178/// this path only ran for `--no-optimize`/declined functions, so the latent bug
2179/// stayed hidden — routing relocatable code through it surfaced branches that
2180/// land mid-instruction (a Cortex-M UsageFault) whenever a 32-bit Thumb-2
2181/// instruction sits between the branch and its target.
2182///
2183/// This pass encodes each instruction to learn its real byte length (so 16- vs
2184/// 32-bit forms and multi-instruction expansions are exact), maps each `Label`
2185/// to its byte position, and rewrites every label branch to the displacement
2186/// the encoder consumes: `(target - branch - 4) / 2` halfwords. A bounded
2187/// fixed-point handles an offset growing a branch from 16- to 32-bit (which
2188/// shifts later positions). `BCondOffset`/`BOffset` already produced inline by
2189/// the optimized path carry no label and are left untouched.
2190fn resolve_label_branches(
2191 arm_instrs: Vec<ArmInstruction>,
2192 encoder: &ArmEncoder,
2193) -> Result<Vec<ArmInstruction>, String> {
2194 use std::collections::HashMap;
2195 use synth_synthesis::Condition;
2196
2197 enum BKind {
2198 Cond(Condition),
2199 Uncond,
2200 }
2201 // Record each label branch ONCE — indices are stable across iterations.
2202 let mut branches: Vec<(usize, BKind, String)> = Vec::new();
2203 for (i, instr) in arm_instrs.iter().enumerate() {
2204 match &instr.op {
2205 ArmOp::Bcc { cond, label } => branches.push((i, BKind::Cond(*cond), label.clone())),
2206 ArmOp::Bhs { label } => branches.push((i, BKind::Cond(Condition::HS), label.clone())),
2207 ArmOp::Blo { label } => branches.push((i, BKind::Cond(Condition::LO), label.clone())),
2208 ArmOp::B { label } => branches.push((i, BKind::Uncond, label.clone())),
2209 _ => {}
2210 }
2211 }
2212 if branches.is_empty() {
2213 return Ok(arm_instrs);
2214 }
2215
2216 let mut resolved = arm_instrs;
2217 // Sizes only grow (16→32-bit), so this converges quickly; cap for safety.
2218 for _ in 0..16 {
2219 // 1. Byte position of each instruction (Label encodes to 0 bytes).
2220 let mut positions = Vec::with_capacity(resolved.len());
2221 let mut pos: i64 = 0;
2222 for instr in &resolved {
2223 positions.push(pos);
2224 pos += encoder
2225 .encode(&instr.op)
2226 .map_err(|e| format!("branch-resolve size probe failed: {}", e))?
2227 .len() as i64;
2228 }
2229 // 2. Label name -> byte position (owned keys so the borrow ends here).
2230 let mut labels: HashMap<String, i64> = HashMap::new();
2231 for (i, instr) in resolved.iter().enumerate() {
2232 if let ArmOp::Label { name } = &instr.op {
2233 labels.insert(name.clone(), positions[i]);
2234 }
2235 }
2236 // 3. Rewrite each branch to its byte-accurate offset.
2237 let mut changed = false;
2238 for (idx, kind, label) in &branches {
2239 // A label not defined locally is an EXTERNAL target (e.g.
2240 // `Trap_Handler` resolved by a relocation / the vector table). Leave
2241 // such branches as their placeholder for the existing relocation
2242 // path — only local control-flow labels are byte-resolved here.
2243 let Some(&target) = labels.get(label) else {
2244 continue;
2245 };
2246 // Encoder consumes the field as (target - branch - 4) / 2 halfwords.
2247 // Positions are always even, so this division is exact.
2248 let halfword_offset = ((target - positions[*idx] - 4) / 2) as i32;
2249 let new_op = match kind {
2250 BKind::Cond(c) => ArmOp::BCondOffset {
2251 cond: *c,
2252 offset: halfword_offset,
2253 },
2254 BKind::Uncond => ArmOp::BOffset {
2255 offset: halfword_offset,
2256 },
2257 };
2258 if resolved[*idx].op != new_op {
2259 resolved[*idx].op = new_op;
2260 changed = true;
2261 }
2262 }
2263 if !changed {
2264 break;
2265 }
2266 }
2267 Ok(resolved)
2268}
2269
2270/// SC-5 branch-target boundary gate (#740, #930): every emitted branch target
2271/// must be a member of the instruction-start set of the final stream.
2272///
2273/// "Branch offset calculation shall account for Thumb instruction alignment
2274/// and variable instruction widths" (`safety/stpa/system-constraints.yaml`
2275/// SC-5). Thumb-2 mixes 16- and 32-bit encodings, so an off-by-one-halfword
2276/// target lands on the SECOND halfword of a wide instruction and the CPU
2277/// executes a halfword that was never an instruction — silent garbage, exit 0
2278/// (#930: the skipped `movw` left the `br_if` condition register at its reset
2279/// value). Both known escapes of that sentence were of this class: #740
2280/// (`B<cond>.W` T3 offset halved) and #930 (inner-block end label never
2281/// emitted, `b #0` placeholder). The encoder knows where every instruction
2282/// starts, so a target outside that set is a hard error here rather than
2283/// silent garbage on target.
2284///
2285/// Runs on the FINAL Thumb-2 stream for BOTH codegen paths — the direct
2286/// (`select_with_stack`, label branches byte-resolved above) and the optimized
2287/// (`optimizer_bridge`, numeric `BOffset`/`BCondOffset` pre-resolved inline) —
2288/// since both funnel through this encode pipeline. Two checks, jointly total
2289/// over local control flow:
2290///
2291/// 1. every numeric branch target is in the instruction-start set;
2292/// 2. no LOCAL (`.L`-prefixed) label branch survives unresolved — the resolver
2293/// deliberately skips labels it cannot find because an external target
2294/// (`Trap_Handler`, `func_N`) is legitimately absent and patched by
2295/// relocation, but a `.L` label is only ever defined in this same stream,
2296/// so an unresolved one is a dropped label (#930), not an external.
2297///
2298/// A32 (Cortex-R5) is fixed-width, so the mid-instruction class needs no gate
2299/// there (and its branches do not flow through the Thumb-2 resolver).
2300fn validate_branch_targets(instrs: &[ArmInstruction], encoder: &ArmEncoder) -> Result<(), String> {
2301 use std::collections::HashSet;
2302
2303 // Byte position of each element (`Label` encodes to 0 bytes, so a label's
2304 // position is exactly the start of the instruction that follows it).
2305 let mut positions = Vec::with_capacity(instrs.len());
2306 let mut pos: i64 = 0;
2307 for instr in instrs {
2308 positions.push(pos);
2309 pos += encoder
2310 .encode(&instr.op)
2311 .map_err(|e| format!("SC-5 branch-target gate: size probe failed: {}", e))?
2312 .len() as i64;
2313 }
2314 let starts: HashSet<i64> = positions.iter().copied().collect();
2315
2316 for (i, instr) in instrs.iter().enumerate() {
2317 let offset = match &instr.op {
2318 ArmOp::BOffset { offset } => *offset,
2319 ArmOp::BCondOffset { offset, .. } => *offset,
2320 ArmOp::B { label }
2321 | ArmOp::Bcc { label, .. }
2322 | ArmOp::Bhs { label }
2323 | ArmOp::Blo { label }
2324 if label.starts_with(".L") =>
2325 {
2326 return Err(format!(
2327 "SC-5 branch-target gate: local branch label '{}' is not \
2328 defined anywhere in the emitted stream (branch at byte \
2329 offset 0x{:x}). A `.L` label is only ever defined locally, \
2330 so this is a dropped label (the #930 class) — the branch \
2331 would encode as a `b #0` placeholder and land \
2332 mid-instruction. Refusing to emit a miscompiled object.",
2333 label, positions[i]
2334 ));
2335 }
2336 _ => continue,
2337 };
2338 // Thumb branch semantics: target = branch_pc + 4 + 2*offset.
2339 let target = positions[i] + 4 + 2 * offset as i64;
2340 if !starts.contains(&target) {
2341 return Err(format!(
2342 "SC-5 branch-target gate: branch at byte offset 0x{:x} targets \
2343 0x{:x}, which is not an instruction boundary (instruction-start \
2344 set violation — the target lands mid-instruction, the \
2345 #740/#930 class). Refusing to emit a miscompiled object.",
2346 positions[i], target
2347 ));
2348 }
2349 }
2350 Ok(())
2351}
2352
2353#[cfg(test)]
2354mod tests {
2355 use super::*;
2356 use synth_synthesis::{Operand2, Reg};
2357
2358 /// #539: `i32.const 0; memory.grow m` folds to `memory.size m`; other deltas
2359 /// (const non-zero, runtime) are left as `memory.grow` (→ the sound fixed-
2360 /// memory -1). Non-grow ops are untouched, so functions without the idiom are
2361 /// byte-identical.
2362 #[test]
2363 fn test_rewrite_memory_grow_zero_539() {
2364 // the idiom -> memory.size
2365 assert_eq!(
2366 rewrite_memory_grow_zero(&[WasmOp::I32Const(0), WasmOp::MemoryGrow(0)]),
2367 vec![WasmOp::MemorySize(0)]
2368 );
2369 // const non-zero delta: NOT folded
2370 assert_eq!(
2371 rewrite_memory_grow_zero(&[WasmOp::I32Const(2), WasmOp::MemoryGrow(0)]),
2372 vec![WasmOp::I32Const(2), WasmOp::MemoryGrow(0)]
2373 );
2374 // runtime delta (no preceding const): NOT folded
2375 assert_eq!(
2376 rewrite_memory_grow_zero(&[WasmOp::LocalGet(0), WasmOp::MemoryGrow(0)]),
2377 vec![WasmOp::LocalGet(0), WasmOp::MemoryGrow(0)]
2378 );
2379 // a bare const-0 not feeding a grow is untouched
2380 assert_eq!(
2381 rewrite_memory_grow_zero(&[WasmOp::I32Const(0), WasmOp::I32Add]),
2382 vec![WasmOp::I32Const(0), WasmOp::I32Add]
2383 );
2384 // fold is local: surrounding ops preserved, indices past the fold intact
2385 assert_eq!(
2386 rewrite_memory_grow_zero(&[
2387 WasmOp::LocalGet(0),
2388 WasmOp::I32Const(0),
2389 WasmOp::MemoryGrow(0),
2390 WasmOp::I32Add,
2391 ]),
2392 vec![WasmOp::LocalGet(0), WasmOp::MemorySize(0), WasmOp::I32Add]
2393 );
2394 }
2395
2396 /// SC-5 (#740/#930): the branch-target boundary gate. Every emitted branch
2397 /// target must be a member of the instruction-start set of the final
2398 /// Thumb-2 stream; a `.L`-local label branch surviving unresolved is a
2399 /// dropped label. Red-first: both rejection arms were written against the
2400 /// exact #930 stream shape (a `b #0` placeholder whose pc+4 target falls
2401 /// on the second halfword of a 32-bit `movw`) and fail without the gate.
2402 #[test]
2403 fn test_validate_branch_targets_sc5_930() {
2404 let enc = ArmEncoder::new_thumb2();
2405 let ins = |op: ArmOp| ArmInstruction {
2406 op,
2407 source_line: None,
2408 };
2409
2410 // 1. Boundary-valid stream: b over a wide movw onto the mov — OK.
2411 // positions: 0 BOffset(2B), 2 Movw(4B), 6 Mov(2B)
2412 // target = 0 + 4 + 2*1 = 6 = start of Mov.
2413 let good = vec![
2414 ins(ArmOp::BOffset { offset: 1 }),
2415 ins(ArmOp::Movw {
2416 rd: Reg::R3,
2417 imm16: 1,
2418 }),
2419 ins(ArmOp::Mov {
2420 rd: Reg::R0,
2421 op2: Operand2::Reg(Reg::R3),
2422 }),
2423 ];
2424 assert!(validate_branch_targets(&good, &enc).is_ok());
2425
2426 // 2. The exact #930 shape: `b #0` (offset 0) -> target = pc+4 = 4,
2427 // the SECOND halfword of the 4-byte movw spanning 2..6. Hard error.
2428 let mid = vec![
2429 ins(ArmOp::BOffset { offset: 0 }),
2430 ins(ArmOp::Movw {
2431 rd: Reg::R3,
2432 imm16: 1,
2433 }),
2434 ins(ArmOp::Mov {
2435 rd: Reg::R0,
2436 op2: Operand2::Reg(Reg::R3),
2437 }),
2438 ];
2439 let err = validate_branch_targets(&mid, &enc).unwrap_err();
2440 assert!(err.contains("SC-5"), "boundary violation names SC-5: {err}");
2441 assert!(err.contains("not an instruction boundary"), "{err}");
2442
2443 // 3. Conditional form of the same violation.
2444 let mid_cond = vec![
2445 ins(ArmOp::BCondOffset {
2446 cond: synth_synthesis::Condition::NE,
2447 offset: 0,
2448 }),
2449 ins(ArmOp::Movw {
2450 rd: Reg::R3,
2451 imm16: 1,
2452 }),
2453 ins(ArmOp::Mov {
2454 rd: Reg::R0,
2455 op2: Operand2::Reg(Reg::R3),
2456 }),
2457 ];
2458 assert!(validate_branch_targets(&mid_cond, &enc).is_err());
2459
2460 // 4. A `.L`-local label branch that was never resolved (the dropped
2461 // end label, #930's mechanism) is a hard error even though it
2462 // would encode as a well-formed placeholder.
2463 let dropped = vec![
2464 ins(ArmOp::B {
2465 label: ".Lblock_end_3".to_string(),
2466 }),
2467 ins(ArmOp::Movw {
2468 rd: Reg::R3,
2469 imm16: 1,
2470 }),
2471 ];
2472 let err = validate_branch_targets(&dropped, &enc).unwrap_err();
2473 assert!(err.contains(".Lblock_end_3"), "{err}");
2474 assert!(err.contains("dropped label"), "{err}");
2475
2476 // 5. An EXTERNAL label branch (no `.L` prefix) is legitimately absent
2477 // (patched via relocation / vector table) and must NOT trip the
2478 // gate — the carve-out that used to swallow #930 stays for real
2479 // externals only.
2480 let external = vec![
2481 ins(ArmOp::B {
2482 label: "Trap_Handler".to_string(),
2483 }),
2484 ins(ArmOp::Movw {
2485 rd: Reg::R3,
2486 imm16: 1,
2487 }),
2488 ];
2489 assert!(validate_branch_targets(&external, &enc).is_ok());
2490
2491 // 6. Labels are zero-width: a target on a Label position is the start
2492 // of the instruction that follows it — OK.
2493 let labeled = vec![
2494 ins(ArmOp::BOffset { offset: 1 }),
2495 ins(ArmOp::Movw {
2496 rd: Reg::R3,
2497 imm16: 1,
2498 }),
2499 ins(ArmOp::Label {
2500 name: ".Lend".to_string(),
2501 }),
2502 ins(ArmOp::Mov {
2503 rd: Reg::R0,
2504 op2: Operand2::Reg(Reg::R3),
2505 }),
2506 ];
2507 assert!(validate_branch_targets(&labeled, &enc).is_ok());
2508 }
2509
2510 /// SC-5 (#930) end-to-end at the backend seam: the labels.wast `br_if2`
2511 /// shape — a `br_if` exiting an enclosing block from inside an `if`, its
2512 /// value operand a block-that-branches — must COMPILE (the pre-fix
2513 /// selector dropped the inner block's end label, which the SC-5 gate now
2514 /// turns into a hard error, so compile success proves the label was
2515 /// emitted) and every branch in the emitted bytes must land on an
2516 /// instruction boundary (re-derived from the encoded halfwords, not from
2517 /// the resolver's own bookkeeping).
2518 #[test]
2519 fn test_930_brif2_shape_compiles_and_targets_boundaries() {
2520 let backend = ArmBackend::new();
2521 let ops = vec![
2522 WasmOp::Block, // $l0 (result i32)
2523 WasmOp::I32Const(1),
2524 WasmOp::If,
2525 WasmOp::Block, // $l1 (result i32)
2526 WasmOp::I32Const(1),
2527 WasmOp::Br(0), // br $l1
2528 WasmOp::End,
2529 WasmOp::I32Const(1),
2530 WasmOp::BrIf(1), // br_if $l0
2531 WasmOp::Drop,
2532 WasmOp::End, // end if
2533 WasmOp::I32Const(0),
2534 WasmOp::End, // end $l0
2535 WasmOp::End,
2536 ];
2537 let config = CompileConfig::default();
2538 let func = backend
2539 .compile_function("t", &ops, &config)
2540 .expect("#930 shape must compile (SC-5 gate passes)");
2541
2542 // Walk the encoded halfwords: collect instruction starts, then check
2543 // every narrow/wide B / B<cond> target is a member.
2544 let code = &func.code;
2545 let mut starts = std::collections::HashSet::new();
2546 let mut widths = Vec::new();
2547 let mut off = 0usize;
2548 while off + 2 <= code.len() {
2549 starts.insert(off as i64);
2550 let hw = u16::from_le_bytes([code[off], code[off + 1]]);
2551 let wide = (hw & 0xF800) >= 0xE800; // 0b11101/0b11110/0b11111
2552 widths.push((off, hw, wide));
2553 off += if wide { 4 } else { 2 };
2554 }
2555 for (off, hw, wide) in widths {
2556 let target = if !wide && (hw & 0xF800) == 0xE000 {
2557 // T2 B: imm11, halfwords
2558 let imm = ((hw & 0x7FF) as i32) << 21 >> 21;
2559 Some(off as i64 + 4 + 2 * imm as i64)
2560 } else if !wide && (hw & 0xF000) == 0xD000 && (hw & 0x0F00) < 0x0E00 {
2561 // T1 B<cond>: imm8, halfwords
2562 let imm = ((hw & 0xFF) as i32) << 24 >> 24;
2563 Some(off as i64 + 4 + 2 * imm as i64)
2564 } else {
2565 None
2566 };
2567 if let Some(t) = target {
2568 assert!(
2569 starts.contains(&t),
2570 "branch at 0x{off:x} (hw 0x{hw:04x}) targets 0x{t:x}, \
2571 not an instruction boundary — the #930 miscompile shape"
2572 );
2573 }
2574 }
2575 }
2576
2577 #[test]
2578 fn test_arm_backend_name() {
2579 let backend = ArmBackend::new();
2580 assert_eq!(backend.name(), "arm");
2581 assert!(backend.is_available());
2582 }
2583
2584 #[test]
2585 fn test_arm_backend_capabilities() {
2586 let backend = ArmBackend::new();
2587 let caps = backend.capabilities();
2588 assert!(!caps.produces_elf);
2589 assert!(caps.supports_rule_verification);
2590 assert!(!caps.is_external);
2591 }
2592
2593 #[test]
2594 fn test_compile_add_function() {
2595 let backend = ArmBackend::new();
2596 let ops = vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::I32Add];
2597 let config = CompileConfig::default();
2598
2599 let result = backend.compile_function("add", &ops, &config);
2600 assert!(result.is_ok());
2601
2602 let func = result.unwrap();
2603 assert_eq!(func.name, "add");
2604 assert!(!func.code.is_empty());
2605 assert_eq!(func.wasm_ops, ops);
2606 }
2607
2608 /// VCR-DBG-001: the per-instruction source map must cover the function with
2609 /// monotonic, in-bounds machine offsets, and must not perturb the emitted
2610 /// code (it is captured at encode time, never serialized here).
2611 #[test]
2612 fn test_line_map_is_wellformed_dbg001() {
2613 let backend = ArmBackend::new();
2614 let ops = vec![
2615 WasmOp::LocalGet(0),
2616 WasmOp::LocalGet(1),
2617 WasmOp::I32Add,
2618 WasmOp::End,
2619 ];
2620 let config = CompileConfig::default();
2621 let func = backend.compile_function("add", &ops, &config).unwrap();
2622
2623 // Non-empty, and the first instruction starts at machine offset 0.
2624 assert!(
2625 !func.line_map.is_empty(),
2626 "a non-trivial function captures a source map"
2627 );
2628 assert_eq!(func.line_map[0].0, 0, "first instruction at offset 0");
2629
2630 // Offsets strictly increase by at least one ARM/Thumb instruction (>= 2
2631 // bytes) and every mapped offset lies inside the emitted `.text`.
2632 for w in func.line_map.windows(2) {
2633 assert!(w[1].0 > w[0].0, "instruction offsets strictly increase");
2634 assert!(
2635 w[1].0 - w[0].0 >= 2,
2636 "each ARM/Thumb instruction is >= 2 bytes"
2637 );
2638 }
2639 let last = func.line_map.last().unwrap().0 as usize;
2640 assert!(
2641 last < func.code.len(),
2642 "every mapped offset lies inside .text"
2643 );
2644
2645 // The side-table is additive: recompiling is deterministic and the map is
2646 // consistent with that exact code (capturing it does not alter output).
2647 let again = backend.compile_function("add", &ops, &config).unwrap();
2648 assert_eq!(
2649 again.code, func.code,
2650 "compilation deterministic; map is additive"
2651 );
2652 assert_eq!(again.line_map, func.line_map);
2653 }
2654
2655 #[test]
2656 fn test_count_params() {
2657 let ops = vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::I32Add];
2658 assert_eq!(count_params(&ops), 2);
2659
2660 let no_params = vec![WasmOp::I32Const(5), WasmOp::I32Const(3), WasmOp::I32Add];
2661 assert_eq!(count_params(&no_params), 0);
2662 }
2663
2664 /// #457: the declared param count caps the access-pattern inference. The
2665 /// repro shape `(param i32)(local i32) → p0 + local1` reads local 1 before
2666 /// any write, so `count_params` infers 2 — with the declared count (1) the
2667 /// local is reclassified onto the zero-inited frame path instead of being
2668 /// read from R1 (caller garbage).
2669 #[test]
2670 fn declared_param_count_caps_inference_457() {
2671 let ops = vec![
2672 WasmOp::LocalGet(0),
2673 WasmOp::LocalGet(1),
2674 WasmOp::I32Add,
2675 WasmOp::End,
2676 ];
2677 // The inference alone still says 2 (the misclassification this caps).
2678 assert_eq!(count_params(&ops), 2);
2679
2680 let backend = ArmBackend::new();
2681 let inferred = backend
2682 .compile_function("rbw", &ops, &CompileConfig::default())
2683 .unwrap();
2684 let declared = backend
2685 .compile_function(
2686 "rbw",
2687 &ops,
2688 &CompileConfig {
2689 current_func_param_count: Some(1),
2690 ..CompileConfig::default()
2691 },
2692 )
2693 .unwrap();
2694 // The cap is consumed: the declared-count compile reclassifies local 1
2695 // and must emit different code than the param-misclassified one.
2696 assert_ne!(
2697 inferred.code, declared.code,
2698 "declared param count must reach the selector"
2699 );
2700 // The zero-init is present: a 16-bit Thumb `movs rN, #0`
2701 // (0x2000 | rd<<8 → LE bytes [0x00, 0x20+rd]) somewhere in the body.
2702 let has_movs_zero = declared
2703 .code
2704 .as_chunks::<2>()
2705 .0
2706 .iter()
2707 .any(|h| h[0] == 0x00 && (0x20..=0x27).contains(&h[1]));
2708 assert!(
2709 has_movs_zero,
2710 "declared-count compile must zero-init the read-before-write local; code: {:02x?}",
2711 declared.code
2712 );
2713 // A declared count that matches (or exceeds) the inference changes
2714 // nothing — byte-identity for every function without rbw locals.
2715 let matching = backend
2716 .compile_function(
2717 "rbw",
2718 &ops,
2719 &CompileConfig {
2720 current_func_param_count: Some(2),
2721 ..CompileConfig::default()
2722 },
2723 )
2724 .unwrap();
2725 assert_eq!(
2726 matching.code, inferred.code,
2727 "declared >= inferred must stay byte-identical"
2728 );
2729 }
2730
2731 /// #970: a CONDITIONALLY-written param must stay a param.
2732 ///
2733 /// The read-first heuristic sees `LocalSet(1)` before any `LocalGet(1)` in
2734 /// LINEAR op order and demotes index 1 — even though the `if` means the
2735 /// write may not execute at all. `min(referenced, declared)` keeps it.
2736 /// The RED symptom this pins is not a wrong constant: the demoted local's
2737 /// first access is a WRITE, so the #457 zero-init skips it and the
2738 /// fall-through arm reads an UNINITIALISED frame slot (executed evidence:
2739 /// `scripts/repro/cond_write_param_970_arm_differential.py`).
2740 #[test]
2741 fn conditionally_written_param_stays_a_param_970() {
2742 // (param i32 i32): if (local.get 0) { local.set 1 = 5 }; local.get 1
2743 let ops = vec![
2744 WasmOp::LocalGet(0),
2745 WasmOp::If,
2746 WasmOp::I32Const(5),
2747 WasmOp::LocalSet(1),
2748 WasmOp::End,
2749 WasmOp::LocalGet(1),
2750 WasmOp::End,
2751 ];
2752 let declared = CompileConfig {
2753 current_func_param_count: Some(2),
2754 ..CompileConfig::default()
2755 };
2756 // The old rule: index 1 is written before it is read, so it is not
2757 // counted — this is the undercount that produced the miscompile.
2758 assert_eq!(
2759 count_params(&ops),
2760 1,
2761 "the read-first heuristic must still undercount (this is the defect)"
2762 );
2763 assert_eq!(
2764 effective_num_params(&ops, &declared),
2765 2,
2766 "a conditionally-written param must be counted as a param"
2767 );
2768 // The #457 direction is untouched: a genuine non-param local is still
2769 // clamped away by the declared count.
2770 let rbw = vec![
2771 WasmOp::LocalGet(0),
2772 WasmOp::LocalGet(1),
2773 WasmOp::I32Add,
2774 WasmOp::End,
2775 ];
2776 assert_eq!(
2777 effective_num_params(
2778 &rbw,
2779 &CompileConfig {
2780 current_func_param_count: Some(1),
2781 ..CompileConfig::default()
2782 }
2783 ),
2784 1,
2785 "#457: a read-before-write non-param local must NOT become a param"
2786 );
2787 // Leniency: a body touching only the first few of many declared params
2788 // still lowers with the small count (the selector homes at most 4 in
2789 // registers; `min` is what keeps this from becoming `declared`).
2790 assert_eq!(
2791 effective_num_params(
2792 &rbw,
2793 &CompileConfig {
2794 current_func_param_count: Some(12),
2795 ..CompileConfig::default()
2796 }
2797 ),
2798 2,
2799 "declared >> referenced must stay at the referenced count"
2800 );
2801 // No declared count: the legacy inference, unchanged (honest residual).
2802 assert_eq!(
2803 effective_num_params(&ops, &CompileConfig::default()),
2804 count_params(&ops)
2805 );
2806 }
2807
2808 #[test]
2809 fn test_arm_backend_register() {
2810 let mut registry = synth_core::BackendRegistry::new();
2811 registry.register(Box::new(ArmBackend::new()));
2812 assert!(registry.get("arm").is_some());
2813 assert_eq!(registry.available().len(), 1);
2814 }
2815
2816 #[test]
2817 fn test_compile_import_call_produces_relocations() {
2818 let backend = ArmBackend::new();
2819 // Simulate a WASM module where func index 0 is an import.
2820 // Call(0) should generate MOV R0, #0; BL __meld_dispatch_import
2821 let ops = vec![WasmOp::Call(0)];
2822 let config = CompileConfig {
2823 num_imports: 1,
2824 no_optimize: true, // Direct instruction selection to preserve Call semantics
2825 ..CompileConfig::default()
2826 };
2827
2828 let result = backend.compile_function("caller", &ops, &config);
2829 assert!(result.is_ok());
2830
2831 let func = result.unwrap();
2832 assert!(!func.code.is_empty());
2833 assert_eq!(func.relocations.len(), 1);
2834 assert_eq!(func.relocations[0].symbol, "__meld_dispatch_import");
2835 // The BL is the second instruction (after MOV R0, #0), so offset should be > 0
2836 assert!(func.relocations[0].offset > 0);
2837 }
2838
2839 /// Regression test for #197: in `relocatable` mode, an import call must
2840 /// relocate against the direct `func_N` symbol (rewritten to the wasm field
2841 /// name by `build_relocatable_elf`), NOT `__meld_dispatch_import`. This is
2842 /// the ABI half of the #197 fix — without it, a host linker cannot resolve
2843 /// the call to the real kernel symbol (e.g. `k_spin_lock`).
2844 #[test]
2845 fn test_compile_relocatable_import_uses_direct_func_symbol_197() {
2846 let backend = ArmBackend::new();
2847 let ops = vec![WasmOp::Call(0)]; // func 0 is an import
2848 let config = CompileConfig {
2849 num_imports: 1,
2850 relocatable: true,
2851 ..CompileConfig::default()
2852 };
2853
2854 let func = backend
2855 .compile_function("caller", &ops, &config)
2856 .expect("relocatable import call compiles");
2857
2858 assert_eq!(func.relocations.len(), 1);
2859 assert_eq!(
2860 func.relocations[0].symbol, "func_0",
2861 "#197: relocatable import must relocate against func_0 (→ field name), not Meld dispatch"
2862 );
2863 }
2864
2865 #[test]
2866 fn test_compile_no_imports_no_relocations() {
2867 let backend = ArmBackend::new();
2868 let ops = vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::I32Add];
2869 let config = CompileConfig::default();
2870
2871 let func = backend.compile_function("add", &ops, &config).unwrap();
2872 assert!(func.relocations.is_empty());
2873 }
2874
2875 /// Regression test for #167: a call to an INTERNAL function
2876 /// (index `>= num_imports`) must record a relocation against `func_{index}`.
2877 /// Before the fix, only `__meld_*` (import) BLs were relocated, so
2878 /// internal `BL func_N` was emitted as an unpatched `bl #0` branching
2879 /// to a garbage address — making the object non-linkable. This test
2880 /// would have caught that regression.
2881 #[test]
2882 fn test_compile_internal_call_produces_relocation_167() {
2883 let backend = ArmBackend::new();
2884 // num_imports = 1, so Call(2) is an INTERNAL call → `BL func_2`.
2885 let ops = vec![WasmOp::Call(2)];
2886 let config = CompileConfig {
2887 num_imports: 1,
2888 no_optimize: true,
2889 ..CompileConfig::default()
2890 };
2891
2892 let func = backend
2893 .compile_function("caller", &ops, &config)
2894 .expect("internal call compiles");
2895
2896 assert_eq!(
2897 func.relocations.len(),
2898 1,
2899 "an internal call must emit exactly one relocation (#167)"
2900 );
2901 assert_eq!(
2902 func.relocations[0].symbol, "func_2",
2903 "internal call must relocate against the callee's func_{{index}} symbol (#167)"
2904 );
2905 }
2906
2907 // ─── Phase 1 safety-bounds plumbing for ARM ──────────────────────────
2908
2909 #[test]
2910 fn arm_safety_bounds_mpu_emits_same_code_as_none() {
2911 // Mpu mode must not introduce any inline check on ARM — the MPU
2912 // handles faults via hardware. The encoded bytes for an i32.load
2913 // should be identical between None and Mpu.
2914 let backend = ArmBackend::new();
2915 let ops = vec![
2916 WasmOp::LocalGet(0),
2917 WasmOp::I32Load {
2918 offset: 0,
2919 align: 2,
2920 },
2921 ];
2922 let cfg_none = CompileConfig {
2923 no_optimize: true,
2924 ..Default::default()
2925 };
2926 let cfg_mpu = CompileConfig {
2927 no_optimize: true,
2928 safety_bounds: SafetyBounds::Mpu,
2929 ..Default::default()
2930 };
2931 let n = backend.compile_function("ld", &ops, &cfg_none).unwrap();
2932 let m = backend.compile_function("ld", &ops, &cfg_mpu).unwrap();
2933 assert_eq!(
2934 n.code, m.code,
2935 "Mpu and None should produce identical ARM bytes (Mpu relies on hardware)"
2936 );
2937 }
2938
2939 #[test]
2940 fn arm_legacy_bounds_check_still_emits_software_check() {
2941 // Legacy CLI users with `--bounds-check` should keep getting the
2942 // software path even though the new SafetyBounds field defaults to None.
2943 let backend = ArmBackend::new();
2944 let ops = vec![
2945 WasmOp::LocalGet(0),
2946 WasmOp::I32Load {
2947 offset: 0,
2948 align: 2,
2949 },
2950 ];
2951 let cfg_legacy = CompileConfig {
2952 no_optimize: true,
2953 bounds_check: true,
2954 ..Default::default()
2955 };
2956 let cfg_software = CompileConfig {
2957 no_optimize: true,
2958 safety_bounds: SafetyBounds::Software,
2959 ..Default::default()
2960 };
2961 let l = backend.compile_function("ld", &ops, &cfg_legacy).unwrap();
2962 let s = backend.compile_function("ld", &ops, &cfg_software).unwrap();
2963 assert_eq!(
2964 l.code, s.code,
2965 "--bounds-check should produce the same bytes as --safety-bounds=software"
2966 );
2967 }
2968
2969 /// #377: `--safety-bounds software` must be enforced on the OPTIMIZED path
2970 /// too. Pre-fix, `software` was byte-identical to `none` there (a silent
2971 /// no-op while the safety manifest claimed enforcement). The compiled
2972 /// bytes must now (a) differ from `none` and (b) contain the inline
2973 /// `CMP ip, sl` + `UDF` guard.
2974 #[test]
2975 fn arm_safety_bounds_software_enforced_on_optimized_path_377() {
2976 let backend = ArmBackend::new();
2977 // Dynamic-address store+load: the optimized path accepts this shape
2978 // (no calls, no i64 params, ≤4 params).
2979 let ops = vec![
2980 WasmOp::LocalGet(0),
2981 WasmOp::LocalGet(1),
2982 WasmOp::I32Store {
2983 offset: 4,
2984 align: 2,
2985 },
2986 WasmOp::LocalGet(0),
2987 WasmOp::I32Load {
2988 offset: 0,
2989 align: 2,
2990 },
2991 ];
2992 // no_optimize NOT set — this exercises the optimized path.
2993 let cfg_none = CompileConfig::default();
2994 let cfg_sw = CompileConfig {
2995 safety_bounds: SafetyBounds::Software,
2996 ..Default::default()
2997 };
2998 let n = backend.compile_function("st", &ops, &cfg_none).unwrap();
2999 let s = backend.compile_function("st", &ops, &cfg_sw).unwrap();
3000 assert_ne!(
3001 n.code, s.code,
3002 "#377: software bounds must CHANGE optimized-path codegen (was a silent no-op)"
3003 );
3004 // Thumb-2 `UDF #0` is 0xDE00 (LE bytes: 00 DE); the #752
3005 // wraparound-safe guard's borrow check `CMP sl, ip` (16-bit
3006 // high-reg form) is 0x45E2 (LE: E2 45). Both must appear — one
3007 // guard per access, traps inline.
3008 let has_udf = s.code.windows(2).any(|w| w == [0x00, 0xDE]);
3009 let has_cmp_sl_ip = s.code.windows(2).any(|w| w == [0xE2, 0x45]);
3010 assert!(has_udf, "#377: inline UDF trap missing from optimized path");
3011 assert!(
3012 has_cmp_sl_ip,
3013 "#377/#752: CMP sl, ip bounds borrow-check missing from optimized path"
3014 );
3015 // And `none` must contain NO UDF (the function has no other trap).
3016 assert!(
3017 !n.code.windows(2).any(|w| w == [0x00, 0xDE]),
3018 "none must not contain a UDF for this function"
3019 );
3020 }
3021
3022 /// #377: `mpu` on the optimized path is codegen-passthrough — identical
3023 /// bytes to `none` on BOTH paths (hardware enforcement is target-level;
3024 /// synth does not emit MPU region programming — tracked separately in
3025 /// #377's fix-direction discussion). This pins path-parity for `mpu`.
3026 #[test]
3027 fn arm_safety_bounds_mpu_optimized_path_parity_377() {
3028 let backend = ArmBackend::new();
3029 let ops = vec![
3030 WasmOp::LocalGet(0),
3031 WasmOp::I32Load {
3032 offset: 0,
3033 align: 2,
3034 },
3035 ];
3036 let cfg_none = CompileConfig::default();
3037 let cfg_mpu = CompileConfig {
3038 safety_bounds: SafetyBounds::Mpu,
3039 ..Default::default()
3040 };
3041 let n = backend.compile_function("ld", &ops, &cfg_none).unwrap();
3042 let m = backend.compile_function("ld", &ops, &cfg_mpu).unwrap();
3043 assert_eq!(
3044 n.code, m.code,
3045 "Mpu and None must produce identical bytes on the optimized path too"
3046 );
3047 }
3048
3049 /// #377: `mask` on the optimized path declines to the direct selector
3050 /// (honest degradation) — the compiled function must equal the
3051 /// `--no-optimize` masking bytes, i.e. the flag is honored, never dropped.
3052 #[test]
3053 fn arm_safety_bounds_mask_optimized_path_declines_to_direct_377() {
3054 let backend = ArmBackend::new();
3055 let ops = vec![
3056 WasmOp::LocalGet(0),
3057 WasmOp::LocalGet(1),
3058 WasmOp::I32Store {
3059 offset: 0,
3060 align: 2,
3061 },
3062 ];
3063 // RQ-57-SENTINEL: mask now requires a STATED non-zero power-of-two
3064 // size (0 = zero-byte memory = refused), so the test states one —
3065 // exactly what the #953 fix required of the rv32 driver test.
3066 let cfg_mask_opt = CompileConfig {
3067 safety_bounds: SafetyBounds::Mask,
3068 linear_memory_bytes: 64 * 1024,
3069 ..Default::default()
3070 };
3071 let cfg_mask_direct = CompileConfig {
3072 no_optimize: true,
3073 safety_bounds: SafetyBounds::Mask,
3074 linear_memory_bytes: 64 * 1024,
3075 ..Default::default()
3076 };
3077 let o = backend.compile_function("st", &ops, &cfg_mask_opt).unwrap();
3078 let d = backend
3079 .compile_function("st", &ops, &cfg_mask_direct)
3080 .unwrap();
3081 assert_eq!(
3082 o.code, d.code,
3083 "#377: mask on the optimized path must fall back to the direct selector's masking"
3084 );
3085 }
3086
3087 /// RQ-57-SENTINEL (#953 sibling): `--safety-bounds mask` with a ZERO-byte
3088 /// linear memory must REFUSE at compile time. Before this fix, `bytes == 0`
3089 /// was exempt from the power-of-two gate ("0 means unknown"), and the
3090 /// emitted `SUB R12, R10, #1; AND` guard degenerated to an IDENTITY mask
3091 /// at runtime (R10 = 0 baked by the startup for a `(memory 0)` module):
3092 /// an unbounded OOB access in the mode whose purpose is bounding.
3093 /// Red-first: pre-fix this compile SUCCEEDED (verified on the v0.56.1
3094 /// tree: exit 0, `movw r10, #0x0` in the reset handler, AND-masked body).
3095 #[test]
3096 fn arm_safety_bounds_mask_zero_size_refused_rq57() {
3097 let backend = ArmBackend::new();
3098 let ops = vec![
3099 WasmOp::LocalGet(0),
3100 WasmOp::I32Load {
3101 offset: 0,
3102 align: 2,
3103 },
3104 ];
3105 let cfg = CompileConfig {
3106 safety_bounds: SafetyBounds::Mask,
3107 linear_memory_bytes: 0,
3108 ..Default::default()
3109 };
3110 let err = backend
3111 .compile_function("ld", &ops, &cfg)
3112 .expect_err("mask over a zero-byte memory must refuse, not emit an identity mask");
3113 let msg = format!("{err}");
3114 assert!(
3115 msg.contains("ZERO bytes"),
3116 "refusal must name the zero-byte cause, got: {msg}"
3117 );
3118 }
3119
3120 // ========================================================================
3121 // ISA feature gate tests — ensure the compiler never emits unsupported
3122 // instructions for a given target
3123 // ========================================================================
3124
3125 #[test]
3126 fn test_f32_rejected_on_cortex_m3_no_fpu() {
3127 let backend = ArmBackend::new();
3128 let ops = vec![WasmOp::F32Const(1.0), WasmOp::F32Const(2.0), WasmOp::F32Add];
3129 let config = CompileConfig {
3130 target: TargetSpec::cortex_m3(),
3131 no_optimize: true,
3132 ..CompileConfig::default()
3133 };
3134
3135 let result = backend.compile_function("fadd", &ops, &config);
3136 assert!(
3137 result.is_err(),
3138 "f32 operations should fail on Cortex-M3 (no FPU)"
3139 );
3140 }
3141
3142 #[test]
3143 fn test_f32_accepted_on_cortex_m4f() {
3144 let backend = ArmBackend::new();
3145 let ops = vec![WasmOp::F32Const(1.0), WasmOp::F32Const(2.0), WasmOp::F32Add];
3146 let config = CompileConfig {
3147 target: TargetSpec::cortex_m4f(),
3148 no_optimize: true,
3149 ..CompileConfig::default()
3150 };
3151
3152 let result = backend.compile_function("fadd", &ops, &config);
3153 assert!(
3154 result.is_ok(),
3155 "f32 operations should succeed on Cortex-M4F, got: {:?}",
3156 result.unwrap_err()
3157 );
3158 }
3159
3160 #[test]
3161 fn test_i32_works_on_all_targets() {
3162 let backend = ArmBackend::new();
3163 let ops = vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::I32Add];
3164
3165 // Cortex-M3 (no FPU)
3166 let config_m3 = CompileConfig {
3167 target: TargetSpec::cortex_m3(),
3168 no_optimize: true,
3169 ..CompileConfig::default()
3170 };
3171 assert!(
3172 backend.compile_function("add", &ops, &config_m3).is_ok(),
3173 "i32 ops should work on Cortex-M3"
3174 );
3175
3176 // Cortex-M4F (single FPU)
3177 let config_m4f = CompileConfig {
3178 target: TargetSpec::cortex_m4f(),
3179 no_optimize: true,
3180 ..CompileConfig::default()
3181 };
3182 assert!(
3183 backend.compile_function("add", &ops, &config_m4f).is_ok(),
3184 "i32 ops should work on Cortex-M4F"
3185 );
3186
3187 // Cortex-M7DP (double FPU)
3188 let config_m7dp = CompileConfig {
3189 target: TargetSpec::cortex_m7dp(),
3190 no_optimize: true,
3191 ..CompileConfig::default()
3192 };
3193 assert!(
3194 backend.compile_function("add", &ops, &config_m7dp).is_ok(),
3195 "i32 ops should work on Cortex-M7DP"
3196 );
3197 }
3198
3199 #[test]
3200 fn test_f32_rejected_on_cortex_m4_no_fpu() {
3201 // Cortex-M4 (without F suffix) has no FPU
3202 let backend = ArmBackend::new();
3203 let ops = vec![WasmOp::F32Const(1.5), WasmOp::F32Const(2.5), WasmOp::F32Mul];
3204 let config = CompileConfig {
3205 target: TargetSpec::cortex_m4(),
3206 no_optimize: true,
3207 ..CompileConfig::default()
3208 };
3209
3210 let result = backend.compile_function("fmul", &ops, &config);
3211 assert!(
3212 result.is_err(),
3213 "f32 operations should fail on Cortex-M4 (no FPU)"
3214 );
3215 }
3216
3217 // ========================================================================
3218 // Issue #120 — f32 ops in the optimized lowering path
3219 //
3220 // `OptimizerBridge::wasm_to_ir` has no handlers for f32/f64 ops, so a
3221 // value-producing float op fell through to `Opcode::Nop`, leaving a
3222 // downstream consumer with an unmapped vreg and tripping the PR #101
3223 // defensive panic in `ir_to_arm`. Customer reproducer: `compiler_builtins
3224 // float::div` and `gale_compute_ipi_mask` in the `falcon-rate-component`
3225 // module.
3226 //
3227 // Fix: `optimize_full` declines float modules with a typed `Err`;
3228 // `compile_wasm_to_arm` falls back to the non-optimized `select_with_stack`
3229 // path, which handles f32 via VFP/FPU. These tests use the *default*
3230 // (optimized) config — `no_optimize` is NOT set — which is the exact
3231 // configuration that panicked pre-fix.
3232 // ========================================================================
3233
3234 /// RQ-65-DECLINE (#1208 / #1213 / #1205): a shape the optimized path
3235 /// used to lower WRONG must now reach the direct selector through the
3236 /// fallback, so the DEFAULT configuration is byte-identical to
3237 /// `--no-optimize` on it — the selector-parity property
3238 /// (`selector_parity_197_differential.py`), asserted at the unit level
3239 /// for one instance of each declined class.
3240 #[test]
3241 fn test_rq65_declined_shapes_default_equals_no_optimize() {
3242 let backend = ArmBackend::new();
3243 let cases: Vec<(&str, Vec<WasmOp>)> = vec![
3244 (
3245 "ld8u",
3246 vec![
3247 WasmOp::LocalGet(0),
3248 WasmOp::I64Load8U {
3249 offset: 0,
3250 align: 0,
3251 },
3252 ],
3253 ),
3254 (
3255 "st16",
3256 vec![
3257 WasmOp::LocalGet(0),
3258 WasmOp::I64Const(7),
3259 WasmOp::I64Store16 {
3260 offset: 0,
3261 align: 1,
3262 },
3263 ],
3264 ),
3265 (
3266 "sel64",
3267 vec![
3268 WasmOp::I64Const(1),
3269 WasmOp::I64Const(0),
3270 WasmOp::LocalGet(0),
3271 WasmOp::Select,
3272 WasmOp::I32WrapI64,
3273 ],
3274 ),
3275 (
3276 "vif",
3277 vec![
3278 WasmOp::LocalGet(0),
3279 WasmOp::LocalGet(1),
3280 WasmOp::I32GtS,
3281 WasmOp::If,
3282 WasmOp::I32Const(7),
3283 WasmOp::Else,
3284 WasmOp::I32Const(9),
3285 WasmOp::End,
3286 ],
3287 ),
3288 ];
3289 for (name, ops) in cases {
3290 let default = backend
3291 .compile_function(name, &ops, &CompileConfig::default())
3292 .unwrap_or_else(|e| {
3293 panic!("{name}: default config must compile via the fallback: {e}")
3294 });
3295 let direct = backend
3296 .compile_function(
3297 name,
3298 &ops,
3299 &CompileConfig {
3300 no_optimize: true,
3301 ..CompileConfig::default()
3302 },
3303 )
3304 .unwrap_or_else(|e| panic!("{name}: --no-optimize must compile: {e}"));
3305 assert_eq!(
3306 default.code, direct.code,
3307 "{name}: the declined shape must be the direct selector's bytes"
3308 );
3309 assert!(default.code.len() > 2, "{name}: not the #1208 empty body");
3310 }
3311 }
3312
3313 /// Pre-fix: this panicked with "vreg vN has no assigned ARM register and
3314 /// no spill slot" inside `ir_to_arm`. Post-fix: the optimized path declines
3315 /// the module and the backend falls back to direct selection, producing a
3316 /// non-empty f32.div lowering on a Cortex-M4F.
3317 #[test]
3318 fn test_issue120_f32_div_compiles_via_optimized_default() {
3319 let backend = ArmBackend::new();
3320 let ops = vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::F32Div];
3321 let config = CompileConfig {
3322 target: TargetSpec::cortex_m4f(),
3323 // no_optimize NOT set — this exercises the optimized path that
3324 // panicked in issue #120, then the fallback to direct selection.
3325 // GI-FPU-002: the f32 params must be declared so the direct
3326 // selector homes them in S0/S1 (AAPCS-VFP) rather than declining.
3327 current_func_params_f32: vec![true, true],
3328 ..CompileConfig::default()
3329 };
3330
3331 let result = backend.compile_function("fdiv", &ops, &config);
3332 assert!(
3333 result.is_ok(),
3334 "f32.div must compile on Cortex-M4F via the optimized->direct \
3335 fallback (issue #120), got: {:?}",
3336 result.as_ref().err()
3337 );
3338 assert!(
3339 !result.unwrap().code.is_empty(),
3340 "f32.div must produce non-empty machine code"
3341 );
3342 }
3343
3344 /// A spread of f32 ops, all through the optimized (default) config, must
3345 /// compile via the fallback on an FPU target without panicking.
3346 #[test]
3347 fn test_issue120_assorted_f32_ops_compile_via_optimized_default() {
3348 let backend = ArmBackend::new();
3349 let config = CompileConfig {
3350 target: TargetSpec::cortex_m4f(),
3351 // GI-FPU-002: declare the two f32 params for AAPCS-VFP homing.
3352 current_func_params_f32: vec![true, true],
3353 ..CompileConfig::default()
3354 };
3355
3356 let cases: Vec<(&str, Vec<WasmOp>)> = vec![
3357 (
3358 "fadd",
3359 vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::F32Add],
3360 ),
3361 (
3362 "fmul",
3363 vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::F32Mul],
3364 ),
3365 (
3366 "fsub",
3367 vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::F32Sub],
3368 ),
3369 ];
3370
3371 for (name, ops) in cases {
3372 let result = backend.compile_function(name, &ops, &config);
3373 assert!(
3374 result.is_ok(),
3375 "{name} must compile via the optimized->direct fallback \
3376 (issue #120), got: {:?}",
3377 result.as_ref().err()
3378 );
3379 assert!(
3380 !result.unwrap().code.is_empty(),
3381 "{name} must produce non-empty machine code"
3382 );
3383 }
3384 }
3385
3386 /// The fallback must still honor the ISA feature gate: f32 on a no-FPU
3387 /// target must fail cleanly (not panic) even on the optimized path.
3388 #[test]
3389 fn test_issue120_f32_div_rejected_on_no_fpu_via_optimized() {
3390 let backend = ArmBackend::new();
3391 let ops = vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::F32Div];
3392 let config = CompileConfig {
3393 target: TargetSpec::cortex_m3(),
3394 ..CompileConfig::default()
3395 };
3396
3397 let result = backend.compile_function("fdiv", &ops, &config);
3398 assert!(
3399 result.is_err(),
3400 "f32.div must be rejected on Cortex-M3 (no FPU), not panic"
3401 );
3402 }
3403
3404 /// #507: a `br_table` function compiled via the DEFAULT (optimized) config
3405 /// must produce the SAME bytes as the direct (`no_optimize`) selector —
3406 /// i.e. the optimized path declined it to direct, lowering the dispatch as a
3407 /// real cmp-chain instead of silently dropping it (which left all arms in
3408 /// fall-through). Pre-fix the two outputs differed (the optimized one had no
3409 /// selector compare). Execution correctness is gated by
3410 /// `scripts/repro/br_table_507_differential.py`.
3411 #[test]
3412 fn test_507_br_table_declines_to_direct() {
3413 let backend = ArmBackend::new();
3414 // dispatch(sel): br_table over 3 blocks, each storing a marker to mem[0].
3415 let ops = vec![
3416 WasmOp::Block,
3417 WasmOp::Block,
3418 WasmOp::Block,
3419 WasmOp::LocalGet(0),
3420 WasmOp::BrTable {
3421 targets: vec![0, 1, 2],
3422 default: 2,
3423 },
3424 WasmOp::End,
3425 WasmOp::I32Const(0),
3426 WasmOp::I32Const(10),
3427 WasmOp::I32Store {
3428 offset: 0,
3429 align: 2,
3430 },
3431 WasmOp::Return,
3432 WasmOp::End,
3433 WasmOp::I32Const(0),
3434 WasmOp::I32Const(20),
3435 WasmOp::I32Store {
3436 offset: 0,
3437 align: 2,
3438 },
3439 WasmOp::Return,
3440 WasmOp::End,
3441 WasmOp::I32Const(0),
3442 WasmOp::I32Const(30),
3443 WasmOp::I32Store {
3444 offset: 0,
3445 align: 2,
3446 },
3447 ];
3448 let opt = CompileConfig {
3449 target: TargetSpec::cortex_m4(),
3450 ..CompileConfig::default()
3451 };
3452 let direct = CompileConfig {
3453 target: TargetSpec::cortex_m4(),
3454 no_optimize: true,
3455 ..CompileConfig::default()
3456 };
3457 let a = backend
3458 .compile_function("dispatch", &ops, &opt)
3459 .expect("optimized-default must compile br_table (via decline)");
3460 let b = backend
3461 .compile_function("dispatch", &ops, &direct)
3462 .expect("direct must compile br_table");
3463 assert_eq!(
3464 a.code, b.code,
3465 "#507: optimized-default br_table output must be byte-identical to the \
3466 direct selector (i.e. declined to direct), not a dropped dispatch"
3467 );
3468 }
3469
3470 /// Issue #94: end-to-end byte-size check for the canonical u64-packed
3471 /// FFI-return hi32 extract pattern. Compiles two near-identical
3472 /// functions — one with the optimized shift-by-32, one with a generic
3473 /// shift-by-7 — and asserts the optimized form is meaningfully smaller.
3474 #[test]
3475 fn test_issue94_hi32_extract_is_smaller_than_generic_shift() {
3476 let backend = ArmBackend::new();
3477 let config = CompileConfig {
3478 target: TargetSpec::cortex_m4f(),
3479 ..CompileConfig::default()
3480 };
3481
3482 // #518: the i64 value must NOT come from an i64 PARAM — the optimized
3483 // path now declines i64-param functions to the direct selector (it homed
3484 // an i64 param in R4:R5 instead of R0:R1, a silent miscompile this test's
3485 // byte-size-only assertion masked). The canonical #94 case is a u64 from
3486 // an FFI return, not a param, anyway. Source the i64 from a sign-extended
3487 // i32 param (`extend_i32_s`): a runtime, non-constant-foldable i64 that
3488 // stays on the optimized path, so the shift-by-32 hi-extract peephole is
3489 // still exercised on CORRECT code.
3490 // Optimized path: `(i64.extend_i32_s (local.get 0)) >>> 32; wrap_i64`
3491 let ops_hi32 = vec![
3492 WasmOp::LocalGet(0), // i32 param in R0
3493 WasmOp::I64ExtendI32S,
3494 WasmOp::I64Const(32),
3495 WasmOp::I64ShrU,
3496 WasmOp::I32WrapI64,
3497 ];
3498 let func_hi32 = backend
3499 .compile_function("hi32_extract", &ops_hi32, &config)
3500 .unwrap();
3501
3502 // Generic path: `... >>> 7; wrap_i64` — same shape, but the shift amount
3503 // is not a multiple of 32, so it falls through to the runtime shift.
3504 let ops_generic = vec![
3505 WasmOp::LocalGet(0),
3506 WasmOp::I64ExtendI32S,
3507 WasmOp::I64Const(7),
3508 WasmOp::I64ShrU,
3509 WasmOp::I32WrapI64,
3510 ];
3511 let func_generic = backend
3512 .compile_function("generic_shr", &ops_generic, &config)
3513 .unwrap();
3514
3515 let bytes_hi32 = func_hi32.code.len();
3516 let bytes_generic = func_generic.code.len();
3517 println!(
3518 "\n[issue #94] hi32 extract: {} bytes (vs generic shift: {} bytes; saved {})",
3519 bytes_hi32,
3520 bytes_generic,
3521 bytes_generic.saturating_sub(bytes_hi32)
3522 );
3523 let hex: String = func_hi32
3524 .code
3525 .iter()
3526 .map(|b| format!("{:02x}", b))
3527 .collect::<Vec<_>>()
3528 .join(" ");
3529 println!("[issue #94] hi32 bytes: {}", hex);
3530 // We expect the optimized form to be at least 30 bytes smaller than
3531 // the generic 64-bit shift sequence. (Empirically: 14 vs 50 bytes.)
3532 assert!(
3533 bytes_hi32 + 30 <= bytes_generic,
3534 "issue #94: hi32 extract = {} bytes, generic shift = {} bytes; \
3535 expected optimized form to be at least 30 bytes smaller",
3536 bytes_hi32,
3537 bytes_generic,
3538 );
3539 }
3540}