blob: 94283a0779d24678b0502eebee482d857e23877a [file] [log] [blame]
Damien Miller874d77b2000-10-14 16:23:11 +11001/*-
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#if defined(LIBC_SCCS) && !defined(lint)
35static char rcsid[] = "$OpenBSD: vis.c,v 1.5 2000/07/19 15:25:13 deraadt Exp $";
36#endif /* LIBC_SCCS and not lint */
37
38#ifndef HAVE_VIS
39
40#include "includes.h"
41
42#define isoctal(c) (((u_char)(c)) >= '0' && ((u_char)(c)) <= '7')
43
44/*
45 * vis - visually encode characters
46 */
47char *vis(char *dst, int c, int flag, int nextc)
48{
49 if (((u_int)c <= UCHAR_MAX && isascii((u_char)c) &&
50 isgraph((u_char)c)) ||
51 ((flag & VIS_SP) == 0 && c == ' ') ||
52 ((flag & VIS_TAB) == 0 && c == '\t') ||
53 ((flag & VIS_NL) == 0 && c == '\n') ||
54 ((flag & VIS_SAFE) && (c == '\b' || c == '\007' || c == '\r'))) {
55 *dst++ = c;
56 if (c == '\\' && (flag & VIS_NOSLASH) == 0)
57 *dst++ = '\\';
58 *dst = '\0';
59 return (dst);
60 }
61
62 if (flag & VIS_CSTYLE) {
63 switch(c) {
64 case '\n':
65 *dst++ = '\\';
66 *dst++ = 'n';
67 goto done;
68 case '\r':
69 *dst++ = '\\';
70 *dst++ = 'r';
71 goto done;
72 case '\b':
73 *dst++ = '\\';
74 *dst++ = 'b';
75 goto done;
76#ifdef __STDC__
77 case '\a':
78#else
79 case '\007':
80#endif
81 *dst++ = '\\';
82 *dst++ = 'a';
83 goto done;
84 case '\v':
85 *dst++ = '\\';
86 *dst++ = 'v';
87 goto done;
88 case '\t':
89 *dst++ = '\\';
90 *dst++ = 't';
91 goto done;
92 case '\f':
93 *dst++ = '\\';
94 *dst++ = 'f';
95 goto done;
96 case ' ':
97 *dst++ = '\\';
98 *dst++ = 's';
99 goto done;
100 case '\0':
101 *dst++ = '\\';
102 *dst++ = '0';
103 if (isoctal(nextc)) {
104 *dst++ = '0';
105 *dst++ = '0';
106 }
107 goto done;
108 }
109 }
110 if (((c & 0177) == ' ') || (flag & VIS_OCTAL)) {
111 *dst++ = '\\';
112 *dst++ = ((u_char)c >> 6 & 07) + '0';
113 *dst++ = ((u_char)c >> 3 & 07) + '0';
114 *dst++ = ((u_char)c & 07) + '0';
115 goto done;
116 }
117 if ((flag & VIS_NOSLASH) == 0)
118 *dst++ = '\\';
119 if (c & 0200) {
120 c &= 0177;
121 *dst++ = 'M';
122 }
123 if (iscntrl(c)) {
124 *dst++ = '^';
125 if (c == 0177)
126 *dst++ = '?';
127 else
128 *dst++ = c + '@';
129 } else {
130 *dst++ = '-';
131 *dst++ = c;
132 }
133done:
134 *dst = '\0';
135 return (dst);
136}
137#endif /* HAVE_VIS */