embedded-registers-derive 0.9.8

//! This crate provides a procedural macro for effortless definitions of registers
//! in embedded device drivers.
//!
//! Currently, embedded-registers requires you to use `#![feature(generic_arg_infer)]`.
//!
//! # Attribute macro
//!
//! Registers are defined by adding `#[register(...)]` to the definition of a bondrewd bitfield.
//! As a short reminder, bondrewd is another proc macro that allows you to define a bitfield structure,
//! which is very handy when dealing with registers, where multiple values are often tightly packed bit-on-bit.
//!
//! The register attribute macro supports the following arguments:
//!
//! <table>
//!   <tr>
//!     <td>address</td>
//!     <td>The virtual address associated to the register.</td>
//!   </tr>
//!   <tr>
//!     <td>read</td>
//!     <td>Add this if the register should be readable</td>
//!   </tr>
//!   <tr>
//!     <td>write</td>
//!     <td>Add this if the register should be writeable</td>
//!   </tr>
//! </table>
//!
//! Adding this attribute to a bondrewd struct `Foo` will result in two types being defined:
//! - `Foo` will become the register, essentially a byte array with the correct size that provides
//!   getter and setter functions for the individual fields.
//! - `FooBitfield` will become the underlying bondrewd bitfield, which may be used to construct
//!   a register from scratch, or can be obtained via `Foo::read_all` if you want to unpack all values.
//!
//! This has the advantage that reading a register incurs no additional memory and CPU cost to unpack all
//! values of the bitfield. You only pay for the members you actually access.
//!
//! # Simple Example
//!
//! This simple example defines the `DeviceId` register of an MCP9808. It has
//! the virtual address `0b111 (0x7)`, uses big endian byte order with the first
//! member of the struct positioned at the most significant bit, is 2 bytes in size
//! and is read-only:
//!
//! ```
//! #![feature(generic_arg_infer)]
//! use embedded_registers::{register, i2c::{I2cDevice, codecs::OneByteRegAddrCodec}, RegisterInterface, ReadableRegister};
//!
//! #[register(address = 0b111, mode = "r")]
//! #[bondrewd(read_from = "msb0", default_endianness = "be", enforce_bytes = 2)]
//! pub struct DeviceId {
//!     device_id: u8,
//!     revision: u8,
//! }
//!
//! // The register may now be read from an I2C bus using sync or async operations:
//! # async fn test<I>(mut i2c: I) -> Result<(), I::Error>
//! # where
//! #   I: embedded_hal_async::i2c::I2c + embedded_hal_async::i2c::ErrorType
//! # {
//! // Create new I2cDevice with bus, address, codec
//! let mut dev = I2cDevice::new(i2c, 0x24, OneByteRegAddrCodec::default());
//! let reg = dev.read_register::<DeviceId>().await?;
//! // sync: let reg = DeviceId::read_i2c_blocking(&mut i2c, address);
//! # Ok(())
//! # }
//! ```
//!
//! # Complex Example
//!
//! A more complex example may involve adding your own Bondrewd-capable enums.
//! We also make sure to annotate the correct fields with `#[default]` to allow
//! reconstructing the power-up defaults easily. Have a look at this excerpt
//! of the Configuration register from the MCP9808:
//!
//! ```
//! #![feature(generic_arg_infer)]
//! # use defmt::{info, Format};
//! use embedded_registers::{register, i2c::{I2cDevice, codecs::OneByteRegAddrCodec}, RegisterInterface, ReadableRegister, WritableRegister};
//! use bondrewd::BitfieldEnum;
//!
//! # #[allow(non_camel_case_types)]
//! #[derive(BitfieldEnum, Clone, Default, PartialEq, Eq, Debug, Format)]
//! #[bondrewd_enum(u8)]
//! pub enum Hysteresis {
//!     #[default]
//!     Deg_0_0C = 0b00,
//!     Deg_1_5C = 0b01,
//!     Deg_3_0C = 0b10,
//!     Deg_6_0C = 0b11,
//! }
//!
//! #[derive(BitfieldEnum, Clone, Default, PartialEq, Eq, Debug, Format)]
//! #[bondrewd_enum(u8)]
//! pub enum ShutdownMode {
//!     #[default]
//!     Continuous = 0,
//!     Shutdown = 1,
//! }
//!
//! #[register(address = 0b001, mode = "rw")]
//! #[bondrewd(read_from = "msb0", default_endianness = "be", enforce_bytes = 2)]
//! pub struct Config {
//!     // padding
//!     #[bondrewd(bit_length = 5, reserve)]
//!     #[allow(dead_code)]
//!     reserved: u8,
//!
//!     #[bondrewd(enum_primitive = "u8", bit_length = 2)]
//!     pub hysteresis: Hysteresis,
//!     #[bondrewd(enum_primitive = "u8", bit_length = 1)]
//!     pub shutdown_mode: ShutdownMode,
//!
//!     // ... all 16 bits must be filled
//!     # #[bondrewd(bit_length = 8, reserve)]
//!     # #[allow(dead_code)]
//!     # reserved2: u8,
//! }
//!
//! # async fn test<I>(mut i2c: I) -> Result<(), I::Error>
//! # where
//! #   I: embedded_hal_async::i2c::I2c + embedded_hal_async::i2c::ErrorType
//! # {
//! # let mut dev = I2cDevice::new(i2c, 0x24, OneByteRegAddrCodec::default());
//! // This now allows us to read and write the register, while only
//! // unpacking the fields we require:
//! let mut reg = dev.read_register::<Config>().await?;
//! info!("previous shutdown mode: {}", reg.read_shutdown_mode());
//! reg.write_shutdown_mode(ShutdownMode::Shutdown);
//! dev.write_register(&reg).await?;
//!
//! // If you want to get the full decoded bitfield, you can use either `read_all`
//! // or `.into()`. If you need to unpack all fields anyway, this might be
//! // more convenient as it allows you to access the bitfield members more ergonomically.
//! //let bf: ConfigBitfield = reg.into();
//! let mut bf = reg.read_all();
//! info!("previous shutdown mode: {}", bf.shutdown_mode);
//! bf.shutdown_mode = ShutdownMode::Shutdown;
//! reg.write_all(bf);
//! # Ok(())
//! # }
//! ```

