diff options
author | Ralf Corsepius <ralf.corsepius@rtems.org> | 2011-02-01 05:48:30 +0000 |
---|---|---|
committer | Ralf Corsepius <ralf.corsepius@rtems.org> | 2011-02-01 05:48:30 +0000 |
commit | 5410c14a56bae4775941c62418a4e7ec050d0867 (patch) | |
tree | 4efdf5e48af2b9c5a7a6a0252c2844f1bc6ec19c /cpukit/libmisc | |
parent | 2011-02-01 Ralf Corsepius <ralf.corsepius@rtems.org> (diff) | |
download | rtems-5410c14a56bae4775941c62418a4e7ec050d0867.tar.bz2 |
2011-02-01 Ralf Corsepius <ralf.corsepius@rtems.org>
* libmisc/Makefile.am: Add stringto/stringtolongdouble.c.
* libmisc/stringto/stringtolongdouble.c: New.
Diffstat (limited to 'cpukit/libmisc')
-rw-r--r-- | cpukit/libmisc/Makefile.am | 1 | ||||
-rw-r--r-- | cpukit/libmisc/stringto/stringtolongdouble.c | 58 |
2 files changed, 59 insertions, 0 deletions
diff --git a/cpukit/libmisc/Makefile.am b/cpukit/libmisc/Makefile.am index 72ed6db5e9..2a7ba78d41 100644 --- a/cpukit/libmisc/Makefile.am +++ b/cpukit/libmisc/Makefile.am @@ -135,6 +135,7 @@ EXTRA_DIST += untar/README noinst_LIBRARIES += libstringto.a libstringto_a_CPPFLAGS = $(AM_CPPFLAGS) -I$(srcdir)/stringto libstringto_a_SOURCES = stringto/stringtodouble.c stringto/stringtofloat.c \ + stringto/stringtolongdouble.c \ stringto/stringtoint.c stringto/stringtolong.c stringto/stringtolonglong.c \ stringto/stringtopointer.c stringto/stringtounsignedint.c \ stringto/stringtounsignedchar.c stringto/stringtounsignedlong.c \ diff --git a/cpukit/libmisc/stringto/stringtolongdouble.c b/cpukit/libmisc/stringto/stringtolongdouble.c new file mode 100644 index 0000000000..776f5e183b --- /dev/null +++ b/cpukit/libmisc/stringto/stringtolongdouble.c @@ -0,0 +1,58 @@ +/* + * COPYRIGHT (c) 2009. + * On-Line Applications Research Corporation (OAR). + * + * Copyright (c) 2011 Ralf Corsépius, Ulm, Germany. + * + * The license and distribution terms for this file may be + * found in the file LICENSE in this distribution or at + * http://www.rtems.com/license/LICENSE. + * + * $Id$ + */ + +#ifdef HAVE_CONFIG_H +#include "config.h" +#endif + +#include <errno.h> +#include <stdlib.h> +#include <math.h> + +#include <rtems/stringto.h> + +/* + * Instantiate an error checking wrapper for strtod (double) + */ + +rtems_status_code rtems_string_to_long_double ( + const char *s, + long double *n, + char **endptr +) +{ + long double result; + char *end; + + if ( !n ) + return RTEMS_INVALID_ADDRESS; + + errno = 0; + *n = 0; + + result = strtold( s, &end ); + + if ( endptr ) + *endptr = end; + + if ( end == s ) + return RTEMS_NOT_DEFINED; + + if ( ( errno == ERANGE ) && + (( result == 0 ) || ( result == HUGE_VALL ) || ( result == -HUGE_VALL ))) + return RTEMS_INVALID_NUMBER; + + *n = result; + + return RTEMS_SUCCESSFUL; +} |