wwwroot/$fmdir/view.php?id=$id&tsort=sortname\">".get_string("namename","block_file_manager")." ";
+ $strcatname = "wwwroot/$fmdir/view.php?id=$id&tsort=sortcat\">".get_string("catname","block_file_manager")." ";
+ $strdescname = "wwwroot/$fmdir/view.php?id=$id&tsort=sortdesc\">".get_string("descname","block_file_manager")." ";
+ $strfilesizename = "wwwroot/$fmdir/view.php?id=$id&tsort=sortsize\">".get_string('filesizename','block_file_manager')." ";
+ $strdatename = "wwwroot/$fmdir/view.php?id=$id&tsort=sortdate\">".get_string("datename","block_file_manager")." ";
+ $stractionname = get_string("actionsname","block_file_manager");
+ $table->head = array($strcbx, $strnamename, $strcatname, $strdescname, $strfilesizename, $strdatename, $stractionname);
+ if ($action == 'movesel') {
+ $moveurl = "&action='$action'";
+ } else {
+ $moveurl = '';
+ }
+ // Not at root...so print an up folder link
+ if ($rootdir != 0) {
+ $tmpfold = get_record("fmanager_folders", "id", $rootdir);
+ $name = "pathid$moveurl\"> ";
+ $table->data[] = array("", $name, "", "", "", "","", "");
+ }
+ // Prints folders
+ if ($allfolders = get_records("fmanager_folders", "owner=$USER->id AND pathid", $rootdir, "name")) {
+ foreach($allfolders as $folder) {
+ $date = "".userdate($folder->timemodified, "%m/%d/%Y %H:%I")." ";
+ $cbx = "id&rootdir=$rootdir\">
+ id&rootdir=$rootdir\"> ";
+ // Determines if the user can view the share option in the main course (default is no)
+ $userinttype = fm_get_user_int_type();
+ $tmpcount = count_records("fmanager_shared","sharedlink",$folder->id,"type",2,"course",$id);
+ if ($tmpcount > 0) {
+ $icon = "group.gif";
+ } else {
+ $icon = "group_noshare.gif";
+ }
+ $priv = NULL;
+ $priv = get_record("fmanager_admin", "usertype", $userinttype);
+ if ($id == 1) {
+ // They can share from the main page to anyone
+ if ($priv->sharetoany == 1) {
+ //Uncommented by DWT
+ $actions .= " id&from=folder&rootdir=$rootdir\"> ";
+ }
+ } else {
+ if ($priv->allowsharing == 1) {
+ //Uncommented by DWT
+ $actions .= " id&from=folder&rootdir=$rootdir\"> ";
+ }
+ }
+ $name = "wwwroot/".fm_get_root_dir()."/view.php?id=$id&rootdir=$folder->id$moveurl\"> ";
+ $catname = get_record("fmanager_categories","id",$folder->category);
+ $catname = $catname->name;
+ // Finds size of folder
+ $tmpdir = $CFG->dataroot."/".fm_get_user_dir_space().fm_get_folder_path($folder->id);
+ $filesize = fm_get_size($tmpdir);
+ $table->data[] = array($cbx, $name, $catname, $desc, $filesize, $date, $actions);
+ }
+ }
+ // Prints all links
+ if (!$alllinks = get_records("fmanager_link", "owner=$USER->id AND folder", $rootdir, "name")) {
+ $table->data[] = array("","".get_string("msgnolinks", "block_file_manager")." ".userdate($link->timemodified, "%m/%d/%Y %H:%I")." ";
+ $cbx = "id&rootdir=$rootdir\">
+ id&rootdir=$rootdir\"> ";
+ // Determines if the user can view the share option in the main course (default is no)
+ $userinttype = fm_get_user_int_type();
+ $tmpcount = count_records("fmanager_shared","sharedlink",$link->id,"type",0,"course",$id);
+ if ($tmpcount > 0) {
+ $icon = "group.gif";
+ } else {
+ $icon = "group_noshare.gif";
+ }
+ $priv = NULL;
+ $priv = get_record("fmanager_admin", "usertype", $userinttype);
+ if ($id == 1) {
+ // They can share from the main page to anyone
+ if ($priv->sharetoany == 1) {
+ //Uncommented by DWT
+ $actions .= " id&from='link'&rootdir=$rootdir\"> ";
+ }
+ } else {
+ if ($priv->allowsharing == 1) {
+ //Uncommented by DWT
+ $actions .= " id&from='link'&rootdir=$rootdir\"> ";
+ }
+ }
+
+ $options = "menubar=1,toolbar=1,status=1,location=0,scrollbars,resizable,width=700,height=500,top=20,left=20";
+ if ($link->type == TYPE_FILE) {
+ if ($link->folder != 0) {
+ $folderinfo = fm_get_folder_path($link->folder);
+ $bdir = $folderinfo->path.$link->link;
+ } else {
+ $bdir = $link->link;
+ }
+ $tmphref = "$CFG->wwwroot/blocks/file_manager/file.php?cid=$id&fileid=$link->id";
+ $name = "link)."\" href=\"$tmphref\" onClick=\"window.open('$tmphref','urlpopup','$options');\"> ";
+ } else if ($link->type == TYPE_URL) {
+ $name = "link\"".
+ "onClick=\"window.open('$link->link','urlpopup','$options');\"> ";
+ } else if ($link->type == TYPE_ZIP) {
+ if ($link->folder != 0) {
+ $folderinfo = fm_get_folder_path($link->folder);
+ $bdir = $folderinfo->path.$link->link;
+ } else {
+ $bdir = $link->link;
+ }
+ $tmphref = "$CFG->wwwroot/blocks/file_manager/file.php?cid=$id&fileid=$link->id";
+ $name = "link)."\" href=\"$tmphref\" onClick=\"window.open('$tmphref','urlpopup','$options');\"> ";
+ }
+ $desc = wordwrap($link->description, 70, "(More)... wwwroot/$fmdir/sharing.php?id=$id&linkid=$linkid&from=$from&tsort=sortlast\">".get_string("userlastname","block_file_manager")." ";
+ $strfirstname = "wwwroot/$fmdir/sharing.php?id=$id&linkid=$linkid&from=$from&tsort=sortfirst\">".get_string("userfirstname","block_file_manager")." ";
+ $struserrole = "wwwroot/$fmdir/sharing.php?id=$id&linkid=$linkid&from=$from&tsort=sortrole\">".get_string("userrole","block_file_manager")." ";
+
+ $table->head = array($strcbx, $strlastname, $strfirstname, $struserrole);
+ if ($id == 1) {
+ //DWT, don't know why idnumber is used in the query, it is an unreliable user data field.
+ //just list all the active users then.
+ //if (!$allusers = get_records_select("user", 'idnumber != \'NULL\'', 'lastname', 'lastname, firstname, id')) {
+ if (!$allusers = get_records_select("user", 'deleted=0', 'lastname', 'lastname, firstname, id')) {
+ $table->data[] = array("","".get_string("msgnocourseusers","block_file_manager")." ".get_string("msgnocourseusers", "block_file_manager")." ".get_string("msgnocourseusers", "block_file_manager")." $group->name ";
+ echo "" . fullname($user, false) . " " . fullname($user, false) . " wwwroot/$fmdir/view_shared.php?id=$id&original=$original&catlinkid=$catid&tsort=sortname\">".get_string("namename","block_file_manager")." ";
+ $strcatname = "wwwroot/$fmdir/view_shared.php?id=$id&original=$original&catlinkid=$catid&tsort=sortcat\">".get_string("catname","block_file_manager")." ";
+ $strdescname = "wwwroot/$fmdir/view_shared.php?id=$id&original=$original&catlinkid=$catid&tsort=sortdesc\">".get_string("descname","block_file_manager")." ";
+ $strdatename = "wwwroot/$fmdir/view_shared.php?id=$id&original=$original&catlinkid=$catid&tsort=sortdate\">".get_string("datename","block_file_manager")." ";
+ $table->head = array($strnamename, $strcatname, $strdescname, $strdatename);
+
+ $sharedfolders = fm_get_folder_shared_by_cat($original, $catid);
+ if ($sharedfolders) {
+ foreach($sharedfolders as $sf) {
+ $name = "";
+ $cat = "";
+ $desc = "";
+ $date = "";
+ $linkurl = $CFG->wwwroot."/blocks/file_manager/view_shared.php?id=$id&original=$original&foldlinkid=$sf->id";
+ $name = "".userdate($sf->timemodified, "%m/%d/%Y %H:%I")." ";
+ $table->data[] = array($name, $cat, $desc, $date);
+ }
+ }
+
+ $sharedfiles = fm_get_links_shared_by_cat($original, $catid);
+ if ($sharedfiles) {
+ foreach($sharedfiles as $sf) {
+ $name = "";
+ $cat = "";
+ $desc = "";
+ $date = "";
+ if ($sf->type == TYPE_FILE) {
+ if ($sf->folder != 0) {
+ $folderinfo = fm_get_folder_path($sf->folder, true);
+ $bdir = $folderinfo->path.$sf->link;
+ } else {
+ $bdir = $sf->link;
+ }
+ $tmphref = "$CFG->wwwroot/blocks/file_manager/file.php?cid=$id&fileid=$sf->id";
+ $name = "link)."\" href=\"$tmphref\" onClick=\"window.open('$tmphref','urlpopup','$options');\"> ";
+ } else if ($sf->type == TYPE_URL) {
+ $name = "link\"".
+ "onClick=\"window.open('$sf->link','urlpopup','$options');\"> ";
+ } else if ($sf->type == TYPE_ZIP) {
+ $tmphref = "$CFG->wwwroot/blocks/file_manager/file.php?cid=$id&fileid=$sf->id";
+ $name = "link)."\" href=\"$tmphref\" onClick=\"window.open('$tmphref','urlpopup','$options');\"> ";
+ }
+ $desc = $sf->description;
+ $cat = fm_get_user_categories($sf->category);
+ $date = "".userdate($sf->timemodified, "%m/%d/%Y %H:%I")." ";
+ $table->data[] = array($name, $cat, $desc, $date);
+ }
+ } else {
+ $table->data[] = array(get_string("msgnosharedcatlink","block_file_manager"));
+ }
+
+ return $table;
+}
+
+// $id = course id
+// $foldid = folder id
+// $original = owner of the folder's user id
+function fm_print_user_shared_folder($id,$foldid,$original) {
+ global $USER, $CFG;
+
+ $fmdir = fm_get_root_dir();
+ $options = "menubar=1,toolbar=1,status=1,location=0,scrollbars,resizable,width=600,height=400,top=150,left=100";
+ $table->align = array("", "center", "center", "center");
+ $table->width = "100%";
+ $table->size = array("25%", "25%", "30%", "20%");
+ $table->wrap = array('no', 'no', 'yes', 'no');
+ $table->data = array();
+ $strnamename = "wwwroot/$fmdir/view_shared.php?id=$id&original=$original&catlinkid=$foldid&tsort=sortname\">".get_string("namename","block_file_manager")." ";
+ $strcatname = "wwwroot/$fmdir/view_shared.php?id=$id&original=$original&catlinkid=$foldid&tsort=sortcat\">".get_string("catname","block_file_manager")." ";
+ $strdescname = "wwwroot/$fmdir/view_shared.php?id=$id&original=$original&catlinkid=$foldid&tsort=sortdesc\">".get_string("descname","block_file_manager")." ";
+ $strdatename = "wwwroot/$fmdir/view_shared.php?id=$id&original=$original&catlinkid=$foldid&tsort=sortdate\">".get_string("datename","block_file_manager")." ";
+ $table->head = array($strnamename, $strcatname, $strdescname, $strdatename);
+
+ // Get all shared folders under folder
+ $sharedfolder = fm_get_all_sharedf_by_folder($original, $foldid);
+
+ if ($sharedfolder) {
+ foreach($sharedfolder as $sf) {
+ $name = "";
+ $cat = "";
+ $desc = "";
+ $date = "";
+ $tmpurl = "$CFG->wwwroot/blocks/file_manager/view_shared.php?id=$id&original=$original&foldlinkid=$sf->id";
+ $name = "".
+ " ";
+
+ $table->data[] = array($name, $cat, $desc, $date);
+ }
+ }
+
+ // Get all shared files under folder
+ $sharedfiles = fm_get_all_shared_by_folder($original, $foldid);
+
+ if ($sharedfiles) {
+ foreach($sharedfiles as $sf) {
+ $name = "";
+ $cat = "";
+ $desc = "";
+ $date = "";
+
+ if ($sf->type == TYPE_FILE) {
+ if ($sf->folder != 0) {
+ $folderinfo = fm_get_folder_path($sf->folder, true);
+ $bdir = $folderinfo->path.$sf->link;
+ } else {
+ $bdir = $sf->link;
+ }
+ $tmphref = "$CFG->wwwroot/blocks/file_manager/file.php?cid=$id&fileid=$sf->id";
+ $name = "link)."\" href=\"$tmphref\" onClick=\"window.open('$tmphref','urlpopup','$options');\"> ";
+ } else if ($sf->type == TYPE_URL) {
+ $name = "link\"".
+ "onClick=\"window.open('$sf->link','urlpopup','$options');\"> ";
+ } else if ($sf->type == TYPE_ZIP) {
+ $tmphref = "$CFG->wwwroot/blocks/file_manager/file.php?cid=$id&fileid=$sf->id";
+ $name = "link)."\" href=\"$tmphref\" onClick=\"window.open('$tmphref','urlpopup','$options');\"> ";
+ }
+ $desc = $sf->description;
+ $cat = fm_get_user_categories($sf->category);
+ $date = "".userdate($sf->timemodified, "%m/%d/%Y %H:%I")." ";
+ $table->data[] = array($name, $cat, $desc, $date);
+ }
+ }
+ // If folder is empty
+ if (!$sharedfiles && !$sharedfolder) {
+ $table->data[] = array(get_string("msgnosharedfoldlink","block_file_manager"));
+ }
+
+ return $table;
+}
+/*************************** JS Print Functions *****************************/
+// Returns js function to allow a js popup
+// fm_print_js_popup()
+// Returns js function to select all/none checkboxes
+// fm_print_js_select()
+// Returns js function to allow forms to send to various pages
+// fm_print_js_sendform($tourl,$formname)
+// Returns js function to execute pages according to drop-menu selection
+// fm_print_js_amenu()
+// Returns js function to execute pages according to drop-menu selection from view_shared.php
+// fm_print_js_amenushared()
+/****************************************************************************/
+
+function fm_print_js_popup() {
+ $retval = "";
+ return $retval;
+}
+
+function fm_print_js_select() {
+ $retval = "";
+ return $retval;
+}
+
+// $tourl = to what page (entire url)
+// $formname = name of the form to submit to
+function fm_print_js_sendform($tourl, $formname) {
+ $retval = "";
+ return $retval;
+}
+
+function fm_print_js_amenu() {
+ $retval = "";
+ return $retval;
+}
+
+function fm_print_js_amenushared() {
+ $retval = "";
+ return $retval;
+}
+
?>
\ No newline at end of file
Index: plugins/blocks/file_manager/lib.php
===================================================================
RCS file: /cvsroot/moodle/contrib/plugins/blocks/file_manager/lib.php,v
retrieving revision 1.2
diff -u -r1.2 lib.php
--- plugins/blocks/file_manager/lib.php 9 Mar 2006 22:00:38 -0000 1.2
+++ plugins/blocks/file_manager/lib.php 24 Feb 2008 22:33:34 -0000
@@ -1,1426 +1,1456 @@
-dirroot/lib/filelib.php");
-
-/*************************** Link Types *************************************/
-define('TYPE_FILE', 1);
-define('TYPE_URL', 2);
-define('TYPE_ZIP', 3);
-define('STYPE_FILE',0);
-define('STYPE_CAT',1);
-define('STYPE_FOLD',2);
-
-/*************************** Link Functions *********************************/
-// Returns the link record
-// fm_get_user_link($linkid)
-// Creates or Updates a link record
-// fm_update_link($link, $linkid)
-// Deletes references to a deleted category
-// fm_update_links_cats($catid)
-// Uploads the specified file to the user's personal directory
-// fm_upload_file($fileurl, $linkrename, $rootdir)
-// Deletes a file
-// fm_remove_file($file)
-/****************************************************************************/
-
-// $linkid = single link id
-function fm_get_user_link($linkid) {
- global $USER;
-
- if (!$linksrec = get_record("fmanager_link", "id", $linkid, "owner", $USER->id)) {
- error(get_string("errnoviewfile","block_file_manager"));
- }
-
- return $linksrec;
-}
-
-// $link = object containing updated info
-// $linkid = id of link to be updated
-function fm_update_link($link, $linkid = NULL, $id=1, $rootdir=0) {
- global $USER, $CFG;
-
- if ($linkid != NULL) { // update a record
- $link->id = $linkid;
- $tmp = get_record("fmanager_link", "id", $linkid);
- if ($tmp->type == TYPE_URL) {
- // Appends any url link with an http:// if it doesnt exist
- if (strncmp($link->url, "http://", 6) != 0) {
- $link->url = "http://" . $link->url;
- }
- $link->link = $link->url;
- }
- $link->timemodified = time();
- // File name was changed
- if ($tmp->link != $link->link) {
- $destinationfile = $CFG->dataroot."/".fm_get_user_dir_space().fm_get_folder_path($tmp->folder)."/".$link->link;
- $sourcefile = $CFG->dataroot."/".fm_get_user_dir_space().fm_get_folder_path($tmp->folder)."/".$tmp->link;
- if (file_exists($destinationfile)) {
- error(get_string('errfileexists','block_file_manager', $link->link),"link_manage.php?id=1&linkid=$linkid&rootdir=$rootdir");
- }
- if (!@rename($sourcefile,$destinationfile)) {
- error(get_string('errnorename','block_file_manager'));
- }
- }
- if (!update_record("fmanager_link", $link)) {
- error(get_string("errnoupdate","block_file_manager"));
- }
- } else {
- if ($link->radioval == "file") {
- $link->type = TYPE_FILE;
- } else if ($link->type != TYPE_ZIP) {
- $link->type = TYPE_URL;
- // Appends any url link with an http:// if it doesnt exist
- if (strncmp($link->url, "http://", 6) != 0) {
- $link->url = "http://" . $link->url;
- }
- }
- $link->owner = $USER->id;
- $link->link = $link->url;
- $link->timemodified = time();
- if ($link->type == TYPE_ZIP) {
- $link->link = $link->name.".zip";
- }
- // Allows user to upload zip files
- if (substr($link->link,-4) == ".zip") {
- $link->type = TYPE_ZIP;
- }
- if (!insert_record("fmanager_link", $link)) {
- error(get_string("errnoinsert","block_file_manager"));
- }
- }
- return true;
-}
-
-// $catid = id of category being removed
-function fm_update_links_cats($catid) {
- // Changes all associated links to deleted cat to 0
- if ($linkcats = get_records("fmanager_link", "category", $catid)) {
- foreach ($linkcats as $lc) {
- $lc->category = 0;
- if (!update_record("fmanager_link", $lc)) {
- error(get_string("errnoupdate","block_file_manager"));
- }
- }
- }
-}
-// $fileurl = The file's location on the user's computer
-// $linkrename = If file existed already, this will store the renamed file if the user chooses to rename
-// $rootdir = target directory of uploaded file
-function fm_upload_file($fileurl, $linkrename, $rootdir=0) {
- global $USER;
-
- if ($linkrename != NULL) {
- // renaming file and adding the extension
- $newfilename = clean_filename($linkrename.stristr($fileurl['name'], '.'));
- } else {
- $newfilename = clean_filename($fileurl['name']);
- }
-
- $folder = get_record("fmanager_folders", "id", $rootdir);
-
- if (valid_uploaded_file($fileurl)) {
- if (!$newfilename) {
- error(get_string("errwierdfilename", "block_file_manager", $fileurl['name']));
- } else if (!$dir = make_upload_directory(fm_get_user_dir_space()."$folder->path$folder->name")) {
- error(get_string("errnodir","block_file_manager"));
- } else {
- if(file_exists("$dir/$newfilename")) {
- $newfilename = ""; // flags the link_manage that file existed already
- } else {
- if (move_uploaded_file($fileurl['tmp_name'], "$dir/$newfilename")) {
- chmod("$dir/$newfilename", 0755);
- } else {
- error(get_string("errserversave","block_file_manager"), "view.php?id=$id&rootdir=$rootdir");
- }
- }
- }
- } else {
- error(get_string("errwierdfilename", "block_file_manager", $fileurl['name']));
- }
-
- return $newfilename;
-}
-
-// $file = link entry that is being deleted
-function fm_remove_file($file) {
- global $CFG;
-
- $bdir = $CFG->dataroot."/".fm_get_user_dir_space();
- // If there is no sub-folder
- if ($file->folder == 0) {
- $bdir = $bdir."/".$file->link;
- } else {
- $bdir = $bdir."/".fm_get_folder_path($file->folder)."/".$file->link;
- }
-
- if (!file_exists($bdir)) { // If file isnt found for some reason...
- return get_string("msgfilenotfound","block_file_manager", $file->link);
- } else if (!@unlink($bdir)) { // Deletes the attachment
- error(get_string("errnodeletefile","block_file_manager"));
- }
- return NULL;
-}
-
-/*************************** Folder Functions *******************************/
-// Returns the location of the file_manager folder...just incase
-// fm_get_root_dir()
-// Returns the user's personal directory space
-// fm_get_user_dir_space()
-// Returns the folder entry given a fm_folders id
-// fm_get_folder_path($folderid, $notsecure)
-// Deletes a folder and all subdirectories
-// fm_delete_folder($path)
-// Moves specified file/link/folder into destination folder
-// fm_move_to_folder($c, $rootdir)
-// Returns folder/file size
-// fm_get_size($path)
-// Converts Bytes into more readable info
-// fm_readable_filesize($size)
-/****************************************************************************/
-
-function fm_get_root_dir() {
- return "blocks/file_manager";
-}
-
-function fm_get_user_dir_space($userid = NULL) {
- global $USER;
-
- if ($userid == NULL) {
- $userid = $USER->id;
- }
-
- return "file_manager/users/$userid";
-}
-
-// $filderid = A fm_folders unique id number
-// $notsecure = flag to not check for ownership...(for shared files)
-function fm_get_folder_path($folderid, $notsecure = false) {
- global $USER;
-
- if ($folderid == 0) {
- return "";
- } else {
- // Ensure user owns the folder
- if ($notsecure == false) { fm_user_owns_folder($folderid); }
- if (!$retval = get_record("fmanager_folders", "id", $folderid)) {
- return "";
- }
- return $retval->path.$retval->name;
- }
-}
-
-// dir = folder database object
-function fm_delete_folder($dir) {
- global $CFG, $USER;
-
- // if the dir being deleted is a root dir (eg. has some dir's under it)
- if ($child = get_record("fmanager_folders","pathid",$dir->id)) {
- fm_delete_folder($child);
- }
- // Deletes all files/url links under folder
- if ($allrecs = get_records("fmanager_link","folder",$dir->id)) {
- foreach ($allrecs as $ar) {
- // a file
- if ($ar->type == TYPE_FILE || $ar->type == TYPE_ZIP) {
- fm_remove_file($ar);
- }
- // removes shared aspect
- delete_records("fmanager_shared","sharedlink",$ar->id);
- // Delete link
- delete_records("fmanager_link","id",$ar->id);
- }
- }
- // delete shared to folder
- delete_records("fmanager_shared","sharedlink",$dir->id);
-
- if (!@rmdir($CFG->dataroot."/file_manager/users/".$USER->id.$dir->path.$dir->name."/")) {
- error(get_string("errnodeletefolder","block_file_manager"));
- }
- delete_records("fmanager_folders","id",$dir->id);
-
-}
-
-// $c = id of link/folder (folders are 'f-' appended with id)
-// $rootdir = id of destination folder
-function fm_move_to_folder($c, $rootdir) {
- global $CFG;
- if ($c != 0 || substr($c,0,2) == 'f-') {
- if (substr($c,0,2) == 'f-') {
- $tmpfoldid = substr($c,2);
- $rec = get_record("fmanager_folders","id",$tmpfoldid);
- $tmp = get_record('fmanager_folders','id',$rootdir);
- $destinationfile = $CFG->dataroot."/".fm_get_user_dir_space().fm_get_folder_path($rootdir)."/".$rec->name."/";
- $sourcefile = $CFG->dataroot."/".fm_get_user_dir_space().fm_get_folder_path($rec->folder).$rec->path.$rec->name.'/';
- $rec->pathid = $rootdir;
- $rec->path = $tmp->path.$tmp->name."/";
- // Quick catch of moving a folder into itself
- if ($rootdir == $tmpfoldid) {
- print_simple_box_start("center","500","red");
- echo get_string('errsamefolder','block_file_manager', $tmp->name);
- print_simple_box_end();
- } else {
- if (!@rename($sourcefile,$destinationfile)) {
- // When moving a folder into itself...throws this error
- print_simple_box_start("center","500","red");
- echo get_string('errsamefolder','block_file_manager', $rec->name);
- print_simple_box_end();
- } else {
- if (!update_record("fmanager_folders",$rec)) {
- error(get_string('errnoupdate','block_file_manager'));
- }
- }
- }
- } else {
- $rec = get_record("fmanager_link","id",$c);
- $exists = false; // Does file exist?
- if ($rec->type == TYPE_FILE || $rec->type == TYPE_ZIP) {
- $destinationfile = $CFG->dataroot."/".fm_get_user_dir_space().fm_get_folder_path($rootdir)."/".$rec->link;
- $sourcefile = $CFG->dataroot."/".fm_get_user_dir_space().fm_get_folder_path($rec->folder)."/".$rec->link;
- // Checks if file exists and prints warning, and doesnt change anything for that file only
- if (file_exists($destinationfile)) {
- print_simple_box_start("center",'500','red');
- echo get_string('errfileexists','block_file_manager', $rec->name);
- print_simple_box_end();
- $exists = true;
- } else {
- if (!@copy($sourcefile,$destinationfile)) {
- error(get_string('errcantmovefile','block_file_manager'));
- }
- if (!@unlink($sourcefile)) {
- error(get_string('errnodeletefile','block_file_manager'));
- }
- }
- }
- $rec->folder = $rootdir;
- if (!$exists && !update_record("fmanager_link",$rec)) {
- error(get_string('errnoupdate','block_file_manager'));
- }
- }
- }
-}
-
-// $path = Path of folder/file
-function fm_get_size($path, $rawbytes = 0) {
- if (!is_dir($path)) {
- return fm_readable_filesize(@filesize($path));
- }
- $dir = opendir($path);
- while ($file = readdir($dir)) {
- if (is_dir($path."/".$file) && $file != "." && $file != "..") {
- $size += fm_get_size($path."/".$file, 1);
- } else {
- $size += @filesize($path."/".$file);
- }
- }
- if ($rawbytes == 1) {
- return $size;
- }
- if ($size == 0) {
- return "0 Bytes";
- } else {
- return fm_readable_filesize($size);
- }
-}
-
-function fm_readable_filesize($size) {
- $filesizename = array(" Bytes", " KB", " MB", " GB", " TB", " PB", " EB", " ZB", " YB");
- if ($size != 0) {
- return round($size/pow(1024, ($i = floor(log($size, 1024)))), 2) . $filesizename[$i];
- } else {
- return "0".$filesizename[0];
- }
-}
-/*************************** Category Functions *****************************/
-// This either creates a new category or updates the existing one
-// fm_update_category($name, $catid);
-// This takes a num or an array of nums and returns a catname or an array of catnames
-// fm_get_user_categories($catid)
-// Returns an array of user's categories for choose_from_menu function
-// fm_get_cat_list()
-/****************************************************************************/
-
-// $name = Name of category
-// $catid = If present, then updating an existing
-function fm_update_category($name, $catid = NULL) {
- global $USER;
-
- if ($catid != NULL) {
- $update->id = $catid;
- $update->name = $name;
- $update->timemodified = time();
- if (!update_record("fmanager_categories", $update)) {
- error(get_string("errnoupdate","block_file_manager"));
- }
- } else {
- $new->name = $name;
- $new->owner = $USER->id;
- $new->timemodified = time();
- if (!insert_record("fmanager_categories", $new)) {
- error(get_string("errnoinsert","block_file_manager"));
- }
- }
- return true;
-}
-
-// $catid = An array of catids or a single catid
-function fm_get_user_categories($catid) {
- if (!is_array($catid)) {
- $rec = get_record("fmanager_categories", "id", $catid);
- return $rec->name;
- } else {
- $tmp = array();
- foreach ($catid as $cid) {
- $tmp[] = fm_get_user_categories($cid);
- }
- return $tmp;
- }
-}
-
-function fm_get_cat_list() {
- global $USER;
-
- $cats[0] = get_string("btnnoassigncat","block_file_manager");
- if ($catsrec = get_records("fmanager_categories", "owner", $USER->id, "name")) {
- foreach ($catsrec as $c) {
- $cats[$c->id] = $c->name;
- }
- }
- return $cats;
-}
-
-/************************* Shared Link Functions ****************************/
-// Deletes all shared link entries associated with deleted link or with unsharing all
-// fm_update_shared_links($linkid)
-// Returns an object of all links with the specified category (not including folders)
-// fm_get_links_shared_by_cat($original, $catid)
-// Returns an object of all folders with specified category
-// fm_get_folder_shared_by_cat($original,$catid)
-// Returns an object of all links under specified folder
-// fm_get_all_shared_by_folder($original, $foldid)
-// Returns an object of all folders under specified folder
-// fm_get_all_sharedf_by_folder($original, $foldid)
-/****************************************************************************/
-
-// $linkid = id of deleted link
-function fm_update_shared_links($linkid) {
-
- if ($sharedlinks = get_records("fmanager_shared", "sharedlink", $linkid)) {
- foreach ($sharedlinks as $sl) {
- if (!delete_records("fmanager_shared", "id", $sl->id)) {
- error(get_string("errnoupdate","block_file_manager"));
- }
- }
- }
-}
-
-// $original = owners id
-// $catid = category id num
-function fm_get_links_shared_by_cat($original, $catid) {
- return get_records("fmanager_link","owner = $original AND category",$catid);
-}
-// $original = owners id
-// $catid = category id num
-function fm_get_folder_shared_by_cat($original,$catid) {
- return get_records('fmanager_folders',"owner = $original AND category",$catid);
-
-}
-// $original = owners id
-// $foldid = folder id num
-function fm_get_all_shared_by_folder($original, $foldid) {
- $tmpvar = get_records("fmanager_link","owner=$original AND folder",$foldid);
-
- return $tmpvar;
-}
-
-// $original = owners id
-// $foldid = folder id num
-function fm_get_all_sharedf_by_folder($original, $foldid) {
- $tmpvar = get_records("fmanager_folders","owner=$original AND pathid",$foldid);
-
- return $tmpvar;
-}
-/**************************** Security Functions ****************************/
-// Ensures the user can view shared files from specified user
-// fm_user_has_shared($original, $link)
-// Ensures the user can view the shared files
-// fm_user_has_shared_ind($sid)
-// Ensures the user can view the category for modification
-// fm_user_owns_cat($catid)
-// Ensures the user owns the link
-// fm_user_owns_link($linkid)
-// Ensures the user owns the folder
-// fm_user_owns_folder($folderid)
-// Ensures the user can view the page according to settings set by admin
-// fm_check_access_rights()
-// Ensures user can view shared category
-// fm_user_has_shared_cat($original, $catid)
-// Ensures user can view shared folder
-// fm_user_has_shared_folder($original, $foldid)
-// Ensures user can view shared folder via category
-// fm_user_has_shared_folder_cat
-// Ensures user can view a file from file.php (owner/shared/in a cat/under a folder)
-// fm_user_can_view_file($id, $fileid)
-// Cleans checkbox array values
-// fm_clean_checkbox_arr($cb)
-/****************************************************************************/
-
-// $original = user who is sharing files to $USER
-// $link = link id of the file being checked
-function fm_user_has_shared($original=0, $link=0) {
- global $USER, $CFG;
-
- if ($link == 0) {
- if (!$sharedfiles = (count_records("fmanager_shared", "owner", $original, "userid", $USER->id) + count_records("fmanager_shared", "owner", $original, "userid", 0))) {
- error(get_string("errnoshared", "block_file_manager"));
- }
- } else {
- if (!$sharedfiles = (count_records("fmanager_shared","owner",$original,"userid",$USER->id,"sharedlink",$link) + count_records("fmanager_shared","owner",$original,"userid",0,"sharedlink",$link))) {
- error(get_string("errnoshared","block_file_manager"));
- }
- }
- return true;
-}
-
-// $sid = Shared link id
-function fm_user_has_shared_ind($sid) {
- global $USER;
-
- if (!$sharedfiles = count_records("fmanager_shared","id",$sid,"userid", $USER->id)) {
- if (!count_records("fmanager_shared","id",$sid,"userid",0)) {
- error(get_string("errnoshared","block_file_manager"));
- }
- }
- return true;
-}
-
-// $catid = category id to check ownership
-function fm_user_owns_cat($catid) {
- global $USER;
- if ($catid == 0) {
- return true;
- }
- if (!$owncat = count_records("fmanager_categories", "id", $catid, "owner", $USER->id)) {
- error(get_string("errdontowncat", "block_file_manager"));
- } else {
- return true;
- }
-}
-
-// $linkid = id of the link
-function fm_user_owns_link($linkid) {
- global $USER;
-
- if ($linkid == 0) {
- return true;
- }
- if (!$ownlink = count_records("fmanager_link", "id", $linkid, "owner", $USER->id)) {
- error(get_string("errdontownlink", "block_file_manager"));
- } else {
- return true;
- }
-}
-
-// $folderid = id of the folder
-function fm_user_owns_folder($folderid) {
- global $USER;
- // Default directory...no folder selected
- if ($folderid == 0) {
- return true;
- }
- if (!$ownfold = count_records("fmanager_folders", "id", $folderid, "owner", $USER->id)) {
- error(get_string("errdontownfolder","block_file_manager"));
- } else {
- return true;
- }
-}
-
-// $id = course id
-// $chk1 = Flags to check if can share files
-// $chk2 = Flags to check *******
-function fm_check_access_rights($id=0, $chk1=false, $chk2=false) {
- $userinttype = fm_get_user_int_type();
- $tmp = get_record("fmanager_admin", "usertype", $userinttype);
- if ($tmp->enable_fmanager == 0) {
- error(get_string("errfmandisabled","block_file_manager"), $SESSION->fromdiscussion);
- }
- // Checks if they can share files and if they can share from course 1
- if (($tmp->sharetoany == 0) && ($id == 1) && ($chk2 != false)) {
- error(get_string("errcantviewshared","block_file_manager", "from this course"));
- }
- if (($chk1 != false) && ($tmp->allowsharing == 0)) {
- error(get_string("errcantviewshared","block_file_manager"));
- }
-}
-
-// $original = id of the person who is sharing
-// $catid = id of the category being shared
-function fm_user_has_shared_cat($original, $catid) {
- global $USER, $CFG;
- $mysql = "SELECT * FROM {$CFG->prefix}fmanager_shared WHERE userid = '0' AND owner='$original' AND type='1' AND sharedlink='$catid' OR userid='$USER->id' AND owner='$original' AND type='1' AND sharedlink='$catid'";
- if (!count_records_sql($mysql)) {
- echo $mysql;
- error(get_string('errnoviewcat','block_file_manager'));
- } else {
- return true;
- }
-}
-
-// $original = id of the person who is sharing
-// $foldid = id of the category being shared
-function fm_user_has_shared_folder($original, $foldid) {
- global $USER, $CFG;
-
- if (fm_user_has_shared_folder_cat($original, $foldid)) {
- return true;
- } else {
- // Pulls out directly shared folder
- $mysql = "SELECT * FROM {$CFG->prefix}fmanager_shared WHERE userid = '0' AND owner='$original' AND type='2' AND sharedlink='$foldid' OR userid='$USER->id' AND owner='$original' AND type='2' AND sharedlink='$foldid'";
- if (!get_records_sql($mysql)) {
- // Checks if the folder is shared via a cascaded folder share
- $dummyvar = 1;
- $tmpid = $foldid;
- while($dummyvar) {
- $tmp = get_record("fmanager_folders","id",$tmpid);
- $mysql = "SELECT * FROM {$CFG->prefix}fmanager_shared WHERE userid = '0' AND owner='$original' AND type='2' AND sharedlink='$tmp->pathid' OR userid='$USER->id' AND owner='$original' AND type='2' AND sharedlink='$tmp->pathid'";
- if (get_records_sql($mysql)) {
- $dummyvar = 0;
- } else {
- $tmpid = $tmp->pathid;
- if ($tmpid == 0) { // If root folder is reached and it isnt shared...check if shared via categories
- error(get_string('errnoviewfold','block_file_manager'));
- }
- }
- }
- } else {
- return true;
- }
- }
-}
-// $original = id of the person who is sharing
-// $foldid = id of the category being shared
-function fm_user_has_shared_folder_cat($original, $foldid) {
- global $USER, $CFG;
-
- while (1) {
- $fold = get_record("fmanager_folders","id",$foldid);
- $mysql = "SELECT * FROM {$CFG->prefix}fmanager_shared WHERE userid = '0' AND owner='$original' AND type='1' AND sharedlink ='$fold->category' OR userid='$USER->id' AND owner='$original' AND type='1' AND sharedlink='$fold->category'";
- if (get_records_sql($mysql)) {
- $dummyvar = 0;
- return true;
- } else if ($fold->pathid == 0) {
- return false;
- } else {
- $foldid = $fold->pathid;
- }
- }
- return false;
-}
-
-// $id = courseid
-// $fileid = id of file to be viewed
-function fm_user_can_view_file($id, $fileid) {
- global $USER, $CFG;
-
- // If they own the file, they can view
- if (count_records("fmanager_link", "id", $fileid, "owner", $USER->id)) {
- return true;
- }
- // If file is shared to them or to everyone in the course they can view
- $mysql = "SELECT * FROM {$CFG->prefix}fmanager_shared WHERE userid = '0' AND sharedlink='$fileid' AND course='$id' OR userid='$USER->id' AND sharedlink='$fileid' AND course='$id'";
- if (count_records_sql($mysql)) {
- return true;
- }
- if (!$sharedfile = get_record("fmanager_link", "id", $fileid)) {
- return false;
- }
- // If shared via shared/nested folder they can view
- $mysql = "SELECT * FROM {$CFG->prefix}fmanager_shared WHERE userid='0' AND type='2' AND course='$id' AND sharedlink='$sharedfile->folder' OR userid='$USER->id' AND type='2' AND course='$id' AND sharedlink='$sharedfile->folder'";
- if (count_records_sql($mysql)) {
- return true;
- } else { // File isnt under the main folder
- $tmp = get_record("fmanager_folders", "id", $sharedfile->folder);
- $foldid = $tmp->pathid;
- while ($foldid) { // While folder id isnt the root (0)
- $mysql = "SELECT * FROM {$CFG->prefix}fmanager_shared WHERE userid='0' AND type='2' AND course='$id' AND sharedlink='$foldid' OR userid='$USER->id' AND type='2' AND course='$id' AND sharedlink='$foldid'";
- if (count_records_sql($mysql)) {
- return true;
- }
- $tmp = get_record("fmanager_folders","id", $tmp->pathid);
- $foldid = $tmp->id;
- }
- }
- // If file is shared via a shared category they can view
- $dummyvar = 1;
- $fid = $sharedfile->folder;
- if ($fid == 0) {
- $mysql = "SELECT * FROM {$CFG->prefix}fmanager_shared WHERE userid='0' AND type='1' AND course='$id' AND sharedlink='$sharedfile->category' OR userid='$USER->id' AND type = '1' AND course='$id' AND sharedlink='$sharedfile->category'";
- if (get_record_sql($mysql)) {
- return true;
- } else {
- return false;
- }
- }
- while ($fid) {
- $fold = get_record('fmanager_folders','id',$fid);
-
- $mysql = "SELECT * FROM {$CFG->prefix}fmanager_shared WHERE userid='0' AND type='1' AND course='$id' AND sharedlink='$fold->category' OR userid='$USER->id' AND type='1' AND course='$id' AND sharedlink='$fold->category'";
- if (count_records_sql($mysql)) {
- return true;
- } else {
- $fid = $fold->pathid;
- }
- }
- // Otherwise, error is displayed
- return false;
-}
-
-// $cb = Checkbox array
-function fm_clean_checkbox_arr() {
- $cb = NULL;
- $cb = $_POST['cb']; // Checkbox array
- if (is_array($cb)) {
- $tmp = array();
- foreach($cb as $c) {
- if(substr($c,0,4) == "fold") {
- $tmp[] = "f-".(int)substr($c,4);
- } else if (substr($c,0,2) == "f-") {
- $tmp[] = "f-".(int)substr($c,2);
- } else {
- $tmp[] = (int)$c;
- }
- }
- $cb = $tmp;
- } else {
- if (substr($cb,0,4) == "fold") {
- $cb[] = "f-".(int)substr($cb,4);
- } else if (substr($cb,2) == "f-") {
- $cb[] = "f-".(int)substr($cb,2);
- } else {
- $cb[] = (int)$cb;
- $cb[]=$singlecb;
- }
- }
- // Removes 0 as default
- $nullify = false;
- foreach ($cb as $c) {
- if ($c == 0 && substr($c,0,2) != 'f-') {
- $nullify = true;
- } else {
- $nullify = false;
- }
- }
- if ($nullify == true) {
- $cb = NULL;
- }
-
- return $cb;
-}
-
-/*************************** Database Functions *****************************/
-// This function processes the submission of yes/no to the conf_delete form & returns strings
-// fm_process_del($delfrom, $fromid)
-// This function deletes a shared attribute of a file for a user
-// fm_del_shared($id)
-// This func processes the submission from the admin_settings.php form
-// fm_process_admin_settings($entry)
-// Returns the user's integer representation of their type (0=admin, 1=teacher, 2=student)
-// fm_get_user_int_type()
-/****************************************************************************/
-
-// $delfrom = table to delete record from
-// $fromid = id(s) of the record(s) to delete
-function fm_process_del($delfrom, $fromid) {
- global $USER;
-
- if (isset($_POST['yesdel'])) {
- if (is_array($fromid)) {
- foreach($fromid as $id) {
- if (!delete_records($delfrom, "id", $id)) {
- error(get_string("errnodelete","block_file_manager"));
- }
- }
- } else {
- if (!delete_records($delfrom, "id", $fromid)) {
- error(get_string("errnodelete","block_file_manager"));
- }
- }
- return true;
- } else if (isset($_POST['nodel'])) {
- return true;
- }
-}
-
-// $id = id of shared files to be removed
-function fm_del_shared($ids, $courseid) {
- global $USER;
-
- if (isset($_POST['yesdel'])) {
- if (is_array($ids)) {
- foreach($ids as $id) {
- // Ensures they can even view file to delete permission to view it
- if ($id != 0) {
- if (fm_user_has_shared_ind($id)) {
- // Shared to the entire class
- if ($t = get_record("fmanager_shared","id",$id,"userid",0)) {
- // for courses with students/teachers
- if ($courseid != 1) {
- if ($teachers = get_records("user_teachers","course",$courseid)) {
- foreach ($teachers as $teacher) {
- if ($teacher->userid != $USER->id) {
- $t->userid = $teacher->userid;
- insert_record('fmanager_shared',$t);
- }
- }
- }
- if ($students = get_records("user_students","course",$courseid)) {
- foreach ($students as $student) {
- if ($student->userid != $USER->id) {
- $t->userid = $student->userid;
- insert_record('fmanager_shared',$t);
- }
- }
- }
- delete_records("fmanager_shared","id",$id);
- } else {
- // else share to all users sitewide
- if ($users = get_records("user")) {
- foreach($users as $user) {
- if ($user->id != $USER->id && $user->username != "guest") {
- $t->userid = $user->id;
- insert_record("fmanager_shared",$t);
- }
- }
- }
- delete_records("fmanager_shared","id",$id);
- }
- } else {
- delete_records("fmanager_shared","id",$id);
- }
- }
- }
- }
- }
- return true;
- } else if (isset($_POST['nodel'])) {
- return true;
- }
-}
-
-// $entry = object that contains all form data ($entry->usertype and any data required)
-function fm_process_admin_settings($entry) {
- // Deals with all processing from the files section of admin
- if (!$exist_record = get_record("fmanager_admin", "usertype", $entry->usertype)) {
- $tmp = NULL;
- $tmp->usertype = $entry->usertype;
- if (!insert_record("fmanager_admin", $tmp)) {
- $err = NULL;
- $err->errtype = "insert";
- $err->forhwho ="user";
- error(get_string("errrecordmod","block_file_manager", $err), $_SERVER["HTTP_REFERER"]);
- }
- }
- if ($exist_record = get_record("fmanager_admin", "usertype", $entry->usertype)) {
- $entry->id = $exist_record->id;
- if (!update_record("fmanager_admin", $entry)) {
- $err = NULL;
- $err->errtype = "update";
- $err->forwho = "user";
- error(get_string("errrecordmod", "block_file_manager", $err), $_SERVER["HTTP_REFERER"]);
- }
- }
-}
-
-function fm_get_user_int_type() {
- if (isadmin()) {
- return 0;
- } else if (isteacherinanycourse("0", false)) {
- return 1;
- } else {
- return 2;
- }
-}
-
-/*************************** Zip Functions **********************************/
-// fm_zip_files($originalfiles, $destination)
-// fm_unzip_file($zipfile, $destination = '', $showstatus = true)
-// Reorders a list of unzipped objects with folders first
-// fm_reorder_folders_list($obj1, $obj2)
-// fm_unzip_cleanfilename($p_event, &$p_header)
-// fm_unzip_show_status($list, $removepath)
-// Shows contents of target zipped file
-// fm_view_zipped($file)
-/****************************************************************************/
-function fm_zip_files ($originalfiles, $destination, $zipname="zip01", $rootdir=0) {
-//Zip an array of files/dirs to a destination zip file
-//Both parameters must be FULL paths to the files/dirs
-// Modded for Myfiles
-// Michael Avelar 1/19/06
-
- global $CFG, $USER;
-
- //Extract everything from destination
- $path_parts = pathinfo(cleardoubleslashes($destination));
- $destpath = $path_parts["dirname"]; //The path of the zip file
- $destfilename = $path_parts["basename"]; //The name of the zip file
- $extension = $path_parts["extension"]; //The extension of the file
- // To put the zipped file into the current directory
- $destpath = $destpath."/".$destfilename;
- // To allow naming of zipfiles
- $destfilename = $zipname;
- //If no file, error
- if (empty($destfilename)) {
- return false;
- }
-
- //If no extension, add it
- if (empty($extension)) {
- $extension = 'zip';
- $destfilename = $destfilename.'.'.$extension;
- }
-
- //Check destination path exists
- if (!is_dir($destpath)) {
- return false;
- }
-
- //Check destination path is writable. TODO!!
-
- //Clean destination filename
- $destfilename = clean_filename($destfilename);
-
- //Now check and prepare every file
- $files = array();
- $origpath = NULL;
-
- foreach ($originalfiles as $file) { //Iterate over each file
- //Check for every file
- $tempfile = cleardoubleslashes($file); // no doubleslashes!
- //Calculate the base path for all files if it isn't set
- if ($origpath === NULL) {
- $origpath = rtrim(cleardoubleslashes(dirname($tempfile)), "/");
- }
- //See if the file is readable
- if (!is_readable($tempfile)) { //Is readable
- continue;
- }
- //See if the file/dir is in the same directory than the rest
- if (rtrim(cleardoubleslashes(dirname($tempfile)), "/") != $origpath) {
- continue;
- }
- //Add the file to the array
- $files[] = $tempfile;
- }
-
- //Everything is ready:
- // -$origpath is the path where ALL the files to be compressed reside (dir).
- // -$destpath is the destination path where the zip file will go (dir).
- // -$files is an array of files/dirs to compress (fullpath)
- // -$destfilename is the name of the zip file (without path)
-
- //print_object($files); //Debug
-
- if (empty($CFG->zip)) { // Use built-in php-based zip function
-
- include_once("$CFG->libdir/pclzip/pclzip.lib.php");
- $archive = new PclZip(cleardoubleslashes("$destpath/$destfilename"));
- if (($list = $archive->create($files, PCLZIP_OPT_REMOVE_PATH,$origpath) == 0)) {
- notice($archive->errorInfo(true));
- return false;
- }
-
- } else { // Use external zip program
-
- $filestozip = "";
- foreach ($files as $filetozip) {
- $filestozip .= escapeshellarg(basename($filetozip));
- $filestozip .= " ";
- }
- //Construct the command
- $separator = strtoupper(substr(PHP_OS, 0, 3)) === 'WIN' ? ' &' : ' ;';
- $command = 'cd '.escapeshellarg($origpath).$separator.
- escapeshellarg($CFG->zip).' -r '.
- escapeshellarg(cleardoubleslashes("$destpath/$destfilename")).' '.$filestozip;
- //All converted to backslashes in WIN
- if (strtoupper(substr(PHP_OS, 0, 3)) === 'WIN') {
- $command = str_replace('/','\\',$command);
- }
- Exec($command);
- }
- // Adds an entry into myfiles api
- $newentry = NULL;
- $newentry->owner = $USER->id;
- $newentry->type = TYPE_ZIP;
- $newentry->folder = $rootdir;
- $newentry->category = 0;
- $newentry->name = substr($destfilename,0,-4);
- $newentry->description = '';
- $newentry->link = $destfilename;
- $newentry->timemodified = time();
- if (!fm_update_link($newentry)) {
- error(get_string("errnoupdate","block_file_manager"));
- }
- return true;
-}
-
-function fm_unzip_file ($zipfile, $destination = '', $showstatus = false, $currentdir=0) {
-//Unzip one zip file to a destination dir
-//Both parameters must be FULL paths
-//If destination isn't specified, it will be the
-//SAME directory where the zip file resides.
-// Modded for Myfiles
-// Michael Avelar 1/24/06
- global $CFG, $USER;
-
- //Extract everything from zipfile
- $path_parts = pathinfo(cleardoubleslashes($zipfile));
- $zippath = $path_parts["dirname"]; //The path of the zip file
- $zipfilename = $path_parts["basename"]; //The name of the zip file
- $extension = $path_parts["extension"]; //The extension of the file
-
- //If no file, error
- if (empty($zipfilename)) {
- return false;
- }
-
- //If no extension, error
- if (empty($extension)) {
- return false;
- }
-
- //If no destination, passed let's go with the same directory
- if (empty($destination)) {
- $destination = $zippath;
- }
-
- //Clear $destination
- $destpath = rtrim(cleardoubleslashes($destination), "/");
-
- //Check destination path exists
- if (!is_dir($destpath)) {
- return false;
- }
-
- //Check destination path is writable. TODO!!
-
- //Everything is ready:
- // -$zippath is the path where the zip file resides (dir)
- // -$zipfilename is the name of the zip file (without path)
- // -$destpath is the destination path where the zip file will uncompressed (dir)
-
- if (empty($CFG->unzip)) { // Use built-in php-based unzip function
-
- include_once("$CFG->libdir/pclzip/pclzip.lib.php");
- $archive = new PclZip(cleardoubleslashes("$zippath/$zipfilename"));
- if (!$list = $archive->extract(PCLZIP_OPT_PATH, $destpath,
- PCLZIP_CB_PRE_EXTRACT, 'unzip_cleanfilename')) {
- notice($archive->errorInfo(true));
- return false;
- }
-
- } else { // Use external unzip program
-
- $separator = strtoupper(substr(PHP_OS, 0, 3)) === 'WIN' ? ' &' : ' ;';
- $redirection = strtoupper(substr(PHP_OS, 0, 3)) === 'WIN' ? '' : ' 2>&1';
-
- $command = 'cd '.escapeshellarg($zippath).$separator.
- escapeshellarg($CFG->unzip).' -o '.
- escapeshellarg(cleardoubleslashes("$zippath/$zipfilename")).' -d '.
- escapeshellarg($destpath).$redirection;
- //All converted to backslashes in WIN
- if (strtoupper(substr(PHP_OS, 0, 3)) === 'WIN') {
- $command = str_replace('/','\\',$command);
- }
- Exec($command,$list);
- }
- // Inserts unzipped objects into myfiles api
- $afolder = $currentdir;
- // Reorders list so that folders are inserted into database before links
- $list2 = array();
- foreach($list as $l) {
- if ($l['folder'] == 1) {
- $list2[] = $l;
- }
- }
- // Reorders folders list to extract them in order, so the database has the folder before
- // inserting stuff into that folder
-
- usort($list2, 'fm_reorder_folders_list');
- // Recompiles the completed list...with ordered folders first, then files
- foreach($list as $l) {
- if ($l['folder'] != 1) {
- $list2[] = $l;
- }
- }
- foreach($list2 as $l) {
- if ($l['folder'] == 1) { // is an unzipped folder
- $newfolder = NULL;
- $newfolder->owner = $USER->id;
- $tmp = explode('/',$l['stored_filename']);
- // compiles the path of the folder
- $tmppath = '/';
- foreach ($tmp as $t) {
- if ($t != '') {
- $tmppath .= $t."/";
- }
- }
- $tmp = array_reverse($tmp);
- $tmppath = substr($tmppath, 0, (strrpos($tmppath, $tmp[1])));
- $newfolder->name = $tmp[1];
- $newfolder->category = 0;
- if ($tmp[2] == NULL) { // Folder is root folder
- $newfolder->path = '/';
- $newfolder->pathid = 0;
- } else {
- // Puts all folders in their place :)
- $pathtmp = '/';
- $count = count($tmp);
- while ($count > 3) {
- $pathtmp .= $tmp[$count - 1].'/';
- $count--;
- }
- $rec = get_record("fmanager_folders","name",$tmp[2],"path",$pathtmp);
- $afolder = $rec->id;
- $newfolder->path = fm_get_folder_path($afolder)."/";
- $newfolder->pathid = $afolder;
- }
- $newfolder->timemodified = time();
- if (!$afolder = insert_record('fmanager_folders',$newfolder)) {
- error(get_string('errnoinsert','block_file_manager'));
- }
- } else {
- $tmp = explode('/', $l['stored_filename']);
- $newlink = NULL;
- $newlink->owner = $USER->id;
- $newlink->type = TYPE_FILE;
- $rootlinkstr = '';
- // Compiles path string
- $count = count($tmp);
- $count = $count - 2;
- foreach($tmp as $t) {
- if ($count > 0) {
- if ($t != '') {
- $rootlinkstr .= '/'.$t;
- }
- $count--;
- }
- }
- if (substr($rootlinkstr,0,1) != '/') {
- $rootlinkstr = '/'.$rootlinkstr;
- }
- if ($rootlinkstr != '/') {
- $rootlinkstr = $rootlinkstr.'/';
- }
- $tmp = array_reverse($tmp);
- if (!$foldstr = get_record("fmanager_folders","owner",$USER->id,"name",$tmp[1],"path",$rootlinkstr)) {
- $foldstr->id = $currentdir;
- }
- $newlink->folder = $foldstr->id;
- $newlink->category = 0;
- $newlink->name = substr($tmp[0],0,-4);
- $newlink->description = '';
- $newlink->link = $tmp[0];
- $newlink->timemodified = time();
- if (!$alink = insert_record('fmanager_link',$newlink)) {
- error(get_string('errnoinsert','block_file_manager'));
- }
- }
- }
- //Display some info about the unzip execution
- if ($showstatus) {
- fm_unzip_show_status($list,$destpath);
- }
-
- return $list;
-}
-
-// $list = list of the folders to be reordered
-function fm_reorder_folders_list($obj1, $obj2) {
- $size1 = explode("/",$obj1['stored_filename']);
- $size2 = explode("/",$obj2['stored_filename']);
-
- if (count($size1) == count($size2)) {
- return 0;
- }
- if (count($size1) > count($size2)) {
- return 1;
- }
- if (count($size1) < count($size2)) {
- return -1;
- }
-}
-
-function fm_unzip_cleanfilename ($p_event, &$p_header) {
-//This function is used as callback in unzip_file() function
-//to clean illegal characters for given platform and to prevent directory traversal.
-//Produces the same result as info-zip unzip.
- $p_header['filename'] = ereg_replace('[[:cntrl:]]', '', $p_header['filename']); //strip control chars first!
- $p_header['filename'] = ereg_replace('\.\.+', '', $p_header['filename']); //directory traversal protection
- if (strtoupper(substr(PHP_OS, 0, 3)) === 'WIN') {
- $p_header['filename'] = ereg_replace('[:*"?<>|]', '_', $p_header['filename']); //replace illegal chars
- $p_header['filename'] = ereg_replace('^([a-zA-Z])_', '\1:', $p_header['filename']); //repair drive letter
- } else {
- //Add filtering for other systems here
- // BSD: none (tested)
- // Linux: ??
- // MacosX: ??
- }
- $p_header['filename'] = cleardoubleslashes($p_header['filename']); //normalize the slashes/backslashes
- return 1;
-}
-
-function fm_unzip_show_status ($list,$removepath) {
-//This function shows the results of the unzip execution
-//depending of the value of the $CFG->zip, results will be
-//text or an array of files.
-
- global $CFG;
-
- if (empty($CFG->unzip)) { // Use built-in php-based zip function
- $strname = get_string("name");
- $strsize = get_string("size");
- $strmodified = get_string("modified");
- $strstatus = get_string("status");
- echo "";
- echo "";
- echo "";
- echo "";
- echo " ";
- foreach ($list as $item) {
- echo "";
- $item['filename'] = str_replace(cleardoubleslashes($removepath).'/', "", $item['filename']);
- print_cell("left", $item['filename']);
- if (! $item['folder']) {
- print_cell("right", display_size($item['size']));
- } else {
- echo " ";
- }
- $filedate = userdate($item['mtime'], get_string("strftimedatetime"));
- print_cell("right", $filedate);
- print_cell("right", $item['status']);
- echo " ";
- }
- echo "
";
-
- } else { // Use external zip program
- print_simple_box_start("center");
- echo "";
- foreach ($list as $item) {
- echo str_replace(cleardoubleslashes($removepath.'/'), '', $item).' ";
- print_simple_box_end();
- }
-}
-
-// $file = object of target zip file
-function fm_view_zipped($file) {
- global $CFG, $USER;
-
- if ($file->folder == 0) {
- $ziploc = $CFG->dataroot."/".fm_get_user_dir_space()."/".$file->link;
- } else {
- $ziploc = $CFG->dataroot."/".fm_get_user_dir_space().fm_get_folder_path($file->folder)."/".$file->link;
- }
-
- $filelist = array();
- $zip = zip_open($ziploc);
- if ($zip) {
- $count = 0;
- while ($zip_entry = zip_read($zip)) {
- $filelist[$count]->name = zip_entry_name($zip_entry);
- $filelist[$count]->actualsize = zip_entry_filesize($zip_entry);
- $filelist[$count]->compsize = zip_entry_compressedsize($zip_entry);
- $count++;
- }
- zip_close($zip);
- }
- return $filelist;
-}
-
-/*************************** Print Functions ********************************/
-// Located within print_lib.php
-/****************************************************************************/
-
-/*************************** JS Print Functions *****************************/
-// Located within print_lib.php
-/****************************************************************************/
-
-
-
-function shared_files_assignment_file_submission($entry, $assignment) {
-/// Copies a file to the teacher's assignment directory for that course
- global $CFG, $USER;
- $pathnew = "$assignment->course/moddata/assignment/$assignment->id/$USER->id";
- $pathold = "$CFG->dataroot/shared_files/users/$entry->userid";
-
- make_upload_directory($pathnew);
-
- if (!copy("$pathold/$entry->attachment", "$CFG->dataroot/$pathnew/$entry->attachment")) {
- error ("Failed to copy file!", "view.php?id=$id&rootdir=$rootdir");
- }
-}
-
-
-// When called, outputs all groups and members of a course, using $listmembers and $listgroups defined in
-// call to get_list_members()
-function show_visible_groups($course, $listmembers, $listgroups, $filerefphp) {
- // Print out the selection boxes and fill with groups/members
- echo "";
+ echo "";
+ echo "";
+ echo "";
+ echo " ";
+ foreach ($list as $item) {
+ echo "";
+ $item['filename'] = str_replace(cleardoubleslashes($removepath).'/', "", $item['filename']);
+ print_cell("left", $item['filename']);
+ if (! $item['folder']) {
+ print_cell("right", display_size($item['size']));
+ } else {
+ echo " ";
+ }
+ $filedate = userdate($item['mtime'], get_string("strftimedatetime"));
+ print_cell("right", $filedate);
+ print_cell("right", $item['status']);
+ echo " ";
+ }
+ echo "
";
+
+ } else { // Use external zip program
+ print_simple_box_start("center");
+ echo "";
+ foreach ($list as $item) {
+ echo str_replace(cleardoubleslashes($removepath.'/'), '', $item).' ";
+ print_simple_box_end();
+ }
+}
+
+// $file = object of target zip file
+function fm_view_zipped($file) {
+ global $CFG, $USER;
+
+ if ($file->folder == 0) {
+ $ziploc = $CFG->dataroot."/".fm_get_user_dir_space()."/".$file->link;
+ } else {
+ $ziploc = $CFG->dataroot."/".fm_get_user_dir_space().fm_get_folder_path($file->folder)."/".$file->link;
+ }
+
+ $filelist = array();
+ $zip = zip_open($ziploc);
+ if ($zip) {
+ $count = 0;
+ while ($zip_entry = zip_read($zip)) {
+ $filelist[$count]->name = zip_entry_name($zip_entry);
+ $filelist[$count]->actualsize = zip_entry_filesize($zip_entry);
+ $filelist[$count]->compsize = zip_entry_compressedsize($zip_entry);
+ $count++;
+ }
+ zip_close($zip);
+ }
+ return $filelist;
+}
+
+/*************************** Print Functions ********************************/
+// Located within print_lib.php
+/****************************************************************************/
+
+/*************************** JS Print Functions *****************************/
+// Located within print_lib.php
+/****************************************************************************/
+
+
+
+function shared_files_assignment_file_submission($entry, $assignment) {
+/// Copies a file to the teacher's assignment directory for that course
+ global $CFG, $USER;
+ $pathnew = "$assignment->course/moddata/assignment/$assignment->id/$USER->id";
+ $pathold = "$CFG->dataroot/shared_files/users/$entry->userid";
+
+ make_upload_directory($pathnew);
+
+ if (!copy("$pathold/$entry->attachment", "$CFG->dataroot/$pathnew/$entry->attachment")) {
+ error ("Failed to copy file!", "view.php?id=$id&rootdir=$rootdir");
+ }
+}
+
+
+// When called, outputs all groups and members of a course, using $listmembers and $listgroups defined in
+// call to get_list_members()
+function show_visible_groups($course, $listmembers, $listgroups, $filerefphp) {
+ // Print out the selection boxes and fill with groups/members
+ echo "![](\"../file_manager/pix/noteitshared.gif\")
";
- $userentry .= $username->lastname.", ".$username->firstname;
- if (!$course = get_record("course","id",$u->course)) {
- error("That's an invalid course id", "view.php?id=$id&rootdir=$rootdir");
- }
- if ($sitewide == 1) {
- $userentry .= " (Course: $course->shortname)";
- }
- if ($u->viewed == 0) {
- $userentry .= " ![](\"../file_manager/pix/new.gif\")
";
- }
- $table->data[] = array($userentry);
- }
- }
- }
- print_table($table);
-}
-
-// $record = record of user who has shared files to current USER
-// $id = course id
-function fm_print_user_shared($record, $id=1) {
- global $CFG, $USER;
- $table = NULL;
-
- $table->align = array("center","","center","center","center","center");
- $table->size = array("5%", "23%", "15%", "40%", "10%", "7%");
- $table->data = array();
-
- $sharedfiles = NULL;
- $mysql = "SELECT * FROM {$CFG->prefix}fmanager_shared WHERE userid = '$USER->id' AND owner = '$record->id' AND course = '$id' OR userid = '0' AND owner = '$record->id' AND course = '$id'";
- $sharedfiles = get_records_sql($mysql);
- if (!$sharedfiles) {
- error(get_string("errnosharedfound", "block_file_manager"));
- }
-
- $fmdir = fm_get_root_dir();
- $strcbx = " ".get_string("selectall", "block_file_manager");
- $strnamename = "![\""](\"../file_manager/pix/delete.gif\")