GCC Code Coverage Report
Directory: ./ Exec Total Coverage
File: lib/libcurses/tinfo/comp_expand.c Lines: 0 81 0.0 %
Date: 2017-11-07 Branches: 0 95 0.0 %

Line Branch Exec Source
1
/* $OpenBSD: comp_expand.c,v 1.7 2010/01/12 23:22:06 nicm Exp $ */
2
3
/****************************************************************************
4
 * Copyright (c) 1998-2007,2008 Free Software Foundation, Inc.              *
5
 *                                                                          *
6
 * Permission is hereby granted, free of charge, to any person obtaining a  *
7
 * copy of this software and associated documentation files (the            *
8
 * "Software"), to deal in the Software without restriction, including      *
9
 * without limitation the rights to use, copy, modify, merge, publish,      *
10
 * distribute, distribute with modifications, sublicense, and/or sell       *
11
 * copies of the Software, and to permit persons to whom the Software is    *
12
 * furnished to do so, subject to the following conditions:                 *
13
 *                                                                          *
14
 * The above copyright notice and this permission notice shall be included  *
15
 * in all copies or substantial portions of the Software.                   *
16
 *                                                                          *
17
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS  *
18
 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF               *
19
 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.   *
20
 * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,   *
21
 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR    *
22
 * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR    *
23
 * THE USE OR OTHER DEALINGS IN THE SOFTWARE.                               *
24
 *                                                                          *
25
 * Except as contained in this notice, the name(s) of the above copyright   *
26
 * holders shall not be used in advertising or otherwise to promote the     *
27
 * sale, use or other dealings in this Software without prior written       *
28
 * authorization.                                                           *
29
 ****************************************************************************/
30
31
/****************************************************************************
32
 *  Author: Thomas E. Dickey <dickey@clark.net> 1998                        *
33
 ****************************************************************************/
