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
177
178
179
180
181
182
183
184
185
186
187
188
189
190

#[macro_export]
#[doc(hidden)]
macro_rules! ordinalize_enum_from_ordinal {
    ( $name:ident: $t:ident $( , $variants:ident )+ $(,)* ) => {
        pub fn from_ordinal(number: $t) -> Option<$name> {
            match number{
                $(
                    n if n == ($name::$variants as $t) => Some($name::$variants),
                )+
                _ => None
            }
        }

        pub unsafe fn from_ordinal_unsafe(number: $t) -> $name {
            ::std::mem::transmute(number)
        }
    }
}

#[cfg(feature = "repr128")]
#[macro_export]
#[doc(hidden)]
macro_rules! ordinalize_enum_ordinal {
    ( $name:ident: $t:ident) => {
        pub fn ordinal(&self) -> $t {
            let n: u128 = unsafe {
                ::std::mem::transmute(::std::mem::discriminant(self))
            };

            n as $t
        }
    }
}

#[cfg(not(feature = "repr128"))]
#[macro_export]
#[doc(hidden)]
macro_rules! ordinalize_enum_ordinal {
    ( $name:ident: $t:ident) => {
        pub fn ordinal(&self) -> $t {
            let n: u64 = unsafe {
                ::std::mem::transmute(::std::mem::discriminant(self))
            };

            n as $t
        }
    }
}

#[macro_export]
#[doc(hidden)]
macro_rules! ordinalize_enum_impl {
    ( $name:ident: $t:ident $( , $variants:ident )+ $(,)* ) => {
        impl $name {
            ordinalize_enum_ordinal!($name: $t);

            ordinalize_enum_from_ordinal!(
                $name: $t,
                $(
                    $variants,
                )+
            );
        }
    }
}

/// Create an enum and implement a `ordinal` method, as well as `from_ordinal` and `from_ordinal_unsafe` associated functions for it. The new enum also implements `Debug`, `PartialOrd`, `Ord`, `PartialEq`, `Clone`, `Eq`, `Hash` and `Copy` traits.
#[macro_export]
macro_rules! create_ordinalized_enum {
    ( $name:ident $( ,$variants:ident )+ $(,)* ) => {
        #[repr(isize)]
        #[derive(Debug, PartialOrd, Ord, PartialEq, Clone, Eq, Hash, Copy)]
        enum $name {
            $(
                $variants,
            )+
        }
        ordinalize_enum_impl!(
            $name: isize,
            $(
                $variants,
            )+
        );
    };
    ( $name:ident $( ,$variants:ident = $values:expr )+ $(,)* ) => {
        #[repr(isize)]
        #[derive(Debug, PartialOrd, Ord, PartialEq, Clone, Eq, Hash, Copy)]
        enum $name {
            $(
                $variants = $values,
            )+
        }
        ordinalize_enum_impl!(
            $name: isize,
            $(
                $variants,
            )+
        );
    };
    ( $name:ident: $t:ident $( ,$variants:ident )+ $(,)* ) => {
        #[repr($t)]
        #[derive(Debug, PartialOrd, Ord, PartialEq, Clone, Eq, Hash, Copy)]
        enum $name {
            $(
                $variants,
            )+
        }
        ordinalize_enum_impl!(
            $name: $t,
            $(
                $variants,
            )+
        );
    };
    ( $name:ident: $t:ident $( ,$variants:ident = $values:expr )+ $(,)* ) => {
        #[repr($t)]
        #[derive(Debug, PartialOrd, Ord, PartialEq, Clone, Eq, Hash, Copy)]
        enum $name {
            $(
                $variants = $values,
            )+
        }
        ordinalize_enum_impl!(
            $name: $t,
            $(
                $variants,
            )+
        );
    };
    ( $v:vis $name:ident $( ,$variants:ident )+ $(,)* ) => {
        #[repr(isize)]
        #[derive(Debug, PartialOrd, Ord, PartialEq, Clone, Eq, Hash, Copy)]
        $v enum $name {
            $(
                $variants,
            )+
        }
        ordinalize_enum_impl!(
            $name: isize,
            $(
                $variants,
            )+
        );
    };
    ( $v:vis $name:ident $( ,$variants:ident = $values:expr )+ $(,)* ) => {
        #[repr(isize)]
        #[derive(Debug, PartialOrd, Ord, PartialEq, Clone, Eq, Hash, Copy)]
        $v enum $name {
            $(
                $variants = $values,
            )+
        }
        ordinalize_enum_impl!(
            $name: isize,
            $(
                $variants,
            )+
        );
    };
    ( $v:vis $name:ident: $t:ident $( ,$variants:ident )+ $(,)* ) => {
        #[repr($t)]
        #[derive(Debug, PartialOrd, Ord, PartialEq, Clone, Eq, Hash, Copy)]
        $v enum $name {
            $(
                $variants,
            )+
        }
        ordinalize_enum_impl!(
            $name: $t,
            $(
                $variants,
            )+
        );
    };
    ( $v:vis $name:ident: $t:ident $( ,$variants:ident = $values:expr )+ $(,)* ) => {
        #[repr($t)]
        #[derive(Debug, PartialOrd, Ord, PartialEq, Clone, Eq, Hash, Copy)]
        $v enum $name {
            $(
                $variants = $values,
            )+
        }
        ordinalize_enum_impl!(
            $name: $t,
            $(
                $variants,
            )+
        );
    };
}