//  Copyright (c) 2012 Robert Ramey
//
// Distributed under the Boost Software License, Version 1.0. (See
// accompanying file LICENSE_1_0.txt or copy at
// http://www.boost.org/LICENSE_1_0.txt)

#include <exception>
#include <cstdlib>   // EXIT_SUCCESS
#include <iostream>
#include <cassert>

#include "../include/checked_result.hpp"
#include "../include/checked.hpp"

template<class T1, class T2>
bool test_add(
    T1 v1,
    T2 v2,
    const char *av1,
    const char *av2,
    char expected_result
){
    std::cout
        << "testing  "
        << av1 << " + " << av2
        << std::endl;

    typedef decltype(T1() + T2()) result_type;

    boost::numeric::checked_result<result_type> result
        = boost::numeric::checked::add<result_type>(
            std::numeric_limits<result_type>::min(),
            std::numeric_limits<result_type>::max(),
            v1,
            v2
        );

    if(result == boost::numeric::checked_result<result_type>::exception_type::no_exception
    && expected_result == 'x'){
        std::cout
            << "failed to detect error in addition "
            << std::hex << result << "(" << std::dec << result << ")"
            << " != "<< av1 << " + " << av2
            << std::endl;
        boost::numeric::checked_result<result_type> result
            = boost::numeric::checked::add<result_type>(
                std::numeric_limits<result_type>::min(),
                std::numeric_limits<result_type>::max(),
                v1,
                v2
            );
        return false;
    }
    else
    if(result != boost::numeric::checked_result<result_type>::exception_type::no_exception
    && expected_result == '.'){
        std::cout
            << "erroneously detected error "
            << std::hex << result <<  av1 << " + " << av2
            << std::endl;
        boost::numeric::checked_result<result_type> result
            = boost::numeric::checked::add<result_type>(
                std::numeric_limits<result_type>::min(),
                std::numeric_limits<result_type>::max(),
                v1,
                v2
            );

        return false;
    }

    return true; // correct result
}

#include "test.hpp"
#include "test_values.hpp"

// note: same test matrix as used in test_add.  Here we test all combinations
// safe and unsafe integers.  in test_checked we test all combinations of
// integer primitives

const char *test_addition_result[VALUE_ARRAY_SIZE] = {
//      0       0       0       0
//      01234567012345670123456701234567
//      01234567890123456789012345678901
/* 0*/ ".........x...x.............x...x",
/* 1*/ ".........x...x.............x...x",
/* 2*/ "..........x...x.........xxxxxxxx",
/* 3*/ "..........x...x.........xxxxxxxx",
/* 4*/ ".........x...x.............x...x",
/* 5*/ ".........x...x.............x...x",
/* 6*/ "..........x...x.........xxxxxxxx",
/* 7*/ "..........x...x.........xxxxxxxx",

/* 8*/ ".........x...x.............x...x",
/* 9*/ "xx..xx..xx...x..xxxxxxxx...x...x",
/*10*/ "..xx..xx..xx..x.........xxxxxxxx",
/*11*/ "..........x...x.........xxxxxxxx",
/*12*/ ".............x.................x",
/*13*/ "xx..xx..xx..xx..xxxxxxxxxxxx...x",
/*14*/ "..xx..xx..xx..xx............xxxx",
/*15*/ "..............x.............xxxx",

//      0       0       0       0
//      01234567012345670123456701234567
//      01234567890123456789012345678901
/*16*/ ".........x...x.............x...x",
/*17*/ ".........x...x.............x...x",
/*18*/ ".........x...x.............x...x",
/*19*/ ".........x...x.............x...x",
/*20*/ ".........x...x.............x...x",
/*21*/ ".........x...x.............x...x",
/*22*/ ".........x...x.............x...x",
/*23*/ ".........x...x.............x...x",

/*24*/ "..xx..xx..xx.x.............x...x",
/*25*/ "..xx..xx..xx.x.............x...x",
/*26*/ "..xx..xx..xx.x............xx...x",
/*27*/ "xxxxxxxxxxxx.x..xxxxxxxxxxxx...x",
/*28*/ "..xx..xx..xx..xx...............x",
/*29*/ "..xx..xx..xx..xx...............x",
/*30*/ "..xx..xx..xx..xx..............xx",
/*31*/ "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx"
};

#define TEST_IMPL(v1, v2, result) \
    rval &= test_add(             \
        v1,                       \
        v2,                       \
        BOOST_PP_STRINGIZE(v1),   \
        BOOST_PP_STRINGIZE(v2),   \
        result                    \
    );
/**/

#define TESTX(value_index1, value_index2)          \
    (std::cout << value_index1 << ',' << value_index2 << ','); \
    TEST_IMPL(                                     \
        BOOST_PP_ARRAY_ELEM(value_index1, VALUES), \
        BOOST_PP_ARRAY_ELEM(value_index2, VALUES), \
        test_addition_result[value_index1][value_index2] \
    )
/**/

#define COUNT sizeof(test_addition_result)

int main(int argc, char *argv[]){
    // sanity check on test matrix - should be symetrical
    for(int i = 0; i < VALUE_ARRAY_SIZE; ++i)
        for(int j = i + 1; j < VALUE_ARRAY_SIZE; ++j)
            assert(test_addition_result[i][j] == test_addition_result[j][i]);

    bool rval = true;

    TEST_EACH_VALUE_PAIR
    return ! rval ;

    return (
        test_add(1, 2, "1", "2", '.')
    ) ? EXIT_SUCCESS : EXIT_FAILURE;
}