]> git.mxchange.org Git - friendica.git/blob - src/Model/Event.php
8745a787f6d7acc37b7678c7ef6ad694edc537b4
[friendica.git] / src / Model / Event.php
1 <?php
2 /**
3  * @copyright Copyright (C) 2010-2022, the Friendica project
4  *
5  * @license GNU AGPL version 3 or any later version
6  *
7  * This program is free software: you can redistribute it and/or modify
8  * it under the terms of the GNU Affero General Public License as
9  * published by the Free Software Foundation, either version 3 of the
10  * License, or (at your option) any later version.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU Affero General Public License for more details.
16  *
17  * You should have received a copy of the GNU Affero General Public License
18  * along with this program.  If not, see <https://www.gnu.org/licenses/>.
19  *
20  */
21
22 namespace Friendica\Model;
23
24 use Friendica\Content\Text\BBCode;
25 use Friendica\Core\Hook;
26 use Friendica\Core\Logger;
27 use Friendica\Core\Renderer;
28 use Friendica\Core\System;
29 use Friendica\Database\DBA;
30 use Friendica\DI;
31 use Friendica\Network\HTTPException\NotFoundException;
32 use Friendica\Network\HTTPException\UnauthorizedException;
33 use Friendica\Protocol\Activity;
34 use Friendica\Util\DateTimeFormat;
35 use Friendica\Util\Map;
36 use Friendica\Util\Strings;
37 use Friendica\Util\Temporal;
38 use Friendica\Util\XML;
39
40 /**
41  * functions for interacting with the event database table
42  */
43 class Event
44 {
45
46         public static function getHTML(array $event, bool $simple = false, int $uriid = 0): string
47         {
48                 if (empty($event)) {
49                         return '';
50                 }
51
52                 $uriid = $event['uri-id'] ?? $uriid;
53
54                 $bd_format = DI::l10n()->t('l F d, Y \@ g:i A \G\M\TP (e)'); // Friday October 29, 2021 @ 9:15 AM GMT-04:00 (America/New_York)
55
56                 $event_start = DI::l10n()->getDay(DateTimeFormat::local($event['start'], $bd_format));
57
58                 if (!empty($event['finish'])) {
59                         $event_end = DI::l10n()->getDay(DateTimeFormat::local($event['finish'], $bd_format));
60                 } else {
61                         $event_end = '';
62                 }
63
64                 if ($simple) {
65                         $o = '';
66
67                         if (!empty($event['summary'])) {
68                                 $o .= "<h3>" . BBCode::convertForUriId($uriid, Strings::escapeHtml($event['summary']), $simple) . "</h3>";
69                         }
70
71                         if (!empty($event['desc'])) {
72                                 $o .= "<div>" . BBCode::convertForUriId($uriid, Strings::escapeHtml($event['desc']), $simple) . "</div>";
73                         }
74
75                         $o .= "<h4>" . DI::l10n()->t('Starts:') . "</h4><p>" . $event_start . "</p>";
76
77                         if (!$event['nofinish']) {
78                                 $o .= "<h4>" . DI::l10n()->t('Finishes:') . "</h4><p>" . $event_end . "</p>";
79                         }
80
81                         if (!empty($event['location'])) {
82                                 $o .= "<h4>" . DI::l10n()->t('Location:') . "</h4><p>" . BBCode::convertForUriId($uriid, Strings::escapeHtml($event['location']), $simple) . "</p>";
83                         }
84
85                         return $o;
86                 }
87
88                 $o = '<div class="vevent">' . "\r\n";
89
90                 $o .= '<div class="summary event-summary">' . BBCode::convertForUriId($uriid, Strings::escapeHtml($event['summary']), $simple) . '</div>' . "\r\n";
91
92                 $o .= '<div class="event-start"><span class="event-label">' . DI::l10n()->t('Starts:') . '</span>&nbsp;<span class="dtstart" title="'
93                         . DateTimeFormat::local($event['start'], DateTimeFormat::ATOM)
94                         . '" >' . $event_start
95                         . '</span></div>' . "\r\n";
96
97                 if (!$event['nofinish']) {
98                         $o .= '<div class="event-end" ><span class="event-label">' . DI::l10n()->t('Finishes:') . '</span>&nbsp;<span class="dtend" title="'
99                                 . DateTimeFormat::local($event['finish'], DateTimeFormat::ATOM)
100                                 . '" >' . $event_end
101                                 . '</span></div>' . "\r\n";
102                 }
103
104                 if (!empty($event['desc'])) {
105                         $o .= '<div class="description event-description">' . BBCode::convertForUriId($uriid, Strings::escapeHtml($event['desc']), $simple) . '</div>' . "\r\n";
106                 }
107
108                 if (!empty($event['location'])) {
109                         $o .= '<div class="event-location"><span class="event-label">' . DI::l10n()->t('Location:') . '</span>&nbsp;<span class="location">'
110                                 . BBCode::convertForUriId($uriid, Strings::escapeHtml($event['location']), $simple)
111                                 . '</span></div>' . "\r\n";
112
113                         // Include a map of the location if the [map] BBCode is used.
114                         if (strpos($event['location'], "[map") !== false) {
115                                 $map = Map::byLocation($event['location'], $simple);
116                                 if ($map !== $event['location']) {
117                                         $o .= $map;
118                                 }
119                         }
120                 }
121
122                 $o .= '</div>' . "\r\n";
123                 return $o;
124         }
125
126         /**
127          * Convert an array with event data to bbcode.
128          *
129          * @param array $event Array which contains the event data.
130          * @return string The event as a bbcode formatted string.
131          */
132         private static function getBBCode(array $event): string
133         {
134                 $o = '';
135
136                 if ($event['summary']) {
137                         $o .= '[event-summary]' . $event['summary'] . '[/event-summary]';
138                 }
139
140                 if ($event['desc']) {
141                         $o .= '[event-description]' . $event['desc'] . '[/event-description]';
142                 }
143
144                 if ($event['start']) {
145                         $o .= '[event-start]' . $event['start'] . '[/event-start]';
146                 }
147
148                 if (($event['finish']) && (!$event['nofinish'])) {
149                         $o .= '[event-finish]' . $event['finish'] . '[/event-finish]';
150                 }
151
152                 if ($event['location']) {
153                         $o .= '[event-location]' . $event['location'] . '[/event-location]';
154                 }
155
156                 return $o;
157         }
158
159         /**
160          * Extract bbcode formatted event data from a string.
161          *
162          * @param string $text The string which should be parsed for event data.
163          * @return array The array with the event information.
164          */
165         public static function fromBBCode(string $text): array
166         {
167                 $ev = [];
168
169                 $match = [];
170                 if (preg_match("/\[event\-summary\](.*?)\[\/event\-summary\]/is", $text, $match)) {
171                         $ev['summary'] = $match[1];
172                 }
173
174                 $match = [];
175                 if (preg_match("/\[event\-description\](.*?)\[\/event\-description\]/is", $text, $match)) {
176                         $ev['desc'] = $match[1];
177                 }
178
179                 $match = [];
180                 if (preg_match("/\[event\-start\](.*?)\[\/event\-start\]/is", $text, $match)) {
181                         $ev['start'] = $match[1];
182                 }
183
184                 $match = [];
185                 if (preg_match("/\[event\-finish\](.*?)\[\/event\-finish\]/is", $text, $match)) {
186                         $ev['finish'] = $match[1];
187                 }
188
189                 $match = [];
190                 if (preg_match("/\[event\-location\](.*?)\[\/event\-location\]/is", $text, $match)) {
191                         $ev['location'] = $match[1];
192                 }
193
194                 $ev['nofinish'] = !empty($ev['start']) && empty($ev['finish']) ? 1 : 0;
195
196                 return $ev;
197         }
198
199         public static function sortByDate(array $event_list): array
200         {
201                 usort($event_list, ['self', 'compareDatesCallback']);
202                 return $event_list;
203         }
204
205         private static function compareDatesCallback(array $event_a, array $event_b)
206         {
207                 $date_a = DateTimeFormat::local($event_a['start']);
208                 $date_b = DateTimeFormat::local($event_b['start']);
209
210                 if ($date_a === $date_b) {
211                         return strcasecmp($event_a['desc'], $event_b['desc']);
212                 }
213
214                 return strcmp($date_a, $date_b);
215         }
216
217         /**
218          * Delete an event from the event table.
219          *
220          * Note: This function does only delete the event from the event table not its
221          * related entry in the item table.
222          *
223          * @param int $event_id Event ID.
224          * @return void
225          * @throws \Exception
226          */
227         public static function delete(int $event_id)
228         {
229                 if ($event_id == 0) {
230                         return;
231                 }
232
233                 DBA::delete('event', ['id' => $event_id]);
234                 Logger::info("Deleted event", ['id' => $event_id]);
235         }
236
237         /**
238          * Store the event.
239          *
240          * Store the event in the event table and create an event item in the item table.
241          *
242          * @param array $arr Array with event data.
243          * @return int The new event id.
244          * @throws \Friendica\Network\HTTPException\InternalServerErrorException
245          */
246         public static function store(array $arr): int
247         {
248                 $guid = $arr['guid'] ?? '' ?: System::createUUID();
249                 $uri  = $arr['uri']  ?? '' ?: Item::newURI($guid);
250                 $event = [
251                         'id'        => intval($arr['id']        ?? 0),
252                         'uid'       => intval($arr['uid']       ?? 0),
253                         'cid'       => intval($arr['cid']       ?? 0),
254                         'guid'      => $guid,
255                         'uri'       => $uri,
256                         'uri-id'    => ItemURI::insert(['uri' => $uri, 'guid' => $guid]),
257                         'type'      => ($arr['type']      ?? '') ?: 'event',
258                         'summary'   =>  $arr['summary']   ?? '',
259                         'desc'      =>  $arr['desc']      ?? '',
260                         'location'  =>  $arr['location']  ?? '',
261                         'allow_cid' =>  $arr['allow_cid'] ?? '',
262                         'allow_gid' =>  $arr['allow_gid'] ?? '',
263                         'deny_cid'  =>  $arr['deny_cid']  ?? '',
264                         'deny_gid'  =>  $arr['deny_gid']  ?? '',
265                         'nofinish'  => intval($arr['nofinish'] ?? (!empty($arr['start']) && empty($arr['finish']))),
266                         'created'   => DateTimeFormat::utc(($arr['created'] ?? '') ?: 'now'),
267                         'edited'    => DateTimeFormat::utc(($arr['edited']  ?? '') ?: 'now'),
268                         'start'     => DateTimeFormat::utc(($arr['start']   ?? '') ?: DBA::NULL_DATETIME),
269                         'finish'    => DateTimeFormat::utc(($arr['finish']  ?? '') ?: DBA::NULL_DATETIME),
270                 ];
271
272
273                 if ($event['finish'] < DBA::NULL_DATETIME) {
274                         $event['finish'] = DBA::NULL_DATETIME;
275                 }
276
277                 // Existing event being modified.
278                 if ($event['id']) {
279                         // has the event actually changed?
280                         $existing_event = DBA::selectFirst('event', ['edited'], ['id' => $event['id'], 'uid' => $event['uid']]);
281                         if (!DBA::isResult($existing_event)) {
282                                 return 0;
283                         }
284                         
285                         if ($existing_event['edited'] === $event['edited']) {
286                                 return $event['id'];
287                         }
288
289                         $updated_fields = [
290                                 'edited'   => $event['edited'],
291                                 'start'    => $event['start'],
292                                 'finish'   => $event['finish'],
293                                 'summary'  => $event['summary'],
294                                 'desc'     => $event['desc'],
295                                 'location' => $event['location'],
296                                 'type'     => $event['type'],
297                                 'nofinish' => $event['nofinish'],
298                         ];
299
300                         DBA::update('event', $updated_fields, ['id' => $event['id'], 'uid' => $event['uid']]);
301
302                         $item = Post::selectFirst(['id', 'uri-id'], ['event-id' => $event['id'], 'uid' => $event['uid']]);
303                         if (DBA::isResult($item)) {
304                                 $object = '<object><type>' . XML::escape(Activity\ObjectType::EVENT) . '</type><title></title><id>' . XML::escape($event['uri']) . '</id>';
305                                 $object .= '<content>' . XML::escape(self::getBBCode($event)) . '</content>';
306                                 $object .= '</object>' . "\n";
307
308                                 $fields = ['body' => self::getBBCode($event), 'object' => $object, 'edited' => $event['edited']];
309                                 Item::update($fields, ['id' => $item['id']]);
310                         }
311
312                         Hook::callAll('event_updated', $event['id']);
313                 } else {
314                         // New event. Store it.
315                         DBA::insert('event', $event);
316
317                         $event['id'] = DBA::lastInsertId();
318
319                         Hook::callAll("event_created", $event['id']);
320                 }
321
322                 return $event['id'];
323         }
324
325         public static function getItemArrayForId(int $event_id, array $item = []): array
326         {
327                 if (empty($event_id)) {
328                         return $item;
329                 }
330
331                 $event = DBA::selectFirst('event', [], ['id' => $event_id]);
332                 if ($event['type'] != 'event') {
333                         return $item;
334                 }
335
336                 if ($event['cid']) {
337                         $conditions = ['id' => $event['cid']];
338                 } else {
339                         $conditions = ['uid' => $event['uid'], 'self' => true];
340                 }
341
342                 $contact = DBA::selectFirst('contact', [], $conditions);
343
344                 $event['id'] = $event_id;
345
346                 $item['uid']           = $event['uid'];
347                 $item['contact-id']    = $event['cid'];
348                 $item['uri']           = $event['uri'];
349                 $item['uri-id']        = ItemURI::getIdByURI($event['uri']);
350                 $item['guid']          = $event['guid'];
351                 $item['plink']         = $arr['plink'] ?? '';
352                 $item['post-type']     = Item::PT_EVENT;
353                 $item['wall']          = $event['cid'] ? 0 : 1;
354                 $item['contact-id']    = $contact['id'];
355                 $item['owner-name']    = $contact['name'];
356                 $item['owner-link']    = $contact['url'];
357                 $item['owner-avatar']  = $contact['thumb'];
358                 $item['author-name']   = $contact['name'];
359                 $item['author-link']   = $contact['url'];
360                 $item['author-avatar'] = $contact['thumb'];
361                 $item['title']         = '';
362                 $item['allow_cid']     = $event['allow_cid'];
363                 $item['allow_gid']     = $event['allow_gid'];
364                 $item['deny_cid']      = $event['deny_cid'];
365                 $item['deny_gid']      = $event['deny_gid'];
366                 $item['private']       = intval($event['private'] ?? 0);
367                 $item['visible']       = 1;
368                 $item['verb']          = Activity::POST;
369                 $item['object-type']   = Activity\ObjectType::EVENT;
370                 $item['post-type']     = Item::PT_EVENT;
371                 $item['origin']        = $event['cid'] === 0 ? 1 : 0;
372                 $item['body']          = self::getBBCode($event);
373                 $item['event-id']      = $event['id'];
374
375                 $item['object']  = '<object><type>' . XML::escape(Activity\ObjectType::EVENT) . '</type><title></title><id>' . XML::escape($event['uri']) . '</id>';
376                 $item['object'] .= '<content>' . XML::escape(self::getBBCode($event)) . '</content>';
377                 $item['object'] .= '</object>' . "\n";
378
379                 return $item;
380         }
381
382         public static function getItemArrayForImportedId(int $event_id, array $item = []): array
383         {
384                 if (empty($event_id)) {
385                         return $item;
386                 }
387
388                 $event = DBA::selectFirst('event', [], ['id' => $event_id]);
389                 if ($event['type'] != 'event') {
390                         return $item;
391                 }
392
393                 $item['post-type']     = Item::PT_EVENT;
394                 $item['title']         = '';
395                 $item['object-type']   = Activity\ObjectType::EVENT;
396                 $item['body']          = self::getBBCode($event);
397                 $item['event-id']      = $event_id;
398
399                 $item['object']  = '<object><type>' . XML::escape(Activity\ObjectType::EVENT) . '</type><title></title><id>' . XML::escape($event['uri']) . '</id>';
400                 $item['object'] .= '<content>' . XML::escape(self::getBBCode($event)) . '</content>';
401                 $item['object'] .= '</object>' . "\n";
402
403                 return $item;
404         }
405
406         /**
407          * Create an array with translation strings used for events.
408          *
409          * @return array Array with translations strings.
410          * @throws \Friendica\Network\HTTPException\InternalServerErrorException
411          */
412         public static function getStrings(): array
413         {
414                 // First day of the week (0 = Sunday).
415                 $firstDay = DI::pConfig()->get(DI::userSession()->getLocalUserId(), 'system', 'first_day_of_week', 0);
416
417                 $i18n = [
418                         "firstDay" => $firstDay,
419                         "allday"   => DI::l10n()->t("all-day"),
420
421                         "Sun" => DI::l10n()->t("Sun"),
422                         "Mon" => DI::l10n()->t("Mon"),
423                         "Tue" => DI::l10n()->t("Tue"),
424                         "Wed" => DI::l10n()->t("Wed"),
425                         "Thu" => DI::l10n()->t("Thu"),
426                         "Fri" => DI::l10n()->t("Fri"),
427                         "Sat" => DI::l10n()->t("Sat"),
428
429                         "Sunday"    => DI::l10n()->t("Sunday"),
430                         "Monday"    => DI::l10n()->t("Monday"),
431                         "Tuesday"   => DI::l10n()->t("Tuesday"),
432                         "Wednesday" => DI::l10n()->t("Wednesday"),
433                         "Thursday"  => DI::l10n()->t("Thursday"),
434                         "Friday"    => DI::l10n()->t("Friday"),
435                         "Saturday"  => DI::l10n()->t("Saturday"),
436
437                         "Jan" => DI::l10n()->t("Jan"),
438                         "Feb" => DI::l10n()->t("Feb"),
439                         "Mar" => DI::l10n()->t("Mar"),
440                         "Apr" => DI::l10n()->t("Apr"),
441                         "May" => DI::l10n()->t("May"),
442                         "Jun" => DI::l10n()->t("Jun"),
443                         "Jul" => DI::l10n()->t("Jul"),
444                         "Aug" => DI::l10n()->t("Aug"),
445                         "Sep" => DI::l10n()->t("Sept"),
446                         "Oct" => DI::l10n()->t("Oct"),
447                         "Nov" => DI::l10n()->t("Nov"),
448                         "Dec" => DI::l10n()->t("Dec"),
449
450                         "January"   => DI::l10n()->t("January"),
451                         "February"  => DI::l10n()->t("February"),
452                         "March"     => DI::l10n()->t("March"),
453                         "April"     => DI::l10n()->t("April"),
454                         "June"      => DI::l10n()->t("June"),
455                         "July"      => DI::l10n()->t("July"),
456                         "August"    => DI::l10n()->t("August"),
457                         "September" => DI::l10n()->t("September"),
458                         "October"   => DI::l10n()->t("October"),
459                         "November"  => DI::l10n()->t("November"),
460                         "December"  => DI::l10n()->t("December"),
461
462                         "today" => DI::l10n()->t("today"),
463                         "month" => DI::l10n()->t("month"),
464                         "week"  => DI::l10n()->t("week"),
465                         "day"   => DI::l10n()->t("day"),
466
467                         "noevent" => DI::l10n()->t("No events to display"),
468
469                         "dtstart_label"  => DI::l10n()->t("Starts:"),
470                         "dtend_label"    => DI::l10n()->t("Finishes:"),
471                         "location_label" => DI::l10n()->t("Location:")
472                 ];
473
474                 return $i18n;
475         }
476
477         /**
478          * Removes duplicated birthday events.
479          *
480          * @param array $dates Array of possibly duplicated events.
481          * @return array Cleaned events.
482          *
483          * @todo We should replace this with a separate update function if there is some time left.
484          */
485         private static function removeDuplicates(array $dates): array
486         {
487                 $dates2 = [];
488
489                 foreach ($dates as $date) {
490                         if ($date['type'] == 'birthday') {
491                                 $dates2[$date['uid'] . "-" . $date['cid'] . "-" . $date['start']] = $date;
492                         } else {
493                                 $dates2[] = $date;
494                         }
495                 }
496                 return array_values($dates2);
497         }
498
499         /**
500          * Get an event by its event ID.
501          *
502          * @param int    $owner_uid The User ID of the owner of the event
503          * @param int    $event_id  The ID of the event in the event table
504          * @param string $nickname  a possible nickname to search for instead of the own uid
505          * @return array Query result
506          * @throws \Exception
507          */
508         public static function getByIdAndUid(int $owner_uid, int $event_id, string $nickname = null): array
509         {
510                 if (!empty($nickname)) {
511                         $owner = static::getOwnerForNickname($nickname, true);
512                         $owner_uid = $owner['uid'];
513
514                         // get the permissions
515                         $sql_perms = Item::getPermissionsSQLByUserId($owner_uid);
516                         // we only want to have the events of the profile owner
517                         $sql_extra = " AND `event`.`cid` = 0 " . $sql_perms;
518                 } else {
519                         $sql_extra = "";
520                 }
521
522                 // Only allow events if there is a valid owner_id.
523                 if ($owner_uid == 0) {
524                         return [];
525                 }
526
527                 // Query for the event by event id
528                 $events = DBA::toArray(DBA::p("SELECT `event`.*, `post-user`.`id` AS `itemid` FROM `event`
529                         LEFT JOIN `post-user` ON `post-user`.`event-id` = `event`.`id` AND `post-user`.`uid` = `event`.`uid`
530                         WHERE `event`.`uid` = ? AND `event`.`id` = ? $sql_extra",
531                         $owner_uid, $event_id));
532
533                 if (empty($events)) {
534                         throw new NotFoundException(DI::l10n()->t('Event not found.'));
535                 } else {
536                         $events = self::removeDuplicates($events);
537                         return $events[0];
538                 }
539         }
540
541         /**
542          * Returns the owner array of a given nickname
543          * Additionally, it can check if the owner array is selectable
544          *
545          * @param string $nickname
546          * @param bool   $check
547          *
548          * @return array the owner array
549          * @throws NotFoundException The given nickname does not exist
550          * @throws UnauthorizedException The access for the given nickname is restricted
551          */
552         public static function getOwnerForNickname(string $nickname, bool $check = true): array
553         {
554                 $owner = User::getOwnerDataByNick($nickname);
555                 if (empty($owner)) {
556                         throw new NotFoundException(DI::l10n()->t('User not found.'));
557                 }
558
559                 if ($check) {
560                         $contact_id = DI::userSession()->getRemoteContactID($owner['uid']);
561
562                         $remote_contact = $contact_id && DBA::exists('contact', ['id' => $contact_id, 'uid' => $owner['uid']]);
563
564                         $is_owner = DI::userSession()->getLocalUserId() == $owner['uid'];
565
566                         if ($owner['hidewall'] && !$is_owner && !$remote_contact) {
567                                 throw new UnauthorizedException(DI::l10n()->t('Access to this profile has been restricted.'));
568                         }
569                 }
570
571                 return $owner;
572         }
573
574         /**
575          * Get all events in a specific time frame.
576          *
577          * @param int         $owner_uid The User ID of the owner of the events.
578          * @param string|null $start     Start time of the timeframe.
579          * @param string|null $finish    Finish time of the timeframe.
580          * @param bool        $ignore
581          * @param string|null $nickname
582          *
583          * @return array Query results.
584          * @throws NotFoundException
585          * @throws UnauthorizedException
586          */
587         public static function getListByDate(int $owner_uid, string $start = null, string $finish = null, bool $ignore = false, string $nickname = null): array
588         {
589                 if (!empty($nickname)) {
590                         $owner     = static::getOwnerForNickname($nickname, true);
591                         $owner_uid = $owner['uid'];
592
593                         // get the permissions
594                         $sql_perms = Item::getPermissionsSQLByUserId($owner_uid);
595                         // we only want to have the events of the profile owner
596                         $sql_extra = " AND `event`.`cid` = 0 " . $sql_perms;
597                 } else {
598                         $sql_extra = "";
599                 }
600
601                 // Only allow events if there is a valid owner_id.
602                 if ($owner_uid == 0) {
603                         return [];
604                 }
605
606                 if (empty($start) || empty($finish)) {
607
608                         $y = intval(DateTimeFormat::localNow('Y'));
609                         $m = intval(DateTimeFormat::localNow('m'));
610
611                         // Put some limit on dates. The PHP date functions don't seem to do so well before 1900.
612                         if ($y < 1901) {
613                                 $y = 1900;
614                         }
615
616                         if ($y > 2099) {
617                                 $y = 2100;
618                         }
619
620                         if (empty($start)) {
621                                 $start = sprintf('%d-%d-%d %d:%d:%d', $y, $m, 1, 0, 0, 0);
622                         } else {
623                                 $dim    = Temporal::getDaysInMonth($y, $m);
624                                 $finish = sprintf('%d-%d-%d %d:%d:%d', $y, $m, $dim, 23, 59, 59);
625                         }
626                 }
627
628                 // Query for the event by date.
629                 $events = DBA::toArray(DBA::p("SELECT `event`.*, `post-user`.`id` AS `itemid` FROM `event`
630                                 LEFT JOIN `post-user` ON `post-user`.`event-id` = `event`.`id` AND `post-user`.`uid` = `event`.`uid`
631                                 WHERE `event`.`uid` = ? AND `event`.`ignore` = ?
632                                 AND (`finish` >= ? OR (`nofinish` AND `start` >= ?)) AND `start` <= ?
633                                 " . $sql_extra,
634                         $owner_uid, $ignore,
635                         $start, $start, $finish
636                 ));
637
638                 $events = self::removeDuplicates($events ?? []);
639                 return self::sortByDate($events);
640         }
641
642         /**
643          * Convert an array query results in an array which could be used by the events template.
644          *
645          * @param array $event_result Event query array.
646          * @return array Event array for the template.
647          * @throws \Friendica\Network\HTTPException\InternalServerErrorException
648          * @throws \ImagickException
649          */
650         public static function prepareListForTemplate(array $event_result): array
651         {
652                 $event_list = [];
653
654                 foreach ($event_result as $event) {
655                         $event_list[] = static::prepareForItem($event);
656                 }
657
658                 return $event_list;
659         }
660
661         /**
662          * Convert an one event in an array which could be used by the events template.
663          *
664          * @param array $event Event query array.
665          * @return array Event array for the template.
666          * @throws \Friendica\Network\HTTPException\InternalServerErrorException
667          * @throws \ImagickException
668          */
669         public static function prepareForItem(array $event): array
670         {
671                 $fmt = DI::l10n()->t('l, F j');
672
673                 $item = Post::selectFirst(['plink', 'author-name', 'author-network', 'author-id', 'author-avatar', 'author-link', 'private', 'uri-id'], ['id' => $event['itemid']]);
674                 if (!DBA::isResult($item)) {
675                         // Using default values when no item had been found
676                         $item = ['plink' => '', 'author-name' => '', 'author-avatar' => '', 'author-link' => '', 'private' => Item::PUBLIC, 'uri-id' => ($event['uri-id'] ?? 0)];
677                 }
678
679                 $event = array_merge($event, $item);
680
681                 $start = DateTimeFormat::local($event['start'], 'c');
682                 $j     = DateTimeFormat::local($event['start'], 'j');
683                 $day   = DateTimeFormat::local($event['start'], $fmt);
684                 $day   = DI::l10n()->getDay($day);
685
686                 if ($event['nofinish']) {
687                         $end = null;
688                 } else {
689                         $end = DateTimeFormat::local($event['finish'], 'c');
690                 }
691
692                 // Show edit and drop actions only if the user is the owner of the event and the event
693                 // is a real event (no bithdays).
694                 $edit = null;
695                 $copy = null;
696                 $drop = null;
697                 if (DI::userSession()->getLocalUserId() && DI::userSession()->getLocalUserId() == $event['uid'] && $event['type'] == 'event') {
698                         $edit = !$event['cid'] ? [DI::baseUrl() . '/calendar/event/edit/' . $event['id'], DI::l10n()->t('Edit event')     , '', ''] : null;
699                         $copy = !$event['cid'] ? [DI::baseUrl() . '/calendar/event/copy/' . $event['id'] , DI::l10n()->t('Duplicate event'), '', ''] : null;
700                         $drop =                  [DI::baseUrl() . '/calendar/api/delete/' . $event['id'] , DI::l10n()->t('Delete event')   , '', ''];
701                 }
702
703                 $title = BBCode::convertForUriId($event['uri-id'], Strings::escapeHtml($event['summary']));
704                 if (!$title) {
705                         [$title, $_trash] = explode("<br", BBCode::convertForUriId($event['uri-id'], Strings::escapeHtml($event['desc'])), BBCode::TWITTER_API);
706                 }
707
708                 $author_link = $event['author-link'];
709
710                 $event['author-link'] = Contact::magicLink($author_link);
711
712                 $html = self::getHTML($event);
713                 $event['summary']  = BBCode::convertForUriId($event['uri-id'], Strings::escapeHtml($event['summary']));
714                 $event['desc']     = BBCode::convertForUriId($event['uri-id'], Strings::escapeHtml($event['desc']));
715                 $event['location'] = BBCode::convertForUriId($event['uri-id'], Strings::escapeHtml($event['location']));
716
717                 return [
718                         'id'       => $event['id'],
719                         'start'    => $start,
720                         'end'      => $end,
721                         'allDay'   => false,
722                         'title'    => $title,
723                         'j'        => $j,
724                         'd'        => $day,
725                         'edit'     => $edit,
726                         'drop'     => $drop,
727                         'copy'     => $copy,
728                         'item'     => $event,
729                         'html'     => $html,
730                         'plink'    => Item::getPlink($event),
731                 ];
732         }
733
734         /**
735          * Format event to export format (ical/csv).
736          *
737          * @param array  $events Query result for events.
738          * @param string $format The output format (ical/csv).
739          *
740          * @param string $timezone Timezone (missing parameter!)
741          * @return string Content according to selected export format.
742          *
743          * @todo  Implement timezone support
744          */
745         private static function formatListForExport(array $events, string $format): string
746         {
747                 $o = '';
748
749                 if (!count($events)) {
750                         return $o;
751                 }
752
753                 switch ($format) {
754                         // Format the exported data as a CSV file.
755                         case "csv":
756                                 $o .= '"Subject", "Start Date", "Start Time", "Description", "End Date", "End Time", "Location"' . PHP_EOL;
757
758                                 foreach ($events as $event) {
759                                         /// @todo The time / date entries don't include any information about the
760                                         /// timezone the event is scheduled in :-/
761                                         $tmp1 = strtotime($event['start']);
762                                         $tmp2 = strtotime($event['finish']);
763                                         $time_format = "%H:%M:%S";
764                                         $date_format = "%Y-%m-%d";
765
766                                         $o .= '"' . $event['summary'] . '", "' . strftime($date_format, $tmp1) .
767                                                 '", "' . strftime($time_format, $tmp1) . '", "' . $event['desc'] .
768                                                 '", "' . strftime($date_format, $tmp2) .
769                                                 '", "' . strftime($time_format, $tmp2) .
770                                                 '", "' . $event['location'] . '"' . PHP_EOL;
771                                 }
772                                 break;
773
774                         // Format the exported data as a ics file.
775                         case "ical":
776                                 $o = 'BEGIN:VCALENDAR' . PHP_EOL
777                                         . 'VERSION:2.0' . PHP_EOL
778                                         . 'PRODID:-//friendica calendar export//0.1//EN' . PHP_EOL;
779                                 ///  @todo include timezone informations in cases were the time is not in UTC
780                                 //  see http://tools.ietf.org/html/rfc2445#section-4.8.3
781                                 //              . 'BEGIN:VTIMEZONE' . PHP_EOL
782                                 //              . 'TZID:' . $timezone . PHP_EOL
783                                 //              . 'END:VTIMEZONE' . PHP_EOL;
784                                 //  TODO instead of PHP_EOL CRLF should be used for long entries
785                                 //       but test your solution against http://icalvalid.cloudapp.net/
786                                 //       also long lines SHOULD be split at 75 characters length
787                                 foreach ($events as $event) {
788                                         $o .= 'BEGIN:VEVENT' . PHP_EOL;
789                                         $o .= 'UID:' . $event['id'] . PHP_EOL;
790                                         $o .= 'DTSTAMP:' . DateTimeFormat::utc($event['created'], 'Ymd\THis\Z') . PHP_EOL;
791
792                                         if ($event['start']) {
793                                                 $o .= 'DTSTART:' . DateTimeFormat::utc($event['start'], 'Ymd\THis\Z') . PHP_EOL;
794                                         }
795
796                                         if (!$event['nofinish']) {
797                                                 $o .= 'DTEND:' . DateTimeFormat::utc($event['finish'], 'Ymd\THis\Z') . PHP_EOL;
798                                         }
799
800                                         if ($event['summary']) {
801                                                 $tmp = $event['summary'];
802                                                 $tmp = str_replace(PHP_EOL, PHP_EOL . ' ', $tmp);
803                                                 $tmp = addcslashes($tmp, ',;');
804                                                 $o .= 'SUMMARY:' . $tmp . PHP_EOL;
805                                         }
806
807                                         if ($event['desc']) {
808                                                 $tmp = $event['desc'];
809                                                 $tmp = str_replace(PHP_EOL, PHP_EOL . ' ', $tmp);
810                                                 $tmp = addcslashes($tmp, ',;');
811                                                 $o .= 'DESCRIPTION:' . $tmp . PHP_EOL;
812                                         }
813
814                                         if ($event['location']) {
815                                                 $tmp = $event['location'];
816                                                 $tmp = str_replace(PHP_EOL, PHP_EOL . ' ', $tmp);
817                                                 $tmp = addcslashes($tmp, ',;');
818                                                 $o .= 'LOCATION:' . $tmp . PHP_EOL;
819                                         }
820
821                                         $o .= 'END:VEVENT' . PHP_EOL;
822                                 }
823
824                                 $o .= 'END:VCALENDAR' . PHP_EOL;
825                                 break;
826                 }
827
828                 return $o;
829         }
830
831         /**
832          * Get all events for a user ID.
833          *
834          *    The query for events is done permission sensitive.
835          *    If the user is the owner of the calendar they
836          *    will get all of their available events.
837          *    If the user is only a visitor only the public events will
838          *    be available.
839          *
840          * @param int $uid The user ID.
841          *
842          * @return array Query results.
843          * @throws \Exception
844          */
845         private static function getListByUserId(int $uid = 0): array
846         {
847                 $return = [];
848
849                 if ($uid == 0) {
850                         return $return;
851                 }
852
853                 $fields = ['id', 'created', 'start', 'finish', 'summary', 'desc', 'location', 'nofinish'];
854
855                 $conditions = ['uid' => $uid, 'cid' => 0];
856
857                 // Does the user who requests happen to be the owner of the events
858                 // requested? then show all of your events, otherwise only those that
859                 // don't have limitations set in allow_cid and allow_gid.
860                 if (DI::userSession()->getLocalUserId() != $uid) {
861                         $conditions += ['allow_cid' => '', 'allow_gid' => ''];
862                 }
863
864                 $events = DBA::select('event', $fields, $conditions);
865                 if (DBA::isResult($events)) {
866                         $return = DBA::toArray($events);
867                 }
868
869                 return $return;
870         }
871
872         /**
873          *
874          * @param int    $uid    The user ID.
875          * @param string $format Output format (ical/csv).
876          * @return array With the results:
877          *                       bool 'success' => True if the processing was successful,<br>
878          *                       string 'format' => The output format,<br>
879          *                       string 'extension' => The file extension of the output format,<br>
880          *                       string 'content' => The formatted output content.<br>
881          *
882          * @throws \Exception
883          * @todo Respect authenticated users with events_by_uid().
884          */
885         public static function exportListByUserId(int $uid, string $format = 'ical'): array
886         {
887                 $process = false;
888
889                 // Get all events which are owned by a uid (respects permissions).
890                 $events = self::getListByUserId($uid);
891
892                 // We have the events that are available for the requestor.
893                 // Now format the output according to the requested format.
894                 $res = self::formatListForExport($events, $format);
895
896                 // If there are results the precess was successful.
897                 if (!empty($res)) {
898                         $process = true;
899                 }
900
901                 // Get the file extension for the format.
902                 switch ($format) {
903                         case "ical":
904                                 $file_ext = "ics";
905                                 break;
906
907                         case "csv":
908                                 $file_ext = "csv";
909                                 break;
910
911                         default:
912                                 $file_ext = "";
913                 }
914
915                 $return = [
916                         'success'   => $process,
917                         'format'    => $format,
918                         'extension' => $file_ext,
919                         'content'   => $res,
920                 ];
921
922                 return $return;
923         }
924
925         /**
926          * Format an item array with event data to HTML.
927          *
928          * @param array $item Array with item and event data.
929          * @return string HTML output.
930          * @throws \Friendica\Network\HTTPException\InternalServerErrorException
931          * @throws \ImagickException
932          */
933         public static function getItemHTML(array $item): string
934         {
935                 $same_date = false;
936                 $finish    = false;
937
938                 // Set the different time formats.
939                 $dformat       = DI::l10n()->t('l F d, Y \@ g:i A'); // Friday January 18, 2011 @ 8:01 AM.
940                 $dformat_short = DI::l10n()->t('D g:i A'); // Fri 8:01 AM.
941                 $tformat       = DI::l10n()->t('g:i A'); // 8:01 AM.
942
943                 // Convert the time to different formats.
944                 $dtstart_dt = DI::l10n()->getDay(DateTimeFormat::local($item['event-start'], $dformat));
945                 $dtstart_title = DateTimeFormat::utc($item['event-start'], DateTimeFormat::ATOM);
946                 // Format: Jan till Dec.
947                 $month_short = DI::l10n()->getDayShort(DateTimeFormat::local($item['event-start'], 'M'));
948                 // Format: 1 till 31.
949                 $date_short = DateTimeFormat::local($item['event-start'], 'j');
950                 $start_time = DateTimeFormat::local($item['event-start'], $tformat);
951                 $start_short = DI::l10n()->getDayShort(DateTimeFormat::local($item['event-start'], $dformat_short));
952
953                 // If the option 'nofinisch' isn't set, we need to format the finish date/time.
954                 if (!$item['event-nofinish']) {
955                         $finish = true;
956                         $dtend_dt  = DI::l10n()->getDay(DateTimeFormat::local($item['event-finish'], $dformat));
957                         $dtend_title = DateTimeFormat::utc($item['event-finish'], DateTimeFormat::ATOM);
958                         $end_short = DI::l10n()->getDayShort(DateTimeFormat::utc($item['event-finish'], $dformat_short));
959                         $end_time = DateTimeFormat::local($item['event-finish'], $tformat);
960                         // Check if start and finish time is at the same day.
961                         if (substr($dtstart_title, 0, 10) === substr($dtend_title, 0, 10)) {
962                                 $same_date = true;
963                         }
964                 } else {
965                         $dtend_title = '';
966                         $dtend_dt = '';
967                         $end_time = '';
968                         $end_short = '';
969                 }
970
971                 // Format the event location.
972                 $location = self::locationToArray($item['event-location']);
973
974                 // Construct the profile link (magic-auth).
975                 $author = ['uid' => 0, 'id' => $item['author-id'],
976                                 'network' => $item['author-network'], 'url' => $item['author-link']];
977                 $profile_link = Contact::magicLinkByContact($author);
978
979                 $tpl = Renderer::getMarkupTemplate('event_stream_item.tpl');
980                 $return = Renderer::replaceMacros($tpl, [
981                         '$id'             => $item['event-id'],
982                         '$title'          => BBCode::convertForUriId($item['uri-id'], $item['event-summary']),
983                         '$dtstart_label'  => DI::l10n()->t('Starts:'),
984                         '$dtstart_title'  => $dtstart_title,
985                         '$dtstart_dt'     => $dtstart_dt,
986                         '$finish'         => $finish,
987                         '$dtend_label'    => DI::l10n()->t('Finishes:'),
988                         '$dtend_title'    => $dtend_title,
989                         '$dtend_dt'       => $dtend_dt,
990                         '$month_short'    => $month_short,
991                         '$date_short'     => $date_short,
992                         '$same_date'      => $same_date,
993                         '$start_time'     => $start_time,
994                         '$start_short'    => $start_short,
995                         '$end_time'       => $end_time,
996                         '$end_short'      => $end_short,
997                         '$author_name'    => $item['author-name'],
998                         '$author_link'    => $profile_link,
999                         '$author_avatar'  => $item['author-avatar'],
1000                         '$description'    => BBCode::convertForUriId($item['uri-id'], $item['event-desc']),
1001                         '$location_label' => DI::l10n()->t('Location:'),
1002                         '$show_map_label' => DI::l10n()->t('Show map'),
1003                         '$hide_map_label' => DI::l10n()->t('Hide map'),
1004                         '$map_btn_label'  => DI::l10n()->t('Show map'),
1005                         '$location'       => $location
1006                 ]);
1007
1008                 return $return;
1009         }
1010
1011         /**
1012          * Format a string with map bbcode to an array with location data.
1013          *
1014          * Note: The string must only contain location data. A string with no bbcode will be
1015          * handled as location name.
1016          *
1017          * @param string $s The string with the bbcode formatted location data.
1018          *
1019          * @return array The array with the location data.
1020          *  'name' => The name of the location,<br>
1021          * 'address' => The address of the location,<br>
1022          * 'coordinates' => Latitude and longitude (e.g. '48.864716,2.349014').<br>
1023          * @throws \Friendica\Network\HTTPException\InternalServerErrorException
1024          */
1025         private static function locationToArray(string $s = ''): array
1026         {
1027                 if ($s == '') {
1028                         return [];
1029                 }
1030
1031                 $location = ['name' => $s];
1032
1033                 // Map tag with location name - e.g. [map]Paris[/map].
1034                 if (strpos($s, '[/map]') !== false) {
1035                         $found = preg_match("/\[map\](.*?)\[\/map\]/ism", $s, $match);
1036                         if (intval($found) > 0 && array_key_exists(1, $match)) {
1037                                 $location['address'] =  $match[1];
1038                                 // Remove the map bbcode from the location name.
1039                                 $location['name'] = str_replace($match[0], "", $s);
1040                         }
1041                 // Map tag with coordinates - e.g. [map=48.864716,2.349014].
1042                 } elseif (strpos($s, '[map=') !== false) {
1043                         $found = preg_match("/\[map=(.*?)\]/ism", $s, $match);
1044                         if (intval($found) > 0 && array_key_exists(1, $match)) {
1045                                 $location['coordinates'] =  $match[1];
1046                                 // Remove the map bbcode from the location name.
1047                                 $location['name'] = str_replace($match[0], "", $s);
1048                         }
1049                 }
1050
1051                 $location['name'] = BBCode::convert($location['name']);
1052
1053                 // Construct the map HTML.
1054                 if (isset($location['address'])) {
1055                         $location['map'] = '<div class="map">' . Map::byLocation($location['address']) . '</div>';
1056                 } elseif (isset($location['coordinates'])) {
1057                         $location['map'] = '<div class="map">' . Map::byCoordinates(str_replace('/', ' ', $location['coordinates'])) . '</div>';
1058                 }
1059
1060                 return $location;
1061         }
1062
1063         /**
1064          * Add new birthday event for this person
1065          *
1066          * @param array  $contact  Contact array, expects: id, uid, url, name
1067          * @param string $birthday Birthday of the contact
1068          * @return bool
1069          * @throws \Exception
1070          */
1071         public static function createBirthday(array $contact, string $birthday): bool
1072         {
1073                 // Check for duplicates
1074                 $condition = [
1075                         'uid' => $contact['uid'],
1076                         'cid' => $contact['id'],
1077                         'start' => DateTimeFormat::utc($birthday),
1078                         'type' => 'birthday'
1079                 ];
1080                 if (DBA::exists('event', $condition)) {
1081                         return false;
1082                 }
1083
1084                 /*
1085                  * Add new birthday event for this person
1086                  *
1087                  * summary is just a readable placeholder in case the event is shared
1088                  * with others. We will replace it during presentation to our $importer
1089                  * to contain a sparkle link and perhaps a photo.
1090                  */
1091                 $values = [
1092                         'uid'     => $contact['uid'],
1093                         'cid'     => $contact['id'],
1094                         'start'   => DateTimeFormat::utc($birthday),
1095                         'finish'  => DateTimeFormat::utc($birthday . ' + 1 day '),
1096                         'summary' => DI::l10n()->t('%s\'s birthday', $contact['name']),
1097                         'desc'    => DI::l10n()->t('Happy Birthday %s', ' [url=' . $contact['url'] . ']' . $contact['name'] . '[/url]'),
1098                         'type'    => 'birthday',
1099                 ];
1100
1101                 // Check if self::store() was success
1102                 return (self::store($values) > 0);
1103         }
1104
1105         public static function setIgnore(int $uid, int $eventId, bool $ignore = true)
1106         {
1107                 DBA::update('event', ['ignore' => $ignore], ['id' => $eventId, 'uid' => $uid]);
1108         }
1109 }