///////////////////////////////////////////////////////////////////////////////
// Name:        tests/strings/strings.cpp
// Purpose:     wxString unit test
// Author:      Vadim Zeitlin, Wlodzimierz ABX Skiba
// Created:     2004-04-19
// Copyright:   (c) 2004 Vadim Zeitlin, Wlodzimierz Skiba
///////////////////////////////////////////////////////////////////////////////

// ----------------------------------------------------------------------------
// headers
// ----------------------------------------------------------------------------

#include "testprec.h"


#ifndef WX_PRECOMP
    #include "wx/wx.h"
#endif // WX_PRECOMP

#include "wx/private/localeset.h"

#include <errno.h>

// ----------------------------------------------------------------------------
// tests
// ----------------------------------------------------------------------------

TEST_CASE("StringAssign", "[wxString]")
{
    wxString a, b, c;

    a.reserve (128);
    b.reserve (128);
    c.reserve (128);

    for (int i = 0; i < 2; ++i)
    {
        a = wxT("Hello");
        b = wxT(" world");
        c = wxT("! How'ya doin'?");
        a += b;
        a += c;
        c = wxT("Hello world! What's up?");
        CHECK( c != a );
    }
}

TEST_CASE("StringPChar", "[wxString]")
{
    wxChar a [128];
    wxChar b [128];
    wxChar c [128];

    for (int i = 0; i < 2; ++i)
    {
        wxStrcpy (a, wxT("Hello"));
        wxStrcpy (b, wxT(" world"));
        wxStrcpy (c, wxT("! How'ya doin'?"));
        wxStrcat (a, b);
        wxStrcat (a, c);
        wxStrcpy (c, wxT("Hello world! What's up?"));
        CHECK( wxStrcmp (c, a) != 0 );
    }
}

TEST_CASE("StringFormat", "[wxString]")
{
    wxString s1,s2;
    s1.Printf(wxT("%03d"), 18);
    CHECK( s1 == wxString::Format(wxT("%03d"), 18) );
    s2.Printf(wxT("Number 18: %s\n"), s1.c_str());
    CHECK( s2 == wxString::Format(wxT("Number 18: %s\n"), s1.c_str()) );

    static const size_t lengths[] = { 1, 512, 1024, 1025, 2048, 4096, 4097 };
    for ( size_t n = 0; n < WXSIZEOF(lengths); n++ )
    {
        const size_t len = lengths[n];

        wxString s(wxT('Z'), len);
        CHECK( wxString::Format(wxT("%s"), s.c_str()).length() == len );
    }

    // wxString::Format() should not modify errno
    errno = 1234;
    wxString::Format("abc %d %d", 1, 1);
    CHECK( errno == 1234 );

    // Positional parameters tests:
    CHECK(wxString::Format(wxT("%2$s %1$s"), wxT("one"), wxT("two")) == "two one");
    CHECK(wxString::Format("%1$s %1$s", "hello") == "hello hello");
    CHECK(wxString::Format("%4$d %2$s %1$s %2$s %3$d", "hello", "world", 3, 4)
            == "4 world hello world 3");

    CHECK( wxString::Format("%1$o %1$d %1$x", 20) == "24 20 14" );
}

TEST_CASE("StringFormatUnicode", "[wxString]")
{
    // For some completely mysterious reason, the test below sometimes crashes
    // when run on GitHub Actions with MSVS 2019 in static debug build (see
    // #25056), so skip it in this case.
#if defined(_MSC_VER) && defined(_DEBUG) && !defined(WXUSINGDLL)
    #if _MSC_VER >= 1920 && _MSC_VER < 1930
        if ( IsAutomaticTest() )
        {
            WARN("Skipping test in static debug build with MSVS 2019");
            return;
        }
    #endif // MSVS 2019
#endif // _MSC_VER

#ifndef __WINDOWS__
    // At least under FreeBSD vsnprintf(), used by wxString::Format(), doesn't
    // work with Unicode strings unless a UTF-8 locale is used, so set it.
    wxLocaleSetter loc("C.UTF-8");
#endif // !__WINDOWS__

    wxString fmt = wxString::FromUTF8("Iestatī");
    wxString s = wxString::Format(fmt, 1, 1);
    wxString expected(fmt);
    expected.Replace("%i", "1");
    CHECK( s == expected );

    // Repeat exactly the same after creating a wxLocale
    // object, and ensure formatting Unicode strings still works.
    wxLocale l(wxLANGUAGE_DEFAULT);

    wxString s2 = wxString::Format(fmt, 1, 1);
    wxString expected2(fmt);
    expected2.Replace("%i", "1");
    CHECK( s2 == expected2 );
}

TEST_CASE("StringConstructors", "[wxString]")
{
    CHECK( wxString('Z', 0) == "" );
    CHECK( wxString('Z') == "Z" );
    CHECK( wxString('Z', 4) == "ZZZZ" );
    CHECK( wxString("Hello", 4) == "Hell" );
    CHECK( wxString("Hello", 5) == "Hello" );

    CHECK( wxString(L'Z', 0) == L"" );
    CHECK( wxString(L'Z') == L"Z" );
    CHECK( wxString(L'Z', 4) == L"ZZZZ" );
    CHECK( wxString(L"Hello", 4) == L"Hell" );
    CHECK( wxString(L"Hello", 5) == L"Hello" );

    CHECK( wxString(wxString(), 17).length() == 0 );

#if wxUSE_UNICODE_UTF8
    // This string has 3 characters (<h>, <e'> and <l>), not 4 when using UTF-8
    // locale!
    if ( wxConvLibc.IsUTF8() )
    {
        wxString s3("h\xc3\xa9llo", 4);
        CHECK( s3.length() == 3 );
        CHECK( (char)s3[2] == 'l' );
    }
#endif // wxUSE_UNICODE_UTF8


    static const char *s = "?really!";
    const char *start = wxStrchr(s, 'r');
    const char *end = wxStrchr(s, '!');
    CHECK( wxString(start, end) == "really" );

    // test if creating string from null C pointer works:
    CHECK( wxString((const char *)nullptr) == "" );
}

TEST_CASE("StringStaticConstructors", "[wxString]")
{
    CHECK( wxString::FromAscii("") == "" );
    CHECK( wxString::FromAscii("Hello", 0) == "" );
    CHECK( wxString::FromAscii("Hello", 4) == "Hell" );
    CHECK( wxString::FromAscii("Hello", 5) == "Hello" );
    CHECK( wxString::FromAscii("Hello") == "Hello" );

    // FIXME: this doesn't work currently but should!
    //CHECK( wxString::FromAscii("", 1).length() == 1 );


    CHECK( wxString::FromUTF8("") == "" );
    CHECK( wxString::FromUTF8("Hello", 0) == "" );
    CHECK( wxString::FromUTF8("Hello", 4) == "Hell" );
    CHECK( wxString::FromUTF8("Hello", 5) == "Hello" );
    CHECK( wxString::FromUTF8("Hello") == "Hello" );

    CHECK( wxString::FromUTF8("h\xc3\xa9llo", 3).length() == 2 );


    //CHECK( wxString::FromUTF8("", 1).length() == 1 );
}

