これまでに作った各関数をポインタを使って書き直す。

getline

#include <stdio.h>

#define MAXLINE 1024

int getline(char*, int);

int main(void)
{
    char line[MAXLINE];
    int l, m;

    l = getline(line, MAXLINE);
    printf("\"%s\"'s length => %d\n", line, l);

    m = getline2(line, MAXLINE);
    printf("\"%s\"'s length => %d\n", line, m);

    return 0;
}

int getline(char *s, int lim)
{
    int c, t;

    t = lim;
    while (--lim > 0 && (c = getchar()) != EOF && c != '\n')
        *s++ = c;
    if (c == '\n')
        *s++ = c;
    *s = '\0';
    return t - lim;
}

実行結果

$ cat hoge.txt
hello
$ ./getline <hoge.txt
"hello
"'s length => 6

atoi

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

int atoi(char*);

int main(void)
{
    char *s = "1280";
    char *t = "-324";

    printf("%s/2 => %d\n", s, atoi(s) / 2);
    printf("%s*2 => %d\n", t, atoi(t) * 2);

    return 0;
}

int atoi(char *s)
{
    int n = 0;
    int sign;

    while (isspace(*s)) /* 空白を飛ばす */
        s++;

    sign = *s == '-' ? -1 : 1;
    if (*s == '-' || *s == '+') /* 符号を飛ばす */
        s++;

    while (isdigit(*s))
        n = 10 * n + (*s++ - '0');

    return sign * n;
}

実行結果

$ ./atoi
1280/2 => 640
-324*2 => -648

itoa, reverse

#include <stdio.h>

#define MAX 100

void itoa(int, char*);
void reverse(char*);

int main(void)
{
    int i = 123;
    int j = -256;
    char s1[MAX], s2[MAX];

    itoa(i, s1);
    itoa(i*2, s2);
    printf("%s*2 => %s\n", s1, s2);

    itoa(j, s1);
    itoa(j/2, s2);
    printf("%s/2 => %s\n", s1, s2);

    return 0;
}

void itoa(int n, char *s)
{
    int sign;
    char *pt;

    pt = s; /* 先頭アドレスを保存 */
    if ((sign = n) < 0)
        n = -n;

    do {
        *s++ = n % 10 + '0';
    } while ((n /= 10) > 0);

    if (sign < 0)
        *s++ = '-';

    *s = '\0';
    s = pt; /* 先頭アドレスを指し示すように変更 */
    reverse(s);
}

void reverse(char *s)
{
    char *p;
    char tmp;

    p = s;
    while(*s)
        s++;
    s--;
    while (p < s) {
        tmp = *s;
        *s = *p;
        *p = tmp;
        p++;
        s--;
    }
}

実行結果

$ ./itoa
123*2 => 246
-256/2 => -128

以下の itoa はローカルのポインタ変数を返しているので正常に動作しない。

char *itoa(int n)
{
    int sign;
    char _a[MAX];
    char *s, *pt;

    pt = s = _a;
    if ((sign = n) < 0) {
        n = -n;
    }

    do {
        *s++ = n % 10 + '0';
    } while ((n /= 10) > 0);

    if (sign < 0)
        *s++ = '-';

    *s = '\0';
    s = pt;
    reverse(s);

    return s; /* ローカルのポインタ変数を返している */
}

strindex

#include <stdio.h>

int strindex(char*, char*);

int main(void)
{
    char *s = "hello, world";
    char *t = "world";
    char *u = "word";

    printf("strindex(\"%s\", \"%s\"); => %d\n", s, t, strindex(s, t));
    printf("strindex(\"%s\", \"%s\"); => %d\n", s, u, strindex(s, u));

    return 0;
}

int strindex(char *s, char *t)
{
    int i, j, k;

    for (i=0; *(s+i); i++) {
        for (j=i, k=0; *(t+k) && *(s+j) == *(t+k); j++, k++)
            ;
        if (k > 0 && !*(t+k))
            return i;
    }

    return -1;
}

