dav/common/wdcal_backend.inc.php

   1 <?php
   2
   3 use Friendica\Core\L10n;
   4
   5 /**
   6  * @param mixed $obj
   7  * @return string
   8  */
   9 function wdcal_jsonp_encode($obj)
  10 {
  11         $str = json_encode($obj);
  12         if (isset($_REQUEST["callback"])) {
  13                 $str = $_REQUEST["callback"] . "(" . $str . ")";
  14         }
  15         return $str;
  16 }
  17
  18
  19 /**
  20  * @param string $day
  21  * @param int $weekstartday
  22  * @param int $num_days
  23  * @param string $type
  24  * @return array
  25  */
  26 function wdcal_get_list_range_params($day, $weekstartday, $num_days, $type)
  27 {
  28         $phpTime = IntVal($day);
  29         switch ($type) {
  30                 case "month":
  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));
  33                         break;
  34                 case "week":
  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));
  40                         break;
  41                 case "multi_days":
  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));
  47                         break;
  48                 case "day":
  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));
  51                         break;
  52                 default:
  53                         return array(0, 0);
  54         }
  55         return array($st, $et);
  56 }
  57
  58
  59 /**
  60  * @param Sabre_DAV_Server $server
  61  * @param string $right
  62  * @return null|Sabre_CalDAV_Calendar
  63  */
  64 function wdcal_print_feed_getCal(&$server, $right)
  65 {
  66         $cals     = dav_get_current_user_calendars($server, $right);
  67         $calfound = null;
  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];
  71         }
  72         return $calfound;
  73 }
  74
  75
  76 /**
  77  *
  78  */
  79 function wdcal_print_feed($base_path = "")
  80 {
  81         $server = dav_create_server(true, true, false);
  82
  83         $ret = null;
  84
  85         $method = $_GET["method"];
  86         switch ($method) {
  87                 case "add":
  88                         $cs = wdcal_print_feed_getCal($server, DAV_ACL_WRITE);
  89                         if ($cs == null) {
  90                                 echo wdcal_jsonp_encode(array('IsSuccess' => false,
  91                                                                                           'Msg'       => L10n::t('No access')));
  92                                 killme();
  93                         }
  94                         try {
  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")));
  98
  99                                 if (isset($_REQUEST["allday"])) $type = Sabre\VObject\Property\DateTime::DATE;
 100                                 else $type = Sabre\VObject\Property\DateTime::LOCALTZ;
 101
 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);
 106
 107                                 $component->add($datetime_start);
 108                                 $component->add($datetime_end);
 109
 110                                 $uid  = $component->__get("UID");
 111                                 $data = $item->serialize();
 112
 113                                 $cs->createFile($uid . ".ics", $data);
 114
 115                                 $ret = array(
 116                                         'IsSuccess' => true,
 117                                         'Msg'       => 'add success',
 118                                         'Data'      => $uid . ".ics",
 119                                 );
 120
 121                         } catch (Exception $e) {
 122                                 $ret = array(
 123                                         'IsSuccess' => false,
 124                                         'Msg'       => $e->__toString(),
 125                                 );
 126                         }
 127                         break;
 128                 case "list":
 129                         $weekstartday = (isset($_REQUEST["weekstartday"]) ? IntVal($_REQUEST["weekstartday"]) : 1); // 1 = Monday
 130                         $num_days     = (isset($_REQUEST["num_days"]) ? IntVal($_REQUEST["num_days"]) : 7);
 131                         $ret          = null;
 132
 133                         $date          = wdcal_get_list_range_params($_REQUEST["showdate"], $weekstartday, $num_days, $_REQUEST["viewtype"]);
 134                         $ret           = array();
 135                         $ret['events'] = array();
 136                         $ret["issort"] = true;
 137                         $ret["start"]  = $date[0];
 138                         $ret["end"]    = $date[1];
 139                         $ret['error']  = null;
 140
 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);
 148                                 }
 149                         }
 150
 151                         $tmpev = array();
 152                         foreach ($ret["events"] as $e) {
 153                                 if (!isset($tmpev[$e["start"]])) $tmpev[$e["start"]] = array();
 154                                 $tmpev[$e["start"]][] = $e;
 155                         }
 156                         ksort($tmpev);
 157                         $ret["events"] = array();
 158                         foreach ($tmpev as $e) foreach ($e as $f) $ret["events"][] = $f;
 159
 160                         break;
 161                 case "update":
 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')));
 166                                 killme();
 167                         }
 168                         try {
 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"]);
 171
 172                                 $vObject   = dav_get_current_user_calendarobject($server, $cs, $obj_uri["uri"], DAV_ACL_WRITE);
 173                                 $component = dav_get_eventComponent($vObject);
 174
 175                                 if (!$component) {
 176                                         echo wdcal_jsonp_encode(array('IsSuccess' => false,
 177                                                                                                   'Msg'       => L10n::t('No access')));
 178                                         killme();
 179                                 }
 180
 181                                 if (isset($_REQUEST["allday"])) $type = Sabre\VObject\Property\DateTime::DATE;
 182                                 else $type = Sabre\VObject\Property\DateTime::LOCALTZ;
 183
 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);
 188
 189                                 $component->__unset("DTSTART");
 190                                 $component->__unset("DTEND");
 191                                 $component->add($datetime_start);
 192                                 $component->add($datetime_end);
 193
 194                                 $data = $vObject->serialize();
 195                                 /** @var Sabre_CalDAV_CalendarObject $child  */
 196                                 $child = $cs->getChild($obj_uri["uri"]);
 197                                 $child->put($data);
 198
 199                                 $ret = array(
 200                                         'IsSuccess' => true,
 201                                         'Msg'       => 'Succefully',
 202                                 );
 203                         } catch (Exception $e) {
 204                                 echo wdcal_jsonp_encode(array('IsSuccess' => false,
 205                                                                                           'Msg'       => L10n::t('No access')));
 206                                 killme();
 207                         }
 208                         break;
 209                 case "remove":
 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')));
 214                                 killme();
 215                         }
 216                         try {
 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"]);
 220                                 $child->delete();
 221
 222                                 $ret = array(
 223                                         'IsSuccess' => true,
 224                                         'Msg'       => 'Succefully',
 225                                 );
 226                         } catch (Exception $e) {
 227                                 echo wdcal_jsonp_encode(array('IsSuccess' => false,
 228                                                                                           'Msg'       => L10n::t('No access')));
 229                                 killme();
 230                         }
 231
 232                         break;
 233         }
 234         echo wdcal_jsonp_encode($ret);
 235         killme();
 236 }
 237