admin/delete.php

   1 <?PHP //$Id$
   2
   3 // Deletes the moodledata directory, COMPLETELY!!
   4 // BE VERY CAREFUL USING THIS!
   5
   6     require_once('../config.php');
   7
   8     require_login();
   9
  10     $sure       = optional_param('sure', 0, PARAM_BOOL);
  11     $reallysure = optional_param('reallysure', 0, PARAM_BOOL);
  12
  13     if (!isadmin()) {
  14         error('You must be admin to use this script!');
  15     }
  16
  17     $deletedir = $CFG->dataroot;   // The directory to delete!
  18
  19     if (empty($sure)) {
  20         notice_yesno ('Are you completely sure you want to delete everything inside the directory '. $deletedir .' ?', 'delete.php?sure=yes&amp;sesskey='.sesskey(), 'index.php');
  21         exit;
  22     }
  23
  24     if (empty($reallysure)) {
  25         notice_yesno ('Are you REALLY REALLY completely sure you want to delete everything inside the directory '. $deletedir .' (this includes all user images, and any other course files that have been created) ?', 'delete.php?sure=yes&amp;reallysure=yes&amp;sesskey='.sesskey(), 'index.php');
  26         exit;
  27     }
  28
  29     if (!confirm_sesskey()) {
  30         error('This script was called wrongly');
  31     }
  32
  33     /// OK, here goes ...
  34
  35     delete_subdirectories($deletedir);
  36
  37     echo '<h1 align="center">Done!</h1>';
  38     print_continue($CFG->wwwroot);
  39     exit;
  40
  41
  42 function delete_subdirectories($rootdir) {
  43
  44     $dir = opendir($rootdir);
  45
  46     while ($file = readdir($dir)) {
  47         if ($file != '.' and $file != '..') {
  48             $fullfile = $rootdir .'/'. $file;
  49             if (filetype($fullfile) == 'dir') {
  50                 delete_subdirectories($fullfile);
  51                 echo 'Deleting '. $fullfile .' ... ';
  52                 if (rmdir($fullfile)) {
  53                     echo 'Done.<br />';
  54                 } else {
  55                     echo 'FAILED.<br />';
  56                 }
  57             } else {
  58                 echo 'Deleting '. $fullfile .' ... ';
  59                 if (unlink($fullfile)) {
  60                     echo 'Done.<br />';
  61                 } else {
  62                     echo 'FAILED.<br />';
  63                 }
  64             }
  65         }
  66     }
  67     closedir($dir);
  68 }
  69
  70 ?>