sol2/tests/run_time/source/strings.cpp
Shepherd 4efea0ff3c Test and fix #1315
— 🛠 Update SOL_IS_(DEFAULT_)ON/OFF usage to be more idiomatic and less confusing (add SOL_RAW_* alternatives as well)
— 💚 Re-check CI
— 👷‍♀️ Add missing header from ebco.hpp
2022-06-24 12:51:09 -04:00

304 lines
7.6 KiB
C++

// sol2
// The MIT License (MIT)
// Copyright (c) 2013-2021 Rapptz, ThePhD and contributors
// Permission is hereby granted, free of charge, to any person obtaining a copy of
// this software and associated documentation files (the "Software"), to deal in
// the Software without restriction, including without limitation the rights to
// use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of
// the Software, and to permit persons to whom the Software is furnished to do so,
// subject to the following conditions:
// The above copyright notice and this permission notice shall be included in all
// copies or substantial portions of the Software.
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS
// FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR
// COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER
// IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
// CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
#include "sol_test.hpp"
#include <catch2/catch_all.hpp>
#include <iostream>
struct test { };
template <typename T>
struct test_t { };
namespace muh_namespace {
struct ns_test { };
namespace {
struct ns_anon_test { };
} // namespace
} // namespace muh_namespace
TEST_CASE("stack/strings", "test that strings can be roundtripped") {
sol::state lua;
sol::stack_guard luasg(lua);
static const char utf8str[]
= "\xF0\x9F\x8D\x8C\x20\xE6\x99\xA5\x20\x46\x6F\x6F\x20\xC2\xA9\x20\x62\x61\x72\x20\xF0\x9D\x8C\x86\x20\x62\x61\x7A\x20\xE2\x98\x83\x20\x71\x75\x78";
static const char16_t utf16str[] = { 0xD83C,
0xDF4C,
0x20,
0x6665,
0x20,
0x46,
0x6F,
0x6F,
0x20,
0xA9,
0x20,
0x62,
0x61,
0x72,
0x20,
0xD834,
0xDF06,
0x20,
0x62,
0x61,
0x7A,
0x20,
0x2603,
0x20,
0x71,
0x75,
0x78,
0x00 };
static const char32_t utf32str[] = { 0x1F34C,
0x0020,
0x6665,
0x0020,
0x0046,
0x006F,
0x006F,
0x0020,
0x00A9,
0x0020,
0x0062,
0x0061,
0x0072,
0x0020,
0x1D306,
0x0020,
0x0062,
0x0061,
0x007A,
0x0020,
0x2603,
0x0020,
0x0071,
0x0075,
0x0078,
0x00 };
#ifdef _WIN32
INFO("win32 widestr");
static const wchar_t widestr[] = { 0xD83C,
0xDF4C,
0x20,
0x6665,
0x20,
0x46,
0x6F,
0x6F,
0x20,
0xA9,
0x20,
0x62,
0x61,
0x72,
0x20,
0xD834,
0xDF06,
0x20,
0x62,
0x61,
0x7A,
0x20,
0x2603,
0x20,
0x71,
0x75,
0x78,
0x00 };
#else
INFO("non-windows widestr");
static const wchar_t widestr[] = { 0x1F34C,
0x0020,
0x6665,
0x0020,
0x0046,
0x006F,
0x006F,
0x0020,
0x00A9,
0x0020,
0x0062,
0x0061,
0x0072,
0x0020,
0x1D306,
0x0020,
0x0062,
0x0061,
0x007A,
0x0020,
0x2603,
0x0020,
0x0071,
0x0075,
0x0078,
0x00 };
#endif
static const std::string utf8str_s = utf8str;
static const std::u16string utf16str_s = utf16str;
static const std::u32string utf32str_s = utf32str;
static const std::wstring widestr_s = widestr;
INFO("sizeof(wchar_t): " << sizeof(wchar_t));
INFO("sizeof(char16_t): " << sizeof(char16_t));
INFO("sizeof(char32_t): " << sizeof(char32_t));
INFO("utf8str: " << utf8str);
INFO("utf8str_s: " << utf8str_s);
lua["utf8"] = utf8str;
lua["utf16"] = utf16str;
lua["utf32"] = utf32str;
lua["wide"] = widestr;
SECTION("to_utf8") {
std::string utf8_to_utf8 = lua["utf8"];
std::string utf16_to_utf8 = lua["utf16"];
std::string utf32_to_utf8 = lua["utf32"];
std::string wide_to_utf8 = lua["wide"];
REQUIRE(utf8_to_utf8 == utf8str_s);
REQUIRE(utf16_to_utf8 == utf8str_s);
REQUIRE(utf32_to_utf8 == utf8str_s);
REQUIRE(wide_to_utf8 == utf8str_s);
}
SECTION("to_wide") {
std::wstring utf8_to_wide = lua["utf8"];
std::wstring utf16_to_wide = lua["utf16"];
std::wstring utf32_to_wide = lua["utf32"];
std::wstring wide_to_wide = lua["wide"];
REQUIRE(utf8_to_wide == widestr_s);
REQUIRE(utf16_to_wide == widestr_s);
REQUIRE(utf32_to_wide == widestr_s);
REQUIRE(wide_to_wide == widestr_s);
}
SECTION("to_utf16") {
std::u16string utf8_to_utf16 = lua["utf8"];
std::u16string utf16_to_utf16 = lua["utf16"];
std::u16string utf32_to_utf16 = lua["utf32"];
std::u16string wide_to_utf16 = lua["wide"];
REQUIRE(utf8_to_utf16 == utf16str_s);
REQUIRE(utf16_to_utf16 == utf16str_s);
REQUIRE(utf32_to_utf16 == utf16str_s);
REQUIRE(wide_to_utf16 == utf16str_s);
}
SECTION("to_utf32") {
std::u32string utf8_to_utf32 = lua["utf8"];
std::u32string utf16_to_utf32 = lua["utf16"];
std::u32string utf32_to_utf32 = lua["utf32"];
std::u32string wide_to_utf32 = lua["wide"];
REQUIRE(utf8_to_utf32 == utf32str_s);
REQUIRE(utf16_to_utf32 == utf32str_s);
REQUIRE(utf32_to_utf32 == utf32str_s);
REQUIRE(wide_to_utf32 == utf32str_s);
}
SECTION("to_char32_t") {
char32_t utf8_to_char32 = lua["utf8"];
char32_t utf16_to_char32 = lua["utf16"];
char32_t utf32_to_char32 = lua["utf32"];
char32_t wide_to_char32 = lua["wide"];
REQUIRE(utf8_to_char32 == utf32str[0]);
REQUIRE(utf16_to_char32 == utf32str[0]);
REQUIRE(utf32_to_char32 == utf32str[0]);
REQUIRE(wide_to_char32 == utf32str[0]);
}
SECTION("to_char16_t") {
char16_t utf8_to_char16 = lua["utf8"];
char16_t utf16_to_char16 = lua["utf16"];
char16_t utf32_to_char16 = lua["utf32"];
char16_t wide_to_char16 = lua["wide"];
REQUIRE(utf8_to_char16 == utf16str[0]);
REQUIRE(utf16_to_char16 == utf16str[0]);
REQUIRE(utf32_to_char16 == utf16str[0]);
REQUIRE(wide_to_char16 == utf16str[0]);
}
SECTION("to_char") {
char utf8_to_char = lua["utf8"].get<char>();
char utf16_to_char = lua["utf16"].get<char>();
char utf32_to_char = lua["utf32"].get<char>();
char wide_to_char = lua["wide"].get<char>();
REQUIRE(utf8_to_char == utf8str[0]);
REQUIRE(utf16_to_char == utf8str[0]);
REQUIRE(utf32_to_char == utf8str[0]);
REQUIRE(wide_to_char == utf8str[0]);
}
}
TEST_CASE("detail/demangling", "test some basic demangling cases") {
std::string teststr = sol::detail::short_demangle<test>();
std::string nsteststr = sol::detail::short_demangle<muh_namespace::ns_test>();
std::string nsateststr = sol::detail::short_demangle<muh_namespace::ns_anon_test>();
REQUIRE(teststr == "test");
REQUIRE(nsteststr == "ns_test");
REQUIRE(nsateststr == "ns_anon_test");
}
TEST_CASE("object/string-pushers", "test some basic string pushers with in_place constructor") {
sol::state lua;
sol::object ocs(lua, sol::in_place, "bark\0bark", 9u);
sol::object os(lua, sol::in_place_type<std::string>, std::string("bark\0bark", 9), 8u);
sol::object osv(lua, sol::in_place_type<sol::string_view>, sol::string_view("woofwoof", 8), 8u);
bool test1 = ocs.as<std::string>() == std::string("bark\0bark", 9);
bool test2 = os.as<std::string>() == std::string("bark\0bar", 8);
bool test3 = osv.as<std::string>() == std::string("woofwoof", 8);
REQUIRE(ocs.get_type() == sol::type::string);
REQUIRE(ocs.is<std::string>());
REQUIRE(ocs.is<sol::string_view>());
REQUIRE(os.get_type() == sol::type::string);
REQUIRE(os.is<std::string>());
REQUIRE(os.is<sol::string_view>());
REQUIRE(osv.get_type() == sol::type::string);
REQUIRE(osv.is<std::string>());
REQUIRE(osv.is<sol::string_view>());
REQUIRE(test1);
REQUIRE(test2);
REQUIRE(test3);
}
TEST_CASE("strings/non const c strings", "push non const qualified c strings as strings") {
sol::state lua;
char cbark[] = "bark";
char* bark = cbark;
lua["bark"] = bark;
sol::type t = lua["bark"].get_type();
std::string lbark = lua["bark"];
REQUIRE((t == sol::type::string));
REQUIRE((bark == std::string("bark")));
}