git.sesse.net Git - ffmpeg/blob - compat/strtod.c

   1 /*
   2  * C99-compatible strtod() implementation
   3  * Copyright (c) 2012 Ronald S. Bultje <rsbultje@gmail.com>
   4  *
   5  * This file is part of FFmpeg.
   6  *
   7  * FFmpeg is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * FFmpeg is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with FFmpeg; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  20  */
  21
  22 #include <ctype.h>
  23 #include <limits.h>
  24 #include <stdlib.h>
  25
  26 #include "libavutil/avstring.h"
  27 #include "libavutil/mathematics.h"
  28
  29 static char *check_nan_suffix(char *s)
  30 {
  31     char *start = s;
  32
  33     if (*s++ != '(')
  34         return start;
  35
  36     while ((*s >= 'a' && *s <= 'z') || (*s >= 'A' && *s <= 'Z') ||
  37            (*s >= '0' && *s <= '9') ||  *s == '_')
  38         s++;
  39
  40     return *s == ')' ? s + 1 : start;
  41 }
  42
  43 #undef strtod
  44 double strtod(const char *, char **);
  45
  46 double avpriv_strtod(const char *nptr, char **endptr)
  47 {
  48     char *end;
  49     double res;
  50
  51     /* Skip leading spaces */
  52     while (isspace(*nptr))
  53         nptr++;
  54
  55     if (!av_strncasecmp(nptr, "infinity", 8)) {
  56         end = nptr + 8;
  57         res = INFINITY;
  58     } else if (!av_strncasecmp(nptr, "inf", 3)) {
  59         end = nptr + 3;
  60         res = INFINITY;
  61     } else if (!av_strncasecmp(nptr, "+infinity", 9)) {
  62         end = nptr + 9;
  63         res = INFINITY;
  64     } else if (!av_strncasecmp(nptr, "+inf", 4)) {
  65         end = nptr + 4;
  66         res = INFINITY;
  67     } else if (!av_strncasecmp(nptr, "-infinity", 9)) {
  68         end = nptr + 9;
  69         res = -INFINITY;
  70     } else if (!av_strncasecmp(nptr, "-inf", 4)) {
  71         end = nptr + 4;
  72         res = -INFINITY;
  73     } else if (!av_strncasecmp(nptr, "nan", 3)) {
  74         end = check_nan_suffix(nptr + 3);
  75         res = NAN;
  76     } else if (!av_strncasecmp(nptr, "+nan", 4) ||
  77                !av_strncasecmp(nptr, "-nan", 4)) {
  78         end = check_nan_suffix(nptr + 4);
  79         res = NAN;
  80     } else if (!av_strncasecmp(nptr, "0x", 2) ||
  81                !av_strncasecmp(nptr, "-0x", 3) ||
  82                !av_strncasecmp(nptr, "+0x", 3)) {
  83         /* FIXME this doesn't handle exponents, non-integers (float/double)
  84          * and numbers too large for long long */
  85         res = strtoll(nptr, &end, 16);
  86     } else {
  87         res = strtod(nptr, &end);
  88     }
  89
  90     if (endptr)
  91         *endptr = end;
  92
  93     return res;
  94 }