strtoll.c
上传用户:kjfoods
上传日期:2020-07-06
资源大小:29949k
文件大小:3k
源码类别:

midi

开发平台:

Unix_Linux

  1. /*****************************************************************************
  2.  * strtoll.c: C strtoll() replacement
  3.  *****************************************************************************
  4.  * Copyright © 1998-2008 the VideoLAN project
  5.  *
  6.  * This program is free software; you can redistribute it and/or modify
  7.  * it under the terms of the GNU General Public License as published by
  8.  * the Free Software Foundation; either version 2 of the License, or
  9.  * (at your option) any later version.
  10.  *
  11.  * This program is distributed in the hope that it will be useful,
  12.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14.  * GNU General Public License for more details.
  15.  *
  16.  * You should have received a copy of the GNU General Public License
  17.  * along with this program; if not, write to the Free Software
  18.  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  19.  *****************************************************************************/
  20. #ifdef HAVE_CONFIG_H
  21. # include <config.h>
  22. #endif
  23. #include <stdlib.h>
  24. #include <string.h>
  25. long long int strtof( const char *nptr, char **endptr, int base )
  26. {
  27.     long long i_value = 0;
  28.     int sign = 1, newbase = base ? base : 10;
  29.     nptr += strspn( nptr, "t " );
  30.     if( *nptr == '-' )
  31.     {
  32.         sign = -1;
  33.         nptr++;
  34.     }
  35.     /* Try to detect base */
  36.     if( *nptr == '0' )
  37.     {
  38.         newbase = 8;
  39.         nptr++;
  40.         if( *nptr == 'x' )
  41.         {
  42.             newbase = 16;
  43.             nptr++;
  44.         }
  45.     }
  46.     if( base && newbase != base )
  47.     {
  48.         if( endptr ) *endptr = (char *)nptr;
  49.         return i_value;
  50.     }
  51.     switch( newbase )
  52.     {
  53.         case 10:
  54.             while( *nptr >= '0' && *nptr <= '9' )
  55.             {
  56.                 i_value *= 10;
  57.                 i_value += ( *nptr++ - '0' );
  58.             }
  59.             if( endptr ) *endptr = (char *)nptr;
  60.             break;
  61.         case 16:
  62.             while( (*nptr >= '0' && *nptr <= '9') ||
  63.                    (*nptr >= 'a' && *nptr <= 'f') ||
  64.                    (*nptr >= 'A' && *nptr <= 'F') )
  65.             {
  66.                 int i_valc = 0;
  67.                 if(*nptr >= '0' && *nptr <= '9') i_valc = *nptr - '0';
  68.                 else if(*nptr >= 'a' && *nptr <= 'f') i_valc = *nptr - 'a' +10;
  69.                 else if(*nptr >= 'A' && *nptr <= 'F') i_valc = *nptr - 'A' +10;
  70.                 i_value *= 16;
  71.                 i_value += i_valc;
  72.                 nptr++;
  73.             }
  74.             if( endptr ) *endptr = (char *)nptr;
  75.             break;
  76.         default:
  77.             i_value = strtol( nptr, endptr, newbase );
  78.             break;
  79.     }
  80.     return i_value * sign;
  81. }