Merge branch 'wip-MDL-60926-master' of git://github.com/marinaglancy/moodle
[moodle.git] / admin / user.php
1 <?php
3     require_once('../config.php');
4     require_once($CFG->libdir.'/adminlib.php');
5     require_once($CFG->libdir.'/authlib.php');
6     require_once($CFG->dirroot.'/user/filters/lib.php');
7     require_once($CFG->dirroot.'/user/lib.php');
9     $delete       = optional_param('delete', 0, PARAM_INT);
10     $confirm      = optional_param('confirm', '', PARAM_ALPHANUM);   //md5 confirmation hash
11     $confirmuser  = optional_param('confirmuser', 0, PARAM_INT);
12     $sort         = optional_param('sort', 'name', PARAM_ALPHANUM);
13     $dir          = optional_param('dir', 'ASC', PARAM_ALPHA);
14     $page         = optional_param('page', 0, PARAM_INT);
15     $perpage      = optional_param('perpage', 30, PARAM_INT);        // how many per page
16     $ru           = optional_param('ru', '2', PARAM_INT);            // show remote users
17     $lu           = optional_param('lu', '2', PARAM_INT);            // show local users
18     $acl          = optional_param('acl', '0', PARAM_INT);           // id of user to tweak mnet ACL (requires $access)
19     $suspend      = optional_param('suspend', 0, PARAM_INT);
20     $unsuspend    = optional_param('unsuspend', 0, PARAM_INT);
21     $unlock       = optional_param('unlock', 0, PARAM_INT);
23     admin_externalpage_setup('editusers');
25     $sitecontext = context_system::instance();
26     $site = get_site();
28     if (!has_capability('moodle/user:update', $sitecontext) and !has_capability('moodle/user:delete', $sitecontext)) {
29         print_error('nopermissions', 'error', '', 'edit/delete users');
30     }
32     $stredit   = get_string('edit');
33     $strdelete = get_string('delete');
34     $strdeletecheck = get_string('deletecheck');
35     $strshowallusers = get_string('showallusers');
36     $strsuspend = get_string('suspenduser', 'admin');
37     $strunsuspend = get_string('unsuspenduser', 'admin');
38     $strunlock = get_string('unlockaccount', 'admin');
39     $strconfirm = get_string('confirm');
41     $returnurl = new moodle_url('/admin/user.php', array('sort' => $sort, 'dir' => $dir, 'perpage' => $perpage, 'page'=>$page));
43     // The $user variable is also used outside of these if statements.
44     $user = null;
45     if ($confirmuser and confirm_sesskey()) {
46         require_capability('moodle/user:update', $sitecontext);
47         if (!$user = $DB->get_record('user', array('id'=>$confirmuser, 'mnethostid'=>$CFG->mnet_localhost_id))) {
48             print_error('nousers');
49         }
51         $auth = get_auth_plugin($user->auth);
53         $result = $auth->user_confirm($user->username, $user->secret);
55         if ($result == AUTH_CONFIRM_OK or $result == AUTH_CONFIRM_ALREADY) {
56             redirect($returnurl);
57         } else {
58             echo $OUTPUT->header();
59             redirect($returnurl, get_string('usernotconfirmed', '', fullname($user, true)));
60         }
62     } else if ($delete and confirm_sesskey()) {              // Delete a selected user, after confirmation
63         require_capability('moodle/user:delete', $sitecontext);
65         $user = $DB->get_record('user', array('id'=>$delete, 'mnethostid'=>$CFG->mnet_localhost_id), '*', MUST_EXIST);
67         if ($user->deleted) {
68             print_error('usernotdeleteddeleted', 'error');
69         }
70         if (is_siteadmin($user->id)) {
71             print_error('useradminodelete', 'error');
72         }
74         if ($confirm != md5($delete)) {
75             echo $OUTPUT->header();
76             $fullname = fullname($user, true);
77             echo $OUTPUT->heading(get_string('deleteuser', 'admin'));
79             $optionsyes = array('delete'=>$delete, 'confirm'=>md5($delete), 'sesskey'=>sesskey());
80             $deleteurl = new moodle_url($returnurl, $optionsyes);
81             $deletebutton = new single_button($deleteurl, get_string('delete'), 'post');
83             echo $OUTPUT->confirm(get_string('deletecheckfull', '', "'$fullname'"), $deletebutton, $returnurl);
84             echo $OUTPUT->footer();
85             die;
86         } else if (data_submitted()) {
87             if (delete_user($user)) {
88                 \core\session\manager::gc(); // Remove stale sessions.
89                 redirect($returnurl);
90             } else {
91                 \core\session\manager::gc(); // Remove stale sessions.
92                 echo $OUTPUT->header();
93                 echo $OUTPUT->notification($returnurl, get_string('deletednot', '', fullname($user, true)));
94             }
95         }
96     } else if ($acl and confirm_sesskey()) {
97         if (!has_capability('moodle/user:update', $sitecontext)) {
98             print_error('nopermissions', 'error', '', 'modify the NMET access control list');
99         }
100         if (!$user = $DB->get_record('user', array('id'=>$acl))) {
101             print_error('nousers', 'error');
102         }
103         if (!is_mnet_remote_user($user)) {
104             print_error('usermustbemnet', 'error');
105         }
106         $accessctrl = strtolower(required_param('accessctrl', PARAM_ALPHA));
107         if ($accessctrl != 'allow' and $accessctrl != 'deny') {
108             print_error('invalidaccessparameter', 'error');
109         }
110         $aclrecord = $DB->get_record('mnet_sso_access_control', array('username'=>$user->username, 'mnet_host_id'=>$user->mnethostid));
111         if (empty($aclrecord)) {
112             $aclrecord = new stdClass();
113             $aclrecord->mnet_host_id = $user->mnethostid;
114             $aclrecord->username = $user->username;
115             $aclrecord->accessctrl = $accessctrl;
116             $DB->insert_record('mnet_sso_access_control', $aclrecord);
117         } else {
118             $aclrecord->accessctrl = $accessctrl;
119             $DB->update_record('mnet_sso_access_control', $aclrecord);
120         }
121         $mnethosts = $DB->get_records('mnet_host', null, 'id', 'id,wwwroot,name');
122         redirect($returnurl);
124     } else if ($suspend and confirm_sesskey()) {
125         require_capability('moodle/user:update', $sitecontext);
127         if ($user = $DB->get_record('user', array('id'=>$suspend, 'mnethostid'=>$CFG->mnet_localhost_id, 'deleted'=>0))) {
128             if (!is_siteadmin($user) and $USER->id != $user->id and $user->suspended != 1) {
129                 $user->suspended = 1;
130                 // Force logout.
131                 \core\session\manager::kill_user_sessions($user->id);
132                 user_update_user($user, false);
133             }
134         }
135         redirect($returnurl);
137     } else if ($unsuspend and confirm_sesskey()) {
138         require_capability('moodle/user:update', $sitecontext);
140         if ($user = $DB->get_record('user', array('id'=>$unsuspend, 'mnethostid'=>$CFG->mnet_localhost_id, 'deleted'=>0))) {
141             if ($user->suspended != 0) {
142                 $user->suspended = 0;
143                 user_update_user($user, false);
144             }
145         }
146         redirect($returnurl);
148     } else if ($unlock and confirm_sesskey()) {
149         require_capability('moodle/user:update', $sitecontext);
151         if ($user = $DB->get_record('user', array('id'=>$unlock, 'mnethostid'=>$CFG->mnet_localhost_id, 'deleted'=>0))) {
152             login_unlock_account($user);
153         }
154         redirect($returnurl);
155     }
157     // create the user filter form
158     $ufiltering = new user_filtering();
159     echo $OUTPUT->header();
161     // Carry on with the user listing
162     $context = context_system::instance();
163     $extracolumns = get_extra_user_fields($context);
164     // Get all user name fields as an array.
165     $allusernamefields = get_all_user_name_fields(false, null, null, null, true);
166     $columns = array_merge($allusernamefields, $extracolumns, array('city', 'country', 'lastaccess'));
168     foreach ($columns as $column) {
169         $string[$column] = get_user_field_name($column);
170         if ($sort != $column) {
171             $columnicon = "";
172             if ($column == "lastaccess") {
173                 $columndir = "DESC";
174             } else {
175                 $columndir = "ASC";
176             }
177         } else {
178             $columndir = $dir == "ASC" ? "DESC":"ASC";
179             if ($column == "lastaccess") {
180                 $columnicon = ($dir == "ASC") ? "sort_desc" : "sort_asc";
181             } else {
182                 $columnicon = ($dir == "ASC") ? "sort_asc" : "sort_desc";
183             }
184             $columnicon = $OUTPUT->pix_icon('t/' . $columnicon, get_string(strtolower($columndir)), 'core',
185                                             ['class' => 'iconsort']);
187         }
188         $$column = "<a href=\"user.php?sort=$column&amp;dir=$columndir\">".$string[$column]."</a>$columnicon";
189     }
191     // We need to check that alternativefullnameformat is not set to '' or language.
192     // We don't need to check the fullnamedisplay setting here as the fullname function call further down has
193     // the override parameter set to true.
194     $fullnamesetting = $CFG->alternativefullnameformat;
195     // If we are using language or it is empty, then retrieve the default user names of just 'firstname' and 'lastname'.
196     if ($fullnamesetting == 'language' || empty($fullnamesetting)) {
197         // Set $a variables to return 'firstname' and 'lastname'.
198         $a = new stdClass();
199         $a->firstname = 'firstname';
200         $a->lastname = 'lastname';
201         // Getting the fullname display will ensure that the order in the language file is maintained.
202         $fullnamesetting = get_string('fullnamedisplay', null, $a);
203     }
205     // Order in string will ensure that the name columns are in the correct order.
206     $usernames = order_in_string($allusernamefields, $fullnamesetting);
207     $fullnamedisplay = array();
208     foreach ($usernames as $name) {
209         // Use the link from $$column for sorting on the user's name.
210         $fullnamedisplay[] = ${$name};
211     }
212     // All of the names are in one column. Put them into a string and separate them with a /.
213     $fullnamedisplay = implode(' / ', $fullnamedisplay);
214     // If $sort = name then it is the default for the setting and we should use the first name to sort by.
215     if ($sort == "name") {
216         // Use the first item in the array.
217         $sort = reset($usernames);
218     }
220     list($extrasql, $params) = $ufiltering->get_sql_filter();
221     $users = get_users_listing($sort, $dir, $page*$perpage, $perpage, '', '', '',
222             $extrasql, $params, $context);
223     $usercount = get_users(false);
224     $usersearchcount = get_users(false, '', false, null, "", '', '', '', '', '*', $extrasql, $params);
226     if ($extrasql !== '') {
227         echo $OUTPUT->heading("$usersearchcount / $usercount ".get_string('users'));
228         $usercount = $usersearchcount;
229     } else {
230         echo $OUTPUT->heading("$usercount ".get_string('users'));
231     }
233     $strall = get_string('all');
235     $baseurl = new moodle_url('/admin/user.php', array('sort' => $sort, 'dir' => $dir, 'perpage' => $perpage));
236     echo $OUTPUT->paging_bar($usercount, $page, $perpage, $baseurl);
238     flush();
241     if (!$users) {
242         $match = array();
243         echo $OUTPUT->heading(get_string('nousersfound'));
245         $table = NULL;
247     } else {
249         $countries = get_string_manager()->get_list_of_countries(false);
250         if (empty($mnethosts)) {
251             $mnethosts = $DB->get_records('mnet_host', null, 'id', 'id,wwwroot,name');
252         }
254         foreach ($users as $key => $user) {
255             if (isset($countries[$user->country])) {
256                 $users[$key]->country = $countries[$user->country];
257             }
258         }
259         if ($sort == "country") {  // Need to resort by full country name, not code
260             foreach ($users as $user) {
261                 $susers[$user->id] = $user->country;
262             }
263             asort($susers);
264             foreach ($susers as $key => $value) {
265                 $nusers[] = $users[$key];
266             }
267             $users = $nusers;
268         }
270         $table = new html_table();
271         $table->head = array ();
272         $table->colclasses = array();
273         $table->head[] = $fullnamedisplay;
274         $table->attributes['class'] = 'admintable generaltable';
275         foreach ($extracolumns as $field) {
276             $table->head[] = ${$field};
277         }
278         $table->head[] = $city;
279         $table->head[] = $country;
280         $table->head[] = $lastaccess;
281         $table->head[] = get_string('edit');
282         $table->colclasses[] = 'centeralign';
283         $table->head[] = "";
284         $table->colclasses[] = 'centeralign';
286         $table->id = "users";
287         foreach ($users as $user) {
288             $buttons = array();
289             $lastcolumn = '';
291             // delete button
292             if (has_capability('moodle/user:delete', $sitecontext)) {
293                 if (is_mnet_remote_user($user) or $user->id == $USER->id or is_siteadmin($user)) {
294                     // no deleting of self, mnet accounts or admins allowed
295                 } else {
296                     $url = new moodle_url($returnurl, array('delete'=>$user->id, 'sesskey'=>sesskey()));
297                     $buttons[] = html_writer::link($url, $OUTPUT->pix_icon('t/delete', $strdelete));
298                 }
299             }
301             // suspend button
302             if (has_capability('moodle/user:update', $sitecontext)) {
303                 if (is_mnet_remote_user($user)) {
304                     // mnet users have special access control, they can not be deleted the standard way or suspended
305                     $accessctrl = 'allow';
306                     if ($acl = $DB->get_record('mnet_sso_access_control', array('username'=>$user->username, 'mnet_host_id'=>$user->mnethostid))) {
307                         $accessctrl = $acl->accessctrl;
308                     }
309                     $changeaccessto = ($accessctrl == 'deny' ? 'allow' : 'deny');
310                     $buttons[] = " (<a href=\"?acl={$user->id}&amp;accessctrl=$changeaccessto&amp;sesskey=".sesskey()."\">".get_string($changeaccessto, 'mnet') . " access</a>)";
312                 } else {
313                     if ($user->suspended) {
314                         $url = new moodle_url($returnurl, array('unsuspend'=>$user->id, 'sesskey'=>sesskey()));
315                         $buttons[] = html_writer::link($url, $OUTPUT->pix_icon('t/show', $strunsuspend));
316                     } else {
317                         if ($user->id == $USER->id or is_siteadmin($user)) {
318                             // no suspending of admins or self!
319                         } else {
320                             $url = new moodle_url($returnurl, array('suspend'=>$user->id, 'sesskey'=>sesskey()));
321                             $buttons[] = html_writer::link($url, $OUTPUT->pix_icon('t/hide', $strsuspend));
322                         }
323                     }
325                     if (login_is_lockedout($user)) {
326                         $url = new moodle_url($returnurl, array('unlock'=>$user->id, 'sesskey'=>sesskey()));
327                         $buttons[] = html_writer::link($url, $OUTPUT->pix_icon('t/unlock', $strunlock));
328                     }
329                 }
330             }
332             // edit button
333             if (has_capability('moodle/user:update', $sitecontext)) {
334                 // prevent editing of admins by non-admins
335                 if (is_siteadmin($USER) or !is_siteadmin($user)) {
336                     $url = new moodle_url('/user/editadvanced.php', array('id'=>$user->id, 'course'=>$site->id));
337                     $buttons[] = html_writer::link($url, $OUTPUT->pix_icon('t/edit', $stredit));
338                 }
339             }
341             // the last column - confirm or mnet info
342             if (is_mnet_remote_user($user)) {
343                 // all mnet users are confirmed, let's print just the name of the host there
344                 if (isset($mnethosts[$user->mnethostid])) {
345                     $lastcolumn = get_string($accessctrl, 'mnet').': '.$mnethosts[$user->mnethostid]->name;
346                 } else {
347                     $lastcolumn = get_string($accessctrl, 'mnet');
348                 }
350             } else if ($user->confirmed == 0) {
351                 if (has_capability('moodle/user:update', $sitecontext)) {
352                     $lastcolumn = html_writer::link(new moodle_url($returnurl, array('confirmuser'=>$user->id, 'sesskey'=>sesskey())), $strconfirm);
353                 } else {
354                     $lastcolumn = "<span class=\"dimmed_text\">".get_string('confirm')."</span>";
355                 }
356             }
358             if ($user->lastaccess) {
359                 $strlastaccess = format_time(time() - $user->lastaccess);
360             } else {
361                 $strlastaccess = get_string('never');
362             }
363             $fullname = fullname($user, true);
365             $row = array ();
366             $row[] = "<a href=\"../user/view.php?id=$user->id&amp;course=$site->id\">$fullname</a>";
367             foreach ($extracolumns as $field) {
368                 $row[] = $user->{$field};
369             }
370             $row[] = $user->city;
371             $row[] = $user->country;
372             $row[] = $strlastaccess;
373             if ($user->suspended) {
374                 foreach ($row as $k=>$v) {
375                     $row[$k] = html_writer::tag('span', $v, array('class'=>'usersuspended'));
376                 }
377             }
378             $row[] = implode(' ', $buttons);
379             $row[] = $lastcolumn;
380             $table->data[] = $row;
381         }
382     }
384     // add filters
385     $ufiltering->display_add();
386     $ufiltering->display_active();
388     if (!empty($table)) {
389         echo html_writer::start_tag('div', array('class'=>'no-overflow'));
390         echo html_writer::table($table);
391         echo html_writer::end_tag('div');
392         echo $OUTPUT->paging_bar($usercount, $page, $perpage, $baseurl);
393     }
394     if (has_capability('moodle/user:create', $sitecontext)) {
395         $url = new moodle_url('/user/editadvanced.php', array('id' => -1));
396         echo $OUTPUT->single_button($url, get_string('addnewuser'), 'get');
397     }
399     echo $OUTPUT->footer();