id); if (! isteacheredit($course->id) ) { error("Only teachers can edit files"); } function html_footer() { echo "\n\n\n"; } function html_header($course, $wdir, $formfield=""){ global $CFG; ?> " /> coursefiles 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 = ""; } switch ($action) { case "upload": html_header($course, $wdir); require_once($CFG->dirroot.'/lib/uploadlib.php'); if (!empty($save) and confirm_sesskey()) { $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 "\n\n\n
\n"; echo "
\n"; upload_print_form_fragment(1,array('userfile'),null,false,null,$course->maxbytes,0,false); echo " \n"; echo " \n"; echo " \n"; echo " sesskey\" />\n"; echo "
"; echo " \n"; echo "\n"; echo "\n"; echo "
\n"; echo " \n"; echo " \n"; echo " \n"; echo " \n"; echo "
\n"; echo "
\n"; } 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"), "coursefiles.php?id=$id&wdir=$wdir&action=delete&confirm=1&sesskey=$USER->sesskey", "coursefiles.php?id=$id&wdir=$wdir&action=cancel"); } 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); $oldname = clean_filename($oldname); 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 "\n\n\n
\n"; echo "
\n"; echo " \n"; echo " \n"; echo " \n"; echo " sesskey\" />\n"; echo " \n"; echo " \n"; echo " \n"; echo "
\n"; echo "		\n"; echo "
\n"; echo " \n"; echo " \n"; echo " \n"; echo " \n"; echo "
"; echo "
\n"; } html_footer(); break; case "mkdir": 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 "\n\n\n
\n"; echo "
\n"; echo " \n"; echo " \n"; echo " \n"; echo " sesskey\" />\n"; echo " \n"; echo " \n"; echo "
\n"; echo "		\n"; echo "
\n"; echo " \n"; echo " \n"; echo " \n"; echo " \n"; echo "
\n"; echo "
\n"; } 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); print_heading("$streditfile"); echo "\n\n\n\n
\n"; echo "
\n"; echo " \n"; echo " \n"; echo " "; echo " \n"; echo " sesskey\" />\n"; print_textarea(false, 25, 80, 680, 400, "text", $contents); echo "
\n"; echo " \n"; echo "\n"; echo "\n"; echo "
\n"; echo " \n"; echo " \n"; echo " \n"; echo " \n"; echo "
\n"; echo "
\n"; if ($usehtmleditor) { print_richedit_javascript("form", "text", "yes"); } } 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 "\n\n\n\n\n
\n"; echo "
\n"; echo " \n"; echo " \n"; echo " \n"; echo " sesskey\" />\n"; echo " \n"; echo " "; echo "
\n"; echo "		\n"; echo "
\n"; echo " \n"; echo " \n"; echo " \n"; echo " \n"; echo "
\n"; echo "
\n"; } 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 "
\n"; echo " \n"; echo " \n"; echo " \n"; echo " \n"; echo "
\n"; echo "
\n"; } 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('../pclzip/pclzip.lib.php'); $archive = new PclZip("$basedir/$wdir/$file"); if (!$list = $archive->listContent("$basedir/$wdir")) { notify($archive->errorInfo(true)); } else { echo "\n"; echo "\n"; foreach ($list as $item) { echo ""; print_cell("left", $item['filename']); if (! $item['folder']) { print_cell("right", display_size($item['size'])); } else { echo "\n"; } $filedate = userdate($item['mtime'], get_string("strftimedatetime")); print_cell("right", $filedate); echo "\n"; } echo "
$strname$strsize$strmodified
 
