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] = synth_synthesis::reg_contract::ALLOCATABLE;
1234 // VCR-DEC-001 (epic #242, the North Star's first foothold): the
1235 // SYNTH_GRAPH_ALLOC graph-colouring allocator SPIKE. When enabled it
1236 // replaces STEP 1 of the re-allocation (the segment-based
1237 // `reallocate_function`) with a whole-function Chaitin/Briggs colouring
1238 // (`graph_alloc::reallocate`) built against the SAME acceptance oracle
1239 // (`validate_segment_rewrite` trace-equality); the later dead-frame /
1240 // callee-saved-prologue / shrink passes still run on its output, so a
1241 // value it homes in R4-R8 still gets its callee-saved push (the
1242 // invariant the unconditional VCR-RA-003 validator guards). It is
1243 // BOUNDED to whole straight-line functions and DECLINES (returns None)
1244 // to the shipping `reallocate_function` on any control flow, spill, or
1245 // unmodeled op — never a hard-fail. Flag-OFF (`SYNTH_GRAPH_ALLOC` unset)
1246 // never enters this branch, so the shipping bytes are byte-identical
1247 // (the GOLDEN trick — frozen fixtures unchanged). NO default flip: the
1248 // spike ships flag-off; the flip is a later, evidence-gated step.
1249 //
1250 // VCR-VER-001 (#242): on a function the spill-on-exhaustion machinery
1251 // shaped, the terminal segment gets relaxed live-out pinning (only
1252 // R0/R1 are observable past `bx lr` at this pre-prologue position) so
1253 // the colourer can lower R4-R8-homed tails into caller-saved R0-R3 —
1254 // shrinking the `push {r4-r8,lr}` the #580 exhaustion shapes pay for.
1255 // `post_exhaust == false` selects the shipping pass bit for bit.
1256 let (out, stats) = if synth_synthesis::graph_alloc::enabled() {
1257 // RQ-60-RACOST increment 2 (#242): the colourer prices every
1258 // colour choice in REAL-ENCODER bytes. The sizer is the same
1259 // encoder family the emit loop below constructs — Thumb-2 (with
1260 // the target's FPU) or A32 — asked per candidate instruction, so
1261 // there is no hand size table to drift (#936). On the fixed-width
1262 // A32 ISA every candidate ties and the cost model degenerates to
1263 // the identity hint (zero churn).
1264 let sizing_encoder =
1265 if matches!(config.target.isa, IsaVariant::Thumb2 | IsaVariant::Thumb) {
1266 ArmEncoder::new_thumb2_with_fpu(config.target.fpu)
1267 } else {
1268 ArmEncoder::new_arm32()
1269 };
1270 let enc = |op: &synth_synthesis::rules::ArmOp| {
1271 sizing_encoder.encode(op).ok().map(|b| b.len())
1272 };
1273 let stats_on = std::env::var("SYNTH_GRAPH_ALLOC_STATS").is_ok();
1274 match synth_synthesis::graph_alloc::reallocate(&arm_instrs, &POOL, &enc) {
1275 // SYNTH_GRAPH_ALLOC_FORCE (test seam, RQ-60-RACOST
1276 // increment 2): ship every validated candidate WITHOUT the
1277 // final-byte arbiter — the pre-arbiter behaviour. Used by
1278 // `vcr_dec_001_join_alloc_execution_differential.py` so the
1279 // unicorn-vs-wasmtime oracle executes the colourer's
1280 // proposals on EVERY reachable shape (call, i64-pair,
1281 // shift-expansion), not only the ones the arbiter lets ship —
1282 // an arbiter-declined candidate is still a candidate a future
1283 // change could promote, and the execution teeth must stay
1284 // ahead of that. Never set in production; the arbiter is the
1285 // shipping behaviour.
1286 Some(candidate)
1287 if std::env::var("SYNTH_GRAPH_ALLOC_FORCE").is_ok_and(|v| v != "0") =>
1288 {
1289 if stats_on {
1290 eprintln!(
1291 "[graph-alloc] whole-function colouring APPLIED \
1292 (validated; FORCED — arbiter bypassed)"
1293 );
1294 }
1295 (
1296 candidate,
1297 synth_synthesis::liveness::ReallocStats::default(),
1298 )
1299 }
1300 Some(candidate) => {
1301 // FINAL-BYTE ARBITER (RQ-60-RACOST increment 2). A
1302 // colour-time cost model — however faithful its byte sizes
1303 // — cannot price DOWNSTREAM PASS INTERACTIONS: measured on
1304 // const_cse.wat::spill12, an identity-shaped colouring
1305 // that merely PRESERVED the greedy allocator's register
1306 // rotation defeated const-CSE's canonicalization and grew
1307 // the function 148 -> 244 B (+96), with not one occurrence
1308 // priced differently at colour time. So the candidate is
1309 // sized through the REAL downstream pipeline
1310 // (`finish_allocated_stream` — the exact passes the
1311 // shipped stream runs, not a mirror) plus label resolution
1312 // and the REAL encoder, against the shipping allocator's
1313 // stream sized identically, and it ships only when it is
1314 // STRICTLY smaller. A tie or a refusal keeps the shipping
1315 // bytes — growth on an applied function is structurally
1316 // impossible, which is exactly the wired
1317 // vcr_dec_001_graph_alloc_differential no-growth
1318 // assertion, promoted from a gate into a construction.
1319 let ship = synth_synthesis::liveness::reallocate_function_post_exhaust(
1320 &arm_instrs,
1321 &POOL,
1322 post_exhaust,
1323 );
1324 let size_of = |stream: &[synth_synthesis::ArmInstruction]| -> Option<usize> {
1325 let finished = match finish_allocated_stream(
1326 stream.to_vec(),
1327 config,
1328 post_exhaust,
1329 true,
1330 ) {
1331 Ok(f) => f,
1332 Err(e) => {
1333 if stats_on {
1334 // The differential greps for the RA-003
1335 // hard-error string to detect a SHIPPED
1336 // violation; a candidate refused during
1337 // sizing is a decline, not a shipped
1338 // violation, so that marker is rewritten.
1339 let e = e.replace(
1340 "register-allocation validation FAILED",
1341 "register-allocation validation refused the candidate",
1342 );
1343 eprintln!(
1344 "[graph-alloc] arbiter: stream refused by the \
1345 pipeline/validators: {e}"
1346 );
1347 }
1348 return None;
1349 }
1350 };
1351 let finished = if matches!(
1352 config.target.isa,
1353 IsaVariant::Thumb2 | IsaVariant::Thumb
1354 ) {
1355 resolve_label_branches(finished, &sizing_encoder).ok()?
1356 } else {
1357 finished
1358 };
1359 let mut total = 0usize;
1360 let mut literals = 0usize;
1361 for ins in &finished {
1362 total += sizing_encoder.encode(&ins.op).ok()?.len();
1363 if matches!(ins.op, synth_synthesis::rules::ArmOp::LdrSym { .. }) {
1364 literals += 1;
1365 }
1366 }
1367 if literals > 0 {
1368 // The emit loop 4-aligns the literal pool and
1369 // appends one word per LdrSym (no dedup — each
1370 // site carries its own addend).
1371 total += (4 - total % 4) % 4 + 4 * literals;
1372 }
1373 Some(total)
1374 };
1375 match (size_of(&candidate), size_of(&ship.0)) {
1376 (Some(cand), Some(base)) if cand < base => {
1377 if stats_on {
1378 eprintln!(
1379 "[graph-alloc] whole-function colouring APPLIED \
1380 (validated; arbiter: {cand} B < shipping {base} B)"
1381 );
1382 }
1383 (
1384 candidate,
1385 synth_synthesis::liveness::ReallocStats::default(),
1386 )
1387 }
1388 (cand, base) => {
1389 if stats_on {
1390 eprintln!(
1391 "[graph-alloc] arbiter kept shipping bytes \
1392 (candidate {cand:?} B vs shipping {base:?} B) → \
1393 shipping reallocate_function"
1394 );
1395 }
1396 ship
1397 }
1398 }
1399 }
1400 None => {
1401 if stats_on {
1402 eprintln!("[graph-alloc] DECLINED → shipping reallocate_function");
1403 }
1404 synth_synthesis::liveness::reallocate_function_post_exhaust(
1405 &arm_instrs,
1406 &POOL,
1407 post_exhaust,
1408 )
1409 }
1410 }
1411 } else {
1412 synth_synthesis::liveness::reallocate_function_post_exhaust(
1413 &arm_instrs,
1414 &POOL,
1415 post_exhaust,
1416 )
1417 };
1418 if std::env::var("SYNTH_REALLOC_STATS").is_ok() {
1419 eprintln!(
1420 "[range-realloc] {} segments: {} reallocated, {} declined ({} validator-rejected), {} need spill (step 4)",
1421 stats.segments,
1422 stats.reallocated,
1423 stats.declined,
1424 stats.validator_rejects,
1425 stats.needs_spill
1426 );
1427 }
1428 // VCR-VER-004 AUDIT (#242) — report-only, opt-in, never gating.
1429 //
1430 // The ABI observable-contract validator is a GATE on the flag-off
1431 // graph-colouring spike. This hook asks the same question of the
1432 // SHIPPING allocator's rewrite, so the answer is a MEASUREMENT rather
1433 // than a claim: how much of the shipping path can a value-level,
1434 // ABI-anchored check actually see today? Report-only DELIBERATELY —
1435 // making it gate here would risk a false rejection on the default
1436 // path, and the honest sequence is measure first, flip on evidence.
1437 // `SYNTH_ABI_CONTRACT_AUDIT=1` prints one verdict per function.
1438 if std::env::var_os("SYNTH_ABI_CONTRACT_AUDIT").is_some() {
1439 eprintln!(
1440 "[abi-contract-audit] {:?}",
1441 synth_synthesis::abi_contract::validate_abi_contract(&arm_instrs, &out)
1442 );
1443 }
1444 (out, true)
1445 } else {
1446 (arm_instrs, false)
1447 };
1448 // RQ-60-RACOST increment 2 (#242): every rewrite pass between the chosen
1449 // allocation and the encoder now lives in `finish_allocated_stream`, so
1450 // the SYNTH_GRAPH_ALLOC final-byte arbiter can size a candidate through
1451 // the REAL pipeline. Flag-off this is the exact pre-extraction sequence,
1452 // called once, in the same place.
1453 let arm_instrs = finish_allocated_stream(arm_instrs, config, post_exhaust, ran_realloc)?;
1454
1455 // Encode to binary — use Thumb-2 for Cortex-M targets
1456 let use_thumb2 = matches!(config.target.isa, IsaVariant::Thumb2 | IsaVariant::Thumb);
1457
1458 let encoder = if use_thumb2 {
1459 ArmEncoder::new_thumb2_with_fpu(config.target.fpu)
1460 } else {
1461 ArmEncoder::new_arm32()
1462 };
1463
1464 // #202: resolve local label branches (Bcc/B/Bhs/Blo) to byte-accurate
1465 // offsets before encoding. `select_with_stack` emits them as label
1466 // placeholders and never resolves them — without this they encode as
1467 // `bne.n #0` and land mid-instruction whenever a 32-bit Thumb-2 instruction
1468 // sits between the branch and its target (UsageFault on real hardware).
1469 // Only meaningful for Thumb-2 (the offset units are halfword/PC+4).
1470 let arm_instrs = if use_thumb2 {
1471 let resolved = resolve_label_branches(arm_instrs, &encoder)?;
1472 // SC-5 (#740/#930): hard-gate every branch target onto the
1473 // instruction-start set of the final stream — both codegen paths
1474 // funnel through here. See `validate_branch_targets`.
1475 validate_branch_targets(&resolved, &encoder)?;
1476 resolved
1477 } else {
1478 arm_instrs
1479 };
1480
1481 // #778: capture the FINAL Thumb-2 instruction stream (post label-resolution,
1482 // the exact list the encode loop below consumes) so `compile_function` can
1483 // derive the sound WCET bound. Cheap clone; frozen-safe (the WCET walk is a
1484 // pure observation and never touches `code`). Only the Thumb-2 path — the A32
1485 // (Cortex-R5) cycle model is a follow-up.
1486 let final_instrs_for_wcet: Option<Vec<synth_synthesis::ArmInstruction>> = if use_thumb2 {
1487 Some(arm_instrs.clone())
1488 } else {
1489 None
1490 };
1491
1492 let mut code = Vec::new();
1493 let mut relocations = Vec::new();
1494
1495 // #345: literal-pool address loads. Each `LdrSym` was encoded as a placeholder
1496 // `LDR.W rd,[pc,#0]`; record where its instruction sits and what it loads so
1497 // we can append a pooled word (carrying the symbol address via R_ARM_ABS32)
1498 // and patch the PC-relative offset once the pool position is known.
1499 struct PendingLiteral {
1500 ldr_offset: u32,
1501 symbol: String,
1502 addend: i32,
1503 }
1504 let mut pending_literals: Vec<PendingLiteral> = Vec::new();
1505
1506 // VCR-DBG-001: per-instruction source map for DWARF `.debug_line`. Captured
1507 // here because `code.len()` immediately before `encode()` is the final
1508 // machine offset of the instruction within this function's `.text` — nothing
1509 // after the loop shifts earlier instructions (the literal pool is appended at
1510 // the end; the LDR patch below is in-place/length-preserving). Purely
1511 // additive: it does not touch `code`, so `.text` is byte-identical.
1512 let mut line_map: LineMap = Vec::new();
1513 // VCR-DEC-003 (#396): object-branch class per emitted instruction, parallel
1514 // to `line_map`. Cheap, additive, does not touch `code`.
1515 let mut branch_map: synth_core::backend::BranchMap = Vec::new();
1516
1517 for instr in &arm_instrs {
1518 // Record a relocation for every BL: the encoder emits `bl #0` and
1519 // relies on a relocation to patch the target. This covers BOTH import
1520 // dispatch stubs (`__meld_*`, undefined externals) AND internal calls
1521 // (`func_N`, defined in this object). Previously only `__meld_*` was
1522 // recorded, so internal `BL func_N` calls were left as unpatched
1523 // `bl #0` placeholders branching to a garbage address (#167).
1524 if let ArmOp::Bl { label } = &instr.op {
1525 // #1040: the relocation type is ISA-STATE-dependent and this is the
1526 // only site that knows the state. An A32 (Cortex-R) `bl` is
1527 // R_ARM_CALL (28); a Thumb `bl` is R_ARM_THM_CALL (10). Emitting
1528 // the Thumb type for an A32 word made any consumer that trusts the
1529 // declared type patch Thumb halfwords into an ARM-state
1530 // instruction. Decided here rather than in the ELF emitter, where
1531 // `config.target` is no longer in scope and the ISA would have to
1532 // be re-derived — the shape that produced the bug.
1533 let kind = if config.target.isa == synth_core::target::IsaVariant::Arm32 {
1534 synth_core::backend::RelocKind::ArmCall
1535 } else {
1536 synth_core::backend::RelocKind::ThmCall
1537 };
1538 relocations.push(CodeRelocation {
1539 offset: code.len() as u32,
1540 symbol: label.clone(),
1541 kind,
1542 });
1543 }
1544 // #237: symbol-relative MOVW/MOVT (the `--native-pointer-abi` static-data
1545 // addressing). The encoder writes the addend in place; record the matching
1546 // R_ARM_MOVW_ABS_NC / R_ARM_MOVT_ABS so the linker adds the symbol address.
1547 if let ArmOp::MovwSym { symbol, .. } = &instr.op {
1548 relocations.push(CodeRelocation {
1549 offset: code.len() as u32,
1550 symbol: symbol.clone(),
1551 kind: synth_core::backend::RelocKind::MovwAbs,
1552 });
1553 }
1554 if let ArmOp::MovtSym { symbol, .. } = &instr.op {
1555 relocations.push(CodeRelocation {
1556 offset: code.len() as u32,
1557 symbol: symbol.clone(),
1558 kind: synth_core::backend::RelocKind::MovtAbs,
1559 });
1560 }
1561 // #345: defer the literal-pool word + reloc + offset patch to the
1562 // post-loop pass (the pool address is not yet known).
1563 if let ArmOp::LdrSym { symbol, addend, .. } = &instr.op {
1564 pending_literals.push(PendingLiteral {
1565 ldr_offset: code.len() as u32,
1566 symbol: symbol.clone(),
1567 addend: *addend,
1568 });
1569 }
1570
1571 // The machine offset of this instruction is the current code length,
1572 // captured before the bytes are appended.
1573 line_map.push((code.len() as u32, instr.source_line));
1574 branch_map.push((code.len() as u32, classify_arm_branch(&instr.op)));
1575
1576 let encoded = encoder
1577 .encode(&instr.op)
1578 .map_err(|e| format!("ARM encoding failed: {}", e))?;
1579 code.extend_from_slice(&encoded);
1580 }
1581
1582 // #345: place the literal pool at the end of this function's `.text`. Gated on
1583 // there being at least one `LdrSym` — functions without one are byte-identical
1584 // to before (no trailing padding, so downstream `func_offsets` are unchanged
1585 // and the frozen differential fixtures stay bit-for-bit equal).
1586 if !pending_literals.is_empty() {
1587 if !use_thumb2 {
1588 return Err("LdrSym literal-pool addressing requires Thumb-2".to_string());
1589 }
1590 // 4-byte align the pool start (Thumb-2 word loads require it, and
1591 // `Align(PC,4)` in the LDR-literal semantics assumes a word-aligned pool).
1592 while code.len() % 4 != 0 {
1593 code.push(0x00);
1594 }
1595 // One distinct pooled word per LdrSym (no dedup: different sites carry
1596 // different addends, and the REL addend lives in the word).
1597 for lit in &pending_literals {
1598 let word_offset = code.len() as u32;
1599
1600 // REL semantics: the linker computes `S + A`, where A is the in-place
1601 // value of the relocated word. Initialize the word to the addend so
1602 // the final loaded address is `symbol + addend`.
1603 code.extend_from_slice(&(lit.addend as u32).to_le_bytes());
1604 relocations.push(CodeRelocation {
1605 offset: word_offset,
1606 symbol: lit.symbol.clone(),
1607 kind: synth_core::backend::RelocKind::Abs32,
1608 });
1609
1610 // Patch the placeholder `LDR.W rd,[pc,#imm12]`. Thumb-2 LDR (literal):
1611 // address = Align(PC,4) + imm12, with PC = ldr_offset + 4. The pool is
1612 // always after the LDR, so U=1 (already set in hw1 = 0xF8DF).
1613 let pc = lit.ldr_offset + 4;
1614 let aligned_pc = pc & !3u32;
1615 let imm12 = word_offset - aligned_pc;
1616 if imm12 > 0xFFF {
1617 // Wide LDR-literal range is ±4 KB; these function bodies are far
1618 // smaller, but fail cleanly rather than miscompile if exceeded.
1619 return Err(format!(
1620 "LdrSym literal pool out of range (#345): imm12={} > 4095 \
1621 for symbol {}",
1622 imm12, lit.symbol
1623 ));
1624 }
1625 let hw2_off = (lit.ldr_offset + 2) as usize;
1626 let mut hw2 = u16::from_le_bytes([code[hw2_off], code[hw2_off + 1]]);
1627 hw2 = (hw2 & 0xF000) | (imm12 as u16); // keep Rt, set imm12
1628 let hw2_bytes = hw2.to_le_bytes();
1629 code[hw2_off] = hw2_bytes[0];
1630 code[hw2_off + 1] = hw2_bytes[1];
1631 }
1632 }
1633
1634 Ok((
1635 code,
1636 relocations,
1637 line_map,
1638 branch_map,
1639 final_instrs_for_wcet,
1640 ))
1641}
1642
1643/// RQ-60-RACOST increment 2 (#242): every rewrite pass between a CHOSEN
1644/// register allocation and the encoder, as ONE reusable sequence.
1645///
1646/// Extracted VERBATIM from `compile_wasm_to_arm` (pure code motion) so the
1647/// `SYNTH_GRAPH_ALLOC` final-byte arbiter can size a candidate allocation
1648/// through the REAL downstream pipeline — the same passes, in the same order,
1649/// reading the same flags — rather than through a hand-mirrored predicate of
1650/// them (the #936 drift class: a hand mirror of the encoder's offset-fold
1651/// threshold was UNSOUND at authoring; a hand mirror of eleven rewrite passes
1652/// would be worse). Flag-off behaviour is byte-identical: the shipping path
1653/// calls this exactly once, on the same stream, in the same place it always
1654/// ran.
1655///
1656/// `ran_realloc` selects the historical branch: the dead-frame /
1657/// callee-saved-prologue / shrink trio runs only downstream of the range
1658/// re-allocation lever (`SYNTH_RANGE_REALLOC` on), exactly as before the
1659/// extraction. Diagnostics inside (SYNTH_FUSE_STATS, SYNTH_SHADOW_ALLOC,
1660/// SYNTH_SPILL_REPORT) print once per CALL, so an arbiter sizing run repeats
1661/// them — measurement noise under two opt-in flags, never a byte change.
1662fn finish_allocated_stream(
1663 arm_instrs: Vec<synth_synthesis::ArmInstruction>,
1664 config: &CompileConfig,
1665 post_exhaust: bool,
1666 ran_realloc: bool,
1667) -> Result<Vec<synth_synthesis::ArmInstruction>, String> {
1668 let arm_instrs = if ran_realloc {
1669 let out = arm_instrs;
1670 // VCR-RA-002 (#390, epic #242): eliminate a provably-dead stack frame
1671 // (`sub sp,#N`/`add sp,#N` reserved by `compute_local_layout` for locals
1672 // that promotion homed in registers, never accessed). Removing it saves
1673 // the two instructions AND restores the SP-untouched precondition that
1674 // `shrink_callee_saved_saves` requires — so it must run FIRST.
1675 // DEFAULT-ON (#242 flag audit flip-wave, #592 audit item): evidence
1676 // basis was the 2-path × repro-corpus sweep — 0 functions grow, 58
1677 // shrink (flight_seam controller_step 250→242 −8 / filter_step 180→168
1678 // −12, native_pointer frame_roundtrip 46→34 −12), locked by the
1679 // `dead_frame_elim_no_grow_corpus_242` cargo gate; execution
1680 // differentials re-run green on the new default bytes BEFORE the
1681 // frozen ARM anchors were re-pinned (leaf_dead_frame, flight_seam,
1682 // frame_slot_dce — see the flip PR). Escape hatch:
1683 // `SYNTH_DEAD_FRAME_ELIM=0` opts out and restores the pre-flip bytes
1684 // (CI-gated in `frozen_codegen_bytes.rs`).
1685 let out = if !std::env::var("SYNTH_DEAD_FRAME_ELIM").is_ok_and(|v| v == "0") {
1686 synth_synthesis::liveness::elide_dead_frame(&out).unwrap_or(out)
1687 } else {
1688 out
1689 };
1690 // #490 (epic #242): the optimized selector uses r4-r8 as scratch /
1691 // promoted locals but emits no prologue, silently clobbering a caller's
1692 // callee-saved registers. Add the missing `push {r4-r8,lr}` /
1693 // `pop {r4-r8,pc}` HERE — on the post-realloc body, where realloc has
1694 // lowered low-pressure r4-r8 scratch back to r0-r3, so a save is added
1695 // only for registers genuinely clobbered. `shrink_callee_saved_saves`
1696 // (next) then trims it to the used set. No-op on the direct path (it
1697 // already has its own prologue) and on callee-saved-free leaves.
1698 let out = synth_synthesis::liveness::ensure_callee_saved_prologue(&out);
1699 synth_synthesis::liveness::shrink_callee_saved_saves(&out).unwrap_or(out)
1700 } else {
1701 // Range-realloc off (`SYNTH_RANGE_REALLOC=0`): the optimized path still
1702 // must preserve the callee-saved registers it clobbers (#490). No shrink
1703 // (it is coupled to the realloc lever), so the conservative full save
1704 // stays — correct, just not minimised in this debug configuration.
1705 synth_synthesis::liveness::ensure_callee_saved_prologue(&arm_instrs)
1706 };
1707 // VCR-RA-001 SHADOW ALLOCATION (#209/#242): run the register allocator on
1708 // the selected stream and LOG what it finds — without changing a single
1709 // emitted byte. This is the measure-only bridge between the built analysis
1710 // layer and the eventual virtual-register wiring: it shows, per real
1711 // function, whether the allocator can colour it within the R0–R8 pool and
1712 // how much const-CSE / rematerialization headroom exists (#209). Enable with
1713 // `SYNTH_SHADOW_ALLOC=1`; off by default and side-effect-free either way.
1714 if std::env::var("SYNTH_SHADOW_ALLOC").is_ok() {
1715 use synth_synthesis::liveness::{
1716 AllocationOutcome, allocate_function, function_peak_pressure,
1717 };
1718 // R9 globals / R10 mem-size / R11 mem-base / R12 IP-scratch are reserved;
1719 // pin them above the 0..9 allocatable pool so the colourer keeps R0–R8.
1720 let precolored = std::collections::BTreeMap::from([
1721 (synth_synthesis::rules::Reg::R9, 9usize),
1722 (synth_synthesis::rules::Reg::R10, 10),
1723 (synth_synthesis::rules::Reg::R11, 11),
1724 (synth_synthesis::rules::Reg::R12, 12),
1725 ]);
1726 // True VALUE pressure (one node per value, not per reused physical reg):
1727 // a NeedsSpill with peak ≤ 9 is a SPURIOUS physical-register spill — the
1728 // function fits once virtually allocated.
1729 let peak = function_peak_pressure(&arm_instrs);
1730 match allocate_function(&arm_instrs, 9, &precolored) {
1731 AllocationOutcome::Allocated {
1732 remat_opportunities,
1733 coloring,
1734 } => eprintln!(
1735 "[shadow-alloc] OK: {} pregs coloured within R0-R8 pool, peak value-pressure {}, {} const-CSE/remat opportunities",
1736 coloring.len(),
1737 peak,
1738 remat_opportunities
1739 ),
1740 AllocationOutcome::NeedsSpill(s) => eprintln!(
1741 "[shadow-alloc] physical-graph would spill {:?}, but peak value-pressure is {} (≤9 ⇒ spurious; fits once virtually allocated)",
1742 s, peak
1743 ),
1744 AllocationOutcome::Declined => {
1745 eprintln!(
1746 "[shadow-alloc] declined (unmodeled construct — calls/i64/fp/offset-branch)"
1747 )
1748 }
1749 }
1750 }
1751
1752 // VCR-SEL-004 cmp→select → IT-block predication fusion (#242). The selector
1753 // lowers a `select` whose condition is a comparison to a *materialize then
1754 // re-test* sequence (`cmp a,b; SetCond D,c; cmp D,#0; movne dst,v1; moveq
1755 // dst,v2`); this collapses it onto the comparison's own flags — deleting the
1756 // `SetCond` and the `cmp D,#0` and retargeting the predicated moves to `c` /
1757 // `invert(c)` — yielding the textbook predicated clamp (`cmp a,b; movc dst,v1;
1758 // mov{!c} dst,v2`). −2 instructions per fused select. gale #428 measured this
1759 // as the #1 hot-path size/cycle lever on the gust_mix clamp chain.
1760 //
1761 // Run LATE: after range re-allocation (so the dead-D proof sees final register
1762 // identities) and before encode. Removal-only + rename-only ⇒ no spill
1763 // regression and labels/branch offsets are unaffected. Each fusion is proven
1764 // sound (flags reused only when nothing clobbers them in the window; the
1765 // boolean deleted only when provably dead) — see `fuse_cmp_select`.
1766 //
1767 // DEFAULT-ON as of v0.13.0 (#428): cmp→select fusion ships by default. The
1768 // byte-changing flip is validated by (a) the unicorn execution oracle that runs
1769 // the two-move `mov{invert(c)}` arm (cmp_select_two_move_differential.py), (b)
1770 // gale's gale_decider_diff 10,596-case sweep across all 8 verified primitives
1771 // (native ≡ flag-off ≡ flag-on = 0x88e73178d232bcf5), and (c) the named-anchor
1772 // differentials re-run with fusion ON — control_step still 0x00210A55, flat+
1773 // inlined flight_algo still 0x07FDF307 (results preserved; bytes deliberately
1774 // changed, re-frozen on this commit). Escape hatch: `SYNTH_NO_CMP_SELECT_FUSE=1`
1775 // reverts to the pre-fusion lowering. The on-silicon G474RE DWT no-regression
1776 // check is a tracked post-ship follow-up (gale owns it).
1777 let arm_instrs = if std::env::var("SYNTH_NO_CMP_SELECT_FUSE").is_err() {
1778 // The rewritten stream is identical to `fuse_cmp_select`'s 2-tuple form;
1779 // the extra `two_move` count is diagnostic only (the fusion census /
1780 // blast-radius datum — #7 made that arm reachable).
1781 let (out, fused, two_move) =
1782 synth_synthesis::liveness::fuse_cmp_select_with_stats(&arm_instrs);
1783 if std::env::var("SYNTH_FUSE_STATS").is_ok() {
1784 let in_place = fused - two_move;
1785 eprintln!(
1786 "[cmp-select-fuse] {fused} select(s) fused to predicated moves \
1787 ({two_move} two-move, {in_place} in-place)"
1788 );
1789 }
1790 out
1791 } else {
1792 arm_instrs
1793 };
1794
1795 // Perf lever 1 toward native parity (#390): redundant stack-reload elimination.
1796 // synth lowers every wasm local to a frame slot, so `local.set; local.get` emits
1797 // `str rX,[sp,#N]; … ; ldr rY,[sp,#N]`; when rX still holds the value the reload
1798 // (a ~2-cycle M4 load) becomes `mov rY,rX`. Removal-of-a-load + rename only ⇒ no
1799 // new instruction form and no label/offset change. DEFAULT-ON (#242 feature
1800 // loop): validated bit-identical RESULTS on every frozen anchor (control_step
1801 // 0x00210A55 13/13, flat+inlined flight_algo 0x07FDF307) with .text reduced on
1802 // the shipped --relocatable path, plus 8 unit tests + the frame_slot_dce
1803 // execution differential — the same gated path cmp→select took to default-on in
1804 // v0.13.0 (G474RE silicon confirms perf post-ship). Escape hatch:
1805 // `SYNTH_NO_STACK_FWD=1` restores the frame-resident bytes (frozen-old goldens).
1806 let stack_fwd = std::env::var("SYNTH_NO_STACK_FWD").is_err();
1807 let arm_instrs = if stack_fwd {
1808 let (out, fwd) = synth_synthesis::liveness::forward_stack_reloads(&arm_instrs);
1809 if std::env::var("SYNTH_FUSE_STATS").is_ok() {
1810 eprintln!("[stack-fwd] {fwd} stack reload(s) forwarded to register moves");
1811 }
1812 out
1813 } else {
1814 arm_instrs
1815 };
1816
1817 // VCR-RA frame-slot DCE (#242): once `forward_stack_reloads` has turned the
1818 // reloads of a spill slot into register moves, the `str rX,[sp,#N]` that fed
1819 // them is a dead store — its slot is never loaded again. Remove it. Pairs
1820 // with (and only pays after) stack-reload forwarding, so it shares the flag.
1821 let arm_instrs = if stack_fwd {
1822 let (out, n) = synth_synthesis::liveness::eliminate_dead_frame_stores(&arm_instrs);
1823 if std::env::var("SYNTH_FUSE_STATS").is_ok() {
1824 eprintln!("[frame-slot-dce] {n} dead frame store(s) removed");
1825 }
1826 out
1827 } else {
1828 arm_instrs
1829 };
1830
1831 // VCR-RA-001 spill re-choice (#242), two stages behind one flag.
1832 // Stage 1 (the #569 spike): slot-value forwarding BETWEEN reloads.
1833 // `forward_stack_reloads` (above) forwards only from a spill store's
1834 // SOURCE register, so when register pressure clobbers that source its
1835 // reloads survive; this stage tracks which registers provably still hold
1836 // a frame slot's value (through earlier reloads and reg-reg moves) and
1837 // turns reload #2..#n into a 1-cycle `mov` (or deletes it when the target
1838 // already holds the value). Stage 2 (the Belady re-choice): where NO
1839 // register still holds the value — the genuine-spill case, flat_flight's
1840 // peak-11 hot segment — the value was usually evicted while a dead
1841 // register existed; the clobbering def(s) are renamed onto a provably-dead
1842 // register (`spill_rechoice_segment`) so the value stays resident and the
1843 // reload dissolves outright. A dissolved reload can leave the feeding
1844 // store dead, so the frame-slot DCE sweep runs once more behind the same
1845 // flag. Per-segment commit gates: executable same-value-flow trace
1846 // equality, strict shrink, pool-pressure fit, sub-word/unknown-slot
1847 // conservatism (see `apply_spill_realloc` / `spill_rechoice_segment`).
1848 // Stage 3 (whole-function slot liveness): the segment-local DCE keeps a
1849 // store whose slot reaches function end ("reach-end ≠ dead" — it cannot
1850 // see other segments); `eliminate_unread_frame_stores` walks the whole
1851 // function (labels/branches/loops, SP-displacement tracked) and drops a
1852 // store whose slot NO reachable instruction can read — flat_flight's two
1853 // surviving stores (#576), completing Belady's 0-load side with a 0-store
1854 // side. Same flag: the three stages are one lever, flipped together.
1855 // DEFAULT-ON (#242 feature loop, the v0.14.0 local-promotion pattern):
1856 // Belady spilling ships by default. Evidence basis for the flip: three
1857 // landed flag-off increments (#569 forwarding, #576 Belady re-choice,
1858 // #579 whole-fn slot liveness), 40+ functions shrink / 0 grow across the
1859 // 68-fixture × 2-path sweep, per-segment executable value-trace equality
1860 // guards, and the unicorn-vs-wasmtime execution differentials re-run
1861 // green on the new default bytes (flat+inlined flight_algo 0x07FDF307,
1862 // const_cse, frame_slot_dce, spill_rung_581, r12_spill_496 — which covers
1863 // control_step_decide vs wasmtime; control_step's .text is byte-identical
1864 // under the flip) BEFORE the frozen goldens were re-pinned. Escape hatch:
1865 // `SYNTH_SPILL_REALLOC=0` is the OPT-OUT — it disables all three stages
1866 // and restores the pre-flip bytes (CI-gated by
1867 // `frozen_fixtures_spill_realloc_escape_hatch_restores_old_bytes`). Any
1868 // other value (or unset) runs the pass.
1869 // VCR-VER-001 post-exhaustion extensions (#242, the PR #659 verdict): with
1870 // `SYNTH_SPILL_ON_EXHAUST` active the #580 allocation-time Belady spill
1871 // keeps exhausted functions on the optimized path, and its slots present
1872 // shapes the shipping pass structurally cannot fire on (fresh-monotonic
1873 // slots defeat the overwrite-only DCE; the eviction store's source is
1874 // redefined immediately, defeating store→reload forwarding; R2/R3 are
1875 // never touched again, so the rename-target deadness proof declines them).
1876 // `post_exhaust` (bridge-scoped, see above) enables const
1877 // rematerialization of spilled constants, R2/R3 exit-dead rename targets,
1878 // and per-pair pressure commit — see `apply_spill_realloc_post_exhaust`.
1879 // Flag off (the default): `false` selects the shipping behavior bit for
1880 // bit.
1881 let arm_instrs = if !std::env::var("SYNTH_SPILL_REALLOC").is_ok_and(|v| v == "0") {
1882 let (out, n) =
1883 synth_synthesis::liveness::apply_spill_realloc_post_exhaust(&arm_instrs, post_exhaust);
1884 let (out, d) = synth_synthesis::liveness::eliminate_dead_frame_stores(&out);
1885 let (mut out, u) = synth_synthesis::liveness::eliminate_unread_frame_stores(&out);
1886 let (mut tn, mut td, mut tu) = (n, d, u);
1887 // Post-exhaustion only: iterate the triple to a bounded fixpoint. Each
1888 // dissolved spill pair frees registers and removes stores, exposing
1889 // rename windows and holder chains the previous iteration could not
1890 // prove — the allocation-time Belady slots (#580) routinely need two
1891 // or three rounds where the shipping single round suffices for the
1892 // default path's slots. Every iteration is individually gate-proven
1893 // (value-trace equality, pool pressure, strict shrink), so iterating
1894 // composes soundly; the bound keeps compile time deterministic.
1895 if post_exhaust {
1896 let mut progress = n + d + u > 0;
1897 for _ in 0..3 {
1898 if !progress {
1899 break;
1900 }
1901 let (o, n) =
1902 synth_synthesis::liveness::apply_spill_realloc_post_exhaust(&out, true);
1903 let (o, d) = synth_synthesis::liveness::eliminate_dead_frame_stores(&o);
1904 let (o, u) = synth_synthesis::liveness::eliminate_unread_frame_stores(&o);
1905 progress = n + d + u > 0;
1906 (tn, td, tu) = (tn + n, td + d, tu + u);
1907 out = o;
1908 }
1909 // The cleanup can leave the spill frame with zero surviving
1910 // accesses (every reload rematerialized/dissolved, every store
1911 // swept) — the balanced `sub sp,#K`/`add sp,#K` is then pure
1912 // overhead. `elide_dead_frame` proves that and removes the pair;
1913 // its early run (post-realloc) could not, because the spill
1914 // traffic was still in the stream at that point.
1915 out = synth_synthesis::liveness::elide_dead_frame(&out).unwrap_or(out);
1916 }
1917 if std::env::var("SYNTH_FUSE_STATS").is_ok() {
1918 eprintln!(
1919 "[spill-realloc] {tn} reload(s) forwarded/eliminated, {td} newly-dead frame store(s) removed, {tu} unread-slot store(s) removed"
1920 );
1921 }
1922 out
1923 } else {
1924 arm_instrs
1925 };
1926
1927 // VCR-RA immediate-shift folding (#390, #242): a constant shift amount the
1928 // stack selector materialized into a scratch register (`movw rM,#C; lsl rD,rN,rM`)
1929 // folds to the immediate form (`lsl rD,rN,#C`), removing the dead `movw` — −1
1930 // instruction, −1 live register. Removal-only (offset-neutral before branch
1931 // resolution, like the dead-store pass). DEFAULT-ON as of v0.15.0: validated
1932 // bit-identical results + a net cycle win on the dissolved hot path (−2
1933 // cyc/call, .text 100→90 B on gust_mix). Escape hatch: `SYNTH_NO_IMM_SHIFT_FOLD=1`.
1934 let arm_instrs = if std::env::var("SYNTH_NO_IMM_SHIFT_FOLD").is_err() {
1935 let (out, folds) = synth_synthesis::liveness::fold_immediate_shifts(&arm_instrs);
1936 if std::env::var("SYNTH_FUSE_STATS").is_ok() {
1937 eprintln!(
1938 "[imm-shift-fold] {folds} register shift(s) folded to immediate, movw dropped"
1939 );
1940 }
1941 out
1942 } else {
1943 arm_instrs
1944 };
1945
1946 // #686: elide the #682 mod-32 shift-amount mask (`and r12,rK,#31` before
1947 // every register-controlled i32 shl/shr) when the amount is STATICALLY
1948 // provable < 32 — a const amount folds to the immediate-shift form
1949 // (reduced mod 32, so >= 32 shrinks too), and an already-masked amount
1950 // (`rK = rX & c`, c < 32) drops the redundant re-mask. gale measured the
1951 // unconditional mask at ~12% cyc/call (+14 B) on gust_mix, whose Q8
1952 // fixed-point shifts are all constants (#686). The mask stays wherever
1953 // the bound is unproven — elision is an optimization, the mask is the
1954 // sound default (`liveness::elide_shift_masks` has the proof
1955 // obligations). Runs after `fold_immediate_shifts` (whose movw→shift
1956 // window the #682 mask intercepts, so it declines every masked const
1957 // shift) and before branch resolution (removal/rewrite-only ⇒
1958 // offset-neutral).
1959 //
1960 // DEFAULT-ON since v0.50.1 (opt-out via `SYNTH_SHIFT_MASK_ELIDE=0`; #846).
1961 // gale's gpio-thin driver regressed +44 B / +9% on synth 0.49 — its pin
1962 // bit-arithmetic (`pin & 31` then a register shift) emits the source
1963 // `and rN,#0x1f` IMMEDIATELY followed by the #682 mod-32 re-mask
1964 // `and r12,rN,#0x1f`; the second is provably redundant (Pattern B: an
1965 // operand produced by `and X,#c`, c<32, is already in [0,31]), so the
1966 // pass drops it. Flipping default-on is a deliberate byte-changing
1967 // refreeze: the elision also moves the frozen anchors (const-amount
1968 // shifts fold back to the immediate form) — control_step −20 B,
1969 // flight_seam −166 B, flight_seam_flat −168 B — all size DECREASES with
1970 // the mask soundly kept for every unproven amount. All differentials were
1971 // re-run on the new bytes and the goldens re-pinned (see #846 PR /
1972 // `frozen_codegen_bytes.rs`). `SYNTH_SHIFT_MASK_ELIDE=0` restores the
1973 // pre-flip bytes (opt-out gate in `shift_mask_elide_686.rs`).
1974 let arm_instrs = if std::env::var("SYNTH_SHIFT_MASK_ELIDE").is_ok_and(|v| v == "0") {
1975 arm_instrs
1976 } else {
1977 let (out, elisions) = synth_synthesis::liveness::elide_shift_masks(&arm_instrs);
1978 if std::env::var("SYNTH_FUSE_STATS").is_ok() {
1979 eprintln!(
1980 "[shift-mask-elide] {elisions} provably-<32 shift-amount mask(s) elided (#686)"
1981 );
1982 }
1983 out
1984 };
1985
1986 // VCR-RA uxth/uxtb fold (#428, #242): `movw rM,#0xffff; and rD,rN,rM` →
1987 // `uxth rD,rN` (and the 0xff/uxtb form), removing the dead `movw` — −1
1988 // instruction, −1 live register per 16/8-bit mask. 0xffff/0xff are not Thumb-2
1989 // modified immediates so the selector materializes them into a register; the
1990 // dedicated zero-extend expresses the same masking inline. Removal-only +
1991 // rewrite-in-place (offset-neutral). DEFAULT-ON (#242 flag audit flip-wave,
1992 // #592 audit item): evidence basis was the 2-path × repro-corpus sweep —
1993 // 0 functions grow, 13 shrink (control_step 300→294 −6, gust_mix 38→32 −6,
1994 // uxth_fold pack 36→24 −12), locked by the `uxth_fold_no_grow_corpus_242`
1995 // cargo gate; execution differentials re-run green on the new default
1996 // bytes BEFORE the frozen ARM anchors were re-pinned (uxth_fold,
1997 // control_step — see the flip PR). Escape hatch: `SYNTH_UXTH_FOLD=0` opts
1998 // out and restores the pre-flip bytes (CI-gated in
1999 // `frozen_codegen_bytes.rs`).
2000 let arm_instrs = if !std::env::var("SYNTH_UXTH_FOLD").is_ok_and(|v| v == "0") {
2001 let (out, folds) = synth_synthesis::liveness::fold_uxth(&arm_instrs);
2002 if std::env::var("SYNTH_FUSE_STATS").is_ok() {
2003 eprintln!("[uxth-fold] {folds} mask-and folded to uxth/uxtb, movw dropped");
2004 }
2005 out
2006 } else {
2007 arm_instrs
2008 };
2009
2010 // VCR-RA-001 const-CSE / rematerialization-avoidance (#209, #242). Drops a
2011 // `movw`/`mov #imm` that re-materializes a constant already resident in
2012 // another register and retargets the reads — every rewrite proven by the
2013 // liveness analysis. Runs LAST, after every immediate-fold (shift, uxth) and
2014 // range-realloc, but BEFORE branch resolution/encoding (it removes
2015 // instructions, shifting byte offsets). CSE-last is the #242 no-regression
2016 // fix: the folds have already absorbed every foldable constant, so CSE can no
2017 // longer defeat one (the gust_mix 90→92 mechanism). The pass additionally
2018 // size-guards each segment via the byte-estimator — it commits a segment's
2019 // rewrites only if they do not grow its estimated size — so a retarget that
2020 // would flip a 16-bit encoding to 32-bit (higher base register) is declined.
2021 // DEFAULT-ON (#242 flip-wave, the SYNTH_SPILL_REALLOC/SYNTH_BASE_CSE
2022 // template): const-CSE ships by default. The flip prerequisites recorded in
2023 // `const_cse_reduction_242.rs` were retired first — the bridge-level INLINE
2024 // aliasing (the alias-eviction spill-bijection hazard) was DELETED from
2025 // `optimizer_bridge::ir_to_arm`, so this post-hoc, liveness-proven pass is
2026 // the flag's ONLY effect. Evidence basis: 152 fixture×path corpus sweep — 0
2027 // functions grow (size-guarded per segment), 40 shrink (const_cse::spill12
2028 // 236→148 B), total −536 B — and the execution differentials re-run green
2029 // on the new default bytes BEFORE the frozen goldens were re-pinned
2030 // (const_cse, frame_slot_dce, flight_seam 0x07FDF307, spill_rung_581,
2031 // volatile_segment_543, control_step 0x00210A55). Escape hatch:
2032 // `SYNTH_CONST_CSE=0` is the OPT-OUT — it restores the pre-flip bytes
2033 // (CI-gated by `const_cse_escape_hatch_restores_old_bytes_242` and the
2034 // frozen-anchor escape-hatch gate). Any other value (or unset) runs the pass.
2035 //
2036 // #543 Phase 2: const-CSE declines WHOLESALE while any volatile DMA range
2037 // (`--volatile-segment`) is marked. At the ArmOp level a cached constant
2038 // cannot be classified as address-vs-data (a retargeted read may be a
2039 // memory-access base carrying a per-use immediate offset), so the
2040 // conservative stance for statically-unknown addressing is to decline every
2041 // aliasing rewrite — each constant is re-materialized at each occurrence,
2042 // the documented volatile contract (`CompileConfig::volatile_segments`).
2043 let arm_instrs = if !std::env::var("SYNTH_CONST_CSE").is_ok_and(|v| v == "0")
2044 && config.volatile_segments.is_empty()
2045 {
2046 let (out, removed) = synth_synthesis::liveness::apply_const_cse(&arm_instrs);
2047 if std::env::var("SYNTH_FUSE_STATS").is_ok() {
2048 eprintln!("[const-cse] {removed} redundant constant materialization(s) removed");
2049 }
2050 out
2051 } else {
2052 arm_instrs
2053 };
2054
2055 // VCR-RA-001 spill-choice REPORT (#242): measure-only, like SYNTH_SHADOW_ALLOC.
2056 // Per straight-line segment, the frame-slot traffic actually emitted vs the
2057 // reload/store count a farthest-next-use (Belady) allocation over the R0-R8
2058 // pool would need — the measured headroom for the full spill-choice rewrite.
2059 // Printed on the FINAL stream (post all rewrite passes), so a flag-off run
2060 // reports the greedy baseline and a flag-on run reports what remains.
2061 if std::env::var("SYNTH_SPILL_REPORT").is_ok() {
2062 for seg in synth_synthesis::liveness::spill_choice_report(&arm_instrs, 9) {
2063 if seg.actual_reloads + seg.actual_spill_stores > 0 || seg.peak_pressure > 9 {
2064 eprintln!(
2065 "[spill-report] seg@{} len={} peak={} actual={}ld+{}st belady(k=9)={}ld+{}st",
2066 seg.start,
2067 seg.len,
2068 seg.peak_pressure,
2069 seg.actual_reloads,
2070 seg.actual_spill_stores,
2071 seg.belady_reloads,
2072 seg.belady_spill_stores
2073 );
2074 }
2075 }
2076 }
2077
2078 // ISA feature gate: validate that all generated instructions are supported
2079 // by the target. This catches FPU instructions on no-FPU targets, double-precision
2080 // instructions on single-precision targets, etc.
2081 validate_instructions(&arm_instrs, config.target.fpu, &config.target.triple)
2082 .map_err(|e| format!("ISA validation failed: {}", e))?;
2083
2084 // VCR-RA-003 (epic #242): UNCONDITIONAL per-compilation register-allocation
2085 // validation. The register allocator is the last major unverified codegen
2086 // component; this whole-function checker proves — by construction, on the
2087 // EXACT emitted stream about to be encoded — that the allocation preserves
2088 // FOUR invariants whose reference lives in the stream (or the ABI): (1)
2089 // callee-saved preservation (#490), (2) spill-slot non-aliasing (#331), and
2090 // — PHASE 2 (#49), extending past straight-line — (3) caller-saved
2091 // preservation across calls (a value in R2/R3/R12 live across a `bl` the
2092 // AAPCS boundary destroys), and (4) value availability across control-flow
2093 // joins (a live-in to a join must be defined on every incoming edge). It runs
2094 // on every ARM compile in the DEFAULT shipping build (NOT behind
2095 // `--features verify`; a verify-gated check would be dormant in exactly the
2096 // build that ships — the #757 / VCR-VER-003 lesson) and hard-errors the
2097 // compile on a VIOLATION. A `NotAttempted` verdict (the join check declines
2098 // on an unmodeled-CF function: numeric branch, `BrTable`, etc.) is NON-FATAL
2099 // — the compile proceeds; the other three invariants were still checked and
2100 // held. This is the decline>guess doctrine applied to the checker itself: it
2101 // never claims join coherence it cannot prove, but it also never blocks a
2102 // correct compile for a construct it simply doesn't model yet. Frozen-safe:
2103 // it emits nothing, so `.text` is byte-identical (proven by the frozen suite).
2104 match synth_synthesis::liveness::validate_final_allocation(&arm_instrs) {
2105 synth_synthesis::liveness::RaFinalVerdict::Violation(v) => {
2106 return Err(format!(
2107 "VCR-RA-003: register-allocation validation FAILED — {v:?}. \
2108 The emitted stream violates a register-allocation invariant \
2109 (callee-saved preservation #490 / spill-slot non-aliasing #331 \
2110 / caller-saved-across-call / join-value-availability / the #881 \
2111 VFP twins); this is a \
2112 compiler bug, not a program error. Refusing to emit a \
2113 miscompiled object."
2114 ));
2115 }
2116 // Loud honest decline (join reasoning skipped for an unmodeled-CF
2117 // function). Non-fatal — the straight-line / callee-saved / across-call
2118 // invariants still ran and held; only the across-JOIN availability
2119 // reasoning is skipped. Since the #819 redo the optimized path's
2120 // pre-resolved NUMERIC branches are modeled too (build_join_cfg_numeric
2121 // + the PRESERVED entry-availability discriminator), so this fires only
2122 // on genuinely unmodeled shapes: BrTable, computed Bx, mixed
2123 // label+numeric streams, off-boundary numeric targets.
2124 // Surfaced only under `SYNTH_RA003_VERBOSE` so a production compile stays
2125 // quiet: emitting it unconditionally would print on every branchy
2126 // optimized-path compile (new stderr noise phase 1 never produced), yet
2127 // it must remain observable on demand for the honest-scope audit.
2128 synth_synthesis::liveness::RaFinalVerdict::NotAttempted { reason } => {
2129 if std::env::var_os("SYNTH_RA003_VERBOSE").is_some() {
2130 eprintln!(
2131 "VCR-RA-003: across-join validation NOT ATTEMPTED ({reason}) — \
2132 straight-line / callee-saved / across-call invariants held; \
2133 join-availability reasoning declined on this control-flow shape."
2134 );
2135 }
2136 }
2137 synth_synthesis::liveness::RaFinalVerdict::Consistent => {
2138 if std::env::var_os("SYNTH_RA003_VERBOSE").is_some() {
2139 eprintln!("VCR-RA-003: Consistent");
2140 }
2141 }
2142 }
2143 Ok(arm_instrs)
2144}
2145
2146/// VCR-DEC-003 (#396): classify one emitted `ArmOp` into its object-level
2147/// control-flow role for the `synth-provenance-v1` map. Conditional branches are
2148/// the object decision points MC/DC must reconcile; `SelectMove` is the folded
2149/// (IT-block) predicated form the cmp→select fuse produces — a decision with no
2150/// branch.
2151fn classify_arm_branch(op: &ArmOp) -> synth_core::backend::BranchClass {
2152 use synth_core::backend::BranchClass;
2153 match op {
2154 ArmOp::Bcc { .. } | ArmOp::Bhs { .. } | ArmOp::Blo { .. } | ArmOp::BCondOffset { .. } => {
2155 BranchClass::CondBranch
2156 }
2157 ArmOp::B { .. } | ArmOp::BOffset { .. } => BranchClass::UncondBranch,
2158 ArmOp::SelectMove { .. } => BranchClass::Predicated,
2159 _ => BranchClass::Other,
2160 }
2161}
2162
2163/// Resolve local label branches to byte-accurate offsets (#202).
2164///
2165/// `select_with_stack` emits conditional/unconditional branches as label
2166/// placeholders (`Bcc`/`B`/`Bhs`/`Blo` + `Label`) and never resolves them; the
2167/// encoder then emits a `0xD000`/`0xE000` placeholder with offset 0. Before #197
2168/// this path only ran for `--no-optimize`/declined functions, so the latent bug
2169/// stayed hidden — routing relocatable code through it surfaced branches that
2170/// land mid-instruction (a Cortex-M UsageFault) whenever a 32-bit Thumb-2
2171/// instruction sits between the branch and its target.
2172///
2173/// This pass encodes each instruction to learn its real byte length (so 16- vs
2174/// 32-bit forms and multi-instruction expansions are exact), maps each `Label`
2175/// to its byte position, and rewrites every label branch to the displacement
2176/// the encoder consumes: `(target - branch - 4) / 2` halfwords. A bounded
2177/// fixed-point handles an offset growing a branch from 16- to 32-bit (which
2178/// shifts later positions). `BCondOffset`/`BOffset` already produced inline by
2179/// the optimized path carry no label and are left untouched.
2180fn resolve_label_branches(
2181 arm_instrs: Vec<ArmInstruction>,
2182 encoder: &ArmEncoder,
2183) -> Result<Vec<ArmInstruction>, String> {
2184 use std::collections::HashMap;
2185 use synth_synthesis::Condition;
2186
2187 enum BKind {
2188 Cond(Condition),
2189 Uncond,
2190 }
2191 // Record each label branch ONCE — indices are stable across iterations.
2192 let mut branches: Vec<(usize, BKind, String)> = Vec::new();
2193 for (i, instr) in arm_instrs.iter().enumerate() {
2194 match &instr.op {
2195 ArmOp::Bcc { cond, label } => branches.push((i, BKind::Cond(*cond), label.clone())),
2196 ArmOp::Bhs { label } => branches.push((i, BKind::Cond(Condition::HS), label.clone())),
2197 ArmOp::Blo { label } => branches.push((i, BKind::Cond(Condition::LO), label.clone())),
2198 ArmOp::B { label } => branches.push((i, BKind::Uncond, label.clone())),
2199 _ => {}
2200 }
2201 }
2202 if branches.is_empty() {
2203 return Ok(arm_instrs);
2204 }
2205
2206 let mut resolved = arm_instrs;
2207 // Sizes only grow (16→32-bit), so this converges quickly; cap for safety.
2208 for _ in 0..16 {
2209 // 1. Byte position of each instruction (Label encodes to 0 bytes).
2210 let mut positions = Vec::with_capacity(resolved.len());
2211 let mut pos: i64 = 0;
2212 for instr in &resolved {
2213 positions.push(pos);
2214 pos += encoder
2215 .encode(&instr.op)
2216 .map_err(|e| format!("branch-resolve size probe failed: {}", e))?
2217 .len() as i64;
2218 }
2219 // 2. Label name -> byte position (owned keys so the borrow ends here).
2220 let mut labels: HashMap<String, i64> = HashMap::new();
2221 for (i, instr) in resolved.iter().enumerate() {
2222 if let ArmOp::Label { name } = &instr.op {
2223 labels.insert(name.clone(), positions[i]);
2224 }
2225 }
2226 // 3. Rewrite each branch to its byte-accurate offset.
2227 let mut changed = false;
2228 for (idx, kind, label) in &branches {
2229 // A label not defined locally is an EXTERNAL target (e.g.
2230 // `Trap_Handler` resolved by a relocation / the vector table). Leave
2231 // such branches as their placeholder for the existing relocation
2232 // path — only local control-flow labels are byte-resolved here.
2233 let Some(&target) = labels.get(label) else {
2234 continue;
2235 };
2236 // Encoder consumes the field as (target - branch - 4) / 2 halfwords.
2237 // Positions are always even, so this division is exact.
2238 let halfword_offset = ((target - positions[*idx] - 4) / 2) as i32;
2239 let new_op = match kind {
2240 BKind::Cond(c) => ArmOp::BCondOffset {
2241 cond: *c,
2242 offset: halfword_offset,
2243 },
2244 BKind::Uncond => ArmOp::BOffset {
2245 offset: halfword_offset,
2246 },
2247 };
2248 if resolved[*idx].op != new_op {
2249 resolved[*idx].op = new_op;
2250 changed = true;
2251 }
2252 }
2253 if !changed {
2254 break;
2255 }
2256 }
2257 Ok(resolved)
2258}
2259
2260/// SC-5 branch-target boundary gate (#740, #930): every emitted branch target
2261/// must be a member of the instruction-start set of the final stream.
2262///
2263/// "Branch offset calculation shall account for Thumb instruction alignment
2264/// and variable instruction widths" (`safety/stpa/system-constraints.yaml`
2265/// SC-5). Thumb-2 mixes 16- and 32-bit encodings, so an off-by-one-halfword
2266/// target lands on the SECOND halfword of a wide instruction and the CPU
2267/// executes a halfword that was never an instruction — silent garbage, exit 0
2268/// (#930: the skipped `movw` left the `br_if` condition register at its reset
2269/// value). Both known escapes of that sentence were of this class: #740
2270/// (`B<cond>.W` T3 offset halved) and #930 (inner-block end label never
2271/// emitted, `b #0` placeholder). The encoder knows where every instruction
2272/// starts, so a target outside that set is a hard error here rather than
2273/// silent garbage on target.
2274///
2275/// Runs on the FINAL Thumb-2 stream for BOTH codegen paths — the direct
2276/// (`select_with_stack`, label branches byte-resolved above) and the optimized
2277/// (`optimizer_bridge`, numeric `BOffset`/`BCondOffset` pre-resolved inline) —
2278/// since both funnel through this encode pipeline. Two checks, jointly total
2279/// over local control flow:
2280///
2281/// 1. every numeric branch target is in the instruction-start set;
2282/// 2. no LOCAL (`.L`-prefixed) label branch survives unresolved — the resolver
2283/// deliberately skips labels it cannot find because an external target
2284/// (`Trap_Handler`, `func_N`) is legitimately absent and patched by
2285/// relocation, but a `.L` label is only ever defined in this same stream,
2286/// so an unresolved one is a dropped label (#930), not an external.
2287///
2288/// A32 (Cortex-R5) is fixed-width, so the mid-instruction class needs no gate
2289/// there (and its branches do not flow through the Thumb-2 resolver).
2290fn validate_branch_targets(instrs: &[ArmInstruction], encoder: &ArmEncoder) -> Result<(), String> {
2291 use std::collections::HashSet;
2292
2293 // Byte position of each element (`Label` encodes to 0 bytes, so a label's
2294 // position is exactly the start of the instruction that follows it).
2295 let mut positions = Vec::with_capacity(instrs.len());
2296 let mut pos: i64 = 0;
2297 for instr in instrs {
2298 positions.push(pos);
2299 pos += encoder
2300 .encode(&instr.op)
2301 .map_err(|e| format!("SC-5 branch-target gate: size probe failed: {}", e))?
2302 .len() as i64;
2303 }
2304 let starts: HashSet<i64> = positions.iter().copied().collect();
2305
2306 for (i, instr) in instrs.iter().enumerate() {
2307 let offset = match &instr.op {
2308 ArmOp::BOffset { offset } => *offset,
2309 ArmOp::BCondOffset { offset, .. } => *offset,
2310 ArmOp::B { label }
2311 | ArmOp::Bcc { label, .. }
2312 | ArmOp::Bhs { label }
2313 | ArmOp::Blo { label }
2314 if label.starts_with(".L") =>
2315 {
2316 return Err(format!(
2317 "SC-5 branch-target gate: local branch label '{}' is not \
2318 defined anywhere in the emitted stream (branch at byte \
2319 offset 0x{:x}). A `.L` label is only ever defined locally, \
2320 so this is a dropped label (the #930 class) — the branch \
2321 would encode as a `b #0` placeholder and land \
2322 mid-instruction. Refusing to emit a miscompiled object.",
2323 label, positions[i]
2324 ));
2325 }
2326 _ => continue,
2327 };
2328 // Thumb branch semantics: target = branch_pc + 4 + 2*offset.
2329 let target = positions[i] + 4 + 2 * offset as i64;
2330 if !starts.contains(&target) {
2331 return Err(format!(
2332 "SC-5 branch-target gate: branch at byte offset 0x{:x} targets \
2333 0x{:x}, which is not an instruction boundary (instruction-start \
2334 set violation — the target lands mid-instruction, the \
2335 #740/#930 class). Refusing to emit a miscompiled object.",
2336 positions[i], target
2337 ));
2338 }
2339 }
2340 Ok(())
2341}
2342
2343#[cfg(test)]
2344mod tests {
2345 use super::*;
2346 use synth_synthesis::{Operand2, Reg};
2347
2348 /// #539: `i32.const 0; memory.grow m` folds to `memory.size m`; other deltas
2349 /// (const non-zero, runtime) are left as `memory.grow` (→ the sound fixed-
2350 /// memory -1). Non-grow ops are untouched, so functions without the idiom are
2351 /// byte-identical.
2352 #[test]
2353 fn test_rewrite_memory_grow_zero_539() {
2354 // the idiom -> memory.size
2355 assert_eq!(
2356 rewrite_memory_grow_zero(&[WasmOp::I32Const(0), WasmOp::MemoryGrow(0)]),
2357 vec![WasmOp::MemorySize(0)]
2358 );
2359 // const non-zero delta: NOT folded
2360 assert_eq!(
2361 rewrite_memory_grow_zero(&[WasmOp::I32Const(2), WasmOp::MemoryGrow(0)]),
2362 vec![WasmOp::I32Const(2), WasmOp::MemoryGrow(0)]
2363 );
2364 // runtime delta (no preceding const): NOT folded
2365 assert_eq!(
2366 rewrite_memory_grow_zero(&[WasmOp::LocalGet(0), WasmOp::MemoryGrow(0)]),
2367 vec![WasmOp::LocalGet(0), WasmOp::MemoryGrow(0)]
2368 );
2369 // a bare const-0 not feeding a grow is untouched
2370 assert_eq!(
2371 rewrite_memory_grow_zero(&[WasmOp::I32Const(0), WasmOp::I32Add]),
2372 vec![WasmOp::I32Const(0), WasmOp::I32Add]
2373 );
2374 // fold is local: surrounding ops preserved, indices past the fold intact
2375 assert_eq!(
2376 rewrite_memory_grow_zero(&[
2377 WasmOp::LocalGet(0),
2378 WasmOp::I32Const(0),
2379 WasmOp::MemoryGrow(0),
2380 WasmOp::I32Add,
2381 ]),
2382 vec![WasmOp::LocalGet(0), WasmOp::MemorySize(0), WasmOp::I32Add]
2383 );
2384 }
2385
2386 /// SC-5 (#740/#930): the branch-target boundary gate. Every emitted branch
2387 /// target must be a member of the instruction-start set of the final
2388 /// Thumb-2 stream; a `.L`-local label branch surviving unresolved is a
2389 /// dropped label. Red-first: both rejection arms were written against the
2390 /// exact #930 stream shape (a `b #0` placeholder whose pc+4 target falls
2391 /// on the second halfword of a 32-bit `movw`) and fail without the gate.
2392 #[test]
2393 fn test_validate_branch_targets_sc5_930() {
2394 let enc = ArmEncoder::new_thumb2();
2395 let ins = |op: ArmOp| ArmInstruction {
2396 op,
2397 source_line: None,
2398 };
2399
2400 // 1. Boundary-valid stream: b over a wide movw onto the mov — OK.
2401 // positions: 0 BOffset(2B), 2 Movw(4B), 6 Mov(2B)
2402 // target = 0 + 4 + 2*1 = 6 = start of Mov.
2403 let good = vec![
2404 ins(ArmOp::BOffset { offset: 1 }),
2405 ins(ArmOp::Movw {
2406 rd: Reg::R3,
2407 imm16: 1,
2408 }),
2409 ins(ArmOp::Mov {
2410 rd: Reg::R0,
2411 op2: Operand2::Reg(Reg::R3),
2412 }),
2413 ];
2414 assert!(validate_branch_targets(&good, &enc).is_ok());
2415
2416 // 2. The exact #930 shape: `b #0` (offset 0) -> target = pc+4 = 4,
2417 // the SECOND halfword of the 4-byte movw spanning 2..6. Hard error.
2418 let mid = vec![
2419 ins(ArmOp::BOffset { offset: 0 }),
2420 ins(ArmOp::Movw {
2421 rd: Reg::R3,
2422 imm16: 1,
2423 }),
2424 ins(ArmOp::Mov {
2425 rd: Reg::R0,
2426 op2: Operand2::Reg(Reg::R3),
2427 }),
2428 ];
2429 let err = validate_branch_targets(&mid, &enc).unwrap_err();
2430 assert!(err.contains("SC-5"), "boundary violation names SC-5: {err}");
2431 assert!(err.contains("not an instruction boundary"), "{err}");
2432
2433 // 3. Conditional form of the same violation.
2434 let mid_cond = vec![
2435 ins(ArmOp::BCondOffset {
2436 cond: synth_synthesis::Condition::NE,
2437 offset: 0,
2438 }),
2439 ins(ArmOp::Movw {
2440 rd: Reg::R3,
2441 imm16: 1,
2442 }),
2443 ins(ArmOp::Mov {
2444 rd: Reg::R0,
2445 op2: Operand2::Reg(Reg::R3),
2446 }),
2447 ];
2448 assert!(validate_branch_targets(&mid_cond, &enc).is_err());
2449
2450 // 4. A `.L`-local label branch that was never resolved (the dropped
2451 // end label, #930's mechanism) is a hard error even though it
2452 // would encode as a well-formed placeholder.
2453 let dropped = vec![
2454 ins(ArmOp::B {
2455 label: ".Lblock_end_3".to_string(),
2456 }),
2457 ins(ArmOp::Movw {
2458 rd: Reg::R3,
2459 imm16: 1,
2460 }),
2461 ];
2462 let err = validate_branch_targets(&dropped, &enc).unwrap_err();
2463 assert!(err.contains(".Lblock_end_3"), "{err}");
2464 assert!(err.contains("dropped label"), "{err}");
2465
2466 // 5. An EXTERNAL label branch (no `.L` prefix) is legitimately absent
2467 // (patched via relocation / vector table) and must NOT trip the
2468 // gate — the carve-out that used to swallow #930 stays for real
2469 // externals only.
2470 let external = vec![
2471 ins(ArmOp::B {
2472 label: "Trap_Handler".to_string(),
2473 }),
2474 ins(ArmOp::Movw {
2475 rd: Reg::R3,
2476 imm16: 1,
2477 }),
2478 ];
2479 assert!(validate_branch_targets(&external, &enc).is_ok());
2480
2481 // 6. Labels are zero-width: a target on a Label position is the start
2482 // of the instruction that follows it — OK.
2483 let labeled = vec![
2484 ins(ArmOp::BOffset { offset: 1 }),
2485 ins(ArmOp::Movw {
2486 rd: Reg::R3,
2487 imm16: 1,
2488 }),
2489 ins(ArmOp::Label {
2490 name: ".Lend".to_string(),
2491 }),
2492 ins(ArmOp::Mov {
2493 rd: Reg::R0,
2494 op2: Operand2::Reg(Reg::R3),
2495 }),
2496 ];
2497 assert!(validate_branch_targets(&labeled, &enc).is_ok());
2498 }
2499
2500 /// SC-5 (#930) end-to-end at the backend seam: the labels.wast `br_if2`
2501 /// shape — a `br_if` exiting an enclosing block from inside an `if`, its
2502 /// value operand a block-that-branches — must COMPILE (the pre-fix
2503 /// selector dropped the inner block's end label, which the SC-5 gate now
2504 /// turns into a hard error, so compile success proves the label was
2505 /// emitted) and every branch in the emitted bytes must land on an
2506 /// instruction boundary (re-derived from the encoded halfwords, not from
2507 /// the resolver's own bookkeeping).
2508 #[test]
2509 fn test_930_brif2_shape_compiles_and_targets_boundaries() {
2510 let backend = ArmBackend::new();
2511 let ops = vec![
2512 WasmOp::Block, // $l0 (result i32)
2513 WasmOp::I32Const(1),
2514 WasmOp::If,
2515 WasmOp::Block, // $l1 (result i32)
2516 WasmOp::I32Const(1),
2517 WasmOp::Br(0), // br $l1
2518 WasmOp::End,
2519 WasmOp::I32Const(1),
2520 WasmOp::BrIf(1), // br_if $l0
2521 WasmOp::Drop,
2522 WasmOp::End, // end if
2523 WasmOp::I32Const(0),
2524 WasmOp::End, // end $l0
2525 WasmOp::End,
2526 ];
2527 let config = CompileConfig::default();
2528 let func = backend
2529 .compile_function("t", &ops, &config)
2530 .expect("#930 shape must compile (SC-5 gate passes)");
2531
2532 // Walk the encoded halfwords: collect instruction starts, then check
2533 // every narrow/wide B / B<cond> target is a member.
2534 let code = &func.code;
2535 let mut starts = std::collections::HashSet::new();
2536 let mut widths = Vec::new();
2537 let mut off = 0usize;
2538 while off + 2 <= code.len() {
2539 starts.insert(off as i64);
2540 let hw = u16::from_le_bytes([code[off], code[off + 1]]);
2541 let wide = (hw & 0xF800) >= 0xE800; // 0b11101/0b11110/0b11111
2542 widths.push((off, hw, wide));
2543 off += if wide { 4 } else { 2 };
2544 }
2545 for (off, hw, wide) in widths {
2546 let target = if !wide && (hw & 0xF800) == 0xE000 {
2547 // T2 B: imm11, halfwords
2548 let imm = ((hw & 0x7FF) as i32) << 21 >> 21;
2549 Some(off as i64 + 4 + 2 * imm as i64)
2550 } else if !wide && (hw & 0xF000) == 0xD000 && (hw & 0x0F00) < 0x0E00 {
2551 // T1 B<cond>: imm8, halfwords
2552 let imm = ((hw & 0xFF) as i32) << 24 >> 24;
2553 Some(off as i64 + 4 + 2 * imm as i64)
2554 } else {
2555 None
2556 };
2557 if let Some(t) = target {
2558 assert!(
2559 starts.contains(&t),
2560 "branch at 0x{off:x} (hw 0x{hw:04x}) targets 0x{t:x}, \
2561 not an instruction boundary — the #930 miscompile shape"
2562 );
2563 }
2564 }
2565 }
2566
2567 #[test]
2568 fn test_arm_backend_name() {
2569 let backend = ArmBackend::new();
2570 assert_eq!(backend.name(), "arm");
2571 assert!(backend.is_available());
2572 }
2573
2574 #[test]
2575 fn test_arm_backend_capabilities() {
2576 let backend = ArmBackend::new();
2577 let caps = backend.capabilities();
2578 assert!(!caps.produces_elf);
2579 assert!(caps.supports_rule_verification);
2580 assert!(!caps.is_external);
2581 }
2582
2583 #[test]
2584 fn test_compile_add_function() {
2585 let backend = ArmBackend::new();
2586 let ops = vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::I32Add];
2587 let config = CompileConfig::default();
2588
2589 let result = backend.compile_function("add", &ops, &config);
2590 assert!(result.is_ok());
2591
2592 let func = result.unwrap();
2593 assert_eq!(func.name, "add");
2594 assert!(!func.code.is_empty());
2595 assert_eq!(func.wasm_ops, ops);
2596 }
2597
2598 /// VCR-DBG-001: the per-instruction source map must cover the function with
2599 /// monotonic, in-bounds machine offsets, and must not perturb the emitted
2600 /// code (it is captured at encode time, never serialized here).
2601 #[test]
2602 fn test_line_map_is_wellformed_dbg001() {
2603 let backend = ArmBackend::new();
2604 let ops = vec![
2605 WasmOp::LocalGet(0),
2606 WasmOp::LocalGet(1),
2607 WasmOp::I32Add,
2608 WasmOp::End,
2609 ];
2610 let config = CompileConfig::default();
2611 let func = backend.compile_function("add", &ops, &config).unwrap();
2612
2613 // Non-empty, and the first instruction starts at machine offset 0.
2614 assert!(
2615 !func.line_map.is_empty(),
2616 "a non-trivial function captures a source map"
2617 );
2618 assert_eq!(func.line_map[0].0, 0, "first instruction at offset 0");
2619
2620 // Offsets strictly increase by at least one ARM/Thumb instruction (>= 2
2621 // bytes) and every mapped offset lies inside the emitted `.text`.
2622 for w in func.line_map.windows(2) {
2623 assert!(w[1].0 > w[0].0, "instruction offsets strictly increase");
2624 assert!(
2625 w[1].0 - w[0].0 >= 2,
2626 "each ARM/Thumb instruction is >= 2 bytes"
2627 );
2628 }
2629 let last = func.line_map.last().unwrap().0 as usize;
2630 assert!(
2631 last < func.code.len(),
2632 "every mapped offset lies inside .text"
2633 );
2634
2635 // The side-table is additive: recompiling is deterministic and the map is
2636 // consistent with that exact code (capturing it does not alter output).
2637 let again = backend.compile_function("add", &ops, &config).unwrap();
2638 assert_eq!(
2639 again.code, func.code,
2640 "compilation deterministic; map is additive"
2641 );
2642 assert_eq!(again.line_map, func.line_map);
2643 }
2644
2645 #[test]
2646 fn test_count_params() {
2647 let ops = vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::I32Add];
2648 assert_eq!(count_params(&ops), 2);
2649
2650 let no_params = vec![WasmOp::I32Const(5), WasmOp::I32Const(3), WasmOp::I32Add];
2651 assert_eq!(count_params(&no_params), 0);
2652 }
2653
2654 /// #457: the declared param count caps the access-pattern inference. The
2655 /// repro shape `(param i32)(local i32) → p0 + local1` reads local 1 before
2656 /// any write, so `count_params` infers 2 — with the declared count (1) the
2657 /// local is reclassified onto the zero-inited frame path instead of being
2658 /// read from R1 (caller garbage).
2659 #[test]
2660 fn declared_param_count_caps_inference_457() {
2661 let ops = vec![
2662 WasmOp::LocalGet(0),
2663 WasmOp::LocalGet(1),
2664 WasmOp::I32Add,
2665 WasmOp::End,
2666 ];
2667 // The inference alone still says 2 (the misclassification this caps).
2668 assert_eq!(count_params(&ops), 2);
2669
2670 let backend = ArmBackend::new();
2671 let inferred = backend
2672 .compile_function("rbw", &ops, &CompileConfig::default())
2673 .unwrap();
2674 let declared = backend
2675 .compile_function(
2676 "rbw",
2677 &ops,
2678 &CompileConfig {
2679 current_func_param_count: Some(1),
2680 ..CompileConfig::default()
2681 },
2682 )
2683 .unwrap();
2684 // The cap is consumed: the declared-count compile reclassifies local 1
2685 // and must emit different code than the param-misclassified one.
2686 assert_ne!(
2687 inferred.code, declared.code,
2688 "declared param count must reach the selector"
2689 );
2690 // The zero-init is present: a 16-bit Thumb `movs rN, #0`
2691 // (0x2000 | rd<<8 → LE bytes [0x00, 0x20+rd]) somewhere in the body.
2692 let has_movs_zero = declared
2693 .code
2694 .as_chunks::<2>()
2695 .0
2696 .iter()
2697 .any(|h| h[0] == 0x00 && (0x20..=0x27).contains(&h[1]));
2698 assert!(
2699 has_movs_zero,
2700 "declared-count compile must zero-init the read-before-write local; code: {:02x?}",
2701 declared.code
2702 );
2703 // A declared count that matches (or exceeds) the inference changes
2704 // nothing — byte-identity for every function without rbw locals.
2705 let matching = backend
2706 .compile_function(
2707 "rbw",
2708 &ops,
2709 &CompileConfig {
2710 current_func_param_count: Some(2),
2711 ..CompileConfig::default()
2712 },
2713 )
2714 .unwrap();
2715 assert_eq!(
2716 matching.code, inferred.code,
2717 "declared >= inferred must stay byte-identical"
2718 );
2719 }
2720
2721 /// #970: a CONDITIONALLY-written param must stay a param.
2722 ///
2723 /// The read-first heuristic sees `LocalSet(1)` before any `LocalGet(1)` in
2724 /// LINEAR op order and demotes index 1 — even though the `if` means the
2725 /// write may not execute at all. `min(referenced, declared)` keeps it.
2726 /// The RED symptom this pins is not a wrong constant: the demoted local's
2727 /// first access is a WRITE, so the #457 zero-init skips it and the
2728 /// fall-through arm reads an UNINITIALISED frame slot (executed evidence:
2729 /// `scripts/repro/cond_write_param_970_arm_differential.py`).
2730 #[test]
2731 fn conditionally_written_param_stays_a_param_970() {
2732 // (param i32 i32): if (local.get 0) { local.set 1 = 5 }; local.get 1
2733 let ops = vec![
2734 WasmOp::LocalGet(0),
2735 WasmOp::If,
2736 WasmOp::I32Const(5),
2737 WasmOp::LocalSet(1),
2738 WasmOp::End,
2739 WasmOp::LocalGet(1),
2740 WasmOp::End,
2741 ];
2742 let declared = CompileConfig {
2743 current_func_param_count: Some(2),
2744 ..CompileConfig::default()
2745 };
2746 // The old rule: index 1 is written before it is read, so it is not
2747 // counted — this is the undercount that produced the miscompile.
2748 assert_eq!(
2749 count_params(&ops),
2750 1,
2751 "the read-first heuristic must still undercount (this is the defect)"
2752 );
2753 assert_eq!(
2754 effective_num_params(&ops, &declared),
2755 2,
2756 "a conditionally-written param must be counted as a param"
2757 );
2758 // The #457 direction is untouched: a genuine non-param local is still
2759 // clamped away by the declared count.
2760 let rbw = vec![
2761 WasmOp::LocalGet(0),
2762 WasmOp::LocalGet(1),
2763 WasmOp::I32Add,
2764 WasmOp::End,
2765 ];
2766 assert_eq!(
2767 effective_num_params(
2768 &rbw,
2769 &CompileConfig {
2770 current_func_param_count: Some(1),
2771 ..CompileConfig::default()
2772 }
2773 ),
2774 1,
2775 "#457: a read-before-write non-param local must NOT become a param"
2776 );
2777 // Leniency: a body touching only the first few of many declared params
2778 // still lowers with the small count (the selector homes at most 4 in
2779 // registers; `min` is what keeps this from becoming `declared`).
2780 assert_eq!(
2781 effective_num_params(
2782 &rbw,
2783 &CompileConfig {
2784 current_func_param_count: Some(12),
2785 ..CompileConfig::default()
2786 }
2787 ),
2788 2,
2789 "declared >> referenced must stay at the referenced count"
2790 );
2791 // No declared count: the legacy inference, unchanged (honest residual).
2792 assert_eq!(
2793 effective_num_params(&ops, &CompileConfig::default()),
2794 count_params(&ops)
2795 );
2796 }
2797
2798 #[test]
2799 fn test_arm_backend_register() {
2800 let mut registry = synth_core::BackendRegistry::new();
2801 registry.register(Box::new(ArmBackend::new()));
2802 assert!(registry.get("arm").is_some());
2803 assert_eq!(registry.available().len(), 1);
2804 }
2805
2806 #[test]
2807 fn test_compile_import_call_produces_relocations() {
2808 let backend = ArmBackend::new();
2809 // Simulate a WASM module where func index 0 is an import.
2810 // Call(0) should generate MOV R0, #0; BL __meld_dispatch_import
2811 let ops = vec![WasmOp::Call(0)];
2812 let config = CompileConfig {
2813 num_imports: 1,
2814 no_optimize: true, // Direct instruction selection to preserve Call semantics
2815 ..CompileConfig::default()
2816 };
2817
2818 let result = backend.compile_function("caller", &ops, &config);
2819 assert!(result.is_ok());
2820
2821 let func = result.unwrap();
2822 assert!(!func.code.is_empty());
2823 assert_eq!(func.relocations.len(), 1);
2824 assert_eq!(func.relocations[0].symbol, "__meld_dispatch_import");
2825 // The BL is the second instruction (after MOV R0, #0), so offset should be > 0
2826 assert!(func.relocations[0].offset > 0);
2827 }
2828
2829 /// Regression test for #197: in `relocatable` mode, an import call must
2830 /// relocate against the direct `func_N` symbol (rewritten to the wasm field
2831 /// name by `build_relocatable_elf`), NOT `__meld_dispatch_import`. This is
2832 /// the ABI half of the #197 fix — without it, a host linker cannot resolve
2833 /// the call to the real kernel symbol (e.g. `k_spin_lock`).
2834 #[test]
2835 fn test_compile_relocatable_import_uses_direct_func_symbol_197() {
2836 let backend = ArmBackend::new();
2837 let ops = vec![WasmOp::Call(0)]; // func 0 is an import
2838 let config = CompileConfig {
2839 num_imports: 1,
2840 relocatable: true,
2841 ..CompileConfig::default()
2842 };
2843
2844 let func = backend
2845 .compile_function("caller", &ops, &config)
2846 .expect("relocatable import call compiles");
2847
2848 assert_eq!(func.relocations.len(), 1);
2849 assert_eq!(
2850 func.relocations[0].symbol, "func_0",
2851 "#197: relocatable import must relocate against func_0 (→ field name), not Meld dispatch"
2852 );
2853 }
2854
2855 #[test]
2856 fn test_compile_no_imports_no_relocations() {
2857 let backend = ArmBackend::new();
2858 let ops = vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::I32Add];
2859 let config = CompileConfig::default();
2860
2861 let func = backend.compile_function("add", &ops, &config).unwrap();
2862 assert!(func.relocations.is_empty());
2863 }
2864
2865 /// Regression test for #167: a call to an INTERNAL function
2866 /// (index `>= num_imports`) must record a relocation against `func_{index}`.
2867 /// Before the fix, only `__meld_*` (import) BLs were relocated, so
2868 /// internal `BL func_N` was emitted as an unpatched `bl #0` branching
2869 /// to a garbage address — making the object non-linkable. This test
2870 /// would have caught that regression.
2871 #[test]
2872 fn test_compile_internal_call_produces_relocation_167() {
2873 let backend = ArmBackend::new();
2874 // num_imports = 1, so Call(2) is an INTERNAL call → `BL func_2`.
2875 let ops = vec![WasmOp::Call(2)];
2876 let config = CompileConfig {
2877 num_imports: 1,
2878 no_optimize: true,
2879 ..CompileConfig::default()
2880 };
2881
2882 let func = backend
2883 .compile_function("caller", &ops, &config)
2884 .expect("internal call compiles");
2885
2886 assert_eq!(
2887 func.relocations.len(),
2888 1,
2889 "an internal call must emit exactly one relocation (#167)"
2890 );
2891 assert_eq!(
2892 func.relocations[0].symbol, "func_2",
2893 "internal call must relocate against the callee's func_{{index}} symbol (#167)"
2894 );
2895 }
2896
2897 // ─── Phase 1 safety-bounds plumbing for ARM ──────────────────────────
2898
2899 #[test]
2900 fn arm_safety_bounds_mpu_emits_same_code_as_none() {
2901 // Mpu mode must not introduce any inline check on ARM — the MPU
2902 // handles faults via hardware. The encoded bytes for an i32.load
2903 // should be identical between None and Mpu.
2904 let backend = ArmBackend::new();
2905 let ops = vec![
2906 WasmOp::LocalGet(0),
2907 WasmOp::I32Load {
2908 offset: 0,
2909 align: 2,
2910 },
2911 ];
2912 let cfg_none = CompileConfig {
2913 no_optimize: true,
2914 ..Default::default()
2915 };
2916 let cfg_mpu = CompileConfig {
2917 no_optimize: true,
2918 safety_bounds: SafetyBounds::Mpu,
2919 ..Default::default()
2920 };
2921 let n = backend.compile_function("ld", &ops, &cfg_none).unwrap();
2922 let m = backend.compile_function("ld", &ops, &cfg_mpu).unwrap();
2923 assert_eq!(
2924 n.code, m.code,
2925 "Mpu and None should produce identical ARM bytes (Mpu relies on hardware)"
2926 );
2927 }
2928
2929 #[test]
2930 fn arm_legacy_bounds_check_still_emits_software_check() {
2931 // Legacy CLI users with `--bounds-check` should keep getting the
2932 // software path even though the new SafetyBounds field defaults to None.
2933 let backend = ArmBackend::new();
2934 let ops = vec![
2935 WasmOp::LocalGet(0),
2936 WasmOp::I32Load {
2937 offset: 0,
2938 align: 2,
2939 },
2940 ];
2941 let cfg_legacy = CompileConfig {
2942 no_optimize: true,
2943 bounds_check: true,
2944 ..Default::default()
2945 };
2946 let cfg_software = CompileConfig {
2947 no_optimize: true,
2948 safety_bounds: SafetyBounds::Software,
2949 ..Default::default()
2950 };
2951 let l = backend.compile_function("ld", &ops, &cfg_legacy).unwrap();
2952 let s = backend.compile_function("ld", &ops, &cfg_software).unwrap();
2953 assert_eq!(
2954 l.code, s.code,
2955 "--bounds-check should produce the same bytes as --safety-bounds=software"
2956 );
2957 }
2958
2959 /// #377: `--safety-bounds software` must be enforced on the OPTIMIZED path
2960 /// too. Pre-fix, `software` was byte-identical to `none` there (a silent
2961 /// no-op while the safety manifest claimed enforcement). The compiled
2962 /// bytes must now (a) differ from `none` and (b) contain the inline
2963 /// `CMP ip, sl` + `UDF` guard.
2964 #[test]
2965 fn arm_safety_bounds_software_enforced_on_optimized_path_377() {
2966 let backend = ArmBackend::new();
2967 // Dynamic-address store+load: the optimized path accepts this shape
2968 // (no calls, no i64 params, ≤4 params).
2969 let ops = vec![
2970 WasmOp::LocalGet(0),
2971 WasmOp::LocalGet(1),
2972 WasmOp::I32Store {
2973 offset: 4,
2974 align: 2,
2975 },
2976 WasmOp::LocalGet(0),
2977 WasmOp::I32Load {
2978 offset: 0,
2979 align: 2,
2980 },
2981 ];
2982 // no_optimize NOT set — this exercises the optimized path.
2983 let cfg_none = CompileConfig::default();
2984 let cfg_sw = CompileConfig {
2985 safety_bounds: SafetyBounds::Software,
2986 ..Default::default()
2987 };
2988 let n = backend.compile_function("st", &ops, &cfg_none).unwrap();
2989 let s = backend.compile_function("st", &ops, &cfg_sw).unwrap();
2990 assert_ne!(
2991 n.code, s.code,
2992 "#377: software bounds must CHANGE optimized-path codegen (was a silent no-op)"
2993 );
2994 // Thumb-2 `UDF #0` is 0xDE00 (LE bytes: 00 DE); the #752
2995 // wraparound-safe guard's borrow check `CMP sl, ip` (16-bit
2996 // high-reg form) is 0x45E2 (LE: E2 45). Both must appear — one
2997 // guard per access, traps inline.
2998 let has_udf = s.code.windows(2).any(|w| w == [0x00, 0xDE]);
2999 let has_cmp_sl_ip = s.code.windows(2).any(|w| w == [0xE2, 0x45]);
3000 assert!(has_udf, "#377: inline UDF trap missing from optimized path");
3001 assert!(
3002 has_cmp_sl_ip,
3003 "#377/#752: CMP sl, ip bounds borrow-check missing from optimized path"
3004 );
3005 // And `none` must contain NO UDF (the function has no other trap).
3006 assert!(
3007 !n.code.windows(2).any(|w| w == [0x00, 0xDE]),
3008 "none must not contain a UDF for this function"
3009 );
3010 }
3011
3012 /// #377: `mpu` on the optimized path is codegen-passthrough — identical
3013 /// bytes to `none` on BOTH paths (hardware enforcement is target-level;
3014 /// synth does not emit MPU region programming — tracked separately in
3015 /// #377's fix-direction discussion). This pins path-parity for `mpu`.
3016 #[test]
3017 fn arm_safety_bounds_mpu_optimized_path_parity_377() {
3018 let backend = ArmBackend::new();
3019 let ops = vec![
3020 WasmOp::LocalGet(0),
3021 WasmOp::I32Load {
3022 offset: 0,
3023 align: 2,
3024 },
3025 ];
3026 let cfg_none = CompileConfig::default();
3027 let cfg_mpu = CompileConfig {
3028 safety_bounds: SafetyBounds::Mpu,
3029 ..Default::default()
3030 };
3031 let n = backend.compile_function("ld", &ops, &cfg_none).unwrap();
3032 let m = backend.compile_function("ld", &ops, &cfg_mpu).unwrap();
3033 assert_eq!(
3034 n.code, m.code,
3035 "Mpu and None must produce identical bytes on the optimized path too"
3036 );
3037 }
3038
3039 /// #377: `mask` on the optimized path declines to the direct selector
3040 /// (honest degradation) — the compiled function must equal the
3041 /// `--no-optimize` masking bytes, i.e. the flag is honored, never dropped.
3042 #[test]
3043 fn arm_safety_bounds_mask_optimized_path_declines_to_direct_377() {
3044 let backend = ArmBackend::new();
3045 let ops = vec![
3046 WasmOp::LocalGet(0),
3047 WasmOp::LocalGet(1),
3048 WasmOp::I32Store {
3049 offset: 0,
3050 align: 2,
3051 },
3052 ];
3053 // RQ-57-SENTINEL: mask now requires a STATED non-zero power-of-two
3054 // size (0 = zero-byte memory = refused), so the test states one —
3055 // exactly what the #953 fix required of the rv32 driver test.
3056 let cfg_mask_opt = CompileConfig {
3057 safety_bounds: SafetyBounds::Mask,
3058 linear_memory_bytes: 64 * 1024,
3059 ..Default::default()
3060 };
3061 let cfg_mask_direct = CompileConfig {
3062 no_optimize: true,
3063 safety_bounds: SafetyBounds::Mask,
3064 linear_memory_bytes: 64 * 1024,
3065 ..Default::default()
3066 };
3067 let o = backend.compile_function("st", &ops, &cfg_mask_opt).unwrap();
3068 let d = backend
3069 .compile_function("st", &ops, &cfg_mask_direct)
3070 .unwrap();
3071 assert_eq!(
3072 o.code, d.code,
3073 "#377: mask on the optimized path must fall back to the direct selector's masking"
3074 );
3075 }
3076
3077 /// RQ-57-SENTINEL (#953 sibling): `--safety-bounds mask` with a ZERO-byte
3078 /// linear memory must REFUSE at compile time. Before this fix, `bytes == 0`
3079 /// was exempt from the power-of-two gate ("0 means unknown"), and the
3080 /// emitted `SUB R12, R10, #1; AND` guard degenerated to an IDENTITY mask
3081 /// at runtime (R10 = 0 baked by the startup for a `(memory 0)` module):
3082 /// an unbounded OOB access in the mode whose purpose is bounding.
3083 /// Red-first: pre-fix this compile SUCCEEDED (verified on the v0.56.1
3084 /// tree: exit 0, `movw r10, #0x0` in the reset handler, AND-masked body).
3085 #[test]
3086 fn arm_safety_bounds_mask_zero_size_refused_rq57() {
3087 let backend = ArmBackend::new();
3088 let ops = vec![
3089 WasmOp::LocalGet(0),
3090 WasmOp::I32Load {
3091 offset: 0,
3092 align: 2,
3093 },
3094 ];
3095 let cfg = CompileConfig {
3096 safety_bounds: SafetyBounds::Mask,
3097 linear_memory_bytes: 0,
3098 ..Default::default()
3099 };
3100 let err = backend
3101 .compile_function("ld", &ops, &cfg)
3102 .expect_err("mask over a zero-byte memory must refuse, not emit an identity mask");
3103 let msg = format!("{err}");
3104 assert!(
3105 msg.contains("ZERO bytes"),
3106 "refusal must name the zero-byte cause, got: {msg}"
3107 );
3108 }
3109
3110 // ========================================================================
3111 // ISA feature gate tests — ensure the compiler never emits unsupported
3112 // instructions for a given target
3113 // ========================================================================
3114
3115 #[test]
3116 fn test_f32_rejected_on_cortex_m3_no_fpu() {
3117 let backend = ArmBackend::new();
3118 let ops = vec![WasmOp::F32Const(1.0), WasmOp::F32Const(2.0), WasmOp::F32Add];
3119 let config = CompileConfig {
3120 target: TargetSpec::cortex_m3(),
3121 no_optimize: true,
3122 ..CompileConfig::default()
3123 };
3124
3125 let result = backend.compile_function("fadd", &ops, &config);
3126 assert!(
3127 result.is_err(),
3128 "f32 operations should fail on Cortex-M3 (no FPU)"
3129 );
3130 }
3131
3132 #[test]
3133 fn test_f32_accepted_on_cortex_m4f() {
3134 let backend = ArmBackend::new();
3135 let ops = vec![WasmOp::F32Const(1.0), WasmOp::F32Const(2.0), WasmOp::F32Add];
3136 let config = CompileConfig {
3137 target: TargetSpec::cortex_m4f(),
3138 no_optimize: true,
3139 ..CompileConfig::default()
3140 };
3141
3142 let result = backend.compile_function("fadd", &ops, &config);
3143 assert!(
3144 result.is_ok(),
3145 "f32 operations should succeed on Cortex-M4F, got: {:?}",
3146 result.unwrap_err()
3147 );
3148 }
3149
3150 #[test]
3151 fn test_i32_works_on_all_targets() {
3152 let backend = ArmBackend::new();
3153 let ops = vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::I32Add];
3154
3155 // Cortex-M3 (no FPU)
3156 let config_m3 = CompileConfig {
3157 target: TargetSpec::cortex_m3(),
3158 no_optimize: true,
3159 ..CompileConfig::default()
3160 };
3161 assert!(
3162 backend.compile_function("add", &ops, &config_m3).is_ok(),
3163 "i32 ops should work on Cortex-M3"
3164 );
3165
3166 // Cortex-M4F (single FPU)
3167 let config_m4f = CompileConfig {
3168 target: TargetSpec::cortex_m4f(),
3169 no_optimize: true,
3170 ..CompileConfig::default()
3171 };
3172 assert!(
3173 backend.compile_function("add", &ops, &config_m4f).is_ok(),
3174 "i32 ops should work on Cortex-M4F"
3175 );
3176
3177 // Cortex-M7DP (double FPU)
3178 let config_m7dp = CompileConfig {
3179 target: TargetSpec::cortex_m7dp(),
3180 no_optimize: true,
3181 ..CompileConfig::default()
3182 };
3183 assert!(
3184 backend.compile_function("add", &ops, &config_m7dp).is_ok(),
3185 "i32 ops should work on Cortex-M7DP"
3186 );
3187 }
3188
3189 #[test]
3190 fn test_f32_rejected_on_cortex_m4_no_fpu() {
3191 // Cortex-M4 (without F suffix) has no FPU
3192 let backend = ArmBackend::new();
3193 let ops = vec![WasmOp::F32Const(1.5), WasmOp::F32Const(2.5), WasmOp::F32Mul];
3194 let config = CompileConfig {
3195 target: TargetSpec::cortex_m4(),
3196 no_optimize: true,
3197 ..CompileConfig::default()
3198 };
3199
3200 let result = backend.compile_function("fmul", &ops, &config);
3201 assert!(
3202 result.is_err(),
3203 "f32 operations should fail on Cortex-M4 (no FPU)"
3204 );
3205 }
3206
3207 // ========================================================================
3208 // Issue #120 — f32 ops in the optimized lowering path
3209 //
3210 // `OptimizerBridge::wasm_to_ir` has no handlers for f32/f64 ops, so a
3211 // value-producing float op fell through to `Opcode::Nop`, leaving a
3212 // downstream consumer with an unmapped vreg and tripping the PR #101
3213 // defensive panic in `ir_to_arm`. Customer reproducer: `compiler_builtins
3214 // float::div` and `gale_compute_ipi_mask` in the `falcon-rate-component`
3215 // module.
3216 //
3217 // Fix: `optimize_full` declines float modules with a typed `Err`;
3218 // `compile_wasm_to_arm` falls back to the non-optimized `select_with_stack`
3219 // path, which handles f32 via VFP/FPU. These tests use the *default*
3220 // (optimized) config — `no_optimize` is NOT set — which is the exact
3221 // configuration that panicked pre-fix.
3222 // ========================================================================
3223
3224 /// RQ-65-DECLINE (#1208 / #1213 / #1205): a shape the optimized path
3225 /// used to lower WRONG must now reach the direct selector through the
3226 /// fallback, so the DEFAULT configuration is byte-identical to
3227 /// `--no-optimize` on it — the selector-parity property
3228 /// (`selector_parity_197_differential.py`), asserted at the unit level
3229 /// for one instance of each declined class.
3230 #[test]
3231 fn test_rq65_declined_shapes_default_equals_no_optimize() {
3232 let backend = ArmBackend::new();
3233 let cases: Vec<(&str, Vec<WasmOp>)> = vec![
3234 (
3235 "ld8u",
3236 vec![
3237 WasmOp::LocalGet(0),
3238 WasmOp::I64Load8U {
3239 offset: 0,
3240 align: 0,
3241 },
3242 ],
3243 ),
3244 (
3245 "st16",
3246 vec![
3247 WasmOp::LocalGet(0),
3248 WasmOp::I64Const(7),
3249 WasmOp::I64Store16 {
3250 offset: 0,
3251 align: 1,
3252 },
3253 ],
3254 ),
3255 (
3256 "sel64",
3257 vec![
3258 WasmOp::I64Const(1),
3259 WasmOp::I64Const(0),
3260 WasmOp::LocalGet(0),
3261 WasmOp::Select,
3262 WasmOp::I32WrapI64,
3263 ],
3264 ),
3265 (
3266 "vif",
3267 vec![
3268 WasmOp::LocalGet(0),
3269 WasmOp::LocalGet(1),
3270 WasmOp::I32GtS,
3271 WasmOp::If,
3272 WasmOp::I32Const(7),
3273 WasmOp::Else,
3274 WasmOp::I32Const(9),
3275 WasmOp::End,
3276 ],
3277 ),
3278 ];
3279 for (name, ops) in cases {
3280 let default = backend
3281 .compile_function(name, &ops, &CompileConfig::default())
3282 .unwrap_or_else(|e| {
3283 panic!("{name}: default config must compile via the fallback: {e}")
3284 });
3285 let direct = backend
3286 .compile_function(
3287 name,
3288 &ops,
3289 &CompileConfig {
3290 no_optimize: true,
3291 ..CompileConfig::default()
3292 },
3293 )
3294 .unwrap_or_else(|e| panic!("{name}: --no-optimize must compile: {e}"));
3295 assert_eq!(
3296 default.code, direct.code,
3297 "{name}: the declined shape must be the direct selector's bytes"
3298 );
3299 assert!(default.code.len() > 2, "{name}: not the #1208 empty body");
3300 }
3301 }
3302
3303 /// Pre-fix: this panicked with "vreg vN has no assigned ARM register and
3304 /// no spill slot" inside `ir_to_arm`. Post-fix: the optimized path declines
3305 /// the module and the backend falls back to direct selection, producing a
3306 /// non-empty f32.div lowering on a Cortex-M4F.
3307 #[test]
3308 fn test_issue120_f32_div_compiles_via_optimized_default() {
3309 let backend = ArmBackend::new();
3310 let ops = vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::F32Div];
3311 let config = CompileConfig {
3312 target: TargetSpec::cortex_m4f(),
3313 // no_optimize NOT set — this exercises the optimized path that
3314 // panicked in issue #120, then the fallback to direct selection.
3315 // GI-FPU-002: the f32 params must be declared so the direct
3316 // selector homes them in S0/S1 (AAPCS-VFP) rather than declining.
3317 current_func_params_f32: vec![true, true],
3318 ..CompileConfig::default()
3319 };
3320
3321 let result = backend.compile_function("fdiv", &ops, &config);
3322 assert!(
3323 result.is_ok(),
3324 "f32.div must compile on Cortex-M4F via the optimized->direct \
3325 fallback (issue #120), got: {:?}",
3326 result.as_ref().err()
3327 );
3328 assert!(
3329 !result.unwrap().code.is_empty(),
3330 "f32.div must produce non-empty machine code"
3331 );
3332 }
3333
3334 /// A spread of f32 ops, all through the optimized (default) config, must
3335 /// compile via the fallback on an FPU target without panicking.
3336 #[test]
3337 fn test_issue120_assorted_f32_ops_compile_via_optimized_default() {
3338 let backend = ArmBackend::new();
3339 let config = CompileConfig {
3340 target: TargetSpec::cortex_m4f(),
3341 // GI-FPU-002: declare the two f32 params for AAPCS-VFP homing.
3342 current_func_params_f32: vec![true, true],
3343 ..CompileConfig::default()
3344 };
3345
3346 let cases: Vec<(&str, Vec<WasmOp>)> = vec![
3347 (
3348 "fadd",
3349 vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::F32Add],
3350 ),
3351 (
3352 "fmul",
3353 vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::F32Mul],
3354 ),
3355 (
3356 "fsub",
3357 vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::F32Sub],
3358 ),
3359 ];
3360
3361 for (name, ops) in cases {
3362 let result = backend.compile_function(name, &ops, &config);
3363 assert!(
3364 result.is_ok(),
3365 "{name} must compile via the optimized->direct fallback \
3366 (issue #120), got: {:?}",
3367 result.as_ref().err()
3368 );
3369 assert!(
3370 !result.unwrap().code.is_empty(),
3371 "{name} must produce non-empty machine code"
3372 );
3373 }
3374 }
3375
3376 /// The fallback must still honor the ISA feature gate: f32 on a no-FPU
3377 /// target must fail cleanly (not panic) even on the optimized path.
3378 #[test]
3379 fn test_issue120_f32_div_rejected_on_no_fpu_via_optimized() {
3380 let backend = ArmBackend::new();
3381 let ops = vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::F32Div];
3382 let config = CompileConfig {
3383 target: TargetSpec::cortex_m3(),
3384 ..CompileConfig::default()
3385 };
3386
3387 let result = backend.compile_function("fdiv", &ops, &config);
3388 assert!(
3389 result.is_err(),
3390 "f32.div must be rejected on Cortex-M3 (no FPU), not panic"
3391 );
3392 }
3393
3394 /// #507: a `br_table` function compiled via the DEFAULT (optimized) config
3395 /// must produce the SAME bytes as the direct (`no_optimize`) selector —
3396 /// i.e. the optimized path declined it to direct, lowering the dispatch as a
3397 /// real cmp-chain instead of silently dropping it (which left all arms in
3398 /// fall-through). Pre-fix the two outputs differed (the optimized one had no
3399 /// selector compare). Execution correctness is gated by
3400 /// `scripts/repro/br_table_507_differential.py`.
3401 #[test]
3402 fn test_507_br_table_declines_to_direct() {
3403 let backend = ArmBackend::new();
3404 // dispatch(sel): br_table over 3 blocks, each storing a marker to mem[0].
3405 let ops = vec![
3406 WasmOp::Block,
3407 WasmOp::Block,
3408 WasmOp::Block,
3409 WasmOp::LocalGet(0),
3410 WasmOp::BrTable {
3411 targets: vec![0, 1, 2],
3412 default: 2,
3413 },
3414 WasmOp::End,
3415 WasmOp::I32Const(0),
3416 WasmOp::I32Const(10),
3417 WasmOp::I32Store {
3418 offset: 0,
3419 align: 2,
3420 },
3421 WasmOp::Return,
3422 WasmOp::End,
3423 WasmOp::I32Const(0),
3424 WasmOp::I32Const(20),
3425 WasmOp::I32Store {
3426 offset: 0,
3427 align: 2,
3428 },
3429 WasmOp::Return,
3430 WasmOp::End,
3431 WasmOp::I32Const(0),
3432 WasmOp::I32Const(30),
3433 WasmOp::I32Store {
3434 offset: 0,
3435 align: 2,
3436 },
3437 ];
3438 let opt = CompileConfig {
3439 target: TargetSpec::cortex_m4(),
3440 ..CompileConfig::default()
3441 };
3442 let direct = CompileConfig {
3443 target: TargetSpec::cortex_m4(),
3444 no_optimize: true,
3445 ..CompileConfig::default()
3446 };
3447 let a = backend
3448 .compile_function("dispatch", &ops, &opt)
3449 .expect("optimized-default must compile br_table (via decline)");
3450 let b = backend
3451 .compile_function("dispatch", &ops, &direct)
3452 .expect("direct must compile br_table");
3453 assert_eq!(
3454 a.code, b.code,
3455 "#507: optimized-default br_table output must be byte-identical to the \
3456 direct selector (i.e. declined to direct), not a dropped dispatch"
3457 );
3458 }
3459
3460 /// Issue #94: end-to-end byte-size check for the canonical u64-packed
3461 /// FFI-return hi32 extract pattern. Compiles two near-identical
3462 /// functions — one with the optimized shift-by-32, one with a generic
3463 /// shift-by-7 — and asserts the optimized form is meaningfully smaller.
3464 #[test]
3465 fn test_issue94_hi32_extract_is_smaller_than_generic_shift() {
3466 let backend = ArmBackend::new();
3467 let config = CompileConfig {
3468 target: TargetSpec::cortex_m4f(),
3469 ..CompileConfig::default()
3470 };
3471
3472 // #518: the i64 value must NOT come from an i64 PARAM — the optimized
3473 // path now declines i64-param functions to the direct selector (it homed
3474 // an i64 param in R4:R5 instead of R0:R1, a silent miscompile this test's
3475 // byte-size-only assertion masked). The canonical #94 case is a u64 from
3476 // an FFI return, not a param, anyway. Source the i64 from a sign-extended
3477 // i32 param (`extend_i32_s`): a runtime, non-constant-foldable i64 that
3478 // stays on the optimized path, so the shift-by-32 hi-extract peephole is
3479 // still exercised on CORRECT code.
3480 // Optimized path: `(i64.extend_i32_s (local.get 0)) >>> 32; wrap_i64`
3481 let ops_hi32 = vec![
3482 WasmOp::LocalGet(0), // i32 param in R0
3483 WasmOp::I64ExtendI32S,
3484 WasmOp::I64Const(32),
3485 WasmOp::I64ShrU,
3486 WasmOp::I32WrapI64,
3487 ];
3488 let func_hi32 = backend
3489 .compile_function("hi32_extract", &ops_hi32, &config)
3490 .unwrap();
3491
3492 // Generic path: `... >>> 7; wrap_i64` — same shape, but the shift amount
3493 // is not a multiple of 32, so it falls through to the runtime shift.
3494 let ops_generic = vec![
3495 WasmOp::LocalGet(0),
3496 WasmOp::I64ExtendI32S,
3497 WasmOp::I64Const(7),
3498 WasmOp::I64ShrU,
3499 WasmOp::I32WrapI64,
3500 ];
3501 let func_generic = backend
3502 .compile_function("generic_shr", &ops_generic, &config)
3503 .unwrap();
3504
3505 let bytes_hi32 = func_hi32.code.len();
3506 let bytes_generic = func_generic.code.len();
3507 println!(
3508 "\n[issue #94] hi32 extract: {} bytes (vs generic shift: {} bytes; saved {})",
3509 bytes_hi32,
3510 bytes_generic,
3511 bytes_generic.saturating_sub(bytes_hi32)
3512 );
3513 let hex: String = func_hi32
3514 .code
3515 .iter()
3516 .map(|b| format!("{:02x}", b))
3517 .collect::<Vec<_>>()
3518 .join(" ");
3519 println!("[issue #94] hi32 bytes: {}", hex);
3520 // We expect the optimized form to be at least 30 bytes smaller than
3521 // the generic 64-bit shift sequence. (Empirically: 14 vs 50 bytes.)
3522 assert!(
3523 bytes_hi32 + 30 <= bytes_generic,
3524 "issue #94: hi32 extract = {} bytes, generic shift = {} bytes; \
3525 expected optimized form to be at least 30 bytes smaller",
3526 bytes_hi32,
3527 bytes_generic,
3528 );
3529 }
3530}