summaryrefslogtreecommitdiff
path: root/file.c
diff options
context:
space:
mode:
Diffstat (limited to 'file.c')
-rw-r--r--file.c18
1 files changed, 15 insertions, 3 deletions
diff --git a/file.c b/file.c
index 1bb3364daa..b59e5608a1 100644
--- a/file.c
+++ b/file.c
@@ -2530,6 +2530,7 @@ file_expand_path(fname, dname, result)
tainted = OBJ_TAINTED(fname);
if (s[0] == '~') {
+ long userlen = 0;
if (isdirsep(s[1]) || s[1] == '\0') {
const char *dir = getenv("HOME");
@@ -2557,9 +2558,10 @@ file_expand_path(fname, dname, result)
s++;
#endif
s = nextdirsep(b = s);
- BUFCHECK(bdiff + (s-b) >= buflen);
- memcpy(p, b, s-b);
- p += s-b;
+ userlen = s - b;
+ BUFCHECK(bdiff + userlen >= buflen);
+ memcpy(p, b, userlen);
+ p += userlen;
*p = '\0';
#ifdef HAVE_PWD_H
pwPtr = getpwnam(buf);
@@ -2572,8 +2574,18 @@ file_expand_path(fname, dname, result)
strcpy(buf, pwPtr->pw_dir);
p = buf + strlen(pwPtr->pw_dir);
endpwent();
+#else
+ rb_raise(rb_eArgError, "can't find user %s", buf);
#endif
}
+ if (!is_absolute_path(RSTRING_PTR(result))) {
+ if (userlen) {
+ rb_raise(rb_eArgError, "non-absolute home of %.*s", userlen, s);
+ }
+ else {
+ rb_raise(rb_eArgError, "non-absolute home");
+ }
+ }
}
#ifdef DOSISH_DRIVE_LETTER
/* skip drive letter */