diff options
author | amodra <amodra@138bc75d-0d04-0410-961f-82ee72b054a4> | 2002-07-28 09:01:09 +0000 |
---|---|---|
committer | amodra <amodra@138bc75d-0d04-0410-961f-82ee72b054a4> | 2002-07-28 09:01:09 +0000 |
commit | fa93416cadc27b5afff9d4424c2895aa4853251a (patch) | |
tree | ef688e323315a98c3c31c2872e3c7f41a6ac3c5d /gcc/prefix.c | |
parent | 7e4d82048917fe5225207a53fc84974efb523cd6 (diff) | |
download | gcc-fa93416cadc27b5afff9d4424c2895aa4853251a.tar.gz |
* prefix.c (update_path): Don't strip single `.' path components
unless stripping a later `..' component. Exit loop as soon as
a valid path is found.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@55814 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/prefix.c')
-rw-r--r-- | gcc/prefix.c | 56 |
1 files changed, 23 insertions, 33 deletions
diff --git a/gcc/prefix.c b/gcc/prefix.c index 18f79987a34..06930fee2ab 100644 --- a/gcc/prefix.c +++ b/gcc/prefix.c @@ -284,49 +284,39 @@ update_path (path, key) p = strchr (p, '.'); if (p == NULL) break; - /* Get rid of a leading `./' and replace `/./' with `/', when - such components are followed with another `.'. */ - if (IS_DIR_SEPARATOR (p[1]) - && (p == result || IS_DIR_SEPARATOR (p[-1]))) - { - src = p + 2; - /* Be careful about .//foo */ - while (IS_DIR_SEPARATOR (*src)) - ++src; - if (*src == '.') - { - dest = p; - while ((*dest++ = *src++) != 0) - ; - } - else - ++p; - } /* Look for `/../' */ - else if (p[1] == '.' - && IS_DIR_SEPARATOR (p[2]) - && (p != result && IS_DIR_SEPARATOR (p[-1]))) + if (p[1] == '.' + && IS_DIR_SEPARATOR (p[2]) + && (p != result && IS_DIR_SEPARATOR (p[-1]))) { *p = 0; if (!ALWAYS_STRIP_DOTDOT && access (result, X_OK) == 0) { *p = '.'; - p += 3; + break; } else { /* We can't access the dir, so we won't be able to - access dir/.. either. Strip out dir/.. We know dir - isn't `.' because we've rid ourselves of `.' path - components above. */ - dest = p - 1; - while (dest != result && IS_DIR_SEPARATOR (*dest)) - --dest; - while (dest != result && !IS_DIR_SEPARATOR (dest[-1])) - --dest; - /* Don't strip leading `/'. */ - while (IS_DIR_SEPARATOR (*dest)) - ++dest; + access dir/.. either. Strip out `dir/../'. If `dir' + turns out to be `.', strip one more path component. */ + dest = p; + do + { + --dest; + while (dest != result && IS_DIR_SEPARATOR (*dest)) + --dest; + while (dest != result && !IS_DIR_SEPARATOR (dest[-1])) + --dest; + } + while (dest != result && *dest == '.'); + /* If we have something like `./..' or `/..', don't + strip anything more. */ + if (*dest == '.' || IS_DIR_SEPARATOR (*dest)) + { + *p = '.'; + break; + } src = p + 3; while (IS_DIR_SEPARATOR (*src)) ++src; |