]>
Commit | Line | Data |
---|---|---|
bb70624e JA |
1 | /* Copyright (C) 1999 Free Software Foundation, Inc. |
2 | ||
3 | This file is part of GNU Bash, the Bourne Again SHell. | |
4 | ||
5 | Bash is free software; you can redistribute it and/or modify it under | |
6 | the terms of the GNU General Public License as published by the Free | |
7 | Software Foundation; either version 2, or (at your option) any later | |
8 | version. | |
9 | ||
10 | Bash is distributed in the hope that it will be useful, but WITHOUT ANY | |
11 | WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
12 | FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License | |
13 | for more details. | |
14 | ||
15 | You should have received a copy of the GNU General Public License along | |
16 | with Bash; see the file COPYING. If not, write to the Free Software | |
17 | Foundation, 59 Temple Place, Suite 330, Boston, MA 02111 USA. */ | |
18 | ||
19 | #include <config.h> | |
20 | ||
21 | #if defined (HAVE_UNISTD_H) | |
22 | # ifdef _MINIX | |
23 | # include <sys/types.h> | |
24 | # endif | |
25 | # include <unistd.h> | |
26 | #endif | |
27 | ||
28 | #include <stdio.h> | |
29 | ||
28ef6c31 | 30 | #include "syntax.h" |
bb70624e JA |
31 | |
32 | extern char *xmalloc (); | |
33 | ||
34 | /* **************************************************************** */ | |
35 | /* */ | |
36 | /* Functions for quoting strings to be re-read as input */ | |
37 | /* */ | |
38 | /* **************************************************************** */ | |
39 | ||
40 | /* Return a new string which is the single-quoted version of STRING. | |
41 | Used by alias and trap, among others. */ | |
42 | char * | |
28ef6c31 | 43 | sh_single_quote (string) |
bb70624e JA |
44 | char *string; |
45 | { | |
46 | register int c; | |
47 | char *result, *r, *s; | |
48 | ||
49 | result = xmalloc (3 + (4 * strlen (string))); | |
50 | r = result; | |
51 | *r++ = '\''; | |
52 | ||
53 | for (s = string; s && (c = *s); s++) | |
54 | { | |
55 | *r++ = c; | |
56 | ||
57 | if (c == '\'') | |
58 | { | |
59 | *r++ = '\\'; /* insert escaped single quote */ | |
60 | *r++ = '\''; | |
61 | *r++ = '\''; /* start new quoted string */ | |
62 | } | |
63 | } | |
64 | ||
65 | *r++ = '\''; | |
66 | *r = '\0'; | |
67 | ||
68 | return (result); | |
69 | } | |
70 | ||
71 | /* Quote STRING using double quotes. Return a new string. */ | |
72 | char * | |
28ef6c31 | 73 | sh_double_quote (string) |
bb70624e JA |
74 | char *string; |
75 | { | |
76 | register int c; | |
77 | char *result, *r, *s; | |
78 | ||
79 | result = xmalloc (3 + (2 * strlen (string))); | |
80 | r = result; | |
81 | *r++ = '"'; | |
82 | ||
83 | for (s = string; s && (c = *s); s++) | |
84 | { | |
28ef6c31 JA |
85 | if (sh_syntaxtab[c] & CBSDQUOTE) |
86 | *r++ = '\\'; | |
87 | ||
88 | *r++ = c; | |
bb70624e JA |
89 | } |
90 | ||
91 | *r++ = '"'; | |
92 | *r = '\0'; | |
93 | ||
94 | return (result); | |
95 | } | |
96 | ||
97 | /* Remove backslashes that are quoting characters that are special between | |
98 | double quotes. Return a new string. */ | |
99 | char * | |
28ef6c31 | 100 | sh_un_double_quote (string) |
bb70624e JA |
101 | char *string; |
102 | { | |
103 | register int c, pass_next; | |
104 | char *result, *r, *s; | |
105 | ||
106 | r = result = xmalloc (strlen (string) + 1); | |
107 | ||
108 | for (pass_next = 0, s = string; s && (c = *s); s++) | |
109 | { | |
110 | if (pass_next) | |
111 | { | |
112 | *r++ = c; | |
113 | pass_next = 0; | |
114 | continue; | |
115 | } | |
28ef6c31 | 116 | if (c == '\\' && (sh_syntaxtab[s[1]] & CBSDQUOTE)) |
bb70624e JA |
117 | { |
118 | pass_next = 1; | |
119 | continue; | |
120 | } | |
121 | *r++ = c; | |
122 | } | |
123 | ||
124 | *r = '\0'; | |
125 | return result; | |
126 | } | |
127 | ||
128 | /* Quote special characters in STRING using backslashes. Return a new | |
129 | string. */ | |
130 | char * | |
28ef6c31 | 131 | sh_backslash_quote (string) |
bb70624e JA |
132 | char *string; |
133 | { | |
134 | int c; | |
135 | char *result, *r, *s; | |
136 | ||
137 | result = xmalloc (2 * strlen (string) + 1); | |
138 | ||
139 | for (r = result, s = string; s && (c = *s); s++) | |
140 | { | |
141 | switch (c) | |
142 | { | |
143 | case ' ': case '\t': case '\n': /* IFS white space */ | |
144 | case '\'': case '"': case '\\': /* quoting chars */ | |
145 | case '|': case '&': case ';': /* shell metacharacters */ | |
146 | case '(': case ')': case '<': case '>': | |
147 | case '!': case '{': case '}': /* reserved words */ | |
148 | case '*': case '[': case '?': case ']': /* globbing chars */ | |
149 | case '^': | |
150 | case '$': case '`': /* expansion chars */ | |
151 | *r++ = '\\'; | |
152 | *r++ = c; | |
153 | break; | |
154 | #if 0 | |
155 | case '~': /* tilde expansion */ | |
156 | if (s == string || s[-1] == '=' || s[-1] == ':') | |
157 | *r++ = '\\'; | |
158 | *r++ = c; | |
159 | break; | |
160 | #endif | |
161 | case '#': /* comment char */ | |
162 | if (s == string) | |
163 | *r++ = '\\'; | |
164 | /* FALLTHROUGH */ | |
165 | default: | |
166 | *r++ = c; | |
167 | break; | |
168 | } | |
169 | } | |
170 | ||
171 | *r = '\0'; | |
172 | return (result); | |
173 | } | |
174 | ||
28ef6c31 JA |
175 | #if defined (PROMPT_STRING_DECODE) |
176 | /* Quote characters that get special treatment when in double quotes in STRING | |
177 | using backslashes. Return a new string. */ | |
178 | char * | |
179 | sh_backslash_quote_for_double_quotes (string) | |
180 | char *string; | |
181 | { | |
182 | int c; | |
183 | char *result, *r, *s; | |
184 | ||
185 | result = xmalloc (2 * strlen (string) + 1); | |
186 | ||
187 | for (r = result, s = string; s && (c = *s); s++) | |
188 | { | |
189 | if (sh_syntaxtab[c] & CBSDQUOTE) | |
190 | *r++ = '\\'; | |
191 | ||
192 | *r++ = c; | |
193 | } | |
194 | ||
195 | *r = '\0'; | |
196 | return (result); | |
197 | } | |
198 | #endif /* PROMPT_STRING_DECODE */ | |
199 | ||
bb70624e | 200 | int |
28ef6c31 | 201 | sh_contains_shell_metas (string) |
bb70624e JA |
202 | char *string; |
203 | { | |
204 | char *s; | |
205 | ||
206 | for (s = string; s && *s; s++) | |
207 | { | |
208 | switch (*s) | |
209 | { | |
210 | case ' ': case '\t': case '\n': /* IFS white space */ | |
211 | case '\'': case '"': case '\\': /* quoting chars */ | |
212 | case '|': case '&': case ';': /* shell metacharacters */ | |
213 | case '(': case ')': case '<': case '>': | |
214 | case '!': case '{': case '}': /* reserved words */ | |
215 | case '*': case '[': case '?': case ']': /* globbing chars */ | |
216 | case '^': | |
217 | case '$': case '`': /* expansion chars */ | |
218 | return (1); | |
219 | case '~': /* tilde expansion */ | |
220 | if (s == string || s[-1] == '=' || s[-1] == ':') | |
221 | return (1); | |
222 | case '#': | |
223 | if (s == string) /* comment char */ | |
224 | return (1); | |
225 | /* FALLTHROUGH */ | |
226 | default: | |
227 | break; | |
228 | } | |
229 | } | |
230 | ||
231 | return (0); | |
232 | } |