TEST_CASE("StringAssignUTF8", "[wxString]")
{
    wxString s;
    s.AssignFromUTF8("Oberfläche");
    CHECK( s == wxString::FromUTF8("Oberfläche") );

    s.AssignFromUTF8("fläche");
    CHECK( s == wxString::FromUTF8("fläche") );

    s.AssignFromUTF8("Even longer than Oberfläche");
    CHECK( s == wxString::FromUTF8("Even longer than Oberfläche") );

    s.AssignFromUTF8(nullptr);
    CHECK( s == wxString() );
}

TEST_CASE("StringExtraction", "[wxString]")
{
    wxString s(wxT("Hello, world!"));

    CHECK( wxStrcmp( s.c_str() , wxT("Hello, world!") ) == 0 );
    CHECK( wxStrcmp( s.Left(5).c_str() , wxT("Hello") ) == 0 );
    CHECK( wxStrcmp( s.Right(6).c_str() , wxT("world!") ) == 0 );
    CHECK( wxStrcmp( s(3, 5).c_str() , wxT("lo, w") ) == 0 );
    CHECK( wxStrcmp( s.Mid(3).c_str() , wxT("lo, world!") ) == 0 );
    CHECK( wxStrcmp( s.substr(3, 5).c_str() , wxT("lo, w") ) == 0 );
    CHECK( wxStrcmp( s.substr(3).c_str() , wxT("lo, world!") ) == 0 );

    wxString strUnicode(wxString::FromUTF8("Oberfläche"));

    CHECK( strUnicode.Mid(0, 10) == strUnicode );
    CHECK( strUnicode.Mid(7, 2) == "ch" );

    wxString rest;

    #define TEST_STARTS_WITH(prefix, correct_rest, result)                    \
        CHECK(s.StartsWith(prefix, &rest) == result);                         \
        if ( result )                                                         \
            CHECK(rest == correct_rest)

    TEST_STARTS_WITH( wxT("Hello"),           wxT(", world!"),      true  );
    TEST_STARTS_WITH( wxT("Hello, "),         wxT("world!"),        true  );
    TEST_STARTS_WITH( wxT("Hello, world!"),   wxT(""),              true  );
    TEST_STARTS_WITH( wxT("Hello, world!!!"), wxT(""),              false );
    TEST_STARTS_WITH( wxT(""),                wxT("Hello, world!"), true  );
    TEST_STARTS_WITH( wxT("Goodbye"),         wxT(""),              false );
    TEST_STARTS_WITH( wxT("Hi"),              wxT(""),              false );

    #undef TEST_STARTS_WITH

    rest = "Hello world";
    CHECK( rest.StartsWith("Hello ", &rest) );
    CHECK( rest == "world" );

    #define TEST_ENDS_WITH(suffix, correct_rest, result)                      \
        CHECK(s.EndsWith(suffix, &rest) == result);                           \
        if ( result )                                                         \
            CHECK(rest == correct_rest)

    TEST_ENDS_WITH( wxT(""),                 wxT("Hello, world!"), true  );
    TEST_ENDS_WITH( wxT("!"),                wxT("Hello, world"),  true  );
    TEST_ENDS_WITH( wxT(", world!"),         wxT("Hello"),         true  );
    TEST_ENDS_WITH( wxT("ello, world!"),     wxT("H"),             true  );
    TEST_ENDS_WITH( wxT("Hello, world!"),    wxT(""),              true  );
    TEST_ENDS_WITH( wxT("very long string"), wxT(""),              false );
    TEST_ENDS_WITH( wxT("?"),                wxT(""),              false );
    TEST_ENDS_WITH( wxT("Hello, world"),     wxT(""),              false );
    TEST_ENDS_WITH( wxT("Gello, world!"),    wxT(""),              false );

    #undef TEST_ENDS_WITH
}

TEST_CASE("StringTrim", "[wxString]")
{
    #define TEST_TRIM( str , dir , result )  \
        CHECK( wxString(str).Trim(dir) == result )

    TEST_TRIM( wxT("  Test  "),  true, wxT("  Test") );
    TEST_TRIM( wxT("    "),      true, wxT("")       );
    TEST_TRIM( wxT(" "),         true, wxT("")       );
    TEST_TRIM( wxT(""),          true, wxT("")       );

    TEST_TRIM( wxT("  Test  "),  false, wxT("Test  ") );
    TEST_TRIM( wxT("    "),      false, wxT("")       );
    TEST_TRIM( wxT(" "),         false, wxT("")       );
    TEST_TRIM( wxT(""),          false, wxT("")       );

    #undef TEST_TRIM
}

TEST_CASE("StringFind", "[wxString]")
{
    #define TEST_FIND( str , start , result )  \
        CHECK( wxString(str).find(wxT("ell"), start) == result );

    TEST_FIND( wxT("Well, hello world"),  0, 1              );
    TEST_FIND( wxT("Well, hello world"),  6, 7              );
    TEST_FIND( wxT("Well, hello world"),  9, wxString::npos );

    #undef TEST_FIND
}

TEST_CASE("StringReplace", "[wxString]")
{
    #define TEST_REPLACE( original , pos , len , replacement , result ) \
        { \
            wxString s = original; \
            s.replace( pos , len , replacement ); \
            CHECK( s == result ); \
        }

    TEST_REPLACE( wxT("012-AWORD-XYZ"), 4, 5, wxT("BWORD"),  wxT("012-BWORD-XYZ") );
    TEST_REPLACE( wxT("increase"),      0, 2, wxT("de"),     wxT("decrease")      );
    TEST_REPLACE( wxT("wxWindow"),      8, 0, wxT("s"),      wxT("wxWindows")     );
    TEST_REPLACE( wxT("foobar"),        3, 0, wxT("-"),      wxT("foo-bar")       );
    TEST_REPLACE( wxT("barfoo"),        0, 6, wxT("foobar"), wxT("foobar")        );


    #define TEST_NULLCHARREPLACE( o , olen, pos , len , replacement , r, rlen ) \
        { \
            wxString s(o,olen); \
            s.replace( pos , len , replacement ); \
            CHECK( s == wxString(r, rlen) ); \
        }

    TEST_NULLCHARREPLACE( wxT("null\0char"), 9, 5, 1, wxT("d"),
                          wxT("null\0dhar"), 9 );

    #define TEST_WXREPLACE( o , olen, olds, news, all, r, rlen ) \
        { \
            wxString s(o,olen); \
            s.Replace( olds, news, all ); \
            CHECK( s == wxString(r, rlen) ); \
        }

    TEST_WXREPLACE( wxT("null\0char"), 9, wxT("c"), wxT("de"), true,
                          wxT("null\0dehar"), 10 );

    TEST_WXREPLACE( wxT("null\0dehar"), 10, wxT("de"), wxT("c"), true,
                          wxT("null\0char"), 9 );

    TEST_WXREPLACE( "life", 4, "f", "", false, "lie", 3 );
    TEST_WXREPLACE( "life", 4, "f", "", true, "lie", 3 );
    TEST_WXREPLACE( "life", 4, "fe", "ve", true, "live", 4 );
    TEST_WXREPLACE( "xx", 2, "x", "yy", true, "yyyy", 4 );
    TEST_WXREPLACE( "xxx", 3, "xx", "z", true, "zx", 2 );

    #undef TEST_WXREPLACE
    #undef TEST_NULLCHARREPLACE
    #undef TEST_REPLACE
}

