glibc/localedata/tests-mbwc/tst_wcsrtombs.c
Andreas Jaeger 5ca8accdcd Update.
(tst_mbrtowc-ENV): New.
	(tst_mbsrtowcs-ENV): New.
	(tst_mbstowcs-ENV): New.
	(tst_strfmon-ENV): New.
	(tst_wcrtomb-ENV): New.
	(tst_wcsrtombs-ENV): New.
	(tst_wcstod-ENV): New.
	(tst_wcstok-ENV): New.
	(tst_wcstombs-ENV): New.
	* tests-mbwc/dat_wcstok.c: Likewise.
	* tests-mbwc/tst_wcstok.c: Likewise.
	* tests-mbwc/dat_wcstod.c: Likewise.
	* tests-mbwc/tst_wcstod.c: Likewise.
	* tests-mbwc/dat_mbrtowc.c: Likewise.
	* tests-mbwc/tst_mbrtowc.c: Likewise.
	* tests-mbwc/dat_wcsrtombs.c: Likewise.
	* tests-mbwc/tst_wcsrtombs.c: Likewise.
	* tests-mbwc/dat_wcstombs.c: Likewise.
	* tests-mbwc/tst_wcstombs.c: Likewise.
	* tests-mbwc/dat_mbsrtowcs.c: Likewise.
	* tests-mbwc/tst_mbsrtowcs.c: Likewise.
	* tests-mbwc/dat_wcrtomb.c: Likewise.
	* tests-mbwc/tst_wcrtomb.c: Likewise.
	* tests-mbwc/dat_mbstowcs.c: Likewise.
	* tests-mbwc/tst_mbstowcs.c: Likewise.
	* tests-mbwc/dat_strfmon.c: Likewise.
	* tests-mbwc/tst_strfmon.c: Likewise.
2000-06-29 10:36:12 +00:00

128 lines
2.5 KiB
C

/*
WCSRTOMBS: size_t wcsrtombs (char *s, const wchar_t **ws, size_t n,
mbstate_t *ps)
*/
#define TST_FUNCTION wcsrtombs
#include "tsp_common.c"
#include "dat_wcsrtombs.c"
#define MARK_VAL 0x01
int
tst_wcsrtombs (FILE * fp, int debug_flg)
{
TST_DECL_VARS (size_t);
char s_flg, n;
const wchar_t *ws, *wp;
char s[MBSSIZE], *s_in;
char t_flg, t_ini;
static mbstate_t t = { 0 };
mbstate_t *pt;
int err, i;
char *s_ex;
TST_DO_TEST (wcsrtombs)
{
TST_HEAD_LOCALE (wcsrtombs, S_WCSRTOMBS);
TST_DO_REC (wcsrtombs)
{
TST_GET_ERRET (wcsrtombs);
memset (s, MARK_VAL, MBSSIZE);
s_flg = TST_INPUT (wcsrtombs).s_flg;
s_in = (s_flg == 1) ? s : (char *) NULL;
wp = ws = TST_INPUT (wcsrtombs).ws;
n = TST_INPUT (wcsrtombs).n;
t_flg = TST_INPUT (wcsrtombs).t_flg;
t_ini = TST_INPUT (wcsrtombs).t_init;
pt = (t_flg == 0) ? NULL : &t;
if (t_ini != 0)
{
memset (&t, 0, sizeof (t));
}
TST_CLEAR_ERRNO;
ret = wcsrtombs (s_in, &wp, n, pt);
TST_SAVE_ERRNO;
if (debug_flg)
{
fprintf (stderr, "wcsrtombs: ret = %d\n", ret);
}
TST_IF_RETURN (S_WCSRTOMBS)
{
};
if (s_in != NULL && ret != (size_t) - 1)
{
/* No definition for s, when error occurs. */
s_ex = TST_EXPECT (wcsrtombs).s;
for (err = 0, i = 0; i <= ret && i < MBSSIZE; i++)
{
if (debug_flg)
{
fprintf (stderr,
" : 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_WCSRTOMBS, CASE_4, MS_PASSED);
}
else
{
err_count++;
Result (C_FAILURE, S_WCSRTOMBS, 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_WCSRTOMBS, CASE_5, MS_PASSED);
}
else
{
err_count++;
Result (C_FAILURE, S_WCSRTOMBS, CASE_5,
"should be null terminated, but it is not");
}
break;
}
if (s[i] != s_ex[i])
{
err++;
err_count++;
Result (C_FAILURE, S_WCSRTOMBS, CASE_6,
"converted string is different from an"
" expected string");
break;
}
}
if (!err)
{
Result (C_SUCCESS, S_WCSRTOMBS, CASE_6, MS_PASSED);
}
}
}
}
return err_count;
}