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
124
125

#![crate_type = "proc-macro"]
#![feature(proc_macro_hygiene, proc_macro_quote)]

extern crate pest;
#[macro_use]
extern crate pest_derive;
extern crate proc_macro;

use parser::{Parser as ViewParser, Rule};
use pest::iterators::{Pair, Pairs};
use pest::Parser;
use proc_macro::{quote, Literal, TokenStream, TokenTree};
use std::iter::FromIterator;
use std::str::FromStr;

mod parser {
    #[derive(Parser)]
    #[grammar = "view.pest"]
    pub struct Parser;
}

fn get_token_stream(mut tag_pairs: Pairs<Rule>) -> TokenStream {
    let name = tag_pairs.next().expect("name").as_str();
    let _name = TokenTree::Literal(Literal::string(name));

    let mut attributes = vec![];
    let mut handlers = vec![];

    let vec: Vec<Pair<Rule>> = tag_pairs.next().expect("attributes").into_inner().collect();
    for i in 0..(vec.len() / 2) {
        let j = i * 2;
        let k = &vec[j].as_str();
        let v = &vec[j + 1];

        let _v = match v.as_rule() {
            Rule::embedded => {
                let mut _embedded = TokenStream::from_str(v.as_str()).unwrap();
                quote!($_embedded.into())
            }
            Rule::string => {
                let _v = TokenTree::Literal(Literal::string(v.as_str()));
                quote! { $_v.into() }
            }
            Rule::bool => {
                let _v = TokenStream::from_str(v.as_str()).unwrap();
                quote! { $_v.into() }
            }
            _ => unreachable!(),
        };

        if k.starts_with("on") {
            let (_, k) = k.split_at(2);
            let _k = TokenTree::Literal(Literal::string(k));
            handlers.push(quote! {
                ($_k.to_string(), _squark::handler($_v)),
            });
            continue;
        }

        let _k = TokenTree::Literal(Literal::string(k));
        attributes.push(quote! {
            ($_k.to_string(), $_v),
        });
    }
    let _attributes = TokenStream::from_iter(attributes);
    let _handlers = TokenStream::from_iter(handlers);

    let mut children = vec![];
    if let Some(children_pair) = tag_pairs.next() {
        for p in children_pair.into_inner() {
            let token = match p.as_rule() {
                Rule::tag => {
                    let _tag = get_token_stream(p.into_inner());
                    quote! {
                        _squark::Child::from($_tag),
                    }
                }
                Rule::text => {
                    let _text = TokenTree::Literal(Literal::string(p.as_str()));
                    quote! {
                        $_text.into(),
                    }
                }
                Rule::embedded => {
                    let _embedded = TokenStream::from_str(p.as_str()).unwrap();
                    quote! {
                        {$_embedded}.into(),
                    }
                }
                _ => unreachable!(),
            };
            children.push(token);
        }
    }
    let _children = TokenStream::from_iter(children);

    quote! {
        _squark::View::new(
            $_name.to_string(),
            vec![
                $_attributes
            ],
            vec![
                $_handlers
            ],
            vec![
                $_children
            ]
        )
    }
}

#[proc_macro]
pub fn view(arg: TokenStream) -> TokenStream {
    let s = arg.to_string();
    let mut pairs = ViewParser::parse(Rule::view, &s).unwrap();
    let _token = get_token_stream(pairs.next().unwrap().into_inner());

    quote! {
        {
            extern crate squark as _squark;
            $_token
        }
    }
}