X-Git-Url: https://git.mxchange.org/?a=blobdiff_plain;f=include%2Fidentity.php;h=31c17ef21cc2e2fde24137fd77e938540e7600b7;hb=b92fc24ff06681f445edff0d45f8f81a7e25ebe6;hp=8138e9b046871ac8f757082db961201f968c805a;hpb=291906de5f3074407253241e5ccbb5af633e0c22;p=friendica.git

diff --git a/include/identity.php b/include/identity.php
index 8138e9b046..31c17ef21c 100644
--- a/include/identity.php
+++ b/include/identity.php
@@ -3,10 +3,18 @@
  * @file include/identity.php
  */
 
-require_once('include/ForumManager.php');
-require_once('include/bbcode.php');
-require_once("mod/proxy.php");
-require_once('include/cache.php');
+use Friendica\App;
+use Friendica\Core\Cache;
+use Friendica\Core\Config;
+use Friendica\Core\PConfig;
+use Friendica\Core\System;
+use Friendica\Core\Worker;
+use Friendica\Database\DBM;
+use Friendica\Object\Contact;
+
+require_once 'include/ForumManager.php';
+require_once 'include/bbcode.php';
+require_once 'mod/proxy.php';
 
 /**
  *
@@ -27,53 +35,56 @@ require_once('include/cache.php');
  *      the theme is chosen before the _init() function of a theme is run, which will usually
  *      load a lot of theme-specific content
  *
- * @param App $a
- * @param string $nickname
- * @param int $profile
- * @param array $profiledata
+ * @param object $a           App
+ * @param string $nickname    string
+ * @param int    $profile     int
+ * @param array  $profiledata array
  */
