2.9BSD - /usr/src/games/fortune/unstr.c

   1: # include   <stdio.h>
   2: # include   "strfile.h"
   3: 
   4: /*
   5:  *	This program un-does what "strfile" makes, thereby obtaining the
   6:  * original file again.  This can be invoked with the name of the output
   7:  * file, the input file, or both. If invoked with only a single argument
   8:  * ending in ".dat", it is pressumed to be the input file and the output
   9:  * file will be the same stripped of the ".dat".  If the single argument
  10:  * doesn't end in ".dat", then it is presumed to be the output file, and
  11:  * the input file is that name prepended by a ".dat".  If both are given
  12:  * they are treated literally as the input and output files.
  13:  *
  14:  *	Ken Arnold		Aug 13, 1978
  15:  */
  16: 
  17: # define    reg register
  18: 
  19: # define    DELIM_CH    '-'
  20: 
  21: char    infile[50],         /* name of input file		*/
  22:     outfile[50],            /* name of output file		*/
  23:     *rindex();
  24: 
  25: long    *calloc();
  26: 
  27: main(ac, av)
  28: int ac;
  29: char    *av[]; {
  30: 
  31:     reg char    c;
  32:     reg FILE    *inf, *outf;
  33:     int     nstr, delim;
  34:     long        *seekpts;
  35:     STRFILE     tbl;        /* description table		*/
  36: 
  37:     getargs(ac, av);
  38:     if ((inf = fopen(infile, "r")) == NULL) {
  39:         perror(infile);
  40:         exit(-1);
  41:     }
  42:     fread(&tbl,sizeof tbl,1,inf);
  43:     nstr = tbl.str_numstr;
  44:     if ((seekpts = calloc(sizeof *seekpts, nstr)) == NULL) {
  45:         perror("calloc");
  46:         exit(-1);
  47:     }
  48:     fread(seekpts, (sizeof seekpts[0]), nstr, inf);
  49:     if ((outf = fopen(outfile, "w")) == NULL) {
  50:         perror(outfile);
  51:         exit(-1);
  52:     }
  53:     delim = 0;
  54:     while ((c = getc(inf)) != EOF)
  55:         if (c != '\0')
  56:             putc(c, outf);
  57:         else if (--nstr)
  58:             if (ftell(inf) == tbl.str_delims[delim]) {
  59:                 fputs("%-\n", outf);
  60:                 delim++;
  61:             }
  62:             else
  63:                 fputs("%%\n", outf);
  64: }
  65: getargs(ac, av)
  66: reg int     ac;
  67: reg char    **av; {
  68: 
  69:     reg char    *sp;
  70: 
  71:     if (ac < 2) {
  72:         printf("usage: %s datafile[.dat] [ outfile ]\n",av[0]);
  73:         exit(-1);
  74:     }
  75:     strcpy(infile,av[1]);
  76:     if (ac < 3) {
  77:         strcpy(outfile,infile);
  78:         if ((sp = rindex(av[1])) && strcmp(sp, ".dat") == 0)
  79:             outfile[strlen(outfile) - 4] = '\0';
  80:         else
  81:             strcat(infile, ".dat");
  82:     }
  83:     else
  84:         strcpy(outfile, av[2]);
  85: }

Defined functions

Defined variables

Defined macros