実行結果

$ ./strindex
strindex("hello, world", "world"); => 7
strindex("hello, world", "word"); => -1

getop

int getop(char *s)
{
    int c;
    char *pt;

    pt = s;
    while ((*s = c = getch()) == ' ' || c == '\t')
        ;
    *++s = '\0';
    if (!isdigit(c) && c != '.')
        return c; /* 数ではない */
    s = pt;
    if (isdigit(c)) /* 整数部を集める */
        while (isdigit(*++s = c = getch()))
            ;
    if (c == '.') /* 小数部を集める */
        while (isdigit(*++s = c = getch()))
            ;
    *s = '\0';
    if (c != EOF)
        ungetch(c);

    return NUMBER;
}

プログラミング言語C 第2版 ANSI規格準拠

posted with amazlet at 09.11.27

B.W. カーニハン D.M. リッチー
共立出版
売り上げランキング: 9726

Amazon.co.jp で詳細を見る

strncpy と strncat の返り値のポインタは最初に退避させておく。

strncpy

#include <stdio.h>
#include <string.h>

#define MAX 100

char *my_strncpy(char*, char*, int);

int main(void)
{
    char *s = "hello";
    char s1[MAX] = "hello";
    char s2[MAX] = "hello";
    char s3[MAX] = "hello";
    char s4[MAX] = "hello";
    char s5[MAX] = "hello";
    char s6[MAX] = "hello";
    char *ct1 = "world";
    char *ct2 = "world";
    char *ct3 = "world";
    char *ct4 = "world";
    char *ct5 = "world";
    char *ct6 = "world";

    printf("strncpy(\"%s\", \"%s\", %d) => %s\n", s, ct1, 2, strncpy(s1, ct1, 2));
    printf("strncpy(\"%s\", \"%s\", %d) => %s\n", s, ct2, 5, strncpy(s2, ct2, 5));
    printf("strncpy(\"%s\", \"%s\", %d) => %s\n", s, ct3, 9, strncpy(s3, ct3, 9));

    printf("my_strncpy(\"%s\", \"%s\", %d) => %s\n", s, ct4, 2, my_strncpy(s4, ct4, 2));
    printf("my_strncpy(\"%s\", \"%s\", %d) => %s\n", s, ct5, 5, my_strncpy(s5, ct5, 5));
    printf("my_strncpy(\"%s\", \"%s\", %d) => %s\n", s, ct6, 9, my_strncpy(s6, ct6, 9));

    return 0;
}

char *my_strncpy(char *s, char *ct, int n)
{
    char *rt;

    rt = s;
    while (*ct && n) {
        *s++ = *ct++;
        n--;
    }
    if (n > 0)
        *s = '\0';

    return rt;
}

実行結果

$ ./strncpy
strncpy("hello", "world", 2) => wollo
strncpy("hello", "world", 5) => world
strncpy("hello", "world", 9) => world
my_strncpy("hello", "world", 2) => wollo
my_strncpy("hello", "world", 5) => world
my_strncpy("hello", "world", 9) => world

strncat

#include <stdio.h>
#include <string.h>

#define MAX 100

char *my_strncat(char*, char*, int);

