cgp-macro-lib 0.7.0

Context-generic programming core component macros implemented as a library.
Documentation
use alloc::boxed::Box;
use alloc::vec::Vec;

use proc_macro2::Span;
use quote::quote;
use syn::punctuated::Punctuated;
use syn::spanned::Spanned;
use syn::token::{Brace, Comma, Eq, For, Impl, Plus};
use syn::{
    Error, GenericParam, Ident, ImplItem, ImplItemConst, ItemImpl, ItemTrait, Path, TraitItem,
    TypeParamBound, Visibility, parse2,
};

use crate::derive_component::delegate_fn::derive_delegated_fn_impl;
use crate::derive_component::delegate_type::derive_delegate_type_impl;
use crate::parse::{TypeGenerics, parse_is_provider_params};

pub fn derive_provider_impl(
    context_type: &Ident,
    consumer_trait: &ItemTrait,
    provider_trait: &ItemTrait,
    component_name: &Ident,
    component_params: &Punctuated<Ident, Comma>,
) -> syn::Result<ItemImpl> {
    let provider_name = &provider_trait.ident;

    let component_type = Ident::new("__Component__", Span::call_site());

    let provider_generic_args = TypeGenerics::try_from(&provider_trait.generics)?
        .generics
        .params;

    let impl_generics = {
        let mut impl_generics = provider_trait.generics.clone();

        impl_generics
            .params
            .insert(0, parse2(quote!(#component_type))?);

        {
            let is_provider_params = parse_is_provider_params(&consumer_trait.generics)?;

            let mut delegate_constraint: Punctuated<TypeParamBound, Plus> = Punctuated::default();

            delegate_constraint.push(parse2(quote! {
                DelegateComponent< #component_name < #component_params > >
            })?);

            delegate_constraint.push(parse2(quote!(
                IsProviderFor< #component_name < #component_params >, #context_type, ( #is_provider_params ) >
            ))?);

            let provider_constraint: TypeParamBound = parse2(quote! {
                #provider_name < #provider_generic_args >
            })?;

            let where_clause = impl_generics.make_where_clause();

            where_clause.predicates.push(parse2(quote! {
                #component_type : #delegate_constraint
            })?);

            where_clause.predicates.push(parse2(quote! {
                #component_type :: Delegate : #provider_constraint
            })?);
        }

        impl_generics
    };

    let mut impl_items: Vec<ImplItem> = Vec::new();

    for trait_item in provider_trait.items.iter() {
        match &trait_item {
            TraitItem::Fn(trait_fn) => {
                let impl_fn =
                    derive_delegated_fn_impl(&trait_fn.sig, &quote!(#component_type :: Delegate))?;

                impl_items.push(ImplItem::Fn(impl_fn))
            }
            TraitItem::Type(trait_type) => {
                let type_name = &trait_type.ident;

                let type_generics = {
                    let mut type_generics = trait_type.generics.clone();
                    type_generics.where_clause = None;

                    for param in &mut type_generics.params {
                        if let GenericParam::Type(type_param) = param {
                            type_param.bounds.clear();
                        }
                    }

                    type_generics
                };

                let impl_type = derive_delegate_type_impl(
                    trait_type,
                    parse2(quote!(
                        < #component_type :: Delegate as #provider_name < #provider_generic_args > > :: #type_name #type_generics
                    ))?,
                );

                impl_items.push(ImplItem::Type(impl_type));
            }
            TraitItem::Const(trait_item_const) => {
                let const_ident = &trait_item_const.ident;
                let (_, type_generics, _) = trait_item_const.generics.split_for_impl();

                let impl_expr = parse2(quote! {
                    < #component_type :: Delegate as #provider_name < #provider_generic_args > > :: #const_ident #type_generics
                })?;

                let impl_item_const = ImplItemConst {
                    attrs: trait_item_const.attrs.clone(),
                    vis: Visibility::Inherited,
                    defaultness: None,
                    const_token: trait_item_const.const_token,
                    ident: trait_item_const.ident.clone(),
                    generics: trait_item_const.generics.clone(),
                    colon_token: trait_item_const.colon_token,
                    ty: trait_item_const.ty.clone(),
                    eq_token: Eq(Span::call_site()),
                    expr: impl_expr,
                    semi_token: trait_item_const.semi_token,
                };

                impl_items.push(ImplItem::Const(impl_item_const));
            }
            _ => {
                return Err(Error::new(
                    trait_item.span(),
                    format!("unsupported trait item: {trait_item:?}"),
                ));
            }
        }
    }

    let trait_path: Path = parse2(quote!( #provider_name < #provider_generic_args > ))?;

    let item = ItemImpl {
        attrs: provider_trait.attrs.clone(),
        defaultness: None,
        unsafety: provider_trait.unsafety,
        impl_token: Impl::default(),
        generics: impl_generics,
        trait_: Some((None, trait_path, For::default())),
        self_ty: Box::new(parse2(quote!(#component_type))?),
        brace_token: Brace::default(),
        items: impl_items,
    };

    Ok(item)
}