source: moodle/trunk/fuentes/calendar/export_execute.php @ 1331

Last change on this file since 1331 was 1331, checked in by jrpelegrina, 4 years ago

Updated to moodle 3.0.3

File size: 10.6 KB
Line 
1<?php
2
3require_once('../config.php');
4//require_once($CFG->dirroot.'/course/lib.php');
5require_once($CFG->dirroot.'/calendar/lib.php');
6require_once($CFG->libdir.'/bennu/bennu.inc.php');
7
8$userid = optional_param('userid', 0, PARAM_INT);
9$username = optional_param('username', '', PARAM_TEXT);
10$authtoken = required_param('authtoken', PARAM_ALPHANUM);
11$generateurl = optional_param('generateurl', '', PARAM_TEXT);
12
13if (empty($CFG->enablecalendarexport)) {
14    die('no export');
15}
16
17//Fetch user information
18$checkuserid = !empty($userid) && $user = $DB->get_record('user', array('id' => $userid), 'id,password');
19//allowing for fallback check of old url - MDL-27542
20$checkusername = !empty($username) && $user = $DB->get_record('user', array('username' => $username), 'id,password');
21if (!$checkuserid && !$checkusername) {
22    //No such user
23    die('Invalid authentication');
24}
25
26//Check authentication token
27$authuserid = !empty($userid) && $authtoken == sha1($userid . $user->password . $CFG->calendar_exportsalt);
28//allowing for fallback check of old url - MDL-27542
29$authusername = !empty($username) && $authtoken == sha1($username . $user->password . $CFG->calendar_exportsalt);
30if (!$authuserid && !$authusername) {
31    die('Invalid authentication');
32}
33
34// Get the calendar type we are using.
35$calendartype = \core_calendar\type_factory::get_calendar_instance();
36
37$what = optional_param('preset_what', 'all', PARAM_ALPHA);
38$time = optional_param('preset_time', 'weeknow', PARAM_ALPHA);
39
40$now = $calendartype->timestamp_to_date_array(time());
41
42// Let's see if we have sufficient and correct data
43$allowed_what = array('all', 'courses');
44$allowed_time = array('weeknow', 'weeknext', 'monthnow', 'monthnext', 'recentupcoming', 'custom');
45
46if (!empty($generateurl)) {
47    $authtoken = sha1($user->id . $user->password . $CFG->calendar_exportsalt);
48    $params = array();
49    $params['preset_what'] = $what;
50    $params['preset_time'] = $time;
51    $params['userid'] = $userid;
52    $params['authtoken'] = $authtoken;
53    $params['generateurl'] = true;
54
55    $link = new moodle_url('/calendar/export.php', $params);
56    redirect($link->out());
57    die;
58}
59
60if(!empty($what) && !empty($time)) {
61    if(in_array($what, $allowed_what) && in_array($time, $allowed_time)) {
62        $courses = enrol_get_users_courses($user->id, true, 'id, visible, shortname');
63
64        if ($what == 'all') {
65            $users = $user->id;
66            $groups = array();
67            foreach ($courses as $course) {
68                $course_groups = groups_get_all_groups($course->id, $user->id);
69                $groups = array_merge($groups, array_keys($course_groups));
70            }
71            if (empty($groups)) {
72                $groups = false;
73            }
74            $courses[SITEID] = new stdClass;
75            $courses[SITEID]->shortname = get_string('globalevents', 'calendar');
76        } else {
77            $users = false;
78            $groups = false;
79        }
80
81        // Store the number of days in the week.
82        $numberofdaysinweek = $calendartype->get_num_weekdays();
83
84        switch($time) {
85            case 'weeknow':
86                $startweekday = calendar_get_starting_weekday();
87                $startmonthday = find_day_in_month($now['mday'] - ($numberofdaysinweek - 1), $startweekday, $now['mon'], $now['year']);
88                $startmonth = $now['mon'];
89                $startyear = $now['year'];
90                if($startmonthday > calendar_days_in_month($startmonth, $startyear)) {
91                    list($startmonth, $startyear) = calendar_add_month($startmonth, $startyear);
92                    $startmonthday = find_day_in_month(1, $startweekday, $startmonth, $startyear);
93                }
94                $gregoriandate = $calendartype->convert_to_gregorian($startyear, $startmonth, $startmonthday);
95                $timestart = make_timestamp($gregoriandate['year'], $gregoriandate['month'], $gregoriandate['day'],
96                    $gregoriandate['hour'], $gregoriandate['minute']);
97
98                $endmonthday = $startmonthday + $numberofdaysinweek;
99                $endmonth = $startmonth;
100                $endyear = $startyear;
101                if($endmonthday > calendar_days_in_month($endmonth, $endyear)) {
102                    list($endmonth, $endyear) = calendar_add_month($endmonth, $endyear);
103                    $endmonthday = find_day_in_month(1, $startweekday, $endmonth, $endyear);
104                }
105                $gregoriandate = $calendartype->convert_to_gregorian($endyear, $endmonth, $endmonthday);
106                $timeend = make_timestamp($gregoriandate['year'], $gregoriandate['month'], $gregoriandate['day'],
107                    $gregoriandate['hour'], $gregoriandate['minute']);
108            break;
109            case 'weeknext':
110                $startweekday = calendar_get_starting_weekday();
111                $startmonthday = find_day_in_month($now['mday'] + 1, $startweekday, $now['mon'], $now['year']);
112                $startmonth = $now['mon'];
113                $startyear = $now['year'];
114                if($startmonthday > calendar_days_in_month($startmonth, $startyear)) {
115                    list($startmonth, $startyear) = calendar_add_month($startmonth, $startyear);
116                    $startmonthday = find_day_in_month(1, $startweekday, $startmonth, $startyear);
117                }
118                $gregoriandate = $calendartype->convert_to_gregorian($startyear, $startmonth, $startmonthday);
119                $timestart = make_timestamp($gregoriandate['year'], $gregoriandate['month'], $gregoriandate['day'],
120                    $gregoriandate['hour'], $gregoriandate['minute']);
121
122                $endmonthday = $startmonthday + $numberofdaysinweek;
123                $endmonth = $startmonth;
124                $endyear = $startyear;
125                if($endmonthday > calendar_days_in_month($endmonth, $endyear)) {
126                    list($endmonth, $endyear) = calendar_add_month($endmonth, $endyear);
127                    $endmonthday = find_day_in_month(1, $startweekday, $endmonth, $endyear);
128                }
129                $gregoriandate = $calendartype->convert_to_gregorian($endyear, $endmonth, $endmonthday);
130                $timeend = make_timestamp($gregoriandate['year'], $gregoriandate['month'], $gregoriandate['day'],
131                    $gregoriandate['hour'], $gregoriandate['minute']);
132            break;
133            case 'monthnow':
134                // Convert to gregorian.
135                $gregoriandate = $calendartype->convert_to_gregorian($now['year'], $now['mon'], 1);
136
137                $timestart = make_timestamp($gregoriandate['year'], $gregoriandate['month'], $gregoriandate['day'],
138                    $gregoriandate['hour'], $gregoriandate['minute']);
139                $timeend = $timestart + (calendar_days_in_month($now['mon'], $now['year']) * DAYSECS);
140            break;
141            case 'monthnext':
142                // Get the next month for this calendar.
143                list($nextmonth, $nextyear) = calendar_add_month($now['mon'], $now['year']);
144
145                // Convert to gregorian.
146                $gregoriandate = $calendartype->convert_to_gregorian($nextyear, $nextmonth, 1);
147
148                // Create the timestamps.
149                $timestart = make_timestamp($gregoriandate['year'], $gregoriandate['month'], $gregoriandate['day'],
150                    $gregoriandate['hour'], $gregoriandate['minute']);
151                $timeend = $timestart + (calendar_days_in_month($nextmonth, $nextyear) * DAYSECS);
152            break;
153            case 'recentupcoming':
154                //Events in the last 5 or next 60 days
155                $timestart = time() - 432000;
156                $timeend = time() + 5184000;
157            break;
158            case 'custom':
159                // Events based on custom date range.
160                $timestart = time() - $CFG->calendar_exportlookback * DAYSECS;
161                $timeend = time() + $CFG->calendar_exportlookahead * DAYSECS;
162            break;
163        }
164    }
165    else {
166        // Parameters given but incorrect, redirect back to export page
167        redirect($CFG->wwwroot.'/calendar/export.php');
168        die();
169    }
170}
171$events = calendar_get_events($timestart, $timeend, $users, $groups, array_keys($courses), false);
172
173$ical = new iCalendar;
174$ical->add_property('method', 'PUBLISH');
175foreach($events as $event) {
176   if (!empty($event->modulename)) {
177        $cm = get_coursemodule_from_instance($event->modulename, $event->instance);
178        if (!\core_availability\info_module::is_user_visible($cm, $userid, false)) {
179            continue;
180        }
181    }
182    $hostaddress = str_replace('http://', '', $CFG->wwwroot);
183    $hostaddress = str_replace('https://', '', $hostaddress);
184
185    $ev = new iCalendar_event;
186    $ev->add_property('uid', $event->id.'@'.$hostaddress);
187    $ev->add_property('summary', $event->name);
188    $ev->add_property('description', clean_param($event->description, PARAM_NOTAGS));
189    $ev->add_property('class', 'PUBLIC'); // PUBLIC / PRIVATE / CONFIDENTIAL
190    $ev->add_property('last-modified', Bennu::timestamp_to_datetime($event->timemodified));
191    $ev->add_property('dtstamp', Bennu::timestamp_to_datetime()); // now
192    if ($event->timeduration > 0) {
193        //dtend is better than duration, because it works in Microsoft Outlook and works better in Korganizer
194        $ev->add_property('dtstart', Bennu::timestamp_to_datetime($event->timestart)); // when event starts.
195        $ev->add_property('dtend', Bennu::timestamp_to_datetime($event->timestart + $event->timeduration));
196    } else {
197        // When no duration is present, ie an all day event, VALUE should be date instead of time and dtend = dtstart + 1 day.
198        $ev->add_property('dtstart', Bennu::timestamp_to_date($event->timestart), array('value' => 'DATE')); // All day event.
199        $ev->add_property('dtend', Bennu::timestamp_to_date($event->timestart + DAYSECS), array('value' => 'DATE')); // All day event.
200    }
201    if ($event->courseid != 0) {
202        $coursecontext = context_course::instance($event->courseid);
203        $ev->add_property('categories', format_string($courses[$event->courseid]->shortname, true, array('context' => $coursecontext)));
204    }
205    $ical->add_component($ev);
206}
207
208$serialized = $ical->serialize();
209if(empty($serialized)) {
210    // TODO
211    die('bad serialization');
212}
213
214$filename = 'icalexport.ics';
215
216header('Last-Modified: '. gmdate('D, d M Y H:i:s', time()) .' GMT');
217header('Cache-Control: private, must-revalidate, pre-check=0, post-check=0, max-age=0');
218header('Expires: '. gmdate('D, d M Y H:i:s', 0) .'GMT');
219header('Pragma: no-cache');
220header('Accept-Ranges: none'); // Comment out if PDFs do not work...
221header('Content-disposition: attachment; filename='.$filename);
222header('Content-length: '.strlen($serialized));
223header('Content-type: text/calendar; charset=utf-8');
224
225echo $serialized;
Note: See TracBrowser for help on using the repository browser.