holey-bytes/lang/src/son/hbvm/regalloc.rs

773 lines
27 KiB
Rust
Raw Normal View History

2024-11-07 01:52:41 -06:00
use {
super::{HbvmBackend, Nid, Nodes},
crate::{
parser,
reg::{self, Reg},
son::{debug_assert_matches, Kind, ARG_START, MEM, VOID},
ty::{self, Arg, Loc},
2024-11-10 02:17:43 -06:00
utils::BitSet,
2024-11-13 08:25:27 -06:00
PLoc, Sig, Types,
2024-11-07 01:52:41 -06:00
},
alloc::{borrow::ToOwned, vec::Vec},
2024-11-16 07:22:34 -06:00
core::{mem, ops::Range},
2024-11-07 01:52:41 -06:00
hbbytecode::{self as instrs},
};
impl HbvmBackend {
2024-11-16 04:46:59 -06:00
pub(super) fn emit_body_code(
2024-11-07 01:52:41 -06:00
&mut self,
2024-11-16 04:46:59 -06:00
nodes: &Nodes,
2024-11-07 01:52:41 -06:00
sig: Sig,
tys: &Types,
files: &[parser::Ast],
) -> (usize, bool) {
2024-11-16 04:46:59 -06:00
let tail = Function::build(nodes, tys, &mut self.ralloc, sig);
2024-11-07 01:52:41 -06:00
2024-11-16 04:46:59 -06:00
let strip_load = |value| match nodes[value].kind {
Kind::Load { .. } if nodes[value].ty.loc(tys) == Loc::Stack => nodes[value].inputs[1],
2024-11-10 02:17:43 -06:00
_ => value,
};
2024-11-16 04:46:59 -06:00
let mut res = mem::take(&mut self.ralloc);
2024-11-07 01:52:41 -06:00
2024-11-16 04:46:59 -06:00
Regalloc::run(nodes, &mut res);
2024-11-07 01:52:41 -06:00
'_open_function: {
self.emit(instrs::addi64(reg::STACK_PTR, reg::STACK_PTR, 0));
2024-11-16 04:46:59 -06:00
self.emit(instrs::st(reg::RET_ADDR + tail as u8, reg::STACK_PTR, 0, 0));
2024-11-07 01:52:41 -06:00
}
res.node_to_reg[MEM as usize] = res.bundles.len() as u8 + 1;
2024-11-16 04:46:59 -06:00
let reg_offset = if tail { reg::RET + 12 } else { reg::RET_ADDR + 1 };
2024-11-07 01:52:41 -06:00
res.node_to_reg.iter_mut().filter(|r| **r != 0).for_each(|r| {
2024-11-10 02:17:43 -06:00
if *r == u8::MAX {
*r = 0
} else {
*r += reg_offset - 1;
2024-11-16 04:46:59 -06:00
if tail && *r >= reg::RET_ADDR {
2024-11-10 02:17:43 -06:00
*r += 1;
}
2024-11-07 01:52:41 -06:00
}
});
2024-11-10 02:17:43 -06:00
let atr = |allc: Nid| {
let allc = strip_load(allc);
debug_assert_eq!(
2024-11-16 04:46:59 -06:00
nodes[allc].lock_rc.get(),
2024-11-10 02:17:43 -06:00
0,
"{:?} {}",
2024-11-16 04:46:59 -06:00
nodes[allc],
ty::Display::new(tys, files, nodes[allc].ty)
2024-11-10 02:17:43 -06:00
);
res.node_to_reg[allc as usize]
};
2024-11-07 01:52:41 -06:00
let (retl, mut parama) = tys.parama(sig.ret);
let mut typs = sig.args.args();
2024-11-16 04:46:59 -06:00
let mut args = nodes[VOID].outputs[ARG_START..].iter();
2024-11-07 01:52:41 -06:00
while let Some(aty) = typs.next(tys) {
let Arg::Value(ty) = aty else { continue };
let Some(loc) = parama.next(ty, tys) else { continue };
let &arg = args.next().unwrap();
let (rg, size) = match loc {
PLoc::WideReg(rg, size) => (rg, size),
PLoc::Reg(rg, size) if ty.loc(tys) == Loc::Stack => (rg, size),
PLoc::Reg(r, ..) | PLoc::Ref(r, ..) => {
self.emit_cp(atr(arg), r);
2024-11-07 01:52:41 -06:00
continue;
}
};
self.emit(instrs::st(rg, reg::STACK_PTR, self.offsets[arg as usize] as _, size));
2024-11-16 04:46:59 -06:00
if nodes.is_unlocked(arg) {
2024-11-07 01:52:41 -06:00
self.emit(instrs::addi64(rg, reg::STACK_PTR, self.offsets[arg as usize] as _));
}
self.emit_cp(atr(arg), rg);
2024-11-07 01:52:41 -06:00
}
2024-11-13 08:25:27 -06:00
let mut alloc_buf = vec![];
2024-11-16 04:46:59 -06:00
for (i, block) in res.blocks.iter().enumerate() {
2024-11-07 01:52:41 -06:00
self.offsets[block.entry as usize] = self.code.len() as _;
for &nid in &res.instrs[block.range()] {
2024-11-07 01:52:41 -06:00
if nid == VOID {
continue;
}
2024-11-16 04:46:59 -06:00
let node = &nodes[nid];
2024-11-13 08:25:27 -06:00
alloc_buf.clear();
2024-11-07 01:52:41 -06:00
2024-11-14 13:25:52 -06:00
let atr = |allc: Nid| {
let allc = strip_load(allc);
debug_assert_eq!(
2024-11-16 04:46:59 -06:00
nodes[allc].lock_rc.get(),
2024-11-14 13:25:52 -06:00
0,
"{:?} {}",
2024-11-16 04:46:59 -06:00
nodes[allc],
ty::Display::new(tys, files, nodes[allc].ty)
2024-11-14 13:25:52 -06:00
);
2024-11-16 04:46:59 -06:00
#[cfg(debug_assertions)]
2024-11-14 13:25:52 -06:00
debug_assert!(
2024-11-16 07:22:34 -06:00
res.marked.contains(&(allc, nid))
2024-11-14 13:25:52 -06:00
|| nid == allc
2024-11-16 04:46:59 -06:00
|| nodes.is_hard_zero(allc)
2024-11-14 13:25:52 -06:00
|| allc == MEM
|| matches!(node.kind, Kind::Loop | Kind::Region),
"{nid} {:?}\n{allc} {:?}",
2024-11-16 04:46:59 -06:00
nodes[nid],
nodes[allc]
2024-11-14 13:25:52 -06:00
);
res.node_to_reg[allc as usize]
};
2024-11-13 08:25:27 -06:00
let mut is_next_block = false;
2024-11-07 01:52:41 -06:00
match node.kind {
Kind::If => {
let &[_, cnd] = node.inputs.as_slice() else { unreachable!() };
2024-11-16 04:46:59 -06:00
if nodes.cond_op(cnd).is_some() {
let &[_, lh, rh] = nodes[cnd].inputs.as_slice() else { unreachable!() };
2024-11-13 08:25:27 -06:00
alloc_buf.extend([atr(lh), atr(rh)]);
2024-11-07 01:52:41 -06:00
} else {
2024-11-13 08:25:27 -06:00
alloc_buf.push(atr(cnd));
2024-11-07 01:52:41 -06:00
}
}
Kind::Loop | Kind::Region => {
2024-11-10 02:17:43 -06:00
let index = node
.inputs
.iter()
2024-11-16 04:46:59 -06:00
.position(|&n| block.entry == nodes.idom_of(n))
2024-11-10 02:17:43 -06:00
.unwrap()
+ 1;
let mut moves = vec![];
for &out in node.outputs.iter() {
2024-11-16 04:46:59 -06:00
if nodes[out].is_data_phi() {
let src = nodes[out].inputs[index];
2024-11-10 02:17:43 -06:00
if atr(out) != atr(src) {
moves.push([atr(out), atr(src), 0]);
2024-11-07 01:52:41 -06:00
}
}
2024-11-10 02:17:43 -06:00
}
2024-11-07 01:52:41 -06:00
2024-11-10 02:17:43 -06:00
debug_assert_eq!(moves.len(), {
moves.sort_unstable();
moves.dedup();
moves.len()
});
2024-11-10 02:17:43 -06:00
moves.sort_unstable_by(|[aa, ab, _], [ba, bb, _]| {
if aa == bb && ab == ba {
core::cmp::Ordering::Equal
} else if aa == bb {
core::cmp::Ordering::Greater
} else {
core::cmp::Ordering::Less
}
});
2024-11-10 02:17:43 -06:00
moves.dedup_by(|[aa, ab, _], [ba, bb, kind]| {
if aa == bb && ab == ba {
*kind = 1;
true
} else {
false
}
2024-11-10 02:17:43 -06:00
});
2024-11-10 02:17:43 -06:00
for [dst, src, kind] in moves {
if kind == 0 {
self.emit(instrs::cp(dst, src));
} else {
self.emit(instrs::swa(dst, src));
}
}
2024-11-16 04:46:59 -06:00
is_next_block = res.backrefs[nid as usize] as usize == i + 1;
2024-11-07 01:52:41 -06:00
}
Kind::Return => {
2024-11-10 02:17:43 -06:00
let &[_, ret, ..] = node.inputs.as_slice() else { unreachable!() };
2024-11-07 01:52:41 -06:00
match retl {
Some(PLoc::Reg(r, _)) if sig.ret.loc(tys) == Loc::Reg => {
2024-11-14 13:25:52 -06:00
alloc_buf.push(atr(ret));
2024-11-07 01:52:41 -06:00
self.emit(instrs::cp(r, atr(ret)));
}
2024-11-14 13:25:52 -06:00
Some(PLoc::Ref(..)) => alloc_buf.extend([atr(ret), atr(MEM)]),
Some(_) => alloc_buf.push(atr(ret)),
None => {}
2024-11-07 01:52:41 -06:00
}
}
2024-11-16 03:05:56 -06:00
Kind::Die => {}
2024-11-13 08:25:27 -06:00
Kind::CInt { .. } => alloc_buf.push(atr(nid)),
Kind::UnOp { .. } => alloc_buf.extend([atr(nid), atr(node.inputs[1])]),
2024-11-07 01:52:41 -06:00
Kind::BinOp { op } => {
let &[.., lhs, rhs] = node.inputs.as_slice() else { unreachable!() };
2024-11-16 04:46:59 -06:00
if let Kind::CInt { .. } = nodes[rhs].kind
&& nodes.is_locked(rhs)
2024-11-13 08:25:27 -06:00
&& op.imm_binop(node.ty).is_some()
2024-11-07 01:52:41 -06:00
{
2024-11-13 08:25:27 -06:00
alloc_buf.extend([atr(nid), atr(lhs)]);
2024-11-07 01:52:41 -06:00
} else {
2024-11-13 08:25:27 -06:00
alloc_buf.extend([atr(nid), atr(lhs), atr(rhs)]);
2024-11-07 01:52:41 -06:00
}
}
2024-11-13 08:25:27 -06:00
Kind::Call { args, .. } => {
2024-11-07 01:52:41 -06:00
let (ret, mut parama) = tys.parama(node.ty);
2024-11-13 08:25:27 -06:00
if ret.is_some() {
alloc_buf.push(atr(nid));
}
2024-11-07 01:52:41 -06:00
let mut args = args.args();
let mut allocs = node.inputs[1..].iter();
while let Some(arg) = args.next(tys) {
let Arg::Value(ty) = arg else { continue };
let Some(loc) = parama.next(ty, tys) else { continue };
2024-11-10 03:28:02 -06:00
let arg = *allocs.next().unwrap();
2024-11-13 08:25:27 -06:00
alloc_buf.push(atr(arg));
match loc {
PLoc::Reg(..) if ty.loc(tys) == Loc::Stack => {}
PLoc::WideReg(..) => alloc_buf.push(0),
PLoc::Reg(r, ..) | PLoc::Ref(r, ..) => {
self.emit(instrs::cp(r, atr(arg)))
2024-11-07 01:52:41 -06:00
}
};
}
if node.ty.loc(tys) == Loc::Stack {
2024-11-13 08:25:27 -06:00
alloc_buf.push(atr(*node.inputs.last().unwrap()));
}
if let Some(PLoc::Ref(r, ..)) = ret {
2024-11-13 08:25:27 -06:00
self.emit(instrs::cp(r, *alloc_buf.last().unwrap()))
2024-11-07 01:52:41 -06:00
}
}
2024-11-13 08:25:27 -06:00
Kind::Stck | Kind::Global { .. } => alloc_buf.push(atr(nid)),
2024-11-07 01:52:41 -06:00
Kind::Load => {
2024-11-16 04:46:59 -06:00
let (region, _) = nodes.strip_offset(node.inputs[1], node.ty, tys);
2024-11-07 01:52:41 -06:00
if node.ty.loc(tys) != Loc::Stack {
2024-11-13 08:25:27 -06:00
alloc_buf.push(atr(nid));
2024-11-16 04:46:59 -06:00
match nodes[region].kind {
2024-11-13 08:25:27 -06:00
Kind::Stck => {}
_ => alloc_buf.push(atr(region)),
}
2024-11-07 01:52:41 -06:00
}
}
Kind::Stre if node.inputs[1] == VOID => {}
Kind::Stre => {
2024-11-16 04:46:59 -06:00
let (region, _) = nodes.strip_offset(node.inputs[2], node.ty, tys);
match nodes[region].kind {
2024-11-07 01:52:41 -06:00
Kind::Stck if node.ty.loc(tys) == Loc::Reg => {
2024-11-13 08:25:27 -06:00
alloc_buf.push(atr(node.inputs[1]))
2024-11-07 01:52:41 -06:00
}
2024-11-13 08:25:27 -06:00
_ => alloc_buf.extend([atr(region), atr(node.inputs[1])]),
2024-11-07 01:52:41 -06:00
}
}
2024-11-13 08:25:27 -06:00
Kind::Mem => {
self.emit(instrs::cp(atr(MEM), reg::RET));
continue;
}
Kind::Arg => {
continue;
}
_ => {}
}
2024-11-07 01:52:41 -06:00
2024-11-13 08:25:27 -06:00
self.emit_instr(super::InstrCtx {
nid,
sig,
is_next_block,
2024-11-16 04:46:59 -06:00
is_last_block: i == res.blocks.len() - 1,
2024-11-13 08:25:27 -06:00
retl,
allocs: &alloc_buf,
2024-11-16 04:46:59 -06:00
nodes,
2024-11-13 08:25:27 -06:00
tys,
files,
});
if let Kind::Call { .. } = node.kind {
let (ret, ..) = tys.parama(node.ty);
match ret {
Some(PLoc::WideReg(..)) => {}
Some(PLoc::Reg(..)) if node.ty.loc(tys) == Loc::Stack => {}
Some(PLoc::Reg(r, ..)) => self.emit_cp(atr(nid), r),
2024-11-13 08:25:27 -06:00
None | Some(PLoc::Ref(..)) => {}
}
2024-11-07 01:52:41 -06:00
}
}
}
2024-11-16 04:46:59 -06:00
self.ralloc = res;
2024-11-07 01:52:41 -06:00
2024-11-16 04:46:59 -06:00
let bundle_count = self.ralloc.bundles.len() + (reg_offset as usize);
2024-11-07 01:52:41 -06:00
(
2024-11-16 04:46:59 -06:00
if tail {
bundle_count.saturating_sub(reg::RET_ADDR as _)
} else {
2024-11-07 01:52:41 -06:00
assert!(bundle_count < reg::STACK_PTR as usize, "TODO: spill memory");
2024-11-16 04:46:59 -06:00
self.ralloc.bundles.len()
2024-11-07 01:52:41 -06:00
},
2024-11-16 04:46:59 -06:00
tail,
2024-11-07 01:52:41 -06:00
)
}
fn emit_cp(&mut self, dst: Reg, src: Reg) {
if dst != 0 {
self.emit(instrs::cp(dst, src));
}
}
2024-11-07 01:52:41 -06:00
}
2024-11-15 06:06:03 -06:00
struct Function<'a> {
2024-11-07 01:52:41 -06:00
sig: Sig,
tail: bool,
2024-11-16 04:46:59 -06:00
nodes: &'a Nodes,
2024-11-07 01:52:41 -06:00
tys: &'a Types,
2024-11-16 04:46:59 -06:00
func: &'a mut Res,
2024-11-07 01:52:41 -06:00
}
impl core::fmt::Debug for Function<'_> {
fn fmt(&self, f: &mut core::fmt::Formatter<'_>) -> core::fmt::Result {
for block in &self.func.blocks {
writeln!(f, "{:?}", self.nodes[block.entry].kind)?;
for &instr in &self.func.instrs[block.range()] {
2024-11-07 01:52:41 -06:00
writeln!(f, "{:?}", self.nodes[instr].kind)?;
}
}
Ok(())
}
}
impl<'a> Function<'a> {
2024-11-16 04:46:59 -06:00
fn build(nodes: &'a Nodes, tys: &'a Types, func: &'a mut Res, sig: Sig) -> bool {
func.blocks.clear();
func.instrs.clear();
func.backrefs.resize(nodes.values.len(), u16::MAX);
func.visited.clear(nodes.values.len());
let mut s = Self { tail: true, nodes, tys, sig, func };
2024-11-07 01:52:41 -06:00
s.emit_node(VOID);
2024-11-16 04:46:59 -06:00
s.tail
2024-11-07 01:52:41 -06:00
}
fn add_block(&mut self, entry: Nid) {
self.func.blocks.push(Block {
start: self.func.instrs.len() as _,
end: self.func.instrs.len() as _,
entry,
});
2024-11-16 04:46:59 -06:00
self.func.backrefs[entry as usize] = self.func.blocks.len() as u16 - 1;
2024-11-07 01:52:41 -06:00
}
fn close_block(&mut self, exit: Nid) {
if !matches!(self.nodes[exit].kind, Kind::Loop | Kind::Region) {
self.add_instr(exit);
} else {
self.func.instrs.push(exit);
}
let prev = self.func.blocks.last_mut().unwrap();
prev.end = self.func.instrs.len() as _;
2024-11-07 01:52:41 -06:00
}
fn add_instr(&mut self, nid: Nid) {
debug_assert_ne!(self.nodes[nid].kind, Kind::Loop);
2024-11-16 04:46:59 -06:00
self.func.backrefs[nid as usize] = self.func.instrs.len() as u16;
2024-11-07 01:52:41 -06:00
self.func.instrs.push(nid);
}
fn emit_node(&mut self, nid: Nid) {
if matches!(self.nodes[nid].kind, Kind::Region | Kind::Loop) {
2024-11-16 04:46:59 -06:00
match (self.nodes[nid].kind, self.func.visited.set(nid)) {
2024-11-07 01:52:41 -06:00
(Kind::Loop, false) | (Kind::Region, true) => {
self.close_block(nid);
return;
}
_ => {}
}
2024-11-16 04:46:59 -06:00
} else if !self.func.visited.set(nid) {
2024-11-07 01:52:41 -06:00
return;
}
if self.nodes.is_never_used(nid, self.tys) {
self.nodes.lock(nid);
return;
}
let mut node = self.nodes[nid].clone();
match node.kind {
Kind::Start => {
debug_assert_matches!(self.nodes[node.outputs[0]].kind, Kind::Entry);
self.add_block(VOID);
self.emit_node(node.outputs[0])
}
Kind::If => {
let &[_, cnd] = node.inputs.as_slice() else { unreachable!() };
2024-11-07 01:52:41 -06:00
let &[mut then, mut else_] = node.outputs.as_slice() else { unreachable!() };
if let Some((_, swapped)) = self.nodes.cond_op(cnd) {
2024-11-10 02:17:43 -06:00
if swapped {
mem::swap(&mut then, &mut else_);
}
} else {
2024-11-07 01:52:41 -06:00
mem::swap(&mut then, &mut else_);
}
self.close_block(nid);
self.emit_node(then);
self.emit_node(else_);
}
Kind::Region | Kind::Loop => {
self.close_block(nid);
self.add_block(nid);
2024-11-10 02:17:43 -06:00
self.nodes.reschedule_block(nid, &mut node.outputs);
2024-11-07 01:52:41 -06:00
for o in node.outputs.into_iter().rev() {
self.emit_node(o);
}
}
Kind::Return | Kind::Die => {
self.close_block(nid);
self.emit_node(node.outputs[0]);
}
Kind::Entry => {
let (ret, mut parama) = self.tys.parama(self.sig.ret);
if let Some(PLoc::Ref(..)) = ret {
self.add_instr(MEM);
}
2024-11-07 01:52:41 -06:00
let mut typs = self.sig.args.args();
#[expect(clippy::unnecessary_to_owned)]
let mut args = self.nodes[VOID].outputs[ARG_START..].to_owned().into_iter();
while let Some(ty) = typs.next_value(self.tys) {
let arg = args.next().unwrap();
debug_assert_eq!(self.nodes[arg].kind, Kind::Arg);
match parama.next(ty, self.tys) {
None => {}
Some(_) => self.add_instr(arg),
}
}
2024-11-10 02:17:43 -06:00
self.nodes.reschedule_block(nid, &mut node.outputs);
2024-11-07 01:52:41 -06:00
for o in node.outputs.into_iter().rev() {
self.emit_node(o);
}
}
Kind::Then | Kind::Else => {
self.add_block(nid);
2024-11-10 02:17:43 -06:00
self.nodes.reschedule_block(nid, &mut node.outputs);
2024-11-07 01:52:41 -06:00
for o in node.outputs.into_iter().rev() {
self.emit_node(o);
}
}
Kind::Call { func, .. } => {
2024-11-08 03:25:34 -06:00
self.tail &= func == ty::Func::ECA;
2024-11-07 01:52:41 -06:00
self.add_instr(nid);
2024-11-10 02:17:43 -06:00
self.nodes.reschedule_block(nid, &mut node.outputs);
2024-11-07 01:52:41 -06:00
for o in node.outputs.into_iter().rev() {
if self.nodes[o].inputs[0] == nid
|| (matches!(self.nodes[o].kind, Kind::Loop | Kind::Region)
&& self.nodes[o].inputs[1] == nid)
{
self.emit_node(o);
}
}
}
2024-11-13 08:25:27 -06:00
Kind::CInt { value: 0 } if self.nodes.is_hard_zero(nid) => {}
2024-11-07 01:52:41 -06:00
Kind::CInt { .. }
| Kind::BinOp { .. }
| Kind::UnOp { .. }
| Kind::Global { .. }
| Kind::Load { .. }
| Kind::Stre
| Kind::Stck => self.add_instr(nid),
2024-11-12 14:54:23 -06:00
Kind::End | Kind::Phi | Kind::Arg | Kind::Mem | Kind::Loops | Kind::Join => {}
2024-11-07 01:52:41 -06:00
Kind::Assert { .. } => unreachable!(),
}
}
}
2024-11-16 04:46:59 -06:00
impl Nodes {
fn vreg_count(&self) -> usize {
self.values.len()
}
fn use_block_of(&self, inst: Nid, uinst: Nid) -> Nid {
let mut block = self.use_block(inst, uinst);
while !self[block].kind.starts_basic_block() {
block = self.idom(block);
}
block
}
fn phi_inputs_of(&self, nid: Nid) -> impl Iterator<Item = [Nid; 3]> + use<'_> {
match self[nid].kind {
Kind::Region | Kind::Loop => Some({
self[nid]
.outputs
.as_slice()
.iter()
.filter(|&&n| self[n].is_data_phi())
.map(|&n| [n, self[n].inputs[1], self[n].inputs[2]])
})
.into_iter()
.flatten(),
_ => None.into_iter().flatten(),
}
}
fn idom_of(&self, mut nid: Nid) -> Nid {
while !self[nid].kind.starts_basic_block() {
nid = self.idom(nid);
}
nid
}
fn uses_of(&self, nid: Nid) -> impl Iterator<Item = (Nid, Nid)> + use<'_> {
if self[nid].kind.is_cfg() && !matches!(self[nid].kind, Kind::Call { .. }) {
return None.into_iter().flatten();
}
Some(
self[nid]
.outputs
.iter()
.filter(move |&&n| self.is_data_dep(nid, n))
.map(move |n| self.this_or_delegates(nid, n))
.flat_map(|(p, ls)| ls.iter().map(move |l| (p, l)))
.filter(|&(o, &n)| self.is_data_dep(o, n))
.map(|(p, &n)| (self.use_block_of(p, n), n))
.inspect(|&(_, n)| debug_assert_eq!(self[n].lock_rc.get(), 0)),
)
.into_iter()
.flatten()
}
}
struct Regalloc<'a> {
nodes: &'a Nodes,
2024-11-07 01:52:41 -06:00
res: &'a mut Res,
}
2024-11-16 04:46:59 -06:00
impl<'a> Regalloc<'a> {
fn instr_of(&self, nid: Nid) -> Option<Nid> {
if self.nodes[nid].kind == Kind::Phi || self.nodes.is_locked(nid) {
return None;
}
debug_assert_ne!(self.res.backrefs[nid as usize], Nid::MAX, "{:?}", self.nodes[nid]);
Some(self.res.backrefs[nid as usize])
2024-11-07 01:52:41 -06:00
}
2024-11-16 04:46:59 -06:00
fn block_of(&self, nid: Nid) -> Nid {
debug_assert!(self.nodes[nid].kind.starts_basic_block());
self.res.backrefs[nid as usize]
}
fn run(ctx: &'a Nodes, res: &'a mut Res) {
Self { nodes: ctx, res }.run_low();
}
fn run_low(&mut self) {
2024-11-07 01:52:41 -06:00
self.res.bundles.clear();
self.res.node_to_reg.clear();
#[cfg(debug_assertions)]
self.res.marked.clear();
2024-11-16 04:46:59 -06:00
self.res.node_to_reg.resize(self.nodes.vreg_count(), 0);
2024-11-07 01:52:41 -06:00
debug_assert!(self.res.dfs_buf.is_empty());
2024-11-16 04:46:59 -06:00
let mut bundle = Bundle::new(self.res.instrs.len());
self.res.visited.clear(self.nodes.values.len());
for i in (0..self.res.blocks.len()).rev() {
for [a, rest @ ..] in self.nodes.phi_inputs_of(self.res.blocks[i].entry) {
if self.res.visited.set(a) {
self.append_bundle(a, &mut bundle, None);
2024-11-14 13:25:52 -06:00
}
for r in rest {
2024-11-16 04:46:59 -06:00
if !self.res.visited.set(r) {
2024-11-14 13:25:52 -06:00
continue;
}
self.append_bundle(
r,
&mut bundle,
Some(self.res.node_to_reg[a as usize] as usize - 1),
);
2024-11-07 01:52:41 -06:00
}
}
}
2024-11-16 04:46:59 -06:00
let instrs = mem::take(&mut self.res.instrs);
for &inst in &instrs {
if self.nodes[inst].has_no_value() || self.res.visited.get(inst) || inst == 0 {
2024-11-07 01:52:41 -06:00
continue;
}
2024-11-16 04:46:59 -06:00
self.append_bundle(inst, &mut bundle, None);
2024-11-07 01:52:41 -06:00
}
2024-11-16 04:46:59 -06:00
self.res.instrs = instrs;
2024-11-07 01:52:41 -06:00
}
fn collect_bundle(&mut self, inst: Nid, into: &mut Bundle) {
2024-11-16 04:46:59 -06:00
let dom = self.nodes.idom_of(inst);
self.res.dfs_seem.clear(self.nodes.values.len());
2024-11-16 04:46:59 -06:00
for (cursor, uinst) in self.nodes.uses_of(inst) {
if !self.res.dfs_seem.set(uinst) {
continue;
}
2024-11-16 04:46:59 -06:00
#[cfg(debug_assertions)]
debug_assert!(self.res.marked.insert((inst, uinst)));
2024-11-16 04:46:59 -06:00
self.reverse_cfg_dfs(cursor, dom, |s, n, b| {
let mut range = b.range();
2024-11-10 02:17:43 -06:00
debug_assert!(range.start < range.end);
2024-11-16 04:46:59 -06:00
range.start = range.start.max(s.instr_of(inst).map_or(0, |n| n + 1) as usize);
2024-11-10 02:17:43 -06:00
debug_assert!(range.start < range.end, "{:?}", range);
2024-11-14 13:25:52 -06:00
let new = range.end.min(
2024-11-16 04:46:59 -06:00
s.instr_of(uinst)
2024-11-10 02:17:43 -06:00
.filter(|_| {
n == cursor
2024-11-16 04:46:59 -06:00
&& self.nodes.loop_depth(dom) == self.nodes.loop_depth(cursor)
2024-11-10 02:17:43 -06:00
})
2024-11-07 01:52:41 -06:00
.map_or(Nid::MAX, |n| n + 1) as usize,
);
2024-11-14 13:25:52 -06:00
range.end = new;
debug_assert!(range.start < range.end, "{:?} {inst} {uinst}", range);
2024-11-07 01:52:41 -06:00
into.add(range);
2024-11-07 01:52:41 -06:00
});
}
}
fn append_bundle(&mut self, inst: Nid, tmp: &mut Bundle, prefered: Option<usize>) {
self.collect_bundle(inst, tmp);
2024-11-07 01:52:41 -06:00
if tmp.is_empty() {
2024-11-10 02:17:43 -06:00
self.res.node_to_reg[inst as usize] = u8::MAX;
return;
}
2024-11-14 13:25:52 -06:00
if let Some(prefered) = prefered
&& !self.res.bundles[prefered].overlaps(tmp)
2024-11-14 13:25:52 -06:00
{
self.res.bundles[prefered].merge(tmp);
tmp.clear();
2024-11-14 13:25:52 -06:00
self.res.node_to_reg[inst as usize] = prefered as Reg + 1;
return;
}
match self.res.bundles.iter_mut().enumerate().find(|(_, b)| !b.overlaps(tmp)) {
Some((i, other)) => {
other.merge(tmp);
tmp.clear();
self.res.node_to_reg[inst as usize] = i as Reg + 1;
}
None => {
self.res.bundles.push(tmp.take());
self.res.node_to_reg[inst as usize] = self.res.bundles.len() as Reg;
2024-11-07 01:52:41 -06:00
}
}
}
fn reverse_cfg_dfs(
&mut self,
from: Nid,
until: Nid,
2024-11-16 04:46:59 -06:00
mut each: impl FnMut(&mut Self, Nid, Block),
2024-11-07 01:52:41 -06:00
) {
debug_assert!(self.res.dfs_buf.is_empty());
self.res.dfs_buf.push(from);
2024-11-16 04:46:59 -06:00
debug_assert!(self.nodes.dominates(until, from));
2024-11-10 02:17:43 -06:00
2024-11-07 01:52:41 -06:00
while let Some(nid) = self.res.dfs_buf.pop() {
2024-11-16 04:46:59 -06:00
debug_assert!(self.nodes.dominates(until, nid), "{until} {:?}", self.nodes[until]);
each(self, nid, self.res.blocks[self.block_of(nid) as usize]);
2024-11-07 01:52:41 -06:00
if nid == until {
continue;
}
2024-11-16 04:46:59 -06:00
match self.nodes[nid].kind {
2024-11-07 01:52:41 -06:00
Kind::Then | Kind::Else | Kind::Region | Kind::Loop => {
2024-11-16 04:46:59 -06:00
for &n in self.nodes[nid].inputs.iter() {
if self.nodes[n].kind == Kind::Loops {
2024-11-10 02:17:43 -06:00
continue;
}
2024-11-16 04:46:59 -06:00
let d = self.nodes.idom_of(n);
2024-11-07 01:52:41 -06:00
if self.res.dfs_seem.set(d) {
self.res.dfs_buf.push(d);
}
}
}
Kind::Start => {}
_ => unreachable!(),
}
}
}
}
#[derive(Default)]
2024-11-15 06:06:03 -06:00
pub(super) struct Res {
2024-11-16 04:46:59 -06:00
blocks: Vec<Block>,
instrs: Vec<Nid>,
backrefs: Vec<u16>,
2024-11-15 06:06:03 -06:00
bundles: Vec<Bundle>,
node_to_reg: Vec<Reg>,
2024-11-16 04:46:59 -06:00
visited: BitSet,
2024-11-07 01:52:41 -06:00
dfs_buf: Vec<Nid>,
dfs_seem: BitSet,
2024-11-16 04:46:59 -06:00
#[cfg(debug_assertions)]
marked: hashbrown::HashSet<(Nid, Nid), crate::FnvBuildHasher>,
2024-11-07 01:52:41 -06:00
}
2024-11-15 06:06:03 -06:00
struct Bundle {
2024-11-07 01:52:41 -06:00
taken: Vec<bool>,
}
impl Bundle {
fn new(size: usize) -> Self {
Self { taken: vec![false; size] }
}
fn add(&mut self, range: Range<usize>) {
self.taken[range].fill(true);
}
fn overlaps(&self, other: &Self) -> bool {
self.taken.iter().zip(other.taken.iter()).any(|(a, b)| a & b)
}
fn merge(&mut self, other: &Self) {
debug_assert!(!self.overlaps(other));
self.taken.iter_mut().zip(other.taken.iter()).for_each(|(a, b)| *a |= *b);
}
fn clear(&mut self) {
self.taken.fill(false);
}
fn is_empty(&self) -> bool {
!self.taken.contains(&true)
}
fn take(&mut self) -> Self {
mem::replace(self, Self::new(self.taken.len()))
}
2024-11-07 01:52:41 -06:00
}
#[derive(Clone, Copy)]
2024-11-15 06:06:03 -06:00
struct Block {
start: u16,
end: u16,
2024-11-15 06:06:03 -06:00
entry: Nid,
2024-11-07 01:52:41 -06:00
}
impl Block {
pub fn range(&self) -> Range<usize> {
self.start as usize..self.end as usize
}
}