libbb/safe_strtol.c

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  * Utility routines.
   4  *
   5  * Copyright (C) 1999-2004 by Erik Andersen <andersen@codepoet.org>
   6  *
   7  * This program is free software; you can redistribute it and/or modify
   8  * it under the terms of the GNU General Public License as published by
   9  * the Free Software Foundation; either version 2 of the License, or
  10  * (at your option) any later version.
  11  *
  12  * This program 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  * General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License
  18  * along with this program; if not, write to the Free Software
  19  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  20  */
  21
  22 #include <stdlib.h>
  23 #include <errno.h>
  24 #include <assert.h>
  25 #include "libbb.h"
  26
  27 #ifdef L_safe_strtoi
  28 extern
  29 int safe_strtoi(char *arg, int* value)
  30 {
  31         int error;
  32         long lvalue = *value;
  33         error = safe_strtol(arg, &lvalue);
  34         *value = (int) lvalue;
  35         return error;
  36 }
  37 #endif
  38
  39 #ifdef L_safe_strtod
  40 extern
  41 int safe_strtod(char *arg, double* value)
  42 {
  43         char *endptr;
  44         int errno_save = errno;
  45
  46         assert(arg!=NULL);
  47         errno = 0;
  48         *value = strtod(arg, &endptr);
  49         if (errno != 0 || *endptr!='\0' || endptr==arg) {
  50                 return 1;
  51         }
  52         errno = errno_save;
  53         return 0;
  54 }
  55 #endif
  56
  57 #ifdef L_safe_strtol
  58 extern
  59 int safe_strtol(char *arg, long* value)
  60 {
  61         char *endptr;
  62         int errno_save = errno;
  63
  64         assert(arg!=NULL);
  65         errno = 0;
  66         *value = strtol(arg, &endptr, 0);
  67         if (errno != 0 || *endptr!='\0' || endptr==arg) {
  68                 return 1;
  69         }
  70         errno = errno_save;
  71         return 0;
  72 }
  73 #endif
  74
  75 #ifdef L_safe_strtoul
  76 extern
  77 int safe_strtoul(char *arg, unsigned long* value)
  78 {
  79         char *endptr;
  80         int errno_save = errno;
  81
  82         assert(arg!=NULL);
  83         errno = 0;
  84         *value = strtoul(arg, &endptr, 0);
  85         if (errno != 0 || *endptr!='\0' || endptr==arg) {
  86                 return 1;
  87         }
  88         errno = errno_save;
  89         return 0;
  90 }
  91 #endif
  92