/[docman]/docman.php
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /docman.php

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.2 by dpavlin, Wed Jul 26 11:46:19 2000 UTC revision 1.5 by dpavlin, Thu Aug 3 22:02:03 2000 UTC
# Line 96  TODO: Line 96  TODO:
96          $gblPw    = "";          $gblPw    = "";
97    
98          if ($gblAuth) {          if ($gblAuth) {
99                  $htusers=fopen(dirname($SCRIPT_FILENAME)."/.htusers","r");                  $htusers_file=dirname($SCRIPT_FILENAME)."/.htusers";
100                    if (! file_exists($htusers_file)) {
101                            $htusers=fopen($htusers_file,"a+");
102                            fputs($htusers,"# Change owner of $htusers_file to root !!\n");
103                            fputs($htusers,"demo:full name:md5_hash\n");
104                            fclose($htusers);
105                    }
106                    $htusers=fopen($htusers_file,"r");
107                  while($user = fgetcsv($htusers,255,":")) {                  while($user = fgetcsv($htusers,255,":")) {
108                          if ($user[0] == $GLOBALS["PHP_AUTH_USER"]) {                          if ($user[0] == $GLOBALS["PHP_AUTH_USER"]) {
109                                  $gblUserName=$user[1];                                  $gblUserName=$user[1];
# Line 124  TODO: Line 131  TODO:
131          // the directory below should be /icons/ or /icons/small/          // the directory below should be /icons/ or /icons/small/
132          // on Apache; a set of icons is included in the distribution          // on Apache; a set of icons is included in the distribution
133    
134          $gblIconLocation = "icons/" ;          $gblIconLocation = "/icons/" ;
135    
136          // files you want to be able to edit in text mode          // files you want to be able to edit in text mode
137          // and view with (primitive) syntax highlighting          // and view with (primitive) syntax highlighting
# Line 150  function StartHTML($title,$text="") { Line 157  function StartHTML($title,$text="") {
157    
158  <HTML>  <HTML>
159  <HEAD>  <HEAD>
160   <TITLE><?php echo $host . " " . $title ?></TITLE>   <TITLE><?= $host . " " . $title ?></TITLE>
161   <META NAME="description" CONTENT="PHP port of AnyPortal Site Manager">   <META NAME="description" CONTENT="PHP port of AnyPortal Site Manager">
162   <META NAME="keywords" CONTENT="site manager, web site maintenance">   <META NAME="keywords" CONTENT="site manager, web site maintenance">
163   <META NAME="robots" CONTENT="noindex">   <META NAME="robots" CONTENT="noindex">
164   <META HTTP-EQUIV="expires" CONTENT="0">   <META HTTP-EQUIV="expires" CONTENT="0">
165   <LINK REL="stylesheet" TYPE="text/css"   <LINK REL="stylesheet" TYPE="text/css"
166          HREF="<?php echo $self ?>?STYLE=get">          HREF="<?= $self ?>?STYLE=get">
167  </HEAD>  </HEAD>
168  <BODY BGCOLOR="#FFFFFF">  <BODY BGCOLOR="#FFFFFF">
169   <H3 ALIGN="RIGHT"><?php echo $host ?></H3>   <H3 ALIGN="RIGHT"><?= $host ?></H3>
170  <TABLE BORDER=0 WIDTH="100%"><TR>  <TABLE BORDER=0 WIDTH="100%"><TR>
171   <TD CLASS=INV><?php echo $title ?></TD></TR></TABLE>   <TD CLASS=INV><?= $title ?></TD></TR></TABLE>
172   <P><?php echo $text ?></P>   <P><?= $text ?></P>
173    
174  <?php  <?php
175  } // end function StartHTML  } // end function StartHTML
# Line 187  function EndHTML() { Line 194  function EndHTML() {
194  </small>  </small>
195  </P>  </P>
196  <BR>  <BR>
197  <? //include("../debug.inc") ?>  <? include(".debug.inc") ?>
198  <BR><BR></BODY></HTML>  <BR><BR></BODY></HTML>
199    
200  <?php  <?php
# Line 247  function DetailPage($fsRoot,$relDir,$fn) Line 254  function DetailPage($fsRoot,$relDir,$fn)
254    
255          echo "<H3>" . $relDir . "/" . $fn . "</H3>" ;          echo "<H3>" . $relDir . "/" . $fn . "</H3>" ;
256          if ($exists) {  // get file info          if ($exists) {  // get file info
257            $fsize = filesize($fsPath) ;                  $fsize = filesize($fsPath) ;
258            $fmodified = date("$GLOBALS[gblDateFmt] $GLOBALS[gblTimeFmt]", filemtime($fsPath)) ;                  $fmodified = date("$GLOBALS[gblDateFmt] $GLOBALS[gblTimeFmt]", filemtime($fsPath)) ;
259            $faccessed = date("$GLOBALS[gblDateFmt] $GLOBALS[gblTimeFmt]", fileatime($fsPath)) ;                  $faccessed = date("$GLOBALS[gblDateFmt] $GLOBALS[gblTimeFmt]", fileatime($fsPath)) ;
260            echo "<PRE>    file size: " . $fsize . " Bytes<BR>" ;                  echo "<PRE>    file size: " . $fsize . " Bytes<BR>" ;
261            echo "last modified: <B>" . $fmodified . "</B><BR>" ;                  echo "last modified: <B>" . $fmodified . "</B><BR>" ;
262            echo "last accessed: <B>" . $faccessed . "</B><BR>" ;                  echo "last accessed: <B>" . $faccessed . "</B><BR>" ;
263            echo "        owner: <B>" . fileowner($fsPath) . "</B><BR>" ;                  echo "        owner: <B>" . fileowner($fsPath) . "</B><BR>" ;
264            echo "        group: <B>" . filegroup($fsPath) . "</B><BR>" ;                  echo "        group: <B>" . filegroup($fsPath) . "</B><BR>" ;
265            echo "  permissions: <B>" ;                  echo "  permissions: <B>" ;
266            echo printf( "%o", fileperms($fsPath) ) . "</B>" ;                  echo printf( "%o", fileperms($fsPath) ) . "</B>" ;
267            echo "</PRE>" ;                  echo "</PRE>" ;
268    
269          }          }
270    
# Line 269  function DetailPage($fsRoot,$relDir,$fn) Line 276  function DetailPage($fsRoot,$relDir,$fn)
276                  $fstr = htmlentities( $fstr ) ;                  $fstr = htmlentities( $fstr ) ;
277  ?>  ?>
278    
279  <FORM ACTION="<?php echo $self ; ?>" METHOD="POST">  <FORM ACTION="<?= $self ; ?>" METHOD="POST">
280  <SPAN TITLE="Click [SAVE] to store updated contents.">  <SPAN TITLE="Click [SAVE] to store updated contents.">
281          <B>DOCUMENT CONTENTS</B>          <B>DOCUMENT CONTENTS</B>
282  </SPAN><BR>  </SPAN><BR>
283  <TEXTAREA NAME="FILEDATA" ROWS=18 COLS=70 WRAP="OFF"><?php  <TEXTAREA NAME="FILEDATA" ROWS=18 COLS=70 WRAP="OFF"><?php
284  echo($fstr) ; ?></TEXTAREA>  echo($fstr) ; ?></TEXTAREA>
285  <INPUT TYPE="HIDDEN" NAME="DIR" VALUE="<?php echo $relDir ; ?>">  <INPUT TYPE="HIDDEN" NAME="DIR" VALUE="<?= $relDir ; ?>">
286  <INPUT TYPE="HIDDEN" NAME="FN" VALUE="<?php echo $fn ; ?>">  <INPUT TYPE="HIDDEN" NAME="FN" VALUE="<?= $fn ; ?>">
287  <INPUT TYPE="HIDDEN" NAME="POSTACTION" VALUE="SAVE">  <INPUT TYPE="HIDDEN" NAME="POSTACTION" VALUE="SAVE">
288  <INPUT TYPE="HIDDEN" SIZE=48 MAXLENGTH=255 NAME="RELPATH"  <INPUT TYPE="HIDDEN" SIZE=48 MAXLENGTH=255 NAME="RELPATH"
289          VALUE="<?php echo $relPath ; ?>">          VALUE="<?= $relPath ; ?>">
290  <br>  <br>
291  <INPUT TYPE="RESET" VALUE="UNDO ALL CHANGES">  <INPUT TYPE="RESET" VALUE="UNDO ALL CHANGES">
292  <INPUT TYPE="SUBMIT" VALUE="SAVE">  <INPUT TYPE="SUBMIT" VALUE="SAVE">
# Line 296  echo($fstr) ; ?></TEXTAREA> Line 303  echo($fstr) ; ?></TEXTAREA>
303          }          }
304  ?>  ?>
305    
306  <FORM ACTION="<?php echo $self ; ?>" METHOD="POST">  <FORM ACTION="<?= $self ; ?>" METHOD="POST">
307  <INPUT TYPE="HIDDEN" NAME="DIR" VALUE="<?php echo $relDir ; ?>">  <INPUT TYPE="HIDDEN" NAME="DIR" VALUE="<?= $relDir ; ?>">
308  <INPUT TYPE="HIDDEN" NAME="FN" VALUE="<?php echo $fn ; ?>">  <INPUT TYPE="HIDDEN" NAME="FN" VALUE="<?= $fn ; ?>">
309  <INPUT TYPE="SUBMIT" NAME="POSTACTION" VALUE="CANCEL"><BR>  <INPUT TYPE="SUBMIT" NAME="POSTACTION" VALUE="CANCEL"><BR>
310    
311  <?php  <?php
# Line 313  echo($fstr) ; ?></TEXTAREA> Line 320  echo($fstr) ; ?></TEXTAREA>
320          if ($exists && $writable) {          if ($exists && $writable) {
321  ?>  ?>
322    
323  <HR><SPAN TITLE="Check OK and click [<?= $action ?>] to <?= $desc ?>.">  <HR>
324  <B>OK TO <?= $action ?> "<?php echo $fn ; ?>"? </B></SPAN>  <a name="undelete">
325    <SPAN TITLE="Check OK and click [<?= $action ?>] to <?= $desc ?>.">
326    <B>OK TO <?= $action ?> "<?= $fn ; ?>"? </B></SPAN>
327  <INPUT TYPE="CHECKBOX" NAME="CONFIRM">  <INPUT TYPE="CHECKBOX" NAME="CONFIRM">
328  <INPUT TYPE="SUBMIT" NAME="POSTACTION" VALUE="<?= $action ?>">  <INPUT TYPE="SUBMIT" NAME="POSTACTION" VALUE="<?= $action ?>">
329    
330  <HR><SPAN TITLE="Check OK and click [RENAME] to rename.">  <HR>
331  <B>OK TO RENAME "<?php echo $fn ; ?>" TO  <a name="rename">
332    <SPAN TITLE="Check OK and click [RENAME] to rename.">
333    <B>OK TO RENAME "<?= $fn ; ?>" TO
334  <INPUT TYPE="TEXT" SIZE=24 MAXLENGTH=255 NAME="NEWNAME" VALUE="<?= $fn ?>">  <INPUT TYPE="TEXT" SIZE=24 MAXLENGTH=255 NAME="NEWNAME" VALUE="<?= $fn ?>">
335  ? </B></SPAN>  ? </B></SPAN>
336  <INPUT TYPE="CHECKBOX" NAME="CONFIRM">  <INPUT TYPE="CHECKBOX" NAME="CONFIRM">
337  <INPUT TYPE="SUBMIT" NAME="POSTACTION" VALUE="RENAME">  <INPUT TYPE="SUBMIT" NAME="POSTACTION" VALUE="RENAME">
338    
339  <?php  <?php
340          }          }       // exists && writable
341          echo "</FORM>" ;  ?>
342    <HR>
343    <a name="note">
344    <B>NOTE FOR "<?= $fn ; ?>":
345    <INPUT TYPE="TEXT" SIZE=50 MAXLENGTH=255 NAME="NOTE" VALUE="<?= ReadNote($fsPath) ?>">
346    </B></SPAN>
347    <INPUT TYPE="SUBMIT" NAME="POSTACTION" VALUE="NOTE">
348    
349    </FORM>
350    
351    <?php
352            
353    
354          $logname=dirname("$fsDir/$fn")."/.log/".basename("$fsDir/$fn");          $logname=dirname("$fsDir/$fn")."/.log/".basename("$fsDir/$fn");
355          if (file_exists($logname)) {          if (file_exists($logname)) {
# Line 571  function GifIcon($txt) { Line 593  function GifIcon($txt) {
593          case "blank" :          case "blank" :
594                  $d = "blank.gif" ;                  $d = "blank.gif" ;
595                  break ;                  break ;
596            case "checkout":
597                    $d = "down.gif";
598                    break;
599            case "checkin":
600                    $d = "up.gif";
601                    break;
602            case "note":
603                    $d = "quill.gif";
604                    break;
605          default :          default :
606                  $d = "generic.gif" ;                  $d = "generic.gif" ;
607          }          }
# Line 628  function Navigate($fsRoot,$relDir) { Line 659  function Navigate($fsRoot,$relDir) {
659          // start navigation page          // start navigation page
660          $text  = "Use this page to add, delete";          $text  = "Use this page to add, delete";
661          if (! isset($show_deleted)) {          if (! isset($show_deleted)) {
662                  $text .= ", <a href=$PHP_SELF?show_deleted=1>undelete</a>";                  $text .= ", <a href=".$GLOBALS[PHP_SELF]."?D=".urlencode($relDir)."&show_deleted=1>undelete</a>";
663          }          }
664          $text .= " or revise files on this web site." ;          $text .= " or revise files on this web site." ;
665          StartHTML("(Navigate)",$text) ;          StartHTML("(Navigate)",$text) ;
# Line 642  function Navigate($fsRoot,$relDir) { Line 673  function Navigate($fsRoot,$relDir) {
673                  if ($parent == "") $parent = "/" ;                  if ($parent == "") $parent = "/" ;
674  ?>  ?>
675    
676  <TR><TD><?php echo $gblIcon("up") ?></TD><TD COLSPAN=4 CLASS=LST>  <TR><TD><?= $gblIcon("up") ?></TD><TD COLSPAN=5 CLASS=LST>
677  <A HREF="<?php echo $self ?>?D=<?php echo urlencode($parent) ?>">  <A HREF="<?= $self ?>?D=<?= urlencode($parent) ?>">
678  <B><?php echo $parent ?></B></A></TD></TR>  <B><?= $parent ?></B></A></TD></TR>
679    
680  <?php  <?php
681          }          }
# Line 654  function Navigate($fsRoot,$relDir) { Line 685  function Navigate($fsRoot,$relDir) {
685                  sort($dirList) ;                  sort($dirList) ;
686  ?>  ?>
687    
688  <TR><TD></TD><TD COLSPAN=4 CLASS=TOP><HR>DIRECTORY NAME</TD></TR>  <TR><TD></TD><TD COLSPAN=5 CLASS=TOP><HR>DIRECTORY NAME</TD></TR>
689    
690  <?php  <?php
691                  while (list($key,$dir) = each($dirList)) {                  while (list($key,$dir) = each($dirList)) {
# Line 664  function Navigate($fsRoot,$relDir) { Line 695  function Navigate($fsRoot,$relDir) {
695                          $tstr .= "\">" . $dir . "/</A>" ;                          $tstr .= "\">" . $dir . "/</A>" ;
696  ?>  ?>
697    
698  <TR><TD><?php echo $gblIcon("fldr") ?></TD>  <TR><TD><?= $gblIcon("fldr") ?></TD>
699  <TD COLSPAN=4 CLASS=LST><?php echo $tstr ?></TD></TR>  <TD COLSPAN=5 CLASS=LST><?= $tstr ?></TD></TR>
700    
701  <?php  <?php
702                  }  // iterate over dirs                  }  // iterate over dirs
703          }  // end if no dirs          }  // end if no dirs
704  ?>  ?>
705    
706  <TR><TD></TD><TD COLSPAN=4><HR><B><?php echo $webRoot . $relDir ?>  <TR><TD></TD><TD COLSPAN=5><HR><B><?= $webRoot . $relDir ?>
707  </B></TD></TR>  </B></TD></TR>
708  <TR><TD></TD><TD CLASS=TOP>DOCUMENT NAME</TD>  <TR><TD></TD><TD CLASS=TOP>DOCUMENT NAME</TD>
709  <TD><?php echo $gblIcon("blank") ?></TD>  <TD><?= $gblIcon("blank") ?></TD>
710    <TD CLASS=TOP>NOTE</TD>
711  <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>
712    
713  <?php  <?php
714          if (sizeof($fileList) > 0) {          if (sizeof($fileList) > 0) {
715            sort($fileList) ;            sort($fileList) ;
716            while (list($key,$file) = each($fileList)) {              while (list($key,$file) = each($fileList)) {  
717              $path = $fsDir."/".$file ;                  $path = $fsDir."/".$file ;
718              $mod  = filemtime($path) ;                  $mod  = filemtime($path) ;
719              $sz   = filesize($path) ;                  $sz   = filesize($path) ;
   
             if ($sz >= 10240) {  
               $sz = (int)(($sz+1023)/1024) . " k" ;  
             }  
             else {  
               $sz .= " " ;  
             } // end size  
   
             $a = $b = "" ;  
   
             if ( ($mod + 30*86400) > time() ) {  
               $a  = "<SPAN CLASS=RED TITLE=\"Newer" ;  
               $a .= " than 30 days\"> * </SPAN>" ;  
             }  
720    
721              $tstr = $webRoot . $relDir . "/" . $file ;                  if ($sz >= 10240) {
722              $tstr  = "<A HREF=\"" . $tstr . "\">" ;                          $sz = (int)(($sz+1023)/1024) . " k" ;
723                    } else {
724                            $sz .= " " ;
725                    } // end size
726    
727                    $a = $b = "" ;
728    
729                    $info_url=$self."?A=E&F=".urlencode($file)."&D=".urlencode($relDir);
730    
731                    if ( ($mod + 30*86400) > time() ) {
732                            $a  = "<SPAN CLASS=RED TITLE=\"Newer" ;
733                            $a .= " than 30 days\"> * </SPAN>" ;
734                    }
735    
736                    $tstr = $webRoot . $relDir . "/" . $file ;
737                    $tstr  = "<A HREF=\"" . $tstr . "\">" ;
738    
739                  if (substr($file,0,5) != ".del/") {                  if (substr($file,0,5) != ".del/") {
740                          $tstr .= $file . "</A>" . $a ;                          $tstr .= $file . "</A>" . $a ;
741                  } else {                  } else {
742                          $tstr .= substr($file,5,strlen($file)-5) . "</a> <SPAN CLASS=RED TITLE=\"deleted\"> deleted </span>";                          $tstr .= substr($file,5,strlen($file)-5) . "</a> <SPAN CLASS=RED TITLE=\"deleted\"> <a href=\"$info_url#undelete\">deleted</a> </span>";
743                    }
744    
745    //              $b = $gblIcon("checkout");
746    //              $b .= $gblIcon("checkin");
747    
748                    $ext = strtolower(strrchr($file,".")) ;
749                    if ( $ext=="" || strstr(join(" ",$gblEditable),$ext) ) {  
750                            $b .= "<A HREF=\"" . $self . "?A=C&F=" ;
751                            $b .= urlencode($file) . "&D=" . urlencode($relDir) ;
752                            $b .= "\" TITLE=\"List contents\">" ;
753                            $b .= $gblIcon("view") . "</A>" ;
754                    } else {
755                            $b .= $gblIcon("blank");
756                  }                  }
757    
             $ext = strtolower(strrchr($file,".")) ;  
             if ( $ext=="" ||  
                  strstr(join(" ",$gblEditable),$ext) )  
             {    
               $b  = "<A HREF=\"" . $self . "?A=C&F=" ;  
               $b .= urlencode($file) . "&D=" . urlencode($relDir) ;  
               $b .= "\" TITLE=\"List contents\">" ;  
               $b .= $gblIcon("view") . "</A>" ;  
             }  
758    
759  ?>  ?>
760    
761  <TR><TD>  <TR><TD>
762  <A HREF="<?php echo $self ?>?A=E&F=<?php echo urlencode($file)  <A HREF="<?= $info_url ?>" TITLE="View/Edit">
763  ?>&D=<?php echo urlencode($relDir) ?>" TITLE="View/Edit">  <?= $gblIcon($ext) ?></A></TD>
764  <?php echo $gblIcon($ext) ?></A></TD>  <TD CLASS=LST><?= $tstr ?></TD>
765  <TD CLASS=LST><?php echo $tstr ?></TD>  <TD CLASS=LST ALIGN=center><?= $b ?></TD>
766  <TD CLASS=LST ALIGN=center><?php echo $b ?></TD>  <TD CLASS=LST ALIGN=left><a href="<?= $info_url ?>#note"><?= $gblIcon("note") ?></a><?= ReadNote($path) ?></TD>
767  <TD CLASS=LST><?php echo date("$GLOBALS[gblDateFmt] $GLOBALS[gblTimeFmt]",$mod) ?></TD>  <TD CLASS=LST><?= date("$GLOBALS[gblDateFmt] $GLOBALS[gblTimeFmt]",$mod) ?></TD>
768  <TD CLASS=LST><?php echo $sz ?>Bytes</TD></TR>  <TD CLASS=LST><?= $sz ?>Bytes</TD></TR>
769    
770  <?php  <?php
771            }  // iterate over files            }  // iterate over files
# Line 737  function Navigate($fsRoot,$relDir) { Line 774  function Navigate($fsRoot,$relDir) {
774          if ($emptyDir) {          if ($emptyDir) {
775  ?>  ?>
776    
777  <FORM METHOD="POST" ACTION="<?php echo $self ?>">  <FORM METHOD="POST" ACTION="<?= $self ?>">
778   <TR><TD></TD><TD COLSPAN=4 CLASS=BAR>   <TR><TD></TD><TD COLSPAN=5 CLASS=BAR>
779    <INPUT TYPE="HIDDEN" NAME="DIR" VALUE="<?php echo $relDir ?>">    <INPUT TYPE="HIDDEN" NAME="DIR" VALUE="<?= $relDir ?>">
780    OK TO DELETE THIS EMPTY FOLDER?    OK TO DELETE THIS EMPTY FOLDER?
781    <INPUT TYPE="CHECKBOX" NAME="CONFIRM">    <INPUT TYPE="CHECKBOX" NAME="CONFIRM">
782    <INPUT TYPE="SUBMIT" NAME="POSTACTION" VALUE="DELETE">    <INPUT TYPE="SUBMIT" NAME="POSTACTION" VALUE="DELETE">
# Line 750  function Navigate($fsRoot,$relDir) { Line 787  function Navigate($fsRoot,$relDir) {
787          } // end if emptyDir          } // end if emptyDir
788  ?>  ?>
789    
790  <TR><TD></TD><TD COLSPAN=4><HR></TD></TR>  <TR><TD></TD><TD COLSPAN=5><HR></TD></TR>
791    
792  <FORM METHOD="POST" ACTION="<?php echo $self ?>">  <FORM METHOD="POST" ACTION="<?= $self ?>">
793  <TR><TD></TD><TD COLSPAN=4 CLASS=BAR>CREATE NEW  <TR><TD></TD><TD COLSPAN=5 CLASS=BAR>CREATE NEW
794   <INPUT TYPE="RADIO" NAME="T" VALUE="D" CHECKED>DIRECTORY -OR-   <INPUT TYPE="RADIO" NAME="T" VALUE="D" CHECKED>DIRECTORY -OR-
795   <INPUT TYPE="RADIO" NAME="T" VALUE="F">FILE : &nbsp;&nbsp;   <INPUT TYPE="RADIO" NAME="T" VALUE="F">FILE : &nbsp;&nbsp;
796   <NOBR>NAME <INPUT TYPE="TEXT" NAME="FN" SIZE=14>   <NOBR>NAME <INPUT TYPE="TEXT" NAME="FN" SIZE=14>
797   <INPUT TYPE="HIDDEN" NAME="POSTACTION" VALUE="CREATE">   <INPUT TYPE="HIDDEN" NAME="POSTACTION" VALUE="CREATE">
798   <INPUT TYPE="HIDDEN" NAME="DIR" VALUE="<?php echo $relDir ?>">   <INPUT TYPE="HIDDEN" NAME="DIR" VALUE="<?= $relDir ?>">
799   <INPUT TYPE="SUBMIT" VALUE="CREATE"></NOBR>   <INPUT TYPE="SUBMIT" VALUE="CREATE"></NOBR>
800   <NOBR>OR <A HREF="<?php echo $self   <NOBR>OR <A HREF="<?= $self
801          ?>?A=U&D=<?php echo urlencode($relDir) ?>">UPLOAD</A> A FILE          ?>?A=U&D=<?= urlencode($relDir) ?>">UPLOAD</A> A FILE
802   </NOBR>   </NOBR>
803  </TD></TR>  </TD></TR>
804  </FORM>  </FORM>
# Line 781  function UploadPage($fsRoot, $relDir) { Line 818  function UploadPage($fsRoot, $relDir) {
818    
819  <P><TABLE BORDER=0 CELLPADDING=5><TR><TD WIDTH=5></TD><TD CLASS=BAR>  <P><TABLE BORDER=0 CELLPADDING=5><TR><TD WIDTH=5></TD><TD CLASS=BAR>
820  <FORM ENCTYPE="multipart/form-data" METHOD="POST"  <FORM ENCTYPE="multipart/form-data" METHOD="POST"
821   ACTION="<?php echo $self ?>">   ACTION="<?= $self ?>">
822  DESTINATION DIRECTORY:<B><?php echo " " . $relDir ?></B>  DESTINATION DIRECTORY:<B><?= " " . $relDir ?></B>
823  <P>PATHNAME OF LOCAL FILE<BR>  <P>PATHNAME OF LOCAL FILE<BR>
824  <INPUT TYPE="HIDDEN" NAME="DIR" VALUE="<?php echo $relDir ?>">  <INPUT TYPE="HIDDEN" NAME="DIR" VALUE="<?= $relDir ?>">
825  <INPUT TYPE="HIDDEN" NAME="POSTACTION" VALUE="UPLOAD">  <INPUT TYPE="HIDDEN" NAME="POSTACTION" VALUE="UPLOAD">
826  <INPUT SIZE=30 TYPE="FILE" NAME="FN"></P>  <INPUT SIZE=30 TYPE="FILE" NAME="FN"></P>
827  <P><INPUT TYPE="SUBMIT" VALUE="UPLOAD"></P>  <P><INPUT TYPE="SUBMIT" VALUE="UPLOAD"></P>
828  <P>If the <B>[BROWSE...]</B> button is not displayed,<BR>  <P>If the <B>[BROWSE...]</B> button is not displayed,<BR>
829  you must upgrade to an RFC1867-compliant browser.</P>  you must upgrade to an RFC1867-compliant browser.</P>
830  <P>Your browser:<BR><?php echo $GLOBALS["HTTP_USER_AGENT"] ?></P>  <P>Your browser:<BR><?= $GLOBALS["HTTP_USER_AGENT"] ?></P>
831  </FORM>  </FORM>
832  </TD></TR>  </TD></TR>
833  <TR><TD></TD><TD>  <TR><TD></TD><TD>
834  <FORM METHOD="POST" ACTION="<?php echo $self ?>">  <FORM METHOD="POST" ACTION="<?= $self ?>">
835  <INPUT TYPE="HIDDEN" NAME="DIR" VALUE="<?php echo $relDir ?>"><BR>  <INPUT TYPE="HIDDEN" NAME="DIR" VALUE="<?= $relDir ?>"><BR>
836  <INPUT TYPE="SUBMIT" NAME="POSTACTION" VALUE="CANCEL">  <INPUT TYPE="SUBMIT" NAME="POSTACTION" VALUE="CANCEL">
837  </FORM>  </FORM>
838  </TD></TR></TABLE></P>  </TD></TR></TABLE></P>
# Line 848  function NoEntry() { Line 885  function NoEntry() {
885          StartHTML($title,$text) ;          StartHTML($title,$text) ;
886  ?>  ?>
887    
888  <FORM ACTION="<?php echo $self ?>?HASH=create" METHOD="POST">  <FORM ACTION="<?= $self ?>?HASH=create" METHOD="POST">
889  <INPUT TYPE="HIDDEN" NAME="USER" VALUE="<?php echo $user ?>">  <INPUT TYPE="HIDDEN" NAME="USER" VALUE="<?= $user ?>">
890  <INPUT TYPE="HIDDEN" NAME="PW" VALUE="<?php echo $pw ?>">  <INPUT TYPE="HIDDEN" NAME="PW" VALUE="<?= $pw ?>">
891    
892  <BLOCKQUOTE><B>If you are a site administrator:</B><BR><BR>  <BLOCKQUOTE><B>If you are a site administrator:</B><BR><BR>
893  Click below to <B>generate a password hash</B><BR>from  Click below to <B>generate a password hash</B><BR>from
# Line 882  function Logit($target,$msg) { Line 919  function Logit($target,$msg) {
919  }  }
920    
921    
922    //////////////////////////////////////////////////////////////////
923    
924    function WriteNote($target,$msg) {
925    
926            $dir=dirname($target);
927            if (! file_exists($dir."/.note")) {
928                    mkdir($dir."/.note",0700);
929            }
930            $file=basename($target);
931    
932            $note=fopen("$dir/.note/$file","w");
933            fputs($note,"$msg\n");
934            fclose($note);
935    
936            Logit($target,"added note $msg");
937    
938    }
939    
940    function ReadNote($target) {
941    
942            $dir=dirname($target);
943            $file=basename($target);
944            $msg="";
945            if (file_exists($dir."/.note/$file")) {
946                    $note=fopen("$dir/.note/$file","r");
947                    $msg=fgets($note,4096);
948                    fclose($note);
949            }
950            return $msg;
951    
952    }
953    
954    //////////////////////////////////////////////////////////////////
955    
956    function MoveTo($source,$folder) {
957    
958            $file=basename($source);
959            if (! file_exists($folder)) {
960                    mkdir($folder,0700);
961            }
962            if (file_exists($source)) {
963                    rename($source,"$folder/$file");
964            }
965    }
966    
967  //////////////////////////////////////////////////////////////////  //////////////////////////////////////////////////////////////////
968    
# Line 963  function Logit($target,$msg) { Line 1044  function Logit($target,$msg) {
1044                  }                  }
1045                  $file=basename($target);                  $file=basename($target);
1046                  for($i=$GLOBALS[gblNumBackups]-1;$i>0;$i--) {                  for($i=$GLOBALS[gblNumBackups]-1;$i>0;$i--) {
1047                          if (! file_exists($dir."/.bak/".$i)) {                          MoveTo("$dir/.bak/$i/$file","$dir/.bak/".($i+1)."/");
                                 mkdir($dir."/.bak/".$i,0700);  
                         }  
                         if (file_exists($dir."/.bak/".$i."/".$file)) {  
                                 rename($dir."/.bak/".$i."/".$file,  
                                         $dir."/.bak/".($i+1)."/".$file);  
                         }  
                 }  
                 if (file_exists($target)) {  
                         rename($target,$dir."/.bak/1/".$file);  
1048                  }                  }
1049                    MoveTo($target,$dir."/.bak/1/".$file);
1050    
1051                  copy($source,$target) ;                  copy($source,$target) ;
1052                  chmod($target,$gblFilePerms) ;                  chmod($target,$gblFilePerms) ;
# Line 1045  function Logit($target,$msg) { Line 1118  function Logit($target,$msg) {
1118                                  if (! file_exists("$dir/.del/.log")) {                                  if (! file_exists("$dir/.del/.log")) {
1119                                          mkdir("$dir/.del/.log",0700);                                          mkdir("$dir/.del/.log",0700);
1120                                  }                                  }
1121                                  rename("$dir/.log/$file","$dir/.del/.log/$file");                                  MoveTo("$dir/.log/$file","$dir/.del/.log/");
1122                                    MoveTo("$dir/.note/$file","$dir/.del/.note/");
1123                          }                          }
1124                  }                  }
1125                  else {  // delete directory                  else {  // delete directory
# Line 1065  function Logit($target,$msg) { Line 1139  function Logit($target,$msg) {
1139                  $file=substr($FN,4,strlen($FN)-4);                  $file=substr($FN,4,strlen($FN)-4);
1140    
1141                  Logit("$fsDir/.del/$file","undeleted");                  Logit("$fsDir/.del/$file","undeleted");
1142                  rename("$fsDir/.del/$file","$fsDir/$file");                  MoveTo("$fsDir/.del/$file","$fsDir/");
1143                  rename("$fsDir/.del/.log/$file","$fsDir/.log/$file");                  MoveTo("$fsDir/.del/.log/$file","$fsDir/.log/");
1144                    MoveTo("$fsDir/.del/.note/$file","$fsDir/.note/");
1145    
1146                  break ;                  break ;
1147    
# Line 1079  function Logit($target,$msg) { Line 1154  function Logit($target,$msg) {
1154    
1155                  break ;                  break ;
1156    
1157            case "NOTE" :  
1158                    WriteNote("$fsDir/$FN","$NOTE");
1159                    break ;
1160    
1161          default :          default :
1162                  // user hit "CANCEL" or undefined action                  // user hit "CANCEL" or undefined action
1163          }          }
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.5
  ViewVC Help
Powered by ViewVC 1.1.26