=================================================================== RCS file: /home/cvs/OpenXM/src/kxx/Attic/oxweave.c,v retrieving revision 1.3 retrieving revision 1.6 diff -u -p -r1.3 -r1.6 --- OpenXM/src/kxx/Attic/oxweave.c 1999/12/13 07:55:23 1.3 +++ OpenXM/src/kxx/Attic/oxweave.c 1999/12/15 03:30:14 1.6 @@ -1,3 +1,11 @@ +/*&eg +\documentclass{article} +\title{On oxweave.c} +\author{} \date{} +\begin{document} +\maketitle +\section{Introduction} +*/ /*&jp \documentclass{jarticle} \title{oxweave のソースコードについての解説} @@ -6,7 +14,7 @@ \maketitle \section{前書き} */ -/* $OpenXM: OpenXM/src/kxx/oxweave.c,v 1.2 1999/11/16 11:48:12 takayama Exp $ */ +/* $OpenXM: OpenXM/src/kxx/oxweave.c,v 1.5 1999/12/14 06:41:03 takayama Exp $ */ #include /* Modify here to change the begin tag and EndComment. Less than 9 characters. @@ -19,7 +27,17 @@ char *EndComment1="\n"; #define BSIZE 256 #define VSIZE 256 static int Debug = 0; +static int Debug2 = 0; +static int Plain = 0; /*&jp \noindent + 再帰 option を on にした場合 ({\tt Recursive = 1}, + {\tt LevelState1} で, 印刷すべき comment のネストのレベルを表す. + {\tt LevelState2} で, 削除すべき comment のネストのレベルを表す. +*/ +static int Recursive = 0; +static int LevelState1 = 0; +static int LevelState2 = 0; +/*&jp \noindent {\tt Buf} は標準出力よりのデータを一時格納しておく領域. {\tt Head} が最初の文字をさし, {\tt Tail} は最後の文字をさす. {\tt Buf} をリング状に使用するので, リングバッファとよぶ @@ -30,9 +48,10 @@ int Head = 0; int Tail = 0; char *Tag = NULL; /*&jp \noindent {\tt OutputNoTaggedSegment = 1} - なら コメント記号の外は verbatim を用いて出力. - {\tt --source} オプションでこの変数を1にできる. -*/ + なら コメント記号の外は verbatim を用いて出力. + {\tt --source} オプションでこの変数を1にできる. + {\tt --plain} では, verbatim を利用せずに生で出力. + */ int OutputNoTaggedSegment = 0; /*&jp \noindent 1 ならタグのついた場所を出力中. */ int OutputtingTaggedSegment = 0; @@ -44,6 +63,7 @@ main(int argc,char *argv[]) { extern char *BeginTag; extern char *EndComment0; extern char *EndComment1; + extern int Plain; int c; int tagc,i; char *tagv[VSIZE]; @@ -52,7 +72,9 @@ main(int argc,char *argv[]) { int pos; Head = Tail = 0; Buf[0] = ' '; /* initialize */ - /*&jp {\tt tagv[]} にタグのあつまりをいれる. */ + /*&jp {\tt tagv[]} にタグのあつまりをいれる. + {\tt tagv2[]} に対応するタグのおわりの記号をいれる. + */ tagc = tagc2 = 0; if (argc <= 1 || argc >= VSIZE) { usage(); @@ -61,14 +83,23 @@ main(int argc,char *argv[]) { for (i=1; i< argc ; i++) { if (strcmp(argv[i],"--source") == 0) { OutputNoTaggedSegment = 1; + }else if (strcmp(argv[i],"--plain") == 0) { + Plain = 1; OutputNoTaggedSegment = 1; + }else if (strcmp(argv[i],"--recursive") == 0) { + Recursive = 1; + }else if (strcmp(argv[i],"--debug") == 0) { + Debug2 = 1; } else{ + if (strcmp(argv[i]," ") == 0) { + argv[i] = ""; + } tagv[tagc] = (char *) malloc(sizeof(char)*(strlen(argv[i])+10)); tagv2[tagc2] = (char *) malloc(sizeof(char)*10); strcpy(tagv[tagc],BeginTag0); strcat(tagv[tagc],argv[i]); tagv2[tagc] = EndComment0; - /* コメントのおわりの記号. sm1 なら 0xa である. */ - tagc2++; + /* コメントのおわりの記号. */ + tagc2++; tagc++; tagv[tagc] = (char *) malloc(sizeof(char)*(strlen(argv[i])+10)); @@ -82,44 +113,43 @@ main(int argc,char *argv[]) { } } /*&jp プログラムは３つの状態を持つ. 状態 0 はタグ付きコメント記号の外. - 状態 1 は指定されたタグの付いたコメントの中. - 状態 2 は指定されていないタグの付いたコメントの中 - (状態２にあるときは印刷されない.) */ + 状態 1 は指定されたタグの付いたコメントの中. + 状態 2 は指定されていないタグの付いたコメントの中 + (状態２にあるときは印刷されない.) */ /* - state 0 -- / * & jp ---> state 1 - if ( BeginVerbatim & OutputNoTaggedSegment ) end-verbatim - <--- * / --- state 1 - if ( OutputNoTaggedSegment ) begin-verbatim + state 0 -- / * & jp ---> state 1 + if ( BeginVerbatim & OutputNoTaggedSegment ) end-verbatim + <--- * / --- state 1 + if ( OutputNoTaggedSegment ) begin-verbatim - state 0 -- / * & unknown ---> state 2 - <--- * / --- state 2 + state 0 -- / * & unknown ---> state 2 + <--- * / --- state 2 - state 0 & OutputNoTaggedSegment ==> putchar() - state 1 ==> putchar() - state 2 ==> skip - */ + state 0 & OutputNoTaggedSegment ==> putchar() + state 1 ==> putchar() + state 2 ==> skip + */ while (notEOF()) { /* We are in the state 0. */ pos = findNextTag(tagc,tagv,tagc2,tagv2); + /* printf(" ===pos=%d=== ",pos); */ /* We are in the state 1. */ findEndTag(tagc2,tagv2,pos); } if (BeginVerbatim) { - printf("\n\\end{verbatim\x07d}\n"); + if (!Plain) printf("\n\\end{verbatim\x07d}\n"); } exit(0); } /*&jp \noindent 次の関数は利用法を表示する. */ usage() { - fprintf(stderr,"oxweave [--source] [key1 key2 ...]\n"); - fprintf(stderr,"Example 1: oxweave --source jp t.tex\n"); - fprintf(stderr,"Example 2: oxweave jp t.tex\n"); +#include "oxweaveUsage.h" } #define inc(a) ((a+1) % BSIZE) /*&jp \noindent {\tt wread()} は 標準入力よりのデータを読めるだけ -リングバッファ {\tt Buf] へ読み込む.*/ +リングバッファ {\tt Buf} へ読み込む.*/ wread() { int c,i; static int eof = 0; @@ -157,8 +187,8 @@ int wgetc(int p) { return(c); } -/*&jp \noindent {\tt findNextTag()} は次の {\tt /\*\&} なるタグをさがす. - ( これは, {\tt BeginTag} の値を変えると変更できる.) +/*&jp \noindent {\tt findNextTag()} は次の {\tt / *\&} なるタグをさがす. + ( これは, {\tt BeginTag0} の値を変えると変更できる.) {\tt OutputNoTaggedSegment} が 1 ならデータをそのままながす. 無視すべきタグのときは, タグ内部をスキップしたのち {\tt findNextTag} を再帰的に呼ぶ. @@ -172,18 +202,20 @@ findNextTag(int tagc, char *tagv[],int tagc2,char *tag for (i=0; i ' ') ; /* We are in the state 2. */ @@ -191,6 +223,7 @@ findNextTag(int tagc, char *tagv[],int tagc2,char *tag /* We are in the state 0. */ return(findNextTag(tagc,tagv,tagc2,tagv2)); }else if (wcmp(BeginTag1) == 1) { + LevelState2++; wgetc(strlen(BeginTag1)); while ((d=wgetc(1)) > ' ') ; /* We are in the state 2. */ @@ -201,17 +234,18 @@ findNextTag(int tagc, char *tagv[],int tagc2,char *tag /* We are in the state 0 */ c = wgetc(1); if (OutputNoTaggedSegment) { - putchar(c); + if (c != EOF) putchar(c); } }while( c!= EOF); if (BeginVerbatim == 1) { - printf("\n\\quad\n\\end{verbatim\x07d}\n"); + if (!Plain) printf("\n\\quad\n\\end{verbatim\x07d}\n"); } exit(0); } -/*&jp \noindent {\tt findEndTag()} は次の {\tt \*\/} なるタグをさがす. - ( これは, EndComment[01] の値を変えると変更可能. ) +/*&jp \noindent {\tt findEndTag()} は次の {\tt * /} なるタグをさがす. + ( これは, EndComment0 の値を変えると変更可能. ) + {\tt / /} で始まる場合は, 0xa がおわり. */ findEndTag(int tagc,char *tagv[],int rule) { int i; @@ -220,15 +254,28 @@ findEndTag(int tagc,char *tagv[],int rule) { do { i = rule; if (wcmp(tagv[i]) == 0) { - wgetc(strlen(tagv[i])); - OutputtingTaggedSegment = 0; - if (OutputNoTaggedSegment) { - printf("\n{\\footnotesize \\begin{verbatim}\n"); - BeginVerbatim = 1; + LevelState1--; + if (Debug2) printf("[LevelState1=%d by end of comment in the state 1.]\n",LevelState1); + if (LevelState1 > 0 && Recursive) { + wgetc(strlen(tagv[i])); + printf("%s",tagv[i]); + return(findEndTag(tagc,tagv,rule)); + }else{ + wgetc(strlen(tagv[i])); + if (strcmp(tagv[i],"\n")==0) putchar('\n'); + OutputtingTaggedSegment = 0; + if (OutputNoTaggedSegment) { + if (!Plain) printf("\n{\\footnotesize \\begin{verbatim}\n"); + BeginVerbatim = 1; + } + return; /* Our state is 0. */ } - return; /* Our state is 0. */ } /* Our state is 1. */ + if (wcmp("/*") >= 0 ) { + LevelState1++; + if (Debug2) printf("[LevelState1++=%d by / * in state 1.]\n",LevelState1); + } c = wgetc(1); putchar(c); }while( c!= EOF); @@ -245,46 +292,48 @@ skipToEndTag(int tagc,char *tagv[],int rule) { do { if (rule == 0) { if (wcmp(EndComment0) == 0) { - wgetc(strlen(EndComment0)); - return; /* our state is 0. */ + LevelState2--; + if (LevelState2 > 0 && Recursive) { + wgetc(strlen(EndComment0)); + return(skipToEndTag(tagc,tagv,rule)); + }else{ + wgetc(strlen(EndComment0)); + return; /* our state is 0. */ + } } }else if (rule == 1) { if (wcmp(EndComment1) == 0) { - wgetc(strlen(EndComment1)); - return; /* our state is 0. */ + LevelState2--; + if (LevelState2 > 0 && Recursive) { + wgetc(strlen(EndComment0)); + return(skipToEndTag(tagc,tagv,rule)); + }else{ + wgetc(strlen(EndComment1)); + return; /* our state is 0. */ + } } }else{ for (i=0; i 0 && Recursive) { + wgetc(strlen(EndComment0)); + return(skipToEndTag(tagc,tagv,rule)); + }else{ + wgetc(strlen(tagv[i])); + return; /* our state is 0. */ + } } } } /* our state is 2. */ + if (wcmp("/*") >= 0) LevelState2++; c = wgetc(1); }while( c!= EOF); fprintf(stderr,"findEndTag: unexpected EOF.\n"); irregularExit(); } -skipToEndTag_old(int tagc,char *tagv[]) { - int i; - int c; - /* our state is 2. */ - do { - for (i=0; i