\n"; } echo "
\n"; echo " \n"; echo " \n"; echo " \n"; echo " sesskey\" />\n"; echo " \n"; echo "
\n"; echo "
\n"; } else { displaydir($wdir); } html_footer(); break; case "cancel"; clearfilelist(); default: html_header($course, $wdir); displaydir($wdir); html_footer(); break; } /// FILE FUNCTIONS /////////////////////////////////////////////////////////// function fulldelete($location) { if (is_dir($location)) { $currdir = opendir($location); while ($file = readdir($currdir)) { if ($file <> ".." && $file <> ".") { $fullfile = $location."/".$file; if (is_dir($fullfile)) { if (!fulldelete($fullfile)) { return false; } } else { if (!unlink($fullfile)) { return false; } } } } closedir($currdir); if (! rmdir($location)) { return false; } } else { if (!unlink($location)) { return false; } } return true; } function setfilelist($VARS) { global $USER; $USER->filelist = array (); $USER->fileop = ""; $count = 0; foreach ($VARS as $key => $val) { if (substr($key,0,4) == "file") { $count++; $USER->filelist[] = rawurldecode($val); } } return $count; } function clearfilelist() { global $USER; $USER->filelist = array (); $USER->fileop = ""; } function printfilelist($filelist) { global $basedir, $CFG; 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 ($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=" ") { echo "\n"; echo "$text"; echo "\n"; } function get_image_size($filepath) { /// This function get's the image size /// Check if file exists if(!file_exists($filepath)) { return false; } else { /// Get the mime type so it really an image. if(mimeinfo("icon", basename($filepath)) != "image.gif") { return false; } else { $array_size = getimagesize($filepath); return $array_size; } } unset($filepath,$array_size); } function displaydir ($wdir) { // $wdir == / or /a or /a/b/c/d etc global $basedir; global $usecheckboxes; global $id; global $USER, $CFG; $fullpath = $basedir.$wdir; $directory = opendir($fullpath); // Find all files while ($file = readdir($directory)) { if ($file == "." || $file == "..") { continue; } if (is_dir($fullpath."/".$file)) { $dirlist[] = $file; } else { $filelist[] = $file; } } closedir($directory); $strfile = get_string("file"); $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"); $strchoose = get_string("choose"); echo "
\n"; echo "\n"; if ($wdir == "/") { $wdir = ""; } else { $bdir = str_replace("/".basename($wdir),"",$wdir); if($bdir == "/") { $bdir = ""; } print "\n\n\n"; } $count = 0; if (!empty($dirlist)) { asort($dirlist); foreach ($dirlist as $dir) { $count++; $filename = $fullpath."/".$dir; $fileurl = rawurlencode($wdir."/".$dir); $filesafe = rawurlencode($dir); $filedate = userdate(filemtime($filename), "%d %b %Y, %I:%M %p"); echo ""; if ($usecheckboxes) { print_cell("center", ""); } print_cell("left", "pixpath/f/folder.gif\" height=\"16\" width=\"16\" border=\"0\" alt=\"folder\" />".htmlspecialchars($dir).""); print_cell("right", " "); print_cell("right", $filedate); echo ""; } } if (!empty($filelist)) { asort($filelist); foreach ($filelist as $file) { $icon = mimeinfo("icon", $file); $imgtype = mimeinfo("type",$file); $count++; $filename = $fullpath."/".$file; $fileurl = "$wdir/$file"; $filesafe = rawurlencode($file); $fileurlsafe = rawurlencode($fileurl); $filedate = userdate(filemtime($filename), "%d %b %Y, %I:%M %p"); $dimensions = get_image_size($filename); if($dimensions) { $imgwidth = $dimensions[0]; $imgheight = $dimensions[1]; } else { $imgwidth = "Unknown"; $imgheight = "Unknown"; } unset($dimensions); echo "\n"; if ($usecheckboxes) { print_cell("center", ""); } echo "\n"; if ($icon == "zip.gif") { $edittext = "sesskey\">$strunzip "; $edittext .= "sesskey\">$strlist "; } else { $edittext = " "; } print_cell("right", "$edittext "); print_cell("right", $filedate); echo "\n"; } } echo "
"; print ""; print "wwwroot/lib/editor/images/folderup.gif\" height=\"14\" width=\"24\" border=\"0\" alt=\"Move up\" />"; print "
"; 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\" align=\"middle\" alt=\"$strfile\" />", 480, 640); $file_size = filesize($filename); echo "wwwroot.$ffurl."',"; echo " isize: '".$file_size."', itype: '".$imgtype."', iwidth: '".$imgwidth."',"; echo " iheight: '".$imgheight."', imodified: '".$filedate."' })\" href=\"#\">$file"; echo "
\n"; if (empty($wdir)) { $wdir = "/"; } echo "\n"; echo "\n\n"; echo "
"; echo "\n"; echo "\n"; echo "sesskey\" />\n"; $options = array ( "move" => "$strmovetoanotherfolder", "delete" => "$strdeletecompletely", "zip" => "$strcreateziparchive" ); if (!empty($count)) { choose_from_menu ($options, "action", "", "$strwithchosenfiles...", "javascript:document.dirform.submit()"); } if (!empty($USER->fileop) and ($USER->fileop == "move") and ($USER->filesource <> $wdir)) { echo "\n"; echo " \n"; echo " \n"; echo " \n"; echo " sesskey\" />\n"; echo " \n"; echo ""; } echo "
\n"; echo "\n"; } ?>