/[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.3 by dpavlin, Thu Aug 3 19:35:44 2000 UTC revision 1.4 by dpavlin, Thu Aug 3 20:54:27 2000 UTC
# Line 157  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 194  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 254  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 276  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 303  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 320  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    <HR>
340    <a name="note">
341    <B>NOTE FOR "<?= $fn ; ?>":
342    <INPUT TYPE="TEXT" SIZE=50 MAXLENGTH=255 NAME="NOTE" VALUE="<?= ReadNote($fsPath) ?>">
343    </B></SPAN>
344    <INPUT TYPE="SUBMIT" NAME="POSTACTION" VALUE="NOTE">
345    
346  <?php  <?php
347          }          }
348          echo "</FORM>" ;          echo "</FORM>" ;
# Line 578  function GifIcon($txt) { Line 589  function GifIcon($txt) {
589          case "blank" :          case "blank" :
590                  $d = "blank.gif" ;                  $d = "blank.gif" ;
591                  break ;                  break ;
592            case "checkout":
593                    $d = "down.gif";
594                    break;
595            case "checkin":
596                    $d = "up.gif";
597                    break;
598            case "note":
599                    $d = "quill.gif";
600                    break;
601          default :          default :
602                  $d = "generic.gif" ;                  $d = "generic.gif" ;
603          }          }
# Line 649  function Navigate($fsRoot,$relDir) { Line 669  function Navigate($fsRoot,$relDir) {
669                  if ($parent == "") $parent = "/" ;                  if ($parent == "") $parent = "/" ;
670  ?>  ?>
671    
672  <TR><TD><?php echo $gblIcon("up") ?></TD><TD COLSPAN=4 CLASS=LST>  <TR><TD><?= $gblIcon("up") ?></TD><TD COLSPAN=5 CLASS=LST>
673  <A HREF="<?php echo $self ?>?D=<?php echo urlencode($parent) ?>">  <A HREF="<?= $self ?>?D=<?= urlencode($parent) ?>">
674  <B><?php echo $parent ?></B></A></TD></TR>  <B><?= $parent ?></B></A></TD></TR>
675    
676  <?php  <?php
677          }          }
# Line 661  function Navigate($fsRoot,$relDir) { Line 681  function Navigate($fsRoot,$relDir) {
681                  sort($dirList) ;                  sort($dirList) ;
682  ?>  ?>
683    
684  <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>
685    
686  <?php  <?php
687                  while (list($key,$dir) = each($dirList)) {                  while (list($key,$dir) = each($dirList)) {
# Line 671  function Navigate($fsRoot,$relDir) { Line 691  function Navigate($fsRoot,$relDir) {
691                          $tstr .= "\">" . $dir . "/</A>" ;                          $tstr .= "\">" . $dir . "/</A>" ;
692  ?>  ?>
693    
694  <TR><TD><?php echo $gblIcon("fldr") ?></TD>  <TR><TD><?= $gblIcon("fldr") ?></TD>
695  <TD COLSPAN=4 CLASS=LST><?php echo $tstr ?></TD></TR>  <TD COLSPAN=5 CLASS=LST><?= $tstr ?></TD></TR>
696    
697  <?php  <?php
698                  }  // iterate over dirs                  }  // iterate over dirs
699          }  // end if no dirs          }  // end if no dirs
700  ?>  ?>
701    
702  <TR><TD></TD><TD COLSPAN=4><HR><B><?php echo $webRoot . $relDir ?>  <TR><TD></TD><TD COLSPAN=5><HR><B><?= $webRoot . $relDir ?>
703  </B></TD></TR>  </B></TD></TR>
704  <TR><TD></TD><TD CLASS=TOP>DOCUMENT NAME</TD>  <TR><TD></TD><TD CLASS=TOP>DOCUMENT NAME</TD>
705  <TD><?php echo $gblIcon("blank") ?></TD>  <TD><?= $gblIcon("blank") ?></TD>
706    <TD CLASS=TOP>NOTE</TD>
707  <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>
708    
709  <?php  <?php
710          if (sizeof($fileList) > 0) {          if (sizeof($fileList) > 0) {
711            sort($fileList) ;            sort($fileList) ;
712            while (list($key,$file) = each($fileList)) {              while (list($key,$file) = each($fileList)) {  
713              $path = $fsDir."/".$file ;                  $path = $fsDir."/".$file ;
714              $mod  = filemtime($path) ;                  $mod  = filemtime($path) ;
715              $sz   = filesize($path) ;                  $sz   = filesize($path) ;
716    
717              if ($sz >= 10240) {                  if ($sz >= 10240) {
718                $sz = (int)(($sz+1023)/1024) . " k" ;                          $sz = (int)(($sz+1023)/1024) . " k" ;
719              }                  } else {
720              else {                          $sz .= " " ;
721                $sz .= " " ;                  } // end size
             } // end size  
   
             $a = $b = "" ;  
   
             if ( ($mod + 30*86400) > time() ) {  
               $a  = "<SPAN CLASS=RED TITLE=\"Newer" ;  
               $a .= " than 30 days\"> * </SPAN>" ;  
             }  
722    
723              $tstr = $webRoot . $relDir . "/" . $file ;                  $a = $b = "" ;
724              $tstr  = "<A HREF=\"" . $tstr . "\">" ;  
725                    $info_url=$self."?A=E&F=".urlencode($file)."&D=".urlencode($relDir);
726    
727                    if ( ($mod + 30*86400) > time() ) {
728                            $a  = "<SPAN CLASS=RED TITLE=\"Newer" ;
729                            $a .= " than 30 days\"> * </SPAN>" ;
730                    }
731    
732                    $tstr = $webRoot . $relDir . "/" . $file ;
733                    $tstr  = "<A HREF=\"" . $tstr . "\">" ;
734    
735                  if (substr($file,0,5) != ".del/") {                  if (substr($file,0,5) != ".del/") {
736                          $tstr .= $file . "</A>" . $a ;                          $tstr .= $file . "</A>" . $a ;
737                  } else {                  } else {
738                          $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>";
739                    }
740    
741    //              $b = $gblIcon("checkout");
742    //              $b .= $gblIcon("checkin");
743    
744                    $ext = strtolower(strrchr($file,".")) ;
745                    if ( $ext=="" || strstr(join(" ",$gblEditable),$ext) ) {  
746                            $b .= "<A HREF=\"" . $self . "?A=C&F=" ;
747                            $b .= urlencode($file) . "&D=" . urlencode($relDir) ;
748                            $b .= "\" TITLE=\"List contents\">" ;
749                            $b .= $gblIcon("view") . "</A>" ;
750                    } else {
751                            $b .= $gblIcon("blank");
752                  }                  }
753    
             $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>" ;  
             }  
754    
755  ?>  ?>
756    
757  <TR><TD>  <TR><TD>
758  <A HREF="<?php echo $self ?>?A=E&F=<?php echo urlencode($file)  <A HREF="<?= $info_url ?>" TITLE="View/Edit">
759  ?>&D=<?php echo urlencode($relDir) ?>" TITLE="View/Edit">  <?= $gblIcon($ext) ?></A></TD>
760  <?php echo $gblIcon($ext) ?></A></TD>  <TD CLASS=LST><?= $tstr ?></TD>
761  <TD CLASS=LST><?php echo $tstr ?></TD>  <TD CLASS=LST ALIGN=center><?= $b ?></TD>
762  <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>
763  <TD CLASS=LST><?php echo date("$GLOBALS[gblDateFmt] $GLOBALS[gblTimeFmt]",$mod) ?></TD>  <TD CLASS=LST><?= date("$GLOBALS[gblDateFmt] $GLOBALS[gblTimeFmt]",$mod) ?></TD>
764  <TD CLASS=LST><?php echo $sz ?>Bytes</TD></TR>  <TD CLASS=LST><?= $sz ?>Bytes</TD></TR>
765    
766  <?php  <?php
767            }  // iterate over files            }  // iterate over files
# Line 744  function Navigate($fsRoot,$relDir) { Line 770  function Navigate($fsRoot,$relDir) {
770          if ($emptyDir) {          if ($emptyDir) {
771  ?>  ?>
772    
773  <FORM METHOD="POST" ACTION="<?php echo $self ?>">  <FORM METHOD="POST" ACTION="<?= $self ?>">
774   <TR><TD></TD><TD COLSPAN=4 CLASS=BAR>   <TR><TD></TD><TD COLSPAN=5 CLASS=BAR>
775    <INPUT TYPE="HIDDEN" NAME="DIR" VALUE="<?php echo $relDir ?>">    <INPUT TYPE="HIDDEN" NAME="DIR" VALUE="<?= $relDir ?>">
776    OK TO DELETE THIS EMPTY FOLDER?    OK TO DELETE THIS EMPTY FOLDER?
777    <INPUT TYPE="CHECKBOX" NAME="CONFIRM">    <INPUT TYPE="CHECKBOX" NAME="CONFIRM">
778    <INPUT TYPE="SUBMIT" NAME="POSTACTION" VALUE="DELETE">    <INPUT TYPE="SUBMIT" NAME="POSTACTION" VALUE="DELETE">
# Line 757  function Navigate($fsRoot,$relDir) { Line 783  function Navigate($fsRoot,$relDir) {
783          } // end if emptyDir          } // end if emptyDir
784  ?>  ?>
785    
786  <TR><TD></TD><TD COLSPAN=4><HR></TD></TR>  <TR><TD></TD><TD COLSPAN=5><HR></TD></TR>
787    
788  <FORM METHOD="POST" ACTION="<?php echo $self ?>">  <FORM METHOD="POST" ACTION="<?= $self ?>">
789  <TR><TD></TD><TD COLSPAN=4 CLASS=BAR>CREATE NEW  <TR><TD></TD><TD COLSPAN=5 CLASS=BAR>CREATE NEW
790   <INPUT TYPE="RADIO" NAME="T" VALUE="D" CHECKED>DIRECTORY -OR-   <INPUT TYPE="RADIO" NAME="T" VALUE="D" CHECKED>DIRECTORY -OR-
791   <INPUT TYPE="RADIO" NAME="T" VALUE="F">FILE : &nbsp;&nbsp;   <INPUT TYPE="RADIO" NAME="T" VALUE="F">FILE : &nbsp;&nbsp;
792   <NOBR>NAME <INPUT TYPE="TEXT" NAME="FN" SIZE=14>   <NOBR>NAME <INPUT TYPE="TEXT" NAME="FN" SIZE=14>
793   <INPUT TYPE="HIDDEN" NAME="POSTACTION" VALUE="CREATE">   <INPUT TYPE="HIDDEN" NAME="POSTACTION" VALUE="CREATE">
794   <INPUT TYPE="HIDDEN" NAME="DIR" VALUE="<?php echo $relDir ?>">   <INPUT TYPE="HIDDEN" NAME="DIR" VALUE="<?= $relDir ?>">
795   <INPUT TYPE="SUBMIT" VALUE="CREATE"></NOBR>   <INPUT TYPE="SUBMIT" VALUE="CREATE"></NOBR>
796   <NOBR>OR <A HREF="<?php echo $self   <NOBR>OR <A HREF="<?= $self
797          ?>?A=U&D=<?php echo urlencode($relDir) ?>">UPLOAD</A> A FILE          ?>?A=U&D=<?= urlencode($relDir) ?>">UPLOAD</A> A FILE
798   </NOBR>   </NOBR>
799  </TD></TR>  </TD></TR>
800  </FORM>  </FORM>
# Line 788  function UploadPage($fsRoot, $relDir) { Line 814  function UploadPage($fsRoot, $relDir) {
814    
815  <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>
816  <FORM ENCTYPE="multipart/form-data" METHOD="POST"  <FORM ENCTYPE="multipart/form-data" METHOD="POST"
817   ACTION="<?php echo $self ?>">   ACTION="<?= $self ?>">
818  DESTINATION DIRECTORY:<B><?php echo " " . $relDir ?></B>  DESTINATION DIRECTORY:<B><?= " " . $relDir ?></B>
819  <P>PATHNAME OF LOCAL FILE<BR>  <P>PATHNAME OF LOCAL FILE<BR>
820  <INPUT TYPE="HIDDEN" NAME="DIR" VALUE="<?php echo $relDir ?>">  <INPUT TYPE="HIDDEN" NAME="DIR" VALUE="<?= $relDir ?>">
821  <INPUT TYPE="HIDDEN" NAME="POSTACTION" VALUE="UPLOAD">  <INPUT TYPE="HIDDEN" NAME="POSTACTION" VALUE="UPLOAD">
822  <INPUT SIZE=30 TYPE="FILE" NAME="FN"></P>  <INPUT SIZE=30 TYPE="FILE" NAME="FN"></P>
823  <P><INPUT TYPE="SUBMIT" VALUE="UPLOAD"></P>  <P><INPUT TYPE="SUBMIT" VALUE="UPLOAD"></P>
824  <P>If the <B>[BROWSE...]</B> button is not displayed,<BR>  <P>If the <B>[BROWSE...]</B> button is not displayed,<BR>
825  you must upgrade to an RFC1867-compliant browser.</P>  you must upgrade to an RFC1867-compliant browser.</P>
826  <P>Your browser:<BR><?php echo $GLOBALS["HTTP_USER_AGENT"] ?></P>  <P>Your browser:<BR><?= $GLOBALS["HTTP_USER_AGENT"] ?></P>
827  </FORM>  </FORM>
828  </TD></TR>  </TD></TR>
829  <TR><TD></TD><TD>  <TR><TD></TD><TD>
830  <FORM METHOD="POST" ACTION="<?php echo $self ?>">  <FORM METHOD="POST" ACTION="<?= $self ?>">
831  <INPUT TYPE="HIDDEN" NAME="DIR" VALUE="<?php echo $relDir ?>"><BR>  <INPUT TYPE="HIDDEN" NAME="DIR" VALUE="<?= $relDir ?>"><BR>
832  <INPUT TYPE="SUBMIT" NAME="POSTACTION" VALUE="CANCEL">  <INPUT TYPE="SUBMIT" NAME="POSTACTION" VALUE="CANCEL">
833  </FORM>  </FORM>
834  </TD></TR></TABLE></P>  </TD></TR></TABLE></P>
# Line 855  function NoEntry() { Line 881  function NoEntry() {
881          StartHTML($title,$text) ;          StartHTML($title,$text) ;
882  ?>  ?>
883    
884  <FORM ACTION="<?php echo $self ?>?HASH=create" METHOD="POST">  <FORM ACTION="<?= $self ?>?HASH=create" METHOD="POST">
885  <INPUT TYPE="HIDDEN" NAME="USER" VALUE="<?php echo $user ?>">  <INPUT TYPE="HIDDEN" NAME="USER" VALUE="<?= $user ?>">
886  <INPUT TYPE="HIDDEN" NAME="PW" VALUE="<?php echo $pw ?>">  <INPUT TYPE="HIDDEN" NAME="PW" VALUE="<?= $pw ?>">
887    
888  <BLOCKQUOTE><B>If you are a site administrator:</B><BR><BR>  <BLOCKQUOTE><B>If you are a site administrator:</B><BR><BR>
889  Click below to <B>generate a password hash</B><BR>from  Click below to <B>generate a password hash</B><BR>from
# Line 889  function Logit($target,$msg) { Line 915  function Logit($target,$msg) {
915  }  }
916    
917    
918    //////////////////////////////////////////////////////////////////
919    
920    function WriteNote($target,$msg) {
921    
922            $dir=dirname($target);
923            if (! file_exists($dir."/.note")) {
924                    mkdir($dir."/.note",0700);
925            }
926            $file=basename($target);
927    
928            $note=fopen("$dir/.note/$file","w");
929            fputs($note,"$msg\n");
930            fclose($note);
931    
932            Logit($target,"added note $msg");
933    
934    }
935    
936    function ReadNote($target) {
937    
938            $dir=dirname($target);
939            $file=basename($target);
940            $msg="";
941            if (file_exists($dir."/.note/$file")) {
942                    $note=fopen("$dir/.note/$file","r");
943                    $msg=fgets($note,4096);
944                    fclose($note);
945            }
946            return $msg;
947    
948    }
949    
950    //////////////////////////////////////////////////////////////////
951    
952    function MoveTo($source,$folder) {
953    
954            $file=basename($source);
955            if (! file_exists($folder)) {
956                    mkdir($folder,0700);
957            }
958            if (file_exists($source)) {
959                    rename($source,"$folder/$file");
960            }
961    }
962    
963  //////////////////////////////////////////////////////////////////  //////////////////////////////////////////////////////////////////
964    
# Line 970  function Logit($target,$msg) { Line 1040  function Logit($target,$msg) {
1040                  }                  }
1041                  $file=basename($target);                  $file=basename($target);
1042                  for($i=$GLOBALS[gblNumBackups]-1;$i>0;$i--) {                  for($i=$GLOBALS[gblNumBackups]-1;$i>0;$i--) {
1043                          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);  
1044                  }                  }
1045                    MoveTo($target,$dir."/.bak/1/".$file);
1046    
1047                  copy($source,$target) ;                  copy($source,$target) ;
1048                  chmod($target,$gblFilePerms) ;                  chmod($target,$gblFilePerms) ;
# Line 1052  function Logit($target,$msg) { Line 1114  function Logit($target,$msg) {
1114                                  if (! file_exists("$dir/.del/.log")) {                                  if (! file_exists("$dir/.del/.log")) {
1115                                          mkdir("$dir/.del/.log",0700);                                          mkdir("$dir/.del/.log",0700);
1116                                  }                                  }
1117                                  rename("$dir/.log/$file","$dir/.del/.log/$file");                                  MoveTo("$dir/.log/$file","$dir/.del/.log/");
1118                                    MoveTo("$dir/.note/$file","$dir/.del/.note/");
1119                          }                          }
1120                  }                  }
1121                  else {  // delete directory                  else {  // delete directory
# Line 1072  function Logit($target,$msg) { Line 1135  function Logit($target,$msg) {
1135                  $file=substr($FN,4,strlen($FN)-4);                  $file=substr($FN,4,strlen($FN)-4);
1136    
1137                  Logit("$fsDir/.del/$file","undeleted");                  Logit("$fsDir/.del/$file","undeleted");
1138                  rename("$fsDir/.del/$file","$fsDir/$file");                  MoveTo("$fsDir/.del/$file","$fsDir/");
1139                  rename("$fsDir/.del/.log/$file","$fsDir/.log/$file");                  MoveTo("$fsDir/.del/.log/$file","$fsDir/.log/");
1140                    MoveTo("$fsDir/.del/.note/$file","$fsDir/.note/");
1141    
1142                  break ;                  break ;
1143    
# Line 1086  function Logit($target,$msg) { Line 1150  function Logit($target,$msg) {
1150    
1151                  break ;                  break ;
1152    
1153            case "NOTE" :  
1154                    WriteNote("$fsDir/$FN","$NOTE");
1155                    break ;
1156    
1157          default :          default :
1158                  // user hit "CANCEL" or undefined action                  // user hit "CANCEL" or undefined action
1159          }          }

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

  ViewVC Help
Powered by ViewVC 1.1.26