Home | History | Annotate | Line # | Download | only in asa
asa.c revision 1.14 
      1 /*	$NetBSD: asa.c,v 1.14 2002/05/02 13:59:25 enami 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.14 2002/05/02 13:59:25 enami Exp $");
     36 #endif
     37 
     38 #include <err.h>
     39 #include <stdio.h>
     40 #include <stdlib.h>
     41 
     42 static void asa(FILE *);
     43 int main(int, char *[]);
     44 
     45 int
     46 main (int argc, char *argv[])
     47 {
     48 	FILE *fp;
     49 
     50 	/* skip progname */
     51 	argv++;
     52 
     53 	fp = stdin;
     54 	do {
     55 		if (*argv) {
     56 			if (!(fp = fopen(*argv, "r"))) {
     57 				warn("%s", *argv);
     58 				++argv;
     59 				continue;
     60 			}
     61 			++argv;
     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(FILE *f)
     73 {
     74 	char *buf;
     75 	size_t len;
     76 
     77 	if ((buf = fgetln(f, &len)) != NULL) {
     78 		if (buf[len - 1] == '\n')
     79 			buf[--len] = '\0';
     80 		/* special case the first line */
     81 		switch (buf[0]) {
     82 		case '0':
     83 			putchar('\n');
     84 			break;
     85 		case '1':
     86 			putchar('\f');
     87 			break;
     88 		}
     89 
     90 		if (len > 1 && buf[0] && buf[1]) {
     91 			printf("%.*s", (int)(len - 1), buf + 1);
     92 		}
     93 
     94 		while ((buf = fgetln(f, &len)) != NULL) {
     95 			if (buf[len - 1] == '\n')
     96 				buf[--len] = '\0';
     97 			switch (buf[0]) {
     98 			default:
     99 			case ' ':
    100 				putchar('\n');
    101 				break;
    102 			case '0':
    103 				putchar('\n');
    104 				putchar('\n');
    105 				break;
    106 			case '1':
    107 				putchar('\f');
    108 				break;
    109 			case '+':
    110 				putchar('\r');
    111 				break;
    112 			}
    113 
    114 			if (len > 1 && buf[0] && buf[1]) {
    115 				printf("%.*s", (int)(len - 1), buf + 1);
    116 			}
    117 		}
    118 
    119 		putchar('\n');
    120 	}
    121 }
    122