From 5410c14a56bae4775941c62418a4e7ec050d0867 Mon Sep 17 00:00:00 2001
From: Ralf Corsepius <ralf.corsepius@rtems.org>
Date: Tue, 1 Feb 2011 05:48:30 +0000
Subject: 2011-02-01	Ralf Corsepius <ralf.corsepius@rtems.org>

	* libmisc/Makefile.am: Add stringto/stringtolongdouble.c.
	* libmisc/stringto/stringtolongdouble.c: New.
---
 cpukit/ChangeLog                             |  2 +
 cpukit/libmisc/Makefile.am                   |  1 +
 cpukit/libmisc/stringto/stringtolongdouble.c | 58 ++++++++++++++++++++++++++++
 3 files changed, 61 insertions(+)
 create mode 100644 cpukit/libmisc/stringto/stringtolongdouble.c

diff --git a/cpukit/ChangeLog b/cpukit/ChangeLog
index 00a2ab255c..ccb7399719 100644
--- a/cpukit/ChangeLog
+++ b/cpukit/ChangeLog
@@ -1,5 +1,7 @@
 2011-02-01	Ralf Corsepius <ralf.corsepius@rtems.org>
 
+	* libmisc/Makefile.am: Add stringto/stringtolongdouble.c.
+	* libmisc/stringto/stringtolongdouble.c: New.
 	* libmisc/stringto/stringto.h: Rename header-guard.
 	Add rtems_string_to_long_double.
 	* libmisc/stringto/stringtoint.c: Reformat range check.
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;
+}
-- 
cgit v1.2.3