34
35
#include <curses.priv.h>
36
37
#include <ctype.h>
38
#include <tic.h>
39
40
MODULE_ID("$Id: comp_expand.c,v 1.7 2010/01/12 23:22:06 nicm Exp $")
41
42
static int
43
trailing_spaces(const char *src)
44
{
45
    while (*src == ' ')
46
	src++;
47
    return *src == 0;
48
}
49
50
/* this deals with differences over whether 0x7f and 0x80..0x9f are controls */
51
#define REALCTL(s) (UChar(*(s)) < 127 && iscntrl(UChar(*(s))))
52
#define REALPRINT(s) (UChar(*(s)) < 127 && isprint(UChar(*(s))))
53
54
NCURSES_EXPORT(char *)
55
_nc_tic_expand(const char *srcp, bool tic_format, int numbers)
56
{
57
    static char *buffer;
58
    static size_t length;
59
60
    int bufp;
61
    const char *str = VALID_STRING(srcp) ? srcp : "\0\0";
62
    bool islong = (strlen(str) > 3);
63
    size_t need = (2 + strlen(str)) * 4;
64
    int ch;
65
66
#if NO_LEAKS
67
    if (srcp == 0) {
68
	if (buffer != 0) {
69
	    FreeAndNull(buffer);
70
	    length = 0;
71
	}
72
	return 0;
73
    }
74
#endif
75
    if (buffer == 0 || need > length) {
76
	if ((buffer = typeRealloc(char, length = need, buffer)) == 0)
77
	      return 0;
78
    }
79
80
    bufp = 0;
81
    while ((ch = UChar(*str)) != 0) {
82
	if (ch == '%' && REALPRINT(str + 1)) {
83
	    buffer[bufp++] = *str++;
84
	    /*
85
	     * Though the character literals are more compact, most
86
	     * terminal descriptions use numbers and are not easy
87
	     * to read in character-literal form.
88
	     */
89
	    switch (numbers) {
90
	    case -1:
91
		if (str[0] == S_QUOTE
92
		    && str[1] != '\\'
93
		    && REALPRINT(str + 1)
94
		    && str[2] == S_QUOTE) {
95
		    snprintf(buffer + bufp, length - bufp, "{%d}", str[1]);
96
		    bufp += strlen(buffer + bufp);
97
		    str += 2;
98
		} else {
99
		    buffer[bufp++] = *str;
100
		}
101
		break;
102
		/*
103
		 * If we have a "%{number}", try to translate it into
104
		 * a "%'char'" form, since that will run a little faster
105
		 * when we're interpreting it.  Also, having one form
106
		 * for the constant makes it simpler to compare terminal
107
		 * descriptions.
108
		 */
109
	    case 1:
110
		if (str[0] == L_BRACE
111
		    && isdigit(UChar(str[1]))) {
112
		    char *dst = 0;
113
		    long value = strtol(str + 1, &dst, 0);
114
		    if (dst != 0
115
			&& *dst == R_BRACE
116
			&& value < 127
117
			&& value != '\\'	/* FIXME */
118
			&& isprint((int) value)) {
119
			ch = (int) value;
120
			buffer[bufp++] = S_QUOTE;
121
			if (ch == '\\'
122
			    || ch == S_QUOTE)
123
			    buffer[bufp++] = '\\';
124
			buffer[bufp++] = (char) ch;
125
			buffer[bufp++] = S_QUOTE;
126
			str = dst;
127
		    } else {
128
			buffer[bufp++] = *str;
129
		    }
130
		} else {
131
		    buffer[bufp++] = *str;
132
		}
133
		break;
134
	    default:
135
		buffer[bufp++] = *str;
136
		break;
137
	    }
138
	} else if (ch == 128) {
139
	    buffer[bufp++] = '\\';
140
	    buffer[bufp++] = '0';
141
	} else if (ch == '\033') {
142
	    buffer[bufp++] = '\\';
143
	    buffer[bufp++] = 'E';
144
	} else if (ch == '\\' && tic_format && (str == srcp || str[-1] != '^')) {
145
	    buffer[bufp++] = '\\';
146
	    buffer[bufp++] = '\\';
147
	} else if (ch == ' ' && tic_format && (str == srcp ||
148
					       trailing_spaces(str))) {
149
	    buffer[bufp++] = '\\';
150
	    buffer[bufp++] = 's';
151
	} else if ((ch == ',' || ch == ':' || ch == '^') && tic_format) {
152
	    buffer[bufp++] = '\\';
153
	    buffer[bufp++] = (char) ch;
154
	} else if (REALPRINT(str)
155
		   && (ch != ','
156
		       && ch != ':'
157
		       && !(ch == '!' && !tic_format)
158
		       && ch != '^'))
159
	    buffer[bufp++] = (char) ch;
160
#if 0				/* FIXME: this would be more readable (in fact the whole 'islong' logic should be removed) */
161
	else if (ch == '\b') {
162
	    buffer[bufp++] = '\\';
163
	    buffer[bufp++] = 'b';
164
	} else if (ch == '\f') {
165
	    buffer[bufp++] = '\\';
166
	    buffer[bufp++] = 'f';
167
	} else if (ch == '\t' && islong) {
168
	    buffer[bufp++] = '\\';
169
	    buffer[bufp++] = 't';
170
	}
171
#endif
172
	else if (ch == '\r' && (islong || (strlen(srcp) > 2 && str[1] == '\0'))) {
173
	    buffer[bufp++] = '\\';
174
	    buffer[bufp++] = 'r';
175
	} else if (ch == '\n' && islong) {
176
	    buffer[bufp++] = '\\';
177
	    buffer[bufp++] = 'n';
178
	}
179
#define UnCtl(c) ((c) + '@')
180
	else if (REALCTL(str) && ch != '\\'
181
		 && (!islong || isdigit(UChar(str[1])))) {
182
	    (void) snprintf(buffer + bufp, length - bufp, "^%c", UnCtl(ch));
183
	    bufp += strlen(buffer + bufp);
184
	} else {
185
	    (void) snprintf(buffer + bufp, length - bufp, "\\%03o", ch);
186
	    bufp += strlen(buffer + bufp);
187
	}
188
189
	str++;
190
    }
191
192
    buffer[bufp] = '\0';
193
    return (buffer);
194
}