[ruby-dev:19609] Re: [PATCH] file.c for (PR#389) and (PR#390)

なかだです。

At Wed, 19 Feb 2003 22:53:51 +0900,
[e-mail] wrote:
> UNC での ".." はこうなるはずではないかと思いますが、どうでしょうか？
> 
> File.expand_path("..", "//machine/share") => "//machine/share"

たしかに、
ruby -C //machine/share -e 'p Dir.pwd' => "//machine/share"
になるようですし。


Index: file.c
===================================================================
RCS file: //sharui/cvs/ruby/src/ruby/file.c,v
retrieving revision 1.138
diff -u -2 -p -r1.138 file.c
--- file.c	17 Feb 2003 04:27:45 -0000	1.138
+++ file.c	19 Feb 2003 14:19:47 -0000
@@ -1495,5 +1495,5 @@ file_expand_path(fname, dname, result)
     VALUE fname, dname, result;
 {
-    char *s, *buf, *b, *p, *pend;
+    char *s, *buf, *b, *p, *pend, *root;
     long buflen;
     int tainted;
@@ -1620,4 +1620,13 @@ file_expand_path(fname, dname, result)
 	*p = '/';
 
+    p[1] = 0;
+#ifdef DOSISH_UNC
+    if (isdirsep(buf[0]) && isdirsep(buf[1])) {
+	if (*(root = nextdirsep(buf + 2))) root = nextdirsep(root + 1);
+    }
+    else
+#endif
+	root = skiproot(buf);
+
     b = s;
     while (*s) {
@@ -1633,5 +1642,5 @@ file_expand_path(fname, dname, result)
 			/* We must go back to the parent */
 			*p = '\0';
-			if (!(b = strrdirsep(buf))) {
+			if (!(b = strrdirsep(root))) {
 			    *p = '/';
 			}


-- 
--- 僕の前にBugはない。
--- 僕の後ろにBugはできる。
    中田 伸悦