C - 小さなツールの作成: 1つのことだけをうまくやる(独自のデータストリーム, ファイル入出力)

Head First C ―頭とからだで覚えるCの基本
(オライリージャパン)
David Griffiths (著) Dawn Griffiths (著)
中田 秀基(監訳)(翻訳) 木下 哲也 (翻訳)

開発環境

• OS X Yosemite - Apple (OS)
• Emacs (CUI)、BBEdit - Bare Bones Software, Inc. (GUI) (Text Editor)
• C (プログラミング言語)
• LLVM/Clang (コンパイラ, Xcode - Apple)

Head First C ―頭とからだで覚えるCの基本(David Griffiths (著)、Dawn Griffiths (著) 中田 秀基(監訳)(翻訳)、木下 哲也 (翻訳)、オライリージャパン)の2.5章(小さなツールの作成: 1つのことだけをうまくやる)、自分で考えてみよう(p.139)を解いてみる。

その他参考書籍

• 21st Century C: C Tips from the New School
• プログラミング言語C 第2版 ANSI規格準拠(B.W. カーニハンD.M. リッチー(著)、石田 晴久(翻訳)、共立出版)
• プログラミング言語Cアンサー・ブック 第2版 (クロビス・L．トンド、スコット・E．ギンペル(著)、矢吹 道郎(翻訳))
• C実践プログラミング 第3版(Steve Oualline(著)、望月 康司 (監訳)(翻訳)、谷口 功(翻訳)、 オライリージャパン)

自分で考えてみよう(p.139)

コード(BBEdit, Emacs)

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

int main() {
  char line[80];
  FILE *in = fopen("spooky.csv", "r");
  FILE *file1 = fopen("ufos.csv", "w");
  FILE *file2 = fopen("disappearances.csv",  "w");
  FILE *file3 = fopen("others.csv", "w");
  while (fscanf(in, "%79[^\n]\n", line) == 1)
    if (strstr(line, "UFO")) fprintf(file1, "%s\n", line);
    else if (strstr(line, "Disappearance")) fprintf(file2, "%s\n", line);
    else fprintf(file3, "%s\n", line);

  fclose(in);
  fclose(file1);
  fclose(file2);
  fclose(file3);
}

入出力結果(Terminal)

$ crun.sh sample139
clang ...
a$ cat spooky.csv
30.685163,-68.137207,Type=Yeti
28.304380,-74.575195,Type=UFO
29.132971,-71.136475,Type=Ship
28.343065,-62.753906,Type=Elvis
27.868217,-68.005371,Type=Goatsucker
30.496017,-73.333740,Type=Disappearance
26.224447,-71.477051,Type=UFO
29.401320,-66.027832,Type=Ship
37.879536,-69.477539,Type=Elvis
22.705256,-68.192139,Type=Elvis
27.166695,-87.484131,Type=Elvis
a$ cat ufos.csv 
28.304380,-74.575195,Type=UFO
26.224447,-71.477051,Type=UFO
a$ cat disappearances.csv 
30.496017,-73.333740,Type=Disappearance
a$ cat others.csv 
30.685163,-68.137207,Type=Yeti
29.132971,-71.136475,Type=Ship
28.343065,-62.753906,Type=Elvis
27.868217,-68.005371,Type=Goatsucker
29.401320,-66.027832,Type=Ship
37.879536,-69.477539,Type=Elvis
22.705256,-68.192139,Type=Elvis
27.166695,-87.484131,Type=Elvis
a$