TEST_CASE("StringMatch", "[wxString]")
{
    #define TEST_MATCH( s1 , s2 , result ) \
        CHECK( wxString(s1).Matches(s2) == result )

    TEST_MATCH( "foobar",       "foo*",        true  );
    TEST_MATCH( "foobar",       "*oo*",        true  );
    TEST_MATCH( "foobar",       "*bar",        true  );
    TEST_MATCH( "foobar",       "??????",      true  );
    TEST_MATCH( "foobar",       "f??b*",       true  );
    TEST_MATCH( "foobar",       "f?b*",        false );
    TEST_MATCH( "foobar",       "*goo*",       false );
    TEST_MATCH( "foobar",       "*foo",        false );
    TEST_MATCH( "foobarfoo",    "*foo",        true  );
    TEST_MATCH( "",             "*",           true  );
    TEST_MATCH( "",             "?",           false );

    #undef TEST_MATCH
}


TEST_CASE("StringCaseChanges", "[wxString]")
{
    wxString s1(wxT("Hello!"));
    wxString s1u(s1);
    wxString s1l(s1);
    s1u.MakeUpper();
    s1l.MakeLower();

    CHECK( s1u == wxT("HELLO!") );
    CHECK( s1l == wxT("hello!") );

    wxString s2u, s2l;
    s2u.MakeUpper();
    s2l.MakeLower();

    CHECK( s2u == "" );
    CHECK( s2l == "" );


    wxString s3("good bye");
    CHECK( s3.Capitalize() == "Good bye" );
    s3.MakeCapitalized();
    CHECK( s3 == "Good bye" );

    CHECK( wxString("ABC").Capitalize() == "Abc" );

    CHECK( wxString().Capitalize() == "" );
}

TEST_CASE("StringCompare", "[wxString]")
{
    wxString s1 = wxT("AHH");
    wxString eq = wxT("AHH");
    wxString neq1 = wxT("HAH");
    wxString neq2 = wxT("AH");
    wxString neq3 = wxT("AHHH");
    wxString neq4 = wxT("AhH");

    CHECK( s1 == eq );
    CHECK( s1 != neq1 );
    CHECK( s1 != neq2 );
    CHECK( s1 != neq3 );
    CHECK( s1 != neq4 );

    CHECK( s1 == wxT("AHH") );
    CHECK( s1 != wxT("no") );
    CHECK( s1 < wxT("AZ") );
    CHECK( s1 <= wxT("AZ") );
    CHECK( s1 <= wxT("AHH") );
    CHECK( s1 > wxT("AA") );
    CHECK( s1 >= wxT("AA") );
    CHECK( s1 >= wxT("AHH") );

    // test comparison with C strings in Unicode build (must work in ANSI as
    // well, of course):
    CHECK( s1 == "AHH" );
    CHECK( s1 != "no" );
    CHECK( s1 < "AZ" );
    CHECK( s1 <= "AZ" );
    CHECK( s1 <= "AHH" );
    CHECK( s1 > "AA" );
    CHECK( s1 >= "AA" );
    CHECK( s1 >= "AHH" );

//    wxString _s1 = wxT("A\0HH");
//    wxString _eq = wxT("A\0HH");
//    wxString _neq1 = wxT("H\0AH");
//    wxString _neq2 = wxT("A\0H");
//    wxString _neq3 = wxT("A\0HHH");
//    wxString _neq4 = wxT("A\0hH");
    s1.insert(1,1,'\0');
    eq.insert(1,1,'\0');
    neq1.insert(1,1,'\0');
    neq2.insert(1,1,'\0');
    neq3.insert(1,1,'\0');
    neq4.insert(1,1,'\0');

    CHECK( s1 == eq );
    CHECK( s1 != neq1 );
    CHECK( s1 != neq2 );
    CHECK( s1 != neq3 );
    CHECK( s1 != neq4 );

    CHECK( wxString("\n").Cmp(" ") < 0 );
    CHECK( wxString("'").Cmp("!") > 0 );
    CHECK( wxString("!").Cmp("z") < 0 );
}

#ifdef __cpp_lib_three_way_comparison
TEST_CASE("StringCompareThreeWay", "[wxString]")
{
    // test that operator<=> works and compares by string contents

    wxString a(wxT("bar"));
    wxString b(wxT("bar"));
    wxString c(wxT("baz"));

    CHECK((a <=> b) == std::strong_ordering::equal);
    CHECK((a <=> c) == std::strong_ordering::less);
    CHECK((c <=> a) == std::strong_ordering::greater);
}
#endif // __cpp_lib_three_way_comparison

