[BACK]Return to ole.c CVS log [TXT][DIR] Up to [local] / OpenXM / src / kan96xx / Doc

Annotation of OpenXM/src/kan96xx/Doc/ole.c, Revision 1.2

1.2     ! takayama    1: /* $OpenXM$ */
1.1       maekawa     2: #include <stdio.h>
                      3:
1.2     ! takayama    4: main(int argc,char *argv[]) {
1.1       maekawa     5:   FILE *fp;
                      6:   int c;
                      7:   char fname[1024];
                      8:   int i;
1.2     ! takayama    9:   int Quiet = 0;
        !            10:   for (i=1; i<argc; i++) {
        !            11:        if (strcmp(argv[i],"-q") ==0) { Quiet = 1;}
        !            12:   }
        !            13:   if (!Quiet) {
        !            14:        printf("\\def\\at{\\catcode`@=11{@}\\catcode`@=12 } \n");
        !            15:   }
1.1       maekawa    16:   while ((c=getchar()) != EOF) {
                     17:     if (c != '@') {
                     18:        putchar(c);
                     19:     }else{
                     20:        i = 0;
                     21:        while (1) {
                     22:          c = getchar();
                     23:         if (c <= ' ') {
                     24:            fname[i]='\0';
                     25:            break;
                     26:         }
                     27:         fname[i++] = c;
                     28:        }
                     29:        fp = fopen(fname,"r");
                     30:        if (fp == (FILE *)NULL) {
                     31:           fprintf(stderr,"I cannot find the file %s.\n",fname);
                     32:        }else{
                     33:           printf("\\begin{verbatim}\n");
                     34:           while ((c =fgetc(fp)) != EOF) putchar(c);
                     35:           printf("\n\\end{verbatim}\n");
                     36:        }
                     37:     }
                     38:   }
                     39:   exit(0);
                     40: }

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>