75 lines
1.5 KiB
C
75 lines
1.5 KiB
C
/*
|
|
STRFMON: size_t strfmon (char *buf, size_t nbyte, const char *fmt, ...)
|
|
*/
|
|
|
|
#define TST_FUNCTION strfmon
|
|
|
|
#include "tsp_common.c"
|
|
#include "dat_strfmon.c"
|
|
#include <monetary.h>
|
|
|
|
int
|
|
tst_strfmon (FILE * fp, int debug_flg)
|
|
{
|
|
TST_DECL_VARS (size_t);
|
|
char buf[MONSIZE], *mon;
|
|
size_t nbt;
|
|
char *fmt;
|
|
double val;
|
|
|
|
TST_DO_TEST (strfmon)
|
|
{
|
|
TST_HEAD_LOCALE (strfmon, S_STRFMON);
|
|
TST_DO_REC (strfmon)
|
|
{
|
|
TST_GET_ERRET (strfmon);
|
|
nbt = TST_INPUT (strfmon).nbytes;
|
|
fmt = TST_INPUT (strfmon).fmt;
|
|
val = TST_INPUT (strfmon).val;
|
|
memset (buf, 0, MONSIZE);
|
|
if (nbt > MONSIZE)
|
|
{
|
|
err_count++;
|
|
Result (C_FAILURE, S_STRFMON, CASE_3, "buffer too small in test");
|
|
continue;
|
|
}
|
|
|
|
TST_CLEAR_ERRNO;
|
|
ret = strfmon (buf, nbt, fmt, val, val, val);
|
|
TST_SAVE_ERRNO;
|
|
|
|
if (debug_flg) /* seems fprintf doesn't update the errno */
|
|
{
|
|
fprintf (stdout, "strfmon() [ %s : %d ]\n", locale, rec + 1);
|
|
fprintf (stdout, " : err = %d | %s\n", errno_save,
|
|
strerror (errno));
|
|
fprintf (stdout, " : ret = %zd; \t fmt = |%s|\n", ret, fmt);
|
|
fprintf (stdout, " : buf = |%s|\n\n", buf);
|
|
}
|
|
|
|
TST_IF_RETURN (S_STRFMON)
|
|
{
|
|
};
|
|
if (errno != 0 || ret == -1)
|
|
{
|
|
continue;
|
|
}
|
|
|
|
mon = TST_EXPECT (strfmon).mon;
|
|
|
|
if (!strcmp (buf, mon))
|
|
{
|
|
Result (C_SUCCESS, S_STRFMON, CASE_3, MS_PASSED);
|
|
}
|
|
else
|
|
{
|
|
err_count++;
|
|
Result (C_FAILURE, S_STRFMON, CASE_3, "the formatted string is "
|
|
"different from an expected result");
|
|
}
|
|
}
|
|
}
|
|
|
|
return err_count;
|
|
}
|