home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / unix / volume4 / se / part4 / scriptse.c < prev    next >
Encoding:
C/C++ Source or Header  |  1986-11-30  |  619 b   |  44 lines

  1. /*
  2. ** scriptse.c
  3. **
  4. ** turn input into a form se
  5. ** can use as a script.
  6. **
  7. ** This is very quick-and-dirty, not checking
  8. ** for any of se's control characters.
  9. */
  10.  
  11. #include <stdio.h>
  12.  
  13. main (argc, argv)
  14. int argc;
  15. char **argv;
  16. {
  17.     register int c;
  18.     register int dflag = 0;
  19.  
  20.     if (argc > 1)
  21.         if (strcmp (argv[1], "-d") == 0)
  22.             dflag = 1;
  23.         else
  24.         {
  25.             fprintf (stderr, "usage: %s [-d] < file > newfile\n",
  26.                 argv[0]);
  27.             exit (1);
  28.         }
  29.  
  30.     while ((c = getchar()) != EOF)
  31.     {
  32.         if (c != '\n')        /* most frequent case */
  33.             putchar (c);
  34.         else
  35.         {
  36.             putchar ('\r');
  37.             if (! dflag)
  38.                 putchar ('\177');
  39.         }
  40.     }
  41.     
  42.     exit (0);
  43. }
  44.