isAdmin()) { UI::exitError(getMLText("admin_tools"),getMLText("access_denied")); } // funcion by shalless at rubix dot net dot au (php.net) function dskspace($dir) { $s = stat($dir); $space = $s["blocks"]*512; if (is_dir($dir)) { $dh = opendir($dir); while (($file = readdir($dh)) !== false) if ($file != "." and $file != "..") $space += dskspace($dir."/".$file); closedir($dh); } return $space; } UI::htmlStartPage(getMLText("backup_tools")); UI::globalNavigation(); UI::pageNavigation(getMLText("admin_tools"), "admin_tools"); UI::contentHeading(getMLText("backup_tools")); UI::contentContainerStart(); print getMLText("space_used_on_data_folder")." : ".formatted_size(dskspace($settings->_contentDir)); UI::contentContainerEnd(); // versioning file creation //////////////////////////////////////////////////// UI::contentHeading(getMLText("versioning_file_creation")); UI::contentContainerStart(); print "

".getMLText("versioning_file_creation_warning")."

\n"; print "\n"; UI::contentContainerEnd(); // archive creation //////////////////////////////////////////////////////////// UI::contentHeading(getMLText("archive_creation")); UI::contentContainerStart(); print "

".getMLText("archive_creation_warning")."

\n"; print "\n"; // list backup files UI::contentSubHeading(getMLText("backup_list")); $print_header=true; $handle = opendir($settings->_contentDir); $entries = array(); while ($e = readdir($handle)){ if (is_dir($settings->_contentDir.$e)) continue; if (strpos($e,".tar.gz")==FALSE) continue; $entries[] = $e; } closedir($handle); sort($entries); $entries = array_reverse($entries); foreach ($entries as $entry){ if ($print_header){ print "\n"; print "\n\n"; print "\n"; print "\n"; print "\n"; print "\n"; print "\n"; print "\n\n\n"; $print_header=false; } $folderid=substr($entry,strpos($entry,"_")+1); $folder=$dms->getFolder((int)$folderid); print "\n"; print "\n"; if (is_object($folder)) print "\n"; else print "\n"; print "\n"; print "\n"; print "\n"; print "\n"; } if ($print_header) printMLText("empty_notify_list"); else print "

	".getMLText("folder")."	".getMLText("creation_date")."	".getMLText("file_size")."
".$entry."	".htmlspecialchars($folder->getName())."	".getMLText("unknown_id")."	".getLongReadableDate(filectime($settings->_contentDir.$entry))."	".formatted_size(filesize($settings->_contentDir.$entry))."	"; print " ".getMLText("backup_remove")." "; print "

\n"; UI::contentContainerEnd(); // dump creation /////////////////////////////////////////////////////////////// UI::contentHeading(getMLText("dump_creation")); UI::contentContainerStart(); print "

".getMLText("dump_creation_warning")."

\n"; print "\n"; // list backup files UI::contentSubHeading(getMLText("dump_list")); $print_header=true; $handle = opendir($settings->_contentDir); $entries = array(); while ($e = readdir($handle)){ if (is_dir($settings->_contentDir.$e)) continue; if (strpos($e,".sql.gz")==FALSE) continue; $entries[] = $e; } closedir($handle); sort($entries); $entries = array_reverse($entries); foreach ($entries as $entry){ if ($print_header){ print "\n"; print "\n\n"; print "\n"; print "\n"; print "\n"; print "\n"; print "\n\n\n"; $print_header=false; } print "\n"; print "\n"; print "\n"; print "\n"; print "\n"; print "\n"; } if ($print_header) printMLText("empty_notify_list"); else print "

	".getMLText("creation_date")."	".getMLText("file_size")."
".$entry."	".getLongReadableDate(filectime($settings->_contentDir.$entry))."	".formatted_size(filesize($settings->_contentDir.$entry))."	"; print " ".getMLText("dump_remove")." "; print "

\n"; UI::contentContainerEnd(); // files deletion ////////////////////////////////////////////////////////////// UI::contentHeading(getMLText("files_deletion")); UI::contentContainerStart(); print "

".getMLText("files_deletion_warning")."

\n"; print "\n"; UI::contentContainerEnd(); UI::htmlEndPage(); ?>