TEST_CASE("StringCompareNoCase", "[wxString]")
{
    wxString s1 = wxT("AHH");
    wxString eq = wxT("AHH");
    wxString eq2 = wxT("AhH");
    wxString eq3 = wxT("ahh");
    wxString neq = wxT("HAH");
    wxString neq2 = wxT("AH");
    wxString neq3 = wxT("AHHH");

    #define CHECK_EQ_NO_CASE(s1, s2) CHECK( s1.CmpNoCase(s2) == 0)
    #define CHECK_NEQ_NO_CASE(s1, s2) CHECK( s1.CmpNoCase(s2) != 0)

    CHECK_EQ_NO_CASE( s1, eq );
    CHECK_EQ_NO_CASE( s1, eq2 );
    CHECK_EQ_NO_CASE( s1, eq3 );

    CHECK_NEQ_NO_CASE( s1, neq );
    CHECK_NEQ_NO_CASE( s1, neq2 );
    CHECK_NEQ_NO_CASE( s1, neq3 );


//    wxString _s1 = wxT("A\0HH");
//    wxString _eq = wxT("A\0HH");
//    wxString _eq2 = wxT("A\0hH");
//    wxString _eq3 = wxT("a\0hh");
//    wxString _neq = wxT("H\0AH");
//    wxString _neq2 = wxT("A\0H");
//    wxString _neq3 = wxT("A\0HHH");

    s1.insert(1,1,'\0');
    eq.insert(1,1,'\0');
    eq2.insert(1,1,'\0');
    eq3.insert(1,1,'\0');
    neq.insert(1,1,'\0');
    neq2.insert(1,1,'\0');
    neq3.insert(1,1,'\0');

    CHECK_EQ_NO_CASE( s1, eq );
    CHECK_EQ_NO_CASE( s1, eq2 );
    CHECK_EQ_NO_CASE( s1, eq3 );

    CHECK_NEQ_NO_CASE( s1, neq );
    CHECK_NEQ_NO_CASE( s1, neq2 );
    CHECK_NEQ_NO_CASE( s1, neq3 );

    CHECK( wxString("\n").CmpNoCase(" ") < 0 );
    CHECK( wxString("'").CmpNoCase("!") > 0);
    CHECK( wxString("!").Cmp("Z") < 0 );
}

TEST_CASE("StringContains", "[wxString]")
{
    static const struct ContainsData
    {
        const wxChar *hay;
        const wxChar *needle;
        bool contains;
    } containsData[] =
    {
        { wxT(""),       wxT(""),         true  },
        { wxT(""),       wxT("foo"),      false },
        { wxT("foo"),    wxT(""),         true  },
        { wxT("foo"),    wxT("f"),        true  },
        { wxT("foo"),    wxT("o"),        true  },
        { wxT("foo"),    wxT("oo"),       true  },
        { wxT("foo"),    wxT("ooo"),      false },
        { wxT("foo"),    wxT("oooo"),     false },
        { wxT("foo"),    wxT("fooo"),     false },
    };

    for ( size_t n = 0; n < WXSIZEOF(containsData); n++ )
    {
        const ContainsData& cd = containsData[n];
        CHECK( wxString(cd.hay).Contains(cd.needle) == cd.contains );
    }
}

// flags used in ToLongData.flags
enum
{
    Number_Ok       = 0,
    Number_Invalid  = 1,
    Number_Unsigned = 2,    // if not specified, works for signed conversion
    Number_Signed   = 4,    // if not specified, works for unsigned
    Number_LongLong = 8,    // only for long long tests
    Number_Long     = 16,   // only for long tests
    Number_Int      = 32    // only for int tests
};

wxGCC_WARNING_SUPPRESS(missing-field-initializers)

static const struct ToIntData
{
    const wxChar *str;
    wxLongLong_t value;
    int flags;
    int base;

    int IValue() const { return value; }
    unsigned int UIValue() const { return value; }

    bool IsOk() const { return !(flags & Number_Invalid); }
} intData[] =
{
    { wxT("1"), 1, Number_Ok },
    { wxT("0"), 0, Number_Ok },
    { wxT("a"), 0, Number_Invalid },
    { wxT("12345"), 12345, Number_Ok },
    { wxT("--1"), 0, Number_Invalid },

    { wxT("-1"), -1, Number_Signed | Number_Int },
    { wxT("-1"), (wxLongLong_t)UINT_MAX, Number_Unsigned | Number_Int | Number_Invalid },

    { wxT("2147483647"), (wxLongLong_t)INT_MAX, Number_Int | Number_Signed },
    { wxT("2147483648"), (wxLongLong_t)INT_MAX, Number_Int | Number_Signed | Number_Invalid },

    { wxT("-2147483648"), (wxLongLong_t)INT_MIN, Number_Int | Number_Signed },
    { wxT("-2147483649"), (wxLongLong_t)INT_MIN, Number_Int | Number_Signed | Number_Invalid },

    { wxT("4294967295"), (wxLongLong_t)UINT_MAX, Number_Int | Number_Unsigned },
    { wxT("4294967296"), (wxLongLong_t)UINT_MAX, Number_Int | Number_Unsigned | Number_Invalid },
};

static const struct ToLongData
{
    const wxChar *str;
    wxLongLong_t value;
    int flags;
    int base;

    long LValue() const { return value; }
    unsigned long ULValue() const { return value; }
    wxLongLong_t LLValue() const { return value; }
    wxULongLong_t ULLValue() const { return (wxULongLong_t)value; }

    bool IsOk() const { return !(flags & Number_Invalid); }
} longData[] =
{
    { wxT("1"), 1, Number_Ok },
    { wxT("0"), 0, Number_Ok },
    { wxT("a"), 0, Number_Invalid },
    { wxT("12345"), 12345, Number_Ok },
    { wxT("--1"), 0, Number_Invalid },

    { wxT("-1"), -1, Number_Signed | Number_Long },
    // this is surprising but consistent with strtoul() behaviour
    { wxT("-1"), (wxLongLong_t)ULONG_MAX, Number_Unsigned | Number_Long },
    // a couple of edge cases
    { wxT(" +1"), 1, Number_Ok },
    { wxT(" -1"), (wxLongLong_t)ULONG_MAX, Number_Unsigned | Number_Long },

    // this must overflow, even with 64 bit long
    { wxT("922337203685477580711"), 0, Number_Invalid },

    { wxT("2147483648"), wxLL(2147483648), Number_LongLong },
    { wxT("-2147483648"), wxLL(-2147483648), Number_LongLong | Number_Signed },
    { wxT("9223372036854775808"),
      (wxLongLong_t)wxULL(9223372036854775808),
      Number_LongLong | Number_Unsigned },

    // Base tests.
    { wxT("010"),  10, Number_Ok, 10 },
    { wxT("010"),   8, Number_Ok,  0 },
    { wxT("010"),   8, Number_Ok,  8 },
    { wxT("010"),  16, Number_Ok, 16 },

    { wxT("0010"), 10, Number_Ok, 10 },
    { wxT("0010"),  8, Number_Ok,  0 },
    { wxT("0010"),  8, Number_Ok,  8 },
    { wxT("0010"), 16, Number_Ok, 16 },

    { wxT("0x11"),  0, Number_Invalid, 10 },
    { wxT("0x11"), 17, Number_Ok,       0 },
    { wxT("0x11"),  0, Number_Invalid,  8 },
    { wxT("0x11"), 17, Number_Ok,      16 },

    {
#if SIZEOF_LONG == 4
      wxT("0xffffffff"),
#elif SIZEOF_LONG == 8
      wxT("0xffffffffffffffff"),
#else
    #error "Unknown sizeof(long)"
#endif
      (wxLongLong_t)ULONG_MAX, Number_Unsigned, 0
    },
};

