<?php /** * @file mod/cal.php * @brief The calendar module * This calendar is for profile visitors and contains only the events * of the profile owner */ use Friendica\App; use Friendica\Content\Feature; use Friendica\Core\Config; use Friendica\Core\System; use Friendica\Database\DBM; use Friendica\Model\Contact; use Friendica\Model\Group; require_once 'include/event.php'; require_once 'include/redir.php'; function cal_init(App $a) { if ($a->argc > 1) { auto_redir($a, $a->argv[1]); } if ((Config::get('system', 'block_public')) && (!local_user()) && (!remote_user())) { return; } nav_set_selected('events'); if ($a->argc > 1) { $nick = $a->argv[1]; $user = dba::selectFirst('user', [], ['nickname' => $nick, 'blocked' => false]); if (!DBM::is_result($user)) { return; } $a->data['user'] = $user; $a->profile_uid = $user['uid']; // if it's a json request abort here becaus we don't // need the widget data if ($a->argv[2] === 'json') { return; } $profile = get_profiledata_by_nick($nick, $a->profile_uid); $account_type = Contact::getAccountType($profile); $tpl = get_markup_template("vcard-widget.tpl"); $vcard_widget = replace_macros($tpl, array( '$name' => $profile['name'], '$photo' => $profile['photo'], '$addr' => (($profile['addr'] != "") ? $profile['addr'] : ""), '$account_type' => $account_type, '$pdesc' => (($profile['pdesc'] != "") ? $profile['pdesc'] : ""), )); $cal_widget = widget_events(); if (!x($a->page, 'aside')) { $a->page['aside'] = ''; } $a->page['aside'] .= $vcard_widget; $a->page['aside'] .= $cal_widget; } return; } function cal_content(App $a) { nav_set_selected('events'); // get the translation strings for the callendar $i18n = get_event_strings(); $htpl = get_markup_template('event_head.tpl'); $a->page['htmlhead'] .= replace_macros($htpl, array( '$baseurl' => System::baseUrl(), '$module_url' => '/cal/' . $a->data['user']['nickname'], '$modparams' => 2, '$i18n' => $i18n, )); $etpl = get_markup_template('event_end.tpl'); $a->page['end'] .= replace_macros($etpl, array( '$baseurl' => System::baseUrl(), )); $mode = 'view'; $y = 0; $m = 0; $ignored = ((x($_REQUEST, 'ignored')) ? intval($_REQUEST['ignored']) : 0); $format = 'ical'; if ($a->argc == 4 && $a->argv[2] == 'export') { $mode = 'export'; $format = $a->argv[3]; } // Setup permissions structures $remote_contact = false; $contact_id = 0; $owner_uid = $a->data['user']['uid']; $nick = $a->data['user']['nickname']; if (x($_SESSION, 'remote') && is_array($_SESSION['remote'])) { foreach ($_SESSION['remote'] as $v) { if ($v['uid'] == $a->profile['profile_uid']) { $contact_id = $v['cid']; break; } } } $groups = []; if ($contact_id) { $groups = Group::getIdsByContactId($contact_id); $r = q("SELECT * FROM `contact` WHERE `id` = %d AND `uid` = %d LIMIT 1", intval($contact_id), intval($a->profile['profile_uid']) ); if (DBM::is_result($r)) { $remote_contact = true; } } $is_owner = local_user() == $a->profile['profile_uid']; if ($a->profile['hidewall'] && (!$is_owner) && (!$remote_contact)) { notice(t('Access to this profile has been restricted.') . EOL); return; } // get the permissions $sql_perms = item_permissions_sql($owner_uid, $remote_contact, $groups); // we only want to have the events of the profile owner $sql_extra = " AND `event`.`cid` = 0 " . $sql_perms; // get the tab navigation bar $tabs = profile_tabs($a, false, $a->data['user']['nickname']); // The view mode part is similiar to /mod/events.php if ($mode == 'view') { $thisyear = datetime_convert('UTC', date_default_timezone_get(), 'now', 'Y'); $thismonth = datetime_convert('UTC', date_default_timezone_get(), 'now', 'm'); if (!$y) { $y = intval($thisyear); } if (!$m) { $m = intval($thismonth); } // Put some limits on dates. The PHP date functions don't seem to do so well before 1900. // An upper limit was chosen to keep search engines from exploring links millions of years in the future. if ($y < 1901) { $y = 1900; } if ($y > 2099) { $y = 2100; } $nextyear = $y; $nextmonth = $m + 1; if ($nextmonth > 12) { $nextmonth = 1; $nextyear ++; } $prevyear = $y; if ($m > 1) { $prevmonth = $m - 1; } else { $prevmonth = 12; $prevyear --; } $dim = get_dim($y, $m); $start = sprintf('%d-%d-%d %d:%d:%d', $y, $m, 1, 0, 0, 0); $finish = sprintf('%d-%d-%d %d:%d:%d', $y, $m, $dim, 23, 59, 59); if ($a->argv[2] === 'json') { if (x($_GET, 'start')) { $start = $_GET['start']; } if (x($_GET, 'end')) { $finish = $_GET['end']; } } $start = datetime_convert('UTC', 'UTC', $start); $finish = datetime_convert('UTC', 'UTC', $finish); $adjust_start = datetime_convert('UTC', date_default_timezone_get(), $start); $adjust_finish = datetime_convert('UTC', date_default_timezone_get(), $finish); // put the event parametes in an array so we can better transmit them $event_params = array( 'event_id' => (x($_GET, 'id') ? $_GET["id"] : 0), 'start' => $start, 'finish' => $finish, 'adjust_start' => $adjust_start, 'adjust_finish' => $adjust_finish, 'ignored' => $ignored, ); // get events by id or by date if (x($_GET, 'id')) { $r = event_by_id($owner_uid, $event_params, $sql_extra); } else { $r = events_by_date($owner_uid, $event_params, $sql_extra); } $links = array(); if (DBM::is_result($r)) { $r = sort_by_date($r); foreach ($r as $rr) { $j = (($rr['adjust']) ? datetime_convert('UTC', date_default_timezone_get(), $rr['start'], 'j') : datetime_convert('UTC', 'UTC', $rr['start'], 'j')); if (!x($links, $j)) { $links[$j] = System::baseUrl() . '/' . $a->cmd . '#link-' . $j; } } } // transform the event in a usable array $events = process_events($r); if ($a->argv[2] === 'json') { echo json_encode($events); killme(); } // links: array('href', 'text', 'extra css classes', 'title') if (x($_GET, 'id')) { $tpl = get_markup_template("event.tpl"); } else { // if (Config::get('experimentals','new_calendar')==1){ $tpl = get_markup_template("events_js.tpl"); // } else { // $tpl = get_markup_template("events.tpl"); // } } // Get rid of dashes in key names, Smarty3 can't handle them foreach ($events as $key => $event) { $event_item = array(); foreach ($event['item'] as $k => $v) { $k = str_replace('-', '_', $k); $event_item[$k] = $v; } $events[$key]['item'] = $event_item; } $o = replace_macros($tpl, array( '$baseurl' => System::baseUrl(), '$tabs' => $tabs, '$title' => t('Events'), '$view' => t('View'), '$previous' => array(System::baseUrl() . "/events/$prevyear/$prevmonth", t('Previous'), '', ''), '$next' => array(System::baseUrl() . "/events/$nextyear/$nextmonth", t('Next'), '', ''), '$calendar' => cal($y, $m, $links, ' eventcal'), '$events' => $events, "today" => t("today"), "month" => t("month"), "week" => t("week"), "day" => t("day"), "list" => t("list"), )); if (x($_GET, 'id')) { echo $o; killme(); } return $o; } if ($mode == 'export') { if (!(intval($owner_uid))) { notice(t('User not found')); return; } // Test permissions // Respect the export feature setting for all other /cal pages if it's not the own profile if (((local_user() !== intval($owner_uid))) && !Feature::isEnabled($owner_uid, "export_calendar")) { notice(t('Permission denied.') . EOL); goaway('cal/' . $nick); } // Get the export data by uid $evexport = event_export($owner_uid, $format); if (!$evexport["success"]) { if ($evexport["content"]) { notice(t('This calendar format is not supported')); } else { notice(t('No exportable data found')); } // If it the own calendar return to the events page // otherwise to the profile calendar page if (local_user() === intval($owner_uid)) { $return_path = "events"; } else { $return_path = "cal/" . $nick; } goaway($return_path); } // If nothing went wrong we can echo the export content if ($evexport["success"]) { header('Content-type: text/calendar'); header('content-disposition: attachment; filename="' . t('calendar') . '-' . $nick . '.' . $evexport["extension"] . '"'); echo $evexport["content"]; killme(); } return; } }