static_numeric.hpp

浏览该文件的文档.

#ifndef NEFORCE_CORE_NUMERIC_STATIC_NUMERIC_HPP__
#define NEFORCE_CORE_NUMERIC_STATIC_NUMERIC_HPP__

 
#include "NeForce/core/memory/bit.hpp"
#include "NeForce/core/numeric/numeric_traits.hpp"
#include "NeForce/core/typeinfo/type_traits.hpp"
NEFORCE_BEGIN_NAMESPACE__


template <intmax_t Numerator>
struct static_sign : integral_constant<intmax_t, (Numerator < 0) ? -1 : 1> {};

template <intmax_t Value>
struct static_abs : integral_constant<intmax_t, Value * static_sign<Value>::value> {};

template <intmax_t A, intmax_t B>
struct static_gcd : static_gcd<B, (A % B)> {};

template <intmax_t A>
struct static_gcd<A, 0> : integral_constant<intmax_t, static_abs<A>::value> {};
template <intmax_t B>
struct static_gcd<0, B> : integral_constant<intmax_t, static_abs<B>::value> {};
 

template <intmax_t A, intmax_t B>
struct safe_multiply {
private:
    static constexpr uintmax_t half_range = static_cast<uintmax_t>(1) << (sizeof(intmax_t) * 4);
 
    static const uintmax_t a_low = static_abs<A>::value % half_range;
    static const uintmax_t a_high = static_abs<A>::value / half_range;
    static const uintmax_t b_low = static_abs<B>::value % half_range;
    static const uintmax_t b_high = static_abs<B>::value / half_range;
 
    static_assert(a_high == 0 || b_high == 0, "overflow in multiplication");
    static_assert(a_low * b_high + b_low * a_high < (half_range >> 1), "overflow in multiplication");
    static_assert(b_low * a_low <= numeric_traits<intmax_t>::max(), "overflow in multiplication");
    static_assert((a_low * b_high + b_low * a_high) * half_range <= numeric_traits<intmax_t>::max() - b_low * a_low,
                  "overflow in multiplication");
 
public:
    static const intmax_t value = A * B;
};

template <uintmax_t High1, uintmax_t Low1, uintmax_t High2, uintmax_t Low2>
struct big_less : integral_constant<bool, (High1 < High2 || (High1 == High2 && Low1 < Low2))> {};

template <uintmax_t High1, uintmax_t Low1, uintmax_t High2, uintmax_t Low2>
struct big_add {
    static constexpr uintmax_t result_low = Low1 + Low2;                             
    static constexpr uintmax_t result_high = (High1 + High2 + (Low1 + Low2 < Low1)); 
};

template <uintmax_t High1, uintmax_t Low1, uintmax_t High2, uintmax_t Low2>
struct big_sub {
    static_assert(!big_less<High1, Low1, High2, Low2>::value, "Internal library error");
    static constexpr uintmax_t result_low = Low1 - Low2;                      
    static constexpr uintmax_t result_high = (High1 - High2 - (Low1 < Low2)); 
};

template <uintmax_t X, uintmax_t Y>
struct big_mul {
private:
    static constexpr uintmax_t half_range = static_cast<uintmax_t>(1) << (sizeof(intmax_t) * 4);
    static constexpr uintmax_t x_low = X % half_range;
    static constexpr uintmax_t x_high = X / half_range;
    static constexpr uintmax_t y_low = Y % half_range;
    static constexpr uintmax_t y_high = Y / half_range;
    static constexpr uintmax_t low_product = x_low * y_low;                 
    static constexpr uintmax_t cross_product1 = x_low * y_high;             
    static constexpr uintmax_t cross_product2 = x_high * y_low;             
    static constexpr uintmax_t cross_sum = cross_product1 + cross_product2; 
    static constexpr uintmax_t cross_sum_low = cross_sum * half_range;      
    static constexpr uintmax_t cross_sum_high =
            cross_sum / half_range + ((cross_sum < cross_product1) ? half_range : 0);         
    using result_type = big_add<cross_sum_high, cross_sum_low, x_high * y_high, low_product>; 
public:
    static constexpr uintmax_t result_high = result_type::result_high; 
    static constexpr uintmax_t result_low = result_type::result_low;   
};