wxGCC_WARNING_RESTORE(missing-field-initializers)

TEST_CASE("StringToInt", "[wxString]")
{
    int i;
    for (size_t n = 0; n < WXSIZEOF(intData); n++)
    {
        const ToIntData &id = intData[n];

        if (id.flags & (Number_Unsigned))
            continue;

        CHECK(id.IsOk() == wxString(id.str).ToInt(&i, id.base));

        if (id.IsOk())
            CHECK( i == id.IValue() );
    }

    // special case: check that the output is not modified if the parsing
    // failed completely
    i = 17;
    CHECK(!wxString("foo").ToInt(&i));
    CHECK( i == 17 );

    // also check that it is modified if we did parse something successfully in
    // the beginning of the string
    CHECK(!wxString("9 cats").ToInt(&i));
    CHECK( i == 9 );
}

TEST_CASE("StringToUInt", "[wxString]")
{
    unsigned int i;
    for (size_t n = 0; n < WXSIZEOF(intData); n++)
    {
        const ToIntData &id = intData[n];

        if (id.flags & (Number_Signed))
            continue;

        CHECK(id.IsOk() == wxString(id.str).ToUInt(&i, id.base));

        if (id.IsOk())
            CHECK( i == id.UIValue() );
    }

    // special case: check that the output is not modified if the parsing
    // failed completely
    i = 17;
    CHECK(!wxString("foo").ToUInt(&i));
    CHECK( i == 17 );

    // also check that it is modified if we did parse something successfully in
    // the beginning of the string
    CHECK(!wxString("9 cats").ToUInt(&i));
    CHECK( i == 9 );
}

TEST_CASE("StringToLong", "[wxString]")
{
    long l;
    for ( size_t n = 0; n < WXSIZEOF(longData); n++ )
    {
        const ToLongData& ld = longData[n];

        if ( ld.flags & (Number_LongLong | Number_Unsigned) )
            continue;

        INFO("Checking test case #" << (n + 1) << ": "
             "\"" << wxString{ld.str} << "\" "
             "(flags=" << ld.flags << ", base=" << ld.base << ")");

        // NOTE: unless you're using some exotic locale, ToCLong and ToLong
        //       should behave the same for our test data set:

        CHECK( ld.IsOk() == wxString(ld.str).ToCLong(&l, ld.base) );
        if ( ld.IsOk() )
            CHECK( l == ld.LValue() );

        CHECK( ld.IsOk() == wxString(ld.str).ToLong(&l, ld.base) );
        if ( ld.IsOk() )
            CHECK( l == ld.LValue() );
    }

    // special case: check that the output is not modified if the parsing
    // failed completely
    l = 17;
    CHECK( !wxString("foo").ToLong(&l) );
    CHECK( l == 17 );

    // also check that it is modified if we did parse something successfully in
    // the beginning of the string
    CHECK( !wxString("9 cats").ToLong(&l) );
    CHECK( l == 9 );
}

TEST_CASE("StringToULong", "[wxString]")
{
    unsigned long ul;
    for ( size_t n = 0; n < WXSIZEOF(longData); n++ )
    {
        const ToLongData& ld = longData[n];

        if ( ld.flags & (Number_LongLong | Number_Signed) )
            continue;

        INFO("Checking test case #" << (n + 1) << ": "
             "\"" << wxString{ld.str} << "\" "
             "(flags=" << ld.flags << ", base=" << ld.base << ")");

        // NOTE: unless you're using some exotic locale, ToCLong and ToLong
        //       should behave the same for our test data set:

        CHECK( ld.IsOk() == wxString(ld.str).ToCULong(&ul, ld.base) );
        if ( ld.IsOk() )
            CHECK( ul == ld.ULValue() );

        CHECK( ld.IsOk() == wxString(ld.str).ToULong(&ul, ld.base) );
        if ( ld.IsOk() )
            CHECK( ul == ld.ULValue() );
    }
}

TEST_CASE("StringToLongLong", "[wxString]")
{
    wxLongLong_t l;
    for ( size_t n = 0; n < WXSIZEOF(longData); n++ )
    {
        const ToLongData& ld = longData[n];

        if ( ld.flags & (Number_Long | Number_Unsigned) )
            continue;

        CHECK( ld.IsOk() == wxString(ld.str).ToLongLong(&l, ld.base) );
        if ( ld.IsOk() )
            CHECK( l == ld.LLValue() );
    }
}

TEST_CASE("StringToULongLong", "[wxString]")
{
    wxULongLong_t ul;
    for ( size_t n = 0; n < WXSIZEOF(longData); n++ )
    {
        const ToLongData& ld = longData[n];

        if ( ld.flags & (Number_Long | Number_Signed) )
            continue;

        CHECK( ld.IsOk() == wxString(ld.str).ToULongLong(&ul, ld.base) );
        if ( ld.IsOk() )
            CHECK( ul == ld.ULLValue() );
    }
}

