libdir.'/filelib.php'); $id = required_param('id', PARAM_INT); $file = optional_param('file', '', PARAM_PATH); $wdir = optional_param('wdir', '', PARAM_PATH); $action = optional_param('action', '', PARAM_ACTION); $name = optional_param('name', '', PARAM_FILE); $oldname = optional_param('oldname', '', PARAM_FILE); $choose = optional_param('choose', '', PARAM_CLEAN); if ($choose) { if (count(explode('.', $choose)) != 2) { error('Incorrect format for choose parameter'); } } if (! $course = get_record("course", "id", $id) ) { error("That's an invalid course id"); } require_login($course->id); if (! isteacheredit($course->id) ) { error("You need to be a teacher with editing privileges"); } function html_footer() { global $course, $choose; if ($choose) { echo ""; } else { echo ""; print_footer($course); } } function html_header($course, $wdir, $formfield=""){ global $CFG, $ME, $choose; if (! $site = get_site()) { error("Invalid site!"); } if ($course->id == $site->id) { $strfiles = get_string("sitefiles"); } else { $strfiles = get_string("files"); } if ($wdir == "/") { $fullnav = "$strfiles"; } else { $dirs = explode("/", $wdir); $numdirs = count($dirs); $link = ""; $navigation = ""; for ($i=1; $i<$numdirs-1; $i++) { $navigation .= " -> "; $link .= "/".urlencode($dirs[$i]); $navigation .= "id&wdir=$link&choose=$choose\">".$dirs[$i].""; } $fullnav = "id&wdir=/&choose=$choose\">$strfiles $navigation -> ".$dirs[$numdirs-1]; } if ($choose) { print_header(); $chooseparts = explode('.', $choose); ?> ', '»', "$course->shortname -> $fullnav"); echo ''; if ($course->id == $site->id) { print_heading(get_string("publicsitefileswarning"), "center", 2); } } else { if ($course->id == $site->id) { print_header("$course->shortname: $strfiles", "$course->fullname", "admin/index.php\">".get_string("administration"). " -> $fullnav", $formfield); print_heading(get_string("publicsitefileswarning"), "center", 2); } else { print_header("$course->shortname: $strfiles", "$course->fullname", "id\">$course->shortname". " -> $fullnav", $formfield); } } echo ""; echo ""; echo "'; } function displaydir ($wdir) { // $wdir == / or /a or /a/b/c/d etc global $basedir; global $id; global $USER, $CFG; global $choose; $fullpath = $basedir.$wdir; $directory = opendir($fullpath); // Find all files while (false !== ($file = readdir($directory))) { if ($file == "." || $file == "..") { continue; } if (is_dir($fullpath."/".$file)) { $dirlist[] = $file; } else { $filelist[] = $file; } } closedir($directory); $strname = get_string("name"); $strsize = get_string("size"); $strmodified = get_string("modified"); $straction = get_string("action"); $strmakeafolder = get_string("makeafolder"); $struploadafile = get_string("uploadafile"); $strwithchosenfiles = get_string("withchosenfiles"); $strmovetoanotherfolder = get_string("movetoanotherfolder"); $strmovefilestohere = get_string("movefilestohere"); $strdeletecompletely = get_string("deletecompletely"); $strcreateziparchive = get_string("createziparchive"); $strrename = get_string("rename"); $stredit = get_string("edit"); $strunzip = get_string("unzip"); $strlist = get_string("list"); $strrestore= get_string("restore"); $strchoose = get_string("choose"); echo ""; echo ''; echo "
"; echo "
"; } if (! $basedir = make_upload_directory("$course->id")) { error("The site administrator needs to fix the file permissions"); } $baseweb = $CFG->wwwroot; // End of configuration and access control if (!$wdir) { $wdir="/"; } if (($wdir != '/' and detect_munged_arguments($wdir, 0)) or ($file != '' and detect_munged_arguments($file, 0))) { $message = "Error: Directories can not contain \"..\""; $wdir = "/"; $action = ""; } if ($wdir == "/backupdata") { if (! make_upload_directory("$course->id/backupdata")) { // Backup folder error("Could not create backupdata folder. The site administrator needs to fix the file permissions"); } } switch ($action) { case "upload": html_header($course, $wdir); require_once($CFG->dirroot.'/lib/uploadlib.php'); if (!empty($save) and confirm_sesskey()) { $course->maxbytes = 0; // We are ignoring course limits $um = new upload_manager('userfile',false,false,$course,false,0); $dir = "$basedir$wdir"; if ($um->process_file_uploads($dir)) { notify(get_string('uploadedfile')); } // um will take care of error reporting. displaydir($wdir); } else { $upload_max_filesize = get_max_upload_file_size($CFG->maxbytes); $filesize = display_size($upload_max_filesize); $struploadafile = get_string("uploadafile"); $struploadthisfile = get_string("uploadthisfile"); $strmaxsize = get_string("maxsize", "", $filesize); $strcancel = get_string("cancel"); echo "

$struploadafile ($strmaxsize) --> $wdir"; echo "
"; echo "
"; echo ' '; echo " "; echo " "; echo " "; echo " sesskey\" />"; upload_print_form_fragment(1,array('userfile'),null,false,null,$upload_max_filesize,0,false); echo "
"; echo " "; echo ""; echo ""; echo "
"; echo ' '; echo " "; echo " "; echo " "; echo " "; echo "
"; echo "
"; } html_footer(); break; case "delete": if (!empty($confirm) and confirm_sesskey()) { html_header($course, $wdir); foreach ($USER->filelist as $file) { $fullfile = $basedir.$file; if (! fulldelete($fullfile)) { echo "
Error: Could not delete: $fullfile"; } } clearfilelist(); displaydir($wdir); html_footer(); } else { html_header($course, $wdir); if (setfilelist($_POST)) { echo "

".get_string("deletecheckwarning").":

"; print_simple_box_start("center"); printfilelist($USER->filelist); print_simple_box_end(); echo "
"; notice_yesno (get_string("deletecheckfiles"), "index.php?id=$id&wdir=$wdir&action=delete&confirm=1&sesskey=$USER->sesskey&choose=$choose", "index.php?id=$id&wdir=$wdir&action=cancel&choose=$choose"); } else { displaydir($wdir); } html_footer(); } break; case "move": html_header($course, $wdir); if (($count = setfilelist($_POST)) and confirm_sesskey()) { $USER->fileop = $action; $USER->filesource = $wdir; echo "

"; print_string("selectednowmove", "moodle", $count); echo "

"; } displaydir($wdir); html_footer(); break; case "paste": html_header($course, $wdir); if (isset($USER->fileop) and ($USER->fileop == "move") and confirm_sesskey()) { foreach ($USER->filelist as $file) { $shortfile = basename($file); $oldfile = $basedir.$file; $newfile = $basedir.$wdir."/".$shortfile; if (!rename($oldfile, $newfile)) { echo "

Error: $shortfile not moved"; } } } clearfilelist(); displaydir($wdir); html_footer(); break; case "rename": if (!empty($name) and confirm_sesskey()) { html_header($course, $wdir); $name = clean_filename($name); if (file_exists($basedir.$wdir."/".$name)) { echo "Error: $name already exists!"; } else if (!rename($basedir.$wdir."/".$oldname, $basedir.$wdir."/".$name)) { echo "Error: could not rename $oldname to $name"; } displaydir($wdir); } else { $strrename = get_string("rename"); $strcancel = get_string("cancel"); $strrenamefileto = get_string("renamefileto", "moodle", $file); html_header($course, $wdir, "form.name"); echo "

$strrenamefileto:"; echo "
"; echo "
"; echo ' '; echo " "; echo " "; echo " "; echo " "; echo " sesskey\" />"; echo " "; echo " "; echo "
"; echo "		"; echo "
"; echo ' '; echo " "; echo " "; echo " "; echo " "; echo "
"; echo "
"; } html_footer(); break; case "makedir": if (!empty($name) and confirm_sesskey()) { html_header($course, $wdir); $name = clean_filename($name); if (file_exists("$basedir$wdir/$name")) { echo "Error: $name already exists!"; } else if (! make_upload_directory("$course->id/$wdir/$name")) { echo "Error: could not create $name"; } displaydir($wdir); } else { $strcreate = get_string("create"); $strcancel = get_string("cancel"); $strcreatefolder = get_string("createfolder", "moodle", $wdir); html_header($course, $wdir, "form.name"); echo "

$strcreatefolder:"; echo "
"; echo "
"; echo ' '; echo " "; echo " "; echo " "; echo " "; echo " sesskey\" />"; echo " "; echo "
"; echo "		"; echo "
"; echo ' '; echo " "; echo " "; echo " "; echo " "; echo "
"; echo "
"; } html_footer(); break; case "edit": html_header($course, $wdir); if (isset($text) and confirm_sesskey()) { $fileptr = fopen($basedir.$file,"w"); fputs($fileptr, stripslashes($text)); fclose($fileptr); displaydir($wdir); } else { $streditfile = get_string("edit", "", "$file"); $fileptr = fopen($basedir.$file, "r"); $contents = fread($fileptr, filesize($basedir.$file)); fclose($fileptr); if (mimeinfo("type", $file) == "text/html") { $usehtmleditor = can_use_html_editor(); } else { $usehtmleditor = false; } $usehtmleditor = false; // Always keep it off for now print_heading("$streditfile"); echo "
"; echo "
"; echo ' '; echo " "; echo " "; echo " "; echo " "; echo " sesskey\" />"; print_textarea($usehtmleditor, 25, 80, 680, 400, "text", $contents); echo "
"; echo " "; echo ""; echo ""; echo "
"; echo ' '; echo " "; echo " "; echo " "; echo " "; echo "
"; echo "
"; if ($usehtmleditor) { use_html_editor(); } } html_footer(); break; case "zip": if (!empty($name) and confirm_sesskey()) { html_header($course, $wdir); $name = clean_filename($name); $files = array(); foreach ($USER->filelist as $file) { $files[] = "$basedir/$file"; } if (!zip_files($files,"$basedir/$wdir/$name")) { error(get_string("zipfileserror","error")); } clearfilelist(); displaydir($wdir); } else { html_header($course, $wdir, "form.name"); if (setfilelist($_POST)) { echo "

".get_string("youareabouttocreatezip").":

"; print_simple_box_start("center"); printfilelist($USER->filelist); print_simple_box_end(); echo "
"; echo "

".get_string("whattocallzip"); echo "
"; echo "
"; echo ' '; echo " "; echo " "; echo " "; echo " "; echo " sesskey\" />"; echo " "; echo "
"; echo "		"; echo "
"; echo ' '; echo " "; echo " "; echo " "; echo " "; echo "
"; echo "
"; } else { displaydir($wdir); clearfilelist(); } } html_footer(); break; case "unzip": html_header($course, $wdir); if (!empty($file) and confirm_sesskey()) { $strok = get_string("ok"); $strunpacking = get_string("unpacking", "", $file); echo "

$strunpacking:

"; $file = basename($file); if (!unzip_file("$basedir/$wdir/$file")) { error(get_string("unzipfileserror","error")); } echo "
"; echo ' '; echo " "; echo " "; echo " "; echo " "; echo "
"; echo "
"; } else { displaydir($wdir); } html_footer(); break; case "listzip": html_header($course, $wdir); if (!empty($file) and confirm_sesskey()) { $strname = get_string("name"); $strsize = get_string("size"); $strmodified = get_string("modified"); $strok = get_string("ok"); $strlistfiles = get_string("listfiles", "", $file); echo "

$strlistfiles:

"; $file = basename($file); include_once("$CFG->libdir/pclzip/pclzip.lib.php"); $archive = new PclZip(cleardoubleslashes("$basedir/$wdir/$file")); if (!$list = $archive->listContent(cleardoubleslashes("$basedir/$wdir"))) { notify($archive->errorInfo(true)); } else { echo ""; echo ""; foreach ($list as $item) { echo ""; print_cell("left", $item['filename'], 'name'); if (! $item['folder']) { print_cell("right", display_size($item['size']), 'size'); } else { echo ""; } $filedate = userdate($item['mtime'], get_string("strftimedatetime")); print_cell("right", $filedate, 'date'); echo ""; } echo "
$strname$strsize$strmodified
 
"; } echo "
"; echo ' '; echo " "; echo " "; echo " "; echo " "; echo "
"; echo "
"; } else { displaydir($wdir); } html_footer(); break; case "restore": html_header($course, $wdir); if (!empty($file) and confirm_sesskey()) { echo "

".get_string("youaregoingtorestorefrom").":

"; print_simple_box_start("center"); echo $file; print_simple_box_end(); echo "
"; echo "

".get_string("areyousuretorestorethisinfo")."

"; $restore_path = "$CFG->wwwroot/backup/restore.php"; notice_yesno (get_string("areyousuretorestorethis"), $restore_path."?id=".$id."&file=".cleardoubleslashes($id.$wdir."/".$file), "index.php?id=$id&wdir=$wdir&action=cancel"); } else { displaydir($wdir); } html_footer(); break; case "cancel": clearfilelist(); default: html_header($course, $wdir); displaydir($wdir); html_footer(); break; } /// FILE FUNCTIONS /////////////////////////////////////////////////////////// function setfilelist($VARS) { global $USER; $USER->filelist = array (); $USER->fileop = ""; $count = 0; foreach ($VARS as $key => $val) { if (substr($key,0,4) == "file") { $count++; $val = rawurldecode($val); if (!detect_munged_arguments($val, 0)) { $USER->filelist[] = $val; } } } return $count; } function clearfilelist() { global $USER; $USER->filelist = array (); $USER->fileop = ""; } function printfilelist($filelist) { global $CFG, $basedir; foreach ($filelist as $file) { if (is_dir($basedir.$file)) { echo "pixpath/f/folder.gif\" height=\"16\" width=\"16\" alt=\"\" /> $file
"; $subfilelist = array(); $currdir = opendir($basedir.$file); while (false !== ($subfile = readdir($currdir))) { if ($subfile <> ".." && $subfile <> ".") { $subfilelist[] = $file."/".$subfile; } } printfilelist($subfilelist); } else { $icon = mimeinfo("icon", $file); echo "pixpath/f/$icon\" height=\"16\" width=\"16\" alt=\"\" /> $file
"; } } } function print_cell($alignment='center', $text=' ', $class='') { if ($class) { $class = ' class="'.$class.'"'; } echo '		'.$text.'
"; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo "\n"; if ($wdir == "/") { $wdir = ""; } if (!empty($wdir)) { $dirlist[] = '..'; } $count = 0; if (!empty($dirlist)) { asort($dirlist); foreach ($dirlist as $dir) { echo ""; if ($dir == '..') { $fileurl = rawurlencode(dirname($wdir)); print_cell(); print_cell('left', ''.get_string('parentfolder').''.get_string('parentfolder').'', 'name'); print_cell(); print_cell(); print_cell(); } else { $count++; $filename = $fullpath."/".$dir; $fileurl = rawurlencode($wdir."/".$dir); $filesafe = rawurlencode($dir); $filesize = display_size(get_directory_size("$fullpath/$dir")); $filedate = userdate(filemtime($filename), "%d %b %Y, %I:%M %p"); print_cell("center", "", 'checkbox'); print_cell("left", "pixpath/f/folder.gif\" height=\"16\" width=\"16\" border=\"0\" alt=\"Folder\" />".htmlspecialchars($dir)."", 'name'); print_cell("right", $filesize, 'size'); print_cell("right", $filedate, 'date'); print_cell("right", "$strrename", 'commands'); } echo ""; } } if (!empty($filelist)) { asort($filelist); foreach ($filelist as $file) { $icon = mimeinfo("icon", $file); $count++; $filename = $fullpath."/".$file; $fileurl = "$wdir/$file"; $filesafe = rawurlencode($file); $fileurlsafe = rawurlencode($fileurl); $filedate = userdate(filemtime($filename), "%d %b %Y, %I:%M %p"); if (substr($fileurl,0,1) == '/') { $selectfile = substr($fileurl,1); } else { $selectfile = $fileurl; } echo ""; print_cell("center", "", 'checkbox'); echo ""; $file_size = filesize($filename); print_cell("right", display_size($file_size), 'size'); print_cell("right", $filedate, 'date'); if ($choose) { $edittext = "$strchoose "; } else { $edittext = ''; } if ($icon == "text.gif" || $icon == "html.gif") { $edittext .= "$stredit"; } else if ($icon == "zip.gif") { $edittext .= "sesskey&choose=$choose\">$strunzip "; $edittext .= "sesskey&choose=$choose\">$strlist "; if (!empty($CFG->backup_version) and isteacheredit($id)) { $edittext .= "sesskey&choose=$choose\">$strrestore "; } } print_cell("right", "$edittext $strrename", 'commands'); echo ""; } } echo "
$strname$strsize$strmodified$straction
"; if ($CFG->slasharguments) { $ffurl = "/file.php/$id$fileurl"; } else { $ffurl = "/file.php?file=/$id$fileurl"; } link_to_popup_window ($ffurl, "display", "pixpath/f/$icon\" height=\"16\" width=\"16\" border=\"0\" alt=\"File\" />", 480, 640); echo ' '; link_to_popup_window ($ffurl, "display", htmlspecialchars($file), 480, 640); echo "
"; echo "
"; if (empty($wdir)) { $wdir = "/"; } echo ""; echo ""; echo ""; echo "
"; echo ""; echo ''; echo " "; echo "sesskey\" />"; $options = array ( "move" => "$strmovetoanotherfolder", "delete" => "$strdeletecompletely", "zip" => "$strcreateziparchive" ); if (!empty($count)) { choose_from_menu ($options, "action", "", "$strwithchosenfiles...", "javascript:document.dirform.submit()"); } echo ""; echo ""; if (!empty($USER->fileop) and ($USER->fileop == "move") and ($USER->filesource <> $wdir)) { echo "
"; echo ' '; echo " "; echo " "; echo " "; echo " sesskey\" />"; echo " "; echo "
"; } echo "		"; echo "
"; echo ' '; echo " "; echo " "; echo " "; echo " "; echo "
"; echo "		"; echo "
"; echo ' '; echo " "; echo " "; echo " "; echo " "; echo "
"; echo "
"; echo "
"; } ?>