glibc/localedata/tests-mbwc/tst_wcstok.c

97 lines
1.7 KiB
C

/*
WCSTOK: wchar_t *wcstok (wchar_t *ws, const wchar_t *dlm, wchar_t **pt);
*/
#define TST_FUNCTION wcstok
#include "tsp_common.c"
#include "dat_wcstok.c"
int
tst_wcstok (FILE * fp, int debug_flg)
{
TST_DECL_VARS (wchar_t *);
char w_flg;
wchar_t *ws;
wchar_t *dt, *pt;
wchar_t *ws_ex;
int err, i;
TST_DO_TEST (wcstok)
{
TST_HEAD_LOCALE (wcstok, S_WCSTOK);
TST_DO_REC (wcstok)
{
TST_DO_SEQ (WCSTOK_SEQNUM)
{
TST_GET_ERRET_SEQ (wcstok);
w_flg = TST_INPUT_SEQ (wcstok).w_flg;
ws = (w_flg) ? TST_INPUT_SEQ (wcstok).ws : NULL;
dt = TST_INPUT_SEQ (wcstok).dt;
ret = wcstok (ws, dt, &pt);
if (debug_flg)
{
fprintf (stdout, "wcstok() [ %s : %d : %d ] *ret = 0x%lx\n",
locale, rec + 1, seq_num + 1, (unsigned long int) *ret);
if (pt && *pt)
{
fprintf (stdout, " *pt = 0x%lx\n",
(unsigned long int) *pt);
}
}
TST_IF_RETURN (S_WCSTOK)
{
};
if (ret != NULL)
{
ws_ex = TST_EXPECT_SEQ (wcstok).ws;
/* XXX: REVISIT : insufficient conditions */
for (err = 0, i = 0; i < WCSSIZE; i++)
{
if (ret[i] == L'\0' && ws_ex[i] == L'\0')
{
break;
}
if (debug_flg)
{
fprintf (stderr,
" ret[%d] = 0x%lx <-> "
"0x%lx = ws_ex[%d]\n",
i, (unsigned long int) ret[i],
(unsigned long int) ws_ex[i], i);
}
if (ret[i] != ws_ex[i])
{
err++;
err_count++;
Result (C_FAILURE, S_WCSTOK, CASE_3,
"the token is different from an expected string");
break;
}
if (ret[i] == L'\0' || ws_ex[i] == L'\0')
{
break;
}
}
if (!err)
{
Result (C_SUCCESS, S_WCSTOK, CASE_3, MS_PASSED);
}
}
}
}
}
return err_count;
}