1 /* OPENBSD ORIGINAL: lib/libc/gen/vis.c */
4 * Copyright (c) 1989, 1993
5 * The Regents of the University of California. All rights reserved.
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
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. Neither the name of the University nor the names of its contributors
16 * may be used to endorse or promote products derived from this software
17 * without specific prior written permission.
19 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 #if !defined(HAVE_STRNVIS)
34 #if defined(LIBC_SCCS) && !defined(lint)
35 static char rcsid[] = "$OpenBSD: vis.c,v 1.12 2003/06/02 20:18:35 millert Exp $";
36 #endif /* LIBC_SCCS and not lint */
43 #define isoctal(c) (((u_char)(c)) >= '0' && ((u_char)(c)) <= '7')
44 #define isvisible(c) (((u_int)(c) <= UCHAR_MAX && isascii((u_char)(c)) && \
45 isgraph((u_char)(c))) || \
46 ((flag & VIS_SP) == 0 && (c) == ' ') || \
47 ((flag & VIS_TAB) == 0 && (c) == '\t') || \
48 ((flag & VIS_NL) == 0 && (c) == '\n') || \
49 ((flag & VIS_SAFE) && ((c) == '\b' || \
50 (c) == '\007' || (c) == '\r' || \
51 isgraph((u_char)(c)))))
54 * vis - visually encode characters
57 vis(dst, c, flag, nextc)
64 if (c == '\\' && (flag & VIS_NOSLASH) == 0)
70 if (flag & VIS_CSTYLE) {
107 if (isoctal(nextc)) {
114 if (((c & 0177) == ' ') || (flag & VIS_OCTAL)) {
116 *dst++ = ((u_char)c >> 6 & 07) + '0';
117 *dst++ = ((u_char)c >> 3 & 07) + '0';
118 *dst++ = ((u_char)c & 07) + '0';
121 if ((flag & VIS_NOSLASH) == 0)
143 * strvis, strnvis, strvisx - visually encode characters from src into dst
145 * Dst must be 4 times the size of src to account for possible
146 * expansion. The length of dst, not including the trailing NULL,
149 * Strnvis will write no more than siz-1 bytes (and will NULL terminate).
150 * The number of bytes needed to fully encode the string is returned.
152 * Strvisx encodes exactly len bytes from src into dst.
153 * This is useful for encoding a block of data.
156 strvis(dst, src, flag)
158 register const char *src;
164 for (start = dst; (c = *src);)
165 dst = vis(dst, c, flag, *++src);
167 return (dst - start);
171 strnvis(dst, src, siz, flag)
183 for (start = dst, end = start + siz - 1; (c = *src) && dst < end; ) {
187 if (c == '\\' && (flag & VIS_NOSLASH) == 0) {
188 /* need space for the extra '\\' */
199 i = vis(tbuf, c, flag, *++src) - tbuf;
200 if (dst + i <= end) {
201 memcpy(dst, tbuf, i);
212 /* adjust return value for truncation */
214 dst += vis(tbuf, c, flag, *++src) - tbuf;
216 return (dst - start);
220 strvisx(dst, src, len, flag)
222 register const char *src;
229 for (start = dst; len > 1; len--) {
231 dst = vis(dst, c, flag, *++src);
234 dst = vis(dst, *src, flag, '\0');
236 return (dst - start);