use darling::ast::NestedMeta;
use darling::FromMeta;
use proc_macro as pc;
use proc_macro2::TokenStream;
use quote::{format_ident, quote, ToTokens, TokenStreamExt};
use syn::{spanned::Spanned, Expr, Type};

#[derive(Debug, FromMeta)]
#[darling(and_then = "Self::validate_mode")]
struct RegisterArgs {
    /// The address of the register
    address: Expr,
    /// The register mode (one of "r", "w", "rw")
    #[darling(default)]
    mode: String,
    /// The default SPI codec for this register
    #[darling(default)]
    spi_codec: Option<Type>,
    /// The default I2C codec for this register
    #[darling(default)]
    i2c_codec: Option<Type>,
}

impl RegisterArgs {
    fn validate_mode(self) -> darling::Result<Self> {
        match self.mode.as_str() {
            "r" | "w" | "rw" => Ok(self),
            _ => Err(darling::Error::custom("Unknown mode '{}'").with_span(&self.mode)),
        }
    }
}

#[proc_macro_attribute]
pub fn register(args: pc::TokenStream, input: pc::TokenStream) -> pc::TokenStream {
    match register_impl(args.into(), input.into()) {
        Ok(result) => result.into(),
        Err(e) => e.into_compile_error().into(),
    }
}

