[c822ddc] | 1 | Submitted By: Jim Gifford (jim at cross-lfs dot org)
|
---|
[973b90d5] | 2 | Date: 03-09-2009
|
---|
[c822ddc] | 3 | Initial Package Version: 4.0
|
---|
| 4 | Origin: Upstream
|
---|
| 5 | Upstream Status: Applied
|
---|
[973b90d5] | 6 | Description: Contains all upstream patches up to 4.0-010
|
---|
[c822ddc] | 7 |
|
---|
| 8 | diff -Naur bash-4.0.orig/arrayfunc.c bash-4.0/arrayfunc.c
|
---|
| 9 | --- bash-4.0.orig/arrayfunc.c 2009-01-04 11:32:21.000000000 -0800
|
---|
[973b90d5] | 10 | +++ bash-4.0/arrayfunc.c 2009-03-09 15:07:05.270012850 -0700
|
---|
[c822ddc] | 11 | @@ -604,64 +604,7 @@
|
---|
| 12 | }
|
---|
| 13 | }
|
---|
| 14 |
|
---|
| 15 | -/* This function assumes s[i] == '['; returns with s[ret] == ']' if
|
---|
| 16 | - an array subscript is correctly parsed. */
|
---|
| 17 | -int
|
---|
| 18 | -skipsubscript (s, i)
|
---|
| 19 | - const char *s;
|
---|
| 20 | - int i;
|
---|
| 21 | -{
|
---|
| 22 | - int count, c;
|
---|
| 23 | -#if defined (HANDLE_MULTIBYTE)
|
---|
| 24 | - mbstate_t state, state_bak;
|
---|
| 25 | - size_t slength, mblength;
|
---|
| 26 | -#endif
|
---|
| 27 | -
|
---|
| 28 | -#if defined (HANDLE_MULTIBYTE)
|
---|
| 29 | - memset (&state, '\0', sizeof (mbstate_t));
|
---|
| 30 | - slength = strlen (s + i);
|
---|
| 31 | -#endif
|
---|
| 32 | -
|
---|
| 33 | - count = 1;
|
---|
| 34 | - while (count)
|
---|
| 35 | - {
|
---|
| 36 | - /* Advance one (possibly multibyte) character in S starting at I. */
|
---|
| 37 | -#if defined (HANDLE_MULTIBYTE)
|
---|
| 38 | - if (MB_CUR_MAX > 1)
|
---|
| 39 | - {
|
---|
| 40 | - state_bak = state;
|
---|
| 41 | - mblength = mbrlen (s + i, slength, &state);
|
---|
| 42 | -
|
---|
| 43 | - if (MB_INVALIDCH (mblength))
|
---|
| 44 | - {
|
---|
| 45 | - state = state_bak;
|
---|
| 46 | - i++;
|
---|
| 47 | - slength--;
|
---|
| 48 | - }
|
---|
| 49 | - else if (MB_NULLWCH (mblength))
|
---|
| 50 | - return i;
|
---|
| 51 | - else
|
---|
| 52 | - {
|
---|
| 53 | - i += mblength;
|
---|
| 54 | - slength -= mblength;
|
---|
| 55 | - }
|
---|
| 56 | - }
|
---|
| 57 | - else
|
---|
| 58 | -#endif
|
---|
| 59 | - ++i;
|
---|
| 60 | -
|
---|
| 61 | - c = s[i];
|
---|
| 62 | -
|
---|
| 63 | - if (c == 0)
|
---|
| 64 | - break;
|
---|
| 65 | - else if (c == '[')
|
---|
| 66 | - count++;
|
---|
| 67 | - else if (c == ']')
|
---|
| 68 | - count--;
|
---|
| 69 | - }
|
---|
| 70 | -
|
---|
| 71 | - return i;
|
---|
| 72 | -}
|
---|
| 73 | +/* skipsubscript moved to subst.c to use private functions. 2009/02/24. */
|
---|
| 74 |
|
---|
| 75 | /* This function is called with SUB pointing to just after the beginning
|
---|
| 76 | `[' of an array subscript and removes the array element to which SUB
|
---|
| 77 | diff -Naur bash-4.0.orig/builtins/declare.def bash-4.0/builtins/declare.def
|
---|
| 78 | --- bash-4.0.orig/builtins/declare.def 2009-01-04 11:32:22.000000000 -0800
|
---|
[973b90d5] | 79 | +++ bash-4.0/builtins/declare.def 2009-03-09 15:07:02.561839362 -0700
|
---|
| 80 | @@ -295,6 +295,13 @@
|
---|
[c822ddc] | 81 | subscript_start = (char *)NULL;
|
---|
| 82 | if (t = strchr (name, '[')) /* ] */
|
---|
| 83 | {
|
---|
| 84 | + /* If offset != 0 we have already validated any array reference */
|
---|
| 85 | + if (offset == 0 && valid_array_reference (name) == 0)
|
---|
| 86 | + {
|
---|
| 87 | + sh_invalidid (name);
|
---|
| 88 | + assign_error++;
|
---|
| 89 | + NEXT_VARIABLE ();
|
---|
| 90 | + }
|
---|
| 91 | subscript_start = t;
|
---|
| 92 | *t = '\0';
|
---|
| 93 | making_array_special = 1;
|
---|
[973b90d5] | 94 | @@ -484,7 +491,7 @@
|
---|
[c822ddc] | 95 | }
|
---|
| 96 | /* declare -a name[[n]] or declare name[n] makes name an indexed
|
---|
| 97 | array variable. */
|
---|
| 98 | - else if ((making_array_special || (flags_on & att_array)) && array_p (var) == 0)
|
---|
| 99 | + else if ((making_array_special || (flags_on & att_array)) && array_p (var) == 0 && assoc_p (var) == 0)
|
---|
| 100 | var = convert_var_to_array (var);
|
---|
| 101 | #endif /* ARRAY_VARS */
|
---|
| 102 |
|
---|
| 103 | diff -Naur bash-4.0.orig/builtins/exit.def bash-4.0/builtins/exit.def
|
---|
| 104 | --- bash-4.0.orig/builtins/exit.def 2009-01-04 11:32:22.000000000 -0800
|
---|
[973b90d5] | 105 | +++ bash-4.0/builtins/exit.def 2009-03-09 15:07:01.245754993 -0700
|
---|
[c822ddc] | 106 | @@ -113,7 +113,7 @@
|
---|
| 107 | for (i = stopmsg = 0; i < js.j_jobslots; i++)
|
---|
| 108 | if (jobs[i] && STOPPED (i))
|
---|
| 109 | stopmsg = JSTOPPED;
|
---|
| 110 | - else if (check_jobs_at_exit && stopmsg == 0 && RUNNING (i))
|
---|
| 111 | + else if (check_jobs_at_exit && stopmsg == 0 && jobs[i] && RUNNING (i))
|
---|
| 112 | stopmsg = JRUNNING;
|
---|
| 113 |
|
---|
| 114 | if (stopmsg == JSTOPPED)
|
---|
[7a39f29] | 115 | diff -Naur bash-4.0.orig/builtins/read.def bash-4.0/builtins/read.def
|
---|
| 116 | --- bash-4.0.orig/builtins/read.def 2009-01-15 20:11:21.000000000 -0800
|
---|
[973b90d5] | 117 | +++ bash-4.0/builtins/read.def 2009-03-09 15:07:07.890180751 -0700
|
---|
[7a39f29] | 118 | @@ -369,14 +369,14 @@
|
---|
| 119 | code = setjmp (alrmbuf);
|
---|
| 120 | if (code)
|
---|
| 121 | {
|
---|
| 122 | -#if 0
|
---|
| 123 | + /* Tricky. The top of the unwind-protect stack is the free of
|
---|
| 124 | + input_string. We want to run all the rest and use input_string,
|
---|
| 125 | + so we have to remove it from the stack. */
|
---|
| 126 | + remove_unwind_protect ();
|
---|
| 127 | run_unwind_frame ("read_builtin");
|
---|
| 128 | - return (EXECUTION_FAILURE);
|
---|
| 129 | -#else
|
---|
| 130 | input_string[i] = '\0'; /* make sure it's terminated */
|
---|
| 131 | - retval = 128+SIGALRM;;
|
---|
| 132 | + retval = 128+SIGALRM;
|
---|
| 133 | goto assign_vars;
|
---|
| 134 | -#endif
|
---|
| 135 | }
|
---|
| 136 | old_alrm = set_signal_handler (SIGALRM, sigalrm);
|
---|
| 137 | add_unwind_protect (reset_alarm, (char *)NULL);
|
---|
[c822ddc] | 138 | diff -Naur bash-4.0.orig/parse.y bash-4.0/parse.y
|
---|
| 139 | --- bash-4.0.orig/parse.y 2009-01-08 05:29:12.000000000 -0800
|
---|
[973b90d5] | 140 | +++ bash-4.0/parse.y 2009-03-09 15:07:09.194264282 -0700
|
---|
[c822ddc] | 141 | @@ -1615,10 +1615,11 @@
|
---|
| 142 | {
|
---|
| 143 | int *ret;
|
---|
| 144 |
|
---|
| 145 | - ret = (int *)xmalloc (3 * sizeof (int));
|
---|
| 146 | + ret = (int *)xmalloc (4 * sizeof (int));
|
---|
| 147 | ret[0] = last_read_token;
|
---|
| 148 | ret[1] = token_before_that;
|
---|
| 149 | ret[2] = two_tokens_ago;
|
---|
| 150 | + ret[3] = current_token;
|
---|
| 151 | return ret;
|
---|
| 152 | }
|
---|
| 153 |
|
---|
| 154 | @@ -1631,6 +1632,7 @@
|
---|
| 155 | last_read_token = ts[0];
|
---|
| 156 | token_before_that = ts[1];
|
---|
| 157 | two_tokens_ago = ts[2];
|
---|
| 158 | + current_token = ts[3];
|
---|
| 159 | }
|
---|
| 160 |
|
---|
| 161 | /*
|
---|
| 162 | @@ -2668,6 +2670,7 @@
|
---|
| 163 | FREE (word_desc_to_read);
|
---|
| 164 | word_desc_to_read = (WORD_DESC *)NULL;
|
---|
| 165 |
|
---|
| 166 | + current_token = '\n'; /* XXX */
|
---|
| 167 | last_read_token = '\n';
|
---|
| 168 | token_to_read = '\n';
|
---|
| 169 | }
|
---|
| 170 | @@ -2915,6 +2918,7 @@
|
---|
| 171 | #define P_DQUOTE 0x04
|
---|
| 172 | #define P_COMMAND 0x08 /* parsing a command, so look for comments */
|
---|
| 173 | #define P_BACKQUOTE 0x10 /* parsing a backquoted command substitution */
|
---|
| 174 | +#define P_ARRAYSUB 0x20 /* parsing a [...] array subscript for assignment */
|
---|
| 175 |
|
---|
| 176 | /* Lexical state while parsing a grouping construct or $(...). */
|
---|
| 177 | #define LEX_WASDOL 0x001
|
---|
[973b90d5] | 178 | @@ -2927,6 +2931,7 @@
|
---|
| 179 | #define LEX_INHEREDOC 0x080
|
---|
| 180 | #define LEX_HEREDELIM 0x100 /* reading here-doc delimiter */
|
---|
| 181 | #define LEX_STRIPDOC 0x200 /* <<- strip tabs from here doc delim */
|
---|
| 182 | +#define LEX_INWORD 0x400
|
---|
| 183 |
|
---|
| 184 | #define COMSUB_META(ch) ((ch) == ';' || (ch) == '&' || (ch) == '|')
|
---|
| 185 |
|
---|
| 186 | @@ -3129,6 +3134,8 @@
|
---|
[c822ddc] | 187 | APPEND_NESTRET ();
|
---|
| 188 | FREE (nestret);
|
---|
| 189 | }
|
---|
| 190 | + else if ((flags & P_ARRAYSUB) && (tflags & LEX_WASDOL) && (ch == '(' || ch == '{' || ch == '[')) /* ) } ] */
|
---|
| 191 | + goto parse_dollar_word;
|
---|
| 192 | }
|
---|
| 193 | /* Parse an old-style command substitution within double quotes as a
|
---|
| 194 | single word. */
|
---|
[973b90d5] | 195 | @@ -3145,6 +3152,7 @@
|
---|
[c822ddc] | 196 | else if MBTEST(open != '`' && (tflags & LEX_WASDOL) && (ch == '(' || ch == '{' || ch == '[')) /* ) } ] */
|
---|
| 197 | /* check for $(), $[], or ${} inside quoted string. */
|
---|
| 198 | {
|
---|
| 199 | +parse_dollar_word:
|
---|
| 200 | if (open == ch) /* undo previous increment */
|
---|
| 201 | count--;
|
---|
| 202 | if (ch == '(') /* ) */
|
---|
[973b90d5] | 203 | @@ -3179,7 +3187,7 @@
|
---|
| 204 | int open, close;
|
---|
| 205 | int *lenp, flags;
|
---|
| 206 | {
|
---|
| 207 | - int count, ch, peekc, tflags, lex_rwlen, lex_firstind;
|
---|
| 208 | + int count, ch, peekc, tflags, lex_rwlen, lex_wlen, lex_firstind;
|
---|
| 209 | int nestlen, ttranslen, start_lineno;
|
---|
| 210 | char *ret, *nestret, *ttrans, *heredelim;
|
---|
| 211 | int retind, retsize, rflags, hdlen;
|
---|
| 212 | @@ -3200,7 +3208,7 @@
|
---|
| 213 | retind = 0;
|
---|
| 214 |
|
---|
| 215 | start_lineno = line_number;
|
---|
| 216 | - lex_rwlen = 0;
|
---|
| 217 | + lex_rwlen = lex_wlen = 0;
|
---|
| 218 |
|
---|
| 219 | heredelim = 0;
|
---|
| 220 | lex_firstind = -1;
|
---|
| 221 | @@ -3267,6 +3275,46 @@
|
---|
| 222 | continue;
|
---|
[c822ddc] | 223 | }
|
---|
| 224 |
|
---|
[973b90d5] | 225 | + if (tflags & LEX_PASSNEXT) /* last char was backslash */
|
---|
| 226 | + {
|
---|
| 227 | +/*itrace("parse_comsub:%d: lex_passnext -> 0 ch = `%c' (%d)", line_number, ch, __LINE__);*/
|
---|
| 228 | + tflags &= ~LEX_PASSNEXT;
|
---|
| 229 | + if (qc != '\'' && ch == '\n') /* double-quoted \<newline> disappears. */
|
---|
| 230 | + {
|
---|
| 231 | + if (retind > 0)
|
---|
| 232 | + retind--; /* swallow previously-added backslash */
|
---|
| 233 | + continue;
|
---|
| 234 | + }
|
---|
| 235 | +
|
---|
| 236 | + RESIZE_MALLOCED_BUFFER (ret, retind, 2, retsize, 64);
|
---|
| 237 | + if MBTEST(ch == CTLESC || ch == CTLNUL)
|
---|
| 238 | + ret[retind++] = CTLESC;
|
---|
| 239 | + ret[retind++] = ch;
|
---|
| 240 | + continue;
|
---|
| 241 | + }
|
---|
| 242 | +
|
---|
| 243 | + /* If this is a shell break character, we are not in a word. If not,
|
---|
| 244 | + we either start or continue a word. */
|
---|
| 245 | + if MBTEST(shellbreak (ch))
|
---|
| 246 | + {
|
---|
| 247 | + tflags &= ~LEX_INWORD;
|
---|
| 248 | +/*itrace("parse_comsub:%d: lex_inword -> 0 ch = `%c' (%d)", line_number, ch, __LINE__);*/
|
---|
| 249 | + }
|
---|
| 250 | + else
|
---|
| 251 | + {
|
---|
| 252 | + if (tflags & LEX_INWORD)
|
---|
| 253 | + {
|
---|
| 254 | + lex_wlen++;
|
---|
| 255 | +/*itrace("parse_comsub:%d: lex_inword == 1 ch = `%c' lex_wlen = %d (%d)", line_number, ch, lex_wlen, __LINE__);*/
|
---|
| 256 | + }
|
---|
| 257 | + else
|
---|
| 258 | + {
|
---|
| 259 | +/*itrace("parse_comsub:%d: lex_inword -> 1 ch = `%c' (%d)", line_number, ch, __LINE__);*/
|
---|
| 260 | + tflags |= LEX_INWORD;
|
---|
| 261 | + lex_wlen = 0;
|
---|
| 262 | + }
|
---|
| 263 | + }
|
---|
| 264 | +
|
---|
| 265 | /* Skip whitespace */
|
---|
| 266 | if MBTEST(shellblank (ch) && lex_rwlen == 0)
|
---|
| 267 | {
|
---|
| 268 | @@ -3364,9 +3412,21 @@
|
---|
| 269 | }
|
---|
| 270 | tflags &= ~LEX_RESWDOK;
|
---|
| 271 | }
|
---|
| 272 | - else if (shellbreak (ch) == 0)
|
---|
| 273 | + else if MBTEST((tflags & LEX_CKCOMMENT) && ch == '#' && (lex_rwlen == 0 || ((tflags & LEX_INWORD) && lex_wlen == 0)))
|
---|
| 274 | + ; /* don't modify LEX_RESWDOK if we're starting a comment */
|
---|
| 275 | + else if MBTEST((tflags & LEX_INCASE) && ch != '\n')
|
---|
| 276 | + /* If we can read a reserved word and we're in case, we're at the
|
---|
| 277 | + point where we can read a new pattern list or an esac. We
|
---|
| 278 | + handle the esac case above. If we read a newline, we want to
|
---|
| 279 | + leave LEX_RESWDOK alone. If we read anything else, we want to
|
---|
| 280 | + turn off LEX_RESWDOK, since we're going to read a pattern list. */
|
---|
| 281 | {
|
---|
| 282 | - tflags &= ~LEX_RESWDOK;
|
---|
| 283 | + tflags &= ~LEX_RESWDOK;
|
---|
| 284 | +/*itrace("parse_comsub:%d: lex_incase == 1 found `%c', lex_reswordok -> 0", line_number, ch);*/
|
---|
| 285 | +}
|
---|
| 286 | + else if MBTEST(shellbreak (ch) == 0)
|
---|
| 287 | +{
|
---|
| 288 | + tflags &= ~LEX_RESWDOK;
|
---|
| 289 | /*itrace("parse_comsub:%d: found `%c', lex_reswordok -> 0", line_number, ch);*/
|
---|
| 290 | }
|
---|
| 291 | }
|
---|
| 292 | @@ -3394,36 +3454,23 @@
|
---|
[c822ddc] | 293 | }
|
---|
| 294 | else
|
---|
| 295 | shell_ungetc (peekc);
|
---|
| 296 | - tflags |= LEX_HEREDELIM;
|
---|
| 297 | - lex_firstind = -1;
|
---|
| 298 | + if (peekc != '<')
|
---|
| 299 | + {
|
---|
| 300 | + tflags |= LEX_HEREDELIM;
|
---|
| 301 | + lex_firstind = -1;
|
---|
| 302 | + }
|
---|
| 303 | continue;
|
---|
| 304 | }
|
---|
| 305 | else
|
---|
[973b90d5] | 306 | - ch = peekc; /* fall through and continue XXX - this skips comments if peekc == '#' */
|
---|
| 307 | + ch = peekc; /* fall through and continue XXX */
|
---|
| 308 | }
|
---|
| 309 | - /* Not exactly right yet, should handle shell metacharacters, too. If
|
---|
| 310 | - any changes are made to this test, make analogous changes to subst.c:
|
---|
| 311 | - extract_delimited_string(). */
|
---|
| 312 | - else if MBTEST((tflags & LEX_CKCOMMENT) && (tflags & LEX_INCOMMENT) == 0 && ch == '#' && (retind == 0 || ret[retind-1] == '\n' || shellblank (ret[retind - 1])))
|
---|
| 313 | + else if MBTEST((tflags & LEX_CKCOMMENT) && (tflags & LEX_INCOMMENT) == 0 && ch == '#' && (((tflags & LEX_RESWDOK) && lex_rwlen == 0) || ((tflags & LEX_INWORD) && lex_wlen == 0)))
|
---|
| 314 | +{
|
---|
| 315 | +/*itrace("parse_comsub:%d: lex_incomment -> 1 (%d)", line_number, __LINE__);*/
|
---|
| 316 | tflags |= LEX_INCOMMENT;
|
---|
| 317 | +}
|
---|
| 318 |
|
---|
| 319 | - if (tflags & LEX_PASSNEXT) /* last char was backslash */
|
---|
| 320 | - {
|
---|
| 321 | - tflags &= ~LEX_PASSNEXT;
|
---|
| 322 | - if (qc != '\'' && ch == '\n') /* double-quoted \<newline> disappears. */
|
---|
| 323 | - {
|
---|
| 324 | - if (retind > 0)
|
---|
| 325 | - retind--; /* swallow previously-added backslash */
|
---|
| 326 | - continue;
|
---|
| 327 | - }
|
---|
| 328 | -
|
---|
| 329 | - RESIZE_MALLOCED_BUFFER (ret, retind, 2, retsize, 64);
|
---|
| 330 | - if MBTEST(ch == CTLESC || ch == CTLNUL)
|
---|
| 331 | - ret[retind++] = CTLESC;
|
---|
| 332 | - ret[retind++] = ch;
|
---|
| 333 | - continue;
|
---|
| 334 | - }
|
---|
| 335 | - else if MBTEST(ch == CTLESC || ch == CTLNUL) /* special shell escapes */
|
---|
| 336 | + if MBTEST(ch == CTLESC || ch == CTLNUL) /* special shell escapes */
|
---|
| 337 | {
|
---|
| 338 | RESIZE_MALLOCED_BUFFER (ret, retind, 2, retsize, 64);
|
---|
| 339 | ret[retind++] = CTLESC;
|
---|
| 340 | @@ -4248,7 +4295,7 @@
|
---|
[c822ddc] | 341 | ((token_index > 0 && assignment_acceptable (last_read_token) && token_is_ident (token, token_index)) ||
|
---|
| 342 | (token_index == 0 && (parser_state&PST_COMPASSIGN))))
|
---|
| 343 | {
|
---|
| 344 | - ttok = parse_matched_pair (cd, '[', ']', &ttoklen, 0);
|
---|
| 345 | + ttok = parse_matched_pair (cd, '[', ']', &ttoklen, P_ARRAYSUB);
|
---|
| 346 | if (ttok == &matched_pair_error)
|
---|
| 347 | return -1; /* Bail immediately. */
|
---|
| 348 | RESIZE_MALLOCED_BUFFER (token, token_index, ttoklen + 2,
|
---|
[973b90d5] | 349 | @@ -4449,6 +4496,7 @@
|
---|
[c822ddc] | 350 | case '}': /* XXX */
|
---|
| 351 | case AND_AND:
|
---|
| 352 | case BANG:
|
---|
| 353 | + case BAR_AND:
|
---|
| 354 | case DO:
|
---|
| 355 | case DONE:
|
---|
| 356 | case ELIF:
|
---|
[973b90d5] | 357 | diff -Naur bash-4.0.orig/patchlevel.h bash-4.0/patchlevel.h
|
---|
| 358 | --- bash-4.0.orig/patchlevel.h 2009-01-04 11:32:40.000000000 -0800
|
---|
| 359 | +++ bash-4.0/patchlevel.h 2009-03-09 15:07:09.194264282 -0700
|
---|
| 360 | @@ -25,6 +25,6 @@
|
---|
| 361 | regexp `^#define[ ]*PATCHLEVEL', since that's what support/mkversion.sh
|
---|
| 362 | looks for to find the patch level (for the sccs version string). */
|
---|
| 363 |
|
---|
| 364 | -#define PATCHLEVEL 0
|
---|
| 365 | +#define PATCHLEVEL 10
|
---|
| 366 |
|
---|
| 367 | #endif /* _PATCHLEVEL_H_ */
|
---|
[c822ddc] | 368 | diff -Naur bash-4.0.orig/pcomplete.c bash-4.0/pcomplete.c
|
---|
| 369 | --- bash-4.0.orig/pcomplete.c 2009-02-01 14:12:31.000000000 -0800
|
---|
[973b90d5] | 370 | +++ bash-4.0/pcomplete.c 2009-03-09 15:06:58.589584858 -0700
|
---|
[c822ddc] | 371 | @@ -1032,6 +1032,7 @@
|
---|
| 372 | cmdlist = build_arg_list (funcname, text, lwords, cw);
|
---|
| 373 |
|
---|
| 374 | pps = &ps;
|
---|
| 375 | + save_parser_state (pps);
|
---|
| 376 | begin_unwind_frame ("gen-shell-function-matches");
|
---|
| 377 | add_unwind_protect (restore_parser_state, (char *)pps);
|
---|
| 378 | add_unwind_protect (dispose_words, (char *)cmdlist);
|
---|
| 379 | diff -Naur bash-4.0.orig/subst.c bash-4.0/subst.c
|
---|
| 380 | --- bash-4.0.orig/subst.c 2009-01-28 11:34:12.000000000 -0800
|
---|
[973b90d5] | 381 | +++ bash-4.0/subst.c 2009-03-09 15:07:05.274015365 -0700
|
---|
[c822ddc] | 382 | @@ -222,6 +222,7 @@
|
---|
| 383 | static int skip_double_quoted __P((char *, size_t, int));
|
---|
| 384 | static char *extract_delimited_string __P((char *, int *, char *, char *, char *, int));
|
---|
| 385 | static char *extract_dollar_brace_string __P((char *, int *, int, int));
|
---|
| 386 | +static int skip_matched_pair __P((const char *, int, int, int, int));
|
---|
| 387 |
|
---|
| 388 | static char *pos_params __P((char *, int, int, int));
|
---|
| 389 |
|
---|
| 390 | @@ -1374,6 +1375,107 @@
|
---|
| 391 |
|
---|
| 392 | #define CQ_RETURN(x) do { no_longjmp_on_fatal_error = 0; return (x); } while (0)
|
---|
| 393 |
|
---|
| 394 | +/* This function assumes s[i] == open; returns with s[ret] == close; used to
|
---|
| 395 | + parse array subscripts. FLAGS currently unused. */
|
---|
| 396 | +static int
|
---|
| 397 | +skip_matched_pair (string, start, open, close, flags)
|
---|
| 398 | + const char *string;
|
---|
| 399 | + int start, open, close, flags;
|
---|
| 400 | +{
|
---|
| 401 | + int i, pass_next, backq, si, c, count;
|
---|
| 402 | + size_t slen;
|
---|
| 403 | + char *temp, *ss;
|
---|
| 404 | + DECLARE_MBSTATE;
|
---|
| 405 | +
|
---|
| 406 | + slen = strlen (string + start) + start;
|
---|
| 407 | + no_longjmp_on_fatal_error = 1;
|
---|
| 408 | +
|
---|
| 409 | + i = start + 1; /* skip over leading bracket */
|
---|
| 410 | + count = 1;
|
---|
| 411 | + pass_next = backq = 0;
|
---|
| 412 | + ss = (char *)string;
|
---|
| 413 | + while (c = string[i])
|
---|
| 414 | + {
|
---|
| 415 | + if (pass_next)
|
---|
| 416 | + {
|
---|
| 417 | + pass_next = 0;
|
---|
| 418 | + if (c == 0)
|
---|
| 419 | + CQ_RETURN(i);
|
---|
| 420 | + ADVANCE_CHAR (string, slen, i);
|
---|
| 421 | + continue;
|
---|
| 422 | + }
|
---|
| 423 | + else if (c == '\\')
|
---|
| 424 | + {
|
---|
| 425 | + pass_next = 1;
|
---|
| 426 | + i++;
|
---|
| 427 | + continue;
|
---|
| 428 | + }
|
---|
| 429 | + else if (backq)
|
---|
| 430 | + {
|
---|
| 431 | + if (c == '`')
|
---|
| 432 | + backq = 0;
|
---|
| 433 | + ADVANCE_CHAR (string, slen, i);
|
---|
| 434 | + continue;
|
---|
| 435 | + }
|
---|
| 436 | + else if (c == '`')
|
---|
| 437 | + {
|
---|
| 438 | + backq = 1;
|
---|
| 439 | + i++;
|
---|
| 440 | + continue;
|
---|
| 441 | + }
|
---|
| 442 | + else if (c == open)
|
---|
| 443 | + {
|
---|
| 444 | + count++;
|
---|
| 445 | + i++;
|
---|
| 446 | + continue;
|
---|
| 447 | + }
|
---|
| 448 | + else if (c == close)
|
---|
| 449 | + {
|
---|
| 450 | + count--;
|
---|
| 451 | + if (count == 0)
|
---|
| 452 | + break;
|
---|
| 453 | + i++;
|
---|
| 454 | + continue;
|
---|
| 455 | + }
|
---|
| 456 | + else if (c == '\'' || c == '"')
|
---|
| 457 | + {
|
---|
| 458 | + i = (c == '\'') ? skip_single_quoted (ss, slen, ++i)
|
---|
| 459 | + : skip_double_quoted (ss, slen, ++i);
|
---|
| 460 | + /* no increment, the skip functions increment past the closing quote. */
|
---|
| 461 | + }
|
---|
| 462 | + else if (c == '$' && (string[i+1] == LPAREN || string[i+1] == LBRACE))
|
---|
| 463 | + {
|
---|
| 464 | + si = i + 2;
|
---|
| 465 | + if (string[si] == '\0')
|
---|
| 466 | + CQ_RETURN(si);
|
---|
| 467 | +
|
---|
| 468 | + if (string[i+1] == LPAREN)
|
---|
| 469 | + temp = extract_delimited_string (ss, &si, "$(", "(", ")", SX_NOALLOC|SX_COMMAND); /* ) */
|
---|
| 470 | + else
|
---|
| 471 | + temp = extract_dollar_brace_string (ss, &si, 0, SX_NOALLOC);
|
---|
| 472 | + i = si;
|
---|
| 473 | + if (string[i] == '\0') /* don't increment i past EOS in loop */
|
---|
| 474 | + break;
|
---|
| 475 | + i++;
|
---|
| 476 | + continue;
|
---|
| 477 | + }
|
---|
| 478 | + else
|
---|
| 479 | + ADVANCE_CHAR (string, slen, i);
|
---|
| 480 | + }
|
---|
| 481 | +
|
---|
| 482 | + CQ_RETURN(i);
|
---|
| 483 | +}
|
---|
| 484 | +
|
---|
| 485 | +#if defined (ARRAY_VARS)
|
---|
| 486 | +int
|
---|
| 487 | +skipsubscript (string, start)
|
---|
| 488 | + const char *string;
|
---|
| 489 | + int start;
|
---|
| 490 | +{
|
---|
| 491 | + return (skip_matched_pair (string, start, '[', ']', 0));
|
---|
| 492 | +}
|
---|
| 493 | +#endif
|
---|
| 494 | +
|
---|
| 495 | /* Skip characters in STRING until we find a character in DELIMS, and return
|
---|
| 496 | the index of that character. START is the index into string at which we
|
---|
| 497 | begin. This is similar in spirit to strpbrk, but it returns an index into
|
---|