7 Bug-Reported-by: Stephane Chazelas <stephane.chazelas@gmail.com>
8 Bug-Reference-ID: <20140318135901.GB22158@chaz.gmail.com>
9 Bug-Reference-URL: http://lists.gnu.org/archive/html/bug-bash/2014-03/msg00098.html
13 Some extended glob patterns incorrectly matched filenames with a leading
14 dot, regardless of the setting of the `dotglob' option.
16 Patch (apply with `patch -p0'):
18 --- a/lib/glob/gmisc.c
19 +++ b/lib/glob/gmisc.c
20 @@ -210,6 +210,7 @@ extglob_pattern_p (pat)
25 return (pat[1] == LPAREN);
30 @@ -179,42 +179,50 @@ extglob_skipname (pat, dname, flags)
36 + char *pp, *pe, *t, *se;
39 + negate = *pat == '!';
41 - pe = pp + strlen (pp) - 1; /*(*/
44 - if ((t = strchr (pp, '|')) == 0) /* easy case first */
45 + se = pp + strlen (pp) - 1; /* end of string */
46 + pe = glob_patscan (pp, se, 0); /* end of extglob pattern (( */
47 + /* we should check for invalid extglob pattern here */
48 + /* if pe != se we have more of the pattern at the end of the extglob
49 + pattern. Check the easy case first ( */
50 + if (pe == se && *pe == ')' && (t = strchr (pp, '|')) == 0)
53 +#if defined (HANDLE_MULTIBYTE)
54 + r = mbskipname (pp, dname, flags);
56 r = skipname (pp, dname, flags); /*(*/
62 + /* check every subpattern */
63 while (t = glob_patscan (pp, pe, '|'))
67 +#if defined (HANDLE_MULTIBYTE)
68 + r = mbskipname (pp, dname, flags);
70 r = skipname (pp, dname, flags);
73 if (r == 0) /* if any pattern says not skip, we don't skip */
78 - if (pp == pe) /* glob_patscan might find end of pattern */
79 + /* glob_patscan might find end of pattern */
84 -# if defined (HANDLE_MULTIBYTE)
85 - r = mbskipname (pp, dname, flags); /*(*/
87 - r = skipname (pp, dname, flags); /*(*/
91 + /* but if it doesn't then we didn't match a leading dot */
96 @@ -277,20 +285,23 @@ wextglob_skipname (pat, dname, flags)
100 - wchar_t *pp, *pe, *t, n;
102 + wchar_t *pp, *pe, *t, n, *se;
105 + negate = *pat == L'!';
107 - pe = pp + wcslen (pp) - 1; /*(*/
110 - if ((t = wcschr (pp, L'|')) == 0)
111 + se = pp + wcslen (pp) - 1; /*(*/
112 + pe = glob_patscan_wc (pp, se, 0);
114 + if (pe == se && *pe == ')' && (t = wcschr (pp, L'|')) == 0)
117 r = wchkname (pp, dname); /*(*/
122 + /* check every subpattern */
123 while (t = glob_patscan_wc (pp, pe, '|'))
126 @@ -305,10 +316,8 @@ wextglob_skipname (pat, dname, flags)
127 if (pp == pe) /* glob_patscan_wc might find end of pattern */
131 - r = wchkname (pp, dname); /*(*/
134 + /* but if it doesn't then we didn't match a leading dot */
137 return (wchkname (pat, dname));
142 regexp `^#define[ ]*PATCHLEVEL', since that's what support/mkversion.sh
143 looks for to find the patch level (for the sccs version string). */
145 -#define PATCHLEVEL 7
146 +#define PATCHLEVEL 8
148 #endif /* _PATCHLEVEL_H_ */