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