Refactor Terminator from Statement

This commit is contained in:
Rerumu
2022-06-10 23:35:20 -04:00
parent 472f37d059
commit 2df59b2d82
5 changed files with 340 additions and 267 deletions
+110 -95
View File
@@ -6,93 +6,13 @@ use std::{
use parity_wasm::elements::ValueType;
use wasm_ast::node::{
Backward, Br, BrIf, BrTable, Call, CallIndirect, Forward, If, Intermediate, Return, SetGlobal,
SetLocal, SetTemporary, Statement, StoreAt,
SetLocal, SetTemporary, Statement, StoreAt, Terminator,
};
use super::manager::{
write_ascending, write_condition, write_separated, write_variable, Driver, Label, Manager,
};
fn br_target(level: usize, in_loop: bool, w: &mut dyn Write) -> Result<()> {
write!(w, "if desired then ")?;
write!(w, "if desired == {level} then ")?;
write!(w, "desired = nil ")?;
if in_loop {
write!(w, "continue ")?;
}
write!(w, "end ")?;
write!(w, "break ")?;
write!(w, "end ")
}
fn write_br_gadget(label_list: &[Label], rem: usize, w: &mut dyn Write) -> Result<()> {
match label_list.last() {
Some(Label::Forward | Label::If) => br_target(rem, false, w),
Some(Label::Backward) => br_target(rem, true, w),
None => Ok(()),
}
}
impl Driver for Forward {
fn write(&self, mng: &mut Manager, w: &mut dyn Write) -> Result<()> {
let rem = mng.push_label(Label::Forward);
write!(w, "while true do ")?;
self.body.iter().try_for_each(|s| s.write(mng, w))?;
write!(w, "break ")?;
write!(w, "end ")?;
mng.pop_label();
write_br_gadget(mng.label_list(), rem, w)
}
}
impl Driver for Backward {
fn write(&self, mng: &mut Manager, w: &mut dyn Write) -> Result<()> {
let rem = mng.push_label(Label::Backward);
write!(w, "while true do ")?;
self.body.iter().try_for_each(|s| s.write(mng, w))?;
write!(w, "break ")?;
write!(w, "end ")?;
mng.pop_label();
write_br_gadget(mng.label_list(), rem, w)
}
}
impl Driver for If {
fn write(&self, mng: &mut Manager, w: &mut dyn Write) -> Result<()> {
let rem = mng.push_label(Label::If);
write!(w, "while true do ")?;
write!(w, "if ")?;
write_condition(&self.cond, mng, w)?;
write!(w, "then ")?;
self.truthy.iter().try_for_each(|s| s.write(mng, w))?;
if !self.falsey.is_empty() {
write!(w, "else ")?;
self.falsey.iter().try_for_each(|s| s.write(mng, w))?;
}
write!(w, "end ")?;
write!(w, "break ")?;
write!(w, "end ")?;
mng.pop_label();
write_br_gadget(mng.label_list(), rem, w)
}
}
fn write_br_at(up: usize, mng: &Manager, w: &mut dyn Write) -> Result<()> {
write!(w, "do ")?;
@@ -118,16 +38,6 @@ impl Driver for Br {
}
}
impl Driver for BrIf {
fn write(&self, mng: &mut Manager, w: &mut dyn Write) -> Result<()> {
write!(w, "if ")?;
write_condition(&self.cond, mng, w)?;
write!(w, "then ")?;
write_br_at(self.target, mng, w)?;
write!(w, "end ")
}
}
impl Driver for BrTable {
fn write(&self, mng: &mut Manager, w: &mut dyn Write) -> Result<()> {
write!(w, "do ")?;
@@ -159,6 +69,115 @@ impl Driver for Return {
}
}
impl Driver for Terminator {
fn write(&self, mng: &mut Manager, w: &mut dyn Write) -> Result<()> {
match self {
Self::Unreachable => write!(w, "error(\"out of code bounds\")"),
Self::Br(s) => s.write(mng, w),
Self::BrTable(s) => s.write(mng, w),
Self::Return(s) => s.write(mng, w),
}
}
}
fn br_target(level: usize, in_loop: bool, w: &mut dyn Write) -> Result<()> {
write!(w, "if desired then ")?;
write!(w, "if desired == {level} then ")?;
write!(w, "desired = nil ")?;
if in_loop {
write!(w, "continue ")?;
}
write!(w, "end ")?;
write!(w, "break ")?;
write!(w, "end ")
}
fn write_br_gadget(label_list: &[Label], rem: usize, w: &mut dyn Write) -> Result<()> {
match label_list.last() {
Some(Label::Forward | Label::If) => br_target(rem, false, w),
Some(Label::Backward) => br_target(rem, true, w),
None => Ok(()),
}
}
impl Driver for Forward {
fn write(&self, mng: &mut Manager, w: &mut dyn Write) -> Result<()> {
let rem = mng.push_label(Label::Forward);
write!(w, "while true do ")?;
self.code.iter().try_for_each(|s| s.write(mng, w))?;
if let Some(v) = &self.last {
v.write(mng, w)?;
}
write!(w, "break ")?;
write!(w, "end ")?;
mng.pop_label();
write_br_gadget(mng.label_list(), rem, w)
}
}
impl Driver for Backward {
fn write(&self, mng: &mut Manager, w: &mut dyn Write) -> Result<()> {
let rem = mng.push_label(Label::Backward);
write!(w, "while true do ")?;
self.code.iter().try_for_each(|s| s.write(mng, w))?;
if let Some(v) = &self.last {
v.write(mng, w)?;
}
write!(w, "break ")?;
write!(w, "end ")?;
mng.pop_label();
write_br_gadget(mng.label_list(), rem, w)
}
}
impl Driver for If {
fn write(&self, mng: &mut Manager, w: &mut dyn Write) -> Result<()> {
let rem = mng.push_label(Label::If);
write!(w, "while true do ")?;
write!(w, "if ")?;
write_condition(&self.cond, mng, w)?;
write!(w, "then ")?;
self.truthy.write(mng, w)?;
if let Some(falsey) = &self.falsey {
write!(w, "else ")?;
falsey.write(mng, w)?;
}
write!(w, "end ")?;
write!(w, "break ")?;
write!(w, "end ")?;
mng.pop_label();
write_br_gadget(mng.label_list(), rem, w)
}
}
impl Driver for BrIf {
fn write(&self, mng: &mut Manager, w: &mut dyn Write) -> Result<()> {
write!(w, "if ")?;
write_condition(&self.cond, mng, w)?;
write!(w, "then ")?;
write_br_at(self.target, mng, w)?;
write!(w, "end ")
}
}
fn write_call_store(result: Range<usize>, w: &mut dyn Write) -> Result<()> {
if result.is_empty() {
return Ok(());
@@ -230,14 +249,10 @@ impl Driver for StoreAt {
impl Driver for Statement {
fn write(&self, mng: &mut Manager, w: &mut dyn Write) -> Result<()> {
match self {
Self::Unreachable => write!(w, "error(\"out of code bounds\")"),
Self::Forward(s) => s.write(mng, w),
Self::Backward(s) => s.write(mng, w),
Self::If(s) => s.write(mng, w),
Self::Br(s) => s.write(mng, w),
Self::BrIf(s) => s.write(mng, w),
Self::BrTable(s) => s.write(mng, w),
Self::Return(s) => s.write(mng, w),
Self::Call(s) => s.write(mng, w),
Self::CallIndirect(s) => s.write(mng, w),
Self::SetTemporary(s) => s.write(mng, w),