X-Git-Url: https://git.mxchange.org/?a=blobdiff_plain;f=mod%2Fcal.php;h=b55e078d83404981f34d2c19436946595e7d3cc8;hb=f2d917114f949b3f76c04f99247092a16b1e3e9e;hp=312489ef72983d7284a9de2cbd45936fbcff52f3;hpb=5640c42469b8ec1c5731b599b0dc9d9a0e762ce6;p=friendica.git

diff --git a/mod/cal.php b/mod/cal.php
index 312489ef72..9e32b87d6f 100644
--- a/mod/cal.php
+++ b/mod/cal.php
@@ -1,337 +1,309 @@
 <?php
 /**
  * @file mod/cal.php
- * @brief The calendar module
- *	This calendar is for profile visitors and contains only the events
- *	of the profile owner
+ * 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\PConfig;
-use Friendica\Core\System;
-use Friendica\Database\DBM;
+use Friendica\Content\Nav;
+use Friendica\Content\Widget;
+use Friendica\Core\Renderer;
+use Friendica\Core\Session;
+use Friendica\Database\DBA;
+use Friendica\DI;
 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;
+use Friendica\Model\Event;
+use Friendica\Model\Item;
+use Friendica\Model\Profile;
+use Friendica\Module\BaseProfile;
+use Friendica\Util\DateTimeFormat;
+use Friendica\Util\Temporal;
+
+function cal_init(App $a)
+{
+	if (DI::config()->get('system', 'block_public') && !Session::isAuthenticated()) {
+		throw new \Friendica\Network\HTTPException\ForbiddenException(DI::l10n()->t('Access denied.'));
 	}
 
-	nav_set_selected('events');
-
-	$o = '';
-
-	if($a->argc > 1) {
-		$nick = $a->argv[1];
-		$user = q("SELECT * FROM `user` WHERE `nickname` = '%s' AND `blocked` = 0 LIMIT 1",
-			dbesc($nick)
-		);
+	if ($a->argc < 2) {
+		throw new \Friendica\Network\HTTPException\ForbiddenException(DI::l10n()->t('Access denied.'));
+	}
 
-		if(! count($user))
-			return;
+	Nav::setSelected('events');
 
-		$a->data['user'] = $user[0];
-		$a->profile_uid = $user[0]['uid'];
+	$nick = $a->argv[1];
+	$user = DBA::selectFirst('user', [], ['nickname' => $nick, 'blocked' => false]);
+	if (!DBA::isResult($user)) {
+		throw new \Friendica\Network\HTTPException\NotFoundException();
+	}
 
-		// if it's a json request abort here becaus we don't
-		// need the widget data
-		if ($a->argv[2] === 'json')
-			return;
+	$a->data['user'] = $user;
+	$a->profile_uid = $user['uid'];
 
-		$profile = get_profiledata_by_nick($nick, $a->profile_uid);
+	// if it's a json request abort here becaus we don't
+	// need the widget data
+	if (!empty($a->argv[2]) && ($a->argv[2] === 'json')) {
+		return;
+	}
 
-		$account_type = Contact::getAccountType($profile);
+	$profile = Profile::getByNickname($nick, $a->profile_uid);
 
-		$tpl = get_markup_template("vcard-widget.tpl");
+	$account_type = Contact::getAccountType($profile);
 
-		$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'] : ""),
-		));
+	$tpl = Renderer::getMarkupTemplate("widget/vcard.tpl");
 
-		$cal_widget = widget_events();
+	$vcard_widget = Renderer::replaceMacros($tpl, [
+		'$name' => $profile['name'],
+		'$photo' => $profile['photo'],
+		'$addr' => (($profile['addr'] != "") ? $profile['addr'] : ""),
+		'$account_type' => $account_type,
+		'$pdesc' => (($profile['pdesc'] != "") ? $profile['pdesc'] : ""),
+	]);
 
-		if(! x($a->page,'aside'))
-			$a->page['aside'] = '';
+	$cal_widget = Widget\CalendarExport::getHTML();
 
-		$a->page['aside'] .= $vcard_widget;
-		$a->page['aside'] .= $cal_widget;
+	if (empty(DI::page()['aside'])) {
+		DI::page()['aside'] = '';
 	}
 
+	DI::page()['aside'] .= $vcard_widget;
+	DI::page()['aside'] .= $cal_widget;
+
 	return;
 }
 
-function cal_content(App $a) {
-	nav_set_selected('events');
-
-	// First day of the week (0 = Sunday)
-	$firstDay = PConfig::get(local_user(),'system','first_day_of_week', 0);
+function cal_content(App $a)
+{
+	Nav::setSelected('events');
 
 	// get the translation strings for the callendar
-	$i18n = get_event_strings();
+	$i18n = Event::getStrings();
 
-	$htpl = get_markup_template('event_head.tpl');
-	$a->page['htmlhead'] .= replace_macros($htpl,array(
-		'$baseurl' => System::baseUrl(),
+	$htpl = Renderer::getMarkupTemplate('event_head.tpl');
+	DI::page()['htmlhead'] .= Renderer::replaceMacros($htpl, [
 		'$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(),
-	));
-
-	$o ="";
+	]);
 
 	$mode = 'view';
 	$y = 0;
 	$m = 0;
-	$ignored = ((x($_REQUEST,'ignored')) ? intval($_REQUEST['ignored']) : 0);
+	$ignored = (!empty($_REQUEST['ignored']) ? intval($_REQUEST['ignored']) : 0);
 
-	if($a->argc == 4) {
-		if($a->argv[2] == 'export') {
-			$mode = 'export';
-			$format = $a->argv[3];
-		}
+	$format = 'ical';
+	if ($a->argc == 4 && $a->argv[2] == 'export') {
+		$mode = 'export';
+		$format = $a->argv[3];
 	}
 
-	//
 	// Setup permissions structures
-	//
+	$owner_uid = intval($a->data['user']['uid']);
+	$nick = $a->data['user']['nickname'];
 
-	$contact = null;
-	$remote_contact = false;
-	$contact_id = 0;
+	$contact_id = Session::getRemoteContactID($a->profile['uid']);
 
-	$owner_uid = $a->data['user']['uid'];
-	$nick = $a->data['user']['nickname'];
+	$remote_contact = $contact_id && DBA::exists('contact', ['id' => $contact_id, 'uid' => $a->profile['uid']]);
 
-	if(is_array($_SESSION['remote'])) {
-		foreach($_SESSION['remote'] as $v) {
-			if($v['uid'] == $a->profile['profile_uid']) {
-				$contact_id = $v['cid'];
-				break;
-			}
-		}
-	}
-	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)) {
-			$contact = $r[0];
-			$remote_contact = true;
-		}
-	}
-	if(! $remote_contact) {
-		if(local_user()) {
-			$contact_id = $_SESSION['cid'];
-			$contact = $a->contact;
-		}
-	}
-	$is_owner = ((local_user()) && (local_user() == $a->profile['profile_uid']) ? true : false);
+	$is_owner = local_user() == $a->profile['uid'];
 
-	if($a->profile['hidewall'] && (! $is_owner) && (! $remote_contact)) {
-		notice( t('Access to this profile has been restricted.') . EOL);
+	if ($a->profile['hidewall'] && !$is_owner && !$remote_contact) {
+		notice(DI::l10n()->t('Access to this profile has been restricted.') . EOL);
 		return;
 	}
 
 	// get the permissions
-	$sql_perms = item_permissions_sql($owner_uid,$remote_contact,$groups);
+	$sql_perms = Item::getPermissionsSQLByUserId($owner_uid);
 	// 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']);
+	$tabs = BaseProfile::getTabsHTML($a, 'cal', 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)
+	if ($mode == 'view') {
+		$thisyear = DateTimeFormat::localNow('Y');
+		$thismonth = DateTimeFormat::localNow('m');
+		if (!$y) {
 			$y = intval($thisyear);
-		if(! $m)
+		}
+
+		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)
+		if ($y < 1901) {
 			$y = 1900;
-		if($y > 2099)
+		}
+
+		if ($y > 2099) {
 			$y = 2100;
+		}
 
 		$nextyear = $y;
 		$nextmonth = $m + 1;
-		if($nextmonth > 12) {
-				$nextmonth = 1;
+		if ($nextmonth > 12) {
+			$nextmonth = 1;
 			$nextyear ++;
 		}
 
 		$prevyear = $y;
-		if($m > 1)
+		if ($m > 1) {
 			$prevmonth = $m - 1;
-		else {
+		} 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);
+		$dim = Temporal::getDaysInMonth($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'];
+		if (!empty($a->argv[2]) && ($a->argv[2] === 'json')) {
+			if (!empty($_GET['start'])) {
+				$start = $_GET['start'];
+			}
+
+			if (!empty($_GET['end'])) {
+				$finish = $_GET['end'];
+			}
 		}
 
-		$start  = datetime_convert('UTC','UTC',$start);
-		$finish = datetime_convert('UTC','UTC',$finish);
+		$start = DateTimeFormat::utc($start);
+		$finish = DateTimeFormat::utc($finish);
 
-		$adjust_start = datetime_convert('UTC', date_default_timezone_get(), $start);
-		$adjust_finish = datetime_convert('UTC', date_default_timezone_get(), $finish);
+		$adjust_start = DateTimeFormat::local($start);
+		$adjust_finish = DateTimeFormat::local($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,
+		$event_params = [
+			'event_id'      => intval($_GET['id'] ?? 0),
+			'start'         => $start,
+			'finish'        => $finish,
+			'adjust_start'  => $adjust_start,
 			'adjust_finish' => $adjust_finish,
-			'ignored' => $ignored,
-		);
+			'ignore'        => $ignored,
+		];
 
 		// get events by id or by date
-		if (x($_GET,'id')){
-			$r = event_by_id($owner_uid, $event_params, $sql_extra);
+		if ($event_params['event_id']) {
+			$r = Event::getListById($owner_uid, $event_params['event_id'], $sql_extra);
 		} else {
-			$r = events_by_date($owner_uid, $event_params, $sql_extra);
+			$r = Event::getListByDate($owner_uid, $event_params, $sql_extra);
 		}
 
-		$links = array();
+		$links = [];
 
-		if (DBM::is_result($r)) {
-			$r = sort_by_date($r);
+		if (DBA::isResult($r)) {
+			$r = Event::sortByDate($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;
+				$j = $rr['adjust'] ? DateTimeFormat::local($rr['start'], 'j') : DateTimeFormat::utc($rr['start'], 'j');
+				if (empty($links[$j])) {
+					$links[$j] = DI::baseUrl() . '/' . DI::args()->getCommand() . '#link-' . $j;
 				}
 			}
 		}
 
-
-		$events=array();
-
 		// transform the event in a usable array
-		if (DBM::is_result($r))
-			$r = sort_by_date($r);
-			$events = process_events($r);
+		$events = Event::prepareListForTemplate($r);
 
-		if ($a->argv[2] === 'json'){
-			echo json_encode($events); killme();
+		if (!empty($a->argv[2]) && ($a->argv[2] === 'json')) {
+			echo json_encode($events);
+			exit();
 		}
 
 		// links: array('href', 'text', 'extra css classes', 'title')
-		if (x($_GET,'id')){
-			$tpl =  get_markup_template("event.tpl");
+		if (!empty($_GET['id'])) {
+			$tpl = Renderer::getMarkupTemplate("event.tpl");
 		} else {
-//			if (Config::get('experimentals','new_calendar')==1){
-				$tpl = get_markup_template("events_js.tpl");
+//			if (DI::config()->get('experimentals','new_calendar')==1){
+			$tpl = Renderer::getMarkupTemplate("events_js.tpl");
 //			} else {
-//				$tpl = get_markup_template("events.tpl");
+//				$tpl = Renderer::getMarkupTemplate("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);
+		foreach ($events as $key => $event) {
+			$event_item = [];
+			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(); }
+		$o = Renderer::replaceMacros($tpl, [
+			'$tabs' => $tabs,
+			'$title' => DI::l10n()->t('Events'),
+			'$view' => DI::l10n()->t('View'),
+			'$previous' => [DI::baseUrl() . "/events/$prevyear/$prevmonth", DI::l10n()->t('Previous'), '', ''],
+			'$next' => [DI::baseUrl() . "/events/$nextyear/$nextmonth", DI::l10n()->t('Next'), '', ''],
+			'$calendar' => Temporal::getCalendarTable($y, $m, $links, ' eventcal'),
+			'$events' => $events,
+			"today" => DI::l10n()->t("today"),
+			"month" => DI::l10n()->t("month"),
+			"week" => DI::l10n()->t("week"),
+			"day" => DI::l10n()->t("day"),
+			"list" => DI::l10n()->t("list"),
+		]);
+
+		if (!empty($_GET['id'])) {
+			echo $o;
+			exit();
+		}
 
 		return $o;
 	}
 
-	if($mode == 'export') {
-		if(! (intval($owner_uid))) {
-			notice( t('User not found'));
+	if ($mode == 'export') {
+		if (!$owner_uid) {
+			notice(DI::l10n()->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);
+		if ((local_user() !== $owner_uid) && !Feature::isEnabled($owner_uid, "export_calendar")) {
+			notice(DI::l10n()->t('Permission denied.') . EOL);
+			DI::baseUrl()->redirect('cal/' . $nick);
 		}
 
 		// Get the export data by uid
-		$evexport = event_export($owner_uid, $format);
+		$evexport = Event::exportListByUserId($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 ($evexport["content"]) {
+				notice(DI::l10n()->t('This calendar format is not supported'));
+			} else {
+				notice(DI::l10n()->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))
+			if (local_user() === $owner_uid) {
 				$return_path = "events";
-			else
-				$returnpath = "cal/".$nick;
+			} else {
+				$return_path = "cal/" . $nick;
+			}
 
-			goaway($return_path);
+			DI::baseUrl()->redirect($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"] . '"' );
+			header('content-disposition: attachment; filename="' . DI::l10n()->t('calendar') . '-' . $nick . '.' . $evexport["extension"] . '"');
 			echo $evexport["content"];
-			killme();
+			exit();
 		}
 
 		return;