]>
Commit | Line | Data |
---|---|---|
6fb737be JH |
1 | #include "cache.h" |
2 | #include "quote.h" | |
3 | ||
4 | /* Help to copy the thing properly quoted for the shell safety. | |
77d604c3 PA |
5 | * any single quote is replaced with '\'', any exclamation point |
6 | * is replaced with '\!', and the whole thing is enclosed in a | |
6fb737be JH |
7 | * |
8 | * E.g. | |
9 | * original sq_quote result | |
10 | * name ==> name ==> 'name' | |
11 | * a b ==> a b ==> 'a b' | |
12 | * a'b ==> a'\''b ==> 'a'\''b' | |
77d604c3 | 13 | * a!b ==> a'\!'b ==> 'a'\!'b' |
6fb737be | 14 | */ |
4f6fbcdc | 15 | #undef EMIT |
77d604c3 | 16 | #define EMIT(x) ( (++len < n) && (*bp++ = (x)) ) |
6fb737be | 17 | |
35eb2d36 LT |
18 | static inline int need_bs_quote(char c) |
19 | { | |
20 | return (c == '\'' || c == '!'); | |
21 | } | |
22 | ||
77d604c3 PA |
23 | size_t sq_quote_buf(char *dst, size_t n, const char *src) |
24 | { | |
25 | char c; | |
26 | char *bp = dst; | |
27 | size_t len = 0; | |
6fb737be | 28 | |
77d604c3 | 29 | EMIT('\''); |
6fb737be | 30 | while ((c = *src++)) { |
35eb2d36 | 31 | if (need_bs_quote(c)) { |
77d604c3 PA |
32 | EMIT('\''); |
33 | EMIT('\\'); | |
34 | EMIT(c); | |
35 | EMIT('\''); | |
36 | } else { | |
37 | EMIT(c); | |
6fb737be JH |
38 | } |
39 | } | |
77d604c3 PA |
40 | EMIT('\''); |
41 | ||
42 | if ( n ) | |
43 | *bp = 0; | |
44 | ||
45 | return len; | |
46 | } | |
47 | ||
48 | char *sq_quote(const char *src) | |
49 | { | |
50 | char *buf; | |
51 | size_t cnt; | |
52 | ||
53 | cnt = sq_quote_buf(NULL, 0, src) + 1; | |
54 | buf = xmalloc(cnt); | |
55 | sq_quote_buf(buf, cnt, src); | |
56 | ||
6fb737be JH |
57 | return buf; |
58 | } | |
59 | ||
35eb2d36 LT |
60 | char *sq_dequote(char *arg) |
61 | { | |
62 | char *dst = arg; | |
63 | char *src = arg; | |
64 | char c; | |
65 | ||
66 | if (*src != '\'') | |
67 | return NULL; | |
68 | for (;;) { | |
69 | c = *++src; | |
70 | if (!c) | |
71 | return NULL; | |
72 | if (c != '\'') { | |
73 | *dst++ = c; | |
74 | continue; | |
75 | } | |
76 | /* We stepped out of sq */ | |
77 | switch (*++src) { | |
78 | case '\0': | |
79 | *dst = 0; | |
80 | return arg; | |
81 | case '\\': | |
82 | c = *++src; | |
83 | if (need_bs_quote(c) && *++src == '\'') { | |
84 | *dst++ = c; | |
85 | continue; | |
86 | } | |
87 | /* Fallthrough */ | |
88 | default: | |
89 | return NULL; | |
90 | } | |
91 | } | |
92 | } | |
93 | ||
4f6fbcdc JH |
94 | /* |
95 | * C-style name quoting. | |
96 | * | |
97 | * Does one of three things: | |
98 | * | |
99 | * (1) if outbuf and outfp are both NULL, inspect the input name and | |
100 | * counts the number of bytes that are needed to hold c_style | |
101 | * quoted version of name, counting the double quotes around | |
102 | * it but not terminating NUL, and returns it. However, if name | |
103 | * does not need c_style quoting, it returns 0. | |
104 | * | |
105 | * (2) if outbuf is not NULL, it must point at a buffer large enough | |
106 | * to hold the c_style quoted version of name, enclosing double | |
107 | * quotes, and terminating NUL. Fills outbuf with c_style quoted | |
108 | * version of name enclosed in double-quote pair. Return value | |
109 | * is undefined. | |
110 | * | |
111 | * (3) if outfp is not NULL, outputs c_style quoted version of name, | |
112 | * but not enclosed in double-quote pair. Return value is undefined. | |
113 | */ | |
114 | ||
9ef2b3cb JH |
115 | static int quote_c_style_counted(const char *name, int namelen, |
116 | char *outbuf, FILE *outfp, int no_dq) | |
4f6fbcdc JH |
117 | { |
118 | #undef EMIT | |
119 | #define EMIT(c) \ | |
120 | (outbuf ? (*outbuf++ = (c)) : outfp ? fputc(c, outfp) : (count++)) | |
121 | ||
122 | #define EMITQ() EMIT('\\') | |
123 | ||
124 | const char *sp; | |
125 | int ch, count = 0, needquote = 0; | |
126 | ||
127 | if (!no_dq) | |
128 | EMIT('"'); | |
50e7b067 PR |
129 | for (sp = name; sp < name + namelen; sp++) { |
130 | ch = *sp; | |
131 | if (!ch) | |
132 | break; | |
28fba290 JH |
133 | if ((ch < ' ') || (ch == '"') || (ch == '\\') || |
134 | (ch == 0177)) { | |
4f6fbcdc JH |
135 | needquote = 1; |
136 | switch (ch) { | |
137 | case '\a': EMITQ(); ch = 'a'; break; | |
138 | case '\b': EMITQ(); ch = 'b'; break; | |
139 | case '\f': EMITQ(); ch = 'f'; break; | |
140 | case '\n': EMITQ(); ch = 'n'; break; | |
141 | case '\r': EMITQ(); ch = 'r'; break; | |
142 | case '\t': EMITQ(); ch = 't'; break; | |
143 | case '\v': EMITQ(); ch = 'v'; break; | |
144 | ||
145 | case '\\': /* fallthru */ | |
146 | case '"': EMITQ(); break; | |
147 | case ' ': | |
148 | break; | |
149 | default: | |
150 | /* octal */ | |
151 | EMITQ(); | |
152 | EMIT(((ch >> 6) & 03) + '0'); | |
153 | EMIT(((ch >> 3) & 07) + '0'); | |
154 | ch = (ch & 07) + '0'; | |
155 | break; | |
156 | } | |
157 | } | |
158 | EMIT(ch); | |
159 | } | |
160 | if (!no_dq) | |
161 | EMIT('"'); | |
162 | if (outbuf) | |
163 | *outbuf = 0; | |
164 | ||
165 | return needquote ? count : 0; | |
166 | } | |
167 | ||
9ef2b3cb JH |
168 | int quote_c_style(const char *name, char *outbuf, FILE *outfp, int no_dq) |
169 | { | |
170 | int cnt = strlen(name); | |
171 | return quote_c_style_counted(name, cnt, outbuf, outfp, no_dq); | |
172 | } | |
173 | ||
4f6fbcdc JH |
174 | /* |
175 | * C-style name unquoting. | |
176 | * | |
177 | * Quoted should point at the opening double quote. Returns | |
178 | * an allocated memory that holds unquoted name, which the caller | |
179 | * should free when done. Updates endp pointer to point at | |
180 | * one past the ending double quote if given. | |
181 | */ | |
182 | ||
183 | char *unquote_c_style(const char *quoted, const char **endp) | |
184 | { | |
185 | const char *sp; | |
186 | char *name = NULL, *outp = NULL; | |
187 | int count = 0, ch, ac; | |
188 | ||
189 | #undef EMIT | |
190 | #define EMIT(c) (outp ? (*outp++ = (c)) : (count++)) | |
191 | ||
192 | if (*quoted++ != '"') | |
193 | return NULL; | |
194 | ||
195 | while (1) { | |
196 | /* first pass counts and allocates, second pass fills */ | |
197 | for (sp = quoted; (ch = *sp++) != '"'; ) { | |
198 | if (ch == '\\') { | |
199 | switch (ch = *sp++) { | |
200 | case 'a': ch = '\a'; break; | |
201 | case 'b': ch = '\b'; break; | |
202 | case 'f': ch = '\f'; break; | |
203 | case 'n': ch = '\n'; break; | |
204 | case 'r': ch = '\r'; break; | |
205 | case 't': ch = '\t'; break; | |
206 | case 'v': ch = '\v'; break; | |
207 | ||
208 | case '\\': case '"': | |
209 | break; /* verbatim */ | |
210 | ||
211 | case '0'...'7': | |
212 | /* octal */ | |
213 | ac = ((ch - '0') << 6); | |
214 | if ((ch = *sp++) < '0' || '7' < ch) | |
215 | return NULL; | |
216 | ac |= ((ch - '0') << 3); | |
217 | if ((ch = *sp++) < '0' || '7' < ch) | |
218 | return NULL; | |
219 | ac |= (ch - '0'); | |
220 | ch = ac; | |
221 | break; | |
222 | default: | |
223 | return NULL; /* malformed */ | |
224 | } | |
225 | } | |
226 | EMIT(ch); | |
227 | } | |
228 | ||
229 | if (name) { | |
230 | *outp = 0; | |
231 | if (endp) | |
232 | *endp = sp; | |
233 | return name; | |
234 | } | |
235 | outp = name = xmalloc(count + 1); | |
236 | } | |
237 | } | |
238 | ||
9ef2b3cb JH |
239 | void write_name_quoted(const char *prefix, int prefix_len, |
240 | const char *name, int quote, FILE *out) | |
4f6fbcdc JH |
241 | { |
242 | int needquote; | |
243 | ||
244 | if (!quote) { | |
245 | no_quote: | |
9ef2b3cb JH |
246 | if (prefix_len) |
247 | fprintf(out, "%.*s", prefix_len, prefix); | |
4f6fbcdc JH |
248 | fputs(name, out); |
249 | return; | |
250 | } | |
251 | ||
252 | needquote = 0; | |
9ef2b3cb JH |
253 | if (prefix_len) |
254 | needquote = quote_c_style_counted(prefix, prefix_len, | |
255 | NULL, NULL, 0); | |
4f6fbcdc JH |
256 | if (!needquote) |
257 | needquote = quote_c_style(name, NULL, NULL, 0); | |
258 | if (needquote) { | |
259 | fputc('"', out); | |
9ef2b3cb JH |
260 | if (prefix_len) |
261 | quote_c_style_counted(prefix, prefix_len, | |
262 | NULL, out, 1); | |
4f6fbcdc JH |
263 | quote_c_style(name, NULL, out, 1); |
264 | fputc('"', out); | |
265 | } | |
266 | else | |
267 | goto no_quote; | |
268 | } |