1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123

//! `#[derive(ToTokens)]` proc macro implementation.

use proc_macro2::{Span, TokenStream};
use quote::quote;
use syn::{
    parse::{Parse, ParseStream},
    token,
};

use crate::{
    parse::{
        attrs::{dedup, field::TryMerge as _, kind},
        err,
        ext::ParseBuffer as _,
    },
    ParseAttrs,
};

/// Name of the derived trait.
const TRAIT_NAME: &str = "ToTokens";

/// Name of the helper attribute of this `proc_macro_derive`.
const ATTR_NAME: &str = "to_tokens";

/// Expands `#[derive(ToTokens)]` proc macro.
///
/// # Errors
///
/// - If the proc macro isn't applied to a struct or an enum.
/// - If parsing `#[to_tokens]` helper attribute fails.
pub fn derive(input: &syn::DeriveInput) -> syn::Result<TokenStream> {
    if !matches!(&input.data, syn::Data::Enum(_) | syn::Data::Struct(_)) {
        return Err(syn::Error::new_spanned(
            input,
            format!("only structs and enums can derive {}", TRAIT_NAME),
        ));
    }

    let attrs = Attrs::parse_attrs(ATTR_NAME, input)?;

    let ty = &input.ident;
    let (impl_generics, ty_generics, where_clause) =
        input.generics.split_for_impl();

    let impls = attrs.append.iter().map(|method| {
        quote! {
            ::synthez::quote::ToTokens::to_tokens(&self.#method(), out);
        }
    });

    Ok(quote! {
        #[automatically_derived]
        impl #impl_generics ::synthez::quote::ToTokens for #ty #ty_generics
             #where_clause
        {
            fn to_tokens(
                &self,
                out: &mut ::synthez::proc_macro2::TokenStream,
            ) {
                #( #impls )*
            }
        }
    })
}

/// Representation of a `#[to_tokens]` attribute used along with a
/// `#[derive(ToTokens)]` proc macro on a top-level definition.
#[derive(Debug, Default)]
struct Attrs {
    /// Methods to be called in the generated [`ToTokens`] implementation.
    ///
    /// [`ToTokens`]: quote::ToTokens
    // #[parse(value)]
    append: Vec<syn::Ident>,
}

impl Parse for Attrs {
    fn parse(input: ParseStream<'_>) -> syn::Result<Self> {
        let mut out = Self::default();
        while !input.is_empty() {
            let ident = input.fork().parse_any_ident()?;
            match ident.to_string().as_str() {
                "append" => {
                    input.skip_any_ident()?;
                    for v in input.parse_eq_or_wrapped_and_punctuated::<
                        syn::Ident, token::Paren, token::Comma,
                    >()? {
                        out.append.try_merge::<kind::Value, dedup::Unique>(v)?;
                    }
                }
                name => {
                    return Err(err::unknown_attr_arg(&ident, name));
                }
            }
            if input.try_parse::<token::Comma>()?.is_none() && !input.is_empty()
            {
                return Err(err::expected_followed_by_comma(&ident));
            }
        }
        Ok(out)
    }
}

impl ParseAttrs for Attrs {
    fn try_merge(mut self, another: Self) -> syn::Result<Self> {
        self.append
            .try_merge_self::<kind::Value, dedup::Unique>(another.append)?;
        Ok(self)
    }

    fn validate(&self, attr_name: &str, item_span: Span) -> syn::Result<()> {
        if self.append.is_empty() {
            return Err(syn::Error::new(
                item_span,
                format!(
                    "`#[{}(append(<function>))]` attribute is expected",
                    attr_name,
                ),
            ));
        }
        Ok(())
    }
}