#![feature(extern_crate_item_prelude)]
#![feature(concat_idents)]
#![recursion_limit = "128"]
extern crate proc_macro;
use quote::quote;
use syn::spanned::Spanned;
#[proc_macro_attribute]
pub fn epics_register(
_attr: proc_macro::TokenStream,
item: proc_macro::TokenStream,
) -> proc_macro::TokenStream {
let ast = syn::parse(item).unwrap();
impl_epics_register(&ast).into()
}
fn impl_epics_register(ast: &syn::ItemFn) -> proc_macro2::TokenStream {
let name = &ast.ident;
let name_str = name.to_string();
if !name_str.ends_with("_impl") {
return syn::parse::Error::new(name.span(), "expected name to end with `_impl`")
.to_compile_error();
}
let name_export = name_str.trim_end_matches(&"_impl");
let name_ident = syn::Ident::new(name_export, name.span());
let pvar_name = String::from("pvar_func_register_func_") + &name_export;
let pvar_ident = syn::Ident::new(&pvar_name, name.span());
let reg_func_name = String::from("register_func_") + &name_export;
let reg_func_ident = syn::Ident::new(®_func_name, name.span());
if ast.decl.inputs.len() != 1 {
return syn::parse::Error::new(
ast.decl.paren_token.span,
"expected function to have 1 argument",
)
.to_compile_error();
}
let rec_type = &ast.decl.inputs.first().unwrap().into_value();
let rec_type = match rec_type {
syn::FnArg::Captured(arg) => Some(&arg.ty),
_ => {
return syn::parse::Error::new(rec_type.span(), "unknown argument").to_compile_error();
}
}
.unwrap();
let rec_type = match rec_type {
syn::Type::Reference(ty) => Some(ty.elem.as_ref()),
_ => {
return syn::parse::Error::new(rec_type.span(), "expected reference").to_compile_error();
}
}
.unwrap();
let rec_type = match rec_type {
syn::Type::Path(ty) => Some(ty),
_ => {
return syn::parse::Error::new(rec_type.span(), "expected path/type").to_compile_error();
}
}
.unwrap();
let gen = quote! {
#[no_mangle]
pub extern "C" fn #name_ident(precord: *mut #rec_type)
-> ::std::os::raw::c_long {
match #name(unsafe {&mut *precord}) {
Ok(()) => 0,
Err(()) => 1,
}
}
#[no_mangle]
pub fn #reg_func_ident() {
use std::mem;
let fnname = format!("{}\0", stringify!(#name_ident));
unsafe {
registryFunctionAdd(
fnname.as_ptr() as *const _,
Some(mem::transmute::<
extern "C" fn(*mut #rec_type)
-> ::std::os::raw::c_long, unsafe extern "C" fn()
>(#name_ident)));
}
}
#[no_mangle]
pub static mut #pvar_ident: *const ::std::os::raw::c_void =
#reg_func_ident as *const ::std::os::raw::c_void;
#ast
};
gen.into()
}