brunodev85/wine
1
0
Fork 0
mirror of https://gitlab.winehq.org/wine/wine.git synced 2025-08-30 03:03:59 +02:00
Code Issues Projects Releases Packages Wiki Activity
wine/dlls/msvcr80/tests/msvcr80.c
Piotr Caban 1513299a9a msvcr80/tests: Link to msvcr80.
2025-04-23 22:52:11 +02:00

412 lines
13 KiB
C
Raw Permalink Blame History

/*
* Copyright 2022 Paul Gofman for CodeWeavers
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or (at your option) any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
*/
#include <mbctype.h>
#include <mbstring.h>
#include <stdarg.h>
#include <stdlib.h>
#include <stdio.h>
#include <fcntl.h>
#include <share.h>
#include <sys/stat.h>
#include <windef.h>
#include <winbase.h>
#include <errno.h>
#include "wine/test.h"
#define WX_OPEN 0x01
#define WX_ATEOF 0x02
#define WX_READNL 0x04
#define WX_PIPE 0x08
#define WX_DONTINHERIT 0x10
#define WX_APPEND 0x20
#define WX_TTY 0x40
#define WX_TEXT 0x80
#define _MB_CP_SBCS 0
#define MSVCRT_FD_BLOCK_SIZE 32
#define DEFINE_EXPECT(func) \
static BOOL expect_ ## func = FALSE, called_ ## func = FALSE
#define SET_EXPECT(func) \
expect_ ## func = TRUE
#define CHECK_EXPECT2(func) \
do { \
ok(expect_ ##func, "unexpected call " #func "\n"); \
called_ ## func = TRUE; \
}while(0)
#define CHECK_EXPECT(func) \
do { \
CHECK_EXPECT2(func); \
expect_ ## func = FALSE; \
}while(0)
#define CHECK_CALLED(func) \
do { \
ok(called_ ## func, "expected " #func "\n"); \
expect_ ## func = called_ ## func = FALSE; \
}while(0)
DEFINE_EXPECT(invalid_parameter_handler);
static void __cdecl test_invalid_parameter_handler(const wchar_t *expression,
const wchar_t *function, const wchar_t *file,
unsigned line, uintptr_t arg)
{
CHECK_EXPECT(invalid_parameter_handler);
ok(expression == NULL, "expression is not NULL\n");
ok(function == NULL, "function is not NULL\n");
ok(file == NULL, "file is not NULL\n");
ok(line == 0, "line = %u\n", line);
ok(arg == 0, "arg = %Ix\n", arg);
}
typedef struct
{
HANDLE handle;
unsigned char wxflag;
char lookahead[3];
int exflag;
CRITICAL_SECTION crit;
char textmode : 7;
char unicode : 1;
char pipech2[2];
__int64 startpos;
BOOL utf8translations;
char dbcsBuffer;
BOOL dbcsBufferUsed;
} ioinfo;
static ioinfo **__pioinfo;
#define SETNOFAIL(x,y) x = (void*)GetProcAddress(hcrt,y)
#define SET(x,y) do { SETNOFAIL(x,y); ok(x != NULL, "Export '%s' not found\n", y); } while(0)
static void init(void)
{
HMODULE hcrt = GetModuleHandleA("msvcr80.dll");
SET(__pioinfo, "__pioinfo");
}
static void test_ioinfo_flags(void)
{
HANDLE handle;
ioinfo *info;
char *tempf;
int tempfd;
tempf = _tempnam(".","wne");
tempfd = _open(tempf, _O_CREAT|_O_TRUNC|_O_WRONLY|_O_WTEXT, _S_IWRITE);
ok(tempfd != -1, "_open failed with error: %d\n", errno);
handle = (HANDLE)_get_osfhandle(tempfd);
info = &__pioinfo[tempfd / MSVCRT_FD_BLOCK_SIZE][tempfd % MSVCRT_FD_BLOCK_SIZE];
ok(!!info, "NULL info.\n");
ok(info->handle == handle, "Unexpected handle %p, expected %p.\n", info->handle, handle);
ok(info->exflag == 1, "Unexpected exflag %#x.\n", info->exflag);
ok(info->wxflag == (WX_TEXT | WX_OPEN), "Unexpected wxflag %#x.\n", info->wxflag);
ok(info->unicode, "Unicode is not set.\n");
ok(info->textmode == 2, "Unexpected textmode %d.\n", info->textmode);
_close(tempfd);
ok(info->handle == INVALID_HANDLE_VALUE, "Unexpected handle %p.\n", info->handle);
ok(info->exflag == 1, "Unexpected exflag %#x.\n", info->exflag);
ok(info->unicode, "Unicode is not set.\n");
ok(!info->wxflag, "Unexpected wxflag %#x.\n", info->wxflag);
ok(info->textmode == 2, "Unexpected textmode %d.\n", info->textmode);
info = &__pioinfo[(tempfd + 4) / MSVCRT_FD_BLOCK_SIZE][(tempfd + 4) % MSVCRT_FD_BLOCK_SIZE];
ok(!!info, "NULL info.\n");
ok(info->handle == INVALID_HANDLE_VALUE, "Unexpected handle %p.\n", info->handle);
ok(!info->exflag, "Unexpected exflag %#x.\n", info->exflag);
ok(!info->textmode, "Unexpected textmode %d.\n", info->textmode);
tempfd = _open(tempf, _O_CREAT|_O_TRUNC|_O_WRONLY|_O_TEXT, _S_IWRITE);
ok(tempfd != -1, "_open failed with error: %d\n", errno);
info = &__pioinfo[tempfd / MSVCRT_FD_BLOCK_SIZE][tempfd % MSVCRT_FD_BLOCK_SIZE];
ok(!!info, "NULL info.\n");
ok(info->exflag == 1, "Unexpected exflag %#x.\n", info->exflag);
ok(info->wxflag == (WX_TEXT | WX_OPEN), "Unexpected wxflag %#x.\n", info->wxflag);
ok(!info->unicode, "Unicode is not set.\n");
ok(!info->textmode, "Unexpected textmode %d.\n", info->textmode);
_close(tempfd);
tempfd = _open(tempf, _O_CREAT|_O_TRUNC|_O_WRONLY|_O_U8TEXT, _S_IWRITE);
ok(tempfd != -1, "_open failed with error: %d\n", errno);
info = &__pioinfo[tempfd / MSVCRT_FD_BLOCK_SIZE][tempfd % MSVCRT_FD_BLOCK_SIZE];
ok(!!info, "NULL info.\n");
ok(info->exflag == 1, "Unexpected exflag %#x.\n", info->exflag);
ok(info->wxflag == (WX_TEXT | WX_OPEN), "Unexpected wxflag %#x.\n", info->wxflag);
ok(!info->unicode, "Unicode is not set.\n");
ok(info->textmode == 1, "Unexpected textmode %d.\n", info->textmode);
_close(tempfd);
unlink(tempf);
free(tempf);
}
static void test_strcmp(void)
{
int ret = strcmp( "abc", "abcd" );
ok( ret == -1, "wrong ret %d\n", ret );
ret = strcmp( "", "abc" );
ok( ret == -1, "wrong ret %d\n", ret );
ret = strcmp( "abc", "ab\xa0" );
ok( ret == -1, "wrong ret %d\n", ret );
ret = strcmp( "ab\xb0", "ab\xa0" );
ok( ret == 1, "wrong ret %d\n", ret );
ret = strcmp( "ab\xc2", "ab\xc2" );
ok( ret == 0, "wrong ret %d\n", ret );
ret = strncmp( "abc", "abcd", 3 );
ok( ret == 0, "wrong ret %d\n", ret );
#ifdef _WIN64
ret = strncmp( "", "abc", 3 );
ok( ret == -1, "wrong ret %d\n", ret );
ret = strncmp( "abc", "ab\xa0", 4 );
ok( ret == -1, "wrong ret %d\n", ret );
ret = strncmp( "ab\xb0", "ab\xa0", 3 );
ok( ret == 1, "wrong ret %d\n", ret );
#else
ret = strncmp( "", "abc", 3 );
ok( ret == 0 - 'a', "wrong ret %d\n", ret );
ret = strncmp( "abc", "ab\xa0", 4 );
ok( ret == 'c' - 0xa0, "wrong ret %d\n", ret );
ret = strncmp( "ab\xb0", "ab\xa0", 3 );
ok( ret == 0xb0 - 0xa0, "wrong ret %d\n", ret );
#endif
ret = strncmp( "ab\xb0", "ab\xa0", 2 );
ok( ret == 0, "wrong ret %d\n", ret );
ret = strncmp( "ab\xc2", "ab\xc2", 3 );
ok( ret == 0, "wrong ret %d\n", ret );
ret = strncmp( "abc", "abd", 0 );
ok( ret == 0, "wrong ret %d\n", ret );
ret = strncmp( "abc", "abc", 12 );
ok( ret == 0, "wrong ret %d\n", ret );
}
static void test_dupenv_s(void)
{
size_t len;
char *tmp;
int ret;
len = 0xdeadbeef;
tmp = (void *)0xdeadbeef;
ret = _dupenv_s( &tmp, &len, "nonexistent" );
ok( !ret, "_dupenv_s returned %d\n", ret );
ok( !len, "_dupenv_s returned length is %Id\n", len );
ok( !tmp, "_dupenv_s returned pointer is %p\n", tmp );
}
static void test_wdupenv_s(void)
{
wchar_t *tmp;
size_t len;
int ret;
len = 0xdeadbeef;
tmp = (void *)0xdeadbeef;
ret = _wdupenv_s( &tmp, &len, L"nonexistent" );
ok( !ret, "_wdupenv_s returned %d\n", ret );
ok( !len, "_wdupenv_s returned length is %Id\n", len );
ok( !tmp, "_wdupenv_s returned pointer is %p\n", tmp );
}
#define expect_bin(buf, value, len) { ok(memcmp((buf), value, len) == 0, \
"Binary buffer mismatch - expected %s, got %s\n", \
debugstr_an(value, len), debugstr_an((char *)(buf), len)); }
static void test__mbsncpy_s(void)
{
unsigned char *mbstring = (unsigned char *)"\xb0\xb1\xb2\xb3Q\xb4\xb5\x0";
unsigned char *mbstring2 = (unsigned char *)"\xb0\x0";
unsigned char buf[16];
errno_t err;
int oldcp;
oldcp = _getmbcp();
if (_setmbcp(936))
{
win_skip("Code page 936 is not available, skipping test.\n");
return;
}
errno = 0xdeadbeef;
memset(buf, 0xcc, sizeof(buf));
err = _mbsncpy_s(NULL, 0, mbstring, 0);
ok(errno == 0xdeadbeef, "got %d\n", errno);
ok(!err, "got %d.\n", err);
errno = 0xdeadbeef;
memset(buf, 0xcc, sizeof(buf));
err = _mbsncpy_s(buf, 6, mbstring, 1);
ok(errno == 0xdeadbeef, "got %d\n", errno);
ok(!err, "got %d.\n", err);
expect_bin(buf, "\xb0\xb1\0\xcc", 4);
memset(buf, 0xcc, sizeof(buf));
errno = 0xdeadbeef;
err = _mbsncpy_s(buf, 6, mbstring, 2);
ok(errno == 0xdeadbeef, "got %d\n", errno);
ok(!err, "got %d.\n", err);
expect_bin(buf, "\xb0\xb1\xb2\xb3\0\xcc", 6);
errno = 0xdeadbeef;
memset(buf, 0xcc, sizeof(buf));
err = _mbsncpy_s(buf, 2, mbstring, _TRUNCATE);
ok(errno == 0xdeadbeef, "got %d\n", errno);
ok(err == STRUNCATE, "got %d.\n", err);
expect_bin(buf, "\x00\xb1\xcc", 3);
memset(buf, 0xcc, sizeof(buf));
SET_EXPECT(invalid_parameter_handler);
errno = 0xdeadbeef;
err = _mbsncpy_s(buf, 2, mbstring, 1);
ok(errno == err, "got %d.\n", errno);
CHECK_CALLED(invalid_parameter_handler);
ok(err == ERANGE, "got %d.\n", err);
expect_bin(buf, "\x0\xcc\xcc", 3);
memset(buf, 0xcc, sizeof(buf));
SET_EXPECT(invalid_parameter_handler);
errno = 0xdeadbeef;
err = _mbsncpy_s(buf, 2, mbstring, 3);
ok(errno == err, "got %d\n", errno);
CHECK_CALLED(invalid_parameter_handler);
ok(err == ERANGE, "got %d.\n", err);
expect_bin(buf, "\x0\xcc\xcc", 3);
memset(buf, 0xcc, sizeof(buf));
SET_EXPECT(invalid_parameter_handler);
errno = 0xdeadbeef;
err = _mbsncpy_s(buf, 1, mbstring, 3);
ok(errno == err, "got %d\n", errno);
CHECK_CALLED(invalid_parameter_handler);
ok(err == ERANGE, "got %d.\n", err);
expect_bin(buf, "\x0\xcc", 2);
memset(buf, 0xcc, sizeof(buf));
SET_EXPECT(invalid_parameter_handler);
errno = 0xdeadbeef;
err = _mbsncpy_s(buf, 0, mbstring, 3);
ok(errno == err, "got %d\n", errno);
CHECK_CALLED(invalid_parameter_handler);
ok(err == EINVAL, "got %d.\n", err);
expect_bin(buf, "\xcc", 1);
memset(buf, 0xcc, sizeof(buf));
SET_EXPECT(invalid_parameter_handler);
errno = 0xdeadbeef;
err = _mbsncpy_s(buf, 0, mbstring, 0);
ok(errno == err, "got %d\n", errno);
CHECK_CALLED(invalid_parameter_handler);
ok(err == EINVAL, "got %d.\n", err);
expect_bin(buf, "\xcc", 1);
memset(buf, 0xcc, sizeof(buf));
errno = 0xdeadbeef;
err = _mbsncpy_s(buf, -1, mbstring, 0);
ok(errno == 0xdeadbeef, "got %d\n", errno);
ok(!err, "got %d.\n", err);
expect_bin(buf, "\x0\xcc", 2);
memset(buf, 0xcc, sizeof(buf));
errno = 0xdeadbeef;
err = _mbsncpy_s(buf, -1, mbstring, 256);
ok(errno == 0xdeadbeef, "got %d\n", errno);
ok(!err, "got %d.\n", err);
expect_bin(buf, "\xb0\xb1\xb2\xb3Q\xb4\xb5\x0\xcc", 9);
memset(buf, 0xcc, sizeof(buf));
errno = 0xdeadbeef;
err = _mbsncpy_s(buf, 1, mbstring2, 4);
ok(errno == err, "got %d\n", errno);
ok(err == EILSEQ, "got %d.\n", err);
expect_bin(buf, "\x0\xcc", 2);
memset(buf, 0xcc, sizeof(buf));
errno = 0xdeadbeef;
err = _mbsncpy_s(buf, 2, mbstring2, 4);
ok(errno == err, "got %d\n", errno);
ok(err == EILSEQ, "got %d.\n", err);
expect_bin(buf, "\x0\xcc", 2);
memset(buf, 0xcc, sizeof(buf));
errno = 0xdeadbeef;
err = _mbsncpy_s(buf, 1, mbstring2, _TRUNCATE);
ok(errno == 0xdeadbeef, "got %d\n", errno);
ok(err == STRUNCATE, "got %d.\n", err);
expect_bin(buf, "\x0\xcc", 2);
memset(buf, 0xcc, sizeof(buf));
errno = 0xdeadbeef;
err = _mbsncpy_s(buf, 2, mbstring2, _TRUNCATE);
ok(errno == 0xdeadbeef, "got %d\n", errno);
ok(!err, "got %d.\n", err);
expect_bin(buf, "\xb0\x0\xcc", 3);
memset(buf, 0xcc, sizeof(buf));
errno = 0xdeadbeef;
err = _mbsncpy_s(buf, 1, mbstring2, 1);
ok(errno == err, "got %d\n", errno);
ok(err == EILSEQ, "got %d.\n", err);
expect_bin(buf, "\x0\xcc", 2);
memset(buf, 0xcc, sizeof(buf));
errno = 0xdeadbeef;
err = _mbsncpy_s(buf, 2, mbstring2, 1);
ok(errno == err, "got %d\n", errno);
ok(err == EILSEQ, "got %d.\n", err);
expect_bin(buf, "\x0\xcc", 2);
memset(buf, 0xcc, sizeof(buf));
errno = 0xdeadbeef;
err = _mbsncpy_s(buf, 3, mbstring2, 1);
ok(errno == err, "got %d\n", errno);
ok(err == EILSEQ, "got %d.\n", err);
expect_bin(buf, "\x0\xcc", 2);
memset(buf, 0xcc, sizeof(buf));
errno = 0xdeadbeef;
err = _mbsncpy_s(buf, 3, mbstring2, 2);
ok(errno == err, "got %d\n", errno);
ok(err == EILSEQ, "got %d.\n", err);
expect_bin(buf, "\x0\xcc", 2);
_setmbcp(oldcp);
}
START_TEST(msvcr80)
{
init();
ok(_set_invalid_parameter_handler(test_invalid_parameter_handler) == NULL,
"Invalid parameter handler was already set\n");
test_ioinfo_flags();
test_strcmp();
test_dupenv_s();
test_wdupenv_s();
test__mbsncpy_s();
}
Reference in a new issue View git blame Copy permalink