granicus.if.org Git - shadow/blob - lib/getulong.c

   1 /*
   2  * Copyright (c) 2007 - 2009, Nicolas François
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  * 3. The name of the copyright holders or contributors may not be used to
  14  *    endorse or promote products derived from this software without
  15  *    specific prior written permission.
  16  *
  17  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  18  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
  19  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
  20  * PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE COPYRIGHT
  21  * HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  22  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
  23  * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  24  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  25  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  26  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
  27  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  28  */
  29
  30 #include <config.h>
  31
  32 #ident "$Id: getlong.c 2763 2009-04-23 09:57:03Z nekral-guest $"
  33
  34 #include <stdlib.h>
  35 #include <errno.h>
  36 #include "prototypes.h"
  37
  38 /*
  39  * getulong - extract an unsigned long integer provided by the numstr string in *result
  40  *
  41  * It supports decimal, hexadecimal or octal representations.
  42  *
  43  * Returns 0 on failure, 1 on success.
  44  */
  45 int getulong (const char *numstr, /*@out@*/unsigned long int *result)
  46 {
  47         long long int val;
  48         char *endptr;
  49
  50         errno = 0;
  51         val = strtoll (numstr, &endptr, 0);
  52         if (    ('\0' == *numstr)
  53              || ('\0' != *endptr)
  54              || (ERANGE == errno)
  55              /*@+ignoresigns@*/
  56              || (val != (unsigned long int)val)
  57              /*@=ignoresigns@*/
  58            ) {
  59                 return 0;
  60         }
  61
  62         *result = (unsigned long int)val;
  63         return 1;
  64 }
  65