//
//  Copyright (c) 2012 Artyom Beilis (Tonkikh)
//
//  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 "test.hpp"
#include "test_sets.hpp"
#include <boost/nowide/convert.hpp>
#include <boost/nowide/stackstring.hpp>
#include <iostream>

#if defined(BOOST_MSVC) && BOOST_MSVC < 1700
#pragma warning(disable : 4428) // universal-character-name encountered in source
#endif

int main()
{
    try
    {
        std::string hello = "\xd7\xa9\xd7\x9c\xd7\x95\xd7\x9d";
        std::wstring whello = L"\u05e9\u05dc\u05d5\u05dd";
        std::wstring whello_3e = L"\u05e9\u05dc\u05d5\ufffd";
        std::wstring whello_3 = L"\u05e9\u05dc\u05d5";
        // Example filenames used in tests
        std::string example = "\xd7\xa9-\xd0\xbc-\xce\xbd.txt";
        std::wstring wexample = L"\u05e9-\u043c-\u03bd.txt";

        std::cout << "- boost::nowide::widen" << std::endl;
        {
            char const *b = hello.c_str();
            char const *e = b + 8;
            wchar_t buf[6] = {0, 0, 0, 0, 0, 1};
            TEST(boost::nowide::widen(buf, 5, b, e) == buf);
            TEST(buf == whello);
            TEST(buf[5] == 1);
            TEST(boost::nowide::widen(buf, 4, b, e) == 0);
            TEST(boost::nowide::widen(buf, 5, b, e - 1) == buf);
            TEST(buf == whello_3e);
            TEST(boost::nowide::widen(buf, 5, b, e - 2) == buf);
            TEST(buf == whello_3);
            TEST(boost::nowide::widen(buf, 5, b, b) == buf && buf[0] == 0);
            TEST(boost::nowide::widen(buf, 5, b, b + 2) == buf && buf[1] == 0 && buf[0] == whello[0]);
            b = "\xFF\xFF";
            e = b + 2;
            TEST(boost::nowide::widen(buf, 5, b, e) == buf);
            TEST(buf == std::wstring(L"\ufffd\ufffd"));
            b = "\xd7\xa9\xFF";
            e = b + 3;
            TEST(boost::nowide::widen(buf, 5, b, e) == buf);
            TEST(buf == std::wstring(L"\u05e9\ufffd"));
            TEST(boost::nowide::widen(buf, 5, b, b + 1) == buf);
            TEST(buf == std::wstring(L"\ufffd"));
            b = "\xFF\xd7\xa9";
            e = b + 3;
            TEST(boost::nowide::widen(buf, 5, b, e) == buf);
            TEST(buf == std::wstring(L"\ufffd\u05e9"));
            TEST(boost::nowide::widen(example) == wexample);
        }
        std::cout << "- boost::nowide::narrow" << std::endl;
        {
            wchar_t const *b = whello.c_str();
            wchar_t const *e = b + 4;
            char buf[10] = {0};
            buf[9] = 1;
            TEST(boost::nowide::narrow(buf, 9, b, e) == buf);
            TEST(buf == hello);
            TEST(buf[9] == 1);
            TEST(boost::nowide::narrow(buf, 8, b, e) == 0);
            TEST(boost::nowide::narrow(buf, 7, b, e - 1) == buf);
            TEST(buf == hello.substr(0, 6));
            wchar_t tmp[3] = {0xDC01, 0x05e9, 0};
            b = tmp;
            TEST(boost::nowide::narrow(buf, 10, b, b + 2) == buf);
            TEST(buf == std::string("\xEF\xBF\xBD\xd7\xa9"));
            wchar_t tmp2[3] = {0x05e9, 0xD800, 0};
            b = tmp2;
            TEST(boost::nowide::narrow(buf, 10, b, b + 2) == buf);
            TEST(buf == std::string("\xd7\xa9\xEF\xBF\xBD"));
            TEST(boost::nowide::narrow(wexample) == example);
        }
        {
            char buf[3];
            wchar_t wbuf[3];
            TEST(boost::nowide::narrow(buf, 3, L"xy") == std::string("xy"));
            TEST(boost::nowide::widen(wbuf, 3, "xy") == std::wstring(L"xy"));
        }
        std::cout << "- boost::nowide::stackstring" << std::endl;
        {
            {
                boost::nowide::short_stackstring const s;
                TEST(s.c_str());
                TEST(*s.c_str() == '\0');
            }
            {
                TEST(whello.size() >= 3);
                boost::nowide::basic_stackstring<wchar_t, char, 3> sw;
                TEST(sw.convert(hello.c_str()));
                TEST(sw.c_str() == whello);
                TEST(sw.convert(hello.c_str(), hello.c_str() + hello.size()));
                TEST(sw.c_str() == whello);
            }
            {
                TEST(whello.size() < 5);
                boost::nowide::basic_stackstring<wchar_t, char, 5> sw;
                TEST(sw.convert(hello.c_str()));
                TEST(sw.c_str() == whello);
                TEST(sw.convert(hello.c_str(), hello.c_str() + hello.size()));
                TEST(sw.c_str() == whello);
            }
            {
                TEST(hello.size() >= 5);
                boost::nowide::basic_stackstring<char, wchar_t, 5> sw;
                TEST(sw.convert(whello.c_str()));
                TEST(sw.c_str() == hello);
                TEST(sw.convert(whello.c_str(), whello.c_str() + whello.size()));
                TEST(sw.c_str() == hello);
            }
            {
                TEST(hello.size() < 10);
                boost::nowide::basic_stackstring<char, wchar_t, 10> sw;
                TEST(sw.convert(whello.c_str()));
                TEST(sw.c_str() == hello);
                TEST(sw.convert(whello.c_str(), whello.c_str() + whello.size()));
                TEST(sw.c_str() == hello);
            }
            {
                typedef boost::nowide::basic_stackstring<char, wchar_t, 5> stackstring;
                const std::string heapVal = hello;
                TEST(heapVal.size() >= 5); // Will be put on heap
                const std::wstring wtest = L"test";
                const std::string stackVal = "test";
                TEST(stackVal.size() < 5); // Will be put on stack
                stackstring const heap(whello.c_str());
                stackstring const stack(wtest.c_str());

                {
                    stackstring sw2(heap), sw3;
                    sw3 = heap;
                    TEST(sw2.c_str() == heapVal);
                    TEST(sw3.c_str() == heapVal);
                }
                {
                    stackstring sw2(stack), sw3;
                    sw3 = stack;
                    TEST(sw2.c_str() == stackVal);
                    TEST(sw3.c_str() == stackVal);
                }
                {
                    stackstring sw2(stack);
                    sw2 = heap;
                    TEST(sw2.c_str() == heapVal);
                }
                {
                    stackstring sw2(heap);
                    sw2 = stack;
                    TEST(sw2.c_str() == stackVal);
                }
                {
                    stackstring sw2(heap), sw3(stack);
                    swap(sw2, sw3);
                    TEST(sw2.c_str() == stackVal);
                    TEST(sw3.c_str() == heapVal);
                    swap(sw2, sw3);
                    TEST(sw2.c_str() == heapVal);
                    TEST(sw3.c_str() == stackVal);
                }
                {
                    stackstring sw2(heap), sw3(heap);
                    sw3.c_str()[0] = 'z';
                    const std::string val2 = sw3.c_str();
                    swap(sw2, sw3);
                    TEST(sw2.c_str() == val2);
                    TEST(sw3.c_str() == heapVal);
                }
                {
                    stackstring sw2(stack), sw3(stack);
                    sw3.c_str()[0] = 'z';
                    const std::string val2 = sw3.c_str();
                    swap(sw2, sw3);
                    TEST(sw2.c_str() == val2);
                    TEST(sw3.c_str() == stackVal);
                }
                // Sanity check
                TEST(stack.c_str() == stackVal);
                TEST(heap.c_str() == heapVal);
            }
            std::cout << "- Substitutions" << std::endl;
            run_all(boost::nowide::widen, boost::nowide::narrow);
        }
    } catch(std::exception const &e)
    {
        std::cerr << "Failed :" << e.what() << std::endl;
        return 1;
    }

    return 0;
}

///
// vim: tabstop=4 expandtab shiftwidth=4 softtabstop=4