OpenCoverage

xstrtod.c

Absolute File Name:

/home/opencoverage/opencoverage/guest-scripts/coreutils/src/gnulib/lib/xstrtod.c

Source code

Switch to Preprocessed file

Line Source Count

1 /* error-checking interface to strtod-like functions -

2 -

4 Foundation, Inc. -

5 -

6 This program is free software: you can redistribute it and/or modify -

7 it under the terms of the GNU General Public License as published by -

8 the Free Software Foundation; either version 3 of the License, or -

9 (at your option) any later version. -

10 -

11 This program is distributed in the hope that it will be useful, -

12 but WITHOUT ANY WARRANTY; without even the implied warranty of -

13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -

14 GNU General Public License for more details. -

15 -

16 You should have received a copy of the GNU General Public License -

17 along with this program. If not, see <https://www.gnu.org/licenses/>. */ -

18 -

19 /* Written by Jim Meyering. */ -

20 -

21 #include <config.h> -

22 -

23 #include "xstrtod.h" -

24 -

25 #include <errno.h> -

26 #include <limits.h> -

27 #include <stdio.h> -

28 -

29 #if LONG -

30 # define XSTRTOD xstrtold -

31 # define DOUBLE long double -

32 #else -

33 # define XSTRTOD xstrtod -

34 # define DOUBLE double -

35 #endif -

36 -

37 /* An interface to a string-to-floating-point conversion function that -

38 encapsulates all the error checking one should usually perform. -

39 Like strtod/strtold, but stores the conversion in *RESULT, -

40 and returns true upon successful conversion. -

41 CONVERT specifies the conversion function, e.g., strtod itself. */ -

42 -

43 bool -

44 XSTRTOD (char const *str, char const **ptr, DOUBLE *result, -

45 DOUBLE (*convert) (char const *, char **)) -

46 { -

47 DOUBLE val; -

48 char *terminator; -

49 bool ok = true; -

50 -

51 errno = 0; -

52 val = convert (str, &terminator); -

53 -

54 /* Having a non-zero terminator is an error only when PTR is NULL. */ -

if (terminator == str || (ptr == NULL && *terminator != '\0'))

terminator == str	Description
TRUE	evaluated 8 times by 3 tests Evaluated by: sleep tail timeout
FALSE	evaluated 801 times by 4 tests Evaluated by: seq sleep tail timeout

ptr == ((void *)0)	Description
TRUE	evaluated 444 times by 2 tests Evaluated by: seq tail
FALSE	evaluated 357 times by 2 tests Evaluated by: sleep timeout

*terminator != '\0'	Description
TRUE	evaluated 2 times by 1 test Evaluated by: seq
FALSE	evaluated 442 times by 2 tests Evaluated by: seq tail

2-801

ok = false;

executed 10 times by 4 tests: ok = 0 ;

Executed by:

seq
sleep
tail
timeout

57 else -

58 { -

59 /* Allow underflow (in which case CONVERT returns zero), -

60 but flag overflow as an error. The user can decide -

61 to use the limits in RESULT upon ERANGE. */ -

if (val != 0 && errno == ERANGE)

val != 0	Description
TRUE	evaluated 765 times by 4 tests Evaluated by: seq sleep tail timeout
FALSE	evaluated 34 times by 3 tests Evaluated by: seq sleep timeout

(*__errno_location ()) == 34	Description
TRUE	evaluated 3 times by 2 tests Evaluated by: sleep timeout
FALSE	evaluated 762 times by 4 tests Evaluated by: seq sleep tail timeout

3-765

ok = false;

executed 3 times by 2 tests: ok = 0 ;

Executed by:

sleep
timeout

}

executed 799 times by 4 tests: end of block

Executed by:

seq
sleep
tail
timeout

799

65 -

if (ptr != NULL)

ptr != ((void *)0)	Description
TRUE	evaluated 363 times by 2 tests Evaluated by: sleep timeout
FALSE	evaluated 446 times by 2 tests Evaluated by: seq tail

363-446

*ptr = terminator;

executed 363 times by 2 tests: *ptr = terminator;

Executed by:

sleep
timeout

363

68 -

69 *result = val; -

return ok;

executed 809 times by 4 tests: return ok;

Executed by:

seq
sleep
tail
timeout

809

71 } -

Source code

Switch to Preprocessed file

Generated by Squish Coco 4.1.2