C - 関数とプログラム構造 (非整数を返す関数(atof))

プログラミング言語C 第2版 ANSI規格準拠
B.W. カーニハン D.M. リッチー (著)
石田 晴久 (翻訳)

開発環境

• OS X Lion - Apple(OS)
• Emacs、BBEdit - Bare Bones Software, Inc. (Text Editor)
• プログラミング言語: C
• Clang (コンパイラ)

プログラミング言語C 第2版 ANSI規格準拠 (B.W. カーニハン D.M. リッチー (著)、 石田 晴久 (翻訳)、共立出版)の第4章(関数とプログラム構造)4.2(非整数を返す関数)の演習4-2を解いてみる。

その他参考書籍

• プログラミング言語Cアンサー・ブック 第2版 (クロビス・L．トンド、スコット・E．ギンペル(著)、矢吹 道郎(翻訳))

演習 4-2.

コード

sample.c

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

#define MAXLINE 1000

double atof(char s[]);

int main()
{
    printf("%.10f\n%.10f\n%.10f\n%.10f\n%.10f\n%.10f\n%.10f\n%.10f\n",
        atof("123.45"), atof("-123.45"),
        atof("123.45e-6"), atof("123.45e+6"), atof("123.45e6"),
        atof("123.45E-6"), atof("123.45E+6"), atof("123.45E6"));
    printf("%.10f\n%.10f\n%.10f\n%.10f\n%.10f\n%.10f\n",
        atof("-123.45e-6"), atof("-123.45e+6"), atof("-123.45e6"),
        atof("-123.45E-6"), atof("-123.45E+6"), atof("-123.45E6"));    
    return 0;
}

double atof(char s[])
{
    double val, power, n;
    int i, sign, exp;
    
    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;
    }
    val = sign * val / power;
    if (s[i] == 'e' || s[i] == 'E') {
        sign = (s[++i] == '-') ? -1 : 1;
        if (s[i] == '+' || s[i] == '-') {
            i++;
        }
        for (exp = 0; isdigit(s[i]); i++) {
            exp = 10 * exp + (s[i] - '0');
        }
        if (sign == 1) {
            n = 10;
        } else {
            n = 1.0 / 10;
        }
        while (exp-- > 0) {
            val *= n;
        }
    }
    return val;
}

入出力結果(Terminal)

$ ./a.out
123.4500000000
-123.4500000000
0.0001234500
123450000.0000000000
123450000.0000000000
0.0001234500
123450000.0000000000
123450000.0000000000
-0.0001234500
-123450000.0000000000
-123450000.0000000000
-0.0001234500
-123450000.0000000000
-123450000.0000000000
$