开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 磁盘/存储 > SCSI/ASPI > 查看源码
astoi.c
资源名称：cdrecord-1.8.tar.gz　[点击查看]
上传用户：xiejiait
上传日期：2007-01-06
资源大小：881k
文件大小：2k
源码类别：

SCSI/ASPI

开发平台：

MultiPlatform

astoi.c：源码内容
  1. /* @(#)astoi.c 1.5 96/05/09 Copyright 1985 J. Schilling */
  2. /*
  3.  * astoi() converts a string to int
  4.  * astol() converts a string to long
  5.  *
  6.  * Leading tabs and spaces are ignored.
  7.  * Both return pointer to the first char that has not been used.
  8.  * Caller must check if this means a bad conversion.
  9.  *
  10.  * leading "+" is ignored
  11.  * leading "0"  makes conversion octal (base 8)
  12.  * leading "0x" makes conversion hex   (base 16)
  13.  *
  14.  * Copyright (c) 1985 J. Schilling
  15.  */
  16. /* This program is free software; you can redistribute it and/or modify
  17.  * it under the terms of the GNU General Public License as published by
  18.  * the Free Software Foundation; either version 2, or (at your option)
  19.  * any later version.
  20.  *
  21.  * This program is distributed in the hope that it will be useful,
  22.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  23.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  24.  * GNU General Public License for more details.
  25.  * 
  26.  * You should have received a copy of the GNU General Public License
  27.  * along with this program; see the file COPYING.  If not, write to
  28.  * the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. 
  29.  */
  31. #include <standard.h>
  33. #define is_space(c)  ((c) == ' ' || (c) == 't')
  34. #define is_digit(c)  ((c) >= '0' && (c) <= '9')
  35. #define is_hex(c) (((c) >= 'a' && (c) <= 'f') || 
  36.  ((c) >= 'A' && (c) <= 'F'))
  38. #define to_lower(c) (((c) >= 'A' && (c) <= 'Z') ? (c) - 'A'+'a' : (c))
  40. #ifdef notdef
  41. int atoi(s)
  42. char *s;
  43. {
  44. long l;
  46. (void)astol(s, &l);
  47. return (int) l;
  48. }
  50. long atol(s)
  51. char *s;
  52. {
  53. long l;
  55. (void)astol(s, &l);
  56. return l;
  57. }
  58. #endif
  60. char *astoi(s, i)
  61. const char *s;
  62. int *i;
  63. {
  64. long l;
  65. char *ret;
  67. ret = astol(s, &l);
  68. *i = l;
  69. return(ret);
  70. }
  72. char *astol(s, l)
  73. register const char *s;
  74. long *l;
  75. {
  76. int neg = 0;
  77. register long ret = 0L;
  78. register int base = 10;
  79. register int digit;
  80. register char c;
  82. while (is_space(*s))
  83. s++;
  85. if (*s == '+') {
  86. s++;
  87. } else if (*s == '-') {
  88. s++;
  89. neg++;
  90. }
  92. if (*s == '0') {
  93. base = 8;
  94. s++;
  95. if (*s == 'x' || *s == 'X') {
  96. s++;
  97. base = 16;
  98. }
  99. }
  100. for (;(c = *s) != 0; s++) {
  102. if (is_digit(c)) {
  103. digit = c - '0';
  104. } else if (is_hex(c)) {
  105. digit = to_lower(c) - 'a' + 10;
  106. } else {
  107. break;
  108. }
  110. if (digit < base) {
  111. ret *= base;
  112. ret += digit;
  113. } else {
  114. break;
  115. }
  116. }
  117. if (neg)
  118. ret = -ret;
  119. *l = ret;
  120. return ((char *)s);
  121. }