#include <stdio.h>
#include <stdlib.h>
#include <string.h>
/* cucv: cutcsv アクセステキストのフィールド切り出し */
/* とりあえず第一段階 cucv5.c 20180508
最後の改行いらないが、取り合えず何とか
第2項から切り出しの時の先頭のコンマもいらないがなんとなくこのまま
しかし難関”、”処理に挑戦 何とか
*/
/* K&R のCAT第2版を流用
引数を入力ファイル名、切り出しフィールドの文字列にする
副関数はいらない 構造をシンプルに
*/
int main(int argc, char *argv[])
{
FILE *fp;
char *prog = argv[0]; /* プログラム名。エラー表示で使う */
int c,n,hl;
int fldno = 1; /*フィールド番号 */
int dqflag = 0; /*ダブルコーテーション内のコンマ処理のためのフラグ*/
int hikino; /* 引数番号比較*/
char h;
/*エラー処理 引き数チェックなど*/
if (argc == 1 || argc ==2){ /* 引数なし又はファイル名のみの場合:簡単な使い方 */
fprintf(stderr
, "%s:アクセステキストのフィールド切り出し\n", prog
); }
if ((fp
= fopen(argv
[1], "r")) == NULL
){ /* ファイルオープンは第一引数のみにする*/ fprintf(stderr
, "%s:ファイルオープン失敗 %s\n", prog
, argv
[1]); }
for (hikino = 2; hikino < argc; hikino++){ /*第2引数以降が自然数でない時 */
/* 最大255くらいだから 文字列の各桁がASCI数値であることを確かめる
引数の長さ3文字以下、各文字が数であること、
argv を 2次元配列としてアクセス こっちが難関だった*/
if ( hl > 3){
fprintf(stderr
,"%s:フィールド指定は整数3桁まで\n", prog
); }
for ( n = 0 ; n < hl ; n++){
h = argv[hikino][n];
if (h < '0' || h > '9'){
fprintf(stderr
,"%s:フィールド指定は整数\n", prog
); }
}
}
/*本処理*/
while((c
= getc(fp
)) != EOF
){
/*ダブルコーテーションの処理 2個までコンマを数えないこと */
if (c == '"' ) ++dqflag;
if (c == ',') {
if( dqflag == 0) ++fldno;
else if( dqflag == 2) {
++fldno;
dqflag = 0;
}
}
/*あとは全部の残った引数文字列の数値とfldnoが同じ時だけ出力する、でよいはず
1 フィールド数のカウント、変数fldnno 1で初期化
2 第3以降の引数との比較
3 合致してたら出力
4 そのうえで改行かどうかチェック、改行の時、fldnoを更新し、改行を出力する
*/
for (hikino = 2; hikino < argc; hikino++)
if (fldno
== atoi(argv
[hikino
])) putc(c
, stdout
); if (c == '\n') {
fldno = 1;
}
}
fprintf(stderr
, "%s: 書き出し失敗\n", prog
); /* K&Rから2つ目のエラー処理、書き出し失敗*/
}
}
I2luY2x1ZGUgPHN0ZGlvLmg+CgojaW5jbHVkZSA8c3RkbGliLmg+CiNpbmNsdWRlIDxzdHJpbmcuaD4KCi8qIGN1Y3Y6IGN1dGNzdiDjgqLjgq/jgrvjgrnjg4bjgq3jgrnjg4jjga7jg5XjgqPjg7zjg6vjg4nliIfjgorlh7rjgZcgKi8KLyog44Go44KK44GC44GI44Ga56ys5LiA5q616ZqO44CAY3VjdjUuYyAyMDE4MDUwOAoJ5pyA5b6M44Gu5pS56KGM44GE44KJ44Gq44GE44GM44CB5Y+W44KK5ZCI44GI44Ga5L2V44Go44GLCgnnrKwy6aCF44GL44KJ5YiH44KK5Ye644GX44Gu5pmC44Gu5YWI6aCt44Gu44Kz44Oz44Oe44KC44GE44KJ44Gq44GE44GM44Gq44KT44Go44Gq44GP44GT44Gu44G+44G+CgnjgZfjgYvjgZfpm6PplqLigJ3jgIHigJ3lh6bnkIbjgavmjJHmiKYg5L2V44Go44GLCiovCi8qIEsmUiDjga5DQVTnrKwy54mI44KS5rWB55So44CACgnlvJXmlbDjgpLlhaXlipvjg5XjgqHjgqTjg6vlkI3jgIHliIfjgorlh7rjgZfjg5XjgqPjg7zjg6vjg4njga7mloflrZfliJfjgavjgZnjgosKCeWJr+mWouaVsOOBr+OBhOOCieOBquOBhCDmp4vpgKDjgpLjgrfjg7Pjg5fjg6vjgasKKi8KCQppbnQgbWFpbihpbnQgYXJnYywgY2hhciAqYXJndltdKQp7CglGSUxFICpmcDsKCWNoYXIgKnByb2cgPSBhcmd2WzBdOyAvKiDjg5fjg63jgrDjg6njg6DlkI3jgILjgqjjg6njg7zooajnpLrjgafkvb/jgYYgKi8KCWludCBjLG4saGw7CglpbnQgZmxkbm8gPSAxOyAvKuODleOCo+ODvOODq+ODieeVquWPtyAqLwoJaW50IGRxZmxhZyA9IDA7IC8q44OA44OW44Or44Kz44O844OG44O844K344On44Oz5YaF44Gu44Kz44Oz44Oe5Yem55CG44Gu44Gf44KB44Gu44OV44Op44KwKi8KCWludCBoaWtpbm87IC8qIOW8leaVsOeVquWPt+avlOi8gyovCgljaGFyIGg7CgkKCS8q44Ko44Op44O85Yem55CGIOW8leOBjeaVsOODgeOCp+ODg+OCr+OBquOBqSovCglpZiAoYXJnYyA9PSAxIHx8IGFyZ2MgPT0yKXsgLyog5byV5pWw44Gq44GX5Y+I44Gv44OV44Kh44Kk44Or5ZCN44Gu44G/44Gu5aC05ZCI77ya57Ch5Y2Y44Gq5L2/44GE5pa5ICovCgkJZnByaW50ZihzdGRlcnIsICIlczrjgqLjgq/jgrvjgrnjg4bjgq3jgrnjg4jjga7jg5XjgqPjg7zjg6vjg4nliIfjgorlh7rjgZdcbiIsIHByb2cpOwoJCWV4aXQgKDEpOwoJfQoJaWYgKChmcCA9IGZvcGVuKGFyZ3ZbMV0sICJyIikpID09IE5VTEwpeyAvKiDjg5XjgqHjgqTjg6vjgqrjg7zjg5fjg7Pjga/nrKzkuIDlvJXmlbDjga7jgb/jgavjgZnjgosqLwoJCWZwcmludGYoc3RkZXJyLCAiJXM644OV44Kh44Kk44Or44Kq44O844OX44Oz5aSx5pWXICVzXG4iLCBwcm9nLCBhcmd2WzFdKTsgCgkJZXhpdCgxKTsgCgl9Cglmb3IgKGhpa2lubyA9IDI7IGhpa2lubyA8IGFyZ2M7IGhpa2lubysrKXsgLyrnrKwy5byV5pWw5Lul6ZmN44GM6Ieq54S25pWw44Gn44Gq44GE5pmCICovCgkJCS8qIOacgOWkpzI1NeOBj+OCieOBhOOBoOOBi+OCieOAgOaWh+Wtl+WIl+OBruWQhOahgeOBjEFTQ0nmlbDlgKTjgafjgYLjgovjgZPjgajjgpLnorrjgYvjgoHjgosKCQkJ5byV5pWw44Gu6ZW344GVM+aWh+Wtl+S7peS4i+OAgeWQhOaWh+Wtl+OBjOaVsOOBp+OBguOCi+OBk+OBqOOAgQoJCQlhcmd2IOOCkuOAgDLmrKHlhYPphY3liJfjgajjgZfjgabjgqLjgq/jgrvjgrnjgIDjgZPjgaPjgaHjgYzpm6PplqLjgaDjgaPjgZ8qLwoJCWhsID0gc3RybGVuKGFyZ3ZbaGlraW5vXSk7CgkJaWYgKCBobCA+IDMpewoJCQlmcHJpbnRmKHN0ZGVyciwiJXM644OV44Kj44O844Or44OJ5oyH5a6a44Gv5pW05pWw77yT5qGB44G+44GnXG4iLCBwcm9nKTsKCQkJZXhpdCAoMSk7CgkJfQoJCWZvciAoIG4gPSAwIDsgbiA8IGhsICA7IG4rKyl7CgkJCWggPSBhcmd2W2hpa2lub11bbl07CgkJCWlmIChoIDwgJzAnIHx8IGggPiAnOScpewoJCQkJZnByaW50ZihzdGRlcnIsIiVzOuODleOCo+ODvOODq+ODieaMh+WumuOBr+aVtOaVsFxuIiwgcHJvZyk7CgkJCQlleGl0ICgxKTsKCQkJfQoJCX0KCX0KCgkvKuacrOWHpueQhiovCgl3aGlsZSgoYyA9IGdldGMoZnApKSAhPSBFT0YpewoJCQoJCS8q44OA44OW44Or44Kz44O844OG44O844K344On44Oz44Gu5Yem55CG44CAMuWAi+OBvuOBp+OCs+ODs+ODnuOCkuaVsOOBiOOBquOBhOOBk+OBqOOAgCovCgkJaWYgKGMgPT0gJyInICkgKytkcWZsYWc7CgkJCQoJCWlmIChjID09ICcsJykgewoJCQlpZiggZHFmbGFnID09IDApICsrZmxkbm87CgkJCWVsc2UgaWYoIGRxZmxhZyA9PSAyKSB7CgkJCQkrK2ZsZG5vOwoJCQkJZHFmbGFnID0gMDsKCQkJfQoJCX0KCQkvKuOBguOBqOOBr+WFqOmDqOOBruaui+OBo+OBn+W8leaVsOaWh+Wtl+WIl+OBruaVsOWApOOBqGZsZG5v44GM5ZCM44GY5pmC44Gg44GR5Ye65Yqb44GZ44KL44CB44Gn44KI44GE44Gv44GaCgkJ77yR44CA44OV44Kj44O844Or44OJ5pWw44Gu44Kr44Km44Oz44OI44CB5aSJ5pWwZmxkbm5v44CA77yR44Gn5Yid5pyf5YyWCgkJ77yS44CA56ysM+S7pemZjeOBruW8leaVsOOBqOOBruavlOi8gwoJCe+8k+OAgOWQiOiHtOOBl+OBpuOBn+OCieWHuuWKmwoJCe+8lOOAgOOBneOBruOBhuOBiOOBp+aUueihjOOBi+OBqeOBhuOBi+ODgeOCp+ODg+OCr+OAgeaUueihjOOBruaZguOAgWZsZG5v44KS5pu05paw44GX44CB5pS56KGM44KS5Ye65Yqb44GZ44KLCgkJKi8KCQlmb3IgKGhpa2lubyA9IDI7IGhpa2lubyA8IGFyZ2M7IGhpa2lubysrKQoJCQlpZiAoZmxkbm8gPT0gYXRvaShhcmd2W2hpa2lub10pKSBwdXRjKGMsIHN0ZG91dCk7CgkJaWYgKGMgPT0gJ1xuJykgewoJCQlmbGRubyA9IDE7CgkJCXB1dGMoYywgc3Rkb3V0KTsKCQl9Cgl9CglmY2xvc2UoZnApOwoKCWlmIChmZXJyb3Ioc3Rkb3V0KSkgewoJCWZwcmludGYoc3RkZXJyLCAiJXM6IOabuOOBjeWHuuOBl+WkseaVl1xuIiwgcHJvZyk7CgkJLyrjgIBLJlLjgYvjgoky44Gk55uu44Gu44Ko44Op44O85Yem55CG44CB5pu444GN5Ye644GX5aSx5pWXKi8KCQlleGl0ICgyKTsKCX0KCWV4aXQgKDApOwp9Cg==