mirror of
https://sourceware.org/git/glibc.git
synced 2024-11-09 23:00:07 +00:00
Update.
1998-09-12 01:09 Tim Waugh <tim@cyberelk.demon.co.uk> * posix/wordexp-test.c: Fix wrong tests. Add new tests. * posix/wordexp.c (wordexp): Perform word-splitting instead of field-splitting here. (wordexp): If out of memory mid-word, free the word (but still leave pwordexp alone for caller to see). (parse_param): Allow for zero-length fields (smarter checking of memory allocation failure). (w_addword): Convert NULL words to "". (wordexp): Convert left-over IFS characters to blanks (like bash).
This commit is contained in:
Ulrich Drepper
parent
514d9bca72
commit
c06cc21c04
13
ChangeLog
13
ChangeLog
@ -1,3 +1,16 @@
|
||||
1998-09-12 01:09 Tim Waugh <tim@cyberelk.demon.co.uk>
|
||||
|
||||
* posix/wordexp-test.c: Fix wrong tests. Add new tests.
|
||||
|
||||
* posix/wordexp.c (wordexp): Perform word-splitting instead of
|
||||
field-splitting here.
|
||||
(wordexp): If out of memory mid-word, free the word (but still
|
||||
leave pwordexp alone for caller to see).
|
||||
(parse_param): Allow for zero-length fields (smarter checking of
|
||||
memory allocation failure).
|
||||
(w_addword): Convert NULL words to "".
|
||||
(wordexp): Convert left-over IFS characters to blanks (like bash).
|
||||
|
||||
1998-09-11 Ulrich Drepper <drepper@cygnus.com>
|
||||
|
||||
* configure.in: Use test -f instead of test -e.
|
||||
|
||||
@ -38,12 +38,21 @@ struct test_case_struct
|
||||
const char *ifs;
|
||||
} test_case[] =
|
||||
{
|
||||
/* Simple field-splitting */
|
||||
/* Simple word- and field-splitting */
|
||||
{ 0, NULL, "one", 0, 1, { "one", }, IFS },
|
||||
{ 0, NULL, "one two", 0, 2, { "one", "two", }, IFS },
|
||||
{ 0, NULL, "one two three", 0, 3, { "one", "two", "three", }, IFS },
|
||||
{ 0, NULL, " \tfoo\t\tbar ", 0, 2, { "foo", "bar", }, IFS },
|
||||
{ 0, NULL, " red , white blue", 0, 3, { "red", "white", "blue", }, ", \n\t" },
|
||||
{ 0, NULL, "red , white blue", 0, 4, { "red", " ", "white", "blue", }, " ," },
|
||||
{ 0, NULL, "one two three", 0, 3, { "one", "two", "three", }, "" },
|
||||
{ 0, NULL, "one \"two three\"", 0, 2, { "one", "two three", }, IFS },
|
||||
{ 0, NULL, "one \"two three\"", 0, 2, { "one", "two three", }, "" },
|
||||
{ 0, "two three", "one \"$var\"", 0, 2, { "one", "two three", }, IFS },
|
||||
{ 0, "two three", "one $var", 0, 3, { "one", "two", "three", }, IFS },
|
||||
{ 0, "two three", "one \"$var\"", 0, 2, { "one", "two three", }, "" },
|
||||
{ 0, "two three", "one $var", 0, 2, { "one", "two three", }, "" },
|
||||
{ 0, ":abc:", "$var", 0, 2, { "", "abc", }, ":" }, /* cf. bash */
|
||||
{ 0, NULL, ":abc:", 0, 1, { " abc ", }, ":" },
|
||||
|
||||
/* Simple parameter expansion */
|
||||
{ 0, "foo", "${var}", 0, 1, { "foo", }, IFS },
|
||||
@ -120,9 +129,9 @@ struct test_case_struct
|
||||
{ 0, "o thr", "*$var*", 0, 2, { "two", "three" }, IFS },
|
||||
|
||||
/* Different IFS values */
|
||||
{ 0, NULL, "a b\tc\nd ", 0, 4, { "a", "b", "c", "d" }, NULL /* unset */ },
|
||||
{ 0, NULL, "a b\tc d ", 0, 1, { "a b\tc d " }, "" /* `null' */ },
|
||||
{ 0, NULL, "a,b c\n, d", 0, 3, { "a", "b c", " d" }, "\t\n," },
|
||||
{ 0, "a b\tc\nd ", "$var", 0, 4, { "a", "b", "c", "d" }, NULL /* unset */ },
|
||||
{ 0, "a b\tc d ", "$var", 0, 1, { "a b\tc d " }, "" /* `null' */ },
|
||||
{ 0, "a,b c\n, d", "$var", 0, 3, { "a", "b c", " d" }, "\t\n," },
|
||||
|
||||
/* Other things that should succeed */
|
||||
{ 0, NULL, "\\*\"|&;<>\"\\(\\)\\{\\}", 0, 1, { "*|&;<>(){}", }, IFS },
|
||||
|
||||
@ -159,6 +159,16 @@ w_addword (wordexp_t *pwordexp, char *word)
|
||||
size_t num_p;
|
||||
char **new_wordv;
|
||||
|
||||
/* Internally, NULL acts like "". Convert NULLs to "" before
|
||||
* the caller sees them.
|
||||
*/
|
||||
if (word == NULL)
|
||||
{
|
||||
word = __strdup ("");
|
||||
if (word == NULL)
|
||||
goto no_space;
|
||||
}
|
||||
|
||||
num_p = 2 + pwordexp->we_wordc + pwordexp->we_offs;
|
||||
new_wordv = realloc (pwordexp->we_wordv, sizeof (char *) * num_p);
|
||||
if (new_wordv != NULL)
|
||||
@ -169,6 +179,7 @@ w_addword (wordexp_t *pwordexp, char *word)
|
||||
return 0;
|
||||
}
|
||||
|
||||
no_space:
|
||||
return WRDE_NOSPACE;
|
||||
}
|
||||
|
||||
@ -1759,7 +1770,7 @@ envsubst:
|
||||
/* Tag a copy onto the current word */
|
||||
*word = w_addstr (*word, word_length, max_length, field_begin);
|
||||
|
||||
if (*word == NULL)
|
||||
if (*word == NULL && *field_begin != '\0')
|
||||
{
|
||||
free (value_copy);
|
||||
return WRDE_NOSPACE;
|
||||
@ -2160,11 +2171,13 @@ wordexp (const char *words, wordexp_t *pwordexp, int flags)
|
||||
break;
|
||||
|
||||
default:
|
||||
/* Is it a field separator? */
|
||||
if (strchr (ifs, words[words_offset]) == NULL)
|
||||
/* Is it a word separator? */
|
||||
if (strchr (" \t", words[words_offset]) == NULL)
|
||||
{
|
||||
/* Not a field separator -- but is it a valid word char? */
|
||||
if (strchr ("\n|&;<>(){}", words[words_offset]))
|
||||
char ch = words[words_offset];
|
||||
|
||||
/* Not a word separator -- but is it a valid word char? */
|
||||
if (strchr ("\n|&;<>(){}", ch))
|
||||
{
|
||||
/* Fail */
|
||||
wordfree (pwordexp);
|
||||
@ -2175,8 +2188,12 @@ wordexp (const char *words, wordexp_t *pwordexp, int flags)
|
||||
|
||||
/* "Ordinary" character -- add it to word */
|
||||
|
||||
/* Convert IFS chars to blanks -- bash does this */
|
||||
if (strchr (ifs, ch))
|
||||
ch = ' ';
|
||||
|
||||
word = w_addchar (word, &word_length, &max_length,
|
||||
words[words_offset]);
|
||||
ch);
|
||||
if (word == NULL)
|
||||
{
|
||||
error = WRDE_NOSPACE;
|
||||
@ -2186,42 +2203,20 @@ wordexp (const char *words, wordexp_t *pwordexp, int flags)
|
||||
break;
|
||||
}
|
||||
|
||||
/* Field separator */
|
||||
if (strchr (ifs_white, words[words_offset]))
|
||||
{
|
||||
/* It's a whitespace IFS char. Ignore it at the beginning
|
||||
of a line and ignore multiple instances. */
|
||||
if (!word || !*word)
|
||||
break;
|
||||
|
||||
if (w_addword (pwordexp, word) == WRDE_NOSPACE)
|
||||
{
|
||||
error = WRDE_NOSPACE;
|
||||
goto do_error;
|
||||
}
|
||||
|
||||
word = w_newword (&word_length, &max_length);
|
||||
break;
|
||||
}
|
||||
|
||||
/* It's a non-whitespace IFS char */
|
||||
|
||||
/* Multiple non-whitespace IFS chars are treated as one. */
|
||||
/* If a word has been delimited, add it to the list. */
|
||||
if (word != NULL)
|
||||
{
|
||||
if (w_addword (pwordexp, word) == WRDE_NOSPACE)
|
||||
{
|
||||
error = WRDE_NOSPACE;
|
||||
error = w_addword (pwordexp, word);
|
||||
if (error)
|
||||
goto do_error;
|
||||
}
|
||||
}
|
||||
|
||||
word = w_newword (&word_length, &max_length);
|
||||
}
|
||||
|
||||
/* End of string */
|
||||
|
||||
/* There was a field separator at the end */
|
||||
/* There was a word separator at the end */
|
||||
if (word == NULL)
|
||||
return 0;
|
||||
|
||||
@ -2234,12 +2229,12 @@ do_error:
|
||||
* set we_wordc and wd_wordv back to what they were.
|
||||
*/
|
||||
|
||||
if (error == WRDE_NOSPACE)
|
||||
return WRDE_NOSPACE;
|
||||
|
||||
if (word != NULL)
|
||||
free (word);
|
||||
|
||||
if (error == WRDE_NOSPACE)
|
||||
return WRDE_NOSPACE;
|
||||
|
||||
wordfree (pwordexp);
|
||||
pwordexp->we_wordv = old_wordv;
|
||||
pwordexp->we_wordc = old_wordc;
|
||||
|
||||
Loading…
Reference in New Issue
Block a user