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
);