Home | History | Annotate | Line # | Download | only in asa
asa.c revision 1.11 
      1 /*	$NetBSD: asa.c,v 1.11 1997/09/20 14:55:00 lukem Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1993,94 Winning Strategies, Inc.
      5  * All rights reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     12  * 2. Redistributions in binary form must reproduce the above copyright
     13  *    notice, this list of conditions and the following disclaimer in the
     14  *    documentation and/or other materials provided with the distribution.
     15  * 3. All advertising materials mentioning features or use of this software
     16  *    must display the following acknowledgement:
     17  *      This product includes software developed by Winning Strategies, Inc.
     18  * 4. The name of the author may not be used to endorse or promote products
     19  *    derived from this software without specific prior written permission
     20  *
     21  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     22  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     23  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     24  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     25  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     26  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     27  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     28  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     29  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     30  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     31  */
     32 
     33 #include <sys/cdefs.h>
     34 #ifndef lint
     35 __RCSID("$NetBSD: asa.c,v 1.11 1997/09/20 14:55:00 lukem Exp $");
     36 #endif
     37 
     38 #include <stdio.h>
     39 #include <stdlib.h>
     40 #include <err.h>
     41 
     42 static void asa __P((FILE *));
     43 int main __P((int, char *[]));
     44 
     45 int
     46 main (argc, argv)
     47 	int argc;
     48 	char **argv;
     49 {
     50 	FILE *fp;
     51 
     52 	/* skip progname */
     53 	argv++;
     54 
     55         fp = stdin;
     56         do {
     57                 if (*argv) {
     58                         if (!(fp = fopen(*argv, "r"))) {
     59 				warn ("%s", *argv);
     60 				continue;
     61                         }
     62                 }
     63                 asa (fp);
     64                 if (fp != stdin)
     65                         (void)fclose(fp);
     66         } while (*argv++);
     67 
     68 	exit (0);
     69 }
     70 
     71 static void
     72 asa(f)
     73 	FILE *f;
     74 {
     75 	char *buf;
     76 	size_t len;
     77 
     78 	if ((buf = fgetln (f, &len)) != NULL) {
     79 		if (buf[len - 1] == '\n')
     80 			buf[--len] = '\0';
     81 		/* special case the first line  */
     82 		switch (buf[0]) {
     83 		case '0':
     84 			putchar ('\n');
     85 			break;
     86 		case '1':
     87 			putchar ('\f');
     88 			break;
     89 		}
     90 
     91 		if (len > 1 && buf[0] && buf[1]) {
     92 			printf("%.*s", (int)(len - 1), buf + 1);
     93 		}
     94 
     95 		while ((buf = fgetln(f, &len)) != NULL) {
     96 			if (buf[len - 1] == '\n')
     97 				buf[--len] = '\0';
     98 			switch (buf[0]) {
     99 			default:
    100 			case ' ':
    101 				putchar ('\n');
    102 				break;
    103 			case '0':
    104 				putchar ('\n');
    105 				putchar ('\n');
    106 				break;
    107 			case '1':
    108 				putchar ('\f');
    109 				break;
    110 			case '+':
    111 				putchar ('\r');
    112 				break;
    113 			}
    114 
    115 			if (len > 1 && buf[0] && buf[1]) {
    116 				printf("%.*s", (int)(len - 1), buf + 1);
    117 			}
    118 		}
    119 
    120 		putchar ('\n');
    121 	}
    122 }
    123