getopts-macro 0.1.1

Using macros to concisely define the getopts
Documentation 
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
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176

#![no_std]
#![doc = include_str!("../README.md")]

pub use getopts;

/// Quick create [`getopts::Options`]
///
/// - `*` is require multi
/// - `+` is require one
/// - `=` is has arg
/// - `?=` is has optional arg
///
/// # Examples
/// ```
/// use getopts_macro::{
///     getopts_options,
///     getopts::ParsingStyle,
/// };
///
/// let _options = getopts_options! {
///     -f --file=FILE              "input from file";
///     -p --parse-config*=CONFIG   "parse config";
///     -h --help*                  "help messages";
///     .parsing_style(ParsingStyle::StopAtFirstFree)
/// };
/// ```
#[macro_export]
macro_rules! getopts_options {
    (-$($t:tt)*) => {{
        let mut options = $crate::getopts::Options::new();
        $crate::getopts_options!(@with(options) -$($t)*);
        options
    }};
    (@long $first:ident $($rest:ident)*) => {
        ::core::concat!(
            ::core::stringify!($first),
            $(
                "-",
                ::core::stringify!($rest),
            )*
        )
    };

    (@with($o:ident)) => {};
    (@with($o:ident) . $($t:tt)+) => {
        $o.$($t)+;
    };
    (@with($o:ident) $t1:tt $t2:tt $t3:tt $t4:tt $t5:tt $desc:tt; $($rest:tt)*) => {
        $crate::getopts_options!(@impl($o, $desc) $t1 $t2 $t3 $t4 $t5);
        $crate::getopts_options!(@with($o) $($rest)*);
    };
    (@with($o:ident) $t1:tt $t2:tt $t3:tt $t4:tt $t5:tt $t6:tt $desc:tt; $($rest:tt)*) => {
        $crate::getopts_options!(@impl($o, $desc) $t1 $t2 $t3 $t4 $t5 $t6);
        $crate::getopts_options!(@with($o) $($rest)*);
    };
    (@with($o:ident) $t1:tt $t2:tt $t3:tt $t4:tt $t5:tt $t6:tt $t7:tt $desc:tt; $($rest:tt)*) => {
        $crate::getopts_options!(@impl($o, $desc) $t1 $t2 $t3 $t4 $t5 $t6 $t7);
        $crate::getopts_options!(@with($o) $($rest)*);
    };
    (@with($o:ident) $t1:tt $t2:tt $t3:tt $t4:tt $t5:tt $t6:tt $t7:tt $t8:tt $desc:tt; $($rest:tt)*) => {
        $crate::getopts_options!(@impl($o, $desc) $t1 $t2 $t3 $t4 $t5 $t6 $t7 $t8);
        $crate::getopts_options!(@with($o) $($rest)*);
    };
    (@with($o:ident) $t1:tt $t2:tt $t3:tt $t4:tt $t5:tt $t6:tt $t7:tt $t8:tt $t9:tt $desc:tt; $($rest:tt)*) => {
        $crate::getopts_options!(@impl($o, $desc) $t1 $t2 $t3 $t4 $t5 $t6 $t7 $t8 $t9);
        $crate::getopts_options!(@with($o) $($rest)*);
    };
    (@with($o:ident) $t1:tt $t2:tt $t3:tt $t4:tt $t5:tt $t6:tt $t7:tt $t8:tt $t9:tt $t10:tt $desc:tt; $($rest:tt)*) => {
        $crate::getopts_options!(@impl($o, $desc) $t1 $t2 $t3 $t4 $t5 $t6 $t7 $t8 $t9 $t10);
        $crate::getopts_options!(@with($o) $($rest)*);
    };
    (@with($o:ident) $t1:tt $t2:tt $t3:tt $t4:tt $t5:tt $t6:tt $t7:tt $t8:tt $t9:tt $t10:tt $t11:tt $desc:tt; $($rest:tt)*) => {
        $crate::getopts_options!(@impl($o, $desc) $t1 $t2 $t3 $t4 $t5 $t6 $t7 $t8 $t9 $t10 $t11);
        $crate::getopts_options!(@with($o) $($rest)*);
    };
    (@with($o:ident) $t1:tt $t2:tt $t3:tt $t4:tt $t5:tt $t6:tt $t7:tt $t8:tt $t9:tt $t10:tt $t11:tt $t12:tt $desc:tt; $($rest:tt)*) => {
        $crate::getopts_options!(@impl($o, $desc) $t1 $t2 $t3 $t4 $t5 $t6 $t7 $t8 $t9 $t10 $t11 $t12);
        $crate::getopts_options!(@with($o) $($rest)*);
    };
    (@with($o:ident) $t1:tt $t2:tt $t3:tt $t4:tt $t5:tt $t6:tt $t7:tt $t8:tt $t9:tt $t10:tt $t11:tt $t12:tt $t13:tt $desc:tt; $($rest:tt)*) => {
        $crate::getopts_options!(@impl($o, $desc) $t1 $t2 $t3 $t4 $t5 $t6 $t7 $t8 $t9 $t10 $t11 $t12 $t13);
        $crate::getopts_options!(@with($o) $($rest)*);
    };
    (@with($o:ident) $t1:tt $t2:tt $t3:tt $t4:tt $t5:tt $t6:tt $t7:tt $t8:tt $t9:tt $t10:tt $t11:tt $t12:tt $t13:tt $t14:tt $desc:tt; $($rest:tt)*) => {
        $crate::getopts_options!(@impl($o, $desc) $t1 $t2 $t3 $t4 $t5 $t6 $t7 $t8 $t9 $t10 $t11 $t12 $t13 $t14);
        $crate::getopts_options!(@with($o) $($rest)*);
    };
    (@with($o:ident) $t1:tt $t2:tt $t3:tt $t4:tt $t5:tt $t6:tt $t7:tt $t8:tt $t9:tt $t10:tt $t11:tt $t12:tt $t13:tt $t14:tt $t15:tt $desc:tt; $($rest:tt)*) => {
        $crate::getopts_options!(@impl($o, $desc) $t1 $t2 $t3 $t4 $t5 $t6 $t7 $t8 $t9 $t10 $t11 $t12 $t13 $t14 $t15);
        $crate::getopts_options!(@with($o) $($rest)*);
    };
    (@with($o:ident) $t1:tt $t2:tt $t3:tt $t4:tt $t5:tt $t6:tt $t7:tt $t8:tt $t9:tt $t10:tt $t11:tt $t12:tt $t13:tt $t14:tt $t15:tt $t16:tt $desc:tt; $($rest:tt)*) => {
        $crate::getopts_options!(@impl($o, $desc) $t1 $t2 $t3 $t4 $t5 $t6 $t7 $t8 $t9 $t10 $t11 $t12 $t13 $t14 $t15 $t16);
        $crate::getopts_options!(@with($o) $($rest)*);
    };
    (@with($o:ident) $t1:tt $t2:tt $t3:tt $t4:tt $t5:tt $t6:tt $t7:tt $t8:tt $t9:tt $t10:tt $t11:tt $t12:tt $t13:tt $t14:tt $t15:tt $t16:tt $t17:tt $desc:tt; $($rest:tt)*) => {
        $crate::getopts_options!(@impl($o, $desc) $t1 $t2 $t3 $t4 $t5 $t6 $t7 $t8 $t9 $t10 $t11 $t12 $t13 $t14 $t15 $t16 $t17);
        $crate::getopts_options!(@with($o) $($rest)*);
    };

    (@impl($o:ident, $desc:tt) -$short:ident --$($long:ident)-+) => {
        $o.optflag(
            ::core::stringify!($short),
            $crate::getopts_options!(@long $($long)+),
            $desc,
        );
    };
    (@impl($o:ident, $desc:tt) -$short:ident --$($long:ident)-+ *) => {
        $o.optflagmulti(
            ::core::stringify!($short),
            $crate::getopts_options!(@long $($long)+),
            $desc,
        );
    };
    (@impl($o:ident, $desc:tt) -$short:ident --$($long:ident)-+ = $hint:ident) => {
        $o.optopt(
            ::core::stringify!($short),
            $crate::getopts_options!(@long $($long)+),
            $desc,
            ::core::stringify!($hint),
        );
    };
    (@impl($o:ident, $desc:tt) -$short:ident --$($long:ident)-+ * = $hint:ident) => {
        $o.optmulti(
            ::core::stringify!($short),
            $crate::getopts_options!(@long $($long)+),
            $desc,
            ::core::stringify!($hint),
        );
    };
    (@impl($o:ident, $desc:tt) -$short:ident --$($long:ident)-+ *= $hint:ident) => {
        $o.optmulti(
            ::core::stringify!($short),
            $crate::getopts_options!(@long $($long)+),
            $desc,
            ::core::stringify!($hint),
        );
    };
    (@impl($o:ident, $desc:tt) -$short:ident --$($long:ident)-+ + = $hint:ident) => {
        $o.reqopt(
            ::core::stringify!($short),
            $crate::getopts_options!(@long $($long)+),
            $desc,
            ::core::stringify!($hint),
        );
    };
    (@impl($o:ident, $desc:tt) -$short:ident --$($long:ident)-+ += $hint:ident) => {
        $o.reqopt(
            ::core::stringify!($short),
            $crate::getopts_options!(@long $($long)+),
            $desc,
            ::core::stringify!($hint),
        );
    };
    (@impl($o:ident, $desc:tt) -$short:ident --$($long:ident)-+ ?= $hint:ident) => {
        $o.optflagopt(
            ::core::stringify!($short),
            $crate::getopts_options!(@long $($long)+),
            $desc,
            ::core::stringify!($hint),
        );
    };
}

#[test]
fn test() {
    getopts_options! {
        -c --center-rule            "...";
        -i --ignore*=NAME           "...";
        -I --ignore-partial*=NAME   "...";
        -S --fake-source-from=SRC   "...";
        -s --sep?=PATTERN           "...";
        -h --help*                  "...";
        .parsing_style(getopts::ParsingStyle::StopAtFirstFree)
    };
}