files/index.php

   1 <?php // $Id$
   2
   3 //  Manage all uploaded files in a course file area
   4
   5 //  All the Moodle-specific stuff is in this top section
   6 //  Configuration and access control occurs here.
   7 //  Must define:  USER, basedir, baseweb, html_header and html_footer
   8 //  USER is a persistent variable using sessions
   9
  10     require('../config.php');
  11     require($CFG->libdir.'/filelib.php');
  12     require($CFG->libdir.'/adminlib.php');
  13
  14     $id      = required_param('id', PARAM_INT);
  15     $file    = optional_param('file', '', PARAM_PATH);
  16     $wdir    = optional_param('wdir', '', PARAM_PATH);
  17     $action  = optional_param('action', '', PARAM_ACTION);
  18     $name    = optional_param('name', '', PARAM_FILE);
  19     $oldname = optional_param('oldname', '', PARAM_FILE);
  20     $choose  = optional_param('choose', '', PARAM_FILE); //in fact it is always 'formname.inputname'
  21     $userfile= optional_param('userfile','',PARAM_FILE);
  22     $save    = optional_param('save', 0, PARAM_BOOL);
  23     $text    = optional_param('text', '', PARAM_RAW);
  24     $confirm = optional_param('confirm', 0, PARAM_BOOL);
  25
  26     if ($choose) {
  27         if (count(explode('.', $choose)) > 2) {
  28             error('Incorrect format for choose parameter');
  29         }
  30     }
  31
  32
  33     if (! $course = get_record("course", "id", $id) ) {
  34         error("That's an invalid course id");
  35     }
  36
  37     require_login($course);
  38
  39     require_capability('moodle/course:managefiles', get_context_instance(CONTEXT_COURSE, $course->id));
  40
  41     function html_footer() {
  42         global $course, $choose, $adminroot;
  43
  44         echo '</td></tr></table>';
  45
  46         if ($course->id == SITEID) {
  47                 admin_externalpage_print_footer($adminroot);
  48         } else {
  49             print_footer($course);
  50         }
  51     }
  52
  53     function html_header($course, $wdir, $formfield=""){
  54         global $CFG, $ME, $choose;
  55
  56         if ($course->id == SITEID) {
  57             $strfiles = get_string("sitefiles");
  58         } else {
  59             $strfiles = get_string("files");
  60         }
  61
  62         if ($wdir == "/") {
  63             $fullnav = "$strfiles";
  64         } else {
  65             $dirs = explode("/", $wdir);
  66             $numdirs = count($dirs);
  67             $link = "";
  68             $navigation = "";
  69             for ($i=1; $i<$numdirs-1; $i++) {
  70                $navigation .= " -> ";
  71                $link .= "/".urlencode($dirs[$i]);
  72                $navigation .= "<a href=\"".$ME."?id=$course->id&amp;wdir=$link&amp;choose=$choose\">".$dirs[$i]."</a>";
  73             }
  74             $fullnav = "<a href=\"".$ME."?id=$course->id&amp;wdir=/&amp;choose=$choose\">$strfiles</a> $navigation -> ".$dirs[$numdirs-1];
  75         }
  76
  77
  78         if ($choose) {
  79             print_header();
  80
  81             $chooseparts = explode('.', $choose);
  82             if (count($chooseparts)==2){
  83             ?>
  84             <script type="text/javascript">
  85             //<![CDATA[
  86             function set_value(txt) {
  87                 opener.document.forms['<?php echo $chooseparts[0]."'].".$chooseparts[1] ?>.value = txt;
  88                 window.close();
  89             }
  90             //]]>
  91             </script>
  92
  93             <?php
  94             } elseif (count($chooseparts)==1){
  95             ?>
  96             <script type="text/javascript">
  97             //<![CDATA[
  98             function set_value(txt) {
  99                 opener.document.getElementById('<?php echo $chooseparts[0] ?>').value = txt;
 100                 window.close();
 101             }
 102             //]]>
 103             </script>
 104
 105             <?php
 106
 107             }
 108             $fullnav = str_replace('->', '&raquo;', "$course->shortname -> $fullnav");
 109             echo '<div id="nav-bar">'.$fullnav.'</div>';
 110
 111             if ($course->id == SITEID and $wdir != "/backupdata") {
 112                 print_heading(get_string("publicsitefileswarning"), "center", 2);
 113             }
 114
 115         } else {
 116
 117             if ($course->id == SITEID) {
 118
 119                 if ($wdir == "/backupdata") {
 120                     $adminroot = admin_get_root();
 121                     admin_externalpage_setup('frontpagerestore', $adminroot);
 122                     admin_externalpage_print_header($adminroot);
 123                 } else {
 124                     $adminroot = admin_get_root();
 125                     admin_externalpage_setup('sitefiles', $adminroot);
 126                     admin_externalpage_print_header($adminroot);
 127
 128                     print_heading(get_string("publicsitefileswarning"), "center", 2);
 129
 130                 }
 131
 132             } else {
 133                 print_header("$course->shortname: $strfiles", $course->fullname,
 134                              "<a href=\"../course/view.php?id=$course->id\">$course->shortname".
 135                              "</a> -> $fullnav", $formfield);
 136             }
 137         }
 138
 139
 140         echo "<table border=\"0\" style=\"margin-left:auto;margin-right:auto\" cellspacing=\"3\" cellpadding=\"3\" width=\"640\">";
 141         echo "<tr>";
 142         echo "<td colspan=\"2\">";
 143
 144     }
 145
 146
 147     if (! $basedir = make_upload_directory("$course->id")) {
 148         error("The site administrator needs to fix the file permissions");
 149     }
 150
 151     $baseweb = $CFG->wwwroot;
 152
 153 //  End of configuration and access control
 154
 155
 156     if ($wdir == '') {
 157         $wdir = "/";
 158     }
 159
 160     if ($wdir{0} != '/') {  //make sure $wdir starts with slash
 161         $wdir = "/".$wdir;
 162     }
 163
 164     if ($wdir == "/backupdata") {
 165         if (! make_upload_directory("$course->id/backupdata")) {   // Backup folder
 166             error("Could not create backupdata folder.  The site administrator needs to fix the file permissions");
 167         }
 168     }
 169
 170     if (!is_dir($basedir.$wdir)) {
 171         html_header($course, $wdir);
 172         error("Requested directory does not exist.", "$CFG->wwwroot/files/index.php?id=$id");
 173     }
 174
 175     switch ($action) {
 176
 177         case "upload":
 178             html_header($course, $wdir);
 179             require_once($CFG->dirroot.'/lib/uploadlib.php');
 180
 181             if ($save and confirm_sesskey()) {
 182                 $course->maxbytes = 0;  // We are ignoring course limits
 183                 $um = new upload_manager('userfile',false,false,$course,false,0);
 184                 $dir = "$basedir$wdir";
 185                 if ($um->process_file_uploads($dir)) {
 186                     notify(get_string('uploadedfile'));
 187                 }
 188                 // um will take care of error reporting.
 189                 displaydir($wdir);
 190             } else {
 191                 $upload_max_filesize = get_max_upload_file_size($CFG->maxbytes);
 192                 $filesize = display_size($upload_max_filesize);
 193
 194                 $struploadafile = get_string("uploadafile");
 195                 $struploadthisfile = get_string("uploadthisfile");
 196                 $strmaxsize = get_string("maxsize", "", $filesize);
 197                 $strcancel = get_string("cancel");
 198
 199                 echo "<p>$struploadafile ($strmaxsize) --> <b>$wdir</b></p>";
 200                 echo "<form enctype=\"multipart/form-data\" method=\"post\" action=\"index.php\">";
 201                 echo "<div>";
 202                 echo "<table><tr><td colspan=\"2\">";
 203                 echo ' <input type="hidden" name="choose" value="'.$choose.'" />';
 204                 echo " <input type=\"hidden\" name=\"id\" value=\"$id\" />";
 205                 echo " <input type=\"hidden\" name=\"wdir\" value=\"$wdir\" />";
 206                 echo " <input type=\"hidden\" name=\"action\" value=\"upload\" />";
 207                 echo " <input type=\"hidden\" name=\"sesskey\" value=\"$USER->sesskey\" />";
 208                 upload_print_form_fragment(1,array('userfile'),null,false,null,$upload_max_filesize,0,false);
 209                 echo " </td></tr></table>";
 210                 echo " <input type=\"submit\" name=\"save\" value=\"$struploadthisfile\" />";
 211                 echo "</form>";
 212                 echo "<form action=\"index.php\" method=\"get\">";
 213                 echo ' <input type="hidden" name="choose" value="'.$choose.'" />';
 214                 echo " <input type=\"hidden\" name=\"id\" value=\"$id\" />";
 215                 echo " <input type=\"hidden\" name=\"wdir\" value=\"$wdir\" />";
 216                 echo " <input type=\"hidden\" name=\"action\" value=\"cancel\" />";
 217                 echo " <input type=\"submit\" value=\"$strcancel\" />";
 218                 echo "</div>";
 219                 echo "</form>";
 220             }
 221             html_footer();
 222             break;
 223
 224         case "delete":
 225             if ($confirm and confirm_sesskey()) {
 226                 html_header($course, $wdir);
 227                 if (!empty($USER->filelist)) {
 228                     foreach ($USER->filelist as $file) {
 229                         $fullfile = $basedir.'/'.$file;
 230                         if (! fulldelete($fullfile)) {
 231                             echo "<br />Error: Could not delete: $fullfile";
 232                         }
 233                     }
 234                 }
 235                 clearfilelist();
 236                 displaydir($wdir);
 237                 html_footer();
 238
 239             } else {
 240                 html_header($course, $wdir);
 241
 242                 if (setfilelist($_POST)) {
 243                     notify(get_string('deletecheckwarning').':');
 244                     print_simple_box_start("center");
 245                     printfilelist($USER->filelist);
 246                     print_simple_box_end();
 247                     echo "<br />";
 248
 249                     require_once($CFG->dirroot.'/mod/resource/lib.php');
 250                     $block = resource_delete_warning($course, $USER->filelist);
 251
 252                     if (empty($CFG->resource_blockdeletingfile) or $block == '') {
 253                         $optionsyes = array('id'=>$id, 'wdir'=>$wdir, 'action'=>'delete', 'confirm'=>1, 'sesskey'=>sesskey(), 'choose'=>$choose);
 254                         $optionsno  = array('id'=>$id, 'wdir'=>$wdir, 'action'=>'cancel', 'choose'=>$choose);
 255                         notice_yesno (get_string('deletecheckfiles'), 'index.php', 'index.php', $optionsyes, $optionsno, 'post', 'get');
 256                     } else {
 257
 258                         notify(get_string('warningblockingdelete', 'resource'));
 259                         $options  = array('id'=>$id, 'wdir'=>$wdir, 'action'=>'cancel', 'choose'=>$choose);
 260                         print_continue("index.php?id=$id&amp;wdir=$wdir&amp;action=cancel&amp;choose=$choose");
 261                     }
 262                 } else {
 263                     displaydir($wdir);
 264                 }
 265                 html_footer();
 266             }
 267             break;
 268
 269         case "move":
 270             html_header($course, $wdir);
 271             if (($count = setfilelist($_POST)) and confirm_sesskey()) {
 272                 $USER->fileop     = $action;
 273                 $USER->filesource = $wdir;
 274                 echo "<p class=\"centerpara\">";
 275                 print_string("selectednowmove", "moodle", $count);
 276                 echo "</p>";
 277             }
 278             displaydir($wdir);
 279             html_footer();
 280             break;
 281
 282         case "paste":
 283             html_header($course, $wdir);
 284             if (isset($USER->fileop) and ($USER->fileop == "move") and confirm_sesskey()) {
 285                 foreach ($USER->filelist as $file) {
 286                     $shortfile = basename($file);
 287                     $oldfile = $basedir.'/'.$file;
 288                     $newfile = $basedir.$wdir."/".$shortfile;
 289                     if (!rename($oldfile, $newfile)) {
 290                         echo "<p>Error: $shortfile not moved</p>";
 291                     }
 292                 }
 293             }
 294             clearfilelist();
 295             displaydir($wdir);
 296             html_footer();
 297             break;
 298
 299         case "rename":
 300             if (($name != '') and confirm_sesskey()) {
 301                 html_header($course, $wdir);
 302                 $name = clean_filename($name);
 303                 if (file_exists($basedir.$wdir."/".$name)) {
 304                     echo "<center>Error: $name already exists!</center>";
 305                 } else if (!rename($basedir.$wdir."/".$oldname, $basedir.$wdir."/".$name)) {
 306                     echo "<p align=\"center\">Error: could not rename $oldname to $name</p>";
 307                 } else {
 308                     //file was renamed now update resources if needed
 309                     require_once($CFG->dirroot.'/mod/resource/lib.php');
 310                     resource_renamefiles($course, $wdir, $oldname, $name);
 311                 }
 312                 displaydir($wdir);
 313
 314             } else {
 315                 $strrename = get_string("rename");
 316                 $strcancel = get_string("cancel");
 317                 $strrenamefileto = get_string("renamefileto", "moodle", $file);
 318                 html_header($course, $wdir, "form.name");
 319                 echo "<p>$strrenamefileto:</p>";
 320                 echo "<table><tr><td>";
 321                 echo "<form action=\"index.php\" method=\"post\">";
 322                 echo "<fieldset class=\"invisiblefieldset\">";
 323                 echo ' <input type="hidden" name="choose" value="'.$choose.'" />';
 324                 echo " <input type=\"hidden\" name=\"id\" value=\"$id\" />";
 325                 echo " <input type=\"hidden\" name=\"wdir\" value=\"$wdir\" />";
 326                 echo " <input type=\"hidden\" name=\"action\" value=\"rename\" />";
 327                 echo " <input type=\"hidden\" name=\"oldname\" value=\"$file\" />";
 328                 echo " <input type=\"hidden\" name=\"sesskey\" value=\"$USER->sesskey\" />";
 329                 echo " <input type=\"text\" name=\"name\" size=\"35\" value=\"$file\" />";
 330                 echo " <input type=\"submit\" value=\"$strrename\" />";
 331                 echo "</fieldset>";
 332                 echo "</form>";
 333                 echo "</td><td>";
 334                 echo "<form action=\"index.php\" method=\"get\">";
 335                 echo "<div>";
 336                 echo ' <input type="hidden" name="choose" value="'.$choose.'" />';
 337                 echo " <input type=\"hidden\" name=\"id\" value=\"$id\" />";
 338                 echo " <input type=\"hidden\" name=\"wdir\" value=\"$wdir\" />";
 339                 echo " <input type=\"hidden\" name=\"action\" value=\"cancel\" />";
 340                 echo " <input type=\"submit\" value=\"$strcancel\" />";
 341                 echo "</div>";
 342                 echo "</form>";
 343                 echo "</td></tr></table>";
 344             }
 345             html_footer();
 346             break;
 347
 348         case "makedir":
 349             if (($name != '') and confirm_sesskey()) {
 350                 html_header($course, $wdir);
 351                 $name = clean_filename($name);
 352                 if (file_exists("$basedir$wdir/$name")) {
 353                     echo "Error: $name already exists!";
 354                 } else if (! make_upload_directory("$course->id$wdir/$name")) {
 355                     echo "Error: could not create $name";
 356                 }
 357                 displaydir($wdir);
 358
 359             } else {
 360                 $strcreate = get_string("create");
 361                 $strcancel = get_string("cancel");
 362                 $strcreatefolder = get_string("createfolder", "moodle", $wdir);
 363                 html_header($course, $wdir, "form.name");
 364                 echo "<p>$strcreatefolder:</p>";
 365                 echo "<table><tr><td>";
 366                 echo "<form action=\"index.php\" method=\"post\">";
 367                 echo "<fieldset class=\"invisiblefieldset\">";
 368                 echo ' <input type="hidden" name="choose" value="'.$choose.'" />';
 369                 echo " <input type=\"hidden\" name=\"id\" value=\"$id\" />";
 370                 echo " <input type=\"hidden\" name=\"wdir\" value=\"$wdir\" />";
 371                 echo " <input type=\"hidden\" name=\"action\" value=\"makedir\" />";
 372                 echo " <input type=\"text\" name=\"name\" size=\"35\" />";
 373                 echo " <input type=\"hidden\" name=\"sesskey\" value=\"$USER->sesskey\" />";
 374                 echo " <input type=\"submit\" value=\"$strcreate\" />";
 375                 echo "</fieldset>";
 376                 echo "</form>";
 377                 echo "</td><td>";
 378                 echo "<form action=\"index.php\" method=\"get\">";
 379                 echo "<div>";
 380                 echo ' <input type="hidden" name="choose" value="'.$choose.'" />';
 381                 echo " <input type=\"hidden\" name=\"id\" value=\"$id\" />";
 382                 echo " <input type=\"hidden\" name=\"wdir\" value=\"$wdir\" />";
 383                 echo " <input type=\"hidden\" name=\"action\" value=\"cancel\" />";
 384                 echo " <input type=\"submit\" value=\"$strcancel\" />";
 385                 echo "</div>";
 386                 echo "</form>";
 387                 echo "</td></tr></table>";
 388             }
 389             html_footer();
 390             break;
 391
 392         case "edit":
 393             html_header($course, $wdir);
 394             if (($text != '') and confirm_sesskey()) {
 395                 $fileptr = fopen($basedir.'/'.$file,"w");
 396                 $text = preg_replace('/\x0D/', '', $text);  // http://moodle.org/mod/forum/discuss.php?d=38860
 397                 fputs($fileptr, stripslashes($text));
 398                 fclose($fileptr);
 399                 displaydir($wdir);
 400
 401             } else {
 402                 $streditfile = get_string("edit", "", "<b>$file</b>");
 403                 $fileptr  = fopen($basedir.'/'.$file, "r");
 404                 $contents = fread($fileptr, filesize($basedir.'/'.$file));
 405                 fclose($fileptr);
 406
 407                 if (mimeinfo("type", $file) == "text/html") {
 408                     $usehtmleditor = can_use_html_editor();
 409                 } else {
 410                     $usehtmleditor = false;
 411                 }
 412                 $usehtmleditor = false;    // Always keep it off for now
 413
 414                 print_heading("$streditfile");
 415
 416                 echo "<table><tr><td colspan=\"2\">";
 417                 echo "<form action=\"index.php\" method=\"post\">";
 418                 echo "<div>";
 419                 echo ' <input type="hidden" name="choose" value="'.$choose.'" />';
 420                 echo " <input type=\"hidden\" name=\"id\" value=\"$id\" />";
 421                 echo " <input type=\"hidden\" name=\"wdir\" value=\"$wdir\" />";
 422                 echo " <input type=\"hidden\" name=\"file\" value=\"$file\" />";
 423                 echo " <input type=\"hidden\" name=\"action\" value=\"edit\" />";
 424                 echo " <input type=\"hidden\" name=\"sesskey\" value=\"$USER->sesskey\" />";
 425                 print_textarea($usehtmleditor, 25, 80, 680, 400, "text", $contents);
 426                 echo "</td></tr><tr><td>";
 427                 echo " <input type=\"submit\" value=\"".get_string("savechanges")."\" />";
 428                 echo "</div>";
 429                 echo "</form>";
 430                 echo "</td><td>";
 431                 echo "<form action=\"index.php\" method=\"get\">";
 432                 echo "<div>";
 433                 echo ' <input type="hidden" name="choose" value="'.$choose.'" />';
 434                 echo " <input type=\"hidden\" name=\"id\" value=\"$id\" />";
 435                 echo " <input type=\"hidden\" name=\"wdir\" value=\"$wdir\" />";
 436                 echo " <input type=\"hidden\" name=\"action\" value=\"cancel\" />";
 437                 echo " <input type=\"submit\" value=\"".get_string("cancel")."\" />";
 438                 echo "</div>";
 439                 echo "</form>";
 440                 echo "</td></tr></table>";
 441
 442                 if ($usehtmleditor) {
 443                     use_html_editor();
 444                 }
 445
 446
 447             }
 448             html_footer();
 449             break;
 450
 451         case "zip":
 452             if (($name != '') and confirm_sesskey()) {
 453                 html_header($course, $wdir);
 454                 $name = clean_filename($name);
 455
 456                 $files = array();
 457                 foreach ($USER->filelist as $file) {
 458                    $files[] = "$basedir/$file";
 459                 }
 460
 461                 if (!zip_files($files,"$basedir$wdir/$name")) {
 462                     error(get_string("zipfileserror","error"));
 463                 }
 464
 465                 clearfilelist();
 466                 displaydir($wdir);
 467
 468             } else {
 469                 html_header($course, $wdir, "form.name");
 470
 471                 if (setfilelist($_POST)) {
 472                     echo "<p align=\"center\">".get_string("youareabouttocreatezip").":</p>";
 473                     print_simple_box_start("center");
 474                     printfilelist($USER->filelist);
 475                     print_simple_box_end();
 476                     echo "<br />";
 477                     echo "<p align=\"center\">".get_string("whattocallzip")."</p>";
 478                     echo "<table><tr><td>";
 479                     echo "<form action=\"index.php\" method=\"post\">";
 480                     echo "<fieldset class=\"invisiblefieldset\">";
 481                     echo ' <input type="hidden" name="choose" value="'.$choose.'" />';
 482                     echo " <input type=\"hidden\" name=\"id\" value=\"$id\" />";
 483                     echo " <input type=\"hidden\" name=\"wdir\" value=\"$wdir\" />";
 484                     echo " <input type=\"hidden\" name=\"action\" value=\"zip\" />";
 485                     echo " <input type=\"text\" name=\"name\" size=\"35\" value=\"new.zip\" />";
 486                     echo " <input type=\"hidden\" name=\"sesskey\" value=\"$USER->sesskey\" />";
 487                     echo " <input type=\"submit\" value=\"".get_string("createziparchive")."\" />";
 488                     echo "<fieldset>";
 489                     echo "</form>";
 490                     echo "</td><td>";
 491                     echo "<form action=\"index.php\" method=\"get\">";
 492                     echo "<div>";
 493                     echo ' <input type="hidden" name="choose" value="'.$choose.'" />';
 494                     echo " <input type=\"hidden\" name=\"id\" value=\"$id\" />";
 495                     echo " <input type=\"hidden\" name=\"wdir\" value=\"$wdir\" />";
 496                     echo " <input type=\"hidden\" name=\"action\" value=\"cancel\" />";
 497                     echo " <input type=\"submit\" value=\"".get_string("cancel")."\" />";
 498                     echo "</div>";
 499                     echo "</form>";
 500                     echo "</td></tr></table>";
 501                 } else {
 502                     displaydir($wdir);
 503                     clearfilelist();
 504                 }
 505             }
 506             html_footer();
 507             break;
 508
 509         case "unzip":
 510             html_header($course, $wdir);
 511             if (($file != '') and confirm_sesskey()) {
 512                 $strok = get_string("ok");
 513                 $strunpacking = get_string("unpacking", "", $file);
 514
 515                 echo "<p align=\"center\">$strunpacking:</p>";
 516
 517                 $file = basename($file);
 518
 519                 if (!unzip_file("$basedir$wdir/$file")) {
 520                     error(get_string("unzipfileserror","error"));
 521                 }
 522
 523                 echo "<div style=\"text-align:center\"><form action=\"index.php\" method=\"get\">";
 524                 echo "<div>";
 525                 echo ' <input type="hidden" name="choose" value="'.$choose.'" />';
 526                 echo " <input type=\"hidden\" name=\"id\" value=\"$id\" />";
 527                 echo " <input type=\"hidden\" name=\"wdir\" value=\"$wdir\" />";
 528                 echo " <input type=\"hidden\" name=\"action\" value=\"cancel\" />";
 529                 echo " <input type=\"submit\" value=\"$strok\" />";
 530                 echo "</div>";
 531                 echo "</form>";
 532                 echo "</div>";
 533             } else {
 534                 displaydir($wdir);
 535             }
 536             html_footer();
 537             break;
 538
 539         case "listzip":
 540             html_header($course, $wdir);
 541             if (($file != '') and confirm_sesskey()) {
 542                 $strname = get_string("name");
 543                 $strsize = get_string("size");
 544                 $strmodified = get_string("modified");
 545                 $strok = get_string("ok");
 546                 $strlistfiles = get_string("listfiles", "", $file);
 547
 548                 echo "<p align=\"center\">$strlistfiles:</p>";
 549                 $file = basename($file);
 550
 551                 include_once("$CFG->libdir/pclzip/pclzip.lib.php");
 552                 $archive = new PclZip(cleardoubleslashes("$basedir$wdir/$file"));
 553                 if (!$list = $archive->listContent(cleardoubleslashes("$basedir$wdir"))) {
 554                     notify($archive->errorInfo(true));
 555
 556                 } else {
 557                     echo "<table cellpadding=\"4\" cellspacing=\"2\" border=\"0\" width=\"640\" class=\"files\">";
 558                     echo "<tr class=\"file\"><th align=\"left\" class=\"header name\" scope=\"col\">$strname</th><th align=\"right\" class=\"header size\" scope=\"col\">$strsize</th><th align=\"right\" class=\"header date\" scope=\"col\">$strmodified</th></tr>";
 559                     foreach ($list as $item) {
 560                         echo "<tr>";
 561                         print_cell("left", s($item['filename']), 'name');
 562                         if (! $item['folder']) {
 563                             print_cell("right", display_size($item['size']), 'size');
 564                         } else {
 565                             echo "<td>&nbsp;</td>";
 566                         }
 567                         $filedate  = userdate($item['mtime'], get_string("strftimedatetime"));
 568                         print_cell("right", $filedate, 'date');
 569                         echo "</tr>";
 570                     }
 571                     echo "</table>";
 572                 }
 573                 echo "<br /><center><form action=\"index.php\" method=\"get\">";
 574                 echo "<div>";
 575                 echo ' <input type="hidden" name="choose" value="'.$choose.'" />';
 576                 echo " <input type=\"hidden\" name=\"id\" value=\"$id\" />";
 577                 echo " <input type=\"hidden\" name=\"wdir\" value=\"$wdir\" />";
 578                 echo " <input type=\"hidden\" name=\"action\" value=\"cancel\" />";
 579                 echo " <input type=\"submit\" value=\"$strok\" />";
 580                 echo "</div>";
 581                 echo "</form>";
 582                 echo "</center>";
 583             } else {
 584                 displaydir($wdir);
 585             }
 586             html_footer();
 587             break;
 588
 589         case "restore":
 590             html_header($course, $wdir);
 591             if (($file != '') and confirm_sesskey()) {
 592                 echo "<p align=\"center\">".get_string("youaregoingtorestorefrom").":</p>";
 593                 print_simple_box_start("center");
 594                 echo $file;
 595                 print_simple_box_end();
 596                 echo "<br />";
 597                 echo "<p align=\"center\">".get_string("areyousuretorestorethisinfo")."</p>";
 598                 $restore_path = "$CFG->wwwroot/backup/restore.php";
 599                 notice_yesno (get_string("areyousuretorestorethis"),
 600                                 $restore_path."?id=".$id."&amp;file=".cleardoubleslashes($id.$wdir."/".$file)."&amp;method=manual",
 601                                 "index.php?id=$id&amp;wdir=$wdir&amp;action=cancel");
 602             } else {
 603                 displaydir($wdir);
 604             }
 605             html_footer();
 606             break;
 607
 608         case "cancel":
 609             clearfilelist();
 610
 611         default:
 612             html_header($course, $wdir);
 613             displaydir($wdir);
 614             html_footer();
 615             break;
 616 }
 617
 618
 619 /// FILE FUNCTIONS ///////////////////////////////////////////////////////////
 620
 621
 622 function setfilelist($VARS) {
 623     global $USER;
 624
 625     $USER->filelist = array ();
 626     $USER->fileop = "";
 627
 628     $count = 0;
 629     foreach ($VARS as $key => $val) {
 630         if (substr($key,0,4) == "file") {
 631             $count++;
 632             $val = rawurldecode($val);
 633             $USER->filelist[] = clean_param($val, PARAM_PATH);
 634         }
 635     }
 636     return $count;
 637 }
 638
 639 function clearfilelist() {
 640     global $USER;
 641
 642     $USER->filelist = array ();
 643     $USER->fileop = "";
 644 }
 645
 646
 647 function printfilelist($filelist) {
 648     global $CFG, $basedir;
 649
 650     $strfolder = get_string("folder");
 651     $strfile   = get_string("file");
 652
 653     foreach ($filelist as $file) {
 654         if (is_dir($basedir.'/'.$file)) {
 655             echo "<img src=\"$CFG->pixpath/f/folder.gif\" class=\"icon\" alt=\"$strfolder\" /> $file<br />";
 656             $subfilelist = array();
 657             $currdir = opendir($basedir.'/'.$file);
 658             while (false !== ($subfile = readdir($currdir))) {
 659                 if ($subfile <> ".." && $subfile <> ".") {
 660                     $subfilelist[] = $file."/".$subfile;
 661                 }
 662             }
 663             printfilelist($subfilelist);
 664
 665         } else {
 666             $icon = mimeinfo("icon", $file);
 667             echo "<img src=\"$CFG->pixpath/f/$icon\"  class=\"icon\" alt=\"$strfile\" /> $file<br />";
 668         }
 669     }
 670 }
 671
 672
 673 function print_cell($alignment='center', $text='&nbsp;', $class='') {
 674     if ($class) {
 675         $class = ' class="'.$class.'"';
 676     }
 677     echo '<td align="'.$alignment.'" style="white-space:nowrap "'.$class.'>'.$text.'</td>';
 678 }
 679
 680 function displaydir ($wdir) {
 681 //  $wdir == / or /a or /a/b/c/d  etc
 682
 683     global $basedir;
 684     global $id;
 685     global $USER, $CFG;
 686     global $choose;
 687
 688     $fullpath = $basedir.$wdir;
 689     $dirlist = array();
 690
 691     $directory = opendir($fullpath);             // Find all files
 692     while (false !== ($file = readdir($directory))) {
 693         if ($file == "." || $file == "..") {
 694             continue;
 695         }
 696
 697         if (is_dir($fullpath."/".$file)) {
 698             $dirlist[] = $file;
 699         } else {
 700             $filelist[] = $file;
 701         }
 702     }
 703     closedir($directory);
 704
 705     $strname = get_string("name");
 706     $strsize = get_string("size");
 707     $strmodified = get_string("modified");
 708     $straction = get_string("action");
 709     $strmakeafolder = get_string("makeafolder");
 710     $struploadafile = get_string("uploadafile");
 711     $strselectall = get_string("selectall");
 712     $strselectnone = get_string("deselectall");
 713     $strwithchosenfiles = get_string("withchosenfiles");
 714     $strmovetoanotherfolder = get_string("movetoanotherfolder");
 715     $strmovefilestohere = get_string("movefilestohere");
 716     $strdeletecompletely = get_string("deletecompletely");
 717     $strcreateziparchive = get_string("createziparchive");
 718     $strrename = get_string("rename");
 719     $stredit   = get_string("edit");
 720     $strunzip  = get_string("unzip");
 721     $strlist   = get_string("list");
 722     $strrestore= get_string("restore");
 723     $strchoose = get_string("choose");
 724     $strfolder = get_string("folder");
 725     $strfile   = get_string("file");
 726
 727
 728     echo "<form action=\"index.php\" method=\"post\" id=\"dirform\">";
 729     echo "<div>";
 730     echo '<input type="hidden" name="choose" value="'.$choose.'" />';
 731     // echo "<hr align=\"center\" noshade=\"noshade\" size=\"1\" />";
 732     echo "<hr/>";
 733     echo "<table border=\"0\" cellspacing=\"2\" cellpadding=\"2\" width=\"640\" class=\"files\">";
 734     echo "<tr>";
 735     echo "<th scope=\"col\"></th>";
 736     echo "<th class=\"header name\" scope=\"col\">$strname</th>";
 737     echo "<th class=\"header size\" scope=\"col\">$strsize</th>";
 738     echo "<th class=\"header date\" scope=\"col\">$strmodified</th>";
 739     echo "<th class=\"header commands\" scope=\"col\">$straction</th>";
 740     echo "</tr>\n";
 741
 742     if ($wdir != "/") {
 743         $dirlist[] = '..';
 744     }
 745
 746     $count = 0;
 747
 748     if (!empty($dirlist)) {
 749         asort($dirlist);
 750         foreach ($dirlist as $dir) {
 751             echo "<tr class=\"folder\">";
 752
 753             if ($dir == '..') {
 754                 $fileurl = rawurlencode(dirname($wdir));
 755                 print_cell();
 756                 // alt attribute intentionally empty to prevent repetition in screen reader
 757                 print_cell('left', '<a href="index.php?id='.$id.'&amp;wdir='.$fileurl.'&amp;choose='.$choose.'"><img src="'.$CFG->pixpath.'/f/parent.gif" class="icon" alt="" />&nbsp;'.get_string('parentfolder').'</a>', 'name');
 758                 print_cell();
 759                 print_cell();
 760                 print_cell();
 761
 762             } else {
 763                 $count++;
 764                 $filename = $fullpath."/".$dir;
 765                 $fileurl  = rawurlencode($wdir."/".$dir);
 766                 $filesafe = rawurlencode($dir);
 767                 $filesize = display_size(get_directory_size("$fullpath/$dir"));
 768                 $filedate = userdate(filemtime($filename), "%d %b %Y, %I:%M %p");
 769                 print_cell("center", "<input type=\"checkbox\" name=\"file$count\" value=\"$fileurl\" />", 'checkbox');
 770                 print_cell("left", "<a href=\"index.php?id=$id&amp;wdir=$fileurl&amp;choose=$choose\"><img src=\"$CFG->pixpath/f/folder.gif\" class=\"icon\" alt=\"$strfolder\" />&nbsp;".htmlspecialchars($dir)."</a>", 'name');
 771                 print_cell("right", $filesize, 'size');
 772                 print_cell("right", $filedate, 'date');
 773                 print_cell("right", "<a href=\"index.php?id=$id&amp;wdir=$wdir&amp;file=$filesafe&amp;action=rename&amp;choose=$choose\">$strrename</a>", 'commands');
 774             }
 775
 776             echo "</tr>";
 777         }
 778     }
 779
 780
 781     if (!empty($filelist)) {
 782         asort($filelist);
 783         foreach ($filelist as $file) {
 784
 785             $icon = mimeinfo("icon", $file);
 786
 787             $count++;
 788             $filename    = $fullpath."/".$file;
 789             $fileurl     = trim($wdir, "/")."/$file";
 790             $filesafe    = rawurlencode($file);
 791             $fileurlsafe = rawurlencode($fileurl);
 792             $filedate    = userdate(filemtime($filename), "%d %b %Y, %I:%M %p");
 793
 794             $selectfile = trim($fileurl, "/");
 795
 796             echo "<tr class=\"file\">";
 797
 798             print_cell("center", "<input type=\"checkbox\" name=\"file$count\" value=\"$fileurl\" />", 'checkbox');
 799             echo "<td align=\"left\" style=\"white-space:nowrap\" class=\"name\">";
 800             if ($CFG->slasharguments) {
 801                 $ffurl = str_replace('//', '/', "/file.php/$id/$fileurl");
 802             } else {
 803                 $ffurl = str_replace('//', '/', "/file.php?file=/$id/$fileurl");
 804             }
 805             link_to_popup_window ($ffurl, "display",
 806                                   "<img src=\"$CFG->pixpath/f/$icon\" class=\"icon\" alt=\"$strfile\" />&nbsp;".htmlspecialchars($file),
 807                                   480, 640);
 808             echo "</td>";
 809
 810             $file_size = filesize($filename);
 811             print_cell("right", display_size($file_size), 'size');
 812             print_cell("right", $filedate, 'date');
 813
 814             if ($choose) {
 815                 $edittext = "<strong><a onclick=\"return set_value('$selectfile')\" href=\"#\">$strchoose</a></strong>&nbsp;";
 816             } else {
 817                 $edittext = '';
 818             }
 819
 820
 821             if ($icon == "text.gif" || $icon == "html.gif") {
 822                 $edittext .= "<a href=\"index.php?id=$id&amp;wdir=$wdir&amp;file=$fileurl&amp;action=edit&amp;choose=$choose\">$stredit</a>";
 823             } else if ($icon == "zip.gif") {
 824                 $edittext .= "<a href=\"index.php?id=$id&amp;wdir=$wdir&amp;file=$fileurl&amp;action=unzip&amp;sesskey=$USER->sesskey&amp;choose=$choose\">$strunzip</a>&nbsp;";
 825                 $edittext .= "<a href=\"index.php?id=$id&amp;wdir=$wdir&amp;file=$fileurl&amp;action=listzip&amp;sesskey=$USER->sesskey&amp;choose=$choose\">$strlist</a> ";
 826                 if (!empty($CFG->backup_version) and has_capability('moodle/site:restore', get_context_instance(CONTEXT_COURSE, $id))) {
 827                     $edittext .= "<a href=\"index.php?id=$id&amp;wdir=$wdir&amp;file=$filesafe&amp;action=restore&amp;sesskey=$USER->sesskey&amp;choose=$choose\">$strrestore</a> ";
 828                 }
 829             }
 830
 831             print_cell("right", "$edittext <a href=\"index.php?id=$id&amp;wdir=$wdir&amp;file=$filesafe&amp;action=rename&amp;choose=$choose\">$strrename</a>", 'commands');
 832
 833             echo "</tr>";
 834         }
 835     }
 836     echo "</table>";
 837     echo "<hr />";
 838     //echo "<hr width=\"640\" align=\"center\" noshade=\"noshade\" size=\"1\" />";
 839
 840     echo "<table border=\"0\" cellspacing=\"2\" cellpadding=\"2\" width=\"640\">";
 841     echo "<tr><td>";
 842     echo "<input type=\"hidden\" name=\"id\" value=\"$id\" />";
 843     echo '<input type="hidden" name="choose" value="'.$choose.'" />';
 844     echo "<input type=\"hidden\" name=\"wdir\" value=\"$wdir\" /> ";
 845     echo "<input type=\"hidden\" name=\"sesskey\" value=\"$USER->sesskey\" />";
 846     $options = array (
 847                    "move" => "$strmovetoanotherfolder",
 848                    "delete" => "$strdeletecompletely",
 849                    "zip" => "$strcreateziparchive"
 850                );
 851     if (!empty($count)) {
 852         choose_from_menu ($options, "action", "", "$strwithchosenfiles...", "javascript:getElementById('dirform').submit()");
 853     }
 854     echo "</td></tr></table>";
 855     echo "</div>";
 856     echo "</form>";
 857     echo "<table border=\"0\" cellspacing=\"2\" cellpadding=\"2\" width=\"640\"><tr>";
 858     echo "<td align=\"center\">";
 859     if (!empty($USER->fileop) and ($USER->fileop == "move") and ($USER->filesource <> $wdir)) {
 860         echo "<form action=\"index.php\" method=\"get\">";
 861         echo "<div>";
 862         echo ' <input type="hidden" name="choose" value="'.$choose.'" />';
 863         echo " <input type=\"hidden\" name=\"id\" value=\"$id\" />";
 864         echo " <input type=\"hidden\" name=\"wdir\" value=\"$wdir\" />";
 865         echo " <input type=\"hidden\" name=\"action\" value=\"paste\" />";
 866         echo " <input type=\"hidden\" name=\"sesskey\" value=\"$USER->sesskey\" />";
 867         echo " <input type=\"submit\" value=\"$strmovefilestohere\" />";
 868         echo "</div>";
 869         echo "</form>";
 870     }
 871     echo "</td>";
 872     echo "<td align=\"right\">";
 873         echo "<form action=\"index.php\" method=\"get\">";
 874         echo "<div>";
 875         echo ' <input type="hidden" name="choose" value="'.$choose.'" />';
 876         echo " <input type=\"hidden\" name=\"id\" value=\"$id\" />";
 877         echo " <input type=\"hidden\" name=\"wdir\" value=\"$wdir\" />";
 878         echo " <input type=\"hidden\" name=\"action\" value=\"makedir\" />";
 879         echo " <input type=\"submit\" value=\"$strmakeafolder\" />";
 880         echo "</div>";
 881         echo "</form>";
 882     echo "</td>";
 883     echo "<td align=\"right\">";
 884         echo "<form action=\"index.php\" method=\"get\">"; //dummy form - alignment only
 885         echo "<fieldset class=\"invisiblefieldset\">";
 886         echo " <input type=\"button\" value=\"$strselectall\" onclick=\"checkall();\" />";
 887         echo " <input type=\"button\" value=\"$strselectnone\" onclick=\"uncheckall();\" />";
 888         echo "</fieldset>";
 889         echo "</form>";
 890     echo "</td>";
 891     echo "<td align=\"right\">";
 892         echo "<form action=\"index.php\" method=\"get\">";
 893         echo "<div>";
 894         echo ' <input type="hidden" name="choose" value="'.$choose.'" />';
 895         echo " <input type=\"hidden\" name=\"id\" value=\"$id\" />";
 896         echo " <input type=\"hidden\" name=\"wdir\" value=\"$wdir\" />";
 897         echo " <input type=\"hidden\" name=\"action\" value=\"upload\" />";
 898         echo " <input type=\"submit\" value=\"$struploadafile\" />";
 899         echo "</div>";
 900         echo "</form>";
 901     echo "</td></tr>";
 902     echo "</table>";
 903     echo "<hr/>";
 904     //echo "<hr width=\"640\" align=\"center\" noshade=\"noshade\" size=\"1\" />";
 905
 906 }
 907
 908 ?>