TEST_CASE("StringToDouble", "[wxString]")
{
    double d = 0.0;
    static const struct ToDoubleData
    {
        const wxChar *str;
        double value;
        bool ok;
    } doubleData[] =
    {
        { wxT("1"), 1, true },
        { wxT("1.23"), 1.23, true },
        { wxT(".1"), .1, true },
        { wxT("1."), 1, true },
        { wxT("1.."), 0, false },
        { wxT("0"), 0, true },
        { wxT("a"), 0, false },
        { wxT("12345"), 12345, true },
        { wxT("-1"), -1, true },
        { wxT("--1"), 0, false },
        { wxT("-3E-5"), -3E-5, true },
        { wxT("-3E-abcde5"), 0, false },

        { wxT(" 1"), 1, true },
        { wxT(" .1"), .1, true },
        { wxT(" -1.2"), -1.2, true },

        // printf can output + in a valid double/float string
        { wxT("+1"), 1, true },
        { wxT("+.1"), 0.1, true },
        { wxT("++1"), 0, false },

        { wxT("0X1.BC70A3D70A3D7p+6"), 111.11, true },
    };

    // test ToCDouble() first:

    size_t n;
    for ( n = 0; n < WXSIZEOF(doubleData); n++ )
    {
        const ToDoubleData& ld = doubleData[n];
        CHECK( wxString(ld.str).ToCDouble(&d) == ld.ok );
        if ( ld.ok )
            CHECK( d == ld.value );
    }

    CHECK( wxString("inf").ToCDouble(&d) );
    CHECK( std::isinf(d) );

    CHECK( wxString("INFINITY").ToCDouble(&d) );
    CHECK( std::isinf(d) );

    CHECK( wxString("nan").ToCDouble(&d) );
    CHECK( std::isnan(d) );

    CHECK( wxString("NAN").ToCDouble(&d) );
    CHECK( std::isnan(d) );


    // test ToDouble() now:
    // NOTE: for the test to be reliable, we need to set the locale explicitly
    //       so that we know the decimal point character to use

    if (!wxLocale::IsAvailable(wxLANGUAGE_FRENCH))
        return;     // you should have french support installed to continue this test!

    wxLocale locale;

    // don't load default catalog, it may be unavailable:
    CHECK( locale.Init(wxLANGUAGE_FRENCH, wxLOCALE_DONT_LOAD_DEFAULT) );

    static const struct ToDoubleData doubleData2[] =
    {
        { wxT("1"), 1, true },
        { wxT("1,23"), 1.23, true },
        { wxT(",1"), .1, true },
        { wxT("1,"), 1, true },
        { wxT("1,,"), 0, false },
        { wxT("0"), 0, true },
        { wxT("a"), 0, false },
        { wxT("12345"), 12345, true },
        { wxT("-1"), -1, true },
        { wxT("--1"), 0, false },
        { wxT("-3E-5"), -3E-5, true },
        { wxT("-3E-abcde5"), 0, false },

        { wxT(" 1"), 1, true },
        { wxT(" ,1"), .1, true },

        // printf can output + in a valid double/float string
        { wxT("+1"), 1, true },
        { wxT("+,1"), 0.1, true },
        { wxT("++1"), 0, false },

        { wxT("0X1,BC70A3D70A3D7P+6"), 111.11, true },
    };

    for ( n = 0; n < WXSIZEOF(doubleData2); n++ )
    {
        const ToDoubleData& ld = doubleData2[n];
        CHECK( wxString(ld.str).ToDouble(&d) == ld.ok );
        if ( ld.ok )
            CHECK( d == ld.value );
    }

    CHECK( wxString("inf").ToDouble(&d) );
    CHECK( std::isinf(d) );

    CHECK( wxString("INFINITY").ToDouble(&d) );
    CHECK( std::isinf(d) );

    CHECK( wxString("nan").ToDouble(&d) );
    CHECK( std::isnan(d) );

    CHECK( wxString("NAN").ToDouble(&d) );
    CHECK( std::isnan(d) );
}

TEST_CASE("StringFromDouble", "[wxString]")
{
    static const struct FromDoubleTestData
    {
        double value;
        int prec;
        const char *str;
    } testData[] =
    {
        { 1.23,             -1, "1.23" },
#if defined(wxDEFAULT_MANTISSA_SIZE_3)
        { -3e-10,           -1, "-3e-010" },
#else
        { -3e-10,           -1, "-3e-10" },
#endif
        { -0.45678,         -1, "-0.45678" },
        { 1.2345678,         0, "1" },
        { 1.2345678,         1, "1.2" },
        { 1.2345678,         2, "1.23" },
        { 1.2345678,         3, "1.235" },
    };

    for ( unsigned n = 0; n < WXSIZEOF(testData); n++ )
    {
        const FromDoubleTestData& td = testData[n];
        CHECK( wxString::FromCDouble(td.value, td.prec) == td.str );
    }

    if ( !wxLocale::IsAvailable(wxLANGUAGE_FRENCH) )
        return;

    wxLocale locale;
    CHECK( locale.Init(wxLANGUAGE_FRENCH, wxLOCALE_DONT_LOAD_DEFAULT) );

    for ( unsigned m = 0; m < WXSIZEOF(testData); m++ )
    {
        const FromDoubleTestData& td = testData[m];

        wxString str(td.str);
        str.Replace(".", ",");
        CHECK( wxString::FromDouble(td.value, td.prec) == str );
    }
}

TEST_CASE("StringStringBuf", "[wxString]")
{
    // check that buffer can be used to write into the string
    wxString s;
    wxStrcpy(wxStringBuffer(s, 10), wxT("foo"));

    CHECK( s.length() == 3 );
    CHECK(wxT('f') == s[0u]);
    CHECK(wxT('o') == s[1]);
    CHECK(wxT('o') == s[2]);

    {
        // also check that the buffer initially contains the original string
        // contents
        wxStringBuffer buf(s, 10);
        CHECK( buf[0] == wxT('f') );
        CHECK( buf[1] == wxT('o') );
        CHECK( buf[2] == wxT('o') );
        CHECK( buf[3] == wxT('\0') );
    }

    {
        wxStringBufferLength buf(s, 10);
        CHECK( buf[0] == wxT('f') );
        CHECK( buf[1] == wxT('o') );
        CHECK( buf[2] == wxT('o') );
        CHECK( buf[3] == wxT('\0') );

        // and check that it can be used to write only the specified number of
        // characters to the string
        wxStrcpy(buf, wxT("barrbaz"));
        buf.SetLength(4);
    }

    CHECK( s.length() == 4 );
    CHECK(wxT('b') == s[0u]);
    CHECK(wxT('a') == s[1]);
    CHECK(wxT('r') == s[2]);
    CHECK(wxT('r') == s[3]);

    // check that creating buffer of length smaller than string works, i.e. at
    // least doesn't crash (it would if we naively copied the entire original
    // string contents in the buffer)
    *wxStringBuffer(s, 1) = '!';
}

TEST_CASE("StringUTF8Buf", "[wxString]")
{
    // "czech" in Czech ("cestina"):
    static const char *textUTF8 = "\304\215e\305\241tina";
    static const wchar_t textUTF16[] = {0x10D, 0x65, 0x161, 0x74, 0x69, 0x6E, 0x61, 0};

    wxString s;
    wxStrcpy(wxUTF8StringBuffer(s, 9), textUTF8);
    CHECK(s == textUTF16);

    {
        wxUTF8StringBufferLength buf(s, 20);
        wxStrcpy(buf, textUTF8);
        buf.SetLength(5);
    }
    CHECK(s == wxString(textUTF16, 0, 3));
}


template<typename T> bool CheckStr(const wxString& expected, T s)
{
    return expected == wxString(s);
}