NEFORCE_BEGIN_INNER__
template <uintmax_t NumHigh, uintmax_t NumLow, uintmax_t Den>
struct __big_div_impl {
private:
    static_assert(Den >= (static_cast<uintmax_t>(1) << (sizeof(intmax_t) * 8 - 1)), "Internal library error");
    static_assert(NumHigh < Den, "Internal library error");
    static constexpr uintmax_t half_range = static_cast<uintmax_t>(1) << (sizeof(intmax_t) * 4);
    static constexpr uintmax_t den_high = Den / half_range;
    static constexpr uintmax_t den_low = Den % half_range;
 
    static constexpr uintmax_t quot_high1 = NumHigh / den_high;
    static constexpr uintmax_t rem_high1 = NumHigh % den_high;
    static constexpr uintmax_t temp1 = quot_high1 * den_low;
    static constexpr uintmax_t rem_high2 = rem_high1 * half_range + NumLow / half_range;
    static constexpr uintmax_t rem_high3 = rem_high2 + Den;
    static constexpr uintmax_t rem_high_final =
            ((rem_high2 < temp1) ? ((rem_high3 >= Den) && (rem_high3 < temp1)) ? (rem_high3 + Den) : rem_high3
                                 : rem_high2) -
            temp1;
    static constexpr uintmax_t quot_high_final =
            quot_high1 - ((rem_high2 < temp1) ? ((rem_high3 >= Den) && (rem_high3 < temp1)) ? 2 : 1 : 0);
    static constexpr uintmax_t quot_low1 = rem_high_final / den_high;
    static constexpr uintmax_t rem_low1 = rem_high_final % den_high;
    static constexpr uintmax_t temp2 = quot_low1 * den_low;
    static constexpr uintmax_t rem_low2 = rem_low1 * half_range + NumLow % half_range;
    static constexpr uintmax_t rem_low3 = rem_low2 + Den;
    static constexpr uintmax_t rem_low_final =
            ((rem_low2 < temp2) ? ((rem_low3 >= Den) && (rem_low3 < temp2)) ? (rem_low3 + Den) : rem_low3 : rem_low2) -
            temp2;
    static constexpr uintmax_t quot_low_final =
            quot_low1 - ((rem_low2 < temp2) ? ((rem_low3 >= Den) && (rem_low3 < temp2)) ? 2 : 1 : 0);
 
public:
    static constexpr uintmax_t quotient = quot_high_final * half_range + quot_low_final; 
    static constexpr uintmax_t remainder = rem_low_final;                                
 
private:
    using product = big_mul<quotient, Den>;
    using sum = big_add<product::result_high, product::result_low, 0, remainder>;
    static_assert(sum::result_high == NumHigh && sum::result_low == NumLow, "Internal library error");
};
NEFORCE_END_INNER__

template <uintmax_t NumHigh, uintmax_t NumLow, uintmax_t Den>
struct big_div {
private:
    static_assert(Den != 0, "Internal library error");
    static_assert(sizeof(uintmax_t) == sizeof(unsigned long long), "clzll is unsafe on your platform.");
    static constexpr int leading_zeros = _NEFORCE countl_zero(Den);                        
    static constexpr int complement_shift = sizeof(uintmax_t) * 8 - leading_zeros;         
    static constexpr int actual_shift = (leading_zeros != 0) ? complement_shift : 0;       
    static constexpr uintmax_t shift_factor1 = static_cast<uintmax_t>(1) << leading_zeros; 
    static constexpr uintmax_t shift_factor2 = static_cast<uintmax_t>(1) << actual_shift;  
    static constexpr uintmax_t scaled_den = Den * shift_factor1;                           
    static constexpr uintmax_t scaled_num_low = NumLow * shift_factor1;                    
    static constexpr uintmax_t num_high_shifted = (NumHigh % Den) * shift_factor1;         
    static constexpr uintmax_t num_low_high =
            (leading_zeros != 0) ? (NumLow / shift_factor2) : 0;                  
    static constexpr uintmax_t scaled_num_high = num_high_shifted + num_low_high; 
    using division_result = inner::__big_div_impl<scaled_num_high, scaled_num_low, scaled_den>; 
 
public:
    static constexpr uintmax_t quotient_high = NumHigh / Den;                          
    static constexpr uintmax_t quotient_low = division_result::quotient;               
    static constexpr uintmax_t remainder = division_result::remainder / shift_factor1; 
 
private:
    using product_low = big_mul<quotient_low, Den>;
    using product_high = big_mul<quotient_high, Den>;
    using total_sum = big_add<product_low::result_high, product_low::result_low, product_high::result_low, remainder>;
 
