Warning: This file is not a C or C++ file. It does not have highlighting.
1 | //===----------------------------------------------------------------------===// |
---|---|
2 | // |
3 | // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions. |
4 | // See https://llvm.org/LICENSE.txt for license information. |
5 | // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception |
6 | // |
7 | //===----------------------------------------------------------------------===// |
8 | |
9 | #ifndef _LIBCPP___CXX03___RANDOM_SUBTRACT_WITH_CARRY_ENGINE_H |
10 | #define _LIBCPP___CXX03___RANDOM_SUBTRACT_WITH_CARRY_ENGINE_H |
11 | |
12 | #include <__cxx03/__algorithm/equal.h> |
13 | #include <__cxx03/__algorithm/min.h> |
14 | #include <__cxx03/__config> |
15 | #include <__cxx03/__random/is_seed_sequence.h> |
16 | #include <__cxx03/__random/linear_congruential_engine.h> |
17 | #include <__cxx03/cstddef> |
18 | #include <__cxx03/cstdint> |
19 | #include <__cxx03/iosfwd> |
20 | #include <__cxx03/limits> |
21 | |
22 | #if !defined(_LIBCPP_HAS_NO_PRAGMA_SYSTEM_HEADER) |
23 | # pragma GCC system_header |
24 | #endif |
25 | |
26 | _LIBCPP_PUSH_MACROS |
27 | #include <__cxx03/__undef_macros> |
28 | |
29 | _LIBCPP_BEGIN_NAMESPACE_STD |
30 | |
31 | template <class _UIntType, size_t __w, size_t __s, size_t __r> |
32 | class _LIBCPP_TEMPLATE_VIS subtract_with_carry_engine; |
33 | |
34 | template <class _UInt, size_t _Wp, size_t _Sp, size_t _Rp> |
35 | _LIBCPP_HIDE_FROM_ABI bool operator==(const subtract_with_carry_engine<_UInt, _Wp, _Sp, _Rp>& __x, |
36 | const subtract_with_carry_engine<_UInt, _Wp, _Sp, _Rp>& __y); |
37 | |
38 | template <class _UInt, size_t _Wp, size_t _Sp, size_t _Rp> |
39 | _LIBCPP_HIDE_FROM_ABI bool operator!=(const subtract_with_carry_engine<_UInt, _Wp, _Sp, _Rp>& __x, |
40 | const subtract_with_carry_engine<_UInt, _Wp, _Sp, _Rp>& __y); |
41 | |
42 | template <class _CharT, class _Traits, class _UInt, size_t _Wp, size_t _Sp, size_t _Rp> |
43 | _LIBCPP_HIDE_FROM_ABI basic_ostream<_CharT, _Traits>& |
44 | operator<<(basic_ostream<_CharT, _Traits>& __os, const subtract_with_carry_engine<_UInt, _Wp, _Sp, _Rp>& __x); |
45 | |
46 | template <class _CharT, class _Traits, class _UInt, size_t _Wp, size_t _Sp, size_t _Rp> |
47 | _LIBCPP_HIDE_FROM_ABI basic_istream<_CharT, _Traits>& |
48 | operator>>(basic_istream<_CharT, _Traits>& __is, subtract_with_carry_engine<_UInt, _Wp, _Sp, _Rp>& __x); |
49 | |
50 | template <class _UIntType, size_t __w, size_t __s, size_t __r> |
51 | class _LIBCPP_TEMPLATE_VIS subtract_with_carry_engine { |
52 | public: |
53 | // types |
54 | typedef _UIntType result_type; |
55 | |
56 | private: |
57 | result_type __x_[__r]; |
58 | result_type __c_; |
59 | size_t __i_; |
60 | |
61 | static const result_type _Dt = numeric_limits<result_type>::digits; |
62 | static_assert(0 < __w, "subtract_with_carry_engine invalid parameters"); |
63 | static_assert(__w <= _Dt, "subtract_with_carry_engine invalid parameters"); |
64 | static_assert(0 < __s, "subtract_with_carry_engine invalid parameters"); |
65 | static_assert(__s < __r, "subtract_with_carry_engine invalid parameters"); |
66 | |
67 | public: |
68 | static const result_type _Min = 0; |
69 | static const result_type _Max = __w == _Dt ? result_type(~0) : (result_type(1) << __w) - result_type(1); |
70 | static_assert(_Min < _Max, "subtract_with_carry_engine invalid parameters"); |
71 | |
72 | // engine characteristics |
73 | static const size_t word_size = __w; |
74 | static const size_t short_lag = __s; |
75 | static const size_t long_lag = __r; |
76 | _LIBCPP_HIDE_FROM_ABI static result_type min() { return _Min; } |
77 | _LIBCPP_HIDE_FROM_ABI static result_type max() { return _Max; } |
78 | static const result_type default_seed = 19780503u; |
79 | |
80 | // constructors and seeding functions |
81 | _LIBCPP_HIDE_FROM_ABI explicit subtract_with_carry_engine(result_type __sd = default_seed) { seed(__sd); } |
82 | template <class _Sseq, __enable_if_t<__is_seed_sequence<_Sseq, subtract_with_carry_engine>::value, int> = 0> |
83 | _LIBCPP_HIDE_FROM_ABI explicit subtract_with_carry_engine(_Sseq& __q) { |
84 | seed(__q); |
85 | } |
86 | _LIBCPP_HIDE_FROM_ABI void seed(result_type __sd = default_seed) { |
87 | seed(__sd, integral_constant<unsigned, 1 + (__w - 1) / 32>()); |
88 | } |
89 | template <class _Sseq, __enable_if_t<__is_seed_sequence<_Sseq, subtract_with_carry_engine>::value, int> = 0> |
90 | _LIBCPP_HIDE_FROM_ABI void seed(_Sseq& __q) { |
91 | __seed(__q, integral_constant<unsigned, 1 + (__w - 1) / 32>()); |
92 | } |
93 | |
94 | // generating functions |
95 | _LIBCPP_HIDE_FROM_ABI result_type operator()(); |
96 | _LIBCPP_HIDE_FROM_ABI void discard(unsigned long long __z) { |
97 | for (; __z; --__z) |
98 | operator()(); |
99 | } |
100 | |
101 | template <class _UInt, size_t _Wp, size_t _Sp, size_t _Rp> |
102 | friend bool operator==(const subtract_with_carry_engine<_UInt, _Wp, _Sp, _Rp>& __x, |
103 | const subtract_with_carry_engine<_UInt, _Wp, _Sp, _Rp>& __y); |
104 | |
105 | template <class _UInt, size_t _Wp, size_t _Sp, size_t _Rp> |
106 | friend bool operator!=(const subtract_with_carry_engine<_UInt, _Wp, _Sp, _Rp>& __x, |
107 | const subtract_with_carry_engine<_UInt, _Wp, _Sp, _Rp>& __y); |
108 | |
109 | template <class _CharT, class _Traits, class _UInt, size_t _Wp, size_t _Sp, size_t _Rp> |
110 | friend basic_ostream<_CharT, _Traits>& |
111 | operator<<(basic_ostream<_CharT, _Traits>& __os, const subtract_with_carry_engine<_UInt, _Wp, _Sp, _Rp>& __x); |
112 | |
113 | template <class _CharT, class _Traits, class _UInt, size_t _Wp, size_t _Sp, size_t _Rp> |
114 | friend basic_istream<_CharT, _Traits>& |
115 | operator>>(basic_istream<_CharT, _Traits>& __is, subtract_with_carry_engine<_UInt, _Wp, _Sp, _Rp>& __x); |
116 | |
117 | private: |
118 | _LIBCPP_HIDE_FROM_ABI void seed(result_type __sd, integral_constant<unsigned, 1>); |
119 | _LIBCPP_HIDE_FROM_ABI void seed(result_type __sd, integral_constant<unsigned, 2>); |
120 | template <class _Sseq> |
121 | _LIBCPP_HIDE_FROM_ABI void __seed(_Sseq& __q, integral_constant<unsigned, 1>); |
122 | template <class _Sseq> |
123 | _LIBCPP_HIDE_FROM_ABI void __seed(_Sseq& __q, integral_constant<unsigned, 2>); |
124 | }; |
125 | |
126 | template <class _UIntType, size_t __w, size_t __s, size_t __r> |
127 | const size_t subtract_with_carry_engine<_UIntType, __w, __s, __r>::word_size; |
128 | |
129 | template <class _UIntType, size_t __w, size_t __s, size_t __r> |
130 | const size_t subtract_with_carry_engine<_UIntType, __w, __s, __r>::short_lag; |
131 | |
132 | template <class _UIntType, size_t __w, size_t __s, size_t __r> |
133 | const size_t subtract_with_carry_engine<_UIntType, __w, __s, __r>::long_lag; |
134 | |
135 | template <class _UIntType, size_t __w, size_t __s, size_t __r> |
136 | const typename subtract_with_carry_engine<_UIntType, __w, __s, __r>::result_type |
137 | subtract_with_carry_engine<_UIntType, __w, __s, __r>::default_seed; |
138 | |
139 | template <class _UIntType, size_t __w, size_t __s, size_t __r> |
140 | void subtract_with_carry_engine<_UIntType, __w, __s, __r>::seed(result_type __sd, integral_constant<unsigned, 1>) { |
141 | linear_congruential_engine<result_type, 40014u, 0u, 2147483563u> __e(__sd == 0u ? default_seed : __sd); |
142 | for (size_t __i = 0; __i < __r; ++__i) |
143 | __x_[__i] = static_cast<result_type>(__e() & _Max); |
144 | __c_ = __x_[__r - 1] == 0; |
145 | __i_ = 0; |
146 | } |
147 | |
148 | template <class _UIntType, size_t __w, size_t __s, size_t __r> |
149 | void subtract_with_carry_engine<_UIntType, __w, __s, __r>::seed(result_type __sd, integral_constant<unsigned, 2>) { |
150 | linear_congruential_engine<result_type, 40014u, 0u, 2147483563u> __e(__sd == 0u ? default_seed : __sd); |
151 | for (size_t __i = 0; __i < __r; ++__i) { |
152 | result_type __e0 = __e(); |
153 | __x_[__i] = static_cast<result_type>((__e0 + ((uint64_t)__e() << 32)) & _Max); |
154 | } |
155 | __c_ = __x_[__r - 1] == 0; |
156 | __i_ = 0; |
157 | } |
158 | |
159 | template <class _UIntType, size_t __w, size_t __s, size_t __r> |
160 | template <class _Sseq> |
161 | void subtract_with_carry_engine<_UIntType, __w, __s, __r>::__seed(_Sseq& __q, integral_constant<unsigned, 1>) { |
162 | const unsigned __k = 1; |
163 | uint32_t __ar[__r * __k]; |
164 | __q.generate(__ar, __ar + __r * __k); |
165 | for (size_t __i = 0; __i < __r; ++__i) |
166 | __x_[__i] = static_cast<result_type>(__ar[__i] & _Max); |
167 | __c_ = __x_[__r - 1] == 0; |
168 | __i_ = 0; |
169 | } |
170 | |
171 | template <class _UIntType, size_t __w, size_t __s, size_t __r> |
172 | template <class _Sseq> |
173 | void subtract_with_carry_engine<_UIntType, __w, __s, __r>::__seed(_Sseq& __q, integral_constant<unsigned, 2>) { |
174 | const unsigned __k = 2; |
175 | uint32_t __ar[__r * __k]; |
176 | __q.generate(__ar, __ar + __r * __k); |
177 | for (size_t __i = 0; __i < __r; ++__i) |
178 | __x_[__i] = static_cast<result_type>((__ar[2 * __i] + ((uint64_t)__ar[2 * __i + 1] << 32)) & _Max); |
179 | __c_ = __x_[__r - 1] == 0; |
180 | __i_ = 0; |
181 | } |
182 | |
183 | template <class _UIntType, size_t __w, size_t __s, size_t __r> |
184 | _UIntType subtract_with_carry_engine<_UIntType, __w, __s, __r>::operator()() { |
185 | const result_type& __xs = __x_[(__i_ + (__r - __s)) % __r]; |
186 | result_type& __xr = __x_[__i_]; |
187 | result_type __new_c = __c_ == 0 ? __xs < __xr : __xs != 0 ? __xs <= __xr : 1; |
188 | __xr = (__xs - __xr - __c_) & _Max; |
189 | __c_ = __new_c; |
190 | __i_ = (__i_ + 1) % __r; |
191 | return __xr; |
192 | } |
193 | |
194 | template <class _UInt, size_t _Wp, size_t _Sp, size_t _Rp> |
195 | _LIBCPP_HIDE_FROM_ABI bool operator==(const subtract_with_carry_engine<_UInt, _Wp, _Sp, _Rp>& __x, |
196 | const subtract_with_carry_engine<_UInt, _Wp, _Sp, _Rp>& __y) { |
197 | if (__x.__c_ != __y.__c_) |
198 | return false; |
199 | if (__x.__i_ == __y.__i_) |
200 | return std::equal(__x.__x_, __x.__x_ + _Rp, __y.__x_); |
201 | if (__x.__i_ == 0 || __y.__i_ == 0) { |
202 | size_t __j = std::min(_Rp - __x.__i_, _Rp - __y.__i_); |
203 | if (!std::equal(__x.__x_ + __x.__i_, __x.__x_ + __x.__i_ + __j, __y.__x_ + __y.__i_)) |
204 | return false; |
205 | if (__x.__i_ == 0) |
206 | return std::equal(__x.__x_ + __j, __x.__x_ + _Rp, __y.__x_); |
207 | return std::equal(__x.__x_, __x.__x_ + (_Rp - __j), __y.__x_ + __j); |
208 | } |
209 | if (__x.__i_ < __y.__i_) { |
210 | size_t __j = _Rp - __y.__i_; |
211 | if (!std::equal(__x.__x_ + __x.__i_, __x.__x_ + (__x.__i_ + __j), __y.__x_ + __y.__i_)) |
212 | return false; |
213 | if (!std::equal(__x.__x_ + (__x.__i_ + __j), __x.__x_ + _Rp, __y.__x_)) |
214 | return false; |
215 | return std::equal(__x.__x_, __x.__x_ + __x.__i_, __y.__x_ + (_Rp - (__x.__i_ + __j))); |
216 | } |
217 | size_t __j = _Rp - __x.__i_; |
218 | if (!std::equal(__y.__x_ + __y.__i_, __y.__x_ + (__y.__i_ + __j), __x.__x_ + __x.__i_)) |
219 | return false; |
220 | if (!std::equal(__y.__x_ + (__y.__i_ + __j), __y.__x_ + _Rp, __x.__x_)) |
221 | return false; |
222 | return std::equal(__y.__x_, __y.__x_ + __y.__i_, __x.__x_ + (_Rp - (__y.__i_ + __j))); |
223 | } |
224 | |
225 | template <class _UInt, size_t _Wp, size_t _Sp, size_t _Rp> |
226 | inline _LIBCPP_HIDE_FROM_ABI bool operator!=(const subtract_with_carry_engine<_UInt, _Wp, _Sp, _Rp>& __x, |
227 | const subtract_with_carry_engine<_UInt, _Wp, _Sp, _Rp>& __y) { |
228 | return !(__x == __y); |
229 | } |
230 | |
231 | template <class _CharT, class _Traits, class _UInt, size_t _Wp, size_t _Sp, size_t _Rp> |
232 | _LIBCPP_HIDE_FROM_ABI basic_ostream<_CharT, _Traits>& |
233 | operator<<(basic_ostream<_CharT, _Traits>& __os, const subtract_with_carry_engine<_UInt, _Wp, _Sp, _Rp>& __x) { |
234 | __save_flags<_CharT, _Traits> __lx(__os); |
235 | typedef basic_ostream<_CharT, _Traits> _Ostream; |
236 | __os.flags(_Ostream::dec | _Ostream::left); |
237 | _CharT __sp = __os.widen(' '); |
238 | __os.fill(__sp); |
239 | __os << __x.__x_[__x.__i_]; |
240 | for (size_t __j = __x.__i_ + 1; __j < _Rp; ++__j) |
241 | __os << __sp << __x.__x_[__j]; |
242 | for (size_t __j = 0; __j < __x.__i_; ++__j) |
243 | __os << __sp << __x.__x_[__j]; |
244 | __os << __sp << __x.__c_; |
245 | return __os; |
246 | } |
247 | |
248 | template <class _CharT, class _Traits, class _UInt, size_t _Wp, size_t _Sp, size_t _Rp> |
249 | _LIBCPP_HIDE_FROM_ABI basic_istream<_CharT, _Traits>& |
250 | operator>>(basic_istream<_CharT, _Traits>& __is, subtract_with_carry_engine<_UInt, _Wp, _Sp, _Rp>& __x) { |
251 | __save_flags<_CharT, _Traits> __lx(__is); |
252 | typedef basic_istream<_CharT, _Traits> _Istream; |
253 | __is.flags(_Istream::dec | _Istream::skipws); |
254 | _UInt __t[_Rp + 1]; |
255 | for (size_t __i = 0; __i < _Rp + 1; ++__i) |
256 | __is >> __t[__i]; |
257 | if (!__is.fail()) { |
258 | for (size_t __i = 0; __i < _Rp; ++__i) |
259 | __x.__x_[__i] = __t[__i]; |
260 | __x.__c_ = __t[_Rp]; |
261 | __x.__i_ = 0; |
262 | } |
263 | return __is; |
264 | } |
265 | |
266 | _LIBCPP_END_NAMESPACE_STD |
267 | |
268 | _LIBCPP_POP_MACROS |
269 | |
270 | #endif // _LIBCPP___CXX03___RANDOM_SUBTRACT_WITH_CARRY_ENGINE_H |
271 |
Warning: This file is not a C or C++ file. It does not have highlighting.