"; var_dump($a->user); killme();

	if (is_null($nickname)) {
		$nickname  = $a->user['nickname'];
	}

	if (x($_GET, 'tab')) {
		$tab = notags(trim($_GET['tab']));
	}

	$url = System::baseUrl() . '/profile/' . $nickname;

	$tabs = array(
		array(
			'label'=>t('Status'),
			'url' => $url,
			'sel' => ((!isset($tab) && $a->argv[0]=='profile') ? 'active' : ''),
			'title' => t('Status Messages and Posts'),
			'id' => 'status-tab',
			'accesskey' => 'm',
		),
		array(
			'label' => t('Profile'),
			'url' 	=> $url.'/?tab=profile',
			'sel'	=> ((isset($tab) && $tab=='profile') ? 'active' : ''),
			'title' => t('Profile Details'),
			'id' => 'profile-tab',
			'accesskey' => 'r',
		),
		array(
			'label' => t('Photos'),
			'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'	=> System::baseUrl() . '/videos/' . $nickname,
			'sel'	=> ((!isset($tab) && $a->argv[0]=='videos') ? 'active' : ''),
			'title' => t('Videos'),
			'id' => 'video-tab',
			'accesskey' => 'v',
		),
	);

	// the calendar link for the full featured events calendar
	if ($is_owner && $a->theme_events_in_profile) {
			$tabs[] = array(
				'label' => t('Events'),
				'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
	} elseif (! $is_owner) {
		$tabs[] = array(
				'label' => t('Events'),
				'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) {
		$tabs[] = array(
			'label' => t('Personal Notes'),
			'url'	=> System::baseUrl() . '/notes',
			'sel' 	=>((!isset($tab) && $a->argv[0]=='notes') ? 'active' : ''),
			'title' => t('Only You Can See This'),
			'id' => 'notes-tab',
			'accesskey' => 't',
		);
	}

	if ((! $is_owner) && ((count($a->profile)) || (! $a->profile['hide-friends']))) {
		$tabs[] = array(
			'label' => t('Contacts'),
			'url'	=> System::baseUrl() . '/viewcontacts/' . $nickname,
			'sel'	=> ((!isset($tab) && $a->argv[0]=='viewcontacts') ? 'active' : ''),
			'title' => t('Contacts'),
			'id' => 'viewcontacts-tab',
			'accesskey' => 'k',
		);
	}

	$arr = array('is_owner' => $is_owner, 'nickname' => $nickname, 'tab' => (($tab) ? $tab : false), 'tabs' => $tabs);
	call_hooks('profile_tabs', $arr);

	$tpl = get_markup_template('common_tabs.tpl');

	return replace_macros($tpl, array('$tabs' => $arr['tabs']));
}

function get_my_url()
{
	if (x($_SESSION, 'my_url')) {
		return $_SESSION['my_url'];
	}
	return false;
}

function zrl_init(App $a)
{
	$my_url = get_my_url();
	$my_url = validate_url($my_url);
	if ($my_url) {
		// Is it a DDoS attempt?
		// The check fetches the cached value from gprobe to reduce the load for this system
		$urlparts = parse_url($my_url);

		$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;
		}

		Worker::add(PRIORITY_LOW, 'GProbe', $my_url);
		$arr = array('zrl' => $my_url, 'url' => $a->cmd);
		call_hooks('zrl_init', $arr);
	}
}

function zrl($s, $force = false)
{
	if (! strlen($s)) {
		return $s;
	}
	if ((! strpos($s, '/profile/')) && (! $force)) {
		return $s;
	}
	if ($force && substr($s, -1, 1) !== '/') {
		$s = $s . '/';
	}
	$achar = strpos($s, '?') ? '&' : '?';
	$mine = get_my_url();
	if ($mine && ! link_compare($mine, $s)) {
		return $s . $achar . 'zrl=' . urlencode($mine);
	}
	return $s;
}

/**
 * @brief Get the user ID of the page owner
 *
 * Used from within PCSS themes to set theme parameters. If there's a
 * puid request variable, that is the "page owner" and normally their theme
 * settings take precedence; unless a local user sets the "always_my_theme"
 * system pconfig, which means they don't want to see anybody else's theme
 * settings except their own while on this site.
 *
 * @return int user ID
 *
 * @note Returns local_user instead of user ID if "always_my_theme"
 *      is set to true
 */
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;
}