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
extern crate proc_macro;

use crate::savable::{enumerator, named, unit, unnamed};
use proc_macro::TokenStream;
use std::str::FromStr;
use quote::quote;
use syn::{parse_macro_input, Data, DeriveInput, Fields};

mod savable;

#[proc_macro_derive(Savable, attributes(unsaved))]
pub fn derive_savable(input: TokenStream) -> TokenStream {
    let input = parse_macro_input!(input as DeriveInput);

    let name = input.ident;
    let generics = input.generics;

    match &input.data {
        Data::Struct(s) => match &s.fields {
            Fields::Named(fields) => named(fields, name, generics),
            Fields::Unnamed(fields) => unnamed(fields, name, generics),
            Fields::Unit => unit(name, generics),
        },
        Data::Enum(e) => enumerator(e, name, generics),
        Data::Union(_) => panic!("Deriving Savable for unions is not supported!"),
    }
}

#[proc_macro_attribute]
pub fn try_from_string(_: TokenStream, input: TokenStream) -> TokenStream {
    let input = parse_macro_input!(input as DeriveInput);
    let name = input.ident.clone();

    match &input.data {
        Data::Enum(e) => {
            let values = e.variants.iter().map(|v| {
                let str = v.ident.to_string();
                let alt = str.chars().next().unwrap().to_lowercase().to_string() + &str.chars().skip(1).map(|c| {
                    if c.is_uppercase() {
                        "_".to_string() + &c.to_lowercase().to_string()
                    } else {
                        c.to_string()
                    }
                }).collect::<String>();
                format!("\"{}\" => Ok(Self::{}),\n\"{}\" => Ok(Self::{}),", str, str, alt, str)
            }).map(|s| {
                proc_macro2::TokenStream::from_str(&s).unwrap()
            });
            quote! {
                #input

                impl core::convert::TryFrom<String> for #name {
                    type Error = ();

                    fn try_from(value: String) -> Result<Self, Self::Error> {
                        match value.as_str() {
                            #( #values )*
                            _ => Err(())
                        }
                    }
                }
            }.into()
        },
        _ => panic!("`try_from_string` is only meant for enums")
    }
}