/* $OpenBSD: asa.c,v 1.10 2011/04/30 16:45:22 lum Exp $ */ /* $NetBSD: asa.c,v 1.10 1995/04/21 03:01:41 cgd Exp $ */ /* * Copyright (c) 1993,94 Winning Strategies, Inc. * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed by Winning Strategies, Inc. * 4. The name of the author may not be used to endorse or promote products * derived from this software without specific prior written permission * * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */ #include <err.h> #include <stdio.h> #include <stdlib.h> #include <string.h> #include <unistd.h> void asa(FILE *); __dead void usage(void); int main(int argc, char *argv[]) { int ch, exval = 0; FILE *fp; while ((ch = getopt(argc, argv, "")) != -1) { switch(ch) { default: usage(); /* NOTREACHED */ } } argc -= optind; argv += optind; if (!argc) asa(stdin); else for (; *argv != NULL; argv++) { if ((fp = fopen(*argv, "r")) == NULL) { warn("%s", *argv); exval = 1; continue; } asa(fp); fclose(fp); } exit(exval); } void asa(FILE *f) { char *buf, *lbuf = NULL; size_t len; int firstline = 1; while ((buf = fgetln(f, &len)) != NULL) { if (buf[len - 1] == '\n') buf[len - 1] = '\0'; else { if ((lbuf = malloc(len + 1)) == NULL) err(1, NULL); memcpy(lbuf, buf, len); lbuf[len] = '\0'; buf = lbuf; } /* special case the first line */ if (firstline) { firstline = 0; switch (buf[0]) { case '0': putchar ('\n'); break; case '1': putchar ('\f'); break; } } else { switch (buf[0]) { default: case ' ': putchar ('\n'); break; case '0': putchar ('\n'); putchar ('\n'); break; case '1': putchar ('\f'); break; case '+': putchar ('\r'); break; } } if (buf[0] && buf[1]) { fputs (&buf[1], stdout); } } free(lbuf); if (!firstline) putchar ('\n'); } __dead void usage(void) { extern char *__progname; fprintf(stderr, "usage: %s [file ...]\n", __progname); exit(1); }