dav/friendica/layout.fnk.php

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