void DoCStrDataTernaryOperator(bool cond)
{
    // test compilation of wxCStrData when used with operator?: (the asserts
    // are not very important, we're testing if the code compiles at all):

    wxString s("foo");

    // Using literal strings in ternary operator below results in these
    // warnings, but they're unavoidable if we want such code to continue to
    // compile at all, as it used to in pre-3.0 versions, so just suppress them.
    wxGCC_WARNING_SUPPRESS(write-strings)
    wxCLANG_WARNING_SUPPRESS(c++11-compat-deprecated-writable-strings)

    const wchar_t *wcStr = L"foo";
    CHECK( CheckStr(s, (cond ? s.c_str() : wcStr)) );
    CHECK( CheckStr(s, (cond ? s.c_str() : L"foo")) );
    CHECK( CheckStr(s, (cond ? wcStr : s.c_str())) );
    CHECK( CheckStr(s, (cond ? L"foo" : s.c_str())) );

    const char *mbStr = "foo";
    CHECK( CheckStr(s, (cond ? s.c_str() : mbStr)) );
    CHECK( CheckStr(s, (cond ? s.c_str() : "foo")) );
    CHECK( CheckStr(s, (cond ? mbStr : s.c_str())) );
    CHECK( CheckStr(s, (cond ? "foo" : s.c_str())) );

    wxGCC_WARNING_RESTORE(write-strings)
    wxCLANG_WARNING_RESTORE(c++11-compat-deprecated-writable-strings)

    wxString empty("");
    CHECK( CheckStr(empty, (cond ? empty.c_str() : wxEmptyString)) );
    CHECK( CheckStr(empty, (cond ? wxEmptyString : empty.c_str())) );
}

TEST_CASE("StringCStrDataTernaryOperator", "[wxString]")
{
    DoCStrDataTernaryOperator(true);
    DoCStrDataTernaryOperator(false);
}


TEST_CASE("StringCStrDataOperators", "[wxString]")
{
    wxString s("hello");

    CHECK( s.c_str()[0] == 'h' );
    CHECK( s.c_str()[1] == 'e' );

    // IMPORTANT: at least with the CRT coming with MSVC++ 2008 trying to access
    //            the final character results in an assert failure (with debug CRT)
    //CHECK( s.c_str()[5] == '\0' );

    CHECK( *s.c_str() == 'h' );
    CHECK( *(s.c_str() + 2) == 'l' );
    //CHECK( *(s.c_str() + 5) == '\0' );
}

bool CheckStrChar(const wxString& expected, char *s)
    { return CheckStr(expected, s); }
bool CheckStrWChar(const wxString& expected, wchar_t *s)
    { return CheckStr(expected, s); }
bool CheckStrConstChar(const wxString& expected, const char *s)
    { return CheckStr(expected, s); }
bool CheckStrConstWChar(const wxString& expected, const wchar_t *s)
    { return CheckStr(expected, s); }

TEST_CASE("StringCStrDataImplicitConversion", "[wxString]")
{
    wxString s("foo");

    CHECK( CheckStrConstWChar(s, s.c_str()) );
    CHECK( CheckStrConstChar(s, s.c_str()) );

#ifndef wxNO_IMPLICIT_WXSTRING_CONV_TO_PTR
    CHECK( CheckStrConstWChar(s, s) );
#ifndef wxNO_UNSAFE_WXSTRING_CONV
    CHECK( CheckStrConstChar(s, s) );
#endif
#endif
}

TEST_CASE("StringExplicitConversion", "[wxString]")
{
    wxString s("foo");

    CHECK( CheckStr(s, s.mb_str()) );
    CHECK( CheckStrConstChar(s, s.mb_str()) );
    CHECK( CheckStrChar(s, s.char_str()) );

    CHECK( CheckStr(s, s.wc_str()) );
    CHECK( CheckStrConstWChar(s, s.wc_str()) );
    CHECK( CheckStrWChar(s, s.wchar_str()) );
}

TEST_CASE("StringIndexedAccess", "[wxString]")
{
    wxString s("bar");
    CHECK( (char)s[2] == 'r' );

    // this tests for a possible bug in UTF-8 based wxString implementation:
    // the 3rd character of the underlying byte string is going to change, but
    // the 3rd character of wxString should remain the same
    s[0] = L'\xe9';
    CHECK( (char)s[2] == 'r' );
}

TEST_CASE("StringBeforeAndAfter", "[wxString]")
{
    // Construct a string with 2 equal signs in it by concatenating its three
    // parts: before the first "=", in between the two "="s and after the last
    // one. This allows to avoid duplicating the string contents (which has to
    // be different for Unicode and ANSI builds) in the tests below.
    #define FIRST_PART L"letter"
    #define MIDDLE_PART L"\xe9;\xe7a"
    #define LAST_PART L"l\xe0"

    const wxString s(FIRST_PART wxT("=") MIDDLE_PART wxT("=") LAST_PART);

    wxString r;

    CHECK( s.BeforeFirst('=', &r) == FIRST_PART );
    CHECK( r == MIDDLE_PART wxT("=") LAST_PART );

    CHECK( s.BeforeFirst('!', &r) == s );
    CHECK( r == "" );

    const wxString phrase("Two words apart");
    r = phrase;
    CHECK( r.BeforeFirst(' ', &r) == "Two" );
    CHECK( r == "words apart" );

    CHECK( s.BeforeLast('=', &r) == FIRST_PART wxT("=") MIDDLE_PART );
    CHECK( r == LAST_PART );

    CHECK( s.BeforeLast('!', &r) == "" );
    CHECK( r == s );

    r = phrase;
    CHECK( r.BeforeLast(' ', &r) == "Two words" );
    CHECK( r == "apart" );


    CHECK( s.AfterFirst('=') == MIDDLE_PART wxT("=") LAST_PART );
    CHECK( s.AfterFirst('!') == "" );


    CHECK( s.AfterLast('=') == LAST_PART );
    CHECK( s.AfterLast('!') == s );

    #undef LAST_PART
    #undef MIDDLE_PART
    #undef FIRST_PART
}

TEST_CASE("StringScopedBuffers", "[wxString]")
{
    // wxString relies on efficient buffers, verify they work as they should

    const char *literal = "Hello World!";

    // non-owned buffer points to the string passed to it
    wxScopedCharBuffer sbuf = wxScopedCharBuffer::CreateNonOwned(literal);
    CHECK( sbuf.data() == literal );

    // a copy of scoped non-owned buffer still points to the same string
    wxScopedCharBuffer sbuf2(sbuf);
    CHECK( sbuf.data() == sbuf2.data() );

    // but assigning it to wxCharBuffer makes a full copy
    wxCharBuffer buf(sbuf);
    CHECK( buf.data() != literal );
    CHECK( buf.data() == std::string(literal) );

    wxCharBuffer buf2 = sbuf;
    CHECK( buf2.data() != literal );
    CHECK( buf.data() == std::string(literal) );

    // Check that extending the buffer keeps it NUL-terminated.
    size_t len = 10;

    wxCharBuffer buf3(len);
    CHECK( buf3.data()[len] == '\0' );

    wxCharBuffer buf4;
    buf4.extend(len);
    CHECK( buf4.data()[len] == '\0' );

    wxCharBuffer buf5(5);
    buf5.extend(len);
    CHECK( buf5.data()[len] == '\0' );

    const char buf8[8] = { };
    CHECK( wxCharTypeBuffer<char>(buf8, sizeof(buf8)).length() == 8 );
}