-function profile_load(App $a, $nickname, $profile = 0, $profiledata = array()) {
-
-	$user = q("SELECT `uid` FROM `user` WHERE `nickname` = '%s' LIMIT 1",
+function profile_load(App $a, $nickname, $profile = 0, $profiledata = array())
+{
+	$user = q(
+		"SELECT `uid` FROM `user` WHERE `nickname` = '%s' LIMIT 1",
 		dbesc($nickname)
 	);
 
-	if(!$user && count($user) && !count($profiledata)) {
+	if (!$user && count($user) && !count($profiledata)) {
 		logger('profile error: ' . $a->query_string, LOGGER_DEBUG);
-		notice( t('Requested account is not available.') . EOL );
+		notice(t('Requested account is not available.') . EOL);
 		$a->error = 404;
 		return;
 	}
 
 	$pdata = get_profiledata_by_nick($nickname, $user[0]['uid'], $profile);
 
-	if(($pdata === false) || (!count($pdata)) && !count($profiledata)) {
+	if (empty($pdata) && empty($profiledata)) {
 		logger('profile error: ' . $a->query_string, LOGGER_DEBUG);
-		notice( t('Requested profile is not available.') . EOL );
+		notice(t('Requested profile is not available.') . EOL);
 		$a->error = 404;
 		return;
 	}
 
 	// fetch user tags if this isn't the default profile
 
-	if(!$pdata['is-default']) {
-		$x = q("SELECT `pub_keywords` FROM `profile` WHERE `uid` = %d AND `is-default` = 1 LIMIT 1",
-				intval($pdata['profile_uid'])
+	if (!$pdata['is-default']) {
+		$x = q(
+			"SELECT `pub_keywords` FROM `profile` WHERE `uid` = %d AND `is-default` = 1 LIMIT 1",
+			intval($pdata['profile_uid'])
 		);
-		if($x && count($x))
+		if ($x && count($x))
 			$pdata['pub_keywords'] = $x[0]['pub_keywords'];
 	}
 
 	$a->profile = $pdata;
 	$a->profile_uid = $pdata['profile_uid'];
 
-	$a->profile['mobile-theme'] = get_pconfig($a->profile['profile_uid'], 'system', 'mobile_theme');
+	$a->profile['mobile-theme'] = PConfig::get($a->profile['profile_uid'], 'system', 'mobile_theme');
 	$a->profile['network'] = NETWORK_DFRN;
 
 	$a->page['title'] = $a->profile['name'] . " @ " . $a->config['sitename'];
 
-		if (!$profiledata  && !get_pconfig(local_user(),'system','always_my_theme'))
-			$_SESSION['theme'] = $a->profile['theme'];
+	if (!$profiledata  && !PConfig::get(local_user(), 'system', 'always_my_theme')) {
+		$_SESSION['theme'] = $a->profile['theme'];
+	}
 
 	$_SESSION['mobile-theme'] = $a->profile['mobile-theme'];
 
@@ -83,34 +94,39 @@ function profile_load(App $a, $nickname, $profile = 0, $profiledata = array()) {
 
 	$a->set_template_engine(); // reset the template engine to the default in case the user's theme doesn't specify one
 
-	$theme_info_file = "view/theme/".current_theme()."/theme.php";
-	if (file_exists($theme_info_file)){
-		require_once($theme_info_file);
+	$theme_info_file = "view/theme/" . current_theme() . "/theme.php";
+	if (file_exists($theme_info_file)) {
+		require_once $theme_info_file;
 	}
 
-	if(! (x($a->page,'aside')))
+	if (! (x($a->page, 'aside'))) {
 		$a->page['aside'] = '';
+	}
 
-	if(local_user() && local_user() == $a->profile['uid'] && $profiledata) {
-		$a->page['aside'] .= replace_macros(get_markup_template('profile_edlink.tpl'),array(
-			'$editprofile' => t('Edit profile'),
-			'$profid' => $a->profile['id']
-		));
+	if (local_user() && local_user() == $a->profile['uid'] && $profiledata) {
+		$a->page['aside'] .= replace_macros(
+			get_markup_template('profile_edlink.tpl'),
+			array(
+				'$editprofile' => t('Edit profile'),
+				'$profid' => $a->profile['id']
+			)
+		);
 	}
 
-	$block = (((get_config('system','block_public')) && (! local_user()) && (! remote_user())) ? true : false);
+	$block = (((Config::get('system', 'block_public')) && (! local_user()) && (! remote_user())) ? true : false);
 
 	/**
 	 * @todo
 	 * By now, the contact block isn't shown, when a different profile is given
 	 * But: When this profile was on the same server, then we could display the contacts
 	 */
-	if ($profiledata)
+	if ($profiledata) {
 		$a->page['aside'] .= profile_sidebar($profiledata, true);
-	else
+	} else {
 		$a->page['aside'] .= profile_sidebar($a->profile, $block);
+	}
 
-	/*if(! $block)
+	/*if (! $block)
 	 $a->page['aside'] .= contact_block();*/
 
 	return;
@@ -125,54 +141,58 @@ function profile_load(App $a, $nickname, $profile = 0, $profiledata = array()) {
  * Passing a non-zero profile ID can also allow a preview of a selected profile
  * by the owner
  *
- * @param string $nickname
- * @param int $uid
- * @param int $profile
- *	ID of the profile
+ * @param string $nickname nick
+ * @param int    $uid      uid
+ * @param int    $profile  ID of the profile
  * @returns array
  *	Includes all available profile data
  */
-function get_profiledata_by_nick($nickname, $uid = 0, $profile = 0) {
-	if(remote_user() && count($_SESSION['remote'])) {
-			foreach($_SESSION['remote'] as $visitor) {
-				if($visitor['uid'] == $uid) {
-					$r = q("SELECT `profile-id` FROM `contact` WHERE `id` = %d LIMIT 1",
-						intval($visitor['cid'])
-					);
-					if (dbm::is_result($r))
-						$profile = $r[0]['profile-id'];
-					break;
+function get_profiledata_by_nick($nickname, $uid = 0, $profile = 0)
+{
+	if (remote_user() && count($_SESSION['remote'])) {
+		foreach ($_SESSION['remote'] as $visitor) {
+			if ($visitor['uid'] == $uid) {
+				$r = dba::select('contact', array('profile-id'), array('id' => $visitor['cid']), array('limit' => 1));
+				if (DBM::is_result($r)) {
+					$profile = $r['profile-id'];
 				}
+				break;
 			}
 		}
+	}
 
 	$r = null;
 
-	if($profile) {
+	if ($profile) {
 		$profile_int = intval($profile);
-		$r = q("SELECT `contact`.`id` AS `contact_id`, `profile`.`uid` AS `profile_uid`, `profile`.*,
+		$r = dba::fetch_first(
+			"SELECT `contact`.`id` AS `contact_id`, `contact`.`photo` AS `contact_photo`,
+				`contact`.`thumb` AS `contact_thumb`, `contact`.`micro` AS `contact_micro`,
+				`profile`.`uid` AS `profile_uid`, `profile`.*,
 				`contact`.`avatar-date` AS picdate, `contact`.`addr`, `user`.*
 			FROM `profile`
 			INNER JOIN `contact` on `contact`.`uid` = `profile`.`uid` AND `contact`.`self`
 			INNER JOIN `user` ON `profile`.`uid` = `user`.`uid`
-			WHERE `user`.`nickname` = '%s' AND `profile`.`id` = %d LIMIT 1",
-				dbesc($nickname),
-				intval($profile_int)
+			WHERE `user`.`nickname` = ? AND `profile`.`id` = ? LIMIT 1",
+			$nickname,
+			$profile_int
 		);
 	}
-	if (!dbm::is_result($r)) {
-		$r = q("SELECT `contact`.`id` AS `contact_id`, `profile`.`uid` AS `profile_uid`, `profile`.*,
+	if (!DBM::is_result($r)) {
+		$r = dba::fetch_first(
+			"SELECT `contact`.`id` AS `contact_id`, `contact`.`photo` as `contact_photo`,
+				`contact`.`thumb` AS `contact_thumb`, `contact`.`micro` AS `contact_micro`,
+				`profile`.`uid` AS `profile_uid`, `profile`.*,
 				`contact`.`avatar-date` AS picdate, `contact`.`addr`, `user`.*
 			FROM `profile`
 			INNER JOIN `contact` ON `contact`.`uid` = `profile`.`uid` AND `contact`.`self`
 			INNER JOIN `user` ON `profile`.`uid` = `user`.`uid`
-			WHERE `user`.`nickname` = '%s' AND `profile`.`is-default` LIMIT 1",
-				dbesc($nickname)
+			WHERE `user`.`nickname` = ? AND `profile`.`is-default` LIMIT 1",
+			$nickname
 		);
 	}
 
-	return $r[0];
-
+	return $r;
 }
 
 
@@ -194,34 +214,40 @@ function get_profiledata_by_nick($nickname, $uid = 0, $profile = 0) {
  * @hooks 'profile_sidebar'
  *      array $arr
  */
-function profile_sidebar($profile, $block = 0) {
+function profile_sidebar($profile, $block = 0)
+{
 	$a = get_app();
 
 	$o = '';
 	$location = false;
 	$address = false;
-//		$pdesc = true;
+	// $pdesc = true;
+
+	// This function can also use contact information in $profile
+	$is_contact = x($profile, 'cid');
 
-	if((! is_array($profile)) && (! count($profile)))
+	if ((! is_array($profile)) && (! count($profile))) {
 		return $o;
+	}
 
 	$profile['picdate'] = urlencode($profile['picdate']);
 
-	if (($profile['network'] != "") AND ($profile['network'] != NETWORK_DFRN)) {
-		$profile['network_name'] = format_network_name($profile['network'],$profile['url']);
-	} else
+	if (($profile['network'] != "") && ($profile['network'] != NETWORK_DFRN)) {
+		$profile['network_name'] = format_network_name($profile['network'], $profile['url']);
+	} else {
 		$profile['network_name'] = "";
+	}
 
 	call_hooks('profile_sidebar_enter', $profile);
 
 
 	// don't show connect link to yourself
-	$connect = (($profile['uid'] != local_user()) ? t('Connect')  : False);
+	$connect = (($profile['uid'] != local_user()) ? t('Connect')  : false);
 
 	// don't show connect link to authenticated visitors either
-	if(remote_user() && count($_SESSION['remote'])) {
-		foreach($_SESSION['remote'] as $visitor) {
-			if($visitor['uid'] == $profile['uid']) {
+	if (remote_user() && count($_SESSION['remote'])) {
+		foreach ($_SESSION['remote'] as $visitor) {
+			if ($visitor['uid'] == $profile['uid']) {
 				$connect = false;
 				break;
 			}
@@ -229,46 +255,48 @@ function profile_sidebar($profile, $block = 0) {
 	}
 
 	// Is the local user already connected to that user?
-	if ($connect AND local_user()) {
+	if ($connect && local_user()) {
 		if (isset($profile["url"])) {
 			$profile_url = normalise_link($profile["url"]);
 		} else {
-			$profile_url = normalise_link(App::get_baseurl()."/profile/".$profile["nickname"]);
+			$profile_url = normalise_link(System::baseUrl()."/profile/".$profile["nickname"]);
 		}
 
-		$r = q("SELECT * FROM `contact` WHERE NOT `pending` AND `uid` = %d AND `nurl` = '%s'",
-			local_user(), $profile_url);
-
-		if (dbm::is_result($r))
+		if (dba::exists('contact', array('pending' => false, 'uid' => local_user(), 'nurl' => $profile_url))) {
 			$connect = false;
+		}
 	}
 
-	if ($connect AND ($profile['network'] != NETWORK_DFRN) AND !isset($profile['remoteconnect']))
+	if ($connect && ($profile['network'] != NETWORK_DFRN) && !isset($profile['remoteconnect']))
 		$connect = false;
 
-	$remoteconnect = NULL;
+	$remoteconnect = null;
 	if (isset($profile['remoteconnect']))
 		$remoteconnect = $profile['remoteconnect'];
 
-	if ($connect AND ($profile['network'] == NETWORK_DFRN) AND !isset($remoteconnect))
+	if ($connect && ($profile['network'] == NETWORK_DFRN) && !isset($remoteconnect))
 		$subscribe_feed = t("Atom feed");
 	else
 		$subscribe_feed = false;
 
-	if (remote_user() OR (get_my_url() && $profile['unkmail'] && ($profile['uid'] != local_user()))) {
+	if (remote_user() || (get_my_url() && $profile['unkmail'] && ($profile['uid'] != local_user()))) {
 		$wallmessage = t('Message');
 		$wallmessage_link = "wallmessage/".$profile["nickname"];
 
 		if (remote_user()) {
-			$r = q("SELECT `url` FROM `contact` WHERE `uid` = %d AND `id` = '%s' AND `rel` = %d",
+			$r = q(
+				"SELECT `url` FROM `contact` WHERE `uid` = %d AND `id` = '%s' AND `rel` = %d",
 				intval($profile['uid']),
 				intval(remote_user()),
-				intval(CONTACT_IS_FRIEND));
+				intval(CONTACT_IS_FRIEND)
+			);
 		} else {
-			$r = q("SELECT `url` FROM `contact` WHERE `uid` = %d AND `nurl` = '%s' AND `rel` = %d",
+			$r = q(
+				"SELECT `url` FROM `contact` WHERE `uid` = %d AND `nurl` = '%s' AND `rel` = %d",
 				intval($profile['uid']),
 				dbesc(normalise_link(get_my_url())),
-				intval(CONTACT_IS_FRIEND));
+				intval(CONTACT_IS_FRIEND)
+			);
 		}
 		if ($r) {
 			$remote_url = $r[0]["url"];
@@ -281,10 +309,12 @@ function profile_sidebar($profile, $block = 0) {
 	}
 
 	// show edit profile to yourself
-	if ($profile['uid'] == local_user() && feature_enabled(local_user(),'multi_profiles')) {
-		$profile['edit'] = array(App::get_baseurl(). '/profiles', t('Profiles'),"", t('Manage/edit profiles'));
-		$r = q("SELECT * FROM `profile` WHERE `uid` = %d",
-				local_user());
+	if (!$is_contact && $profile['uid'] == local_user() && feature_enabled(local_user(), 'multi_profiles')) {
+		$profile['edit'] = array(System::baseUrl(). '/profiles', t('Profiles'),"", t('Manage/edit profiles'));
+		$r = q(
+			"SELECT * FROM `profile` WHERE `uid` = %d",
+			local_user()
+		);
 
 		$profile['menu'] = array(
 			'chg_photo' => t('Change profile photo'),
@@ -292,8 +322,7 @@ function profile_sidebar($profile, $block = 0) {
 			'entries' => array(),
 		);
 
-		if (dbm::is_result($r)) {
-
+		if (DBM::is_result($r)) {
 			foreach ($r as $rr) {
 				$profile['menu']['entries'][] = array(
 					'photo' => $rr['thumb'],
@@ -303,15 +332,12 @@ function profile_sidebar($profile, $block = 0) {
 					'isdefault' => $rr['is-default'],
 					'visibile_to_everybody' =>  t('visible to everybody'),
 					'edit_visibility' => t('Edit visibility'),
-
 				);
 			}
-
-
 		}
 	}
-	if ($profile['uid'] == local_user() && !feature_enabled(local_user(),'multi_profiles')) {
-		$profile['edit'] = array(App::get_baseurl(). '/profiles/'.$profile['id'], t('Edit profile'),"", t('Edit profile'));
+	if (!$is_contact && $profile['uid'] == local_user() && !feature_enabled(local_user(), 'multi_profiles')) {
+		$profile['edit'] = array(System::baseUrl(). '/profiles/'.$profile['id'], t('Edit profile'),"", t('Edit profile'));
 		$profile['menu'] = array(
 			'chg_photo' => t('Change profile photo'),
 			'cr_new' => null,
@@ -322,59 +348,66 @@ function profile_sidebar($profile, $block = 0) {
 	// Fetch the account type
 	$account_type = account_type($profile);
 
-	if((x($profile,'address') == 1)
-			|| (x($profile,'location') == 1)
-			|| (x($profile,'locality') == 1)
-			|| (x($profile,'region') == 1)
-			|| (x($profile,'postal-code') == 1)
-			|| (x($profile,'country-name') == 1))
+	if ((x($profile, 'address') == 1)
+		|| (x($profile, 'location') == 1)
+		|| (x($profile, 'locality') == 1)
+		|| (x($profile, 'region') == 1)
+		|| (x($profile, 'postal-code') == 1)
+		|| (x($profile, 'country-name') == 1)
+	) {
 		$location = t('Location:');
+	}
 
-	$gender = ((x($profile,'gender') == 1) ? t('Gender:') : False);
+	$gender = ((x($profile, 'gender') == 1) ? t('Gender:') : false);
 
 
-	$marital = ((x($profile,'marital') == 1) ?  t('Status:') : False);
+	$marital = ((x($profile, 'marital') == 1) ?  t('Status:') : false);
 
-	$homepage = ((x($profile,'homepage') == 1) ?  t('Homepage:') : False);
+	$homepage = ((x($profile, 'homepage') == 1) ?  t('Homepage:') : false);
 
-	$about = ((x($profile,'about') == 1) ?  t('About:') : False);
+	$about = ((x($profile, 'about') == 1) ?  t('About:') : false);
 
-	$xmpp = ((x($profile,'xmpp') == 1) ?  t('XMPP:') : False);
+	$xmpp = ((x($profile, 'xmpp') == 1) ?  t('XMPP:') : false);
 
-	if(($profile['hidewall'] || $block) && (! local_user()) && (! remote_user())) {
-		$location = $pdesc = $gender = $marital = $homepage = $about = False;
+	if (($profile['hidewall'] || $block) && (! local_user()) && (! remote_user())) {
+		$location = $pdesc = $gender = $marital = $homepage = $about = false;
 	}
 
-	$firstname = ((strpos($profile['name'],' '))
-			? trim(substr($profile['name'],0,strpos($profile['name'],' '))) : $profile['name']);
-	$lastname = (($firstname === $profile['name']) ? '' : trim(substr($profile['name'],strlen($firstname))));
+	$firstname = ((strpos($profile['name'], ' '))
+			? trim(substr($profile['name'], 0, strpos($profile['name'], ' '))) : $profile['name']);
+	$lastname = (($firstname === $profile['name']) ? '' : trim(substr($profile['name'], strlen($firstname))));
 
-	if ($profile['guid'] != "")
+	if ($profile['guid'] != "") {
 		$diaspora = array(
 			'guid' => $profile['guid'],
-			'podloc' => App::get_baseurl(),
+			'podloc' => System::baseUrl(),
 			'searchable' => (($profile['publish'] && $profile['net-publish']) ? 'true' : 'false' ),
 			'nickname' => $profile['nickname'],
 			'fullname' => $profile['name'],
 			'firstname' => $firstname,
 			'lastname' => $lastname,
-			'photo300' => App::get_baseurl() . '/photo/custom/300/' . $profile['uid'] . '.jpg',
-			'photo100' => App::get_baseurl() . '/photo/custom/100/' . $profile['uid'] . '.jpg',
-			'photo50' => App::get_baseurl() . '/photo/custom/50/'  . $profile['uid'] . '.jpg',
+			'photo300' => $profile['contact_photo'],
+			'photo100' => $profile['contact_thumb'],
+			'photo50' => $profile['contact_micro'],
 		);
-	else
+	} else {
 		$diaspora = false;
+	}
 
-	if (!$block){
+	if (!$block) {
 		$contact_block = contact_block();
 
-		if(is_array($a->profile) AND !$a->profile['hide-friends']) {
-			$r = q("SELECT `gcontact`.`updated` FROM `contact` INNER JOIN `gcontact` WHERE `gcontact`.`nurl` = `contact`.`nurl` AND `self` AND `uid` = %d LIMIT 1",
-				intval($a->profile['uid']));
-			if (dbm::is_result($r))
+		if (is_array($a->profile) && !$a->profile['hide-friends']) {
+			$r = q(
+				"SELECT `gcontact`.`updated` FROM `contact` INNER JOIN `gcontact` WHERE `gcontact`.`nurl` = `contact`.`nurl` AND `self` AND `uid` = %d LIMIT 1",
+				intval($a->profile['uid'])
+			);
+			if (DBM::is_result($r)) {
 				$updated =  date("c", strtotime($r[0]['updated']));
+			}
 
-			$r = q("SELECT COUNT(*) AS `total` FROM `contact`
+			$r = q(
+				"SELECT COUNT(*) AS `total` FROM `contact`
 				WHERE `uid` = %d
 					AND NOT `self` AND NOT `blocked` AND NOT `pending`
 					AND NOT `hidden` AND NOT `archive`
@@ -384,33 +417,40 @@ function profile_sidebar($profile, $block = 0) {
 				dbesc(NETWORK_DIASPORA),
 				dbesc(NETWORK_OSTATUS)
 			);
-			if (dbm::is_result($r))
+			if (DBM::is_result($r)) {
 				$contacts = intval($r[0]['total']);
+			}
 		}
 	}
 
 	$p = array();
-	foreach($profile as $k => $v) {
-		$k = str_replace('-','_',$k);
+	foreach ($profile as $k => $v) {
+		$k = str_replace('-', '_', $k);
 		$p[$k] = $v;
 	}
 
-	if (isset($p["about"]))
+	if (isset($p["about"])) {
 		$p["about"] = bbcode($p["about"]);
+	}
 
-	if (isset($p["address"]))
+	if (isset($p["address"])) {
 		$p["address"] = bbcode($p["address"]);
-	else
+	} else {
 		$p["address"] = bbcode($p["location"]);
+	}
 
-	if (isset($p["photo"]))
+	if (isset($p["photo"])) {
 		$p["photo"] = proxy_url($p["photo"], false, PROXY_SIZE_SMALL);
+	}
 
-	if($a->theme['template_engine'] === 'internal')
+	if ($a->theme['template_engine'] === 'internal') {
 		$location = template_escape($location);
+	}
 
 	$tpl = get_markup_template('profile_vcard.tpl');
-	$o .= replace_macros($tpl, array(
+	$o .= replace_macros(
+		$tpl,
+		array(
 		'$profile' => $p,
 		'$xmpp' => $xmpp,
 		'$connect'  => $connect,
@@ -421,7 +461,7 @@ function profile_sidebar($profile, $block = 0) {
 		'$account_type' => $account_type,
 		'$location' => $location,
 		'$gender'   => $gender,
-//			'$pdesc'	=> $pdesc,
+		// '$pdesc'	=> $pdesc,
 		'$marital'  => $marital,
 		'$homepage' => $homepage,
 		'$about' => $about,
@@ -430,7 +470,8 @@ function profile_sidebar($profile, $block = 0) {
 		'$updated' => $updated,
 		'$diaspora' => $diaspora,
 		'$contact_block' => $contact_block,
-	));
+		)
+	);
 
 	$arr = array('profile' => &$profile, 'entry' => &$o);
 
@@ -440,82 +481,91 @@ function profile_sidebar($profile, $block = 0) {
 }
 
 
-function get_birthdays() {
-
+function get_birthdays()
+{
 	$a = get_app();
 	$o = '';
 
-	if(! local_user() || $a->is_mobile || $a->is_tablet)
+	if (! local_user() || $a->is_mobile || $a->is_tablet) {
 		return $o;
+	}
 
-//		$mobile_detect = new Mobile_Detect();
-//		$is_mobile = $mobile_detect->isMobile() || $mobile_detect->isTablet();
-
-//		if($is_mobile)
-//			return $o;
+	/*
+	 * $mobile_detect = new Mobile_Detect();
+	 * $is_mobile = $mobile_detect->isMobile() || $mobile_detect->isTablet();
+	 *		if ($is_mobile)
+	 *			return $o;
+	 */
 
-	$bd_format = t('g A l F d') ; // 8 AM Friday January 18
+	$bd_format = t('g A l F d'); // 8 AM Friday January 18
 	$bd_short = t('F d');
 
 	$cachekey = "get_birthdays:".local_user();
 	$r = Cache::get($cachekey);
 	if (is_null($r)) {
-		$r = q("SELECT `event`.*, `event`.`id` AS `eid`, `contact`.* FROM `event`
-				INNER JOIN `contact` ON `contact`.`id` = `event`.`cid`
-				WHERE `event`.`uid` = %d AND `type` = 'birthday' AND `start` < '%s' AND `finish` > '%s'
-				ORDER BY `start` ASC ",
-				intval(local_user()),
-				dbesc(datetime_convert('UTC','UTC','now + 6 days')),
-				dbesc(datetime_convert('UTC','UTC','now'))
+		$s = dba::p(
+			"SELECT `event`.*, `event`.`id` AS `eid`, `contact`.* FROM `event`
+			INNER JOIN `contact` ON `contact`.`id` = `event`.`cid`
+			WHERE `event`.`uid` = ? AND `type` = 'birthday' AND `start` < ? AND `finish` > ?
+			ORDER BY `start` ASC ",
+			local_user(),
+			datetime_convert('UTC', 'UTC', 'now + 6 days'),
+			datetime_convert('UTC', 'UTC', 'now')
 		);
-		if (dbm::is_result($r)) {
+		if (DBM::is_result($s)) {
+			$r = dba::inArray($s);
 			Cache::set($cachekey, $r, CACHE_HOUR);
 		}
 	}
-	if (dbm::is_result($r)) {
+	if (DBM::is_result($r)) {
 		$total = 0;
 		$now = strtotime('now');
 		$cids = array();
 
 		$istoday = false;
 		foreach ($r as $rr) {
-			if(strlen($rr['name']))
+			if (strlen($rr['name'])) {
 				$total ++;
-			if((strtotime($rr['start'] . ' +00:00') < $now) && (strtotime($rr['finish'] . ' +00:00') > $now))
+			}
+			if ((strtotime($rr['start'] . ' +00:00') < $now) && (strtotime($rr['finish'] . ' +00:00') > $now)) {
 				$istoday = true;
+			}
 		}
 		$classtoday = $istoday ? ' birthday-today ' : '';
-		if($total) {
-			foreach($r as &$rr) {
-				if(! strlen($rr['name']))
+		if ($total) {
+			foreach ($r as &$rr) {
+				if (! strlen($rr['name'])) {
 					continue;
+				}
 
 				// avoid duplicates
 
-				if(in_array($rr['cid'],$cids))
+				if (in_array($rr['cid'], $cids)) {
 					continue;
+				}
 				$cids[] = $rr['cid'];
 
 				$today = (((strtotime($rr['start'] . ' +00:00') < $now) && (strtotime($rr['finish'] . ' +00:00') > $now)) ? true : false);
 				$sparkle = '';
 				$url = $rr['url'];
-				if($rr['network'] === NETWORK_DFRN) {
+				if ($rr['network'] === NETWORK_DFRN) {
 					$sparkle = " sparkle";
-					$url = App::get_baseurl() . '/redir/'  . $rr['cid'];
+					$url = System::baseUrl() . '/redir/'  . $rr['cid'];
 				}
 
 				$rr['link'] = $url;
 				$rr['title'] = $rr['name'];
 				$rr['date'] = day_translate(datetime_convert('UTC', $a->timezone, $rr['start'], $rr['adjust'] ? $bd_format : $bd_short)) . (($today) ?  ' ' . t('[today]') : '');
-				$rr['startime'] = Null;
+				$rr['startime'] = null;
 				$rr['today'] = $today;
-
 			}
 		}
 	}
 	$tpl = get_markup_template("birthdays_reminder.tpl");
-	return replace_macros($tpl, array(
-		'$baseurl' => App::get_baseurl(),
+	return replace_macros(
+		$tpl,
+		array(
+		'$baseurl' => System::baseUrl(),
 		'$classtoday' => $classtoday,
 		'$count' => $total,
 		'$event_reminders' => t('Birthday Reminders'),
@@ -523,129 +573,144 @@ function get_birthdays() {
 		'$events' => $r,
 		'$lbr' => '{',  // raw brackets mess up if/endif macro processing
 		'$rbr' => '}'
-
-	));
+		)
+	);
 }
 
 
-function get_events() {
-
-	require_once('include/bbcode.php');
+function get_events()
+{
+	require_once 'include/bbcode.php';
 
 	$a = get_app();
 
-	if(! local_user() || $a->is_mobile || $a->is_tablet)
+	if (! local_user() || $a->is_mobile || $a->is_tablet) {
 		return $o;
+	}
 
+	/*
+	 *	$mobile_detect = new Mobile_Detect();
+	 *		$is_mobile = $mobile_detect->isMobile() || $mobile_detect->isTablet();
+	 *		if ($is_mobile)
+	 *			return $o;
+	 */
 
-//		$mobile_detect = new Mobile_Detect();
-//		$is_mobile = $mobile_detect->isMobile() || $mobile_detect->isTablet();
-
-//		if($is_mobile)
-//			return $o;
-
-	$bd_format = t('g A l F d') ; // 8 AM Friday January 18
+	$bd_format = t('g A l F d'); // 8 AM Friday January 18
 	$bd_short = t('F d');
 
-	$r = q("SELECT `event`.* FROM `event`
-			WHERE `event`.`uid` = %d AND `type` != 'birthday' AND `start` < '%s' AND `start` >= '%s'
-			ORDER BY `start` ASC ",
-			intval(local_user()),
-			dbesc(datetime_convert('UTC','UTC','now + 7 days')),
-			dbesc(datetime_convert('UTC','UTC','now - 1 days'))
+	$s = dba::p(
+		"SELECT `event`.* FROM `event`
+		WHERE `event`.`uid` = ? AND `type` != 'birthday' AND `start` < ? AND `start` >= ?
+		ORDER BY `start` ASC ",
+		local_user(),
+		datetime_convert('UTC', 'UTC', 'now + 7 days'),
+		datetime_convert('UTC', 'UTC', 'now - 1 days')
 	);
 
-	if (dbm::is_result($r)) {
+	$r = array();
+
+	if (DBM::is_result($s)) {
 		$now = strtotime('now');
 		$istoday = false;
-		foreach ($r as $rr) {
-			if(strlen($rr['name']))
+
+		while ($rr = dba::fetch($s)) {
+			if (strlen($rr['name'])) {
 				$total ++;
+			}
 
-			$strt = datetime_convert('UTC',$rr['convert'] ? $a->timezone : 'UTC',$rr['start'],'Y-m-d');
-			if($strt === datetime_convert('UTC',$a->timezone,'now','Y-m-d'))
+			$strt = datetime_convert('UTC', $rr['convert'] ? $a->timezone : 'UTC', $rr['start'], 'Y-m-d');
+			if ($strt === datetime_convert('UTC', $a->timezone, 'now', 'Y-m-d')) {
 				$istoday = true;
-		}
-		$classtoday = (($istoday) ? 'event-today' : '');
-
-		$skip = 0;
+			}
 
-		foreach($r as &$rr) {
-			$title = strip_tags(html_entity_decode(bbcode($rr['summary']),ENT_QUOTES,'UTF-8'));
+			$title = strip_tags(html_entity_decode(bbcode($rr['summary']), ENT_QUOTES, 'UTF-8'));
 
-			if(strlen($title) > 35)
-				$title = substr($title,0,32) . '... ';
+			if (strlen($title) > 35) {
+				$title = substr($title, 0, 32) . '... ';
+			}
 
-			$description = substr(strip_tags(bbcode($rr['desc'])),0,32) . '... ';
-			if(! $description)
+			$description = substr(strip_tags(bbcode($rr['desc'])), 0, 32) . '... ';
+			if (! $description) {
 				$description = t('[No description]');
+			}
 
-			$strt = datetime_convert('UTC',$rr['convert'] ? $a->timezone : 'UTC',$rr['start']);
+			$strt = datetime_convert('UTC', $rr['convert'] ? $a->timezone : 'UTC', $rr['start']);
 
-			if(substr($strt,0,10) < datetime_convert('UTC',$a->timezone,'now','Y-m-d')) {
-				$skip++;
+			if (substr($strt, 0, 10) < datetime_convert('UTC', $a->timezone, 'now', 'Y-m-d')) {
 				continue;
 			}
 
-			$today = ((substr($strt,0,10) === datetime_convert('UTC',$a->timezone,'now','Y-m-d')) ? true : false);
+			$today = ((substr($strt, 0, 10) === datetime_convert('UTC', $a->timezone, 'now', 'Y-m-d')) ? true : false);
 
 			$rr['title'] = $title;
 			$rr['description'] = $desciption;
 			$rr['date'] = day_translate(datetime_convert('UTC', $rr['adjust'] ? $a->timezone : 'UTC', $rr['start'], $bd_format)) . (($today) ?  ' ' . t('[today]') : '');
 			$rr['startime'] = $strt;
 			$rr['today'] = $today;
+
+			$r[] = $rr;
 		}
+		dba::close($s);
+		$classtoday = (($istoday) ? 'event-today' : '');
 	}
-
 	$tpl = get_markup_template("events_reminder.tpl");
-	return replace_macros($tpl, array(
-		'$baseurl' => App::get_baseurl(),
+	return replace_macros(
+		$tpl,
+		array(
+		'$baseurl' => System::baseUrl(),
 		'$classtoday' => $classtoday,
-		'$count' => count($r) - $skip,
+		'$count' => count($r),
 		'$event_reminders' => t('Event Reminders'),
 		'$event_title' => t('Events this week:'),
 		'$events' => $r,
-	));
+		)
+	);
 }
 
-function advanced_profile(App $a) {
-
+function advanced_profile(App $a)
+{
 	$o = '';
 	$uid = $a->profile['uid'];
 
-	$o .= replace_macros(get_markup_template('section_title.tpl'),array(
+	$o .= replace_macros(
+		get_markup_template('section_title.tpl'),
+		array(
 		'$title' => t('Profile')
-	));
-
-	if($a->profile['name']) {
+		)
+	);
 
+	if ($a->profile['name']) {
 		$tpl = get_markup_template('profile_advanced.tpl');
 
 		$profile = array();
 
 		$profile['fullname'] = array( t('Full Name:'), $a->profile['name'] ) ;
 
-		if($a->profile['gender']) $profile['gender'] = array( t('Gender:'),  $a->profile['gender'] );
-
-
-		if(($a->profile['dob']) && ($a->profile['dob'] != '0000-00-00')) {
+		if ($a->profile['gender']) {
+			$profile['gender'] = array( t('Gender:'),  $a->profile['gender'] );
+		}
 
+		if (($a->profile['dob']) && ($a->profile['dob'] > '0001-01-01')) {
 			$year_bd_format = t('j F, Y');
 			$short_bd_format = t('j F');
 
 
 			$val = ((intval($a->profile['dob']))
-				? day_translate(datetime_convert('UTC','UTC',$a->profile['dob'] . ' 00:00 +00:00',$year_bd_format))
-				: day_translate(datetime_convert('UTC','UTC','2001-' . substr($a->profile['dob'],5) . ' 00:00 +00:00',$short_bd_format)));
+				? day_translate(datetime_convert('UTC', 'UTC', $a->profile['dob'] . ' 00:00 +00:00', $year_bd_format))
+				: day_translate(datetime_convert('UTC', 'UTC', '2001-' . substr($a->profile['dob'], 5) . ' 00:00 +00:00', $short_bd_format)));
 
 			$profile['birthday'] = array( t('Birthday:'), $val);
-
+		}
+		if (!empty($a->profile['dob'])
+			&& $a->profile['dob'] > '0001-01-01'
+			&& $age = age($a->profile['dob'], $a->profile['timezone'], '')
+		) {
+			$profile['age'] = array( t('Age:'), $age );
 		}
 
-		if($age = age($a->profile['dob'],$a->profile['timezone'],''))  $profile['age'] = array( t('Age:'), $age );
-
-
-		if($a->profile['marital']) $profile['marital'] = array( t('Status:'), $a->profile['marital']);
+		if ($a->profile['marital']) {
+			$profile['marital'] = array( t('Status:'), $a->profile['marital']);
+		}
 
 		/// @TODO Maybe use x() here, plus below?
 		if ($a->profile['with']) {
@@ -729,43 +794,47 @@ function advanced_profile(App $a) {
 		}
 
 		//show subcribed forum if it is enabled in the usersettings
-		if (feature_enabled($uid,'forumlist_profile')) {
+		if (feature_enabled($uid, 'forumlist_profile')) {
 			$profile['forumlist'] = array( t('Forums:'), ForumManager::profile_advanced($uid));
 		}
 
 		if ($a->profile['uid'] == local_user()) {
-			$profile['edit'] = array(App::get_baseurl(). '/profiles/'.$a->profile['id'], t('Edit profile'),"", t('Edit profile'));
+			$profile['edit'] = array(System::baseUrl(). '/profiles/'.$a->profile['id'], t('Edit profile'),"", t('Edit profile'));
 		}
 
-		return replace_macros($tpl, array(
+		return replace_macros(
+			$tpl,
+			array(
 			'$title' => t('Profile'),
 			'$basic' => t('Basic'),
 			'$advanced' => t('Advanced'),
 			'$profile' => $profile
-		));
+			)
+		);
 	}
 
 	return '';
 }
 
-function profile_tabs($a, $is_owner=False, $nickname=Null){
+function profile_tabs($a, $is_owner = false, $nickname = null)
+{
 	//echo "<pre>"; var_dump($a->user); killme();
 
 	if (is_null($nickname)) {
 		$nickname  = $a->user['nickname'];
 	}
 
-	if (x($_GET,'tab')) {
+	if (x($_GET, 'tab')) {
 		$tab = notags(trim($_GET['tab']));
 	}
 
-	$url = App::get_baseurl() . '/profile/' . $nickname;
+	$url = System::baseUrl() . '/profile/' . $nickname;
 
 	$tabs = array(
 		array(
 			'label'=>t('Status'),
 			'url' => $url,
-			'sel' => ((!isset($tab) && $a->argv[0]=='profile')?'active':''),
+			'sel' => ((!isset($tab) && $a->argv[0]=='profile') ? 'active' : ''),
 			'title' => t('Status Messages and Posts'),
 			'id' => 'status-tab',
 			'accesskey' => 'm',
@@ -773,23 +842,23 @@ function profile_tabs($a, $is_owner=False, $nickname=Null){
 		array(
 			'label' => t('Profile'),
 			'url' 	=> $url.'/?tab=profile',
-			'sel'	=> ((isset($tab) && $tab=='profile')?'active':''),
+			'sel'	=> ((isset($tab) && $tab=='profile') ? 'active' : ''),
 			'title' => t('Profile Details'),
 			'id' => 'profile-tab',
 			'accesskey' => 'r',
 		),
 		array(
 			'label' => t('Photos'),
-			'url'	=> App::get_baseurl() . '/photos/' . $nickname,
-			'sel'	=> ((!isset($tab) && $a->argv[0]=='photos')?'active':''),
+			'url'	=> System::baseUrl() . '/photos/' . $nickname,
+			'sel'	=> ((!isset($tab) && $a->argv[0]=='photos') ? 'active' : ''),
 			'title' => t('Photo Albums'),
 			'id' => 'photo-tab',
 			'accesskey' => 'h',
 		),
 		array(
 			'label' => t('Videos'),
-			'url'	=> App::get_baseurl() . '/videos/' . $nickname,
-			'sel'	=> ((!isset($tab) && $a->argv[0]=='videos')?'active':''),
+			'url'	=> System::baseUrl() . '/videos/' . $nickname,
+			'sel'	=> ((!isset($tab) && $a->argv[0]=='videos') ? 'active' : ''),
 			'title' => t('Videos'),
 			'id' => 'video-tab',
 			'accesskey' => 'v',
@@ -800,30 +869,30 @@ function profile_tabs($a, $is_owner=False, $nickname=Null){
 	if ($is_owner && $a->theme_events_in_profile) {
 			$tabs[] = array(
 				'label' => t('Events'),
-				'url'	=> App::get_baseurl() . '/events',
-				'sel' 	=>((!isset($tab) && $a->argv[0]=='events')?'active':''),
+				'url'	=> System::baseUrl() . '/events',
+				'sel' 	=>((!isset($tab) && $a->argv[0]=='events') ? 'active' : ''),
 				'title' => t('Events and Calendar'),
 				'id' => 'events-tab',
 				'accesskey' => 'e',
 			);
-	// if the user is not the owner of the calendar we only show a calendar
-	// with the public events of the calendar owner
+		// if the user is not the owner of the calendar we only show a calendar
+		// with the public events of the calendar owner
 	} elseif (! $is_owner) {
 		$tabs[] = array(
 				'label' => t('Events'),
-				'url'	=> App::get_baseurl() . '/cal/' . $nickname,
-				'sel' 	=>((!isset($tab) && $a->argv[0]=='cal')?'active':''),
+				'url'	=> System::baseUrl() . '/cal/' . $nickname,
+				'sel' 	=>((!isset($tab) && $a->argv[0]=='cal') ? 'active' : ''),
 				'title' => t('Events and Calendar'),
 				'id' => 'events-tab',
 				'accesskey' => 'e',
 			);
 	}
 
-	if ($is_owner){
+	if ($is_owner) {
 		$tabs[] = array(
 			'label' => t('Personal Notes'),
-			'url'	=> App::get_baseurl() . '/notes',
-			'sel' 	=>((!isset($tab) && $a->argv[0]=='notes')?'active':''),
+			'url'	=> System::baseUrl() . '/notes',
+			'sel' 	=>((!isset($tab) && $a->argv[0]=='notes') ? 'active' : ''),
 			'title' => t('Only You Can See This'),
 			'id' => 'notes-tab',
 			'accesskey' => 't',
@@ -833,8 +902,8 @@ function profile_tabs($a, $is_owner=False, $nickname=Null){
 	if ((! $is_owner) && ((count($a->profile)) || (! $a->profile['hide-friends']))) {
 		$tabs[] = array(
 			'label' => t('Contacts'),
-			'url'	=> App::get_baseurl() . '/viewcontacts/' . $nickname,
-			'sel'	=> ((!isset($tab) && $a->argv[0]=='viewcontacts')?'active':''),
+			'url'	=> System::baseUrl() . '/viewcontacts/' . $nickname,
+			'sel'	=> ((!isset($tab) && $a->argv[0]=='viewcontacts') ? 'active' : ''),
 			'title' => t('Contacts'),
 			'id' => 'viewcontacts-tab',
 			'accesskey' => 'k',
@@ -846,48 +915,53 @@ function profile_tabs($a, $is_owner=False, $nickname=Null){
 
 	$tpl = get_markup_template('common_tabs.tpl');
 
-	return replace_macros($tpl,array('$tabs' => $arr['tabs']));
+	return replace_macros($tpl, array('$tabs' => $arr['tabs']));
 }
 
-function get_my_url() {
-	if(x($_SESSION,'my_url'))
+function get_my_url()
+{
+	if (x($_SESSION, 'my_url')) {
 		return $_SESSION['my_url'];
+	}
 	return false;
 }
 
-function zrl_init(App $a) {
+function zrl_init(App $a)
+{
 	$tmp_str = get_my_url();
-	if(validate_url($tmp_str)) {
-
+	if (validate_url($tmp_str)) {
 		// Is it a DDoS attempt?
 		// The check fetches the cached value from gprobe to reduce the load for this system
 		$urlparts = parse_url($tmp_str);
 
-		$result = Cache::get("gprobe:".$urlparts["host"]);
-		if (!is_null($result)) {
-			if (in_array($result["network"], array(NETWORK_FEED, NETWORK_PHANTOM))) {
-				logger("DDoS attempt detected for ".$urlparts["host"]." by ".$_SERVER["REMOTE_ADDR"].". server data: ".print_r($_SERVER, true), LOGGER_DEBUG);
-				return;
-			}
+		$result = Cache::get("gprobe:" . $urlparts["host"]);
+		if ((!is_null($result)) && (in_array($result["network"], array(NETWORK_FEED, NETWORK_PHANTOM)))) {
+			logger("DDoS attempt detected for " . $urlparts["host"] . " by " . $_SERVER["REMOTE_ADDR"] . ". server data: " . print_r($_SERVER, true), LOGGER_DEBUG);
+			return;
 		}
 
-		proc_run(PRIORITY_LOW, 'include/gprobe.php',bin2hex($tmp_str));
+		Worker::add(PRIORITY_LOW, 'GProbe', $tmp_str);
 		$arr = array('zrl' => $tmp_str, 'url' => $a->cmd);
-		call_hooks('zrl_init',$arr);
+		call_hooks('zrl_init', $arr);
 	}
 }
 
-function zrl($s,$force = false) {
-	if(! strlen($s))
+function zrl($s, $force = false)
+{
+	if (! strlen($s)) {
 		return $s;
-	if((! strpos($s,'/profile/')) && (! $force))
+	}
+	if ((! strpos($s, '/profile/')) && (! $force)) {
 		return $s;
-	if($force && substr($s,-1,1) !== '/')
+	}
+	if ($force && substr($s, -1, 1) !== '/') {
 		$s = $s . '/';
-	$achar = strpos($s,'?') ? '&' : '?';
+	}
+	$achar = strpos($s, '?') ? '&' : '?';
 	$mine = get_my_url();
-	if($mine and ! link_compare($mine,$s))
+	if ($mine && ! link_compare($mine, $s)) {
 		return $s . $achar . 'zrl=' . urlencode($mine);
+	}
 	return $s;
 }
 
@@ -905,11 +979,11 @@ function zrl($s,$force = false) {
  * @note Returns local_user instead of user ID if "always_my_theme"
  *      is set to true
  */
-function get_theme_uid() {
-	$uid = (($_REQUEST['puid']) ? intval($_REQUEST['puid']) : 0);
-	if(local_user()) {
-		if((get_pconfig(local_user(),'system','always_my_theme')) || (! $uid))
-			return local_user();
+function get_theme_uid()
+{
+	$uid = ((!empty($_REQUEST['puid'])) ? intval($_REQUEST['puid']) : 0);
+	if ((local_user()) && ((PConfig::get(local_user(), 'system', 'always_my_theme')) || (! $uid))) {
+		return local_user();
 	}
 
 	return $uid;