694 |
<?php |
<?php |
695 |
} |
} |
696 |
|
|
697 |
|
function plural($name,$count) { |
698 |
|
$out="$count $name"; |
699 |
|
if ($count > 1) { |
700 |
|
$out.="s"; |
701 |
|
} |
702 |
|
return $out; |
703 |
|
} |
704 |
|
|
705 |
// output subdirs |
// output subdirs |
706 |
if (sizeof($dirList) > 0) { |
if (sizeof($dirList) > 0) { |
707 |
sort($dirList) ; |
sort($dirList) ; |
708 |
?> |
?> |
709 |
|
|
710 |
<TR><TD></TD><TD COLSPAN=2 CLASS=TOP>DIRECTORY NAME</TD><TD COLSPAN=3 CLASS=TOP>DIRECTORY NOTE</TR> |
<TR><TD></TD><TD COLSPAN=2 CLASS=TOP>DIRECTORY NAME (<?= plural("dir",sizeof($dirList)) ?>)</TD><TD COLSPAN=3 CLASS=TOP>DIRECTORY NOTE</TR> |
711 |
|
|
712 |
<?php |
<?php |
713 |
while (list($key,$dir) = each($dirList)) { |
while (list($key,$dir) = each($dirList)) { |
732 |
|
|
733 |
<TR><TD></TD><TD COLSPAN=5><HR><B><?= $webRoot . $relDir ?> |
<TR><TD></TD><TD COLSPAN=5><HR><B><?= $webRoot . $relDir ?> |
734 |
</B></TD></TR> |
</B></TD></TR> |
735 |
<TR><TD></TD><TD CLASS=TOP>DOCUMENT NAME</TD> |
<TR><TD></TD><TD CLASS=TOP>DOCUMENT NAME (<?= plural("file",sizeof($fileList)) ?>)</TD> |
736 |
<TD><?= $gblIcon("blank").$gblIcon("blank") ?></TD> |
<TD><?= $gblIcon("blank").$gblIcon("blank") ?></TD> |
737 |
<TD CLASS=TOP>NOTE</TD> |
<TD CLASS=TOP>NOTE</TD> |
738 |
<TD CLASS=TOP>LAST UPDATE</TD><TD CLASS=TOP>FILE SIZE</TD></TR> |
<TD CLASS=TOP>LAST UPDATE</TD><TD CLASS=TOP>FILE SIZE</TD></TR> |
864 |
<NOBR>NAME <INPUT TYPE="TEXT" NAME="FN" SIZE=14> |
<NOBR>NAME <INPUT TYPE="TEXT" NAME="FN" SIZE=14> |
865 |
<INPUT TYPE="HIDDEN" NAME="POSTACTION" VALUE="CREATE"> |
<INPUT TYPE="HIDDEN" NAME="POSTACTION" VALUE="CREATE"> |
866 |
<INPUT TYPE="HIDDEN" NAME="DIR" VALUE="<?= $relDir ?>"> |
<INPUT TYPE="HIDDEN" NAME="DIR" VALUE="<?= $relDir ?>"> |
867 |
<INPUT TYPE="SUBMIT" VALUE="CREATE"></NOBR> |
<INPUT TYPE="SUBMIT" VALUE="CREATE" NAME="CREATE"> |
868 |
|
</NOBR> |
869 |
<NOBR>OR <A HREF="<?= $self ?>?A=U&D=<?= urlencode($relDir) ?>">UPLOAD</A> A FILE |
<NOBR>OR <A HREF="<?= $self ?>?A=U&D=<?= urlencode($relDir) ?>">UPLOAD</A> A FILE |
870 |
</NOBR> |
</NOBR> |
871 |
</TD></TR> |
</TD></TR> |
985 |
$msg=fgets($note,4096); |
$msg=fgets($note,4096); |
986 |
fclose($note); |
fclose($note); |
987 |
} |
} |
988 |
return StripSlashes($msg); |
return HtmlSpecialChars(StripSlashes($msg)); |
989 |
|
|
990 |
} |
} |
991 |
|
|
1068 |
|
|
1069 |
function safe_rename($fromdir,$fromfile,$tofile) { |
function safe_rename($fromdir,$fromfile,$tofile) { |
1070 |
function try_rename($from,$to) { |
function try_rename($from,$to) { |
1071 |
print "$from -> $to\n"; |
# print "$from -> $to\n"; |
1072 |
if (file_exists($from) && is_writeable(dirname($to))) { |
if (file_exists($from) && is_writeable(dirname($to))) { |
1073 |
rename($from,$to); |
rename($from,$to); |
1074 |
} |
} |
1084 |
$todir=dirname($to); |
$todir=dirname($to); |
1085 |
$tofile=basename($to); |
$tofile=basename($to); |
1086 |
|
|
1087 |
print "<pre>$fromdir / $fromfile -> $todir / $tofile\n\n"; |
# print "<pre>$fromdir / $fromfile -> $todir / $tofile\n\n"; |
1088 |
|
|
1089 |
try_rename("$fromdir/$fromfile","$todir/$tofile"); |
try_rename("$fromdir/$fromfile","$todir/$tofile"); |
1090 |
try_dir("$todir/.log"); |
try_dir("$todir/.log"); |
1223 |
$relDir = urldecode($D) ; // then use GET |
$relDir = urldecode($D) ; // then use GET |
1224 |
} |
} |
1225 |
|
|
1226 |
|
$relDir=stripSlashes($relDir); |
1227 |
|
|
1228 |
if ($relDir == "/") $relDir = "" ; |
if ($relDir == "/") $relDir = "" ; |
1229 |
// default : website root = "" |
// default : website root = "" |
1230 |
|
|
1259 |
|
|
1260 |
$FN=stripSlashes($FN); |
$FN=stripSlashes($FN); |
1261 |
|
|
1262 |
|
if (file_exists("$fsScriptDir/.docman.conf")) { |
1263 |
|
include("$fsScriptDir/.docman.conf"); |
1264 |
|
} |
1265 |
|
|
1266 |
switch ($POSTACTION) { |
switch ($POSTACTION) { |
1267 |
case "UPLOAD" : |
case "UPLOAD" : |
1268 |
if (!is_writeable($fsDir)) Error("Write denied",$relDir) ; |
if (!is_writeable($fsDir)) Error("Write denied",$relDir) ; |