int main(void)
{
    char *s = "hello";
    char s1[MAX] = "hello";
    char s2[MAX] = "hello";
    char s3[MAX] = "hello";
    char s4[MAX] = "hello";
    char s5[MAX] = "hello";
    char s6[MAX] = "hello";
    char *ct1 = "world";
    char *ct2 = "world";
    char *ct3 = "world";
    char *ct4 = "world";
    char *ct5 = "world";
    char *ct6 = "world";

    printf("strncat(\"%s\", \"%s\", %d) => %s\n", s, ct1, 2, strncat(s1, ct1, 2));
    printf("strncat(\"%s\", \"%s\", %d) => %s\n", s, ct2, 5, strncat(s2, ct2, 5));
    printf("strncat(\"%s\", \"%s\", %d) => %s\n", s, ct3, 9, strncat(s3, ct3, 9));

    printf("my_strncat(\"%s\", \"%s\", %d) => %s\n", s, ct4, 2, my_strncat(s4, ct4, 2));
    printf("my_strncat(\"%s\", \"%s\", %d) => %s\n", s, ct5, 5, my_strncat(s5, ct5, 5));
    printf("my_strncat(\"%s\", \"%s\", %d) => %s\n", s, ct6, 9, my_strncat(s6, ct6, 9));

    return 0;
}

char *my_strncat(char *s, char *ct, int n)
{
    char *rt;

    rt = s;
    while (*s)
        s++;
    while (*ct && n) {
        *s++ = *ct++;
        n--;
    }
    if (n > 0)
        *s = '\0';

    return rt;
}

実行結果

$ ./strncat
strncat("hello", "world", 2) => hellowo
strncat("hello", "world", 5) => helloworld
strncat("hello", "worlds", 9) => helloworlds
my_strncat("hello", "world", 2) => hellowo
my_strncat("hello", "world", 5) => helloworld
my_strncat("hello", "worlds", 9) => helloworlds

strncmp

#include <stdio.h>
#include <string.h>

int my_strncmp(char*, char*, int);

int main(void)
{
    char *ct1 = "world";
    char *ct2 = "worlds";

    printf("strncmp(\"%s\", \"%s\", %d) => %d\n", ct1, ct2, 2, strncmp(ct1, ct2, 2));
    printf("strncmp(\"%s\", \"%s\", %d) => %d\n", ct1, ct2, 5, strncmp(ct1, ct2, 5));
    printf("strncmp(\"%s\", \"%s\", %d) => %d\n", ct1, ct2, 6, strncmp(ct1, ct2, 6));
    printf("strncmp(\"%s\", \"%s\", %d) => %d\n", ct2, ct1, 6, strncmp(ct2, ct1, 6));

    printf("my_strncmp(\"%s\", \"%s\", %d) => %d\n", ct1, ct2, 2, my_strncmp(ct1, ct2, 2));
    printf("my_strncmp(\"%s\", \"%s\", %d) => %d\n", ct1, ct2, 5, my_strncmp(ct1, ct2, 5));
    printf("my_strncmp(\"%s\", \"%s\", %d) => %d\n", ct1, ct2, 6, my_strncmp(ct1, ct2, 6));
    printf("my_strncmp(\"%s\", \"%s\", %d) => %d\n", ct2, ct1, 6, my_strncmp(ct2, ct1, 6));

    return 0;
}

int my_strncmp(char *cs, char *ct, int n)
{
    while (n && (*cs && *ct) && *cs++ == *ct++)
        n--;
    if (n == 0 || (!*cs && !*ct)) /* n が 0, または, *cs と *ct が共に '\0' */
        return 0;

    return *cs - *ct;
}

実行結果

$ ./strncmp
strncmp("world", "worlds", 2) => 0
strncmp("world", "worlds", 5) => 0
strncmp("world", "worlds", 6) => -115
strncmp("worlds", "world", 6) => 115
my_strncmp("world", "worlds", 2) => 0
my_strncmp("world", "worlds", 5) => 0
my_strncmp("world", "worlds", 6) => -115
my_strncmp("worlds", "world", 6) => 115

プログラミング言語C 第2版 ANSI規格準拠

posted with amazlet at 09.11.27

B.W. カーニハン D.M. リッチー
共立出版
売り上げランキング: 9726

Amazon.co.jp で詳細を見る

t のポインタを文字列終端に移動させる際に、条件節で i をインクリメントしているのは、終端に到達した際にもインクリメントするため。
これは、文字列の比較が終端文字から始まるため。
文字列 t が文字列 s の終わりに存在すれば i は 0 までデクリメントされる。

