1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
|
/* Tests for strfromf, strfromd, strfroml functions.
Copyright (C) 2016-2023 Free Software Foundation, Inc.
This file is part of the GNU C Library.
The GNU C Library is free software; you can redistribute it and/or
modify it under the terms of the GNU Lesser General Public
License as published by the Free Software Foundation; either
version 2.1 of the License, or (at your option) any later version.
The GNU C Library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Lesser General Public License for more details.
You should have received a copy of the GNU Lesser General Public
License along with the GNU C Library; if not, see
<https://www.gnu.org/licenses/>. */
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <float.h>
#include <math.h>
#include <locale.h>
#include "tst-strtod.h"
#define _CONCAT(a, b) a ## b
#define CONCAT(a, b) _CONCAT (a, b)
/* Generator to create an FTYPE member variabled named FSUF
* used to populate struct member variables. */
#define FTYPE_MEMBER(FSUF, FTYPE, FTOSTR, LSUF, CSUF) \
FTYPE FSUF;
#define STRUCT_FOREACH_FLOAT_FTYPE GEN_TEST_STRTOD_FOREACH (FTYPE_MEMBER)
#define ENTRY(FSUF, FTYPE, FTOSTR, LSUF, CSUF, ...) \
CONCAT (__VA_ARGS__, LSUF),
/* This is hacky way around the seemingly unavoidable macro
* expansion of the INFINITY or HUGE_VAL like macros in the
* above. It is assumed the compiler will implicitly convert
* the infinity correctly. */
#define INF INFINITY + 0.0
#define NAN_ NAN + 0.0
struct test_input
{
STRUCT_FOREACH_FLOAT_FTYPE
};
struct test {
const char *s;
const char *fmt;
int size;
int rc;
struct test_input t;
};
#define TEST(s, fmt, size, rc, val) \
{ \
s, fmt, size, rc, { GEN_TEST_STRTOD_FOREACH (ENTRY, val) } \
}
/* Hexadecimal tests. */
struct htests
{
const char *fmt;
const char *exp[4];
struct test_input t;
};
#define HTEST(fmt, exp1, exp2, exp3, exp4, val) \
{ \
fmt, exp1, exp2, exp3, exp4, { GEN_TEST_STRTOD_FOREACH (ENTRY, val) } \
}
#define TEST_STRFROM(FSUF, FTYPE, FTOSTR, LSUF, CSUF) \
static int \
test_ ## FSUF (void) \
{ \
char buf[50], sbuf[5]; \
int status = 0; \
int i, rc = 0, rc1 = 0; \
for (i = 0; i < sizeof (stest) / sizeof (stest[0]); i++) \
{ \
rc = FTOSTR (sbuf, stest[i].size, stest[i].fmt, stest[i].t.FSUF); \
rc1 = (strcmp (sbuf, stest[i].s) != 0) || (rc != stest[i].rc); \
if (rc1) \
{ \
printf (#FTOSTR ": got %s (%d), expected %s (%d)\n", \
sbuf, rc, stest[i].s, stest[i].rc); \
status++; \
} \
} \
for (i = 0; i < sizeof (tests) / sizeof (tests[0]); i++) \
{ \
rc = FTOSTR (buf, tests[i].size, tests[i].fmt, tests[i].t.FSUF); \
rc1 = (strcmp (buf, tests[i].s) != 0) || (rc != tests[i].rc); \
if (rc1) \
{ \
printf (#FTOSTR ": got %s (%d), expected %s (%d)\n", \
buf, rc, tests[i].s, tests[i].rc); \
status++; \
} \
} \
for (i = 0; i < sizeof (htest) / sizeof (htest[0]); i++) \
{ \
rc = FTOSTR (buf, 50, htest[i].fmt, htest[i].t.FSUF); \
if (strcmp (buf, htest[i].exp[0]) == 0 \
|| strcmp (buf, htest[i].exp[1]) == 0 \
|| strcmp (buf, htest[i].exp[2]) == 0 \
|| strcmp (buf, htest[i].exp[3]) == 0) \
continue; \
else \
{ \
printf (#FTOSTR ": got %s (%d), expected %s or %s or %s " \
"or %s\n", buf, rc, htest[i].exp[0], htest[i].exp[1], \
htest[i].exp[2], htest[i].exp[3]); \
status++; \
} \
} \
return status; \
}
|
