xref: /netbsd-src/usr.bin/unvis/unvis.c (revision 201fac6e3d8ac6a5503c4810b0378f73101d50c3)
1 /*-
2  * Copyright (c) 1989, 1993
3  *	The Regents of the University of California.  All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. All advertising materials mentioning features or use of this software
14  *    must display the following acknowledgement:
15  *	This product includes software developed by the University of
16  *	California, Berkeley and its contributors.
17  * 4. Neither the name of the University nor the names of its contributors
18  *    may be used to endorse or promote products derived from this software
19  *    without specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31  * SUCH DAMAGE.
32  */
33 
34 #ifndef lint
35 static char copyright[] =
36 "@(#) Copyright (c) 1989, 1993\n\
37 	The Regents of the University of California.  All rights reserved.\n";
38 #endif /* not lint */
39 
40 #ifndef lint
41 #if 0
42 static char sccsid[] = "@(#)unvis.c	8.1 (Berkeley) 6/6/93";
43 #endif
44 static char rcsid[] = "$Id: unvis.c,v 1.3 1994/12/06 07:36:10 jtc Exp $";
45 #endif /* not lint */
46 
47 #include <stdio.h>
48 #include <vis.h>
49 
50 char	*Program;
51 #define usage()	fprintf(stderr, "usage: %s %s\n", Program, USAGE)
52 #define USAGE "[file...]"
53 
54 main(argc, argv)
55 	char *argv[];
56 {
57 	FILE *fp;
58 	extern char *optarg;
59 	extern int optind;
60 	int ch;
61 
62 	Program = argv[0];
63 	while ((ch = getopt(argc, argv, "")) != EOF)
64 		switch((char)ch) {
65 		case '?':
66 		default:
67 			usage();
68 			exit(1);
69 		}
70 	argc -= optind;
71 	argv += optind;
72 
73 	if (*argv)
74 		while (*argv) {
75 			if ((fp=fopen(*argv, "r")) != NULL)
76 				process(fp, *argv);
77 			else
78 				syserror("%s", *argv);
79 			argv++;
80 		}
81 	else
82 		process(stdin, "<stdin>");
83 	exit(0);
84 }
85 
86 process(fp, filename)
87 	FILE *fp;
88 	char *filename;
89 {
90 	register int offset = 0, c, ret;
91 	int state = 0;
92 	char outc;
93 
94 	while ((c = getc(fp)) != EOF) {
95 		offset++;
96 	again:
97 		switch(ret = unvis(&outc, (char)c, &state, 0)) {
98 		case UNVIS_VALID:
99 			putchar(outc);
100 			break;
101 		case UNVIS_VALIDPUSH:
102 			putchar(outc);
103 			goto again;
104 		case UNVIS_SYNBAD:
105 			error("%s: offset: %d: can't decode", filename, offset);
106 			state = 0;
107 			break;
108 		case 0:
109 		case UNVIS_NOCHAR:
110 			break;
111 		default:
112 			error("bad return value (%d), can't happen", ret);
113 			exit(1);
114 		}
115 	}
116 	if (unvis(&outc, (char)0, &state, UNVIS_END) == UNVIS_VALID)
117 		putchar(outc);
118 }
119 
120 #include <varargs.h>
121 
122 error(va_alist)
123 	va_dcl
124 {
125 	char *fmt;
126 	va_list ap;
127 	extern errno;
128 
129 	fprintf(stderr, "%s: ", Program);
130 	va_start(ap);
131 	fmt = va_arg(ap, char *);
132 	(void) vfprintf(stderr, fmt, ap);
133 	va_end(ap);
134 	fprintf(stderr, "\n");
135 }
136 
137 syserror(va_alist)
138 	va_dcl
139 {
140 	char *fmt;
141 	va_list ap;
142 	extern errno;
143 
144 	fprintf(stderr, "%s: ", Program);
145 	va_start(ap);
146 	fmt = va_arg(ap, char *);
147 	(void) vfprintf(stderr, fmt, ap);
148 	va_end(ap);
149 	fprintf(stderr, ": %s\n", strerror(errno));
150 }
151