1 // Components for compile-time parsing of numbers -*- C++ -*-
2
3 // Copyright (C) 2013-2022 Free Software Foundation, Inc.
4 //
5 // This file is part of the GNU ISO C++ Library. This library is free
6 // software; you can redistribute it and/or modify it under the
7 // terms of the GNU General Public License as published by the
8 // Free Software Foundation; either version 3, or (at your option)
9 // any later version.
10
11 // This library is distributed in the hope that it will be useful,
12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 // GNU General Public License for more details.
15
16 // Under Section 7 of GPL version 3, you are granted additional
17 // permissions described in the GCC Runtime Library Exception, version
18 // 3.1, as published by the Free Software Foundation.
19
20 // You should have received a copy of the GNU General Public License and
21 // a copy of the GCC Runtime Library Exception along with this program;
22 // see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
23 // <http://www.gnu.org/licenses/>.
24
25 /** @file bits/parse_numbers.h
26 * This is an internal header file, included by other library headers.
27 * Do not attempt to use it directly. @headername{chrono}
28 */
29
30 #ifndef _GLIBCXX_PARSE_NUMBERS_H
31 #define _GLIBCXX_PARSE_NUMBERS_H 1
32
33 #pragma GCC system_header
34
35 // From n3642.pdf except I added binary literals and digit separator '\''.
36
37 #if __cplusplus >= 201402L
38
39 #include <type_traits>
40 #include <ext/numeric_traits.h>
41
_GLIBCXX_VISIBILITY(default)42 namespace std _GLIBCXX_VISIBILITY(default)
43 {
44 _GLIBCXX_BEGIN_NAMESPACE_VERSION
45
46 namespace __parse_int
47 {
48 template<unsigned _Base, char _Dig>
49 struct _Digit;
50
51 template<unsigned _Base>
52 struct _Digit<_Base, '0'> : integral_constant<unsigned, 0>
53 {
54 using __valid = true_type;
55 };
56
57 template<unsigned _Base>
58 struct _Digit<_Base, '1'> : integral_constant<unsigned, 1>
59 {
60 using __valid = true_type;
61 };
62
63 template<unsigned _Base, unsigned _Val>
64 struct _Digit_impl : integral_constant<unsigned, _Val>
65 {
66 static_assert(_Base > _Val, "invalid digit");
67 using __valid = true_type;
68 };
69
70 template<unsigned _Base>
71 struct _Digit<_Base, '2'> : _Digit_impl<_Base, 2>
72 { };
73
74 template<unsigned _Base>
75 struct _Digit<_Base, '3'> : _Digit_impl<_Base, 3>
76 { };
77
78 template<unsigned _Base>
79 struct _Digit<_Base, '4'> : _Digit_impl<_Base, 4>
80 { };
81
82 template<unsigned _Base>
83 struct _Digit<_Base, '5'> : _Digit_impl<_Base, 5>
84 { };
85
86 template<unsigned _Base>
87 struct _Digit<_Base, '6'> : _Digit_impl<_Base, 6>
88 { };
89
90 template<unsigned _Base>
91 struct _Digit<_Base, '7'> : _Digit_impl<_Base, 7>
92 { };
93
94 template<unsigned _Base>
95 struct _Digit<_Base, '8'> : _Digit_impl<_Base, 8>
96 { };
97
98 template<unsigned _Base>
99 struct _Digit<_Base, '9'> : _Digit_impl<_Base, 9>
100 { };
101
102 template<unsigned _Base>
103 struct _Digit<_Base, 'a'> : _Digit_impl<_Base, 0xa>
104 { };
105
106 template<unsigned _Base>
107 struct _Digit<_Base, 'A'> : _Digit_impl<_Base, 0xa>
108 { };
109
110 template<unsigned _Base>
111 struct _Digit<_Base, 'b'> : _Digit_impl<_Base, 0xb>
112 { };
113
114 template<unsigned _Base>
115 struct _Digit<_Base, 'B'> : _Digit_impl<_Base, 0xb>
116 { };
117
118 template<unsigned _Base>
119 struct _Digit<_Base, 'c'> : _Digit_impl<_Base, 0xc>
120 { };
121
122 template<unsigned _Base>
123 struct _Digit<_Base, 'C'> : _Digit_impl<_Base, 0xc>
124 { };
125
126 template<unsigned _Base>
127 struct _Digit<_Base, 'd'> : _Digit_impl<_Base, 0xd>
128 { };
129
130 template<unsigned _Base>
131 struct _Digit<_Base, 'D'> : _Digit_impl<_Base, 0xd>
132 { };
133
134 template<unsigned _Base>
135 struct _Digit<_Base, 'e'> : _Digit_impl<_Base, 0xe>
136 { };
137
138 template<unsigned _Base>
139 struct _Digit<_Base, 'E'> : _Digit_impl<_Base, 0xe>
140 { };
141
142 template<unsigned _Base>
143 struct _Digit<_Base, 'f'> : _Digit_impl<_Base, 0xf>
144 { };
145
146 template<unsigned _Base>
147 struct _Digit<_Base, 'F'> : _Digit_impl<_Base, 0xf>
148 { };
149
150 // Digit separator
151 template<unsigned _Base>
152 struct _Digit<_Base, '\''> : integral_constant<unsigned, 0>
153 {
154 using __valid = false_type;
155 };
156
157 //------------------------------------------------------------------------------
158
159 template<unsigned long long _Val>
160 using __ull_constant = integral_constant<unsigned long long, _Val>;
161
162 template<unsigned _Base, char _Dig, char... _Digs>
163 struct _Power_help
164 {
165 using __next = typename _Power_help<_Base, _Digs...>::type;
166 using __valid_digit = typename _Digit<_Base, _Dig>::__valid;
167 using type
168 = __ull_constant<__next::value * (__valid_digit{} ? _Base : 1ULL)>;
169 };
170
171 template<unsigned _Base, char _Dig>
172 struct _Power_help<_Base, _Dig>
173 {
174 using __valid_digit = typename _Digit<_Base, _Dig>::__valid;
175 using type = __ull_constant<__valid_digit::value>;
176 };
177
178 template<unsigned _Base, char... _Digs>
179 struct _Power : _Power_help<_Base, _Digs...>::type
180 { };
181
182 template<unsigned _Base>
183 struct _Power<_Base> : __ull_constant<0>
184 { };
185
186 //------------------------------------------------------------------------------
187
188 template<unsigned _Base, unsigned long long _Pow, char _Dig, char... _Digs>
189 struct _Number_help
190 {
191 using __digit = _Digit<_Base, _Dig>;
192 using __valid_digit = typename __digit::__valid;
193 using __next = _Number_help<_Base,
194 __valid_digit::value ? _Pow / _Base : _Pow,
195 _Digs...>;
196 using type = __ull_constant<_Pow * __digit::value + __next::type::value>;
197 static_assert((type::value / _Pow) == __digit::value,
198 "integer literal does not fit in unsigned long long");
199 };
200
201 // Skip past digit separators:
202 template<unsigned _Base, unsigned long long _Pow, char _Dig, char..._Digs>
203 struct _Number_help<_Base, _Pow, '\'', _Dig, _Digs...>
204 : _Number_help<_Base, _Pow, _Dig, _Digs...>
205 { };
206
207 // Terminating case for recursion:
208 template<unsigned _Base, char _Dig>
209 struct _Number_help<_Base, 1ULL, _Dig>
210 {
211 using type = __ull_constant<_Digit<_Base, _Dig>::value>;
212 };
213
214 template<unsigned _Base, char... _Digs>
215 struct _Number
216 : _Number_help<_Base, _Power<_Base, _Digs...>::value, _Digs...>::type
217 { };
218
219 template<unsigned _Base>
220 struct _Number<_Base>
221 : __ull_constant<0>
222 { };
223
224 //------------------------------------------------------------------------------
225
226 template<char... _Digs>
227 struct _Parse_int;
228
229 template<char... _Digs>
230 struct _Parse_int<'0', 'b', _Digs...>
231 : _Number<2U, _Digs...>::type
232 { };
233
234 template<char... _Digs>
235 struct _Parse_int<'0', 'B', _Digs...>
236 : _Number<2U, _Digs...>::type
237 { };
238
239 template<char... _Digs>
240 struct _Parse_int<'0', 'x', _Digs...>
241 : _Number<16U, _Digs...>::type
242 { };
243
244 template<char... _Digs>
245 struct _Parse_int<'0', 'X', _Digs...>
246 : _Number<16U, _Digs...>::type
247 { };
248
249 template<char... _Digs>
250 struct _Parse_int<'0', _Digs...>
251 : _Number<8U, _Digs...>::type
252 { };
253
254 template<char... _Digs>
255 struct _Parse_int
256 : _Number<10U, _Digs...>::type
257 { };
258
259 } // namespace __parse_int
260
261
262 namespace __select_int
263 {
264 template<unsigned long long _Val, typename... _Ints>
265 struct _Select_int_base;
266
267 template<unsigned long long _Val, typename _IntType, typename... _Ints>
268 struct _Select_int_base<_Val, _IntType, _Ints...>
269 : __conditional_t<(_Val <= __gnu_cxx::__int_traits<_IntType>::__max),
270 integral_constant<_IntType, (_IntType)_Val>,
271 _Select_int_base<_Val, _Ints...>>
272 { };
273
274 template<unsigned long long _Val>
275 struct _Select_int_base<_Val>
276 { };
277
278 template<char... _Digs>
279 using _Select_int = typename _Select_int_base<
280 __parse_int::_Parse_int<_Digs...>::value,
281 unsigned char,
282 unsigned short,
283 unsigned int,
284 unsigned long,
285 unsigned long long
286 >::type;
287
288 } // namespace __select_int
289
290 _GLIBCXX_END_NAMESPACE_VERSION
291 } // namespace std
292
293 #endif // C++14
294
295 #endif // _GLIBCXX_PARSE_NUMBERS_H
296