3 use Friendica\Core\L10n;
9 function wdcal_jsonp_encode($obj)
11 $str = json_encode($obj);
12 if (isset($_REQUEST["callback"])) {
13 $str = $_REQUEST["callback"] . "(" . $str . ")";
21 * @param int $weekstartday
22 * @param int $num_days
26 function wdcal_get_list_range_params($day, $weekstartday, $num_days, $type)
28 $phpTime = IntVal($day);
31 $st = mktime(0, 0, 0, date("m", $phpTime), 1, date("Y", $phpTime));
32 $et = mktime(0, 0, -1, date("m", $phpTime) + 1, 1, date("Y", $phpTime));
35 //suppose first day of a week is monday
36 $monday = date("d", $phpTime) - date('N', $phpTime) + 1;
37 //echo date('N', $phpTime);
38 $st = mktime(0, 0, 0, date("m", $phpTime), $monday, date("Y", $phpTime));
39 $et = mktime(0, 0, -1, date("m", $phpTime), $monday + 7, date("Y", $phpTime));
42 //suppose first day of a week is monday
43 $monday = date("d", $phpTime) - date('N', $phpTime) + $weekstartday;
44 //echo date('N', $phpTime);
45 $st = mktime(0, 0, 0, date("m", $phpTime), $monday, date("Y", $phpTime));
46 $et = mktime(0, 0, -1, date("m", $phpTime), $monday + $num_days, date("Y", $phpTime));
49 $st = mktime(0, 0, 0, date("m", $phpTime), date("d", $phpTime), date("Y", $phpTime));
50 $et = mktime(0, 0, -1, date("m", $phpTime), date("d", $phpTime) + 1, date("Y", $phpTime));
55 return array($st, $et);
60 * @param Sabre_DAV_Server $server
61 * @param string $right
62 * @return null|Sabre_CalDAV_Calendar
64 function wdcal_print_feed_getCal(&$server, $right)
66 $cals = dav_get_current_user_calendars($server, $right);
68 for ($i = 0; $i < count($cals) && $calfound === null; $i++) {
69 $prop = $cals[$i]->getProperties(array("id"));
70 if (isset($prop["id"]) && (!isset($_REQUEST["cal"]) || in_array($prop["id"], $_REQUEST["cal"]))) $calfound = $cals[$i];
79 function wdcal_print_feed($base_path = "")
81 $server = dav_create_server(true, true, false);
85 $method = $_GET["method"];
88 $cs = wdcal_print_feed_getCal($server, DAV_ACL_WRITE);
90 echo wdcal_jsonp_encode(array('IsSuccess' => false,
91 'Msg' => L10n::t('No access')));
95 $item = dav_create_empty_vevent();
96 $component = dav_get_eventComponent($item);
97 $component->add("SUMMARY", icalendar_sanitize_string(dav_compat_parse_text_serverside("CalendarTitle")));
99 if (isset($_REQUEST["allday"])) $type = Sabre\VObject\Property\DateTime::DATE;
100 else $type = Sabre\VObject\Property\DateTime::LOCALTZ;
102 $datetime_start = new Sabre\VObject\Property\DateTime("DTSTART");
103 $datetime_start->setDateTime(new DateTime(date("Y-m-d H:i:s", IntVal($_REQUEST["CalendarStartTime"]))), $type);
104 $datetime_end = new Sabre\VObject\Property\DateTime("DTEND");
105 $datetime_end->setDateTime(new DateTime(date("Y-m-d H:i:s", IntVal($_REQUEST["CalendarEndTime"]))), $type);
107 $component->add($datetime_start);
108 $component->add($datetime_end);
110 $uid = $component->__get("UID");
111 $data = $item->serialize();
113 $cs->createFile($uid . ".ics", $data);
117 'Msg' => 'add success',
118 'Data' => $uid . ".ics",
121 } catch (Exception $e) {
123 'IsSuccess' => false,
124 'Msg' => $e->__toString(),
129 $weekstartday = (isset($_REQUEST["weekstartday"]) ? IntVal($_REQUEST["weekstartday"]) : 1); // 1 = Monday
130 $num_days = (isset($_REQUEST["num_days"]) ? IntVal($_REQUEST["num_days"]) : 7);
133 $date = wdcal_get_list_range_params($_REQUEST["showdate"], $weekstartday, $num_days, $_REQUEST["viewtype"]);
135 $ret['events'] = array();
136 $ret["issort"] = true;
137 $ret["start"] = $date[0];
138 $ret["end"] = $date[1];
139 $ret['error'] = null;
141 $cals = dav_get_current_user_calendars($server, DAV_ACL_READ);
142 foreach ($cals as $cal) {
143 $prop = $cal->getProperties(array("id"));
144 if (isset($prop["id"]) && (!isset($_REQUEST["cal"]) || in_array($prop["id"], $_REQUEST["cal"]))) {
145 $backend = wdcal_calendar_factory_by_id($prop["id"]);
146 $events = $backend->listItemsByRange($prop["id"], $date[0], $date[1], $base_path);
147 $ret["events"] = array_merge($ret["events"], $events);
152 foreach ($ret["events"] as $e) {
153 if (!isset($tmpev[$e["start"]])) $tmpev[$e["start"]] = array();
154 $tmpev[$e["start"]][] = $e;
157 $ret["events"] = array();
158 foreach ($tmpev as $e) foreach ($e as $f) $ret["events"][] = $f;
162 $r = q("SELECT `calendarobject_id`, `calendar_id` FROM %s%sjqcalendar WHERE `id`=%d", CALDAV_SQL_DB, CALDAV_SQL_PREFIX, IntVal($_REQUEST["jq_id"]));
163 if (count($r) != 1) {
164 echo wdcal_jsonp_encode(array('IsSuccess' => false,
165 'Msg' => L10n::t('No access')));
169 $cs = dav_get_current_user_calendar_by_id($server, $r[0]["calendar_id"], DAV_ACL_READ);
170 $obj_uri = Sabre_CalDAV_Backend_Common::loadCalendarobjectById($r[0]["calendarobject_id"]);
172 $vObject = dav_get_current_user_calendarobject($server, $cs, $obj_uri["uri"], DAV_ACL_WRITE);
173 $component = dav_get_eventComponent($vObject);
176 echo wdcal_jsonp_encode(array('IsSuccess' => false,
177 'Msg' => L10n::t('No access')));
181 if (isset($_REQUEST["allday"])) $type = Sabre\VObject\Property\DateTime::DATE;
182 else $type = Sabre\VObject\Property\DateTime::LOCALTZ;
184 $datetime_start = new Sabre\VObject\Property\DateTime("DTSTART");
185 $datetime_start->setDateTime(new DateTime(date("Y-m-d H:i:s", IntVal($_REQUEST["CalendarStartTime"]))), $type);
186 $datetime_end = new Sabre\VObject\Property\DateTime("DTEND");
187 $datetime_end->setDateTime(new DateTime(date("Y-m-d H:i:s", IntVal($_REQUEST["CalendarEndTime"]))), $type);
189 $component->__unset("DTSTART");
190 $component->__unset("DTEND");
191 $component->add($datetime_start);
192 $component->add($datetime_end);
194 $data = $vObject->serialize();
195 /** @var Sabre_CalDAV_CalendarObject $child */
196 $child = $cs->getChild($obj_uri["uri"]);
201 'Msg' => 'Succefully',
203 } catch (Exception $e) {
204 echo wdcal_jsonp_encode(array('IsSuccess' => false,
205 'Msg' => L10n::t('No access')));
210 $r = q("SELECT `calendarobject_id`, `calendar_id` FROM %s%sjqcalendar WHERE `id`=%d", CALDAV_SQL_DB, CALDAV_SQL_PREFIX, IntVal($_REQUEST["jq_id"]));
211 if (count($r) != 1) {
212 echo wdcal_jsonp_encode(array('IsSuccess' => false,
213 'Msg' => L10n::t('No access')));
217 $cs = dav_get_current_user_calendar_by_id($server, $r[0]["calendar_id"], DAV_ACL_WRITE);
218 $obj_uri = Sabre_CalDAV_Backend_Common::loadCalendarobjectById($r[0]["calendarobject_id"]);
219 $child = $cs->getChild($obj_uri["uri"]);
224 'Msg' => 'Succefully',
226 } catch (Exception $e) {
227 echo wdcal_jsonp_encode(array('IsSuccess' => false,
228 'Msg' => L10n::t('No access')));
234 echo wdcal_jsonp_encode($ret);