dlls/msvcrt/tests/misc.c

   1 /*
   2  * Unit tests for miscellaneous msvcrt functions
   3  *
   4  * Copyright 2010 Andrew Nguyen
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include "wine/test.h"
  22 #include <errno.h>
  23 #include "msvcrt.h"
  24
  25 static int (__cdecl *prand_s)(unsigned int *);
  26 static int (__cdecl *pmemcpy_s)(void *, MSVCRT_size_t, void*, MSVCRT_size_t);
  27 static int (__cdecl *pI10_OUTPUT)(long double, int, int, void*);
  28 static int (__cdecl *pstrerror_s)(char *, MSVCRT_size_t, int);
  29 static int (__cdecl *p_get_doserrno)(int *);
  30 static int (__cdecl *p_get_errno)(int *);
  31 static int (__cdecl *p_set_doserrno)(int);
  32 static int (__cdecl *p_set_errno)(int);
  33
  34 static void init(void)
  35 {
  36     HMODULE hmod = GetModuleHandleA("msvcrt.dll");
  37
  38     prand_s = (void *)GetProcAddress(hmod, "rand_s");
  39     pmemcpy_s = (void*)GetProcAddress(hmod, "memcpy_s");
  40     pI10_OUTPUT = (void*)GetProcAddress(hmod, "$I10_OUTPUT");
  41     pstrerror_s = (void *)GetProcAddress(hmod, "strerror_s");
  42     p_get_doserrno = (void *)GetProcAddress(hmod, "_get_doserrno");
  43     p_get_errno = (void *)GetProcAddress(hmod, "_get_errno");
  44     p_set_doserrno = (void *)GetProcAddress(hmod, "_set_doserrno");
  45     p_set_errno = (void *)GetProcAddress(hmod, "_set_errno");
  46 }
  47
  48 static void test_rand_s(void)
  49 {
  50     int ret;
  51     unsigned int rand;
  52
  53     if (!prand_s)
  54     {
  55         win_skip("rand_s is not available\n");
  56         return;
  57     }
  58
  59     errno = EBADF;
  60     ret = prand_s(NULL);
  61     ok(ret == EINVAL, "Expected rand_s to return EINVAL, got %d\n", ret);
  62     ok(errno == EINVAL, "Expected errno to return EINVAL, got %d\n", errno);
  63
  64     ret = prand_s(&rand);
  65     ok(ret == 0, "Expected rand_s to return 0, got %d\n", ret);
  66 }
  67
  68 static void test_memcpy_s(void)
  69 {
  70     static char data[] = "data\0to\0be\0copied";
  71     static char dest[32];
  72     int ret;
  73
  74     if(!pmemcpy_s)
  75     {
  76         win_skip("memcpy_s is not available\n");
  77         return;
  78     }
  79
  80     errno = 0xdeadbeef;
  81     ret = pmemcpy_s(NULL, 0, NULL, 0);
  82     ok(ret == 0, "ret = %x\n", ret);
  83     ok(errno == 0xdeadbeef, "errno = %x\n", errno);
  84
  85     errno = 0xdeadbeef;
  86     dest[0] = 'x';
  87     ret = pmemcpy_s(dest, 10, NULL, 0);
  88     ok(ret == 0, "ret = %x\n", ret);
  89     ok(errno == 0xdeadbeef, "errno = %x\n", errno);
  90     ok(dest[0] == 'x', "dest[0] != \'x\'\n");
  91
  92     errno = 0xdeadbeef;
  93     ret = pmemcpy_s(NULL, 10, data, 10);
  94     ok(ret == EINVAL, "ret = %x\n", ret);
  95     ok(errno == EINVAL, "errno = %x\n", errno);
  96
  97     errno = 0xdeadbeef;
  98     dest[7] = 'x';
  99     ret = pmemcpy_s(dest, 10, data, 5);
 100     ok(ret == 0, "ret = %x\n", ret);
 101     ok(errno == 0xdeadbeef, "errno = %x\n", errno);
 102     ok(memcmp(dest, data, 10), "All data copied\n");
 103     ok(!memcmp(dest, data, 5), "First five bytes are different\n");
 104
 105     errno = 0xdeadbeef;
 106     ret = pmemcpy_s(data, 10, data, 10);
 107     ok(ret == 0, "ret = %x\n", ret);
 108     ok(errno == 0xdeadbeef, "errno = %x\n", errno);
 109     ok(!memcmp(dest, data, 5), "data was destroyed during overwriting\n");
 110
 111     errno = 0xdeadbeef;
 112     dest[0] = 'x';
 113     ret = pmemcpy_s(dest, 5, data, 10);
 114     ok(ret == ERANGE, "ret = %x\n", ret);
 115     ok(errno == ERANGE, "errno = %x\n", errno);
 116     ok(dest[0] == '\0', "dest[0] != \'\\0\'\n");
 117 }
 118
 119 typedef struct _I10_OUTPUT_data {
 120     short pos;
 121     char sign;
 122     BYTE len;
 123     char str[100];
 124 } I10_OUTPUT_data;
 125
 126 typedef struct _I10_OUTPUT_test {
 127     long double d;
 128     int size;
 129     int flags;
 130
 131     I10_OUTPUT_data out;
 132     int ret;
 133     const char *remain;
 134 } I10_OUTPUT_test;
 135
 136 static const I10_OUTPUT_test I10_OUTPUT_tests[] = {
 137     /* arg3 = 0 */
 138     { 0.0, 10, 0, {0, ' ', 1, "0"}, 1, "" },
 139     { 1.0, 10, 0, {1, ' ', 1, "1"}, 1, "000000009" },
 140     { -1.0, 10, 0, {1, '-', 1, "1"}, 1, "000000009" },
 141     { 1.23, 10, 0, {1, ' ', 3, "123"}, 1, "0000009" },
 142     { 1e13, 10, 0, {14, ' ', 1, "1"}, 1, "000000009" },
 143     { 1e30, 30, 0, {31, ' ', 21, "100000000000000001988"}, 1, "" },
 144     { 1e-13, 10, 0, {-12, ' ', 1, "1"}, 1, "000000000" },
 145     { 0.25, 10, 0, {0, ' ', 2, "25"}, 1, "00000000" },
 146     { 1.0000001, 10, 0, {1, ' ', 8, "10000001"}, 1, "00" },
 147     /* arg3 = 1 */
 148     { 0.0, 10, 1, {0, ' ', 1, "0"}, 1, "" },
 149     { 1.0, 10, 1, {1, ' ', 1, "1"}, 1, "0000000009" },
 150     { -1.0, 10, 1, {1, '-', 1, "1"}, 1, "0000000009" },
 151     { 1.23, 10, 1, {1, ' ', 3, "123"}, 1, "00000009" },
 152     { 1e13, 10, 1, {14, ' ', 1, "1"}, 1, "00000000000000000009" },
 153     { 1e30, 30, 1, {31, ' ', 21, "100000000000000001988"}, 1, "" },
 154     { 1e-13, 10, 1, {0, ' ', 1, "0"}, 1, "" },
 155     { 1e-7, 10, 1, {-6, ' ', 1, "1"}, 1, "09" },
 156     { 0.25, 10, 1, {0, ' ', 2, "25"}, 1, "00000000" },
 157     { 1.0000001, 10, 1, {1, ' ', 8, "10000001"}, 1, "000" },
 158     /* too small buffer */
 159     { 0.0, 0, 0, {0, ' ', 1, "0"}, 1, "" },
 160     { 0.0, 0, 1, {0, ' ', 1, "0"}, 1, "" },
 161     { 123.0, 2, 0, {3, ' ', 2, "12"}, 1, "" },
 162     { 123.0, 0, 0, {0, ' ', 1, "0"}, 1, "" },
 163     { 123.0, 2, 1, {3, ' ', 3, "123"}, 1, "09" },
 164     { 0.99, 1, 0, {1, ' ', 1, "1"}, 1, "" },
 165     { 1264567.0, 2, 0, {7, ' ', 2, "13"}, 1, "" },
 166     { 1264567.0, 2, 1, {7, ' ', 7, "1264567"}, 1, "00" },
 167     { 1234567891.0, 2, 1, {10, ' ', 10, "1234567891"}, 1, "09" }
 168 };
 169
 170 static void test_I10_OUTPUT(void)
 171 {
 172     I10_OUTPUT_data out;
 173     int i, j = sizeof(long double), ret;
 174
 175     if(!pI10_OUTPUT) {
 176         win_skip("I10_OUTPUT not available\n");
 177         return;
 178     }
 179     if (j != 12)
 180         trace("sizeof(long double) = %d on this machine\n", j);
 181
 182     for(i=0; i<sizeof(I10_OUTPUT_tests)/sizeof(I10_OUTPUT_test); i++) {
 183         memset(out.str, '#', sizeof(out.str));
 184
 185         if (sizeof(long double) == 12)
 186             ret = pI10_OUTPUT(I10_OUTPUT_tests[i].d, I10_OUTPUT_tests[i].size, I10_OUTPUT_tests[i].flags, &out);
 187         else {
 188             /* MS' "long double" is an 80 bit FP that takes 12 bytes*/
 189             typedef struct { ULONG x80[3]; } uld; /* same calling convention */
 190             union { long double ld; uld ld12; } fp80;
 191             int (__cdecl *pI10_OUTPUT12)(uld, int, int, void*) = (void*)pI10_OUTPUT;
 192             fp80.ld = I10_OUTPUT_tests[i].d;
 193             ret = pI10_OUTPUT12(fp80.ld12, I10_OUTPUT_tests[i].size, I10_OUTPUT_tests[i].flags, &out);
 194         }
 195         ok(ret == I10_OUTPUT_tests[i].ret, "%d: ret = %d\n", i, ret);
 196         ok(out.pos == I10_OUTPUT_tests[i].out.pos, "%d: out.pos = %hd\n", i, out.pos);
 197         ok(out.sign == I10_OUTPUT_tests[i].out.sign, "%d: out.size = %c\n", i, out.sign);
 198         ok(out.len == I10_OUTPUT_tests[i].out.len, "%d: out.len = %d\n", i, (int)out.len);
 199         ok(!strcmp(out.str, I10_OUTPUT_tests[i].out.str), "%d: out.str = %s\n", i, out.str);
 200
 201         j = strlen(I10_OUTPUT_tests[i].remain);
 202         if(j && I10_OUTPUT_tests[i].remain[j-1]=='9')
 203             todo_wine ok(!strncmp(out.str+out.len+1, I10_OUTPUT_tests[i].remain, j),
 204                     "%d: &out.str[%d] = %.25s...\n", i, out.len+1, out.str+out.len+1);
 205         else
 206             ok(!strncmp(out.str+out.len+1, I10_OUTPUT_tests[i].remain, j),
 207                     "%d: &out.str[%d] = %.25s...\n", i, out.len+1, out.str+out.len+1);
 208
 209
 210         for(j=out.len+strlen(I10_OUTPUT_tests[i].remain)+1; j<sizeof(out.str); j++)
 211             if(out.str[j] != '#')
 212                 ok(0, "%d: out.str[%d] = %c (expected \'#\')\n", i, j, out.str[j]);
 213     }
 214 }
 215
 216 static void test_strerror_s(void)
 217 {
 218     int ret;
 219     char buf[256];
 220
 221     if (!pstrerror_s)
 222     {
 223         win_skip("strerror_s is not available\n");
 224         return;
 225     }
 226
 227     errno = EBADF;
 228     ret = pstrerror_s(NULL, 0, 0);
 229     ok(ret == EINVAL, "Expected strerror_s to return EINVAL, got %d\n", ret);
 230     ok(errno == EINVAL, "Expected errno to be EINVAL, got %d\n", errno);
 231
 232     errno = EBADF;
 233     ret = pstrerror_s(NULL, sizeof(buf), 0);
 234     ok(ret == EINVAL, "Expected strerror_s to return EINVAL, got %d\n", ret);
 235     ok(errno == EINVAL, "Expected errno to be EINVAL, got %d\n", errno);
 236
 237     memset(buf, 'X', sizeof(buf));
 238     errno = EBADF;
 239     ret = pstrerror_s(buf, 0, 0);
 240     ok(ret == EINVAL, "Expected strerror_s to return EINVAL, got %d\n", ret);
 241     ok(errno == EINVAL, "Expected errno to be EINVAL, got %d\n", errno);
 242     ok(buf[0] == 'X', "Expected output buffer to be untouched\n");
 243
 244     memset(buf, 'X', sizeof(buf));
 245     ret = pstrerror_s(buf, 1, 0);
 246     ok(ret == 0, "Expected strerror_s to return 0, got %d\n", ret);
 247     ok(strlen(buf) == 0, "Expected output buffer to be null terminated\n");
 248
 249     memset(buf, 'X', sizeof(buf));
 250     ret = pstrerror_s(buf, 2, 0);
 251     ok(ret == 0, "Expected strerror_s to return 0, got %d\n", ret);
 252     ok(strlen(buf) == 1, "Expected output buffer to be truncated\n");
 253
 254     memset(buf, 'X', sizeof(buf));
 255     ret = pstrerror_s(buf, sizeof(buf), 0);
 256     ok(ret == 0, "Expected strerror_s to return 0, got %d\n", ret);
 257
 258     memset(buf, 'X', sizeof(buf));
 259     ret = pstrerror_s(buf, sizeof(buf), -1);
 260     ok(ret == 0, "Expected strerror_s to return 0, got %d\n", ret);
 261 }
 262
 263 static void test__get_doserrno(void)
 264 {
 265     int ret, out;
 266
 267     if (!p_get_doserrno)
 268     {
 269         win_skip("_get_doserrno is not available\n");
 270         return;
 271     }
 272
 273     _doserrno = ERROR_INVALID_CMM;
 274     errno = EBADF;
 275     ret = p_get_doserrno(NULL);
 276     ok(ret == EINVAL, "Expected _get_doserrno to return EINVAL, got %d\n", ret);
 277     ok(_doserrno == ERROR_INVALID_CMM, "Expected _doserrno to be ERROR_INVALID_CMM, got %d\n", _doserrno);
 278     ok(errno == EBADF, "Expected errno to be EBADF, got %d\n", errno);
 279
 280     _doserrno = ERROR_INVALID_CMM;
 281     errno = EBADF;
 282     out = 0xdeadbeef;
 283     ret = p_get_doserrno(&out);
 284     ok(ret == 0, "Expected _get_doserrno to return 0, got %d\n", ret);
 285     ok(out == ERROR_INVALID_CMM, "Expected output variable to be ERROR_INVAID_CMM, got %d\n", out);
 286 }
 287
 288 static void test__get_errno(void)
 289 {
 290     int ret, out;
 291
 292     if (!p_get_errno)
 293     {
 294         win_skip("_get_errno is not available\n");
 295         return;
 296     }
 297
 298     errno = EBADF;
 299     ret = p_get_errno(NULL);
 300     ok(ret == EINVAL, "Expected _get_errno to return EINVAL, got %d\n", ret);
 301     ok(errno == EBADF, "Expected errno to be EBADF, got %d\n", errno);
 302
 303     errno = EBADF;
 304     out = 0xdeadbeef;
 305     ret = p_get_errno(&out);
 306     ok(ret == 0, "Expected _get_errno to return 0, got %d\n", ret);
 307     ok(out == EBADF, "Expected output variable to be EBADF, got %d\n", out);
 308 }
 309
 310 static void test__set_doserrno(void)
 311 {
 312     int ret;
 313
 314     if (!p_set_doserrno)
 315     {
 316         win_skip("_set_doserrno is not available\n");
 317         return;
 318     }
 319
 320     _doserrno = ERROR_INVALID_CMM;
 321     ret = p_set_doserrno(ERROR_FILE_NOT_FOUND);
 322     ok(ret == 0, "Expected _set_doserrno to return 0, got %d\n", ret);
 323     ok(_doserrno == ERROR_FILE_NOT_FOUND,
 324        "Expected _doserrno to be ERROR_FILE_NOT_FOUND, got %d\n", _doserrno);
 325
 326     _doserrno = ERROR_INVALID_CMM;
 327     ret = p_set_doserrno(-1);
 328     ok(ret == 0, "Expected _set_doserrno to return 0, got %d\n", ret);
 329     ok(_doserrno == -1,
 330        "Expected _doserrno to be -1, got %d\n", _doserrno);
 331
 332     _doserrno = ERROR_INVALID_CMM;
 333     ret = p_set_doserrno(0xdeadbeef);
 334     ok(ret == 0, "Expected _set_doserrno to return 0, got %d\n", ret);
 335     ok(_doserrno == 0xdeadbeef,
 336        "Expected _doserrno to be 0xdeadbeef, got %d\n", _doserrno);
 337 }
 338
 339 static void test__set_errno(void)
 340 {
 341     int ret;
 342
 343     if (!p_set_errno)
 344     {
 345         win_skip("_set_errno is not available\n");
 346         return;
 347     }
 348
 349     errno = EBADF;
 350     ret = p_set_errno(EINVAL);
 351     ok(ret == 0, "Expected _set_errno to return 0, got %d\n", ret);
 352     ok(errno == EINVAL, "Expected errno to be EINVAL, got %d\n", errno);
 353
 354     errno = EBADF;
 355     ret = p_set_errno(-1);
 356     ok(ret == 0, "Expected _set_errno to return 0, got %d\n", ret);
 357     ok(errno == -1, "Expected errno to be -1, got %d\n", errno);
 358
 359     errno = EBADF;
 360     ret = p_set_errno(0xdeadbeef);
 361     ok(ret == 0, "Expected _set_errno to return 0, got %d\n", ret);
 362     ok(errno == 0xdeadbeef, "Expected errno to be 0xdeadbeef, got %d\n", errno);
 363 }
 364
 365 START_TEST(misc)
 366 {
 367     init();
 368
 369     test_rand_s();
 370     test_memcpy_s();
 371     test_I10_OUTPUT();
 372     test_strerror_s();
 373     test__get_doserrno();
 374     test__get_errno();
 375     test__set_doserrno();
 376     test__set_errno();
 377 }