fn register_impl(args: TokenStream, input: TokenStream) -> syn::Result<TokenStream> {
    let args_span = args.span();
    let args = RegisterArgs::from_list(&NestedMeta::parse_meta_list(args)?)?;

    let input = syn::parse2::<syn::ItemStruct>(input)?;
    if !input.attrs.iter().any(|x| x.path().is_ident("bondrewd")) {
        return Err(syn::Error::new(
            args_span,
            "A register definition must also include a #[bondrewd()] bitfield spec",
        ));
    }

    let ident = input.ident;
    let debug_format_str = format!("{} ({{:?}}) => {{:?}}", ident);
    let vis = input.vis;
    let fields = input.fields.clone();
    let attrs: TokenStream = input.attrs.iter().map(ToTokens::to_token_stream).collect();
    let docattrs: TokenStream = input
        .attrs
        .iter()
        .filter(|x| x.path().is_ident("doc"))
        .map(ToTokens::to_token_stream)
        .collect();
    let bitfield_ident = format_ident!("{}Bitfield", ident);

    let mut forward_fns = quote! {};
    for field in input.fields {
        let type_ident = field.ty;
        let field_name = field
            .ident
            .ok_or_else(|| syn::Error::new(args_span, "A field contains a field without an identifier"))?;
        let field_docattrs: TokenStream = field
            .attrs
            .iter()
            .filter(|x| x.path().is_ident("doc"))
            .map(ToTokens::to_token_stream)
            .collect();

        let read_field_name = format_ident!("read_{field_name}");
        let read_comment = format!("Retrieves the value of [`{bitfield_ident}::{field_name}`] from this register:");
        let write_field_name = format_ident!("write_{field_name}");
        let write_comment = format!("Updates the value of [`{bitfield_ident}::{field_name}`] in this register:");
        let with_field_name = format_ident!("with_{field_name}");
        let with_comment =
            format!("Updates the value of [`{bitfield_ident}::{field_name}`] in this register and allows chaining:");

        forward_fns = quote! {
            #forward_fns

            #[doc = #read_comment]
            #[doc = ""]
            #field_docattrs
            #[inline]
            pub fn #read_field_name(&self) -> #type_ident {
                #bitfield_ident::#read_field_name(&self.data)
            }

            #[doc = #write_comment]
            #[doc = ""]
            #field_docattrs
            #[inline]
            pub fn #write_field_name(&mut self, #field_name: #type_ident) {
                #bitfield_ident::#write_field_name(&mut self.data, #field_name)
            }

            #[doc = #with_comment]
            #[doc = ""]
            #field_docattrs
            #[inline]
            pub fn #with_field_name(mut self, #field_name: #type_ident) -> Self {
                #bitfield_ident::#write_field_name(&mut self.data, #field_name);
                self
            }
        };
    }

    let read_all_comment = format!("Unpack all fields and return them as a [`{bitfield_ident}`]. If you don't need all fields, this is more expensive than just using the appropriate `read_*` functions directly.");
    let write_all_comment = format!("Pack all fields in the given [`{bitfield_ident}`] representation. If you only want to write some fields, this is more expensive than just using the appropriate `write_*` functions directly.");
    let address = args.address;

    let is_read = matches!(args.mode.as_str(), "r" | "rw");
    let is_write = matches!(args.mode.as_str(), "w" | "rw");

    let spi_codec = args
        .spi_codec
        .unwrap_or_else(|| syn::parse_str::<syn::Type>("embedded_registers::spi::codecs::NoCodec").unwrap());

    let i2c_codec = args
        .i2c_codec
        .unwrap_or_else(|| syn::parse_str::<syn::Type>("embedded_registers::i2c::codecs::NoCodec").unwrap());

    let mut output = quote! {
        #[derive(bondrewd::Bitfields, Clone, Default, PartialEq, Eq, core::fmt::Debug, defmt::Format)]
        #attrs
        #vis struct #bitfield_ident
        #fields

        #[derive(Copy, Clone, PartialEq, Eq, bytemuck::Pod, bytemuck::Zeroable)]
        #[repr(transparent)]
        #docattrs
        pub struct #ident {
            pub data: [u8; <#bitfield_ident as bondrewd::Bitfields<_>>::BYTE_SIZE],
        }

        impl #ident {
            #forward_fns

            #[inline]
            #[doc = #write_all_comment]
            pub fn new(value: #bitfield_ident) -> Self {
                use bondrewd::Bitfields;
                Self {
                    data: value.into_bytes(),
                }
            }

            #[inline]
            #[doc = #read_all_comment]
            pub fn read_all(&self) -> #bitfield_ident {
                use bondrewd::Bitfields;
                #bitfield_ident::from_bytes(self.data)
            }

            #[inline]
            #[doc = #write_all_comment]
            pub fn write_all(&mut self, value: #bitfield_ident) {
                use bondrewd::Bitfields;
                self.data = value.into_bytes();
            }
        }

        impl Default for #ident {
            fn default() -> Self {
                use bondrewd::Bitfields;
                Self {
                    data: #bitfield_ident::default().into_bytes(),
                }
            }
        }

        impl core::fmt::Debug for #ident {
            fn fmt(&self, f: &mut core::fmt::Formatter<'_>) -> core::fmt::Result {
                write!(
                    f,
                    #debug_format_str,
                    self.data,
                    #bitfield_ident::from(self)
                )
            }
        }

        impl defmt::Format for #ident {
            fn format(&self, f: defmt::Formatter) {
                defmt::write!(
                    f,
                    #debug_format_str,
                    self.data,
                    #bitfield_ident::from(self)
                )
            }
        }

        impl embedded_registers::Register for #ident {
            type Bitfield = #bitfield_ident;
            type SpiCodec = #spi_codec;
            type I2cCodec = #i2c_codec;

            const REGISTER_SIZE: usize = <#bitfield_ident as bondrewd::Bitfields<_>>::BYTE_SIZE;
            const ADDRESS: u64 = #address;

            #[inline]
            fn data(&self) -> &[u8] {
                &self.data
            }

            #[inline]
            fn data_mut(&mut self) -> &mut [u8] {
                &mut self.data
            }
        }

        impl AsRef<#bitfield_ident> for #bitfield_ident {
            #[inline]
            fn as_ref(&self) -> &#bitfield_ident {
                self
            }
        }

        impl AsRef<#ident> for #ident {
            #[inline]
            fn as_ref(&self) -> &#ident {
                self
            }
        }

        impl From<&#ident> for #bitfield_ident {
            #[inline]
            fn from(val: &#ident) -> Self {
                use bondrewd::Bitfields;
                #bitfield_ident::from_bytes(val.data)
            }
        }

        impl From<&#bitfield_ident> for #ident {
            #[inline]
            fn from(value: &#bitfield_ident) -> Self {
                use bondrewd::Bitfields;
                Self {
                    data: value.clone().into_bytes(),
                }
            }
        }
    };

    if is_read {
        output.append_all(quote! {
            impl embedded_registers::ReadableRegister for #ident {}
        });
    }

    if is_write {
        output.append_all(quote! {
            impl embedded_registers::WritableRegister for #ident {}
        });
    }

    Ok(output)
}