AuroraMiddleware/glibc
1
0
Fork 0
mirror of https://sourceware.org/git/glibc.git synced 2024-11-21 12:30:06 +00:00
Code Issues Packages Projects Releases Wiki Activity

[BZ #1230]

Browse Source 
2005-09-27  Ulrich Drepper  <drepper@redhat.com>
	[BZ #1230]
	* stdlib/strtod_l.c (STRNCASECMP): Always use C locale object.
	(TOLOWER_C): Define.  Use it when recognizing inf and nan.
	* stdlib/Makefile (tests): Add bug-strtod2.
	* stdlib/bug-strtod2.c: New file.
This commit is contained in:
Ulrich Drepper 2005-09-28 06:09:24 +00:00
parent eb793d1e84
commit 1873e3cd1a
5 changed files with 65 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
ChangeLog
View File

@ -1,3 +1,11 @@
2005-09-27 Ulrich Drepper <drepper@redhat.com>
[BZ #1230]
* stdlib/strtod_l.c (STRNCASECMP): Always use C locale object.
(TOLOWER_C): Define. Use it when recognizing inf and nan.
* stdlib/Makefile (tests): Add bug-strtod2.
* stdlib/bug-strtod2.c: New file.
2005-09-21 Ralf Wildenhues <Ralf.Wildenhues@gmx.de> 2005-09-21 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
[BZ #1361] [BZ #1361]

1
stdlib/Depend Normal file
View File

@ -0,0 +1 @@
localedata

2
stdlib/Makefile
View File

@ -63,7 +63,7 @@ tests := tst-strtol tst-strtod testmb testrand testsort testdiv \
test-canon test-canon2 tst-strtoll tst-environ \ test-canon test-canon2 tst-strtoll tst-environ \
tst-xpg-basename tst-random tst-random2 tst-bsearch \ tst-xpg-basename tst-random tst-random2 tst-bsearch \
tst-limits tst-rand48 bug-strtod tst-setcontext \ tst-limits tst-rand48 bug-strtod tst-setcontext \
test-a64l tst-qsort tst-system testmb2 test-a64l tst-qsort tst-system testmb2 bug-strtod2
include ../Makeconfig include ../Makeconfig

46
stdlib/bug-strtod2.c Normal file
View File

@ -0,0 +1,46 @@
#include <locale.h>
#include <math.h>
#include <stdio.h>
#include <stdlib.h>
static const char *tests[] =
{
"inf", "Inf", "iNf", "inF", "INf", "iNF", "INF", "InF",
"infinity", "Infinity", "InfInity", "INFINITY"
};
#define ntests (sizeof (tests) / sizeof (tests[0]))
static int
do_test (void)
{
/* The Turkish locale is notorious because tolower() maps 'I' to the
dotless lowercase 'i' and toupper() maps 'i' to an 'I' with a dot
above. */
if (setlocale (LC_ALL, "tr_TR.UTF-8") == NULL)
{
puts ("cannot set locale");
return 0;
}
int res = 0;
for (int i = 0; i < ntests; ++i)
{
char *endp;
double d = strtod (tests[i], &endp);
if (*endp != '\0')
{
printf ("did not consume all of '%s'\n", tests[i]);
res = 1;
}
if (!isinf (d))
{
printf ("'%s' does not pass isinf\n", tests[i]);
res = 1;
}
}
return res;
}
#define TEST_FUNCTION do_test ()
#include "../test-skeleton.c"

14
stdlib/strtod_l.c
View File

@ -1,5 +1,5 @@
/* Convert string representing a number to float value, using given locale. /* Convert string representing a number to float value, using given locale.
Copyright (C) 1997,98,2002, 2004 Free Software Foundation, Inc. Copyright (C) 1997,98,2002,2004,2005 Free Software Foundation, Inc.
This file is part of the GNU C Library. This file is part of the GNU C Library.
Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997. Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997.
@ -100,7 +100,9 @@ extern unsigned long long int ____strtoull_l_internal (const char *, char **,
# define ISDIGIT(Ch) __iswdigit_l ((Ch), loc) # define ISDIGIT(Ch) __iswdigit_l ((Ch), loc)
# define ISXDIGIT(Ch) __iswxdigit_l ((Ch), loc) # define ISXDIGIT(Ch) __iswxdigit_l ((Ch), loc)
# define TOLOWER(Ch) __towlower_l ((Ch), loc) # define TOLOWER(Ch) __towlower_l ((Ch), loc)
# define STRNCASECMP(S1, S2, N) __wcsncasecmp_l ((S1), (S2), (N), loc) # define TOLOWER_C(Ch) __towlower_l ((Ch), &_nl_C_locobj)
# define STRNCASECMP(S1, S2, N) \
__wcsncasecmp_l ((S1), (S2), (N), &_nl_C_locobj)
# define STRTOULL(S, E, B) ____wcstoull_l_internal ((S), (E), (B), 0, loc) # define STRTOULL(S, E, B) ____wcstoull_l_internal ((S), (E), (B), 0, loc)
#else #else
# define STRING_TYPE char # define STRING_TYPE char
@ -110,7 +112,9 @@ extern unsigned long long int ____strtoull_l_internal (const char *, char **,
# define ISDIGIT(Ch) __isdigit_l ((Ch), loc) # define ISDIGIT(Ch) __isdigit_l ((Ch), loc)
# define ISXDIGIT(Ch) __isxdigit_l ((Ch), loc) # define ISXDIGIT(Ch) __isxdigit_l ((Ch), loc)
# define TOLOWER(Ch) __tolower_l ((Ch), loc) # define TOLOWER(Ch) __tolower_l ((Ch), loc)
# define STRNCASECMP(S1, S2, N) __strncasecmp_l ((S1), (S2), (N), loc) # define TOLOWER_C(Ch) __tolower_l ((Ch), &_nl_C_locobj)
# define STRNCASECMP(S1, S2, N) \
__strncasecmp_l ((S1), (S2), (N), &_nl_C_locobj)
# define STRTOULL(S, E, B) ____strtoull_l_internal ((S), (E), (B), 0, loc) # define STRTOULL(S, E, B) ____strtoull_l_internal ((S), (E), (B), 0, loc)
#endif #endif
@ -554,7 +558,7 @@ INTERNAL (__STRTOF) (nptr, endptr, group, loc)
else if (c < L_('0') || c > L_('9')) else if (c < L_('0') || c > L_('9'))
{ {
/* Check for `INF' or `INFINITY'. */ /* Check for `INF' or `INFINITY'. */
if (TOLOWER (c) == L_('i') && STRNCASECMP (cp, L_("inf"), 3) == 0) if (TOLOWER_C (c) == L_('i') && STRNCASECMP (cp, L_("inf"), 3) == 0)
{ {
/* Return +/- infinity. */ /* Return +/- infinity. */
if (endptr != NULL) if (endptr != NULL)
@ -565,7 +569,7 @@ INTERNAL (__STRTOF) (nptr, endptr, group, loc)
return negative ? -FLOAT_HUGE_VAL : FLOAT_HUGE_VAL; return negative ? -FLOAT_HUGE_VAL : FLOAT_HUGE_VAL;
} }
if (TOLOWER (c) == L_('n') && STRNCASECMP (cp, L_("nan"), 3) == 0) if (TOLOWER_C (c) == L_('n') && STRNCASECMP (cp, L_("nan"), 3) == 0)
{ {
/* Return NaN. */ /* Return NaN. */
FLOAT retval = NAN; FLOAT retval = NAN;