geometric_algebra/codegen/src/rust.rs
2023-09-20 15:33:26 +02:00

565 lines
27 KiB
Rust

use crate::{
ast::{AstNode, DataType, Expression, ExpressionContent, Parameter},
emit::{camel_to_snake_case, emit_element_name, emit_indentation},
};
fn emit_data_type<W: std::io::Write>(collector: &mut W, data_type: &DataType) -> std::io::Result<()> {
match data_type {
DataType::Integer => collector.write_all(b"isize"),
DataType::SimdVector(size) if *size == 1 => collector.write_all(b"f32"),
DataType::SimdVector(size) => collector.write_fmt(format_args!("Simd32x{}", *size)),
DataType::MultiVector(class) if class.is_scalar() => collector.write_all(b"f32"),
DataType::MultiVector(class) => collector.write_fmt(format_args!("{}", class.class_name)),
}
}
fn emit_expression<W: std::io::Write>(collector: &mut W, expression: &Expression) -> std::io::Result<()> {
match &expression.content {
ExpressionContent::None => unreachable!(),
ExpressionContent::Variable(_data_type, name) => {
collector.write_all(name.bytes().collect::<Vec<_>>().as_slice())?;
}
ExpressionContent::InvokeInstanceMethod(_result_class, inner_expression, method_name, _, arguments) => {
emit_expression(collector, inner_expression)?;
collector.write_all(b".")?;
camel_to_snake_case(collector, method_name)?;
collector.write_all(b"(")?;
for (i, (_argument_class, argument)) in arguments.iter().enumerate() {
if i > 0 {
collector.write_all(b", ")?;
}
emit_expression(collector, argument)?;
}
collector.write_all(b")")?;
}
ExpressionContent::InvokeClassMethod(class, "Constructor", arguments) if class.is_scalar() => {
emit_expression(collector, &arguments[0].1)?;
}
ExpressionContent::InvokeClassMethod(class, "Constructor", arguments) => {
collector.write_fmt(format_args!("{} {{ groups: {}Groups {{ ", class.class_name, class.class_name))?;
for (i, (_argument_class, argument)) in arguments.iter().enumerate() {
if i > 0 {
collector.write_all(b", ")?;
}
collector.write_fmt(format_args!("g{}: ", i))?;
emit_expression(collector, argument)?;
}
collector.write_all(b" } }")?;
}
ExpressionContent::InvokeClassMethod(class, method_name, arguments) => {
emit_data_type(collector, &DataType::MultiVector(class))?;
collector.write_all(b"::")?;
camel_to_snake_case(collector, method_name)?;
collector.write_all(b"(")?;
for (i, (_argument_class, argument)) in arguments.iter().enumerate() {
if i > 0 {
collector.write_all(b", ")?;
}
emit_expression(collector, argument)?;
}
collector.write_all(b")")?;
}
ExpressionContent::Conversion(_source_class, _destination_class, inner_expression) => {
emit_expression(collector, inner_expression)?;
collector.write_all(b".into()")?;
}
ExpressionContent::Select(condition_expression, then_expression, else_expression) => {
collector.write_all(b"if ")?;
emit_expression(collector, condition_expression)?;
collector.write_all(b" { ")?;
emit_expression(collector, then_expression)?;
collector.write_all(b" } else { ")?;
emit_expression(collector, else_expression)?;
collector.write_all(b" }")?;
}
ExpressionContent::Access(inner_expression, array_index) => {
emit_expression(collector, inner_expression)?;
if !inner_expression.is_scalar() {
collector.write_fmt(format_args!(".group{}()", array_index))?;
}
}
ExpressionContent::Swizzle(inner_expression, indices) => {
if expression.size == 1 {
emit_expression(collector, inner_expression)?;
if inner_expression.size > 1 {
collector.write_fmt(format_args!("[{}]", indices[0]))?;
}
} else {
collector.write_all(b"swizzle!(")?;
emit_expression(collector, inner_expression)?;
collector.write_all(b", ")?;
for (i, component_index) in indices.iter().enumerate() {
if i > 0 {
collector.write_all(b", ")?;
}
collector.write_fmt(format_args!("{}", *component_index))?;
}
collector.write_all(b")")?;
}
}
ExpressionContent::Gather(inner_expression, indices) => {
if expression.size == 1 && inner_expression.is_scalar() {
emit_expression(collector, inner_expression)?;
} else {
if expression.size > 1 {
emit_data_type(collector, &DataType::SimdVector(expression.size))?;
collector.write_all(b"::from(")?;
}
if indices.len() > 1 {
collector.write_all(b"[")?;
}
for (i, (array_index, component_index)) in indices.iter().enumerate() {
if i > 0 {
collector.write_all(b", ")?;
}
emit_expression(collector, inner_expression)?;
if !inner_expression.is_scalar() {
collector.write_fmt(format_args!(".group{}()", array_index))?;
if inner_expression.size > 1 {
collector.write_fmt(format_args!("[{}]", *component_index))?;
}
}
}
if indices.len() > 1 {
collector.write_all(b"]")?;
}
if expression.size > 1 {
collector.write_all(b")")?;
}
}
}
ExpressionContent::Constant(data_type, values) => match data_type {
DataType::Integer => collector.write_fmt(format_args!("{}", values[0] as f32))?,
DataType::SimdVector(_size) => {
if expression.size == 1 {
collector.write_fmt(format_args!("{:.1}", values[0] as f32))?;
} else {
emit_data_type(collector, &DataType::SimdVector(expression.size))?;
collector.write_all(b"::from(")?;
if values.len() > 1 {
collector.write_all(b"[")?;
}
for (i, value) in values.iter().enumerate() {
if i > 0 {
collector.write_all(b", ")?;
}
collector.write_fmt(format_args!("{:.1}", *value as f32))?;
}
if values.len() > 1 {
collector.write_all(b"]")?;
}
collector.write_all(b")")?;
}
}
_ => unreachable!(),
},
ExpressionContent::SquareRoot(inner_expression) => {
emit_expression(collector, inner_expression)?;
collector.write_all(b".sqrt()")?;
}
ExpressionContent::Add(lhs, rhs)
| ExpressionContent::Subtract(lhs, rhs)
| ExpressionContent::Multiply(lhs, rhs)
| ExpressionContent::Divide(lhs, rhs)
| ExpressionContent::LessThan(lhs, rhs)
| ExpressionContent::Equal(lhs, rhs)
| ExpressionContent::LogicAnd(lhs, rhs)
| ExpressionContent::BitShiftRight(lhs, rhs) => {
emit_expression(collector, lhs)?;
collector.write_all(match expression.content {
ExpressionContent::Add(_, _) => b" + ",
ExpressionContent::Subtract(_, _) => b" - ",
ExpressionContent::Multiply(_, _) => b" * ",
ExpressionContent::Divide(_, _) => b" / ",
ExpressionContent::LessThan(_, _) => b" < ",
ExpressionContent::Equal(_, _) => b" == ",
ExpressionContent::LogicAnd(_, _) => b" & ",
ExpressionContent::BitShiftRight(_, _) => b" >> ",
_ => unreachable!(),
})?;
emit_expression(collector, rhs)?;
}
}
Ok(())
}
fn emit_assign_trait<W: std::io::Write>(collector: &mut W, result: &Parameter, parameters: &[Parameter]) -> std::io::Result<()> {
if result.multi_vector_class() != parameters[0].multi_vector_class() {
return Ok(());
}
collector.write_fmt(format_args!("impl {}Assign<", result.name))?;
emit_data_type(collector, &parameters[1].data_type)?;
collector.write_all(b"> for ")?;
emit_data_type(collector, &parameters[0].data_type)?;
collector.write_all(b" {\n fn ")?;
camel_to_snake_case(collector, result.name)?;
collector.write_all(b"_assign(&mut self, other: ")?;
emit_data_type(collector, &parameters[1].data_type)?;
collector.write_all(b") {\n *self = (*self).")?;
camel_to_snake_case(collector, result.name)?;
collector.write_all(b"(other);\n }\n}\n\n")
}
pub fn emit_code<W: std::io::Write>(collector: &mut W, ast_node: &AstNode, indentation: usize) -> std::io::Result<()> {
match &ast_node {
AstNode::None => {}
AstNode::Preamble => {
collector.write_all(b"#![allow(clippy::assign_op_pattern)]\n")?;
collector
.write_all(b"use crate::{simd::*, *};\nuse std::ops::{Add, AddAssign, Div, DivAssign, Mul, MulAssign, Neg, Sub, SubAssign};\n\n")?;
}
AstNode::ClassDefinition { class } => {
if class.is_scalar() {
return Ok(());
}
let element_count = class.grouped_basis.iter().fold(0, |a, b| a + b.len());
let mut simd_widths = Vec::new();
emit_indentation(collector, indentation)?;
collector.write_fmt(format_args!("#[derive(Clone, Copy)]\nstruct {}Groups {{\n", class.class_name))?;
for (j, group) in class.grouped_basis.iter().enumerate() {
emit_indentation(collector, indentation + 1)?;
collector.write_all(b"/// ")?;
for (i, element) in group.iter().enumerate() {
if i > 0 {
collector.write_all(b", ")?;
}
collector.write_fmt(format_args!("{}", element))?;
}
collector.write_all(b"\n")?;
emit_indentation(collector, indentation + 1)?;
collector.write_fmt(format_args!("g{}: ", j))?;
emit_data_type(collector, &DataType::SimdVector(group.len()))?;
collector.write_all(b",\n")?;
simd_widths.push(if group.len() == 1 { 1 } else { 4 });
}
collector.write_all(b"}\n\n")?;
emit_indentation(collector, indentation)?;
collector.write_fmt(format_args!("#[derive(Clone, Copy)]\npub union {} {{\n", class.class_name))?;
emit_indentation(collector, indentation + 1)?;
collector.write_fmt(format_args!("groups: {}Groups,\n", class.class_name))?;
emit_indentation(collector, indentation + 1)?;
collector.write_all(b"/// ")?;
for (j, group) in class.grouped_basis.iter().enumerate() {
for (i, element) in group.iter().enumerate() {
if j > 0 || i > 0 {
collector.write_all(b", ")?;
}
collector.write_fmt(format_args!("{}", element))?;
}
for _ in group.len()..simd_widths[j] {
collector.write_all(b", 0")?;
}
}
collector.write_all(b"\n")?;
emit_indentation(collector, indentation + 1)?;
collector.write_fmt(format_args!("elements: [f32; {}],\n", simd_widths.iter().fold(0, |a, b| a + b)))?;
emit_indentation(collector, indentation)?;
collector.write_all(b"}\n\n")?;
emit_indentation(collector, indentation)?;
collector.write_fmt(format_args!("impl {} {{\n", class.class_name))?;
emit_indentation(collector, indentation + 1)?;
collector.write_all(b"#[allow(clippy::too_many_arguments)]\n")?;
emit_indentation(collector, indentation + 1)?;
collector.write_all(b"pub const fn new(")?;
let mut element_index = 0;
for group in class.grouped_basis.iter() {
for element in group.iter() {
if element_index > 0 {
collector.write_all(b", ")?;
}
emit_element_name(collector, element)?;
collector.write_all(b": f32")?;
element_index += 1;
}
}
collector.write_all(b") -> Self {\n")?;
emit_indentation(collector, indentation + 2)?;
collector.write_all(b"Self { elements: [")?;
element_index = 0;
for (j, group) in class.grouped_basis.iter().enumerate() {
for element in group.iter() {
if element_index > 0 {
collector.write_all(b", ")?;
}
emit_element_name(collector, element)?;
element_index += 1;
}
for _ in group.len()..simd_widths[j] {
collector.write_all(b", 0.0")?;
}
}
collector.write_all(b"] }\n")?;
emit_indentation(collector, indentation + 1)?;
collector.write_all(b"}\n")?;
emit_indentation(collector, indentation + 1)?;
collector.write_all(b"pub const fn from_groups(")?;
for (j, group) in class.grouped_basis.iter().enumerate() {
if j > 0 {
collector.write_all(b", ")?;
}
collector.write_fmt(format_args!("g{}: ", j))?;
emit_data_type(collector, &DataType::SimdVector(group.len()))?;
}
collector.write_all(b") -> Self {\n")?;
emit_indentation(collector, indentation + 2)?;
collector.write_fmt(format_args!("Self {{ groups: {}Groups {{ ", class.class_name))?;
for j in 0..class.grouped_basis.len() {
if j > 0 {
collector.write_all(b", ")?;
}
collector.write_fmt(format_args!("g{}", j))?;
}
collector.write_all(b" } }\n")?;
emit_indentation(collector, indentation + 1)?;
collector.write_all(b"}\n")?;
for (j, group) in class.grouped_basis.iter().enumerate() {
emit_indentation(collector, indentation + 1)?;
collector.write_all(b"#[inline(always)]\n")?;
emit_indentation(collector, indentation + 1)?;
collector.write_fmt(format_args!("pub fn group{}(&self) -> ", j))?;
emit_data_type(collector, &DataType::SimdVector(group.len()))?;
collector.write_all(b" {\n")?;
emit_indentation(collector, indentation + 2)?;
collector.write_fmt(format_args!("unsafe {{ self.groups.g{} }}\n", j))?;
emit_indentation(collector, indentation + 1)?;
collector.write_all(b"}\n")?;
emit_indentation(collector, indentation + 1)?;
collector.write_all(b"#[inline(always)]\n")?;
emit_indentation(collector, indentation + 1)?;
collector.write_fmt(format_args!("pub fn group{}_mut(&mut self) -> &mut ", j))?;
emit_data_type(collector, &DataType::SimdVector(group.len()))?;
collector.write_all(b" {\n")?;
emit_indentation(collector, indentation + 2)?;
collector.write_fmt(format_args!("unsafe {{ &mut self.groups.g{} }}\n", j))?;
emit_indentation(collector, indentation + 1)?;
collector.write_all(b"}\n")?;
}
emit_indentation(collector, indentation)?;
collector.write_all(b"}\n\n")?;
emit_indentation(collector, indentation)?;
collector.write_fmt(format_args!(
"const {}_INDEX_REMAP: [usize; {}] = [",
class.class_name.to_uppercase(),
element_count
))?;
let mut element_index = 0;
let mut index_remap = Vec::new();
for (j, group) in class.grouped_basis.iter().enumerate() {
for _ in 0..group.len() {
if element_index > 0 {
collector.write_all(b", ")?;
}
collector.write_fmt(format_args!("{}", element_index))?;
index_remap.push(element_index);
element_index += 1;
}
element_index += simd_widths[j].saturating_sub(group.len());
}
collector.write_all(b"];\n\n")?;
emit_indentation(collector, indentation)?;
collector.write_fmt(format_args!("impl std::ops::Index<usize> for {} {{\n", class.class_name))?;
emit_indentation(collector, indentation + 1)?;
collector.write_all(b"type Output = f32;\n\n")?;
emit_indentation(collector, indentation + 1)?;
collector.write_all(b"fn index(&self, index: usize) -> &Self::Output {\n")?;
emit_indentation(collector, indentation + 2)?;
collector.write_fmt(format_args!(
"unsafe {{ &self.elements[{}_INDEX_REMAP[index]] }}\n",
class.class_name.to_uppercase()
))?;
emit_indentation(collector, indentation + 1)?;
collector.write_all(b"}\n")?;
emit_indentation(collector, indentation)?;
collector.write_all(b"}\n\n")?;
emit_indentation(collector, indentation)?;
collector.write_fmt(format_args!("impl std::ops::IndexMut<usize> for {} {{\n", class.class_name))?;
emit_indentation(collector, indentation + 1)?;
collector.write_all(b"fn index_mut(&mut self, index: usize) -> &mut Self::Output {\n")?;
emit_indentation(collector, indentation + 2)?;
collector.write_fmt(format_args!(
"unsafe {{ &mut self.elements[{}_INDEX_REMAP[index]] }}\n",
class.class_name.to_uppercase()
))?;
emit_indentation(collector, indentation + 1)?;
collector.write_all(b"}\n")?;
emit_indentation(collector, indentation)?;
collector.write_all(b"}\n\n")?;
emit_indentation(collector, indentation)?;
collector.write_fmt(format_args!(
"impl std::convert::From<{}> for [f32; {}] {{\n",
class.class_name, element_count
))?;
emit_indentation(collector, indentation + 1)?;
collector.write_fmt(format_args!("fn from(vector: {}) -> Self {{\n", class.class_name))?;
emit_indentation(collector, indentation + 2)?;
collector.write_all(b"unsafe { [")?;
for (i, remapped) in index_remap.iter().enumerate() {
if i > 0 {
collector.write_all(b", ")?;
}
collector.write_fmt(format_args!("vector.elements[{}]", remapped))?;
}
collector.write_all(b"] }\n")?;
emit_indentation(collector, indentation + 1)?;
collector.write_all(b"}\n")?;
emit_indentation(collector, indentation)?;
collector.write_all(b"}\n\n")?;
emit_indentation(collector, indentation)?;
collector.write_fmt(format_args!(
"impl std::convert::From<[f32; {}]> for {} {{\n",
element_count, class.class_name
))?;
emit_indentation(collector, indentation + 1)?;
collector.write_fmt(format_args!("fn from(array: [f32; {}]) -> Self {{\n", element_count))?;
emit_indentation(collector, indentation + 2)?;
collector.write_all(b"Self { elements: [")?;
let mut element_index = 0;
for (j, group) in class.grouped_basis.iter().enumerate() {
for _ in 0..group.len() {
if element_index > 0 {
collector.write_all(b", ")?;
}
collector.write_fmt(format_args!("array[{}]", element_index))?;
element_index += 1;
}
for _ in group.len()..simd_widths[j] {
collector.write_all(b", 0.0")?;
}
}
collector.write_all(b"] }\n")?;
emit_indentation(collector, indentation + 1)?;
collector.write_all(b"}\n")?;
emit_indentation(collector, indentation)?;
collector.write_all(b"}\n\n")?;
emit_indentation(collector, indentation)?;
collector.write_fmt(format_args!("impl std::fmt::Debug for {} {{\n", class.class_name))?;
emit_indentation(collector, indentation + 1)?;
collector.write_all(b"fn fmt(&self, formatter: &mut std::fmt::Formatter) -> std::fmt::Result {\n")?;
emit_indentation(collector, indentation + 2)?;
collector.write_all(b"formatter\n")?;
emit_indentation(collector, indentation + 3)?;
collector.write_fmt(format_args!(".debug_struct(\"{}\")\n", class.class_name))?;
let mut element_index = 0;
for group in class.grouped_basis.iter() {
for element in group.iter() {
emit_indentation(collector, indentation + 3)?;
collector.write_fmt(format_args!(".field(\"{}\", &self[{}])\n", element, element_index))?;
element_index += 1;
}
}
emit_indentation(collector, indentation + 3)?;
collector.write_all(b".finish()\n")?;
emit_indentation(collector, indentation + 1)?;
collector.write_all(b"}\n")?;
emit_indentation(collector, indentation)?;
collector.write_all(b"}\n\n")?;
}
AstNode::ReturnStatement { expression } => {
collector.write_all(b"return ")?;
emit_expression(collector, expression)?;
collector.write_all(b";\n")?;
}
AstNode::VariableAssignment { name, data_type, expression } => {
if let Some(data_type) = data_type {
collector.write_fmt(format_args!("let mut {}", name))?;
collector.write_all(b": ")?;
emit_data_type(collector, data_type)?;
} else {
collector.write_fmt(format_args!("{}", name))?;
}
collector.write_all(b" = ")?;
emit_expression(collector, expression)?;
collector.write_all(b";\n")?;
}
AstNode::IfThenBlock { condition, body } | AstNode::WhileLoopBlock { condition, body } => {
collector.write_all(match &ast_node {
AstNode::IfThenBlock { .. } => b"if ",
AstNode::WhileLoopBlock { .. } => b"while ",
_ => unreachable!(),
})?;
emit_expression(collector, condition)?;
collector.write_all(b" {\n")?;
for statement in body.iter() {
emit_indentation(collector, indentation + 1)?;
emit_code(collector, statement, indentation + 1)?;
}
emit_indentation(collector, indentation)?;
collector.write_all(b"}\n")?;
}
AstNode::TraitImplementation { result, parameters, body } => {
if result.data_type.is_scalar()
&& !parameters
.iter()
.any(|parameter| matches!(parameter.data_type, DataType::MultiVector(class) if !class.is_scalar()))
{
return Ok(());
}
collector.write_fmt(format_args!("impl {}", result.name))?;
let impl_for = match parameters.len() {
0 => &result.data_type,
1 if result.name == "Into" => {
collector.write_all(b"<")?;
emit_data_type(collector, &result.data_type)?;
collector.write_all(b">")?;
&parameters[0].data_type
}
1 => &parameters[0].data_type,
2 if !matches!(parameters[1].data_type, DataType::MultiVector(_)) => &parameters[0].data_type,
2 => {
collector.write_all(b"<")?;
emit_data_type(collector, &parameters[1].data_type)?;
collector.write_all(b">")?;
&parameters[0].data_type
}
_ => unreachable!(),
};
collector.write_all(b" for ")?;
emit_data_type(collector, impl_for)?;
collector.write_all(b" {\n")?;
if !parameters.is_empty() && result.name != "Into" {
emit_indentation(collector, indentation + 1)?;
collector.write_all(b"type Output = ")?;
emit_data_type(collector, &result.data_type)?;
collector.write_all(b";\n\n")?;
}
emit_indentation(collector, indentation + 1)?;
collector.write_all(b"fn ")?;
camel_to_snake_case(collector, result.name)?;
match parameters.len() {
0 => collector.write_all(b"() -> Self")?,
1 => {
collector.write_fmt(format_args!("({}) -> ", parameters[0].name))?;
emit_data_type(collector, &result.data_type)?;
}
2 => {
collector.write_fmt(format_args!("({}, {}: ", parameters[0].name, parameters[1].name))?;
emit_data_type(collector, &parameters[1].data_type)?;
collector.write_all(b") -> ")?;
emit_data_type(collector, &result.data_type)?;
}
_ => unreachable!(),
}
collector.write_all(b" {\n")?;
for (i, statement) in body.iter().enumerate() {
emit_indentation(collector, indentation + 2)?;
if i + 1 == body.len() {
if let AstNode::ReturnStatement { expression } = statement {
emit_expression(collector, expression)?;
collector.write_all(b"\n")?;
break;
}
}
emit_code(collector, statement, indentation + 2)?;
}
emit_indentation(collector, indentation + 1)?;
collector.write_all(b"}\n}\n\n")?;
match result.name {
"Add" | "Sub" | "Mul" | "Div" => {
emit_assign_trait(collector, result, parameters)?;
}
_ => {}
}
}
}
Ok(())
}