Libc-825.24.tar.gz

[apple/libc.git] / stdlib / gcvt-obsd.c

diff --git a/stdlib/gcvt-obsd.c b/stdlib/gcvt-obsd.c
deleted file mode 100644 (file)
index 703f783..0000000
--- a/stdlib/gcvt-obsd.c
+++ /dev/null
@@ -1,113 +0,0 @@
-/*     $OpenBSD: gcvt.c,v 1.11 2009/10/16 12:15:03 martynas Exp $      */
-
-/*
- * Copyright (c) 2002, 2003, 2006 Todd C. Miller <Todd.Miller@courtesan.com>
- *
- * Permission to use, copy, modify, and distribute this software for any
- * purpose with or without fee is hereby granted, provided that the above
- * copyright notice and this permission notice appear in all copies.
- *
- * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
- * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
- * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
- * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
- * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
- * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
- * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
- *
- * Sponsored in part by the Defense Advanced Research Projects
- * Agency (DARPA) and Air Force Research Laboratory, Air Force
- * Materiel Command, USAF, under agreement number F39502-99-1-0512.
- */
-
-#include <locale.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-
-extern char *__dtoa(double, int, int, int *, int *, char **);
-extern void  __freedtoa(char *);
-
-char *
-gcvt(double value, int ndigit, char *buf)
-{
-       char *digits, *dst, *src;
-       int i, decpt, sign;
-       struct lconv *lconv;
-
-       lconv = localeconv();
-       if (ndigit == 0) {
-               buf[0] = '\0';
-               return (buf);
-       }
-
-       digits = __dtoa(value, 2, ndigit, &decpt, &sign, NULL);
-       if (digits == NULL)
-               return (NULL);
-       if (decpt == 9999) {
-               /*
-                * Infinity or NaN, convert to inf or nan with sign.
-                * We assume the buffer is at least ndigit long.
-                */
-               snprintf(buf, ndigit + 1, "%s%s", sign ? "-" : "",
-                   *digits == 'I' ? "inf" : "nan");
-               __freedtoa(digits);
-               return (buf);
-       }
-
-       dst = buf;
-       if (sign)
-               *dst++ = '-';
-
-       if (decpt < 0 || decpt > ndigit) {
-               /* exponential format (e.g. 1.2345e+13) */
-               if (--decpt < 0) {
-                       sign = 1;
-                       decpt = -decpt;
-               } else
-                       sign = 0;
-               src = digits;
-               *dst++ = *src++;
-               dst = stpcpy(dst, lconv->decimal_point);
-               while (*src != '\0')
-                       *dst++ = *src++;
-               *dst++ = 'e';
-               if (sign)
-                       *dst++ = '-';
-               else
-                       *dst++ = '+';
-               if (decpt < 10) {
-                       *dst++ = '0';
-                       *dst++ = '0' + decpt;
-                       *dst = '\0';
-               } else {
-                       /* XXX - optimize */
-                       for (sign = decpt, i = 0; (sign /= 10) != 0; i++)
-                               continue;
-                       dst[i + 1] = '\0';
-                       while (decpt != 0) {
-                               dst[i--] = '0' + decpt % 10;
-                               decpt /= 10;
-                       }
-               }
-       } else {
-               /* standard format */
-               for (i = 0, src = digits; i < decpt; i++) {
-                       if (*src != '\0')
-                               *dst++ = *src++;
-                       else
-                               *dst++ = '0';
-               }
-               if (*src != '\0') {
-                       if (src == digits)
-                               *dst++ = '0';   /* zero before decimal point */
-                       dst = stpcpy(dst, lconv->decimal_point);
-                       for (i = decpt; digits[i] != '\0'; i++) {
-                               *dst++ = digits[i];
-                       }
-               }
-               *dst = '\0';
-       }
-       __freedtoa(digits);
-       return (buf);
-}