#include <stdio.h>

int strend(char*, char*);

int main(void)
{
    char *s = "hello, world";
    char *t1 = "world";
    char *t2 = "sorld";

    printf("strend(\"%s\", \"%s\"); => %d\n", s, t1, strend(s, t1));
    printf("strend(\"%s\", \"%s\"); => %d\n", s, t2, strend(s, t2));

    return 0;
}

int strend(char *s, char *t)
{
    int i = 0;

    /* ポインタを各文字列終端'\0'へ移動させる */
    while (*s)
        s++;
    while (++i && *t)
        t++;

    /* 後方から前方に向けて、文字を比較する */
    while (*s-- == *t-- && i >= 0)
        i--;

    return i == 0;
}

実行結果

$ ./ex5-4
strend("hello, world", "world"); => 1
strend("hello, world", "sorld"); => 0

プログラミング言語C 第2版 ANSI規格準拠

posted with amazlet at 09.11.27

B.W. カーニハン D.M. リッチー
共立出版
売り上げランキング: 9726

Amazon.co.jp で詳細を見る

以下のように文字列定数の内容を書き換えようとすると失敗する。

#include <stdio.h>

int main(void)
{
    char amessage[] = "now is the time"; /* 配列 */
    char *pmessage = "now is the time";  /* ポインタ */

    printf("amessage[] => %s\n", amessage);
    printf("*pmessage => %s\n", pmessage);

    printf("----------\n");

    amessage[0] = 'N'; /* 配列版の先頭文字を書き換える。 */
    printf("amessage[] => %s\n", amessage);

    *pmessage = 'N'; /* ポインタ版の先頭文字を書き換える。 */
    printf("*pmessage => %s\n", pmessage);

    return 0;
}

実行結果

$ ./str_test
amessage[] => now is the time
*pmessage => now is the time
----------
amessage[] => Now is the time
Bus error

ポインタの指し示す先を配列版の先頭に変更すると、ポインタ版の文字の変更は配列版の変更となる。

#include <stdio.h>

int main(void)
{
    char amessage[] = "now is the time"; /* 配列 */
    char *pmessage = "now is the time";  /* ポインタ */

    printf("amessage[] => %s\n", amessage);
    printf("*pmessage => %s\n", pmessage);

    printf("----------\n");

    pmessage = &amessage[0]; /* ポインタを配列版の文字列を指し示すように変更する。 */
    *pmessage = 'N'; /* 先頭文字を書き換える。 => 配列版の文字列が書き換えられる。 */
    printf("amessage[] => %s\n", amessage);
    printf("*pmessage => %s\n", pmessage);

    return 0;
}

実行結果

$ ./str
amessage[] => now is the time
*pmessage => now is the time
----------
amessage[] => Now is the time
*pmessage => Now is the time

演習5-3

#include <stdio.h>
#include <string.h> /* strcpy を使うため */

void my_strcat(char*, char*);
void my_strcat2(char*, char*);

int main(void)
{
    char s1[] = "hello";
    char s2[] = ", world.";
    char s3[] = "from ";
    char s4[] = "Japan.";

    my_strcat(s1, s2);
    printf("my_strcat(s1, s2); => %s\n", s1);

    my_strcat2(s3, s4);
    printf("my_strcat2(s3, s4); => %s\n", s3);

    return 0;
}

void my_strcat(char *s, char *t)
{
    /* s の指し示す文字が真の間（終端文字の'\0'に達するまで）ポインタをインクリメントする。 */
    while (*s)
        s++;
    /* *t を *s に代入し、代入した文字が終端文字'\0'でなければ、それぞれのポインタをインクリメントしてループを繰り返す。 */
    while (*s++ = *t++)
        ;
}

