80a9ae2d0064c26669110434e79b9c3281b746f2
[friendica-addons.git] / dav / friendica / layout.fnk.php
1 <?php
2
3
4 /**
5  *
6  */
7 function wdcal_addRequiredHeaders()
8 {
9         $a = get_app();
10
11         $a->page['htmlhead'] .= '<link rel="stylesheet"  type="text/css" href="' . $a->get_baseurl() . '/addon/dav/jqueryui/jquery-ui-1.8.21.custom.css' . '" media="all" />' . "\r\n";
12         $a->page['htmlhead'] .= '<script type="text/javascript" src="' . $a->get_baseurl() . '/addon/dav/jqueryui/jquery-ui-1.8.21.custom.min.js"></script>' . "\r\n";
13
14         $a->page['htmlhead'] .= '<link rel="stylesheet"  type="text/css" href="' . $a->get_baseurl() . '/addon/dav/colorpicker/colorPicker.css' . '" media="all" />' . "\r\n";
15         $a->page['htmlhead'] .= '<script type="text/javascript" src="' . $a->get_baseurl() . '/addon/dav/colorpicker/jquery.colorPicker.min.js"></script>' . "\r\n";
16
17         $a->page['htmlhead'] .= '<link rel="stylesheet"  type="text/css" href="' . $a->get_baseurl() . '/addon/dav/timepicker/timePicker.css' . '" media="all" />' . "\r\n";
18         $a->page['htmlhead'] .= '<script type="text/javascript" src="' . $a->get_baseurl() . '/addon/dav/timepicker/jquery.timePicker.min.js"></script>' . "\r\n";
19
20         $a->page['htmlhead'] .= '<link rel="stylesheet"  type="text/css" href="' . $a->get_baseurl() . '/addon/dav/friendica/wdcal.css' . '" media="all" />' . "\r\n";
21         $a->page['htmlhead'] .= '<script type="text/javascript" src="' . $a->get_baseurl() . '/addon/dav/common/wdcal.js"></script>' . "\r\n";
22
23         $a->page['htmlhead'] .= '<link rel="stylesheet"  type="text/css" href="' . $a->get_baseurl() . '/addon/dav/wdcal/css/calendar.css' . '" media="all" />' . "\r\n";
24         $a->page['htmlhead'] .= '<link rel="stylesheet"  type="text/css" href="' . $a->get_baseurl() . '/addon/dav/wdcal/css/main.css' . '" media="all" />' . "\r\n";
25
26         switch (get_config("system", "language")) {
27                 case "de":
28                         $a->page['htmlhead'] .= '<script type="text/javascript" src="' . $a->get_baseurl() . '/addon/dav/common/wdcal/js/wdCalendar_lang_DE.js"></script>' . "\r\n";
29                         $a->page['htmlhead'] .= '<script type="text/javascript" src="' . $a->get_baseurl() . '/addon/dav/jqueryui/jquery.ui.datepicker-de.js"></script>' . "\r\n";
30                         break;
31                 default:
32                         $a->page['htmlhead'] .= '<script type="text/javascript" src="' . $a->get_baseurl() . '/addon/dav/common/wdcal/js/wdCalendar_lang_EN.js"></script>' . "\r\n";
33         }
34
35         $a->page['htmlhead'] .= '<script type="text/javascript" src="' . $a->get_baseurl() . '/addon/dav/common/wdcal/js/jquery.calendar.js"></script>' . "\r\n";
36         $a->page['htmlhead'] .= '<script type="text/javascript" src="' . $a->get_baseurl() . '/addon/dav/common/wdcal/js/main.js"></script>' . "\r\n";
37 }
38
39
40
41 /**
42  * @param int $calendar_id
43  */
44 function wdcal_print_user_ics($calendar_id)
45 {
46         $calendar_id = IntVal($calendar_id);
47
48         $a = get_app();
49         header("Content-type: text/plain");
50
51         $str  = "BEGIN:VCALENDAR\r\nVERSION:2.0\r\nPRODID:-//Friendica//DAV-Plugin//EN\r\n";
52         $cals = q("SELECT * FROM %s%scalendars WHERE `id` = %d AND `namespace` = %d AND `namespace_id` = %d", CALDAV_SQL_DB, CALDAV_SQL_PREFIX, $calendar_id, CALDAV_NAMESPACE_PRIVATE, $a->user["uid"]);
53         if (count($cals) > 0) {
54                 $objs = q("SELECT * FROM %s%scalendarobjects WHERE `calendar_id` = %d ORDER BY `firstOccurence`", CALDAV_SQL_DB, CALDAV_SQL_PREFIX, $calendar_id);
55
56                 foreach ($objs as $obj) {
57                         preg_match("/BEGIN:VEVENT(.*)END:VEVENT/siu", $obj["calendardata"], $matches);
58                         $str2 = preg_replace("/([^\\r])\\n/siu", "\\1\r\n", $matches[0]);
59                         $str2 = preg_replace("/MAILTO:.*[^:a-z0-9_\+äöüß\\n\\n@-]+.*(:|\\r\\n[^ ])/siU", "\\1", $str2);
60                         $str .= $str2 . "\r\n";
61                 }
62         }
63         $str .= "END:VCALENDAR\r\n";
64
65         echo $str;
66         killme();
67 }
68
69
70 /**
71  * @param int $calendar_id
72  * @return string
73  */
74 function wdcal_import_user_ics($calendar_id) {
75         $a = get_app();
76         $calendar_id = IntVal($calendar_id);
77         $o = "";
78
79         $server = dav_create_server(true, true, false);
80         $calendar = dav_get_current_user_calendar_by_id($server, $calendar_id, DAV_ACL_WRITE);
81         if (!$calendar) goaway($a->get_baseurl() . "/dav/wdcal/");
82
83         if (isset($_REQUEST["save"])) {
84                 check_form_security_token_redirectOnErr('/dav/settings/', 'icsimport');
85
86                 if ($_FILES["ics_file"]["tmp_name"] != "" && is_uploaded_file($_FILES["ics_file"]["tmp_name"])) try {
87                         $text = file_get_contents($_FILES["ics_file"]["tmp_name"]);
88
89                         /** @var Sabre\VObject\Component\VCalendar $vObject  */
90                         $vObject        = Sabre\VObject\Reader::read($text);
91                         $comp = $vObject->getComponents();
92                         $imported = array();
93                         foreach ($comp as $c) try {
94                                 /** @var Sabre\VObject\Component\VEvent $c */
95                                 $uid = $c->__get("UID")->value;
96                                 if (!isset($imported[$uid])) $imported[$uid] = "";
97                                 $imported[$uid] .= $c->serialize();
98                         } catch (Exception $e) {
99                                 notice(t("Something went wrong when trying to import the file. Sorry. Maybe some events were imported anyway."));
100                         }
101
102                         if (isset($_REQUEST["overwrite"])) {
103                                 $children = $calendar->getChildren();
104                                 foreach ($children as $child) {
105                                         /** @var Sabre_CalDAV_CalendarObject $child */
106                                         $child->delete();
107                                 }
108                                 $i = 1;
109                         } else {
110                                 $i = 0;
111                                 $children = $calendar->getChildren();
112                                 foreach ($children as $child) {
113                                         /** @var Sabre_CalDAV_CalendarObject $child */
114                                         $name = $child->getName();
115                                         if (preg_match("/import\-([0-9]+)\.ics/siu", $name, $matches)) {
116                                                 if ($matches[1] > $i) $i = $matches[1];
117                                         };
118                                 }
119                                 $i++;
120                         }
121
122                         foreach ($imported as $object) try {
123
124                                 $str = "BEGIN:VCALENDAR\r\nVERSION:2.0\r\nPRODID:-//Friendica//DAV-Plugin//EN\r\n";
125                                 $str .= trim($object);
126                                 $str .= "\r\nEND:VCALENDAR\r\n";
127
128                                 $calendar->createFile("import-" . $i . ".ics", $str);
129                                 $i++;
130                         } catch (Exception $e) {
131                                 notice(t("Something went wrong when trying to import the file. Sorry."));
132                         }
133
134                         $o = t("The ICS-File has been imported.");
135                 } catch (Exception $e) {
136                         notice(t("Something went wrong when trying to import the file. Sorry. Maybe some events were imported anyway."));
137                 } else {
138                         notice(t("No file was uploaded."));
139                 }
140         }
141
142
143         $o .= "<a href='" . $a->get_baseurl() . "/dav/wdcal/'>" . t("Go back to the calendar") . "</a><br><br>";
144
145         $num = q("SELECT COUNT(*) num FROM %s%scalendarobjects WHERE `calendar_id` = %d", CALDAV_SQL_DB, CALDAV_SQL_PREFIX, $calendar_id);
146
147         $o .= "<h2>" . t("Import a ICS-file") . "</h2>";
148         $o .= '<form method="POST" action="' . $a->get_baseurl() . '/dav/wdcal/' . $calendar_id . '/ics-import/" enctype="multipart/form-data">';
149         $o .= "<input type='hidden' name='form_security_token' value='" . get_form_security_token('icsimport') . "'>\n";
150         $o .= "<label for='ics_file'>" . t("ICS-File") . "</label><input type='file' name='ics_file' id='ics_file'><br>\n";
151         if ($num[0]["num"] > 0) $o .= "<label for='overwrite'>" . str_replace("#num#", $num[0]["num"], t("Overwrite all #num# existing events")) . "</label> <input name='overwrite' id='overwrite' type='checkbox'><br>\n";
152         $o .= "<input type='submit' name='save' value='" . t("Upload") . "'>";
153         $o .= '</form>';
154
155         return $o;
156 }
157
158
159 /**
160  * @param array|Sabre_CalDAV_Calendar[] $calendars
161  * @param array|int[] $calendars_selected
162  * @param string $data_feed_url
163  * @param string $view
164  * @param int $theme
165  * @param int $height_diff
166  * @param bool $readonly
167  * @param string $curr_day
168  * @param array $add_params
169  * @param bool $show_nav
170  * @return string
171  */
172 function wdcal_printCalendar($calendars, $calendars_selected, $data_feed_url, $view = "week", $theme = 0, $height_diff = 175, $readonly = false, $curr_day = "", $add_params = array(), $show_nav = true)
173 {
174
175         $a            = get_app();
176         $localization = wdcal_local::getInstanceByUser($a->user["uid"]);
177
178         if (count($calendars_selected) == 0) foreach ($calendars as $c) {
179                 $prop                 = $c->getProperties(array("id"));
180                 $calendars_selected[] = $prop["id"];
181         }
182
183         $opts = array(
184                 "view"             => $view,
185                 "theme"            => $theme,
186                 "readonly"         => $readonly,
187                 "height_diff"      => $height_diff,
188                 "weekstartday"     => $localization->getFirstDayOfWeek(),
189                 "data_feed_url"    => $data_feed_url,
190                 "date_format_dm1"  => $localization->dateformat_js_dm1(),
191                 "date_format_dm2"  => $localization->dateformat_js_dm2(),
192                 "date_format_dm3"  => $localization->dateformat_js_dm3(),
193                 "date_format_full" => $localization->dateformat_datepicker_js(),
194                 "baseurl"          => $a->get_baseurl() . "/dav/wdcal/",
195         );
196
197         $x = '
198 <script>
199         $(function() {
200                 $("#animexxcalendar").animexxCalendar(' . json_encode($opts) . ');
201         });
202 </script>
203
204 <div id="animexxcalendar" class="animexxcalendar">
205         <div class="calselect"><strong>Available Calendars:</strong>';
206
207         foreach ($calendars as $cal) {
208                 $cal_id = $cal->getProperties(array("id", DAV_DISPLAYNAME));
209                 $x .= '<label style="margin-left: 10px; margin-right: 10px;"><input type="checkbox" name="cals[]" value="' . $cal_id["id"] . '"';
210                 $found = false;
211                 foreach ($calendars_selected as $pre) if ($pre["id"] == $cal_id["id"]) $found = true;
212                 if ($found) $x .= ' checked';
213                 $x .= '> ' . escape_tags($cal_id[DAV_DISPLAYNAME]) . '</label> ';
214         }
215
216         $x .= '</div>
217         <div class="calhead" style="padding-left:1px;padding-right:1px;">
218                 <div class="ptogtitle loaderror" style="display: none;">Sorry, could not load your data, please try again later</div>
219         </div>';
220
221         if ($show_nav) {
222
223                 $x .= '<div class="ctoolbar">
224                 <div class="fbutton faddbtn" style="float: right;">
225                         <div><a href="' . $a->get_baseurl() . '/dav/settings/"><span>' . t("Settings") . ' / ' . t("Help") . '</span></a></div>
226                 </div>
227                 <div class="fbutton addcal">
228                         <div><a href="' . $a->get_baseurl() . '/dav/wdcal/new/" class="addcal">' . t("New event") . '</a></div>
229                 </div>
230                 <div class="btnseparator"></div>
231                 <div class="fbutton showtodaybtn">
232                         <div><span class="showtoday">' . t("Today") . '</span></div>
233                 </div>
234                 <div class="btnseparator"></div>
235
236                 <div class="fbutton showdaybtn">
237                         <div><span title="Day" class="showdayview ';
238
239                 if ($view == "day") $x .= 'fcurrent';
240
241                 $x .= '">' . t("Day") . '</span></div>
242                 </div>
243                 <div class="fbutton showweekbtn ';
244
245                 if ($view == "week") $x .= "fcurrent";
246
247                 $x .= '">
248                         <div><span title="Week" class="showweekview">' . t("Week") . '</span></div>
249                 </div>
250                 <div class="showmonthbtn fbutton ';
251
252                 if ($view == "month") $x .= 'fcurrent';
253
254                 $x .= '">
255                         <div><span title="Month" class="showmonthview">' . t("Month") . '</span></div>
256
257                 </div>
258                 <div class="btnseparator"></div>
259                 <div class="fbutton showreflashbtn">
260                         <div><span class="showdayflash">' . t("Reload") . '</span></div>
261                 </div>
262                 <div class="btnseparator"></div>
263                 <div title="' . t("Previous") . '"  class="fbutton sfprevbtn">
264                         <span class="fprev"></span>
265                 </div>
266                 <div title="' . t("Next") . '" class="fbutton sfnextbtn">
267                         <span class="fnext"></span>
268                 </div>
269                 <div class="fshowdatep fbutton" style="white-space: nowrap; position: relative;">
270                         <input name="txtshow" class="hdtxtshow" style="position: absolute; bottom: 0; left: 0; width: 0; height: 0; border: 0; padding: 0; margin: 0;">
271                         <span class="txtdatetimeshow">' . t("Date") . '</span>
272                 </div>
273                 <div style="float: right;">
274                         <div class="clear"></div>
275                 </div>
276         </div>';
277         }
278         $x .= '
279         <div style="padding:1px;">
280                 <div class="calmain printborder">
281                         <div class="gridcontainer" style="overflow-y: visible;"></div>
282                 </div>
283         </div>
284 </div>';
285
286         return $x;
287 }
288
289
290 /**
291  * @param int $calendar_id
292  * @param int $calendarobject_id
293  * @return string
294  */
295 function wdcal_getDetailPage($calendar_id, $calendarobject_id)
296 {
297         $a = get_app();
298
299         try {
300                 $details = null;
301                 $server  = dav_create_server(true, true, false);
302                 $cal     = dav_get_current_user_calendar_by_id($server, $calendar_id, DAV_ACL_READ);
303                 $obj     = Sabre_CalDAV_Backend_Common::loadCalendarobjectById($calendarobject_id);
304                 dav_get_current_user_calendarobject($server, $cal, $obj["uri"], DAV_ACL_READ); // Check permissions
305
306                 $calbackend = wdcal_calendar_factory_by_id($calendar_id);
307                 $redirect   = $calbackend->getItemDetailRedirect($calendar_id, $calendarobject_id);
308
309                 if ($redirect !== null) goaway($a->get_baseurl() . $redirect);
310
311                 $details = $obj;
312         } catch (Exception $e) {
313                 info(t("Error") . ": " . $e);
314                 goaway($a->get_baseurl() . "/dav/wdcal/");
315         }
316
317         return print_r($details, true);
318 }
319
320
321 /**
322  * @param int $calendar_id
323  * @param int $uri
324  * @return string
325  */
326 function wdcal_getEditPage($calendar_id, $uri)
327 {
328         $a            = get_app();
329         $localization = wdcal_local::getInstanceByUser($a->user["uid"]);
330
331         return wdcal_getEditPage_str($localization, $a->get_baseurl(), $calendar_id, $uri);
332 }
333
334 /**
335  * @return string
336  */
337 function wdcal_getNewPage()
338 {
339         $a            = get_app();
340         $localization = wdcal_local::getInstanceByUser($a->user["uid"]);
341
342         return wdcal_getEditPage_str($localization, $a->get_baseurl(), 0, 0);
343 }
344
345
346 /**
347  * @param App $a
348  * @return string
349  */
350 function wdcal_getSettingsPage(&$a)
351 {
352
353         if (!local_user()) {
354                 notice(t('Permission denied.') . EOL);
355                 return '';
356         }
357
358         if (isset($_REQUEST["save"])) {
359                 check_form_security_token_redirectOnErr('/dav/settings/', 'calprop');
360                 set_pconfig($a->user["uid"], "dav", "dateformat", $_REQUEST["wdcal_date_format"]);
361                 info(t('The new values have been saved.'));
362         }
363
364         if (isset($_REQUEST["save_cals"])) {
365                 check_form_security_token_redirectOnErr('/dav/settings/', 'calprop');
366
367                 $r = q("SELECT * FROM %s%scalendars WHERE `namespace` = " . CALDAV_NAMESPACE_PRIVATE . " AND `namespace_id` = %d", CALDAV_SQL_DB, CALDAV_SQL_PREFIX, IntVal($a->user["uid"]));
368                 foreach ($r as $cal) {
369                         $backend = wdcal_calendar_factory($cal["namespace"], $cal["namespace_id"], $cal["uri"], $cal);
370                         $change_sql = "";
371                         $col = substr($_REQUEST["color"][$cal["id"]], 1);
372                         if (strtolower($col) != strtolower($cal["calendarcolor"])) $change_sql .= ", `calendarcolor` = '" . dbesc($col) . "'";
373                         if (!is_subclass_of($backend, "Sabre_CalDAV_Backend_Virtual")) {
374                                 if ($_REQUEST["uri"][$cal["id"]] != $cal["uri"]) $change_sql .= ", `uri` = '" . dbesc($_REQUEST["uri"][$cal["id"]]) . "'";
375                                 if ($_REQUEST["name"][$cal["id"]] != $cal["displayname"]) $change_sql .= ", `displayname` = '" . dbesc($_REQUEST["name"][$cal["id"]]) . "'";
376                         }
377                         if ($change_sql != "") {
378                                 q("UPDATE %s%scalendars SET `ctag` = `ctag` + 1 $change_sql WHERE `id` = %d AND `namespace_id` = %d AND `namespace_id` = %d",
379                                         CALDAV_SQL_DB, CALDAV_SQL_PREFIX, $cal["id"], CALDAV_NAMESPACE_PRIVATE, IntVal($a->user["uid"]));
380                                 info(t('The calendar has been updated.'));
381                         }
382                 }
383
384                 if (isset($_REQUEST["uri"]["new"]) && $_REQUEST["uri"]["new"] != "" && $_REQUEST["name"]["new"] && $_REQUEST["name"]["new"] != "") {
385                         $order = q("SELECT MAX(`calendarorder`) ord FROM %s%scalendars WHERE `namespace_id` = %d AND `namespace_id` = %d",
386                                 CALDAV_SQL_DB, CALDAV_SQL_PREFIX, CALDAV_NAMESPACE_PRIVATE, IntVal($a->user["uid"]));
387                         $neworder = $order[0]["ord"] + 1;
388                         q("INSERT INTO %s%scalendars (`namespace`, `namespace_id`, `calendarorder`, `calendarcolor`, `displayname`, `timezone`, `uri`, `has_vevent`, `ctag`)
389                                 VALUES (%d, %d, %d, '%s', '%s', '%s', '%s', 1, 1)",
390                                 CALDAV_SQL_DB, CALDAV_SQL_PREFIX, CALDAV_NAMESPACE_PRIVATE, IntVal($a->user["uid"]), $neworder, dbesc(strtolower(substr($_REQUEST["color"]["new"], 1))),
391                                 dbesc($_REQUEST["name"]["new"]), dbesc($a->timezone), dbesc($_REQUEST["uri"]["new"])
392                         );
393                         info(t('The new calendar has been created.'));
394                 }
395         }
396
397         if (isset($_REQUEST["remove_cal"])) {
398                 check_form_security_token_redirectOnErr('/dav/settings/', 'del_cal', 't');
399
400                 $c = q("SELECT * FROM %s%scalendars WHERE `id` = %d AND `namespace_id` = %d AND `namespace_id` = %d",
401                         CALDAV_SQL_DB, CALDAV_SQL_PREFIX, IntVal($_REQUEST["remove_cal"]), CALDAV_NAMESPACE_PRIVATE, IntVal($a->user["uid"]));
402                 if (count($c) != 1) killme();
403
404                 $calobjs = q("SELECT `id` FROM %s%scalendarobjects WHERE `calendar_id` = %d", CALDAV_SQL_DB, CALDAV_SQL_PREFIX, IntVal($_REQUEST["remove_cal"]));
405
406                 $newcal = q("SELECT * FROM %s%scalendars WHERE `id` != %d AND `namespace_id` = %d AND `namespace_id` = %d ORDER BY `calendarcolor` LIMIT 0,1",
407                         CALDAV_SQL_DB, CALDAV_SQL_PREFIX, IntVal($_REQUEST["remove_cal"]), CALDAV_NAMESPACE_PRIVATE, IntVal($a->user["uid"]));
408                 if (count($newcal) != 1) killme();
409
410                 q("UPDATE %s%scalendarobjects SET `calendar_id` = %d WHERE `calendar_id` = %d", CALDAV_SQL_DB, CALDAV_SQL_PREFIX, IntVal($newcal[0]["id"]), IntVal($c[0]["id"]));
411
412                 foreach ($calobjs as $calobj) renderCalDavEntry_calobj_id($calobj["id"]);
413
414                 q("DELETE FROM %s%scalendars WHERE `id` = %s", CALDAV_SQL_DB, CALDAV_SQL_PREFIX, IntVal($_REQUEST["remove_cal"]));
415                 q("UPDATE %s%scalendars SET `ctag` = `ctag` + 1 WHERE `id` = " . CALDAV_SQL_DB, CALDAV_SQL_PREFIX, $newcal[0]["id"]);
416
417                 info(t('The calendar has been deleted.'));
418         }
419
420         $o = "";
421
422         $o .= "<a href='" . $a->get_baseurl() . "/dav/wdcal/'>" . t("Go back to the calendar") . "</a><br><br>";
423
424         $o .= '<h3>' . t('Calendar Settings') . '</h3>';
425
426         $current_format = wdcal_local::getInstanceByUser($a->user["uid"]);
427         $o .= '<form method="POST" action="' . $a->get_baseurl() . '/dav/settings/">';
428         $o .= "<input type='hidden' name='form_security_token' value='" . get_form_security_token('calprop') . "'>\n";
429
430         $o .= '<label for="wdcal_date_format">' . t('Date format') . ':</label><select name="wdcal_date_format" id="wdcal_date_format" size="1">';
431         $classes = wdcal_local::getInstanceClasses();
432         foreach ($classes as $c) {
433                 $o .= '<option value="' . $c::getID() . '" ';
434                 if ($c::getID() == $current_format::getID()) $o .= 'selected';
435                 $o .= '>' . escape_tags($c::getName()) . '</option>';
436         }
437         $o .= '</select><br>';
438
439         $o .= '<label for="wdcal_time_zone">' . t('Time zone') . ':</label><input id="wdcal_time_zone" value="' . $a->timezone . '" disabled><br>';
440
441         $o .= '<input type="submit" name="save" value="' . t('Save') . '">';
442         $o .= '</form>';
443
444
445         $o .= '<br><br><h3>' . t('Calendars') . '</h3>';
446         $o .= '<form method="POST" action="' . $a->get_baseurl() . '/dav/settings/">';
447         $o .= "<input type='hidden' name='form_security_token' value='" . get_form_security_token('calprop') . "'>\n";
448         $o .= "<table><tr><th>Type</th><th>Color</th><th>Name</th><th>URI (for CalDAV)</th><th>ICS</th></tr>";
449
450         $r = q("SELECT * FROM %s%scalendars WHERE `namespace` = " . CALDAV_NAMESPACE_PRIVATE . " AND `namespace_id` = %d", CALDAV_SQL_DB, CALDAV_SQL_PREFIX, IntVal($a->user["uid"]));
451         $private_max = 0;
452         $num_non_virtual = 0;
453         foreach ($r as $x) {
454                 $backend = wdcal_calendar_factory($x["namespace"], $x["namespace_id"], $x["uri"], $x);
455                 if (!is_subclass_of($backend, "Sabre_CalDAV_Backend_Virtual")) $num_non_virtual++;
456         }
457         foreach ($r as $x) {
458                 $p = explode("private-", $x["uri"]);
459                 if (count($p) == 2 && $p[1] > $private_max) $private_max = $p[1];
460
461                 $backend = wdcal_calendar_factory($x["namespace"], $x["namespace_id"], $x["uri"], $x);
462                 $disabled = (is_subclass_of($backend, "Sabre_CalDAV_Backend_Virtual") ? "disabled" : "");
463                 $o .= "<tr>";
464                 $o .= "<td style='padding: 2px;'>" . escape_tags($backend->getBackendTypeName()) . "</td>";
465                 $o .= "<td style='padding: 2px; text-align: center;'><input style='margin-left: 10px; width: 70px;' class='cal_color' name='color[" . $x["id"] . "]' id='cal_color_" . $x["id"] . "' value='#" . (strlen($x["calendarcolor"]) != 6 ? "5858ff" : escape_tags($x["calendarcolor"])) . "'></td>";
466                 $o .= "<td style='padding: 2px;'><input style='margin-left: 10px;' name='name[" . $x["id"] . "]' value='" . escape_tags($x["displayname"]) . "' $disabled></td>";
467                 $o .= "<td style='padding: 2px;'><input style='margin-left: 10px; width: 150px;' name='uri[" . $x["id"] . "]' value='" . escape_tags($x["uri"]) . "' $disabled></td>";
468                 $o .= "<td style='padding: 2px;'><a href='" . $a->get_baseurl() . "/dav/wdcal/" . $x["id"] . "/ics-export/'>Export</a>";
469                 if (!is_subclass_of($backend, "Sabre_CalDAV_Backend_Virtual") && $num_non_virtual > 1) $o .= " / <a href='" . $a->get_baseurl() . "/dav/wdcal/" . $x["id"] . "/ics-import/'>Import</a>";
470                 $o .= "</td>";
471                 $o .= "<td style='padding: 2px; padding-left: 50px;'>";
472                 if (!is_subclass_of($backend, "Sabre_CalDAV_Backend_Virtual") && $num_non_virtual > 1) $o .= "<a href='" . $a->get_baseurl() . "/dav/settings/?remove_cal=" . $x["id"] . "&amp;t=" . get_form_security_token("del_cal") . "' class='delete_cal'>Delete</a>";
473                 $o .= "</td>\n";
474                 $o .= "</tr>\n";
475         }
476
477         $private_max++;
478         $o .= "<tr class='cal_add_row' style='display: none;'>";
479         $o .= "<td style='padding: 2px;'>" . escape_tags(Sabre_CalDAV_Backend_Private::getBackendTypeName()) . "</td>";
480         $o .= "<td style='padding: 2px; text-align: center;'><input style='margin-left: 10px; width: 70px;' class='cal_color' name='color[new]' id='cal_color_new' value='#5858ff'></td>";
481         $o .= "<td style='padding: 2px;'><input style='margin-left: 10px;' name='name[new]' value='Another calendar'></td>";
482         $o .= "<td style='padding: 2px;'><input style='margin-left: 10px; width: 150px;' name='uri[new]' value='private-${private_max}'></td>";
483         $o .= "<td></td><td></td>";
484         $o .= "</tr>\n";
485
486         $o .= "</table>";
487         $o .= "<div style='text-align: center;'>[<a href='#' class='calendar_add_caller'>" . t("Create a new calendar") . "</a>]</div>";
488         $o .= '<input type="submit" name="save_cals" value="' . t('Save') . '">';
489         $o .= '</form>';
490         $baseurl = $a->get_baseurl();
491         $o .= "<script>\$(function() {
492                 wdcal_edit_calendars_start('" . $current_format->dateformat_datepicker_js() . "', '${baseurl}/dav/');
493         });</script>";
494
495
496         $o .= "<br><h3>" . t("Limitations") . "</h3>";
497
498         $o .= "- The native friendica events are embedded as read-only, half-transparent in the calendar.<br>";
499
500         $o .= "<br><h3>" . t("Warning") . "</h3>";
501
502         $o .= "This plugin still is in a very early stage of development. Expect major bugs!<br>";
503
504         $o .= "<br><h3>" . t("Synchronization (iPhone, Thunderbird Lightning, Android, ...)") . "</h3>";
505
506         $o .= 'This plugin enables synchronization of your dates and contacts with CalDAV- and CardDAV-enabled programs or devices.<br>
507                 As an example, the instructions how to set up two-way synchronization with an iPhone/iPodTouch are provided below.<br>
508                 Unfortunately, Android does not have native support for CalDAV or CardDAV, so an app has to be installed.<br>
509                 On desktops, the Lightning-extension to Mozilla Thunderbird should be able to use this plugin as a backend.<br><br>';
510
511         $o .= '<h4>' . t('Synchronizing this calendar with the iPhone') . '</h4>';
512
513         $o .= "<ul>
514         <li>Go to the settings</li>
515         <li>Mail, contacts, settings</li>
516         <li>Add a new account</li>
517         <li>Other...</li>
518         <li>Calendar -> CalDAV-Account</li>
519         <li><b>Server:</b> " . $a->get_baseurl() . "/dav/ / <b>Username/Password:</b> <em>the same as your friendica-login</em></li>
520         </ul>";
521
522         $o .= '<h4>' . t('Synchronizing your Friendica-Contacts with the iPhone') . '</h4>';
523
524         $o .= "<ul>
525         <li>Go to the settings</li>
526         <li>Mail, contacts, settings</li>
527         <li>Add a new account</li>
528         <li>Other...</li>
529         <li>Contacts -> CardDAV-Account</li>
530         <li><b>Server:</b> " . $a->get_baseurl() . "/dav/ / <b>Username/Password:</b> <em>the same as your friendica-login</em></li>
531         </ul>";
532
533         return $o;
534 }
535