| 1 | // Class template uniform_int_distribution -*- C++ -*- | 
| 2 |  | 
| 3 | // Copyright (C) 2009-2021 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 | /** | 
| 26 |  * @file bits/uniform_int_dist.h | 
| 27 |  *  This is an internal header file, included by other library headers. | 
| 28 |  *  Do not attempt to use it directly. @headername{random} | 
| 29 |  */ | 
| 30 |  | 
| 31 | #ifndef _GLIBCXX_BITS_UNIFORM_INT_DIST_H | 
| 32 | #define _GLIBCXX_BITS_UNIFORM_INT_DIST_H | 
| 33 |  | 
| 34 | #include <type_traits> | 
| 35 | #include <ext/numeric_traits.h> | 
| 36 | #if __cplusplus > 201703L | 
| 37 | # include <concepts> | 
| 38 | #endif | 
| 39 | #include <bits/concept_check.h> // __glibcxx_function_requires | 
| 40 |  | 
| 41 | namespace std _GLIBCXX_VISIBILITY(default) | 
| 42 | { | 
| 43 | _GLIBCXX_BEGIN_NAMESPACE_VERSION | 
| 44 |  | 
| 45 | #ifdef __cpp_lib_concepts | 
| 46 |   /// Requirements for a uniform random bit generator. | 
| 47 |   template<typename _Gen> | 
| 48 |     concept uniform_random_bit_generator | 
| 49 |       = invocable<_Gen&> && unsigned_integral<invoke_result_t<_Gen&>> | 
| 50 |       && requires | 
| 51 |       { | 
| 52 | 	{ _Gen::min() } -> same_as<invoke_result_t<_Gen&>>; | 
| 53 | 	{ _Gen::max() } -> same_as<invoke_result_t<_Gen&>>; | 
| 54 | 	requires bool_constant<(_Gen::min() < _Gen::max())>::value; | 
| 55 |       }; | 
| 56 | #endif | 
| 57 |  | 
| 58 |   namespace __detail | 
| 59 |   { | 
| 60 |     // Determine whether number is a power of two. | 
| 61 |     // This is true for zero, which is OK because we want _Power_of_2(n+1) | 
| 62 |     // to be true if n==numeric_limits<_Tp>::max() and so n+1 wraps around. | 
| 63 |     template<typename _Tp> | 
| 64 |       constexpr bool | 
| 65 |       _Power_of_2(_Tp __x) | 
| 66 |       { | 
| 67 | 	return ((__x - 1) & __x) == 0; | 
| 68 |       } | 
| 69 |   } | 
| 70 |  | 
| 71 |   /** | 
| 72 |    * @brief Uniform discrete distribution for random numbers. | 
| 73 |    * A discrete random distribution on the range @f$[min, max]@f$ with equal | 
| 74 |    * probability throughout the range. | 
| 75 |    */ | 
| 76 |   template<typename _IntType = int> | 
| 77 |     class uniform_int_distribution | 
| 78 |     { | 
| 79 |       static_assert(std::is_integral<_IntType>::value, | 
| 80 | 		    "template argument must be an integral type" ); | 
| 81 |  | 
| 82 |     public: | 
| 83 |       /** The type of the range of the distribution. */ | 
| 84 |       typedef _IntType result_type; | 
| 85 |       /** Parameter type. */ | 
| 86 |       struct param_type | 
| 87 |       { | 
| 88 | 	typedef uniform_int_distribution<_IntType> distribution_type; | 
| 89 |  | 
| 90 | 	param_type() : param_type(0) { } | 
| 91 |  | 
| 92 | 	explicit | 
| 93 | 	param_type(_IntType __a, | 
| 94 | 		   _IntType __b = __gnu_cxx::__int_traits<_IntType>::__max) | 
| 95 | 	: _M_a(__a), _M_b(__b) | 
| 96 | 	{ | 
| 97 | 	  __glibcxx_assert(_M_a <= _M_b); | 
| 98 | 	} | 
| 99 |  | 
| 100 | 	result_type | 
| 101 | 	a() const | 
| 102 | 	{ return _M_a; } | 
| 103 |  | 
| 104 | 	result_type | 
| 105 | 	b() const | 
| 106 | 	{ return _M_b; } | 
| 107 |  | 
| 108 | 	friend bool | 
| 109 | 	operator==(const param_type& __p1, const param_type& __p2) | 
| 110 | 	{ return __p1._M_a == __p2._M_a && __p1._M_b == __p2._M_b; } | 
| 111 |  | 
| 112 | 	friend bool | 
| 113 | 	operator!=(const param_type& __p1, const param_type& __p2) | 
| 114 | 	{ return !(__p1 == __p2); } | 
| 115 |  | 
| 116 |       private: | 
| 117 | 	_IntType _M_a; | 
| 118 | 	_IntType _M_b; | 
| 119 |       }; | 
| 120 |  | 
| 121 |     public: | 
| 122 |       /** | 
| 123 |        * @brief Constructs a uniform distribution object. | 
| 124 |        */ | 
| 125 |       uniform_int_distribution() : uniform_int_distribution(0) { } | 
| 126 |  | 
| 127 |       /** | 
| 128 |        * @brief Constructs a uniform distribution object. | 
| 129 |        */ | 
| 130 |       explicit | 
| 131 |       uniform_int_distribution(_IntType __a, | 
| 132 | 			       _IntType __b | 
| 133 | 				 = __gnu_cxx::__int_traits<_IntType>::__max) | 
| 134 |       : _M_param(__a, __b) | 
| 135 |       { } | 
| 136 |  | 
| 137 |       explicit | 
| 138 |       uniform_int_distribution(const param_type& __p) | 
| 139 |       : _M_param(__p) | 
| 140 |       { } | 
| 141 |  | 
| 142 |       /** | 
| 143 |        * @brief Resets the distribution state. | 
| 144 |        * | 
| 145 |        * Does nothing for the uniform integer distribution. | 
| 146 |        */ | 
| 147 |       void | 
| 148 |       reset() { } | 
| 149 |  | 
| 150 |       result_type | 
| 151 |       a() const | 
| 152 |       { return _M_param.a(); } | 
| 153 |  | 
| 154 |       result_type | 
| 155 |       b() const | 
| 156 |       { return _M_param.b(); } | 
| 157 |  | 
| 158 |       /** | 
| 159 |        * @brief Returns the parameter set of the distribution. | 
| 160 |        */ | 
| 161 |       param_type | 
| 162 |       param() const | 
| 163 |       { return _M_param; } | 
| 164 |  | 
| 165 |       /** | 
| 166 |        * @brief Sets the parameter set of the distribution. | 
| 167 |        * @param __param The new parameter set of the distribution. | 
| 168 |        */ | 
| 169 |       void | 
| 170 |       param(const param_type& __param) | 
| 171 |       { _M_param = __param; } | 
| 172 |  | 
| 173 |       /** | 
| 174 |        * @brief Returns the inclusive lower bound of the distribution range. | 
| 175 |        */ | 
| 176 |       result_type | 
| 177 |       min() const | 
| 178 |       { return this->a(); } | 
| 179 |  | 
| 180 |       /** | 
| 181 |        * @brief Returns the inclusive upper bound of the distribution range. | 
| 182 |        */ | 
| 183 |       result_type | 
| 184 |       max() const | 
| 185 |       { return this->b(); } | 
| 186 |  | 
| 187 |       /** | 
| 188 |        * @brief Generating functions. | 
| 189 |        */ | 
| 190 |       template<typename _UniformRandomBitGenerator> | 
| 191 | 	result_type | 
| 192 | 	operator()(_UniformRandomBitGenerator& __urng) | 
| 193 |         { return this->operator()(__urng, _M_param); } | 
| 194 |  | 
| 195 |       template<typename _UniformRandomBitGenerator> | 
| 196 | 	result_type | 
| 197 | 	operator()(_UniformRandomBitGenerator& __urng, | 
| 198 | 		   const param_type& __p); | 
| 199 |  | 
| 200 |       template<typename _ForwardIterator, | 
| 201 | 	       typename _UniformRandomBitGenerator> | 
| 202 | 	void | 
| 203 | 	__generate(_ForwardIterator __f, _ForwardIterator __t, | 
| 204 | 		   _UniformRandomBitGenerator& __urng) | 
| 205 | 	{ this->__generate(__f, __t, __urng, _M_param); } | 
| 206 |  | 
| 207 |       template<typename _ForwardIterator, | 
| 208 | 	       typename _UniformRandomBitGenerator> | 
| 209 | 	void | 
| 210 | 	__generate(_ForwardIterator __f, _ForwardIterator __t, | 
| 211 | 		   _UniformRandomBitGenerator& __urng, | 
| 212 | 		   const param_type& __p) | 
| 213 | 	{ this->__generate_impl(__f, __t, __urng, __p); } | 
| 214 |  | 
| 215 |       template<typename _UniformRandomBitGenerator> | 
| 216 | 	void | 
| 217 | 	__generate(result_type* __f, result_type* __t, | 
| 218 | 		   _UniformRandomBitGenerator& __urng, | 
| 219 | 		   const param_type& __p) | 
| 220 | 	{ this->__generate_impl(__f, __t, __urng, __p); } | 
| 221 |  | 
| 222 |       /** | 
| 223 |        * @brief Return true if two uniform integer distributions have | 
| 224 |        *        the same parameters. | 
| 225 |        */ | 
| 226 |       friend bool | 
| 227 |       operator==(const uniform_int_distribution& __d1, | 
| 228 | 		 const uniform_int_distribution& __d2) | 
| 229 |       { return __d1._M_param == __d2._M_param; } | 
| 230 |  | 
| 231 |     private: | 
| 232 |       template<typename _ForwardIterator, | 
| 233 | 	       typename _UniformRandomBitGenerator> | 
| 234 | 	void | 
| 235 | 	__generate_impl(_ForwardIterator __f, _ForwardIterator __t, | 
| 236 | 			_UniformRandomBitGenerator& __urng, | 
| 237 | 			const param_type& __p); | 
| 238 |  | 
| 239 |       param_type _M_param; | 
| 240 |  | 
| 241 |       // Lemire's nearly divisionless algorithm. | 
| 242 |       // Returns an unbiased random number from __g downscaled to [0,__range) | 
| 243 |       // using an unsigned type _Wp twice as wide as unsigned type _Up. | 
| 244 |       template<typename _Wp, typename _Urbg, typename _Up> | 
| 245 | 	static _Up | 
| 246 | 	_S_nd(_Urbg& __g, _Up __range) | 
| 247 | 	{ | 
| 248 | 	  using _Up_traits = __gnu_cxx::__int_traits<_Up>; | 
| 249 | 	  using _Wp_traits = __gnu_cxx::__int_traits<_Wp>; | 
| 250 | 	  static_assert(!_Up_traits::__is_signed, "U must be unsigned" ); | 
| 251 | 	  static_assert(!_Wp_traits::__is_signed, "W must be unsigned" ); | 
| 252 | 	  static_assert(_Wp_traits::__digits == (2 * _Up_traits::__digits), | 
| 253 | 			"W must be twice as wide as U" ); | 
| 254 |  | 
| 255 | 	  // reference: Fast Random Integer Generation in an Interval | 
| 256 | 	  // ACM Transactions on Modeling and Computer Simulation 29 (1), 2019 | 
| 257 | 	  // https://arxiv.org/abs/1805.10941 | 
| 258 | 	  _Wp __product = _Wp(__g()) * _Wp(__range); | 
| 259 | 	  _Up __low = _Up(__product); | 
| 260 | 	  if (__low < __range) | 
| 261 | 	    { | 
| 262 | 	      _Up __threshold = -__range % __range; | 
| 263 | 	      while (__low < __threshold) | 
| 264 | 		{ | 
| 265 | 		  __product = _Wp(__g()) * _Wp(__range); | 
| 266 | 		  __low = _Up(__product); | 
| 267 | 		} | 
| 268 | 	    } | 
| 269 | 	  return __product >> _Up_traits::__digits; | 
| 270 | 	} | 
| 271 |     }; | 
| 272 |  | 
| 273 |   template<typename _IntType> | 
| 274 |     template<typename _UniformRandomBitGenerator> | 
| 275 |       typename uniform_int_distribution<_IntType>::result_type | 
| 276 |       uniform_int_distribution<_IntType>:: | 
| 277 |       operator()(_UniformRandomBitGenerator& __urng, | 
| 278 | 		 const param_type& __param) | 
| 279 |       { | 
| 280 | 	typedef typename _UniformRandomBitGenerator::result_type _Gresult_type; | 
| 281 | 	typedef typename make_unsigned<result_type>::type __utype; | 
| 282 | 	typedef typename common_type<_Gresult_type, __utype>::type __uctype; | 
| 283 |  | 
| 284 | 	constexpr __uctype __urngmin = _UniformRandomBitGenerator::min(); | 
| 285 | 	constexpr __uctype __urngmax = _UniformRandomBitGenerator::max(); | 
| 286 | 	static_assert( __urngmin < __urngmax, | 
| 287 | 	    "Uniform random bit generator must define min() < max()" ); | 
| 288 | 	constexpr __uctype __urngrange = __urngmax - __urngmin; | 
| 289 |  | 
| 290 | 	const __uctype __urange | 
| 291 | 	  = __uctype(__param.b()) - __uctype(__param.a()); | 
| 292 |  | 
| 293 | 	__uctype __ret; | 
| 294 | 	if (__urngrange > __urange) | 
| 295 | 	  { | 
| 296 | 	    // downscaling | 
| 297 |  | 
| 298 | 	    const __uctype __uerange = __urange + 1; // __urange can be zero | 
| 299 |  | 
| 300 | #if defined __UINT64_TYPE__ && defined __UINT32_TYPE__ | 
| 301 | #if __SIZEOF_INT128__ | 
| 302 | 	    if _GLIBCXX17_CONSTEXPR (__urngrange == __UINT64_MAX__) | 
| 303 | 	      { | 
| 304 | 		// __urng produces values that use exactly 64-bits, | 
| 305 | 		// so use 128-bit integers to downscale to desired range. | 
| 306 | 		__UINT64_TYPE__ __u64erange = __uerange; | 
| 307 | 		__ret = _S_nd<unsigned __int128>(__urng, __u64erange); | 
| 308 | 	      } | 
| 309 | 	    else | 
| 310 | #endif | 
| 311 | 	    if _GLIBCXX17_CONSTEXPR (__urngrange == __UINT32_MAX__) | 
| 312 | 	      { | 
| 313 | 		// __urng produces values that use exactly 32-bits, | 
| 314 | 		// so use 64-bit integers to downscale to desired range. | 
| 315 | 		__UINT32_TYPE__ __u32erange = __uerange; | 
| 316 | 		__ret = _S_nd<__UINT64_TYPE__>(__urng, __u32erange); | 
| 317 | 	      } | 
| 318 | 	    else | 
| 319 | #endif | 
| 320 | 	      { | 
| 321 | 		// fallback case (2 divisions) | 
| 322 | 		const __uctype __scaling = __urngrange / __uerange; | 
| 323 | 		const __uctype __past = __uerange * __scaling; | 
| 324 | 		do | 
| 325 | 		  __ret = __uctype(__urng()) - __urngmin; | 
| 326 | 		while (__ret >= __past); | 
| 327 | 		__ret /= __scaling; | 
| 328 | 	      } | 
| 329 | 	  } | 
| 330 | 	else if (__urngrange < __urange) | 
| 331 | 	  { | 
| 332 | 	    // upscaling | 
| 333 | 	    /* | 
| 334 | 	      Note that every value in [0, urange] | 
| 335 | 	      can be written uniquely as | 
| 336 |  | 
| 337 | 	      (urngrange + 1) * high + low | 
| 338 |  | 
| 339 | 	      where | 
| 340 |  | 
| 341 | 	      high in [0, urange / (urngrange + 1)] | 
| 342 |  | 
| 343 | 	      and | 
| 344 |  | 
| 345 | 	      low in [0, urngrange]. | 
| 346 | 	    */ | 
| 347 | 	    __uctype __tmp; // wraparound control | 
| 348 | 	    do | 
| 349 | 	      { | 
| 350 | 		const __uctype __uerngrange = __urngrange + 1; | 
| 351 | 		__tmp = (__uerngrange * operator() | 
| 352 | 			 (__urng, param_type(0, __urange / __uerngrange))); | 
| 353 | 		__ret = __tmp + (__uctype(__urng()) - __urngmin); | 
| 354 | 	      } | 
| 355 | 	    while (__ret > __urange || __ret < __tmp); | 
| 356 | 	  } | 
| 357 | 	else | 
| 358 | 	  __ret = __uctype(__urng()) - __urngmin; | 
| 359 |  | 
| 360 | 	return __ret + __param.a(); | 
| 361 |       } | 
| 362 |  | 
| 363 |  | 
| 364 |   template<typename _IntType> | 
| 365 |     template<typename _ForwardIterator, | 
| 366 | 	     typename _UniformRandomBitGenerator> | 
| 367 |       void | 
| 368 |       uniform_int_distribution<_IntType>:: | 
| 369 |       __generate_impl(_ForwardIterator __f, _ForwardIterator __t, | 
| 370 | 		      _UniformRandomBitGenerator& __urng, | 
| 371 | 		      const param_type& __param) | 
| 372 |       { | 
| 373 | 	__glibcxx_function_requires(_ForwardIteratorConcept<_ForwardIterator>) | 
| 374 | 	typedef typename _UniformRandomBitGenerator::result_type _Gresult_type; | 
| 375 | 	typedef typename make_unsigned<result_type>::type __utype; | 
| 376 | 	typedef typename common_type<_Gresult_type, __utype>::type __uctype; | 
| 377 |  | 
| 378 | 	static_assert( __urng.min() < __urng.max(), | 
| 379 | 	    "Uniform random bit generator must define min() < max()" ); | 
| 380 |  | 
| 381 | 	constexpr __uctype __urngmin = __urng.min(); | 
| 382 | 	constexpr __uctype __urngmax = __urng.max(); | 
| 383 | 	constexpr __uctype __urngrange = __urngmax - __urngmin; | 
| 384 | 	const __uctype __urange | 
| 385 | 	  = __uctype(__param.b()) - __uctype(__param.a()); | 
| 386 |  | 
| 387 | 	__uctype __ret; | 
| 388 |  | 
| 389 | 	if (__urngrange > __urange) | 
| 390 | 	  { | 
| 391 | 	    if (__detail::_Power_of_2(__urngrange + 1) | 
| 392 | 		&& __detail::_Power_of_2(__urange + 1)) | 
| 393 | 	      { | 
| 394 | 		while (__f != __t) | 
| 395 | 		  { | 
| 396 | 		    __ret = __uctype(__urng()) - __urngmin; | 
| 397 | 		    *__f++ = (__ret & __urange) + __param.a(); | 
| 398 | 		  } | 
| 399 | 	      } | 
| 400 | 	    else | 
| 401 | 	      { | 
| 402 | 		// downscaling | 
| 403 | 		const __uctype __uerange = __urange + 1; // __urange can be zero | 
| 404 | 		const __uctype __scaling = __urngrange / __uerange; | 
| 405 | 		const __uctype __past = __uerange * __scaling; | 
| 406 | 		while (__f != __t) | 
| 407 | 		  { | 
| 408 | 		    do | 
| 409 | 		      __ret = __uctype(__urng()) - __urngmin; | 
| 410 | 		    while (__ret >= __past); | 
| 411 | 		    *__f++ = __ret / __scaling + __param.a(); | 
| 412 | 		  } | 
| 413 | 	      } | 
| 414 | 	  } | 
| 415 | 	else if (__urngrange < __urange) | 
| 416 | 	  { | 
| 417 | 	    // upscaling | 
| 418 | 	    /* | 
| 419 | 	      Note that every value in [0, urange] | 
| 420 | 	      can be written uniquely as | 
| 421 |  | 
| 422 | 	      (urngrange + 1) * high + low | 
| 423 |  | 
| 424 | 	      where | 
| 425 |  | 
| 426 | 	      high in [0, urange / (urngrange + 1)] | 
| 427 |  | 
| 428 | 	      and | 
| 429 |  | 
| 430 | 	      low in [0, urngrange]. | 
| 431 | 	    */ | 
| 432 | 	    __uctype __tmp; // wraparound control | 
| 433 | 	    while (__f != __t) | 
| 434 | 	      { | 
| 435 | 		do | 
| 436 | 		  { | 
| 437 | 		    constexpr __uctype __uerngrange = __urngrange + 1; | 
| 438 | 		    __tmp = (__uerngrange * operator() | 
| 439 | 			     (__urng, param_type(0, __urange / __uerngrange))); | 
| 440 | 		    __ret = __tmp + (__uctype(__urng()) - __urngmin); | 
| 441 | 		  } | 
| 442 | 		while (__ret > __urange || __ret < __tmp); | 
| 443 | 		*__f++ = __ret; | 
| 444 | 	      } | 
| 445 | 	  } | 
| 446 | 	else | 
| 447 | 	  while (__f != __t) | 
| 448 | 	    *__f++ = __uctype(__urng()) - __urngmin + __param.a(); | 
| 449 |       } | 
| 450 |  | 
| 451 |   // operator!= and operator<< and operator>> are defined in <bits/random.h> | 
| 452 |  | 
| 453 | _GLIBCXX_END_NAMESPACE_VERSION | 
| 454 | } // namespace std | 
| 455 |  | 
| 456 | #endif | 
| 457 |  |