TEST_CASE("StringSupplementaryUniChar", "[wxString]")
{
    // Test wxString(wxUniChar ch, size_t nRepeat = 1),
    // which is implemented upon assign(size_t n, wxUniChar ch).
    {
        wxString s(wxUniChar(0x12345));
#if wxUSE_UNICODE_UTF16
        CHECK( s.length() == 2 );
        CHECK( s[0].GetValue() == 0xD808 );
        CHECK( s[1].GetValue() == 0xDF45 );
#else
        CHECK( s.length() == 1 );
        CHECK( s[0].GetValue() == 0x12345 );
#endif
    }

    // Test operator=(wxUniChar ch).
    {
        wxString s;
        s = wxUniChar(0x23456);
#if wxUSE_UNICODE_UTF16
        CHECK( s.length() == 2 );
        CHECK( s[0].GetValue() == 0xD84D );
        CHECK( s[1].GetValue() == 0xDC56 );
#else
        CHECK( s.length() == 1 );
        CHECK( s[0].GetValue() == 0x23456 );
#endif
    }

    // Test operator+=(wxUniChar ch).
    {
        wxString s = "A";
        s += wxUniChar(0x34567);
#if wxUSE_UNICODE_UTF16
        CHECK( s.length() == 3 );
        CHECK( s[1].GetValue() == 0xD891 );
        CHECK( s[2].GetValue() == 0xDD67 );
#else
        CHECK( s.length() == 2 );
        CHECK( s[1].GetValue() == 0x34567 );
#endif
    }

    // Test operator<<(wxUniChar ch),
    // which is implemented upon append(size_t n, wxUniChar ch).
    {
        wxString s = "A";
        s << wxUniChar(0x45678);
#if wxUSE_UNICODE_UTF16
        CHECK( s.length() == 3 );
        CHECK( s[1].GetValue() == 0xD8D5 );
        CHECK( s[2].GetValue() == 0xDE78 );
#else
        CHECK( s.length() == 2 );
        CHECK( s[1].GetValue() == 0x45678 );
#endif
    }

    // Test insert(size_t nPos, size_t n, wxUniChar ch).
    {
        wxString s = L"\x3042\x208\x3059";
        s.insert(1, 2, wxUniChar(0x12345));
#if wxUSE_UNICODE_UTF16
        CHECK( s.length() == 7 );
        CHECK( s[1].GetValue() == 0xD808 );
        CHECK( s[2].GetValue() == 0xDF45 );
        CHECK( s[3].GetValue() == 0xD808 );
        CHECK( s[4].GetValue() == 0xDF45 );
#else
        CHECK( s.length() == 5 );
        CHECK( s[1].GetValue() == 0x12345 );
        CHECK( s[2].GetValue() == 0x12345 );
#endif
    }

    // Test insert(iterator it, wxUniChar ch).
    {
        wxString s = L"\x3042\x208\x3059";
        s.insert(s.begin() + 1, wxUniChar(0x23456));
#if wxUSE_UNICODE_UTF16
        CHECK( s.length() == 5 );
        CHECK( s[1].GetValue() == 0xD84D );
        CHECK( s[2].GetValue() == 0xDC56 );
#else
        CHECK( s.length() == 4 );
        CHECK( s[1].GetValue() == 0x23456 );
#endif
    }

    // Test insert(iterator it, size_type n, wxUniChar ch).
    {
        wxString s = L"\x3042\x208\x3059";
        s.insert(s.begin() + 1, 2, wxUniChar(0x34567));
#if wxUSE_UNICODE_UTF16
        CHECK( s.length() == 7 );
        CHECK( s[1].GetValue() == 0xD891 );
        CHECK( s[2].GetValue() == 0xDD67 );
#else
        CHECK( s.length() == 5 );
        CHECK( s[1].GetValue() == 0x34567 );
#endif
    }

    // Test replace(size_t nStart, size_t nLen, size_t nCount, wxUniChar ch).
    {
        wxString s = L"\x3042\x208\x3059";
        s.replace(1, 2, 2, wxUniChar(0x45678));
#if wxUSE_UNICODE_UTF16
        CHECK( s.length() == 5 );
        CHECK( s[1].GetValue() == 0xD8D5 );
        CHECK( s[2].GetValue() == 0xDE78 );
        CHECK( s[3].GetValue() == 0xD8D5 );
        CHECK( s[4].GetValue() == 0xDE78 );
#else
        CHECK( s.length() == 3 );
        CHECK( s[1].GetValue() == 0x45678 );
        CHECK( s[2].GetValue() == 0x45678 );
#endif
    }

    // Test replace(iterator first, iterator last, size_type n, wxUniChar ch).
    {
        wxString s = L"\x3042\x208\x3059";
        s.replace(s.begin() + 1, s.end(), 2, wxUniChar(0x34567));
#if wxUSE_UNICODE_UTF16
        CHECK( s.length() == 5 );
        CHECK( s[1].GetValue() == 0xD891 );
        CHECK( s[2].GetValue() == 0xDD67 );
        CHECK( s[3].GetValue() == 0xD891 );
        CHECK( s[4].GetValue() == 0xDD67 );
#else
        CHECK( s.length() == 3 );
        CHECK( s[1].GetValue() == 0x34567 );
        CHECK( s[2].GetValue() == 0x34567 );
#endif
    }

    // Test find(wxUniChar ch, size_t nStart = 0)
    // and rfind(wxUniChar ch, size_t nStart = npos).
    {
        wxString s = L"\x308\x2063";
        s << wxUniChar(0x12345);
        s << "x";
        s += wxUniChar(0x12345);
        s += "y";
#if wxUSE_UNICODE_UTF16
        CHECK( s.length() == 8 );
        CHECK( s.find(wxUniChar(0x12345)) == 2 );
        CHECK( s.find(wxUniChar(0x12345), 3) == 5 );
        CHECK( s.rfind(wxUniChar(0x12345)) == 5 );
        CHECK( s.rfind(wxUniChar(0x12345), 4) == 2 );
#else
        CHECK( s.length() == 6 );
        CHECK( s.find(wxUniChar(0x12345)) == 2 );
        CHECK( s.find(wxUniChar(0x12345), 3) == 4 );
        CHECK( s.rfind(wxUniChar(0x12345)) == 4 );
        CHECK( s.rfind(wxUniChar(0x12345), 3) == 2 );
#endif
    }

    /* Not tested here:
         find_first_of, find_last_of, find_first_not_of, find_last_not_of
    */
}
