// David Eberly, Geometric Tools, Redmond WA 98052
// Copyright (c) 1998-2020
// Distributed under the Boost Software License, Version 1.0.
// https://www.boost.org/LICENSE_1_0.txt
// https://www.geometrictools.com/License/Boost/LICENSE_1_0.txt
// Version: 4.0.2019.08.13

#pragma once

#include <Mathematics/Math.h>

// Minimax polynomial approximations to log2(x).  The polynomial p(x) of
// degree D minimizes the quantity maximum{|log2(x) - p(x)| : x in [1,2]}
// over all polynomials of degree D.

namespace WwiseGTE
{
    template <typename Real>
    class Log2Estimate
    {
    public:
        // The input constraint is x in [1,2].  For example,
        //   float x; // in [1,2]
        //   float result = Log2Estimate<float>::Degree<3>(x);
        template <int D>
        inline static Real Degree(Real x)
        {
            Real t = x - (Real)1;  // t in (0,1]
            return Evaluate(degree<D>(), t);
        }

        // The input constraint is x > 0.  Range reduction is used to generate
        // a value y in (0,1], call Degree(y), and add the exponent for the
        // power of two in the binary scientific representation of x.  For
        // example,
        //   float x;  // x > 0
        //   float result = Log2Estimate<float>::DegreeRR<3>(x);
        template <int D>
        inline static Real DegreeRR(Real x)
        {
            int p;
            Real y = std::frexp(x, &p);  // y in [1/2,1)
            y = ((Real)2) * y;  // y in [1,2)
            --p;
            Real poly = Degree<D>(y);
            Real result = poly + (Real)p;
            return result;
        }

    private:
        // Metaprogramming and private implementation to allow specialization
        // of a template member function.
        template <int D> struct degree {};

        inline static Real Evaluate(degree<1>, Real t)
        {
            Real poly;
            poly = (Real)GTE_C_LOG2_DEG1_C1;
            poly = poly * t;
            return poly;
        }

        inline static Real Evaluate(degree<2>, Real t)
        {
            Real poly;
            poly = (Real)GTE_C_LOG2_DEG2_C2;
            poly = (Real)GTE_C_LOG2_DEG2_C1 + poly * t;
            poly = poly * t;
            return poly;
        }

        inline static Real Evaluate(degree<3>, Real t)
        {
            Real poly;
            poly = (Real)GTE_C_LOG2_DEG3_C3;
            poly = (Real)GTE_C_LOG2_DEG3_C2 + poly * t;
            poly = (Real)GTE_C_LOG2_DEG3_C1 + poly * t;
            poly = poly * t;
            return poly;
        }

        inline static Real Evaluate(degree<4>, Real t)
        {
            Real poly;
            poly = (Real)GTE_C_LOG2_DEG4_C4;
            poly = (Real)GTE_C_LOG2_DEG4_C3 + poly * t;
            poly = (Real)GTE_C_LOG2_DEG4_C2 + poly * t;
            poly = (Real)GTE_C_LOG2_DEG4_C1 + poly * t;
            poly = poly * t;
            return poly;
        }

        inline static Real Evaluate(degree<5>, Real t)
        {
            Real poly;
            poly = (Real)GTE_C_LOG2_DEG5_C5;
            poly = (Real)GTE_C_LOG2_DEG5_C4 + poly * t;
            poly = (Real)GTE_C_LOG2_DEG5_C3 + poly * t;
            poly = (Real)GTE_C_LOG2_DEG5_C2 + poly * t;
            poly = (Real)GTE_C_LOG2_DEG5_C1 + poly * t;
            poly = poly * t;
            return poly;
        }

        inline static Real Evaluate(degree<6>, Real t)
        {
            Real poly;
            poly = (Real)GTE_C_LOG2_DEG6_C6;
            poly = (Real)GTE_C_LOG2_DEG6_C5 + poly * t;
            poly = (Real)GTE_C_LOG2_DEG6_C4 + poly * t;
            poly = (Real)GTE_C_LOG2_DEG6_C3 + poly * t;
            poly = (Real)GTE_C_LOG2_DEG6_C2 + poly * t;
            poly = (Real)GTE_C_LOG2_DEG6_C1 + poly * t;
            poly = poly * t;
            return poly;
        }

        inline static Real Evaluate(degree<7>, Real t)
        {
            Real poly;
            poly = (Real)GTE_C_LOG2_DEG7_C7;
            poly = (Real)GTE_C_LOG2_DEG7_C6 + poly * t;
            poly = (Real)GTE_C_LOG2_DEG7_C5 + poly * t;
            poly = (Real)GTE_C_LOG2_DEG7_C4 + poly * t;
            poly = (Real)GTE_C_LOG2_DEG7_C3 + poly * t;
            poly = (Real)GTE_C_LOG2_DEG7_C2 + poly * t;
            poly = (Real)GTE_C_LOG2_DEG7_C1 + poly * t;
            poly = poly * t;
            return poly;
        }

        inline static Real Evaluate(degree<8>, Real t)
        {
            Real poly;
            poly = (Real)GTE_C_LOG2_DEG8_C8;
            poly = (Real)GTE_C_LOG2_DEG8_C7 + poly * t;
            poly = (Real)GTE_C_LOG2_DEG8_C6 + poly * t;
            poly = (Real)GTE_C_LOG2_DEG8_C5 + poly * t;
            poly = (Real)GTE_C_LOG2_DEG8_C4 + poly * t;
            poly = (Real)GTE_C_LOG2_DEG8_C3 + poly * t;
            poly = (Real)GTE_C_LOG2_DEG8_C2 + poly * t;
            poly = (Real)GTE_C_LOG2_DEG8_C1 + poly * t;
            poly = poly * t;
            return poly;
        }
    };
}