glibc/localedata/tests-mbwc/tst_wcstombs.c

116 lines
2.2 KiB
C

/*
WCSTOMBS: size_t wcstombs (char *s, const wchar_t *ws, size_t n)
*/
#define TST_FUNCTION wcstombs
#include "tsp_common.c"
#include "dat_wcstombs.c"
#define MARK_VAL 0x01
int
tst_wcstombs (FILE * fp, int debug_flg)
{
TST_DECL_VARS (size_t);
char s_flg, n;
wchar_t *ws;
char s[MBSSIZE], *s_in;
int err, i;
char *s_ex;
TST_DO_TEST (wcstombs)
{
TST_HEAD_LOCALE (wcstombs, S_WCSTOMBS);
TST_DO_REC (wcstombs)
{
TST_GET_ERRET (wcstombs);
memset (s, MARK_VAL, MBSSIZE);
s_flg = TST_INPUT (wcstombs).s_flg;
s_in = (s_flg == 1) ? s : (char *) NULL;
ws = TST_INPUT (wcstombs).ws;
n = TST_INPUT (wcstombs).n;
TST_CLEAR_ERRNO;
ret = wcstombs (s_in, ws, n);
TST_SAVE_ERRNO;
if (debug_flg)
{
fprintf (stdout, "wcstombs: ret = %zu\n", ret);
}
TST_IF_RETURN (S_WCSTOMBS)
{
};
if (s_in != NULL && ret != (size_t) - 1)
{
/* No definition for s, when error occurs. */
s_ex = TST_EXPECT (wcstombs).s;
for (err = 0, i = 0; i <= ret && i < MBSSIZE; i++)
{
if (debug_flg)
{
fprintf (stdout,
" : s[%d] = 0x%hx <-> 0x%hx = s_ex[%d]\n", i,
s[i], s_ex[i], i);
}
if (i == ret && ret == n) /* no null termination */
{
if (s[i] == MARK_VAL)
{
Result (C_SUCCESS, S_WCSTOMBS, CASE_4, MS_PASSED);
}
else
{
err_count++;
Result (C_FAILURE, S_WCSTOMBS, CASE_4,
"should not be null terminated "
"(it may be a null char), but it is");
}
break;
}
if (i == ret && ret < n) /* null termination */
{
if (s[i] == 0)
{
Result (C_SUCCESS, S_WCSTOMBS, CASE_5, MS_PASSED);
}
else
{
err_count++;
Result (C_FAILURE, S_WCSTOMBS, CASE_5,
"should be null terminated, but it is not");
}
break;
}
if (s[i] != s_ex[i])
{
err++;
err_count++;
Result (C_FAILURE, S_WCSTOMBS, CASE_6,
"converted string is different from an "
"expected string");
break;
}
}
if (!err)
{
Result (C_SUCCESS, S_WCSTOMBS, CASE_6, MS_PASSED);
}
}
}
}
return err_count;
}