-
This is for tclhttpd 3.5.1.
In lib/dirlist.tcl:180, a directory listing is created with the following glob line:
set list [glob -nocomplain -- [file join $dir $pattern]]
This fails if the $dir contains characters that are glob sensitive as show below, such as if the directory name contains []. Using [glob -directory] option seems to fix this.
% set dir {c:/temp/[a]/}
c:/temp/[a]/
%...
2009-02-25 05:34:37 UTC in TclHttpd - Tcl Web Server
-
Logged In: YES
user_id=863965
It seems this is the same behavior in 8.4.14:
---- Result was:
1 {error copying "~/td1" to "td1": "/home/wl/td1/td2":
permission denied}
---- Result should have been (exact matching):
1 {error copying "~/td1" to "td1": "/d1/home/wl/td1/td2":
permission denied}
==== fCmd-6.26 FAILED
Here is the output from with tcl (via tcltest):
% puts...
2006-10-04 18:54:17 UTC in Tcl
-
The fCmd-6.26 test uses [file dirname ~] and [file tail
~] to construct the test message. This acts like [file
normalize] in expanding the ~ and any symbolic links.
However, the error message from [file copy] behaves like
[file nativename]: the ~ is expanded, but it doesn't seem
to follow the symbolic links. The test on a machine with
symbolic links in ~ will fail like this
----...
2006-10-02 05:27:05 UTC in Tcl