feat(builtins): macro
This commit is contained in:
207
evaluator/nixjit_macros/src/builtins.rs
Normal file
207
evaluator/nixjit_macros/src/builtins.rs
Normal file
@@ -0,0 +1,207 @@
|
||||
use convert_case::{Case, Casing};
|
||||
use proc_macro::TokenStream;
|
||||
use proc_macro2::Span;
|
||||
use quote::{format_ident, quote, ToTokens};
|
||||
use syn::{
|
||||
parse_macro_input, FnArg, Item, ItemConst, ItemFn, ItemMod, Pat, PatType, Type,
|
||||
Visibility,
|
||||
};
|
||||
|
||||
pub fn builtins_impl(input: TokenStream) -> TokenStream {
|
||||
let item_mod = parse_macro_input!(input as ItemMod);
|
||||
|
||||
let (_brace, items) = match item_mod.content.clone() {
|
||||
Some(content) => content,
|
||||
None => {
|
||||
return syn::Error::new_spanned(
|
||||
item_mod,
|
||||
"`#[builtins]` macro can only be used on an inline module: `mod name { ... }`",
|
||||
)
|
||||
.to_compile_error()
|
||||
.into();
|
||||
}
|
||||
};
|
||||
|
||||
let mut pub_item_mod: Vec<proc_macro2::TokenStream> = Vec::new();
|
||||
let mut const_inserters = Vec::new();
|
||||
let mut global_inserters = Vec::new();
|
||||
let mut scoped_inserters = Vec::new();
|
||||
let mut wrappers = Vec::new();
|
||||
|
||||
for item in &items {
|
||||
match item {
|
||||
Item::Const(item_const) => {
|
||||
let inserter = generate_const_inserter(item_const);
|
||||
const_inserters.push(inserter);
|
||||
pub_item_mod.push(quote! {
|
||||
pub #item_const
|
||||
}.into());
|
||||
}
|
||||
Item::Fn(item_fn) => {
|
||||
let (inserter, wrapper) = match generate_fn_wrapper(item_fn) {
|
||||
Ok(result) => result,
|
||||
Err(e) => return e.to_compile_error().into(),
|
||||
};
|
||||
if matches!(item_fn.vis, Visibility::Public(_)) {
|
||||
global_inserters.push(inserter);
|
||||
pub_item_mod.push(quote! { #item_fn }.into());
|
||||
} else {
|
||||
scoped_inserters.push(inserter);
|
||||
pub_item_mod.push(quote! {
|
||||
pub #item_fn
|
||||
}.into());
|
||||
}
|
||||
wrappers.push(wrapper);
|
||||
}
|
||||
item => pub_item_mod.push(item.to_token_stream())
|
||||
}
|
||||
}
|
||||
|
||||
let output = quote! {
|
||||
mod builtins {
|
||||
#(#pub_item_mod)*
|
||||
#(#wrappers)*
|
||||
}
|
||||
|
||||
pub struct Builtins<Ctx: BuiltinsContext> {
|
||||
pub consts: ::std::vec::Vec<(String, ::nixjit_value::Const)>,
|
||||
pub global: ::std::vec::Vec<(String, fn(&mut Ctx, Vec<::nixjit_eval::Value<Ctx>>) -> ::nixjit_error::Result<::nixjit_eval::Value<Ctx>>)>,
|
||||
pub scoped: ::std::vec::Vec<(String, fn(&mut Ctx, Vec<::nixjit_eval::Value<Ctx>>) -> ::nixjit_error::Result<::nixjit_eval::Value<Ctx>>)>,
|
||||
}
|
||||
|
||||
impl<Ctx: BuiltinsContext> Builtins<Ctx> {
|
||||
pub fn new() -> Self {
|
||||
let mut consts = ::std::vec::Vec::new();
|
||||
let mut global = ::std::vec::Vec::new();
|
||||
let mut scoped = ::std::vec::Vec::new();
|
||||
|
||||
#(#const_inserters)*
|
||||
#(#global_inserters)*
|
||||
#(#scoped_inserters)*
|
||||
|
||||
Self { consts, global, scoped }
|
||||
}
|
||||
}
|
||||
};
|
||||
|
||||
output.into()
|
||||
}
|
||||
|
||||
fn generate_const_inserter(
|
||||
item_const: &ItemConst,
|
||||
) -> proc_macro2::TokenStream {
|
||||
let name_str = item_const.ident.to_string().from_case(Case::UpperSnake).to_case(Case::Camel);
|
||||
let const_name = &item_const.ident;
|
||||
|
||||
quote! {
|
||||
consts.push((#name_str.to_string(), builtins::#const_name));
|
||||
}
|
||||
}
|
||||
|
||||
fn generate_fn_wrapper(
|
||||
item_fn: &ItemFn,
|
||||
) -> syn::Result<(proc_macro2::TokenStream, proc_macro2::TokenStream)> {
|
||||
let fn_name = &item_fn.sig.ident;
|
||||
let name_str = fn_name.to_string().from_case(Case::Snake).to_case(Case::Camel);
|
||||
let wrapper_name = format_ident!("wrapper_{}", fn_name);
|
||||
let mod_name = format_ident!("builtins");
|
||||
|
||||
let is_pub = matches!(item_fn.vis, Visibility::Public(_));
|
||||
let mut user_args = item_fn.sig.inputs.iter().peekable();
|
||||
|
||||
let has_ctx = if let Some(FnArg::Typed(first_arg)) = user_args.peek() {
|
||||
if let Type::Reference(_) = *first_arg.ty {
|
||||
user_args.next();
|
||||
true
|
||||
} else {
|
||||
false
|
||||
}
|
||||
} else {
|
||||
return Err(syn::Error::new_spanned(
|
||||
fn_name,
|
||||
"A builtin function must not have a receiver argument",
|
||||
));
|
||||
};
|
||||
|
||||
let arg_pats: Vec<_> = user_args.rev().collect();
|
||||
let arg_count = arg_pats.len();
|
||||
let arg_unpacks = arg_pats.iter().enumerate().map(|(i, arg)| {
|
||||
let arg_name = match &arg {
|
||||
FnArg::Typed(PatType { pat, .. }) => {
|
||||
if let Pat::Ident(pat_ident) = &**pat {
|
||||
pat_ident.ident.clone()
|
||||
} else {
|
||||
format_ident!("arg{}", i, span = Span::call_site())
|
||||
}
|
||||
}
|
||||
_ => format_ident!("arg{}", i, span = Span::call_site()),
|
||||
};
|
||||
let arg_ty = match &arg {
|
||||
FnArg::Typed(PatType { ty, .. }) => ty,
|
||||
_ => unreachable!(),
|
||||
};
|
||||
|
||||
quote! {
|
||||
let #arg_name: #arg_ty = args.pop().ok_or_else(|| ::nixjit_error::Error::EvalError("Not enough arguments provided".to_string()))?
|
||||
.try_into().map_err(|e| ::nixjit_error::Error::EvalError(format!("Argument type conversion failed: {}", e)))?;
|
||||
}
|
||||
});
|
||||
|
||||
let arg_names: Vec<_> = arg_pats
|
||||
.iter()
|
||||
.enumerate()
|
||||
.map(|(i, arg)| match &arg {
|
||||
FnArg::Typed(PatType { pat, .. }) => {
|
||||
if let Pat::Ident(pat_ident) = &**pat {
|
||||
pat_ident.ident.clone()
|
||||
} else {
|
||||
format_ident!("arg{}", i, span = Span::call_site())
|
||||
}
|
||||
}
|
||||
_ => unreachable!(),
|
||||
})
|
||||
.rev()
|
||||
.collect();
|
||||
|
||||
let mut call_args = quote! { #(#arg_names),* };
|
||||
if has_ctx {
|
||||
call_args = quote! { ctx, #(#arg_names),* };
|
||||
}
|
||||
|
||||
let returns_result = match &item_fn.sig.output {
|
||||
syn::ReturnType::Type(_, ty) => {
|
||||
if let Type::Path(type_path) = &**ty {
|
||||
type_path.path.segments.iter().any(|s| s.ident == "Result")
|
||||
} else {
|
||||
false
|
||||
}
|
||||
}
|
||||
_ => false,
|
||||
};
|
||||
|
||||
let call_expr = if returns_result {
|
||||
quote! { #fn_name(#call_args) }
|
||||
} else {
|
||||
quote! { Ok(#fn_name(#call_args).into()) }
|
||||
};
|
||||
|
||||
let fn_type = quote! { fn(&mut Ctx, Vec<::nixjit_eval::Value<Ctx>>) -> ::nixjit_error::Result<::nixjit_eval::Value<Ctx>> };
|
||||
let inserter = if is_pub {
|
||||
quote! { global.push((#name_str.to_string(), #mod_name::#wrapper_name as #fn_type)); }
|
||||
} else {
|
||||
quote! { scoped.push((#name_str.to_string(), #mod_name::#wrapper_name as #fn_type)); }
|
||||
};
|
||||
|
||||
let wrapper = quote! {
|
||||
pub fn #wrapper_name<Ctx: BuiltinsContext>(ctx: &mut Ctx, mut args: Vec<::nixjit_eval::Value<Ctx>>) -> ::nixjit_error::Result<::nixjit_eval::Value<Ctx>> {
|
||||
if args.len() != #arg_count {
|
||||
return Err(::nixjit_error::Error::EvalError(format!("Function '{}' expects {} arguments, but received {}", #name_str, #arg_count, args.len())));
|
||||
}
|
||||
#(#arg_unpacks)*
|
||||
|
||||
#call_expr
|
||||
}
|
||||
};
|
||||
|
||||
Ok((inserter, wrapper))
|
||||
}
|
||||
@@ -1,3 +1,6 @@
|
||||
use convert_case::{Case, Casing};
|
||||
use proc_macro::TokenStream;
|
||||
use quote::{format_ident, quote};
|
||||
use syn::{
|
||||
FieldsNamed, Ident, Token, Type, parenthesized,
|
||||
parse::{Parse, ParseStream, Result},
|
||||
@@ -52,3 +55,117 @@ impl Parse for MacroInput {
|
||||
})
|
||||
}
|
||||
}
|
||||
|
||||
pub fn ir_impl(input: TokenStream) -> TokenStream {
|
||||
let parsed_input = syn::parse_macro_input!(input as MacroInput);
|
||||
|
||||
let base_name = &parsed_input.base_name;
|
||||
let ref_name = format_ident!("{}Ref", base_name);
|
||||
let mut_name = format_ident!("{}Mut", base_name);
|
||||
let to_trait_name = format_ident!("To{}", base_name);
|
||||
let to_trait_fn_name = format_ident!("to_{}", base_name.to_string().to_case(Case::Snake));
|
||||
|
||||
let mut enum_variants = Vec::new();
|
||||
let mut struct_defs = Vec::new();
|
||||
let mut ref_variants = Vec::new();
|
||||
let mut mut_variants = Vec::new();
|
||||
let mut as_ref_arms = Vec::new();
|
||||
let mut as_mut_arms = Vec::new();
|
||||
let mut from_impls = Vec::new();
|
||||
let mut to_trait_impls = Vec::new();
|
||||
|
||||
for variant in parsed_input.variants {
|
||||
match variant {
|
||||
VariantInput::Unit(name) => {
|
||||
let inner_type = name.clone();
|
||||
enum_variants.push(quote! { #name(#inner_type) });
|
||||
ref_variants.push(quote! { #name(&'a #inner_type) });
|
||||
mut_variants.push(quote! { #name(&'a mut #inner_type) });
|
||||
as_ref_arms.push(quote! { Self::#name(inner) => #ref_name::#name(inner) });
|
||||
as_mut_arms.push(quote! { Self::#name(inner) => #mut_name::#name(inner) });
|
||||
from_impls.push(quote! {
|
||||
impl From<#inner_type> for #base_name {
|
||||
fn from(val: #inner_type) -> Self { #base_name::#name(val) }
|
||||
}
|
||||
});
|
||||
to_trait_impls.push(quote! {
|
||||
impl #to_trait_name for #name {
|
||||
fn #to_trait_fn_name(self) -> #base_name { #base_name::from(self) }
|
||||
}
|
||||
});
|
||||
}
|
||||
VariantInput::Tuple(name, ty) => {
|
||||
enum_variants.push(quote! { #name(#ty) });
|
||||
ref_variants.push(quote! { #name(&'a #ty) });
|
||||
mut_variants.push(quote! { #name(&'a mut #ty) });
|
||||
as_ref_arms.push(quote! { Self::#name(inner) => #ref_name::#name(inner) });
|
||||
as_mut_arms.push(quote! { Self::#name(inner) => #mut_name::#name(inner) });
|
||||
}
|
||||
VariantInput::Struct(name, fields) => {
|
||||
let inner_type = name.clone();
|
||||
struct_defs.push(quote! {
|
||||
#[derive(Debug)]
|
||||
pub struct #name #fields
|
||||
});
|
||||
enum_variants.push(quote! { #name(#inner_type) });
|
||||
ref_variants.push(quote! { #name(&'a #inner_type) });
|
||||
mut_variants.push(quote! { #name(&'a mut #inner_type) });
|
||||
as_ref_arms.push(quote! { Self::#name(inner) => #ref_name::#name(inner) });
|
||||
as_mut_arms.push(quote! { Self::#name(inner) => #mut_name::#name(inner) });
|
||||
from_impls.push(quote! {
|
||||
impl From<#inner_type> for #base_name {
|
||||
fn from(val: #inner_type) -> Self { #base_name::#name(val) }
|
||||
}
|
||||
});
|
||||
to_trait_impls.push(quote! {
|
||||
impl #to_trait_name for #name {
|
||||
fn #to_trait_fn_name(self) -> #base_name { #base_name::from(self) }
|
||||
}
|
||||
});
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
let expanded = quote! {
|
||||
#[derive(Debug, IsVariant, Unwrap, TryUnwrap)]
|
||||
pub enum #base_name {
|
||||
#( #enum_variants ),*
|
||||
}
|
||||
|
||||
#( #struct_defs )*
|
||||
|
||||
#[derive(Debug, IsVariant, Unwrap, TryUnwrap)]
|
||||
pub enum #ref_name<'a> {
|
||||
#( #ref_variants ),*
|
||||
}
|
||||
|
||||
#[derive(Debug, IsVariant, Unwrap, TryUnwrap)]
|
||||
pub enum #mut_name<'a> {
|
||||
#( #mut_variants ),*
|
||||
}
|
||||
|
||||
impl #base_name {
|
||||
pub fn as_ref(&self) -> #ref_name<'_> {
|
||||
match self {
|
||||
#( #as_ref_arms ),*
|
||||
}
|
||||
}
|
||||
|
||||
pub fn as_mut(&mut self) -> #mut_name<'_> {
|
||||
match self {
|
||||
#( #as_mut_arms ),*
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
#( #from_impls )*
|
||||
|
||||
pub trait #to_trait_name {
|
||||
fn #to_trait_fn_name(self) -> #base_name;
|
||||
}
|
||||
|
||||
#( #to_trait_impls )*
|
||||
};
|
||||
|
||||
TokenStream::from(expanded)
|
||||
}
|
||||
|
||||
@@ -1,121 +1,14 @@
|
||||
use convert_case::{Case, Casing};
|
||||
use proc_macro::TokenStream;
|
||||
use quote::{format_ident, quote};
|
||||
|
||||
mod builtins;
|
||||
mod ir;
|
||||
|
||||
#[proc_macro]
|
||||
pub fn ir(input: TokenStream) -> TokenStream {
|
||||
use ir::*;
|
||||
let parsed_input = syn::parse_macro_input!(input as MacroInput);
|
||||
|
||||
let base_name = &parsed_input.base_name;
|
||||
let ref_name = format_ident!("{}Ref", base_name);
|
||||
let mut_name = format_ident!("{}Mut", base_name);
|
||||
let to_trait_name = format_ident!("To{}", base_name);
|
||||
let to_trait_fn_name = format_ident!("to_{}", base_name.to_string().to_case(Case::Snake));
|
||||
|
||||
let mut enum_variants = Vec::new();
|
||||
let mut struct_defs = Vec::new();
|
||||
let mut ref_variants = Vec::new();
|
||||
let mut mut_variants = Vec::new();
|
||||
let mut as_ref_arms = Vec::new();
|
||||
let mut as_mut_arms = Vec::new();
|
||||
let mut from_impls = Vec::new();
|
||||
let mut to_trait_impls = Vec::new();
|
||||
|
||||
for variant in parsed_input.variants {
|
||||
match variant {
|
||||
VariantInput::Unit(name) => {
|
||||
let inner_type = name.clone();
|
||||
enum_variants.push(quote! { #name(#inner_type) });
|
||||
ref_variants.push(quote! { #name(&'a #inner_type) });
|
||||
mut_variants.push(quote! { #name(&'a mut #inner_type) });
|
||||
as_ref_arms.push(quote! { Self::#name(inner) => #ref_name::#name(inner) });
|
||||
as_mut_arms.push(quote! { Self::#name(inner) => #mut_name::#name(inner) });
|
||||
from_impls.push(quote! {
|
||||
impl From<#inner_type> for #base_name {
|
||||
fn from(val: #inner_type) -> Self { #base_name::#name(val) }
|
||||
}
|
||||
});
|
||||
to_trait_impls.push(quote! {
|
||||
impl #to_trait_name for #name {
|
||||
fn #to_trait_fn_name(self) -> #base_name { #base_name::from(self) }
|
||||
}
|
||||
});
|
||||
}
|
||||
VariantInput::Tuple(name, ty) => {
|
||||
enum_variants.push(quote! { #name(#ty) });
|
||||
ref_variants.push(quote! { #name(&'a #ty) });
|
||||
mut_variants.push(quote! { #name(&'a mut #ty) });
|
||||
as_ref_arms.push(quote! { Self::#name(inner) => #ref_name::#name(inner) });
|
||||
as_mut_arms.push(quote! { Self::#name(inner) => #mut_name::#name(inner) });
|
||||
}
|
||||
VariantInput::Struct(name, fields) => {
|
||||
let inner_type = name.clone();
|
||||
struct_defs.push(quote! {
|
||||
#[derive(Debug)]
|
||||
pub struct #name #fields
|
||||
});
|
||||
enum_variants.push(quote! { #name(#inner_type) });
|
||||
ref_variants.push(quote! { #name(&'a #inner_type) });
|
||||
mut_variants.push(quote! { #name(&'a mut #inner_type) });
|
||||
as_ref_arms.push(quote! { Self::#name(inner) => #ref_name::#name(inner) });
|
||||
as_mut_arms.push(quote! { Self::#name(inner) => #mut_name::#name(inner) });
|
||||
from_impls.push(quote! {
|
||||
impl From<#inner_type> for #base_name {
|
||||
fn from(val: #inner_type) -> Self { #base_name::#name(val) }
|
||||
}
|
||||
});
|
||||
to_trait_impls.push(quote! {
|
||||
impl #to_trait_name for #name {
|
||||
fn #to_trait_fn_name(self) -> #base_name { #base_name::from(self) }
|
||||
}
|
||||
});
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
let expanded = quote! {
|
||||
#[derive(Debug, IsVariant, Unwrap, TryUnwrap)]
|
||||
pub enum #base_name {
|
||||
#( #enum_variants ),*
|
||||
}
|
||||
|
||||
#( #struct_defs )*
|
||||
|
||||
#[derive(Debug, IsVariant, Unwrap, TryUnwrap)]
|
||||
pub enum #ref_name<'a> {
|
||||
#( #ref_variants ),*
|
||||
}
|
||||
|
||||
#[derive(Debug, IsVariant, Unwrap, TryUnwrap)]
|
||||
pub enum #mut_name<'a> {
|
||||
#( #mut_variants ),*
|
||||
}
|
||||
|
||||
impl #base_name {
|
||||
pub fn as_ref(&self) -> #ref_name<'_> {
|
||||
match self {
|
||||
#( #as_ref_arms ),*
|
||||
}
|
||||
}
|
||||
|
||||
pub fn as_mut(&mut self) -> #mut_name<'_> {
|
||||
match self {
|
||||
#( #as_mut_arms ),*
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
#( #from_impls )*
|
||||
|
||||
pub trait #to_trait_name {
|
||||
fn #to_trait_fn_name(self) -> #base_name;
|
||||
}
|
||||
|
||||
#( #to_trait_impls )*
|
||||
};
|
||||
|
||||
TokenStream::from(expanded)
|
||||
ir::ir_impl(input)
|
||||
}
|
||||
|
||||
#[proc_macro_attribute]
|
||||
pub fn builtins(_attr: TokenStream, input: TokenStream) -> TokenStream {
|
||||
builtins::builtins_impl(input)
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user