    static_assert(product_high::result_high == 0, "Internal library error");
    static_assert(total_sum::result_high >= product_low::result_high, "Internal library error");
 
    static_assert(total_sum::result_high == NumHigh && total_sum::result_low == NumLow, "Internal library error");
    static_assert(remainder < Den, "Internal library error");
};
 // StaticArithmetic


template <uint32_t Base, char Digit>
struct static_char_digit;
 
template <uint32_t Base>
struct static_char_digit<Base, '0'> : uint32_constant<0> {
    using is_valid = true_type;
};
 
template <uint32_t Base>
struct static_char_digit<Base, '1'> : uint32_constant<1> {
    using is_valid = true_type;
};

NEFORCE_BEGIN_INNER__
template <uint32_t Base, uint32_t Value>
struct __static_char_digit_aux : uint32_constant<Value> {
    static_assert(Base > Value, "Invalid digit for given base");
    using is_valid = true_type;
};
NEFORCE_END_INNER__
 
template <uint32_t Base>
struct static_char_digit<Base, '2'> : inner::__static_char_digit_aux<Base, 2> {};
 
template <uint32_t Base>
struct static_char_digit<Base, '3'> : inner::__static_char_digit_aux<Base, 3> {};
 
template <uint32_t Base>
struct static_char_digit<Base, '4'> : inner::__static_char_digit_aux<Base, 4> {};
 
template <uint32_t Base>
struct static_char_digit<Base, '5'> : inner::__static_char_digit_aux<Base, 5> {};
 
template <uint32_t Base>
struct static_char_digit<Base, '6'> : inner::__static_char_digit_aux<Base, 6> {};
 
template <uint32_t Base>
struct static_char_digit<Base, '7'> : inner::__static_char_digit_aux<Base, 7> {};
 
template <uint32_t Base>
struct static_char_digit<Base, '8'> : inner::__static_char_digit_aux<Base, 8> {};
 
template <uint32_t Base>
struct static_char_digit<Base, '9'> : inner::__static_char_digit_aux<Base, 9> {};
 
template <uint32_t Base>
struct static_char_digit<Base, 'a'> : inner::__static_char_digit_aux<Base, 0xa> {};
 
template <uint32_t Base>
struct static_char_digit<Base, 'A'> : inner::__static_char_digit_aux<Base, 0xa> {};
 
template <uint32_t Base>
struct static_char_digit<Base, 'b'> : inner::__static_char_digit_aux<Base, 0xb> {};
 
template <uint32_t Base>
struct static_char_digit<Base, 'B'> : inner::__static_char_digit_aux<Base, 0xb> {};
 
template <uint32_t Base>
struct static_char_digit<Base, 'c'> : inner::__static_char_digit_aux<Base, 0xc> {};
 
template <uint32_t Base>
struct static_char_digit<Base, 'C'> : inner::__static_char_digit_aux<Base, 0xc> {};
 
template <uint32_t Base>
struct static_char_digit<Base, 'd'> : inner::__static_char_digit_aux<Base, 0xd> {};
 
template <uint32_t Base>
struct static_char_digit<Base, 'D'> : inner::__static_char_digit_aux<Base, 0xd> {};
 
template <uint32_t Base>
struct static_char_digit<Base, 'e'> : inner::__static_char_digit_aux<Base, 0xe> {};
 
template <uint32_t Base>
struct static_char_digit<Base, 'E'> : inner::__static_char_digit_aux<Base, 0xe> {};
 
template <uint32_t Base>
struct static_char_digit<Base, 'f'> : inner::__static_char_digit_aux<Base, 0xf> {};
 
