123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239 |
- <?php
- // This file is part of Moodle - http://moodle.org/
- //
- // Moodle is free software: you can redistribute it and/or modify
- // it under the terms of the GNU General Public License as published by
- // the Free Software Foundation, either version 3 of the License, or
- // (at your option) any later version.
- //
- // Moodle is distributed in the hope that it will be useful,
- // but WITHOUT ANY WARRANTY; without even the implied warranty of
- // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- // GNU General Public License for more details.
- //
- // You should have received a copy of the GNU General Public License
- // along with Moodle. If not, see <http://www.gnu.org/licenses/>.
- /**
- * Bulk group creation registration script from a comma separated file
- *
- * @copyright 1999 Martin Dougiamas http://dougiamas.com
- * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
- * @package core_group
- */
- require_once('../config.php');
- require_once($CFG->dirroot.'/course/lib.php');
- require_once($CFG->dirroot.'/group/lib.php');
- include_once('import_form.php');
- $id = required_param('id', PARAM_INT); // Course id
- $course = $DB->get_record('course', array('id'=>$id), '*', MUST_EXIST);
- $PAGE->set_url('/group/import.php', array('id'=>$id));
- require_login($course);
- $context = context_course::instance($id);
- require_capability('moodle/course:managegroups', $context);
- $strimportgroups = get_string('importgroups', 'core_group');
- $PAGE->navbar->add($strimportgroups);
- navigation_node::override_active_url(new moodle_url('/group/index.php', array('id' => $course->id)));
- $PAGE->set_title("$course->shortname: $strimportgroups");
- $PAGE->set_heading($course->fullname);
- $PAGE->set_pagelayout('admin');
- $returnurl = new moodle_url('/group/index.php', array('id'=>$id));
- $mform_post = new groups_import_form(null, array('id'=>$id));
- // If a file has been uploaded, then process it
- if ($mform_post->is_cancelled()) {
- redirect($returnurl);
- } else if ($mform_post->get_data()) {
- echo $OUTPUT->header();
- $csv_encode = '/\&\#44/';
- if (isset($CFG->CSV_DELIMITER)) {
- $csv_delimiter = $CFG->CSV_DELIMITER;
- if (isset($CFG->CSV_ENCODE)) {
- $csv_encode = '/\&\#' . $CFG->CSV_ENCODE . '/';
- }
- } else {
- $csv_delimiter = ",";
- }
- $text = $mform_post->get_file_content('userfile');
- $text = preg_replace('!\r\n?!',"\n",$text);
- $rawlines = explode("\n", $text);
- unset($text);
- // make arrays of valid fields for error checking
- $required = array("groupname" => 1);
- $optionalDefaults = array("lang" => 1);
- $optional = array("coursename" => 1,
- "idnumber" => 1,
- "groupidnumber" => 1,
- "description" => 1,
- "enrolmentkey" => 1,
- "groupingname" => 1);
- // --- get header (field names) ---
- $header = explode($csv_delimiter, array_shift($rawlines));
- // check for valid field names
- foreach ($header as $i => $h) {
- $h = trim($h); $header[$i] = $h; // remove whitespace
- if (!(isset($required[$h]) or isset($optionalDefaults[$h]) or isset($optional[$h]))) {
- print_error('invalidfieldname', 'error', 'import.php?id='.$id, $h);
- }
- if (isset($required[$h])) {
- $required[$h] = 2;
- }
- }
- // check for required fields
- foreach ($required as $key => $value) {
- if ($value < 2) {
- print_error('fieldrequired', 'error', 'import.php?id='.$id, $key);
- }
- }
- $linenum = 2; // since header is line 1
- foreach ($rawlines as $rawline) {
- $newgroup = new stdClass();//to make Martin happy
- foreach ($optionalDefaults as $key => $value) {
- $newgroup->$key = current_language(); //defaults to current language
- }
- //Note: commas within a field should be encoded as , (for comma separated csv files)
- //Note: semicolon within a field should be encoded as ; (for semicolon separated csv files)
- $line = explode($csv_delimiter, $rawline);
- foreach ($line as $key => $value) {
- //decode encoded commas
- $record[$header[$key]] = preg_replace($csv_encode, $csv_delimiter, trim($value));
- }
- if ($record[$header[0]]) {
- // add a new group to the database
- // add fields to object $user
- foreach ($record as $name => $value) {
- // check for required values
- if (isset($required[$name]) and !$value) {
- print_error('missingfield', 'error', 'import.php?id='.$id, $name);
- } else if ($name == "groupname") {
- $newgroup->name = $value;
- } else {
- // normal entry
- $newgroup->{$name} = $value;
- }
- }
- if (isset($newgroup->idnumber)){
- //if idnumber is set, we use that.
- //unset invalid courseid
- if (!$mycourse = $DB->get_record('course', array('idnumber'=>$newgroup->idnumber))) {
- echo $OUTPUT->notification(get_string('unknowncourseidnumber', 'error', $newgroup->idnumber));
- unset($newgroup->courseid);//unset so 0 doesn't get written to database
- }
- $newgroup->courseid = $mycourse->id;
- } else if (isset($newgroup->coursename)){
- //else use course short name to look up
- //unset invalid coursename (if no id)
- if (!$mycourse = $DB->get_record('course', array('shortname', $newgroup->coursename))) {
- echo $OUTPUT->notification(get_string('unknowncourse', 'error', $newgroup->coursename));
- unset($newgroup->courseid);//unset so 0 doesn't get written to database
- }
- $newgroup->courseid = $mycourse->id;
- } else {
- //else use use current id
- $newgroup->courseid = $id;
- }
- //if courseid is set
- if (isset($newgroup->courseid)) {
- $linenum++;
- $groupname = $newgroup->name;
- $newgrpcoursecontext = context_course::instance($newgroup->courseid);
- ///Users cannot upload groups in courses they cannot update.
- if (!has_capability('moodle/course:managegroups', $newgrpcoursecontext) or (!is_enrolled($newgrpcoursecontext) and !has_capability('moodle/course:view', $newgrpcoursecontext))) {
- echo $OUTPUT->notification(get_string('nopermissionforcreation', 'group', $groupname));
- } else {
- if (isset($newgroup->groupidnumber)) {
- // The CSV field for the group idnumber is groupidnumber rather than
- // idnumber as that field is already in use for the course idnumber.
- $newgroup->groupidnumber = trim($newgroup->groupidnumber);
- if (has_capability('moodle/course:changeidnumber', $newgrpcoursecontext)) {
- $newgroup->idnumber = $newgroup->groupidnumber;
- if ($existing = groups_get_group_by_idnumber($newgroup->courseid, $newgroup->idnumber)) {
- // idnumbers must be unique to a course but we shouldn't ignore group creation for duplicates
- $existing->name = s($existing->name);
- $existing->idnumber = s($existing->idnumber);
- $existing->problemgroup = $groupname;
- echo $OUTPUT->notification(get_string('groupexistforcoursewithidnumber', 'error', $existing));
- unset($newgroup->idnumber);
- }
- }
- // Always drop the groupidnumber key. It's not a valid database field
- unset($newgroup->groupidnumber);
- }
- if ($groupid = groups_get_group_by_name($newgroup->courseid, $groupname)) {
- echo $OUTPUT->notification("$groupname :".get_string('groupexistforcourse', 'error', $groupname));
- } else if ($groupid = groups_create_group($newgroup)) {
- echo $OUTPUT->notification(get_string('groupaddedsuccesfully', 'group', $groupname), 'notifysuccess');
- } else {
- echo $OUTPUT->notification(get_string('groupnotaddederror', 'error', $groupname));
- continue;
- }
- // Add group to grouping
- if (!empty($newgroup->groupingname) || is_numeric($newgroup->groupingname)) {
- $groupingname = $newgroup->groupingname;
- if (! $groupingid = groups_get_grouping_by_name($newgroup->courseid, $groupingname)) {
- $data = new stdClass();
- $data->courseid = $newgroup->courseid;
- $data->name = $groupingname;
- if ($groupingid = groups_create_grouping($data)) {
- echo $OUTPUT->notification(get_string('groupingaddedsuccesfully', 'group', $groupingname), 'notifysuccess');
- } else {
- echo $OUTPUT->notification(get_string('groupingnotaddederror', 'error', $groupingname));
- continue;
- }
- }
- // if we have reached here we definitely have a groupingid
- $a = array('groupname' => $groupname, 'groupingname' => $groupingname);
- try {
- groups_assign_grouping($groupingid, $groupid);
- echo $OUTPUT->notification(get_string('groupaddedtogroupingsuccesfully', 'group', $a), 'notifysuccess');
- } catch (Exception $e) {
- echo $OUTPUT->notification(get_string('groupnotaddedtogroupingerror', 'error', $a));
- }
- }
- }
- }
- unset ($newgroup);
- }
- }
- echo $OUTPUT->single_button($returnurl, get_string('continue'), 'get');
- echo $OUTPUT->footer();
- die;
- }
- /// Print the form
- echo $OUTPUT->header();
- echo $OUTPUT->heading_with_help($strimportgroups, 'importgroups', 'core_group');
- $mform_post ->display();
- echo $OUTPUT->footer();
|