/* strcpy を使った版。while の条件節を少しわかりやすくした。 */
void my_strcat2(char *s, char *t)
{
    while (*s != '\0')
        s++;
    strcpy(s, t); /* strcpy が開始される時点で s は '\0' を指している。 */
}

実行結果

$ ./ex5-3
my_strcat(s1, s2); => hello, world.
my_strcat2(s3, s4); => from Japan.

プログラミング言語C 第2版 ANSI規格準拠

posted with amazlet at 09.11.27

B.W. カーニハン D.M. リッチー
共立出版
売り上げランキング: 9726

Amazon.co.jp で詳細を見る

• 正常にアドレスを指し示すポインタは 0 にはならない。
• 0 は異常値を表し、stdio.h で定義されている NULL を使う。
• ポインタは同じ配列の要素を指し示している場合には、==, !=, <, >, <=, >= などの関係演算子を利用できる。
• ポインタと整数との間の加減算は、ポインタが指し示すオブジェクトの型のサイズに応じて適切にスケールされる。
  p + n は (p の先頭アドレス) + (sizeof p) * n となる。

正しいポインタ演算

• 同じ型のポインタの代入
• ポインタと整数の加算・減算
• 同じ配列の要素を指し示すポインタの引き算と比較
• ゼロ(NULL)の代入やゼロ(NULL)との比較

alloc, afree

以下のプログラム例での allocbuf の状態。

#include <stdio.h>

#define ALLOCSIZE 10000 /* 使用可能な場所の大きさ */

static char allocbuf[ALLOCSIZE]; /* alloc のための記憶場所 */
static char *allocp = allocbuf;  /* 次の空き位置(allocbuf の先頭アドレスを指して初期化) */

char *alloc(int);
void afree(char*);

int main(void)
{
    int n;
    char *p, *q;

    printf("p => %p\n", p);
    printf("q => %p\n", q);
    n = 10;
    p = alloc(n);
    printf("p => %p\n", p);
    *p = 'a';
    *(p+1) = 'b';
    *(p+2) = 'c';
    *(p+3) = '\0';
    printf("allocbuf => %s\n", allocbuf); /* p で確保した allocbuf の領域が使用されている */
    q = alloc(n);
    printf("q => %p\n", q);
    *q = 'A';
    *(q+1) = 'B';
    *(q+2) = 'C';
    *(q+3) = '\0';
    printf("allocbuf[n] => %s\n", &allocbuf[n]); /* q で確保した allocbuf の領域が使用されている */
    afree(p);
    afree(q);
    printf("p => %p\n", p);
    printf("q => %p\n", q);

    return 0;
}

/* n 文字へのポインタを返す */
char *alloc(int n)
{
    if (allocbuf + ALLOCSIZE - allocp >= n) { /* 入りきる */
        allocp += n;
        return allocp - n; /* 古い p */
    } else { /* 十分な空きがないとき */
        return 0; /* 異常事態を表わす 0 、通常は NULL (stdio.h で定義) を使う */
    }
}

/* p によって指される領域を解放する */
void afree(char *p)
{
    if (p >= allocbuf && p < allocbuf + ALLOCSIZE) {
        allocp = p;
    }
}

実行結果

$ ./alloc
p => 0x7fff5fbfebe8
q => 0x0
p => 0x100001080
allocbuf => abc
q => 0x10000108a
allocbuf[n] => ABC
p => 0x100001080
q => 0x10000108a

プログラミング言語C 第2版 ANSI規格準拠

posted with amazlet at 09.11.27

B.W. カーニハン D.M. リッチー
共立出版
売り上げランキング: 9726

Amazon.co.jp で詳細を見る

メンテナンス画面表示用のファイルを配置するディレクトリ /maintenance を作る。

サーバにメンテナンス中を示すページのファイル /maintenance/index.html を配置する。

メンテナンス中ページに画像を表示する場合は画像ファイル /maintenance/maintenance.png を必要に応じて配置する。

