c3041365e5395ca5c05d4810a613f08cb10ca8aa
[moodle.git] / user / action_redir.php
1 <?php
2 // This file is part of Moodle - http://moodle.org/
3 //
4 // Moodle is free software: you can redistribute it and/or modify
5 // it under the terms of the GNU General Public License as published by
6 // the Free Software Foundation, either version 3 of the License, or
7 // (at your option) any later version.
8 //
9 // Moodle is distributed in the hope that it will be useful,
10 // but WITHOUT ANY WARRANTY; without even the implied warranty of
11 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12 // GNU General Public License for more details.
13 //
14 // You should have received a copy of the GNU General Public License
15 // along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
17 /**
18  * Wrapper script redirecting user operations to correct destination.
19  *
20  * @copyright 1999 Martin Dougiamas  http://dougiamas.com
21  * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
22  * @package core_user
23  */
25 require_once("../config.php");
26 require_once($CFG->dirroot . '/course/lib.php');
28 $formaction = required_param('formaction', PARAM_LOCALURL);
29 $id = required_param('id', PARAM_INT);
31 $PAGE->set_url('/user/action_redir.php', array('formaction' => $formaction, 'id' => $id));
32 list($formaction) = explode('?', $formaction, 2);
34 // This page now only handles the bulk enrolment change actions, other actions are done with ajax.
35 $actions = array('bulkchange.php');
37 if (array_search($formaction, $actions) === false) {
38     print_error('unknownuseraction');
39 }
41 if (!confirm_sesskey()) {
42     print_error('confirmsesskeybad');
43 }
45 if ($formaction == 'bulkchange.php') {
46     // Backwards compatibility for enrolment plugins bulk change functionality.
47     // This awful code is adapting from the participant page with it's param names and values
48     // to the values expected by the bulk enrolment changes forms.
49     $formaction = required_param('formaction', PARAM_URL);
50     require_once($CFG->dirroot . '/enrol/locallib.php');
52     $url = new moodle_url($formaction);
53     // Get the enrolment plugin type and bulk action from the url.
54     $plugin = $url->param('plugin');
55     $operationname = $url->param('operation');
56     $dataformat = $url->param('dataformat');
58     $course = $DB->get_record('course', array('id' => $id), '*', MUST_EXIST);
59     $context = context_course::instance($id);
60     $PAGE->set_context($context);
62     $userids = optional_param_array('userid', array(), PARAM_INT);
63     $default = new moodle_url('/user/index.php', ['id' => $course->id]);
64     $returnurl = new moodle_url(optional_param('returnto', $default, PARAM_URL));
66     if (empty($userids)) {
67         $userids = optional_param_array('bulkuser', array(), PARAM_INT);
68     }
69     if (empty($userids)) {
70         // The first time list hack.
71         if (empty($userids) and $post = data_submitted()) {
72             foreach ($post as $k => $v) {
73                 if (preg_match('/^user(\d+)$/', $k, $m)) {
74                     $userids[] = $m[1];
75                 }
76             }
77         }
78     }
80     if (empty($plugin) AND $operationname == 'download_participants') {
81         // Check permissions.
82         $pagecontext = ($course->id == SITEID) ? context_system::instance() : $context;
83         if (course_can_view_participants($pagecontext)) {
84             $plugins = core_plugin_manager::instance()->get_plugins_of_type('dataformat');
85             if (isset($plugins[$dataformat])) {
86                 if ($plugins[$dataformat]->is_enabled()) {
87                     if (empty($userids)) {
88                         redirect($returnurl, get_string('noselectedusers', 'bulkusers'));
89                     }
91                     $columnnames = array(
92                         'firstname' => get_string('firstname'),
93                         'lastname' => get_string('lastname'),
94                     );
96                     // Get the list of fields we have to hide.
97                     $hiddenfields = [];
98                     if (!has_capability('moodle/course:viewhiddenuserfields', $context)) {
99                         $hiddenfields = array_flip(explode(',', $CFG->hiddenuserfields));
100                     }
102                     // TODO Does not support custom user profile fields (MDL-70456).
103                     $identityfields = \core_user\fields::get_identity_fields($context, false);
104                     $identityfieldsselect = '';
106                     foreach ($identityfields as $field) {
107                         $columnnames[$field] = get_string($field);
108                         $identityfieldsselect .= ', u.' . $field . ' ';
109                     }
111                     [$useridsql, $useridparams] = $DB->get_in_or_equal($userids, SQL_PARAMS_NAMED, 'userid');
112                     [$userordersql, $userorderparams] = users_order_by_sql('u', null, $context);
114                     $params = array_merge($useridparams, $userorderparams);
116                     // Add column for groups if the user can view them.
117                     if (!isset($hiddenfields['groups'])) {
118                         $columnnames['groupnames'] = get_string('groups');
119                         $identityfieldsselect .= ', gcn.groupnames';
121                         [$groupconcatnamesql, $groupconcatnameparams] = groups_get_names_concat_sql($course->id);
122                         $groupconcatjoin = "LEFT JOIN ({$groupconcatnamesql}) gcn ON gcn.userid = u.id";
123                         $params = array_merge($params, $groupconcatnameparams);
124                     } else {
125                         $groupconcatjoin = '';
126                     }
128                     $sql = "SELECT u.firstname, u.lastname" . $identityfieldsselect . "
129                               FROM {user} u
130                                    {$groupconcatjoin}
131                              WHERE u.id {$useridsql}
132                           ORDER BY {$userordersql}";
134                     $rs = $DB->get_recordset_sql($sql, $params);
135                     \core\dataformat::download_data('courseid_' . $course->id . '_participants', $dataformat, $columnnames, $rs);
136                     $rs->close();
137                 }
138             }
139         }
140     } else {
141         $instances = enrol_get_instances($course->id, false);
142         $instance = false;
143         foreach ($instances as $oneinstance) {
144             if ($oneinstance->enrol == $plugin) {
145                 $instance = $oneinstance;
146                 break;
147             }
148         }
149         if (!$instance) {
150             print_error('errorwithbulkoperation', 'enrol');
151         }
153         $manager = new course_enrolment_manager($PAGE, $course, $instance->id);
154         $plugins = $manager->get_enrolment_plugins();
156         if (!isset($plugins[$plugin])) {
157             print_error('errorwithbulkoperation', 'enrol');
158         }
160         $plugin = $plugins[$plugin];
162         $operations = $plugin->get_bulk_operations($manager);
164         if (!isset($operations[$operationname])) {
165             print_error('errorwithbulkoperation', 'enrol');
166         }
167         $operation = $operations[$operationname];
169         if (empty($userids)) {
170             redirect($returnurl, get_string('noselectedusers', 'bulkusers'));
171         }
173         $users = $manager->get_users_enrolments($userids);
175         $removed = array_diff($userids, array_keys($users));
176         if (!empty($removed)) {
177             // This manager does not filter by enrolment method - so we can get the removed users details.
178             $removedmanager = new course_enrolment_manager($PAGE, $course);
179             $removedusers = $removedmanager->get_users_enrolments($removed);
181             foreach ($removedusers as $removeduser) {
182                 $msg = get_string('userremovedfromselectiona', 'enrol', fullname($removeduser));
183                 \core\notification::warning($msg);
184             }
185         }
187         // We may have users from any kind of enrolment, we need to filter for the enrolment plugin matching the bulk action.
188         $matchesplugin = function($user) use ($plugin) {
189             foreach ($user->enrolments as $enrolment) {
190                 if ($enrolment->enrolmentplugin->get_name() == $plugin->get_name()) {
191                     return true;
192                 }
193             }
194             return false;
195         };
196         $filteredusers = array_filter($users, $matchesplugin);
198         if (empty($filteredusers)) {
199             redirect($returnurl, get_string('noselectedusers', 'bulkusers'));
200         }
202         $users = $filteredusers;
204         // Get the form for the bulk operation.
205         $mform = $operation->get_form($PAGE->url, array('users' => $users));
206         // If the mform is false then attempt an immediate process. This may be an immediate action that
207         // doesn't require user input OR confirmation.... who know what but maybe one day.
208         if ($mform === false) {
209             if ($operation->process($manager, $users, new stdClass)) {
210                 redirect($returnurl);
211             } else {
212                 print_error('errorwithbulkoperation', 'enrol');
213             }
214         }
215         // Check if the bulk operation has been cancelled.
216         if ($mform->is_cancelled()) {
217             redirect($returnurl);
218         }
219         if ($mform->is_submitted() && $mform->is_validated() && confirm_sesskey()) {
220             if ($operation->process($manager, $users, $mform->get_data())) {
221                 redirect($returnurl);
222             }
223         }
225         $pagetitle = get_string('bulkuseroperation', 'enrol');
227         $PAGE->set_title($pagetitle);
228         $PAGE->set_heading($pagetitle);
229         echo $OUTPUT->header();
230         echo $OUTPUT->heading($operation->get_title());
231         $mform->display();
232         echo $OUTPUT->footer();
233         exit();
234     }
235 } else {
236     throw new coding_exception('invalidaction');