C - 小さなツールの作成: 1つのことだけをうまくやる(main関数, コマンドライン引数)

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

開発環境

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

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

その他参考書籍

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

コードマグネット(p.143)

コード(BBEdit, Emacs)

categorize.c

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

int main(int argc, char *argv[])
{
  char line[80];

  if (argc != 6) {
    fprintf(stderr, "5つの引数を指定してください。\n");
    return (1);
  }
  
  FILE *in_fh = fopen("spooky.csv", "r");
  FILE *file1 = fopen(argv[2], "w");
  FILE *file2 = fopen(argv[4], "w");
  FILE *file3 = fopen(argv[5], "w");

  while (fscanf(in_fh, "%79[^\n]\n", line) == 1) {
    if (strstr(line, argv[1]))
      fprintf(file1, "%s\n", line);
    else if (strstr(line, argv[3]))
      fprintf(file2, "%s\n",line);
    else
      fprintf(file3, "%s\n", line);
  }

  fclose(in_fh);
  fclose(file1);
  fclose(file2);
  fclose(file3);

  return (0);
}

Makefile

CC=cc
CFLAGS=-g -Wall
SRC=categorize.c
OBJ=categorize.o

all: categorize bermuda

categorize: categorize.o
 $(CC) $(CFLAGS) categorize.o -o categorize

categorize.o: categorize.c
 $(CC) $(CFLAGS) -c categorize.c -o categorize.o

clear:
 rm -rf categorize $(OBJ)

入出力結果(Terminal)

$ make
cc -g -Wall -c categorize.c -o categorize.o
cc -g -Wall categorize.o -o categorize
$ ./categorize 
5つの引数を指定してください。
$ echo $?
1
$ ./categorize mermaid mermaid.csv Elvis elvises.csv the_rest.csv
$ cat spooky.csv
30.685163,-68.137207,Type=Yeti
-100.0, 50,Type=Test1
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
50,200,Type=Test2
$ cat mermaid.csv 
$ cat elvises.csv 
28.343065,-62.753906,Type=Elvis
37.879536,-69.477539,Type=Elvis
22.705256,-68.192139,Type=Elvis
27.166695,-87.484131,Type=Elvis
$ cat the_rest.csv 
30.685163,-68.137207,Type=Yeti
-100.0, 50,Type=Test1
28.304380,-74.575195,Type=UFO
29.132971,-71.136475,Type=Ship
27.868217,-68.005371,Type=Goatsucker
30.496017,-73.333740,Type=Disappearance
26.224447,-71.477051,Type=UFO
29.401320,-66.027832,Type=Ship
50,200,Type=Test2
$