503 ステータスコード（サービス利用不可）を返し、/maintenance/index.html の内容を表示させるために、以下の PHP スクリプト /maintenance/503.php を配置する。

<?php
header ('HTTP/1.0 503 Service Temporarily Unavailable');
readfile(dirname(__FILE__) . '/index.html');
?>

メンテナンスを行うディレクトリに、以下の記述の .htaccess ファイルを配置する。
メンテナンス作業者の IP アドレスを記述しておくと、作業者は通常の画面表示を確認できる。

RewriteEngine On
RewriteCond %{REMOTE_ADDR} !=192.168.0.2
RewriteCond %{REQUEST_URI} !=/maintenance/503.php
RewriteCond %{REQUEST_URI} !=/maintenance/maintenance.png
RewriteRule ^.*$ /maintenance/503.php [L]

メンテナンス用ファイルを検索クローラーにキャッシュされないように、以下の記述を robot.txt に加える。

User-Agent: *
Disallow: /maintenance/

これで、サイトメンテナンス中のページを検索クローラーにキャッシュされずに、訪問者にはメンテナンス中であることを示すページを表示することができる。

#include <stdio.h>

int main(void)
{
    int i, len;
    int a[] = {1, 2, 3, 4, 5, 6, 7, 8, 9, 10};
    int *pa;

    len = (sizeof a) / (sizeof a[0]);

    printf("a[] => ");
    for (i = 0; i < len; i++) {
        printf(",%d", a[i]);
    }
    printf("\n");

    /* a は配列先頭のアドレス */
    pa = a; /* pa = &a[0]; と同じ */
    printf("*pa => ");
    for (i = 0; i < len; i++) {
        printf(",%d", *pa++);
    }
    printf("\n");

    /* *(a+i) は a[i] と同じ */
    printf("*(a+i) => ");
    for (i = 0; i < len; i++) {
        printf(",%d", *a+i);
    }
    printf("\n");

    /* 再び pa を配列先頭のアドレスを指すようにする */
    pa = a;
    printf("pa[i] => ");
    for (i = 0; i < len; i++) {
        printf(",%d", pa[i]);
    }
    printf("\n");

    return 0;
}

実行結果

$ ./ptr_ary
a[] => ,1,2,3,4,5,6,7,8,9,10
*pa => ,1,2,3,4,5,6,7,8,9,10
*(a+i) => ,1,2,3,4,5,6,7,8,9,10
pa[i] => ,1,2,3,4,5,6,7,8,9,10

プログラミング言語C 第2版 ANSI規格準拠

posted with amazlet at 09.11.27

B.W. カーニハン D.M. リッチー
共立出版
売り上げランキング: 9726

Amazon.co.jp で詳細を見る

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

#define SIZE 100
#define BUFSIZE 100

int getch(void);
void ungetch(int);

int main(void)
{
    double array[SIZE];
    int n, m, getfloat(double *);
    int i;

    n = 0;
    while (n < SIZE && (m = getfloat(&array[n])) != EOF) {
        if (m > 0) {
            n++;
        }
    }

    for (i = 0; i < n; i++) {
        printf("%f\n", array[i]);
    }

    return 0;
}

/* getfloat : 入力から次の整数を取り出して *pd に入れる */
int getfloat(double *pd)
{
    int c, sign, sign_c;
    int is_dec = 0;
    double dc = 1.0;

    while (isspace(c = getch())) /* 空白を飛ばす */
        ;
    if (!isdigit(c) && c != EOF && c != '+' && c != '-' && c != '.') {
        ungetch(c); /* 数字ではない */
        return 0;
    }
    sign = (c == '-') ? -1 : 1;
    if (c == '+' || c == '-') {
        sign_c = c;
        c = getch();
    }
    if (!isdigit(c) && c != EOF && c != '.') {
        ungetch(sign_c);
        return 0;
    }
    for (*pd = 0.0; isdigit(c) || c == '.'; c = getch()) {
        if (c == '.') {
            is_dec = 1;
            continue;
        }
        if (is_dec) {
            *pd = *pd + (dc /= 10) * (c - '0');
        } else {
            *pd = 10 * *pd + (c - '0');
        }
    }
    *pd *= sign;
    if (c != EOF)
        ungetch(c);
    return c;
}

