From f4ad36c4bf23899a3164ebd40ff5781c152bcb01 Mon Sep 17 00:00:00 2001 From: Rich Felker Date: Mon, 6 Feb 2012 01:14:23 -0500 Subject: add deprecated (removed from posix) [efg]cvt() functions these have not been heavily tested, but they should work as described in the old standards. probably broken for non-finite values... --- src/stdlib/ecvt.c | 19 +++++++++++++++++++ src/stdlib/fcvt.c | 25 +++++++++++++++++++++++++ src/stdlib/gcvt.c | 8 ++++++++ 3 files changed, 52 insertions(+) create mode 100644 src/stdlib/ecvt.c create mode 100644 src/stdlib/fcvt.c create mode 100644 src/stdlib/gcvt.c (limited to 'src') diff --git a/src/stdlib/ecvt.c b/src/stdlib/ecvt.c new file mode 100644 index 00000000..48e70cd8 --- /dev/null +++ b/src/stdlib/ecvt.c @@ -0,0 +1,19 @@ +#include +#include + +char *ecvt(double x, int n, int *dp, int *sign) +{ + static char buf[16]; + char tmp[32]; + int i, j; + + if (n-1U > 15) n = 15; + sprintf(tmp, "%.*e", n-1, x); + i = *sign = (tmp[0]=='-'); + for (j=0; tmp[i]!='e'; j+=(tmp[i++]!='.')) + buf[j] = tmp[i]; + buf[j] = 0; + *dp = atoi(tmp+i+1); + + return buf; +} diff --git a/src/stdlib/fcvt.c b/src/stdlib/fcvt.c new file mode 100644 index 00000000..003aa5aa --- /dev/null +++ b/src/stdlib/fcvt.c @@ -0,0 +1,25 @@ +#define _GNU_SOURCE +#include +#include +#include + +char *fcvt(double x, int n, int *dp, int *sign) +{ + char tmp[1500]; + int i, lz; + + if (n > 1400U) n = 1400; + sprintf(tmp, "%.*f", n, x); + i = (tmp[0] == '-'); + if (tmp[i] == '0') lz = strspn(tmp+i+2, "0"); + else lz = -(int)strcspn(tmp+i, "."); + + if (n<=lz) { + *sign = i; + *dp = 0; + if (n>14U) n = 14; + return "000000000000000"+14-n; + } + + return ecvt(x, n-lz, dp, sign); +} diff --git a/src/stdlib/gcvt.c b/src/stdlib/gcvt.c new file mode 100644 index 00000000..6c075e25 --- /dev/null +++ b/src/stdlib/gcvt.c @@ -0,0 +1,8 @@ +#include +#include + +char *gcvt(double x, int n, char *b) +{ + sprintf(b, "%.*g", n, x); + return b; +} -- cgit v1.2.1