[BACK]Return to ole.c CVS log [TXT][DIR] Up to [local] / OpenXM / src / kan96xx / Doc
File: [local] / OpenXM / src / kan96xx / Doc / ole.c (download)

Revision 1.2, Thu Mar 9 05:37:22 2000 UTC (24 years, 2 months ago) by takayama
Branch: MAIN
CVS Tags: maekawa-ipv6, R_1_3_1-2, RELEASE_1_3_1_13b, RELEASE_1_2_3_12, RELEASE_1_2_3, RELEASE_1_2_2_KNOPPIX_b, RELEASE_1_2_2_KNOPPIX, RELEASE_1_2_2, RELEASE_1_2_1, RELEASE_1_1_3, RELEASE_1_1_2, KNOPPIX_2006, HEAD, DEB_REL_1_2_3-9
Changes since 1.1: +9 -2 lines 

Added a -q flag (quiet) to ole.c (ole is used for preprocessing documents).

/* $OpenXM: OpenXM/src/kan96xx/Doc/ole.c,v 1.2 2000/03/09 05:37:22 takayama Exp $ */
#include <stdio.h>

main(int argc,char *argv[]) {
  FILE *fp;
  int c;
  char fname[1024];
  int i;
  int Quiet = 0;
  for (i=1; i<argc; i++) {
	if (strcmp(argv[i],"-q") ==0) { Quiet = 1;}
  }
  if (!Quiet) {
	printf("\\def\\at{\\catcode`@=11{@}\\catcode`@=12 } \n");
  }
  while ((c=getchar()) != EOF) {
    if (c != '@') {
       putchar(c);
    }else{
       i = 0;
       while (1) {
         c = getchar();
	 if (c <= ' ') {
	    fname[i]='\0';
	    break;
	 }
	 fname[i++] = c;
       }
       fp = fopen(fname,"r");
       if (fp == (FILE *)NULL) {
          fprintf(stderr,"I cannot find the file %s.\n",fname);
       }else{
          printf("\\begin{verbatim}\n");
          while ((c =fgetc(fp)) != EOF) putchar(c);
          printf("\n\\end{verbatim}\n");
       }
    }
  }
  exit(0);
}