
#include <stdlib.h>
#include <stdio.h>
#include "cvtpar.h"
#include "prsf2.h"

char fin[300], fon[300];

main(argc, argv)
   int   argc;
   char   **argv;
{
   register int c;
   FILE *fi, *fo;
   int parerr = 0;
   long rcnt = 0;
   long ccnt = 0;

   parsefiles(argc, argv, "bin", "txt", 0);
   if ((fi = fopen(fin, "rb")) == NULL)
   {
      perror(fin);
      exit(1);
   }
   if ((fo = fopen(fon, "w")) == NULL)
   {
      perror(fon);
      exit(1);
   }
   while ( (c = fgetc(fi)) != EOF )
   {
      if (!parerr && (c & 077) != 017 && oddpar[c & 077] != (c & 0177))
      {
         parerr = 1;
         fprintf(stderr, "Parity error in %s\n", fin);
      }
      if (c == 0200)
         break;
      if ((c & 0200) && (rcnt || ccnt))
      {
         fputc('|', fo);
         fputc('\n', fo);
         rcnt++;
      }
      c &= 077;
      if (c == 017)
         c = '~';
      else
         c += ' ';
      fputc(c, fo);
      ccnt++;
   }
   fputc('|', fo);
   fputc('\n', fo);
   rcnt++;
   printf("%ld records, %ld characters\n", rcnt, ccnt);
}
