blob: 754e0b11e7a4e103ae601848d8404abdddecc9d8 (
plain)
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
|
/**
* @file
*
* @ingroup libmisc_conv_help Conversion Helpers
*
* @brief Convert String to long double (with validation)
*/
/*
* 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.org/license/LICENSE.
*/
#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;
}
|
