=================================================================== RCS file: /home/cvs/OpenXM/src/kxx/Attic/oxweave.c,v retrieving revision 1.1 retrieving revision 1.4 diff -u -p -r1.1 -r1.4 --- OpenXM/src/kxx/Attic/oxweave.c 1999/11/16 07:57:37 1.1 +++ OpenXM/src/kxx/Attic/oxweave.c 1999/12/13 14:47:41 1.4 @@ -6,11 +6,20 @@ \maketitle \section{前書き} */ -/* $OpenXM$ */ +/* $OpenXM: OpenXM/src/kxx/oxweave.c,v 1.3 1999/12/13 07:55:23 takayama Exp $ */ #include -#define BSIZE 10 -#define VSIZE 10 + +/* Modify here to change the begin tag and EndComment. Less than 9 characters. +*/ +char *BeginTag0="/*\x026"; /* 0x26 = & */ +char *BeginTag1="//\x026"; /* 0x26 = & */ +char *EndComment0="*/"; +char *EndComment1="\n"; + +#define BSIZE 256 +#define VSIZE 256 static int Debug = 0; +static int Plain = 0; /*&jp \noindent {\tt Buf} は標準出力よりのデータを一時格納しておく領域. {\tt Head} が最初の文字をさし, {\tt Tail} は最後の文字をさす. @@ -22,77 +31,98 @@ int Head = 0; int Tail = 0; char *Tag = NULL; /*&jp \noindent {\tt OutputNoTaggedSegment = 1} - なら コメント記号の外は verbatim を用いて出力. - {\tt --source} オプションでこの変数を1にできる. -*/ + なら コメント記号の外は verbatim を用いて出力. + {\tt --source} オプションでこの変数を1にできる. + */ int OutputNoTaggedSegment = 0; /*&jp \noindent 1 ならタグのついた場所を出力中. */ int OutputtingTaggedSegment = 0; int BeginVerbatim = 0; + /*&jp \section{プログラム本体} */ 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]; int tagc2; char *tagv2[VSIZE]; - char *s = "/*\x026"; /* 0x26 = & */ + int pos; Head = Tail = 0; Buf[0] = ' '; /* initialize */ - /* コメントのおわりの記号. sm1 なら 0xa である. */ - tagc2 = 1; tagv2[0] = "*/"; - /*&jp {\tt tagv[]} にタグのあつまりをいれる. */ - tagc = 0; + /*&jp {\tt tagv[]} にタグのあつまりをいれる. + {\tt tagv2[]} に対応するタグのおわりの記号をいれる. + */ + tagc = tagc2 = 0; if (argc <= 1 || argc >= VSIZE) { usage(); exit(); }else{ for (i=1; i< argc ; i++) { if (strcmp(argv[i],"--source") == 0) { - OutputNoTaggedSegment = 1; - }else{ - tagv[tagc] = (char *) malloc(sizeof(char)*(strlen(argv[i])+4)); - strcpy(tagv[tagc],s); - strcat(tagv[tagc],argv[i]); - tagc++; + OutputNoTaggedSegment = 1; + }else if (strcmp(argv[i],"--plain") == 0) { + Plain = 1; OutputNoTaggedSegment = 1; + } else{ + 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; + /* コメントのおわりの記号. */ + tagc2++; + tagc++; + + tagv[tagc] = (char *) malloc(sizeof(char)*(strlen(argv[i])+10)); + tagv2[tagc2] = (char *) malloc(sizeof(char)*10); + strcpy(tagv[tagc],BeginTag1); + strcat(tagv[tagc],argv[i]); + tagv2[tagc] = EndComment1; + tagc2++; + tagc++; } } } /*&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 */ - findNextTag(tagc,tagv,tagc2,tagv2); - /* We are int the state 1 */ - findEndTag(tagc2,tagv2); + /* 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,"oxweave [--plain] [--source] [key1 key2 ...]\n"); fprintf(stderr,"Example 1: oxweave --source jp t.tex\n"); fprintf(stderr,"Example 2: oxweave jp t.tex\n"); + fprintf(stderr,"Example 2: oxweave --plain t.tex\n"); } #define inc(a) ((a+1) % BSIZE) @@ -136,6 +166,7 @@ int wgetc(int p) { } /*&jp \noindent {\tt findNextTag()} は次の {\tt /\*\&} なるタグをさがす. + ( これは, {\tt BeginTag} の値を変えると変更できる.) {\tt OutputNoTaggedSegment} が 1 ならデータをそのままながす. 無視すべきタグのときは, タグ内部をスキップしたのち {\tt findNextTag} を再帰的に呼ぶ. @@ -143,57 +174,68 @@ int wgetc(int p) { findNextTag(int tagc, char *tagv[],int tagc2,char *tagv2[]) { int i; int c,d; + extern char *BeginTag0; + extern char *BeginTag1; do { for (i=0; i ' ') ; /* We are in the state 2. */ - skipToEndTag(tagc2,tagv2); + skipToEndTag(tagc2,tagv2,0); /* We are in the state 0. */ - findNextTag(tagc,tagv,tagc2,tagv2); - return; + return(findNextTag(tagc,tagv,tagc2,tagv2)); + }else if (wcmp(BeginTag1) == 1) { + wgetc(strlen(BeginTag1)); + while ((d=wgetc(1)) > ' ') ; + /* We are in the state 2. */ + skipToEndTag(tagc2,tagv2,1); + /* We are in the state 0. */ + return(findNextTag(tagc,tagv,tagc2,tagv2)); } /* 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] の値を変えると変更可能. ) */ -findEndTag(int tagc,char *tagv[]) { +findEndTag(int tagc,char *tagv[],int rule) { int i; int c; /* We are in the state 1. */ do { - for (i=0; i