odra-macros 2.6.0

Macros for Odra-based smart contracts.
Documentation
use quote::ToTokens;
use syn::{parse_quote, punctuated::Punctuated};

pub fn new_runtime_args() -> syn::Expr {
    let ty = super::ty::runtime_args();
    parse_quote!(#ty::new())
}

pub fn u512_zero() -> syn::Expr {
    let ty = super::ty::u512();
    parse_quote!(#ty::zero())
}

pub fn parse_bytes(data_ident: &syn::Ident) -> syn::Expr {
    let ty = super::ty::to_bytes();
    let ty_err = super::ty::odra_error();
    parse_quote!(#ty::to_bytes(&#data_ident).map(Into::into).map_err(|err| #ty_err::ExecutionError(err.into())))
}

pub fn module_component_instance(ty: &syn::Type, env_ident: &syn::Ident, idx: u8) -> syn::Expr {
    let rc = rc_clone(env_ident);
    let component = super::ty::module_component();
    parse_quote!(<#ty as #component>::instance(#rc, #idx))
}

fn rc_clone(ident: &syn::Ident) -> syn::Expr {
    parse_quote!(odra::prelude::Rc::clone(&#ident))
}

pub fn new_entry_points() -> syn::Expr {
    let ty = super::ty::entry_points();
    parse_quote!(#ty::new())
}

pub fn new_parameter(name: String, ty: syn::Type) -> syn::Expr {
    let ty = super::ty::unreferenced_ty(&ty);

    parse_quote!(odra::args::parameter::<#ty>(#name))
}

pub fn as_cl_type(ty: &syn::Type) -> syn::Expr {
    let ty = super::ty::unreferenced_ty(ty);
    let ty_cl_typed = super::ty::cl_typed();
    let ty = super::syn::as_casted_ty_stream(&ty, ty_cl_typed);
    parse_quote!(#ty::cl_type())
}

pub fn unit_cl_type() -> syn::Expr {
    let ty_cl_typed = super::ty::cl_typed();
    parse_quote!(<() as #ty_cl_typed>::cl_type())
}

pub fn schemas(events: &syn::Expr) -> syn::Expr {
    let ty = super::ty::schemas();
    parse_quote!(#ty(#events))
}

pub fn new_wasm_contract_env() -> syn::Expr {
    parse_quote!(odra::odra_casper_wasm_env::WasmContractEnv::new_env())
}

pub fn into_event(ty: &syn::Type) -> syn::Expr {
    parse_quote!(<#ty as odra::contract_def::IntoEvent>::into_event())
}

pub fn events(ty: &syn::Type) -> syn::Expr {
    let has_events_ty = super::ty::has_events();
    parse_quote!(<#ty as #has_events_ty>::events())
}

pub fn event_schemas(ty: &syn::Type) -> syn::Expr {
    let has_events_ty = super::ty::has_events();
    parse_quote!(<#ty as #has_events_ty>::event_schemas())
}

pub fn event_instance_name(ty: &syn::Type) -> syn::Expr {
    let event_instance_ty = super::ty::event_instance();
    parse_quote!(<#ty as #event_instance_ty>::name())
}

pub fn event_instance_schema(ty: &syn::Type) -> syn::Expr {
    let event_instance_ty = super::ty::event_instance();
    parse_quote!(<#ty as #event_instance_ty>::schema())
}
pub fn new_blueprint(ident: &syn::Ident) -> syn::Expr {
    let ty = super::ty::contract_blueprint();
    parse_quote!(#ty::new::<#ident>())
}

pub fn string_from(string: String) -> syn::Expr {
    let ty = super::ty::string();
    parse_quote!(#ty::from(#string))
}

pub fn failable_from_bytes(arg_ident: &syn::Ident) -> syn::Expr {
    let ty = super::ty::from_bytes();
    let fn_ident = super::ident::from_bytes();
    parse_quote!(#ty::#fn_ident(#arg_ident)?)
}

pub fn serialized_length<T: ToTokens>(caller: &T) -> syn::Expr {
    let fn_ident = super::ident::serialized_length();
    parse_quote!(#caller.#fn_ident())
}

pub fn u8_serialized_len() -> syn::Expr {
    parse_quote!(odra::casper_types::bytesrepr::U8_SERIALIZED_LENGTH)
}

pub fn failable_to_bytes<T: ToTokens>(caller: &T) -> syn::Expr {
    let fn_ident = super::ident::to_bytes();
    let ty = super::ty::to_bytes();
    parse_quote!(#ty::#fn_ident(&#caller)?)
}

pub fn serialize_enum() -> syn::Expr {
    parse_quote!(Ok(odra::prelude::vec![self.clone() as u8]))
}

pub fn empty_vec() -> syn::Expr {
    let ty = super::ty::vec();
    parse_quote!(#ty::new())
}

pub fn empty_btree_map() -> syn::Expr {
    let ty = super::ty::btree_map();
    parse_quote!(#ty::new())
}

pub fn vec<T: ToTokens>(content: T) -> syn::Expr {
    parse_quote!(odra::prelude::vec![#content])
}

pub fn vec_try_into<T: ToTokens>(content: T) -> syn::Expr {
    parse_quote!(odra::prelude::vec![#content]
        .into_iter()
        .map(TryInto::try_into)
        .collect::<Result<_, _>>()
        .unwrap_or_default())
}

pub fn user_error(error: &syn::Ident) -> syn::Expr {
    let ty = super::ty::odra_error();
    parse_quote!(#ty::user(#error as u16))
}

pub fn btree_from_iter<T: ToTokens>(expr: &T) -> syn::Expr {
    parse_quote!(odra::prelude::BTreeMap::from_iter(#expr))
}

pub fn default() -> syn::Expr {
    parse_quote!(Default::default())
}

pub fn new_entry_point(name: String, args: Vec<syn::PatType>, is_payable: bool) -> syn::Expr {
    let ty = super::ty::odra_entry_point();
    let name = string_from(name);
    let args_stream = args
        .iter()
        .map(new_entry_point_arg)
        .collect::<Punctuated<_, syn::Token![,]>>();
    let args_vec = vec(args_stream);
    if is_payable {
        parse_quote!(#ty::new_payable(#name, #args_vec))
    } else {
        parse_quote!(#ty::new(#name, #args_vec))
    }
}

fn new_entry_point_arg(arg: &syn::PatType) -> syn::Expr {
    let ty = super::ty::odra_entry_point_arg();
    let arg_ty = super::ty::unreferenced_ty(&arg.ty);
    let name = string_from(arg.pat.to_token_stream().to_string());
    parse_quote!(#ty::new::<#arg_ty>(#name))
}

pub fn into_arg(ty: syn::Type, ident: String) -> syn::Expr {
    parse_quote!(odra::args::odra_argument::<#ty>(#ident))
}
pub trait IntoExpr {
    fn into_expr(self) -> syn::Expr;
}

impl IntoExpr for syn::Ident {
    fn into_expr(self) -> syn::Expr {
        parse_quote!(#self)
    }
}

pub fn constructor_ep(args_expr: syn::Expr) -> syn::Expr {
    parse_quote!(odra::entry_point::EntryPoint::Constructor {
        args: #args_expr
    })
}

pub fn upgrader_ep(args_expr: syn::Expr) -> syn::Expr {
    parse_quote!(odra::entry_point::EntryPoint::Upgrader {
        args: #args_expr
    })
}

pub fn regular_ep(
    name: String,
    args_expr: syn::Expr,
    ret_ty_expr: syn::Expr,
    is_payable: bool,
    is_non_reentrant: bool
) -> syn::Expr {
    parse_quote!(odra::entry_point::EntryPoint::Regular {
        name: #name,
        args: #args_expr,
        ret_ty: #ret_ty_expr,
        is_non_reentrant: #is_non_reentrant,
        is_payable: #is_payable
    })
}

pub fn factory_ep(args_expr: syn::Expr) -> syn::Expr {
    parse_quote!(odra::entry_point::EntryPoint::Factory {
        args: #args_expr,
    })
}

pub fn factory_upgrade_ep(args_expr: syn::Expr) -> syn::Expr {
    parse_quote!(odra::entry_point::EntryPoint::FactoryUpgrade {
        args: #args_expr,
    })
}

pub fn factory_batch_upgrade_ep() -> syn::Expr {
    parse_quote!(odra::entry_point::EntryPoint::FactoryBatchUpgrade)
}

pub fn template_ep(name: String, args_expr: syn::Expr, ret_ty_expr: syn::Expr) -> syn::Expr {
    parse_quote!(odra::entry_point::EntryPoint::Template {
        name: #name,
        args: #args_expr,
        ret_ty: #ret_ty_expr
    })
}