4/2.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67

#include <ctype.h>
#include <stdio.h>

#define MAXLEN 1000

/* converts string to numeric representation of doubles */
double atof(char s[]);

int main(int argc, char *argv[]) {
  int i, c;
  char s[MAXLEN];

  printf("input: ");

  for (i = 0; i < MAXLEN - 1 && (c = getchar()) != '\n' && c != EOF; i++)
    s[i] = c;
  s[i] = 0;

  printf("numeric: %f\n", atof(s));

  return 0;
}

double atof(char s[]) {
  int i, j, sign, exp, exp_sign;
  double val, power;

  for (i = 0; isspace(s[i]); i++)
    ;

  sign = (s[i] == '-') ? -1 : 1;

  if (s[i] == '+' || s[i] == '-')
    i++;

  for (val = 0.0; isdigit(s[i]); i++)
    val = 10.0 * val + (s[i] - '0');

  if (s[i] == '.')
    i++;

  for (power = 1.0; isdigit(s[i]); i++) {
    val = 10.0 * val + (s[i] - '0');
    power *= 10.0;
  }

  if (s[i] == 'e' || s[i] == 'E')
    i++;

  exp_sign = s[i] == '-' ? -1 : 1;

  for (i++, exp = 0; isdigit(s[i]); i++)
    exp = 10 * exp + (s[i] - '0');
  
  if (exp_sign < 0)
    exp = exp_sign * exp;

  if (exp < 0) {
    for (j = exp; j < 0; j++)
      power *= 10.0;
  } else {
    for (j = 0; j < exp; j++)
      power /= 10.0;
  }

  return sign * val / power;
}