char buf[BUFSIZE]; /* ungetch 用のバッファ */
int bufp = 0;      /* buf 中の次の空き位置 */

int getch(void) /* (押し戻された可能性もある)1文字をとってくる */
{
    return (bufp > 0) ? buf[--bufp] : getchar();
}

void ungetch(int c)
{
    if (bufp >= BUFSIZE) {
        printf("ungetch: too many characters\n");
    } else {
        buf[bufp++] = c;
    }
}

実行結果

$ cat hoge.txt
123.123
+456.123
+ 789.123
-321.123
- 654.123
-       987.123
.009
-.009
-  .009
$ ./ex5-2 <hoge.txt
123.123000
456.123000
789.123000
-321.123000
-654.123000
-987.123000
0.009000
-0.009000
-0.009000

プログラミング言語C 第2版 ANSI規格準拠

posted with amazlet at 09.11.27

B.W. カーニハン D.M. リッチー
共立出版
売り上げランキング: 9726

Amazon.co.jp で詳細を見る

問題文の意味がいまいちわかりにくかったが、 +/- と数字の間に空白があっても +/- 記号が機能するように変更すると解釈した。

+/- 記号があれば sign_c に一時保存して次の文字を読みにいく。
次の文字が数字でなければ（スペースなどの場合）sign_c に一時保存した +/- 記号を ungetch() で入力に戻し、入力が数でないという印の 0 を返す。

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

#define SIZE 100
#define BUFSIZE 100

int getch(void);
void ungetch(int);

int main(void)
{
    int n, m, array[SIZE], getint(int *);
    int i;

    n = 0;
    while (n < SIZE && (m = getint(&array[n])) != EOF) {
        if (m > 0) {
            n++;
        }
    }

    for (i = 0; i < n; i++) {
        printf("%d\n", array[i]);
    }

    return 0;
}

/* getint : 入力から次の整数を取り出して *pn に入れる */
int getint(int *pn)
{
    int c, sign, sign_c;

    while (isspace(c = getch())) /* 空白を飛ばす */
        ;
    if (!isdigit(c) && c != EOF && c != '+' && c != '-') {
        ungetch(c); /* 数字ではない */
        return 0;
    }
    sign = (c == '-') ? -1 : 1;
    if (c == '+' || c == '-') {
        sign_c = c;
        c = getch();
    }
    if (!isdigit(c) && c != EOF) {
        ungetch(sign_c);
        return 0;
    }
    for (*pn = 0; isdigit(c); c = getch())
        *pn = 10 * *pn + (c - '0');
    *pn *= sign;
    if (c != EOF)
        ungetch(c);
    return c;
}

char buf[BUFSIZE]; /* ungetch 用のバッファ */
int bufp = 0;      /* buf 中の次の空き位置 */

int getch(void) /* (押し戻された可能性もある)1文字をとってくる */
{
    return (bufp > 0) ? buf[--bufp] : getchar();
}

void ungetch(int c)
{
    if (bufp >= BUFSIZE) {
        printf("ungetch: too many characters\n");
    } else {
        buf[bufp++] = c;
    }
}

実行結果

$ cat hoge.txt
123
+456
+ 789
-321
- 654
-       987
$ ./ex5-1 <hoge.txt
123
456
789
-321
-654
-987

プログラミング言語C 第2版 ANSI規格準拠

posted with amazlet at 09.11.27

B.W. カーニハン D.M. リッチー
共立出版
売り上げランキング: 9726

Amazon.co.jp で詳細を見る