template <uint32_t Base>
struct static_char_digit<Base, 'F'> : inner::__static_char_digit_aux<Base, 0xf> {};
 
template <uint32_t Base>
struct static_char_digit<Base, '\''> : uint32_constant<0> {
    using is_valid = false_type;
};
 

NEFORCE_BEGIN_INNER__

template <uint32_t Base, char ThisDigit, char... RestDigits>
struct __power_helper {
private:
    using next_power = typename __power_helper<Base, RestDigits...>::type;
    using current_digit = static_char_digit<Base, ThisDigit>;
 
public:
    using type = uint64_constant<next_power::value*(current_digit::is_valid::value ? Base : 1ULL)>;
};
 
template <uint32_t Base, char Digit>
struct __power_helper<Base, Digit> {
private:
    using current_digit = static_char_digit<Base, Digit>;
 
public:
    using type = uint64_constant<current_digit::is_valid::value>;
};
 
NEFORCE_END_INNER__

template <uint32_t Base, char... Digits>
struct static_power : inner::__power_helper<Base, Digits...>::type {};
 
template <uint32_t Base>
struct static_power<Base> : uint64_constant<0> {};
 

NEFORCE_BEGIN_INNER__

template <uint32_t Base, uint64_t ThisPower, char ThisDigit, char... RestDigits>
struct __number_aux {
private:
    using digit_value = static_char_digit<Base, ThisDigit>;
    using next_number = __number_aux<Base, digit_value::is_valid::value ? ThisPower / Base : ThisPower, RestDigits...>;
 
public:
    using type = uint64_constant<ThisPower * digit_value::value + next_number::type::value>;
 
    static_assert((type::value / ThisPower) == digit_value::value,
                  "Integer literal does not fit in unsigned long long");
};
 
template <uint32_t Base, uint64_t ThisPower, char ThisDigit, char... RestDigits>
struct __number_aux<Base, ThisPower, '\'', ThisDigit, RestDigits...>
: __number_aux<Base, ThisPower, ThisDigit, RestDigits...> {};
 
template <uint32_t Base, char Digit>
struct __number_aux<Base, 1ULL, Digit> {
    using type = uint64_constant<static_char_digit<Base, Digit>::value>;
};
 
NEFORCE_END_INNER__

template <uint32_t Base, char... Digits>
struct static_number : inner::__number_aux<Base, static_power<Base, Digits...>::value, Digits...>::type {};
 
template <uint32_t Base>
struct static_number<Base> : uint64_constant<0> {};
 

template <char... Digits>
struct static_parse_int;
 
template <char... Digits>
struct static_parse_int<'0', 'b', Digits...> : static_number<2U, Digits...>::type {};
 
template <char... Digits>
struct static_parse_int<'0', 'B', Digits...> : static_number<2U, Digits...>::type {};
 
template <char... Digits>
struct static_parse_int<'0', 'x', Digits...> : static_number<16U, Digits...>::type {};
 
template <char... Digits>
struct static_parse_int<'0', 'X', Digits...> : static_number<16U, Digits...>::type {};
 
template <char... Digits>
struct static_parse_int<'0', Digits...> : static_number<8U, Digits...>::type {};
 
template <char... Digits>
struct static_parse_int : static_number<10U, Digits...>::type {};
 

NEFORCE_BEGIN_INNER__

template <uint64_t Value, typename... IntTypes>
struct __select_int_base;
 
template <uint64_t Value, typename IntType, typename... RestIntTypes>
struct __select_int_base<Value, IntType, RestIntTypes...>
: conditional_t<(Value <= numeric_traits<IntType>::max()), integral_constant<IntType, static_cast<IntType>(Value)>,
                __select_int_base<Value, RestIntTypes...>> {};
 
template <uint64_t Value>
struct __select_int_base<Value> {};
 
NEFORCE_END_INNER__

template <char... Digits>
using static_select_int_t =
        typename inner::__select_int_base<static_parse_int<Digits...>::value, unsigned char, unsigned short,
                                          unsigned int, unsigned long, unsigned long long>::type;
 // StaticCharDigit
 
NEFORCE_END_NAMESPACE__
#endif // NEFORCE_CORE_NUMERIC_STATIC_NUMERIC_HPP__