int
tst_wcsspn (FILE *fp, int debug_flg)
{
TST_DECL_VARS (size_t);
wchar_t *ws1, *ws2;
TST_DO_TEST (wcsspn)
{
TST_HEAD_LOCALE (wcsspn, S_WCSSPN);
TST_DO_REC (wcsspn)
{
TST_GET_ERRET (wcsspn);
ws1 = TST_INPUT (wcsspn).ws1;
ws2 = TST_INPUT (wcsspn).ws2; /* external value: size WCSSIZE */
ret = wcsspn (ws1, ws2);
if (debug_flg)
{
fprintf (stderr, "wcsspn: ret = %zu\n", ret);
}
TST_IF_RETURN (S_WCSSPN)
{
};
}
}
return err_count;
}
int
tst_mbrtowc (FILE * fp, int debug_flg)
{
TST_DECL_VARS (size_t);
char w_flg, s_flg;
char *s;
size_t n;
char t_flg, t_ini;
static mbstate_t t = { 0 };
mbstate_t *pt;
wchar_t wc, *pwc, wc_ex;
TST_DO_TEST (mbrtowc)
{
TST_HEAD_LOCALE (mbrtowc, S_MBRTOWC);
TST_DO_REC (mbrtowc)
{
if (mbrtowc (NULL, "", 0, &t) != 0)
{
err_count++;
Result (C_FAILURE, S_MBRTOWC, CASE_3,
"Initialization failed - skipping this test case.");
continue;
}
TST_DO_SEQ (MBRTOWC_SEQNUM)
{
TST_GET_ERRET_SEQ (mbrtowc);
w_flg = TST_INPUT_SEQ (mbrtowc).w_flg;
s_flg = TST_INPUT_SEQ (mbrtowc).s_flg;
s = TST_INPUT_SEQ (mbrtowc).s;
n = TST_INPUT_SEQ (mbrtowc).n;
t_flg = TST_INPUT_SEQ (mbrtowc).t_flg;
t_ini = TST_INPUT_SEQ (mbrtowc).t_init;
pwc = (w_flg == 0) ? NULL : &wc;
if (s_flg == 0)
{
s = NULL;
}
if (n == USE_MBCURMAX)
{
n = MB_CUR_MAX;
}
pt = (t_flg == 0) ? NULL : &t;
#if 0
if (t_ini != 0)
{
memset (&t, 0, sizeof (t));
}
#endif
TST_CLEAR_ERRNO;
ret = mbrtowc (pwc, s, n, pt);
TST_SAVE_ERRNO;
if (debug_flg)
{
fprintf (stdout, "mbrtowc() [ %s : %d : %d ] ret = %d\n",
locale, rec + 1, seq_num + 1, ret);
fprintf (stdout, " errno = %hd\n",
errno_save);
}
TST_IF_RETURN (S_MBRTOWC)
{
};
if (pwc == NULL || s == NULL || ret == (size_t) - 1
|| ret == (size_t) - 2)
{
continue;
}
wc_ex = TST_EXPECT_SEQ (mbrtowc).wc;
if (wc_ex == wc)
{
Result (C_SUCCESS, S_MBRTOWC, CASE_4, MS_PASSED);
}
else
{
err_count++;
Result (C_FAILURE, S_MBRTOWC, CASE_4,
"converted wc is different from an expected wc");
}
}
}
}
return err_count;
}
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;
}
int
tst_mbsrtowcs (FILE * fp, int debug_flg)
{
TST_DECL_VARS (size_t);
char w_flg;
const char *s, *p;
size_t n;
char t_flg, t_ini;
static mbstate_t t = { 0 };
mbstate_t *pt;
wchar_t ws[WCSSIZE], *ws_ex, *wp;
int err, i;
TST_DO_TEST (mbsrtowcs)
{
TST_HEAD_LOCALE (mbsrtowcs, S_MBSRTOWCS);
TST_DO_REC (mbsrtowcs)
{
s = "";
if (mbsrtowcs (NULL, &s, 0, &t) != 0)
{
err_count++;
Result (C_FAILURE, S_MBSRTOWCS, CASE_3,
"Initialization failed - skipping this test case.");
continue;
}
TST_DO_SEQ (MBSRTOWCS_SEQNUM)
{
TST_GET_ERRET_SEQ (mbsrtowcs);
w_flg = TST_INPUT_SEQ (mbsrtowcs).w_flg;
p = s = TST_INPUT_SEQ (mbsrtowcs).s;
n = TST_INPUT_SEQ (mbsrtowcs).n;
t_flg = TST_INPUT_SEQ (mbsrtowcs).t_flg;
t_ini = TST_INPUT_SEQ (mbsrtowcs).t_init;
wp = (w_flg == 0) ? NULL : ws;
if (n == USE_MBCURMAX)
{
n = MB_CUR_MAX;
}
pt = (t_flg == 0) ? NULL : &t;
if (t_ini != 0)
{
memset (&t, 0, sizeof (t));
}
TST_CLEAR_ERRNO;
ret = mbsrtowcs (wp, &p, n, pt);
TST_SAVE_ERRNO;
if (debug_flg)
{
fprintf (stderr, "mbsrtowcs: [ %d ] : ret = %zd\n", rec + 1, ret);
}
TST_IF_RETURN (S_MBSRTOWCS)
{
};
if (wp == NULL || ret == (size_t) - 1 || ret == (size_t) - 2)
{
continue;
}
ws_ex = TST_EXPECT_SEQ (mbsrtowcs).ws;
for (err = 0, i = 0; i < ret; i++)
{
if (debug_flg)
{
fprintf (stderr,
"mbsrtowcs: ws[%d] => 0x%lx : 0x%lx <= ws_ex[%d]\n",
i, (unsigned long int) ws[i],
(unsigned long int) ws_ex[i], i);
}
if (ws[i] != ws_ex[i])
{
err++;
err_count++;
Result (C_FAILURE, S_MBSRTOWCS, CASE_4,
"the converted wc string has "
"different value from an expected string");
break;
}
}
if (!err)
{
Result (C_SUCCESS, S_MBSRTOWCS, CASE_4, MS_PASSED);
}
}
}
}
return err_count;
}
