Intravision/reactos
1
0
Fork 0
mirror of https://github.com/reactos/reactos.git synced 2024-06-03 11:11:54 +00:00
Code Issues Packages Projects Releases Wiki Activity
reactos/modules/rostests/apitests/atl/CString.cpp
Katayama Hirofumi MZ c714b7fd67
[ATL][ATLTEST] Adapt to RATL and improvements (#1501) 
- Modify atldef.h for non-ReactOS environments.
- Update ATL testcase project files (from v120_xp to v140_xp).
- #define HAVE_APITEST and use it.
- s/NULL/0/
2019-04-20 08:35:39 +09:00

265 lines
8.8 KiB
C++
Raw Blame History

/*
* PROJECT: ReactOS api tests
* LICENSE: GPL-2.0+ (https://spdx.org/licenses/GPL-2.0+)
* PURPOSE: Test for CString
* COPYRIGHT: Copyright 2016-2017 Mark Jansen (mark.jansen@reactos.org)
* Copyright 2017 Katayama Hirofumi MZ
*/
#include <atlstr.h>
#include "resource.h"
#ifdef HAVE_APITEST
#include <apitest.h>
#else
#include <stdlib.h>
#include <stdio.h>
#include <stdarg.h>
#include <windows.h>
int g_tests_executed = 0;
int g_tests_failed = 0;
int g_tests_skipped = 0;
const char *g_file = NULL;
int g_line = 0;
void set_location(const char *file, int line)
{
g_file = file;
g_line = line;
}
void ok_func(int value, const char *fmt, ...)
{
va_list va;
va_start(va, fmt);
if (!value)
{
printf("%s (%d): ", g_file, g_line);
vprintf(fmt, va);
g_tests_failed++;
}
g_tests_executed++;
va_end(va);
}
void skip_func(const char *fmt, ...)
{
va_list va;
va_start(va, fmt);
printf("%s (%d): test skipped: ", g_file, g_line);
vprintf(fmt, va);
g_tests_skipped++;
va_end(va);
}
#undef ok
#define ok(value, ...) do { \
set_location(__FILE__, __LINE__); \
ok_func(value, __VA_ARGS__); \
} while (0)
#define ok_(x1,x2) set_location(x1,x2); ok_func
#define skip(...) do { \
set_location(__FILE__, __LINE__); \
skip_func(__VA_ARGS__); \
} while (0)
#define START_TEST(x) int main(void)
char *wine_dbgstr_w(const wchar_t *wstr)
{
static char buf[512];
WideCharToMultiByte(CP_ACP, 0, wstr, -1, buf, _countof(buf), NULL, NULL);
return buf;
}
#endif
struct traits_test
{
const char* strA;
const wchar_t* strW;
int str_len;
int exp_1, exp_2, exp_3, exp_4;
};
traits_test g_Tests[] = {
// inputs outputs
{ NULL, NULL, 0, 0, 0, -1, 0 },
{ NULL, NULL, -1, 0, -1, -1, 0 },
{ NULL, NULL, 1, 0, 1, -1, 0 },
{ "", L"", 0, 0, 0, 0, 0 },
{ "", L"", -1, 0, -1, 0, 1 },
{ "", L"", 1, 0, 1, 0, 1 },
{ "AAABBB", L"AAABBB", 0, 6, 0, 6, 0 },
{ "AAABBB", L"AAABBB", 3, 6, 3, 6, 3 },
{ "AAABBB", L"AAABBB", -1, 6, -1, 6, 7 },
};
static void test_basetypes()
{
int len;
char bufA[10];
wchar_t bufW[10];
for (size_t n = 0; n < _countof(g_Tests); ++n)
{
len = ChTraitsCRT<char>::GetBaseTypeLength(g_Tests[n].strA);
ok(len == g_Tests[n].exp_1, "Expected len to be %i, was %i for %u (A)\n", g_Tests[n].exp_1, len, n);
len = ChTraitsCRT<char>::GetBaseTypeLength(g_Tests[n].strA, g_Tests[n].str_len);
ok(len == g_Tests[n].exp_2, "Expected len to be %i, was %i for %u (A,len)\n", g_Tests[n].exp_2, len, n);
len = ChTraitsCRT<char>::GetBaseTypeLength(g_Tests[n].strW);
ok(len == g_Tests[n].exp_3, "Expected len to be %i, was %i for %u (W)\n", g_Tests[n].exp_3, len, n);
len = ChTraitsCRT<char>::GetBaseTypeLength(g_Tests[n].strW, g_Tests[n].str_len);
ok(len == g_Tests[n].exp_4, "Expected len to be %i, was %i for %u (W,len)\n", g_Tests[n].exp_4, len, n);
if (g_Tests[n].strA && g_Tests[n].strW)
{
memset(bufA, 'x', sizeof(bufA));
ChTraitsCRT<char>::ConvertToBaseType(bufA, g_Tests[n].exp_1+1, g_Tests[n].strA);
char ch = bufA[g_Tests[n].exp_1];
ok(ch == '\0', "Expected %i to be \\0, was: %c (%i) for %u\n", g_Tests[n].exp_1, ch, (int)ch, n);
ok(!strcmp(bufA, g_Tests[n].strA), "Expected bufA to be %s, was: %s for %u\n", g_Tests[n].strA, bufA, n);
ch = bufA[g_Tests[n].exp_1+1];
ok(ch == 'x', "Expected %i to be 'x', was: %c (%i) for %u\n", g_Tests[n].exp_1+1, ch, (int)ch, n);
}
if (g_Tests[n].strA && g_Tests[n].strW)
{
memset(bufA, 'x', sizeof(bufA));
ChTraitsCRT<char>::ConvertToBaseType(bufA, g_Tests[n].exp_1+1, g_Tests[n].strW);
char ch = bufA[g_Tests[n].exp_1];
ok(ch == '\0', "Expected %i to be \\0, was: %c (%i) for %u\n", g_Tests[n].exp_1, ch, (int)ch, n);
ok(!strcmp(bufA, g_Tests[n].strA), "Expected bufA to be %s, was: %s for %u\n", g_Tests[n].strA, bufA, n);
ch = bufA[g_Tests[n].exp_1+1];
ok(ch == 'x', "Expected %i to be 'x', was: %c (%i) for %u\n", g_Tests[n].exp_1+1, ch, (int)ch, n);
}
// wchar_t --> please note, swapped the expectations from 2 and 4 !
len = ChTraitsCRT<wchar_t>::GetBaseTypeLength(g_Tests[n].strA);
ok(len == g_Tests[n].exp_1, "Expected len to be %i, was %i for %u (A)\n", g_Tests[n].exp_1, len, n);
len = ChTraitsCRT<wchar_t>::GetBaseTypeLength(g_Tests[n].strA, g_Tests[n].str_len);
ok(len == g_Tests[n].exp_4, "Expected len to be %i, was %i for %u (A,len)\n", g_Tests[n].exp_4, len, n);
len = ChTraitsCRT<wchar_t>::GetBaseTypeLength(g_Tests[n].strW);
ok(len == g_Tests[n].exp_3, "Expected len to be %i, was %i for %u (W)\n", g_Tests[n].exp_3, len, n);
len = ChTraitsCRT<wchar_t>::GetBaseTypeLength(g_Tests[n].strW, g_Tests[n].str_len);
ok(len == g_Tests[n].exp_2, "Expected len to be %i, was %i for %u (W,len)\n", g_Tests[n].exp_2, len, n);
if (g_Tests[n].strA && g_Tests[n].strW)
{
memset(bufW, 'x', sizeof(bufW));
ChTraitsCRT<wchar_t>::ConvertToBaseType(bufW, g_Tests[n].exp_1+1, g_Tests[n].strA);
wchar_t ch = bufW[g_Tests[n].exp_1];
ok(ch == L'\0', "Expected %i to be \\0, was: %c (%i) for %u\n", g_Tests[n].exp_1, ch, (int)ch, n);
ok(!wcscmp(bufW, g_Tests[n].strW), "Expected bufW to be %s, was: %s for %u\n", wine_dbgstr_w(g_Tests[n].strW), wine_dbgstr_w(bufW), n);
ch = bufW[g_Tests[n].exp_1+1];
ok(ch == 30840, "Expected %i to be %i for %u\n", g_Tests[n].exp_1+1, (int)ch, n);
}
if (g_Tests[n].strA && g_Tests[n].strW)
{
memset(bufW, 'x', sizeof(bufW));
ChTraitsCRT<wchar_t>::ConvertToBaseType(bufW, g_Tests[n].exp_1+1, g_Tests[n].strW);
wchar_t ch = bufW[g_Tests[n].exp_1];
ok(ch == '\0', "Expected %i to be \\0, was: %c (%i) for %u\n", g_Tests[n].exp_1, ch, (int)ch, n);
ok(!wcscmp(bufW, g_Tests[n].strW), "Expected bufW to be %s, was: %s for %u\n", wine_dbgstr_w(g_Tests[n].strW), wine_dbgstr_w(bufW), n);
ch = bufW[g_Tests[n].exp_1+1];
ok(ch == 30840, "Expected %i to be %i for %u\n", g_Tests[n].exp_1+1, (int)ch, n);
}
}
}
// Allocation strategy seems to differ a bit between us and MS's atl.
// if someone cares enough to find out why, feel free to change the macro below.
#ifdef __GNUC__
#define ALLOC_EXPECT(a, b) b
#else
#define ALLOC_EXPECT(a, b) a
#endif
#undef ok
#undef _T
#define TEST_NAMEX(name) void test_##name##W()
#define CStringX CStringW
#define _X(x) L ## x
#define XCHAR WCHAR
#define YCHAR CHAR
#define dbgstrx(x) wine_dbgstr_w(x)
#define ok ok_("CStringW:\n" __FILE__, __LINE__)
#define GetWindowsDirectoryX GetWindowsDirectoryW
#define MAKEINTRESOURCEX(x) MAKEINTRESOURCEW(x)
#define MAKEINTRESOURCEY(x) MAKEINTRESOURCEA(x)
#include "CString.inl"
#undef CStringX
#undef TEST_NAMEX
#undef _X
#undef XCHAR
#undef YCHAR
#undef dbgstrx
#undef ok
#undef GetWindowsDirectoryX
#undef MAKEINTRESOURCEX
#undef MAKEINTRESOURCEY
#define TEST_NAMEX(name) void test_##name##A()
#define CStringX CStringA
#define _X(x) x
#define XCHAR CHAR
#define YCHAR WCHAR
#define dbgstrx(x) (const char*)x
#define ok ok_("CStringA:\n" __FILE__, __LINE__)
#define GetWindowsDirectoryX GetWindowsDirectoryA
#define MAKEINTRESOURCEX(x) MAKEINTRESOURCEA(x)
#define MAKEINTRESOURCEY(x) MAKEINTRESOURCEW(x)
#include "CString.inl"
START_TEST(CString)
{
test_basetypes();
if ((ALLOC_EXPECT(1, 2)) == 2)
{
skip("Ignoring real GetAllocLength() lenght\n");
}
test_operators_initW();
test_operators_initA();
test_compareW();
test_compareA();
test_findW();
test_findA();
test_formatW();
test_formatA();
test_substrW();
test_substrA();
test_replaceW();
test_replaceA();
test_trimW();
test_trimA();
test_envW();
test_envA();
test_load_strW();
test_load_strA();
test_bstrW();
test_bstrA();
#ifndef HAVE_APITEST
printf("CString: %i tests executed (0 marked as todo, %i failures), %i skipped.\n", g_tests_executed, g_tests_failed, g_tests_skipped);
return g_tests_failed;
#endif
}
Reference in a new issue View git blame Copy permalink