admin/user.php

   1 <?php
   2
   3     require_once('../config.php');
   4     require_once($CFG->libdir.'/adminlib.php');
   5     require_once($CFG->dirroot.'/user/filters/lib.php');
   6
   7     $delete       = optional_param('delete', 0, PARAM_INT);
   8     $confirm      = optional_param('confirm', '', PARAM_ALPHANUM);   //md5 confirmation hash
   9     $confirmuser  = optional_param('confirmuser', 0, PARAM_INT);
  10     $sort         = optional_param('sort', 'name', PARAM_ALPHANUM);
  11     $dir          = optional_param('dir', 'ASC', PARAM_ALPHA);
  12     $page         = optional_param('page', 0, PARAM_INT);
  13     $perpage      = optional_param('perpage', 30, PARAM_INT);        // how many per page
  14     $ru           = optional_param('ru', '2', PARAM_INT);            // show remote users
  15     $lu           = optional_param('lu', '2', PARAM_INT);            // show local users
  16     $acl          = optional_param('acl', '0', PARAM_INT);           // id of user to tweak mnet ACL (requires $access)
  17
  18
  19     admin_externalpage_setup('editusers');
  20
  21     $sitecontext = get_context_instance(CONTEXT_SYSTEM);
  22     $site = get_site();
  23
  24     if (!has_capability('moodle/user:update', $sitecontext) and !has_capability('moodle/user:delete', $sitecontext)) {
  25         print_error('nopermissions', 'error', '', 'edit/delete users');
  26     }
  27
  28     $stredit   = get_string('edit');
  29     $strdelete = get_string('delete');
  30     $strdeletecheck = get_string('deletecheck');
  31     $strshowallusers = get_string('showallusers');
  32
  33     if (empty($CFG->loginhttps)) {
  34         $securewwwroot = $CFG->wwwroot;
  35     } else {
  36         $securewwwroot = str_replace('http:','https:',$CFG->wwwroot);
  37     }
  38
  39     $returnurl = "$CFG->wwwroot/$CFG->admin/user.php";
  40
  41     if ($confirmuser and confirm_sesskey()) {
  42         if (!$user = $DB->get_record('user', array('id'=>$confirmuser))) {
  43             print_error('nousers');
  44         }
  45
  46         $auth = get_auth_plugin($user->auth);
  47
  48         $result = $auth->user_confirm($user->username, $user->secret);
  49
  50         if ($result == AUTH_CONFIRM_OK or $result == AUTH_CONFIRM_ALREADY) {
  51             redirect($returnurl);
  52         } else {
  53             echo $OUTPUT->header();
  54             redirect($returnurl, get_string('usernotconfirmed', '', fullname($user, true)));
  55         }
  56
  57     } else if ($delete and confirm_sesskey()) {              // Delete a selected user, after confirmation
  58
  59         require_capability('moodle/user:delete', $sitecontext);
  60
  61         $user = $DB->get_record('user', array('id'=>$delete), '*', MUST_EXIST);
  62
  63         if (is_siteadmin($user->id)) {
  64             print_error('useradminodelete', 'error');
  65         }
  66
  67         if ($confirm != md5($delete)) {
  68             echo $OUTPUT->header();
  69             $fullname = fullname($user, true);
  70             echo $OUTPUT->heading(get_string('deleteuser', 'admin'));
  71             $optionsyes = array('delete'=>$delete, 'confirm'=>md5($delete), 'sesskey'=>sesskey());
  72             echo $OUTPUT->confirm(get_string('deletecheckfull', '', "'$fullname'"), new moodle_url('user.php', $optionsyes), 'user.php');
  73             echo $OUTPUT->footer();
  74             die;
  75         } else if (data_submitted() and !$user->deleted) {
  76             if (delete_user($user)) {
  77                 session_gc(); // remove stale sessions
  78                 redirect($returnurl);
  79             } else {
  80                 session_gc(); // remove stale sessions
  81                 echo $OUTPUT->header();
  82                 echo $OUTPUT->notification($returnurl, get_string('deletednot', '', fullname($user, true)));
  83             }
  84         }
  85     } else if ($acl and confirm_sesskey()) {
  86         if (!has_capability('moodle/user:delete', $sitecontext)) {
  87             // TODO: this should be under a separate capability
  88             print_error('nopermissions', 'error', '', 'modify the NMET access control list');
  89         }
  90         if (!$user = $DB->get_record('user', array('id'=>$acl))) {
  91             print_error('nousers', 'error');
  92         }
  93         if (!is_mnet_remote_user($user)) {
  94             print_error('usermustbemnet', 'error');
  95         }
  96         $accessctrl = strtolower(required_param('accessctrl', PARAM_ALPHA));
  97         if ($accessctrl != 'allow' and $accessctrl != 'deny') {
  98             print_error('invalidaccessparameter', 'error');
  99         }
 100         $aclrecord = $DB->get_record('mnet_sso_access_control', array('username'=>$user->username, 'mnet_host_id'=>$user->mnethostid));
 101         if (empty($aclrecord)) {
 102             $aclrecord = new stdClass();
 103             $aclrecord->mnet_host_id = $user->mnethostid;
 104             $aclrecord->username = $user->username;
 105             $aclrecord->accessctrl = $accessctrl;
 106             $DB->insert_record('mnet_sso_access_control', $aclrecord);
 107         } else {
 108             $aclrecord->accessctrl = $accessctrl;
 109             $DB->update_record('mnet_sso_access_control', $aclrecord);
 110         }
 111         $mnethosts = $DB->get_records('mnet_host', null, 'id', 'id,wwwroot,name');
 112         redirect($returnurl);
 113     }
 114
 115     // create the user filter form
 116     $ufiltering = new user_filtering();
 117     echo $OUTPUT->header();
 118
 119     // Carry on with the user listing
 120     $context = context_system::instance();
 121     $extracolumns = get_extra_user_fields($context);
 122     $columns = array_merge(array('firstname', 'lastname'), $extracolumns,
 123             array('city', 'country', 'lastaccess'));
 124
 125     foreach ($columns as $column) {
 126         $string[$column] = get_user_field_name($column);
 127         if ($sort != $column) {
 128             $columnicon = "";
 129             if ($column == "lastaccess") {
 130                 $columndir = "DESC";
 131             } else {
 132                 $columndir = "ASC";
 133             }
 134         } else {
 135             $columndir = $dir == "ASC" ? "DESC":"ASC";
 136             if ($column == "lastaccess") {
 137                 $columnicon = $dir == "ASC" ? "up":"down";
 138             } else {
 139                 $columnicon = $dir == "ASC" ? "down":"up";
 140             }
 141             $columnicon = " <img src=\"" . $OUTPUT->pix_url('t/' . $columnicon) . "\" alt=\"\" />";
 142
 143         }
 144         $$column = "<a href=\"user.php?sort=$column&amp;dir=$columndir\">".$string[$column]."</a>$columnicon";
 145     }
 146
 147     if ($sort == "name") {
 148         $sort = "firstname";
 149     }
 150
 151     list($extrasql, $params) = $ufiltering->get_sql_filter();
 152     $users = get_users_listing($sort, $dir, $page*$perpage, $perpage, '', '', '',
 153             $extrasql, $params, $context);
 154     $usercount = get_users(false);
 155     $usersearchcount = get_users(false, '', true, null, "", '', '', '', '', '*', $extrasql, $params);
 156
 157     if ($extrasql !== '') {
 158         echo $OUTPUT->heading("$usersearchcount / $usercount ".get_string('users'));
 159         $usercount = $usersearchcount;
 160     } else {
 161         echo $OUTPUT->heading("$usercount ".get_string('users'));
 162     }
 163
 164     $strall = get_string('all');
 165
 166     $baseurl = new moodle_url('user.php', array('sort' => $sort, 'dir' => $dir, 'perpage' => $perpage));
 167     echo $OUTPUT->paging_bar($usercount, $page, $perpage, $baseurl);
 168
 169     flush();
 170
 171
 172     if (!$users) {
 173         $match = array();
 174         echo $OUTPUT->heading(get_string('nousersfound'));
 175
 176         $table = NULL;
 177
 178     } else {
 179
 180         $countries = get_string_manager()->get_list_of_countries(false);
 181         if (empty($mnethosts)) {
 182             $mnethosts = $DB->get_records('mnet_host', null, 'id', 'id,wwwroot,name');
 183         }
 184
 185         foreach ($users as $key => $user) {
 186             if (isset($countries[$user->country])) {
 187                 $users[$key]->country = $countries[$user->country];
 188             }
 189         }
 190         if ($sort == "country") {  // Need to resort by full country name, not code
 191             foreach ($users as $user) {
 192                 $susers[$user->id] = $user->country;
 193             }
 194             asort($susers);
 195             foreach ($susers as $key => $value) {
 196                 $nusers[] = $users[$key];
 197             }
 198             $users = $nusers;
 199         }
 200
 201         $override = new stdClass();
 202         $override->firstname = 'firstname';
 203         $override->lastname = 'lastname';
 204         $fullnamelanguage = get_string('fullnamedisplay', '', $override);
 205         if (($CFG->fullnamedisplay == 'firstname lastname') or
 206             ($CFG->fullnamedisplay == 'firstname') or
 207             ($CFG->fullnamedisplay == 'language' and $fullnamelanguage == 'firstname lastname' )) {
 208             $fullnamedisplay = "$firstname / $lastname";
 209         } else { // ($CFG->fullnamedisplay == 'language' and $fullnamelanguage == 'lastname firstname')
 210             $fullnamedisplay = "$lastname / $firstname";
 211         }
 212
 213         $table = new html_table();
 214         $table->head = array ();
 215         $table->align = array();
 216         $table->head[] = $fullnamedisplay;
 217         $table->align[] = 'left';
 218         foreach ($extracolumns as $field) {
 219             $table->head[] = ${$field};
 220             $table->align[] = 'left';
 221         }
 222         $table->head[] = $city;
 223         $table->align[] = 'left';
 224         $table->head[] = $country;
 225         $table->align[] = 'left';
 226         $table->head[] = $lastaccess;
 227         $table->align[] = 'left';
 228         $table->head[] = "";
 229         $table->align[] = 'center';
 230         $table->head[] = "";
 231         $table->align[] = 'center';
 232         $table->head[] = "";
 233         $table->align[] = 'center';
 234
 235         $table->width = "95%";
 236         foreach ($users as $user) {
 237             if (isguestuser($user)) {
 238                 continue; // do not display guest here
 239             }
 240
 241             if ($user->id == $USER->id or is_siteadmin($user)) {
 242                 $deletebutton = "";
 243             } else {
 244                 if (has_capability('moodle/user:delete', $sitecontext)) {
 245                     $deletebutton = "<a href=\"user.php?delete=$user->id&amp;sesskey=".sesskey()."\">$strdelete</a>";
 246                 } else {
 247                     $deletebutton ="";
 248                 }
 249             }
 250
 251             if (has_capability('moodle/user:update', $sitecontext) and (is_siteadmin($USER) or !is_siteadmin($user)) and !is_mnet_remote_user($user)) {
 252                 $editbutton = "<a href=\"$securewwwroot/user/editadvanced.php?id=$user->id&amp;course=$site->id\">$stredit</a>";
 253                 if ($user->confirmed == 0) {
 254                     $confirmbutton = "<a href=\"user.php?confirmuser=$user->id&amp;sesskey=".sesskey()."\">" . get_string('confirm') . "</a>";
 255                 } else {
 256                     $confirmbutton = "";
 257                 }
 258             } else {
 259                 $editbutton ="";
 260                 if ($user->confirmed == 0) {
 261                     $confirmbutton = "<span class=\"dimmed_text\">".get_string('confirm')."</span>";
 262                 } else {
 263                     $confirmbutton = "";
 264                 }
 265             }
 266
 267             // for remote users, shuffle columns around and display MNET stuff
 268             if (is_mnet_remote_user($user)) {
 269                 $accessctrl = 'allow';
 270                 if ($acl = $DB->get_record('mnet_sso_access_control', array('username'=>$user->username, 'mnet_host_id'=>$user->mnethostid))) {
 271                     $accessctrl = $acl->accessctrl;
 272                 }
 273                 $changeaccessto = ($accessctrl == 'deny' ? 'allow' : 'deny');
 274                 // delete button in confirm column - remote users should already be confirmed
 275                 // TODO: no delete for remote users, for now. new userid, delete flag, unique on username/host...
 276                 $confirmbutton = "";
 277                 // ACL in delete column
 278                 $deletebutton = get_string($accessctrl, 'mnet');
 279                 if (has_capability('moodle/user:delete', $sitecontext)) {
 280                     // TODO: this should be under a separate capability
 281                     $deletebutton .= " (<a href=\"?acl={$user->id}&amp;accessctrl=$changeaccessto&amp;sesskey=".sesskey()."\">"
 282                             . get_string($changeaccessto, 'mnet') . " access</a>)";
 283                 }
 284                 // mnet info in edit column
 285                 if (isset($mnethosts[$user->mnethostid])) {
 286                     $editbutton = $mnethosts[$user->mnethostid]->name;
 287                 }
 288             }
 289
 290             if ($user->lastaccess) {
 291                 $strlastaccess = format_time(time() - $user->lastaccess);
 292             } else {
 293                 $strlastaccess = get_string('never');
 294             }
 295             $fullname = fullname($user, true);
 296
 297             $row = array ();
 298             $row[] = "<a href=\"../user/view.php?id=$user->id&amp;course=$site->id\">$fullname</a>";
 299             foreach ($extracolumns as $field) {
 300                 $row[] = $user->{$field};
 301             }
 302             $row[] = $user->city;
 303             $row[] = $user->country;
 304             $row[] = $strlastaccess;
 305             $row[] = $editbutton;
 306             $row[] = $deletebutton;
 307             $row[] = $confirmbutton;
 308             $table->data[] = $row;
 309         }
 310     }
 311
 312     // add filters
 313     $ufiltering->display_add();
 314     $ufiltering->display_active();
 315
 316     if (has_capability('moodle/user:create', $sitecontext)) {
 317         echo $OUTPUT->heading('<a href="'.$securewwwroot.'/user/editadvanced.php?id=-1">'.get_string('addnewuser').'</a>');
 318     }
 319     if (!empty($table)) {
 320         echo html_writer::table($table);
 321         echo $OUTPUT->paging_bar($usercount, $page, $perpage, $baseurl);
 322         if (has_capability('moodle/user:create', $sitecontext)) {
 323             echo $OUTPUT->heading('<a href="'.$securewwwroot.'/user/editadvanced.php?id=-1">'.get_string('addnewuser').'</a>');
 324         }
 325     }
 326
 327     echo $OUTPUT->footer();
 328
 329
 330