]> git.mxchange.org Git - friendica.git/blobdiff - src/Model/Profile.php
Merge pull request #5728 from rabuzarus/20180905_-_fix_lockview
[friendica.git] / src / Model / Profile.php
index a7f35f578213442158381d6a5ad0f7ed15ace67b..3a014517da9b158875c176c4654c0428e3686f95 100644 (file)
@@ -1,25 +1,30 @@
 <?php
-
 /**
  * @file src/Model/Profile.php
  */
-
 namespace Friendica\Model;
 
 use Friendica\App;
 use Friendica\Content\Feature;
 use Friendica\Content\ForumManager;
+use Friendica\Content\Text\BBCode;
+use Friendica\Core\Addon;
 use Friendica\Core\Cache;
 use Friendica\Core\Config;
+use Friendica\Core\L10n;
 use Friendica\Core\PConfig;
+use Friendica\Core\Protocol;
 use Friendica\Core\System;
 use Friendica\Core\Worker;
-use Friendica\Database\DBM;
+use Friendica\Database\DBA;
 use Friendica\Model\Contact;
 use Friendica\Protocol\Diaspora;
+use Friendica\Util\DateTimeFormat;
+use Friendica\Util\Network;
+use Friendica\Util\Proxy as ProxyUtils;
+use Friendica\Util\Temporal;
 
-require_once 'include/bbcode.php';
-require_once 'mod/proxy.php';
+require_once 'include/dba.php';
 
 class Profile
 {
@@ -34,11 +39,11 @@ class Profile
        {
                $location = '';
 
-               if ($profile['locality']) {
+               if (!empty($profile['locality'])) {
                        $location .= $profile['locality'];
                }
 
-               if ($profile['region'] && ($profile['locality'] != $profile['region'])) {
+               if (!empty($profile['region']) && (defaults($profile, 'locality', '') != $profile['region'])) {
                        if ($location) {
                                $location .= ', ';
                        }
@@ -46,7 +51,7 @@ class Profile
                        $location .= $profile['region'];
                }
 
-               if ($profile['country-name']) {
+               if (!empty($profile['country-name'])) {
                        if ($location) {
                                $location .= ', ';
                        }
@@ -59,7 +64,7 @@ class Profile
 
        /**
         *
-        * @brief Loads a profile into the page sidebar.
+        * Loads a profile into the page sidebar.
         *
         * The function requires a writeable copy of the main App structure, and the nickname
         * of a registered local account.
@@ -76,56 +81,53 @@ class Profile
         *      the theme is chosen before the _init() function of a theme is run, which will usually
         *      load a lot of theme-specific content
         *
-        * @param object $a           App
-        * @param string $nickname    string
-        * @param int    $profile     int
-        * @param array  $profiledata array
+        * @brief Loads a profile into the page sidebar.
+        * @param object  $a            App
+        * @param string  $nickname     string
+        * @param int     $profile      int
+        * @param array   $profiledata  array
         * @param boolean $show_connect Show connect link
         */
-       function profile_load(App $a, $nickname, $profile = 0, $profiledata = array(), $show_connect = true)
+       public static function load(App $a, $nickname, $profile = 0, array $profiledata = [], $show_connect = true)
        {
-               $user = q(
-                       "SELECT `uid` FROM `user` WHERE `nickname` = '%s' LIMIT 1",
-                       dbesc($nickname)
-               );
+               $user = DBA::selectFirst('user', ['uid'], ['nickname' => $nickname, 'account_removed' => false]);
 
-               if (!$user && !count($user) && !count($profiledata)) {
+               if (!DBA::isResult($user) && empty($profiledata)) {
                        logger('profile error: ' . $a->query_string, LOGGER_DEBUG);
-                       notice(t('Requested account is not available.') . EOL);
+                       notice(L10n::t('Requested account is not available.') . EOL);
                        $a->error = 404;
                        return;
                }
 
-               if (!x($a->page, 'aside')) {
-                       $a->page['aside'] = '';
-               }
-
-               if ($profiledata) {
-                       $a->page['aside'] .= profile_sidebar($profiledata, true, $show_connect);
+               if (count($profiledata) > 0) {
+                       // Add profile data to sidebar
+                       $a->page['aside'] .= self::sidebar($profiledata, true, $show_connect);
 
-                       if (!DBM::is_result($user)) {
+                       if (!DBA::isResult($user)) {
                                return;
                        }
                }
 
-               $pdata = get_profiledata_by_nick($nickname, $user[0]['uid'], $profile);
+               $pdata = self::getByNickname($nickname, $user['uid'], $profile);
 
                if (empty($pdata) && empty($profiledata)) {
                        logger('profile error: ' . $a->query_string, LOGGER_DEBUG);
-                       notice(t('Requested profile is not available.') . EOL);
+                       notice(L10n::t('Requested profile is not available.') . EOL);
                        $a->error = 404;
                        return;
                }
 
+               if (empty($pdata)) {
+                       $pdata = ['uid' => 0, 'profile_uid' => 0, 'is-default' => false,'name' => $nickname];
+               }
+
                // 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 ($x && count($x)) {
-                               $pdata['pub_keywords'] = $x[0]['pub_keywords'];
+                       $condition = ['uid' => $pdata['profile_uid'], 'is-default' => true];
+                       $profile = DBA::selectFirst('profile', ['pub_keywords'], $condition);
+                       if (DBA::isResult($profile)) {
+                               $pdata['pub_keywords'] = $profile['pub_keywords'];
                        }
                }
 
@@ -133,9 +135,9 @@ class Profile
                $a->profile_uid = $pdata['profile_uid'];
 
                $a->profile['mobile-theme'] = PConfig::get($a->profile['profile_uid'], 'system', 'mobile_theme');
-               $a->profile['network'] = NETWORK_DFRN;
+               $a->profile['network'] = Protocol::DFRN;
 
-               $a->page['title'] = $a->profile['name'] . ' @ ' . $a->config['sitename'];
+               $a->page['title'] = $a->profile['name'] . ' @ ' . Config::get('config', 'sitename');
 
                if (!$profiledata && !PConfig::get(local_user(), 'system', 'always_my_theme')) {
                        $_SESSION['theme'] = $a->profile['theme'];
@@ -149,22 +151,18 @@ class Profile
 
                $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';
+               $theme_info_file = 'view/theme/' . $a->getCurrentTheme() . '/theme.php';
                if (file_exists($theme_info_file)) {
                        require_once $theme_info_file;
                }
 
-               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'),
+                               [
+                                       '$editprofile' => L10n::t('Edit profile'),
                                        '$profid' => $a->profile['id']
-                               )
+                               ]
                        );
                }
 
@@ -176,14 +174,14 @@ class Profile
                 * But: When this profile was on the same server, then we could display the contacts
                 */
                if (!$profiledata) {
-                       $a->page['aside'] .= profile_sidebar($a->profile, $block, $show_connect);
+                       $a->page['aside'] .= self::sidebar($a->profile, $block, $show_connect);
                }
 
                return;
        }
 
        /**
-        * @brief Get all profil data of a local user
+        * Get all profile data of a local user
         *
         * If the viewer is an authenticated remote viewer, the profile displayed is the
         * one that has been configured for his/her viewing in the Contact manager.
@@ -192,18 +190,19 @@ class Profile
         *
         * Includes all available profile data
         *
+        * @brief Get all profile data of a local user
         * @param string $nickname nick
         * @param int    $uid      uid
         * @param int    $profile_id  ID of the profile
-        * @returns array
+        * @return array
         */
-       function get_profiledata_by_nick($nickname, $uid = 0, $profile_id = 0)
+       public static function getByNickname($nickname, $uid = 0, $profile_id = 0)
        {
-               if (remote_user() && count($_SESSION['remote'])) {
+               if (remote_user() && !empty($_SESSION['remote'])) {
                        foreach ($_SESSION['remote'] as $visitor) {
                                if ($visitor['uid'] == $uid) {
-                                       $contact = dba::selectFirst('contact', ['profile-id'], ['id' => $visitor['cid']]);
-                                       if (DBM::is_result($contact)) {
+                                       $contact = DBA::selectFirst('contact', ['profile-id'], ['id' => $visitor['cid']]);
+                                       if (DBA::isResult($contact)) {
                                                $profile_id = $contact['profile-id'];
                                        }
                                        break;
@@ -214,7 +213,7 @@ class Profile
                $profile = null;
 
                if ($profile_id) {
-                       $profile = dba::fetch_first(
+                       $profile = DBA::fetchFirst(
                                "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`.*,
@@ -227,8 +226,8 @@ class Profile
                                intval($profile_id)
                        );
                }
-               if (!DBM::is_result($profile)) {
-                       $profile = dba::fetch_first(
+               if (!DBA::isResult($profile)) {
+                       $profile = DBA::fetchFirst(
                                "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`.*,
@@ -245,16 +244,17 @@ class Profile
        }
 
        /**
-        * @brief Formats a profile for display in the sidebar.
+        * Formats a profile for display in the sidebar.
         *
         * It is very difficult to templatise the HTML completely
         * because of all the conditional logic.
         *
+        * @brief Formats a profile for display in the sidebar.
         * @param array $profile
         * @param int $block
         * @param boolean $show_connect Show connect link
         *
-        * @return HTML string suitable for sidebar inclusion
+        * @return string HTML sidebar module
         *
         * @note Returns empty string if passed $profile is wrong type or not populated
         *
@@ -263,7 +263,7 @@ class Profile
         * @hooks 'profile_sidebar'
         *      array $arr
         */
-       function profile_sidebar($profile, $block = 0, $show_connect = true)
+       private static function sidebar($profile, $block = 0, $show_connect = true)
        {
                $a = get_app();
 
@@ -279,20 +279,20 @@ class Profile
 
                $profile['picdate'] = urlencode(defaults($profile, 'picdate', ''));
 
-               if (($profile['network'] != '') && ($profile['network'] != NETWORK_DFRN)) {
+               if (($profile['network'] != '') && ($profile['network'] != Protocol::DFRN)) {
                        $profile['network_name'] = format_network_name($profile['network'], $profile['url']);
                } else {
                        $profile['network_name'] = '';
                }
 
-               call_hooks('profile_sidebar_enter', $profile);
+               Addon::callHooks('profile_sidebar_enter', $profile);
 
 
                // don't show connect link to yourself
-               $connect = $profile['uid'] != local_user() ? t('Connect') : false;
+               $connect = $profile['uid'] != local_user() ? L10n::t('Connect') : false;
 
                // don't show connect link to authenticated visitors either
-               if (remote_user() && count($_SESSION['remote'])) {
+               if (remote_user() && !empty($_SESSION['remote'])) {
                        foreach ($_SESSION['remote'] as $visitor) {
                                if ($visitor['uid'] == $profile['uid']) {
                                        $connect = false;
@@ -305,6 +305,8 @@ class Profile
                        $connect = false;
                }
 
+               $profile_url = '';
+
                // Is the local user already connected to that user?
                if ($connect && local_user()) {
                        if (isset($profile['url'])) {
@@ -313,12 +315,12 @@ class Profile
                                $profile_url = normalise_link(System::baseUrl() . '/profile/' . $profile['nickname']);
                        }
 
-                       if (dba::exists('contact', array('pending' => false, 'uid' => local_user(), 'nurl' => $profile_url))) {
+                       if (DBA::exists('contact', ['pending' => false, 'uid' => local_user(), 'nurl' => $profile_url])) {
                                $connect = false;
                        }
                }
 
-               if ($connect && ($profile['network'] != NETWORK_DFRN) && !isset($profile['remoteconnect'])) {
+               if ($connect && ($profile['network'] != Protocol::DFRN) && !isset($profile['remoteconnect'])) {
                        $connect = false;
                }
 
@@ -327,76 +329,79 @@ class Profile
                        $remoteconnect = $profile['remoteconnect'];
                }
 
-               if ($connect && ($profile['network'] == NETWORK_DFRN) && !isset($remoteconnect)) {
-                       $subscribe_feed = t('Atom feed');
+               if ($connect && ($profile['network'] == Protocol::DFRN) && !isset($remoteconnect)) {
+                       $subscribe_feed = L10n::t('Atom feed');
                } else {
                        $subscribe_feed = false;
                }
 
-               if (remote_user() || (get_my_url() && x($profile, 'unkmail') && ($profile['uid'] != local_user()))) {
-                       $wallmessage = t('Message');
-                       $wallmessage_link = 'wallmessage/' . $profile['nickname'];
+               $wallmessage = false;
+               $wallmessage_link = false;
+
+               // See issue https://github.com/friendica/friendica/issues/3838
+               // Either we remove the message link for remote users or we enable creating messages from remote users
+               if (remote_user() || (self::getMyURL() && x($profile, 'unkmail') && ($profile['uid'] != local_user()))) {
+                       $wallmessage = L10n::t('Message');
 
                        if (remote_user()) {
                                $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::FRIEND)
                                );
                        } else {
                                $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)
+                                       DBA::escape(normalise_link(self::getMyURL())),
+                                       intval(Contact::FRIEND)
                                );
                        }
                        if ($r) {
                                $remote_url = $r[0]['url'];
                                $message_path = preg_replace('=(.*)/profile/(.*)=ism', '$1/message/new/', $remote_url);
-                               $wallmessage_link = $message_path . base64_encode($profile['addr']);
+                               $wallmessage_link = $message_path . base64_encode(defaults($profile, 'addr', ''));
+                       } else if (!empty($profile['nickname'])) {
+                               $wallmessage_link = 'wallmessage/' . $profile['nickname'];
                        }
-               } else {
-                       $wallmessage = false;
-                       $wallmessage_link = false;
                }
 
                // show edit profile to yourself
                if (!$is_contact && $profile['uid'] == local_user() && Feature::isEnabled(local_user(), 'multi_profiles')) {
-                       $profile['edit'] = array(System::baseUrl() . '/profiles', t('Profiles'), '', t('Manage/edit profiles'));
+                       $profile['edit'] = [System::baseUrl() . '/profiles', L10n::t('Profiles'), '', L10n::t('Manage/edit profiles')];
                        $r = q(
                                "SELECT * FROM `profile` WHERE `uid` = %d",
                                local_user()
                        );
 
-                       $profile['menu'] = array(
-                               'chg_photo' => t('Change profile photo'),
-                               'cr_new' => t('Create New Profile'),
-                               'entries' => array(),
-                       );
+                       $profile['menu'] = [
+                               'chg_photo' => L10n::t('Change profile photo'),
+                               'cr_new' => L10n::t('Create New Profile'),
+                               'entries' => [],
+                       ];
 
-                       if (DBM::is_result($r)) {
+                       if (DBA::isResult($r)) {
                                foreach ($r as $rr) {
-                                       $profile['menu']['entries'][] = array(
+                                       $profile['menu']['entries'][] = [
                                                'photo' => $rr['thumb'],
                                                'id' => $rr['id'],
-                                               'alt' => t('Profile Image'),
+                                               'alt' => L10n::t('Profile Image'),
                                                'profile_name' => $rr['profile-name'],
                                                'isdefault' => $rr['is-default'],
-                                               'visibile_to_everybody' => t('visible to everybody'),
-                                               'edit_visibility' => t('Edit visibility'),
-                                       );
+                                               'visibile_to_everybody' => L10n::t('visible to everybody'),
+                                               'edit_visibility' => L10n::t('Edit visibility'),
+                                       ];
                                }
                        }
                }
                if (!$is_contact && $profile['uid'] == local_user() && !Feature::isEnabled(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'),
+                       $profile['edit'] = [System::baseUrl() . '/profiles/' . $profile['id'], L10n::t('Edit profile'), '', L10n::t('Edit profile')];
+                       $profile['menu'] = [
+                               'chg_photo' => L10n::t('Change profile photo'),
                                'cr_new' => null,
-                               'entries' => array(),
-                       );
+                               'entries' => [],
+                       ];
                }
 
                // Fetch the account type
@@ -409,14 +414,14 @@ class Profile
                        || x($profile, 'postal-code')
                        || x($profile, 'country-name')
                ) {
-                       $location = t('Location:');
+                       $location = L10n::t('Location:');
                }
 
-               $gender   = x($profile, 'gender')   ? t('Gender:')   : false;
-               $marital  = x($profile, 'marital')  ? t('Status:')   : false;
-               $homepage = x($profile, 'homepage') ? t('Homepage:') : false;
-               $about    = x($profile, 'about')    ? t('About:')    : false;
-               $xmpp     = x($profile, 'xmpp')     ? t('XMPP:')     : false;
+               $gender   = x($profile, 'gender')   ? L10n::t('Gender:')   : false;
+               $marital  = x($profile, 'marital')  ? L10n::t('Status:')   : false;
+               $homepage = x($profile, 'homepage') ? L10n::t('Homepage:') : false;
+               $about    = x($profile, 'about')    ? L10n::t('About:')    : false;
+               $xmpp     = x($profile, 'xmpp')     ? L10n::t('XMPP:')     : false;
 
                if ((x($profile, 'hidewall') || $block) && !local_user() && !remote_user()) {
                        $location = $gender = $marital = $homepage = $about = false;
@@ -427,7 +432,7 @@ class Profile
                $lastname = $split_name['last'];
 
                if (x($profile, 'guid')) {
-                       $diaspora = array(
+                       $diaspora = [
                                'guid' => $profile['guid'],
                                'podloc' => System::baseUrl(),
                                'searchable' => (($profile['publish'] && $profile['net-publish']) ? 'true' : 'false' ),
@@ -435,10 +440,10 @@ class Profile
                                'fullname' => $profile['name'],
                                'firstname' => $firstname,
                                'lastname' => $lastname,
-                               'photo300' => $profile['contact_photo'],
-                               'photo100' => $profile['contact_thumb'],
-                               'photo50' => $profile['contact_micro'],
-                       );
+                               'photo300' => defaults($profile, 'contact_photo', ''),
+                               'photo100' => defaults($profile, 'contact_thumb', ''),
+                               'photo50' => defaults($profile, 'contact_micro', ''),
+                       ];
                } else {
                        $diaspora = false;
                }
@@ -454,7 +459,7 @@ class Profile
                                        "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 (DBA::isResult($r)) {
                                        $updated = date('c', strtotime($r[0]['updated']));
                                }
 
@@ -465,38 +470,40 @@ class Profile
                                                AND NOT `hidden` AND NOT `archive`
                                                AND `network` IN ('%s', '%s', '%s', '')",
                                        intval($profile['uid']),
-                                       dbesc(NETWORK_DFRN),
-                                       dbesc(NETWORK_DIASPORA),
-                                       dbesc(NETWORK_OSTATUS)
+                                       DBA::escape(Protocol::DFRN),
+                                       DBA::escape(Protocol::DIASPORA),
+                                       DBA::escape(Protocol::OSTATUS)
                                );
-                               if (DBM::is_result($r)) {
+                               if (DBA::isResult($r)) {
                                        $contacts = intval($r[0]['total']);
                                }
                        }
                }
 
-               $p = array();
+               $p = [];
                foreach ($profile as $k => $v) {
                        $k = str_replace('-', '_', $k);
                        $p[$k] = $v;
                }
 
                if (isset($p['about'])) {
-                       $p['about'] = bbcode($p['about']);
+                       $p['about'] = BBCode::convert($p['about']);
                }
 
                if (isset($p['address'])) {
-                       $p['address'] = bbcode($p['address']);
-               } else {
-                       $p['address'] = bbcode($p['location']);
+                       $p['address'] = BBCode::convert($p['address']);
+               } elseif (isset($p['location'])) {
+                       $p['address'] = BBCode::convert($p['location']);
                }
 
                if (isset($p['photo'])) {
-                       $p['photo'] = proxy_url($p['photo'], false, PROXY_SIZE_SMALL);
+                       $p['photo'] = ProxyUtils::proxifyUrl($p['photo'], false, ProxyUtils::SIZE_SMALL);
                }
 
+               $p['url'] = Contact::magicLink(defaults($p, 'url', $profile_url));
+
                $tpl = get_markup_template('profile_vcard.tpl');
-               $o .= replace_macros($tpl, array(
+               $o .= replace_macros($tpl, [
                        '$profile' => $p,
                        '$xmpp' => $xmpp,
                        '$connect' => $connect,
@@ -510,21 +517,21 @@ class Profile
                        '$marital' => $marital,
                        '$homepage' => $homepage,
                        '$about' => $about,
-                       '$network' => t('Network:'),
+                       '$network' => L10n::t('Network:'),
                        '$contacts' => $contacts,
                        '$updated' => $updated,
                        '$diaspora' => $diaspora,
                        '$contact_block' => $contact_block,
-               ));
+               ]);
 
-               $arr = array('profile' => &$profile, 'entry' => &$o);
+               $arr = ['profile' => &$profile, 'entry' => &$o];
 
-               call_hooks('profile_sidebar', $arr);
+               Addon::callHooks('profile_sidebar', $arr);
 
                return $o;
        }
 
-       function get_birthdays()
+       public static function getBirthdays()
        {
                $a = get_app();
                $o = '';
@@ -540,30 +547,32 @@ class Profile
                *                       return $o;
                */
 
-               $bd_format = t('g A l F d'); // 8 AM Friday January 18
-               $bd_short = t('F d');
+               $bd_format = L10n::t('g A l F d'); // 8 AM Friday January 18
+               $bd_short = L10n::t('F d');
 
                $cachekey = 'get_birthdays:' . local_user();
                $r = Cache::get($cachekey);
                if (is_null($r)) {
-                       $s = dba::p(
+                       $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')
+                               DateTimeFormat::utc('now + 6 days'),
+                               DateTimeFormat::utcNow()
                        );
-                       if (DBM::is_result($s)) {
-                               $r = dba::inArray($s);
+                       if (DBA::isResult($s)) {
+                               $r = DBA::toArray($s);
                                Cache::set($cachekey, $r, CACHE_HOUR);
                        }
                }
-               if (DBM::is_result($r)) {
-                       $total = 0;
+
+               $total = 0;
+               $classtoday = '';
+               if (DBA::isResult($r)) {
                        $now = strtotime('now');
-                       $cids = array();
+                       $cids = [];
 
                        $istoday = false;
                        foreach ($r as $rr) {
@@ -589,37 +598,32 @@ class Profile
                                        $cids[] = $rr['cid'];
 
                                        $today = (((strtotime($rr['start'] . ' +00:00') < $now) && (strtotime($rr['finish'] . ' +00:00') > $now)) ? true : false);
-                                       $url = $rr['url'];
-                                       if ($rr['network'] === NETWORK_DFRN) {
-                                               $url = System::baseUrl() . '/redir/' . $rr['cid'];
-                                       }
 
-                                       $rr['link'] = $url;
+                                       $rr['link'] = Contact::magicLink($rr['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['date'] = day_translate(DateTimeFormat::convert($rr['start'], $a->timezone, 'UTC', $rr['adjust'] ? $bd_format : $bd_short)) . (($today) ? ' ' . L10n::t('[today]') : '');
                                        $rr['startime'] = null;
                                        $rr['today'] = $today;
                                }
                        }
                }
                $tpl = get_markup_template('birthdays_reminder.tpl');
-               return replace_macros($tpl, array(
+               return replace_macros($tpl, [
                        '$baseurl' => System::baseUrl(),
                        '$classtoday' => $classtoday,
                        '$count' => $total,
-                       '$event_reminders' => t('Birthday Reminders'),
-                       '$event_title' => t('Birthdays this week:'),
+                       '$event_reminders' => L10n::t('Birthday Reminders'),
+                       '$event_title' => L10n::t('Birthdays this week:'),
                        '$events' => $r,
                        '$lbr' => '{', // raw brackets mess up if/endif macro processing
                        '$rbr' => '}'
-               ));
+               ]);
        }
 
-       function get_events()
+       public static function getEventsReminderHTML()
        {
-               require_once 'include/bbcode.php';
-
                $a = get_app();
+               $o = '';
 
                if (!local_user() || $a->is_mobile || $a->is_tablet) {
                        return $o;
@@ -632,115 +636,124 @@ class Profile
                *                       return $o;
                */
 
-               $bd_format = t('g A l F d'); // 8 AM Friday January 18
+               $bd_format = L10n::t('g A l F d'); // 8 AM Friday January 18
                $classtoday = '';
 
-               $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')
-               );
+               $condition = ["`uid` = ? AND `type` != 'birthday' AND `start` < ? AND `start` >= ?",
+                       local_user(), DateTimeFormat::utc('now + 7 days'), DateTimeFormat::utc('now - 1 days')];
+               $s = DBA::select('event', [], $condition, ['order' => ['start']]);
 
-               $r = array();
+               $r = [];
 
-               if (DBM::is_result($s)) {
+               if (DBA::isResult($s)) {
                        $istoday = false;
+                       $total = 0;
 
-                       while ($rr = dba::fetch($s)) {
-                               if (strlen($rr['name'])) {
-                                       $total ++;
+                       while ($rr = DBA::fetch($s)) {
+                               $condition = ['parent-uri' => $rr['uri'], 'uid' => $rr['uid'], 'author-id' => public_contact(),
+                                       'activity' => [Item::activityToIndex(ACTIVITY_ATTEND), Item::activityToIndex(ACTIVITY_ATTENDMAYBE)],
+                                       'visible' => true, 'deleted' => false];
+                               if (!Item::exists($condition)) {
+                                       continue;
                                }
 
-                               $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')) {
+                               if (strlen($rr['summary'])) {
+                                       $total++;
+                               }
+
+                               $strt = DateTimeFormat::convert($rr['start'], $rr['adjust'] ? $a->timezone : 'UTC', 'UTC', 'Y-m-d');
+                               if ($strt === DateTimeFormat::timezoneNow($a->timezone, 'Y-m-d')) {
                                        $istoday = true;
                                }
 
-                               $title = strip_tags(html_entity_decode(bbcode($rr['summary']), ENT_QUOTES, 'UTF-8'));
+                               $title = strip_tags(html_entity_decode(BBCode::convert($rr['summary']), ENT_QUOTES, 'UTF-8'));
 
                                if (strlen($title) > 35) {
                                        $title = substr($title, 0, 32) . '... ';
                                }
 
-                               $description = substr(strip_tags(bbcode($rr['desc'])), 0, 32) . '... ';
+                               $description = substr(strip_tags(BBCode::convert($rr['desc'])), 0, 32) . '... ';
                                if (!$description) {
-                                       $description = t('[No description]');
+                                       $description = L10n::t('[No description]');
                                }
 
-                               $strt = datetime_convert('UTC', $rr['convert'] ? $a->timezone : 'UTC', $rr['start']);
+                               $strt = DateTimeFormat::convert($rr['start'], $rr['adjust'] ? $a->timezone : 'UTC');
 
-                               if (substr($strt, 0, 10) < datetime_convert('UTC', $a->timezone, 'now', 'Y-m-d')) {
+                               if (substr($strt, 0, 10) < DateTimeFormat::timezoneNow($a->timezone, '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) === DateTimeFormat::timezoneNow($a->timezone, 'Y-m-d')) ? true : false);
 
                                $rr['title'] = $title;
                                $rr['description'] = $description;
-                               $rr['date'] = day_translate(datetime_convert('UTC', $rr['adjust'] ? $a->timezone : 'UTC', $rr['start'], $bd_format)) . (($today) ? ' ' . t('[today]') : '');
+                               $rr['date'] = day_translate(DateTimeFormat::convert($rr['start'], $rr['adjust'] ? $a->timezone : 'UTC', 'UTC', $bd_format)) . (($today) ? ' ' . L10n::t('[today]') : '');
                                $rr['startime'] = $strt;
                                $rr['today'] = $today;
 
                                $r[] = $rr;
                        }
-                       dba::close($s);
+                       DBA::close($s);
                        $classtoday = (($istoday) ? 'event-today' : '');
                }
                $tpl = get_markup_template('events_reminder.tpl');
-               return replace_macros($tpl, array(
+               return replace_macros($tpl, [
                        '$baseurl' => System::baseUrl(),
                        '$classtoday' => $classtoday,
                        '$count' => count($r),
-                       '$event_reminders' => t('Event Reminders'),
-                       '$event_title' => t('Events this week:'),
+                       '$event_reminders' => L10n::t('Event Reminders'),
+                       '$event_title' => L10n::t('Upcoming events the next 7 days:'),
                        '$events' => $r,
-               ));
+               ]);
        }
 
-       function advanced_profile(App $a)
+       public static function getAdvanced(App $a)
        {
                $o = '';
                $uid = $a->profile['uid'];
 
                $o .= replace_macros(
                        get_markup_template('section_title.tpl'),
-                       array('$title' => t('Profile'))
+                       ['$title' => L10n::t('Profile')]
                );
 
                if ($a->profile['name']) {
                        $tpl = get_markup_template('profile_advanced.tpl');
 
-                       $profile = array();
+                       $profile = [];
+
+                       $profile['fullname'] = [L10n::t('Full Name:'), $a->profile['name']];
 
-                       $profile['fullname'] = array(t('Full Name:'), $a->profile['name']);
+                       if (Feature::isEnabled($uid, 'profile_membersince')) {
+                               $profile['membersince'] = [L10n::t('Member since:'), DateTimeFormat::local($a->profile['register_date'])];
+                       }
 
                        if ($a->profile['gender']) {
-                               $profile['gender'] = array(t('Gender:'), $a->profile['gender']);
+                               $profile['gender'] = [L10n::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');
+                               $year_bd_format = L10n::t('j F, Y');
+                               $short_bd_format = L10n::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));
+                               $val = day_translate(
+                                       intval($a->profile['dob']) ?
+                                               DateTimeFormat::utc($a->profile['dob'] . ' 00:00 +00:00', $year_bd_format)
+                                               : DateTimeFormat::utc('2001-' . substr($a->profile['dob'], 5) . ' 00:00 +00:00', $short_bd_format)
+                               );
 
-                               $profile['birthday'] = array(t('Birthday:'), $val);
+                               $profile['birthday'] = [L10n::t('Birthday:'), $val];
                        }
 
                        if (!empty($a->profile['dob'])
                                && $a->profile['dob'] > '0001-01-01'
-                               && $age = age($a->profile['dob'], $a->profile['timezone'], '')
+                               && $age = Temporal::getAgeByTimezone($a->profile['dob'], $a->profile['timezone'], '')
                        ) {
-                               $profile['age'] = array(t('Age:'), $age);
+                               $profile['age'] = [L10n::t('Age:'), $age];
                        }
 
                        if ($a->profile['marital']) {
-                               $profile['marital'] = array(t('Status:'), $a->profile['marital']);
+                               $profile['marital'] = [L10n::t('Status:'), $a->profile['marital']];
                        }
 
                        /// @TODO Maybe use x() here, plus below?
@@ -749,102 +762,102 @@ class Profile
                        }
 
                        if (strlen($a->profile['howlong']) && $a->profile['howlong'] >= NULL_DATE) {
-                               $profile['howlong'] = relative_date($a->profile['howlong'], t('for %1$d %2$s'));
+                               $profile['howlong'] = Temporal::getRelativeDate($a->profile['howlong'], L10n::t('for %1$d %2$s'));
                        }
 
                        if ($a->profile['sexual']) {
-                               $profile['sexual'] = array(t('Sexual Preference:'), $a->profile['sexual']);
+                               $profile['sexual'] = [L10n::t('Sexual Preference:'), $a->profile['sexual']];
                        }
 
                        if ($a->profile['homepage']) {
-                               $profile['homepage'] = array(t('Homepage:'), linkify($a->profile['homepage']));
+                               $profile['homepage'] = [L10n::t('Homepage:'), linkify($a->profile['homepage'])];
                        }
 
                        if ($a->profile['hometown']) {
-                               $profile['hometown'] = array(t('Hometown:'), linkify($a->profile['hometown']));
+                               $profile['hometown'] = [L10n::t('Hometown:'), linkify($a->profile['hometown'])];
                        }
 
                        if ($a->profile['pub_keywords']) {
-                               $profile['pub_keywords'] = array(t('Tags:'), $a->profile['pub_keywords']);
+                               $profile['pub_keywords'] = [L10n::t('Tags:'), $a->profile['pub_keywords']];
                        }
 
                        if ($a->profile['politic']) {
-                               $profile['politic'] = array(t('Political Views:'), $a->profile['politic']);
+                               $profile['politic'] = [L10n::t('Political Views:'), $a->profile['politic']];
                        }
 
                        if ($a->profile['religion']) {
-                               $profile['religion'] = array(t('Religion:'), $a->profile['religion']);
+                               $profile['religion'] = [L10n::t('Religion:'), $a->profile['religion']];
                        }
 
                        if ($txt = prepare_text($a->profile['about'])) {
-                               $profile['about'] = array(t('About:'), $txt);
+                               $profile['about'] = [L10n::t('About:'), $txt];
                        }
 
                        if ($txt = prepare_text($a->profile['interest'])) {
-                               $profile['interest'] = array(t('Hobbies/Interests:'), $txt);
+                               $profile['interest'] = [L10n::t('Hobbies/Interests:'), $txt];
                        }
 
                        if ($txt = prepare_text($a->profile['likes'])) {
-                               $profile['likes'] = array(t('Likes:'), $txt);
+                               $profile['likes'] = [L10n::t('Likes:'), $txt];
                        }
 
                        if ($txt = prepare_text($a->profile['dislikes'])) {
-                               $profile['dislikes'] = array(t('Dislikes:'), $txt);
+                               $profile['dislikes'] = [L10n::t('Dislikes:'), $txt];
                        }
 
                        if ($txt = prepare_text($a->profile['contact'])) {
-                               $profile['contact'] = array(t('Contact information and Social Networks:'), $txt);
+                               $profile['contact'] = [L10n::t('Contact information and Social Networks:'), $txt];
                        }
 
                        if ($txt = prepare_text($a->profile['music'])) {
-                               $profile['music'] = array(t('Musical interests:'), $txt);
+                               $profile['music'] = [L10n::t('Musical interests:'), $txt];
                        }
 
                        if ($txt = prepare_text($a->profile['book'])) {
-                               $profile['book'] = array(t('Books, literature:'), $txt);
+                               $profile['book'] = [L10n::t('Books, literature:'), $txt];
                        }
 
                        if ($txt = prepare_text($a->profile['tv'])) {
-                               $profile['tv'] = array(t('Television:'), $txt);
+                               $profile['tv'] = [L10n::t('Television:'), $txt];
                        }
 
                        if ($txt = prepare_text($a->profile['film'])) {
-                               $profile['film'] = array(t('Film/dance/culture/entertainment:'), $txt);
+                               $profile['film'] = [L10n::t('Film/dance/culture/entertainment:'), $txt];
                        }
 
                        if ($txt = prepare_text($a->profile['romance'])) {
-                               $profile['romance'] = array(t('Love/Romance:'), $txt);
+                               $profile['romance'] = [L10n::t('Love/Romance:'), $txt];
                        }
 
                        if ($txt = prepare_text($a->profile['work'])) {
-                               $profile['work'] = array(t('Work/employment:'), $txt);
+                               $profile['work'] = [L10n::t('Work/employment:'), $txt];
                        }
 
                        if ($txt = prepare_text($a->profile['education'])) {
-                               $profile['education'] = array(t('School/education:'), $txt);
+                               $profile['education'] = [L10n::t('School/education:'), $txt];
                        }
 
                        //show subcribed forum if it is enabled in the usersettings
                        if (Feature::isEnabled($uid, 'forumlist_profile')) {
-                               $profile['forumlist'] = array(t('Forums:'), ForumManager::profileAdvanced($uid));
+                               $profile['forumlist'] = [L10n::t('Forums:'), ForumManager::profileAdvanced($uid)];
                        }
 
                        if ($a->profile['uid'] == local_user()) {
-                               $profile['edit'] = array(System::baseUrl() . '/profiles/' . $a->profile['id'], t('Edit profile'), '', t('Edit profile'));
+                               $profile['edit'] = [System::baseUrl() . '/profiles/' . $a->profile['id'], L10n::t('Edit profile'), '', L10n::t('Edit profile')];
                        }
 
-                       return replace_macros($tpl, array(
-                               '$title' => t('Profile'),
-                               '$basic' => t('Basic'),
-                               '$advanced' => t('Advanced'),
+                       return replace_macros($tpl, [
+                               '$title' => L10n::t('Profile'),
+                               '$basic' => L10n::t('Basic'),
+                               '$advanced' => L10n::t('Advanced'),
                                '$profile' => $profile
-                       ));
+                       ]);
                }
 
                return '';
        }
 
-       function profile_tabs($a, $is_owner = false, $nickname = null)
+       public static function getTabs($a, $is_owner = false, $nickname = null)
        {
                if (is_null($nickname)) {
                        $nickname = $a->user['nickname'];
@@ -857,92 +870,102 @@ class Profile
 
                $url = System::baseUrl() . '/profile/' . $nickname;
 
-               $tabs = array(
-                       array(
-                               'label' => t('Status'),
+               $tabs = [
+                       [
+                               'label' => L10n::t('Status'),
                                'url'   => $url,
                                'sel'   => !$tab && $a->argv[0] == 'profile' ? 'active' : '',
-                               'title' => t('Status Messages and Posts'),
+                               'title' => L10n::t('Status Messages and Posts'),
                                'id'    => 'status-tab',
                                'accesskey' => 'm',
-                       ),
-                       array(
-                               'label' => t('Profile'),
+                       ],
+                       [
+                               'label' => L10n::t('Profile'),
                                'url'   => $url . '/?tab=profile',
                                'sel'   => $tab == 'profile' ? 'active' : '',
-                               'title' => t('Profile Details'),
+                               'title' => L10n::t('Profile Details'),
                                'id'    => 'profile-tab',
                                'accesskey' => 'r',
-                       ),
-                       array(
-                               'label' => t('Photos'),
+                       ],
+                       [
+                               'label' => L10n::t('Photos'),
                                'url'   => System::baseUrl() . '/photos/' . $nickname,
                                'sel'   => !$tab && $a->argv[0] == 'photos' ? 'active' : '',
-                               'title' => t('Photo Albums'),
+                               'title' => L10n::t('Photo Albums'),
                                'id'    => 'photo-tab',
                                'accesskey' => 'h',
-                       ),
-                       array(
-                               'label' => t('Videos'),
+                       ],
+                       [
+                               'label' => L10n::t('Videos'),
                                'url'   => System::baseUrl() . '/videos/' . $nickname,
                                'sel'   => !$tab && $a->argv[0] == 'videos' ? 'active' : '',
-                               'title' => t('Videos'),
+                               'title' => L10n::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'),
+                       $tabs[] = [
+                               'label' => L10n::t('Events'),
                                'url'   => System::baseUrl() . '/events',
                                'sel'   => !$tab && $a->argv[0] == 'events' ? 'active' : '',
-                               'title' => t('Events and Calendar'),
+                               'title' => L10n::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'),
+                       $tabs[] = [
+                               'label' => L10n::t('Events'),
                                'url'   => System::baseUrl() . '/cal/' . $nickname,
                                'sel'   => !$tab && $a->argv[0] == 'cal' ? 'active' : '',
-                               'title' => t('Events and Calendar'),
+                               'title' => L10n::t('Events and Calendar'),
                                'id'    => 'events-tab',
                                'accesskey' => 'e',
-                       );
+                       ];
                }
 
                if ($is_owner) {
-                       $tabs[] = array(
-                               'label' => t('Personal Notes'),
+                       $tabs[] = [
+                               'label' => L10n::t('Personal Notes'),
                                'url'   => System::baseUrl() . '/notes',
                                'sel'   => !$tab && $a->argv[0] == 'notes' ? 'active' : '',
-                               'title' => t('Only You Can See This'),
+                               'title' => L10n::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'),
+               if (!empty($_SESSION['new_member']) && $is_owner) {
+                       $tabs[] = [
+                               'label' => L10n::t('Tips for New Members'),
+                               'url'   => System::baseUrl() . '/newmember',
+                               'sel'   => false,
+                               'title' => L10n::t('Tips for New Members'),
+                               'id'    => 'newmember-tab',
+                       ];
+               }
+
+               if (!$is_owner && empty($a->profile['hide-friends'])) {
+                       $tabs[] = [
+                               'label' => L10n::t('Contacts'),
                                'url'   => System::baseUrl() . '/viewcontacts/' . $nickname,
                                'sel'   => !$tab && $a->argv[0] == 'viewcontacts' ? 'active' : '',
-                               'title' => t('Contacts'),
+                               'title' => L10n::t('Contacts'),
                                'id'    => 'viewcontacts-tab',
                                'accesskey' => 'k',
-                       );
+                       ];
                }
 
-               $arr = array('is_owner' => $is_owner, 'nickname' => $nickname, 'tab' => $tab, 'tabs' => $tabs);
-               call_hooks('profile_tabs', $arr);
+               $arr = ['is_owner' => $is_owner, 'nickname' => $nickname, 'tab' => $tab, 'tabs' => $tabs];
+               Addon::callHooks('profile_tabs', $arr);
 
                $tpl = get_markup_template('common_tabs.tpl');
 
-               return replace_macros($tpl, array('$tabs' => $arr['tabs']));
+               return replace_macros($tpl, ['$tabs' => $arr['tabs']]);
        }
 
        /**
@@ -950,7 +973,7 @@ class Profile
         *
         * @return string
         */
-       function get_my_url()
+       public static function getMyURL()
        {
                if (x($_SESSION, 'my_url')) {
                        return $_SESSION['my_url'];
@@ -958,28 +981,134 @@ class Profile
                return null;
        }
 
-       function zrl_init(App $a)
+       /**
+        * Process the 'zrl' parameter and initiate the remote authentication.
+        *
+        * This method checks if the visitor has a public contact entry and
+        * redirects the visitor to his/her instance to start the magic auth (Authentication)
+        * process.
+        *
+        * Ported from Hubzilla: https://framagit.org/hubzilla/core/blob/master/include/channel.php
+        *
+        * @param App $a Application instance.
+        */
+       public static function zrlInit(App $a)
        {
-               $my_url = get_my_url();
-               $my_url = validate_url($my_url);
+               $my_url = self::getMyURL();
+               $my_url = Network::isUrlValid($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);
+                       if (!local_user()) {
+                               // 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'], [Protocol::FEED, Protocol::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;
+                               Worker::add(PRIORITY_LOW, 'GProbe', $my_url);
+                               $arr = ['zrl' => $my_url, 'url' => $a->cmd];
+                               Addon::callHooks('zrl_init', $arr);
+
+                               // Try to find the public contact entry of the visitor.
+                               $cid = Contact::getIdForURL($my_url);
+                               if (!$cid) {
+                                       logger('No contact record found for ' . $my_url, LOGGER_DEBUG);
+                                       return;
+                               }
+
+                               $contact = DBA::selectFirst('contact',['id', 'url'], ['id' => $cid]);
+
+                               if (DBA::isResult($contact) && remote_user() && remote_user() == $contact['id']) {
+                                       // The visitor is already authenticated.
+                                       return;
+                               }
+
+                               logger('Not authenticated. Invoking reverse magic-auth for ' . $my_url, LOGGER_DEBUG);
+
+                               // Try to avoid recursion - but send them home to do a proper magic auth.
+                               $query = str_replace(array('?zrl=', '&zid='), array('?rzrl=', '&rzrl='), $a->query_string);
+                               // The other instance needs to know where to redirect.
+                               $dest = urlencode(System::baseUrl() . '/' . $query);
+
+                               // We need to extract the basebath from the profile url
+                               // to redirect the visitors '/magic' module.
+                               // Note: We should have the basepath of a contact also in the contact table.
+                               $urlarr = explode('/profile/', $contact['url']);
+                               $basepath = $urlarr[0];
+
+                               if ($basepath != System::baseUrl() && !strstr($dest, '/magic') && !strstr($dest, '/rmagic')) {
+                                       $magic_path = $basepath . '/magic' . '?f=&owa=1&dest=' . $dest;
+                                       $serverret = Network::curl($magic_path);
+                                       if (!empty($serverret['success'])) {
+                                               goaway($magic_path);
+                                       }
+                               }
                        }
+               }
+       }
+
+       /**
+        * OpenWebAuth authentication.
+        *
+        * Ported from Hubzilla: https://framagit.org/hubzilla/core/blob/master/include/zid.php
+        *
+        * @param string $token
+        */
+       public static function openWebAuthInit($token)
+       {
+               $a = get_app();
+
+               // Clean old OpenWebAuthToken entries.
+               OpenWebAuthToken::purge('owt', '3 MINUTE');
+
+               // Check if the token we got is the same one
+               // we have stored in the database.
+               $visitor_handle = OpenWebAuthToken::getMeta('owt', 0, $token);
+
+               if($visitor_handle === false) {
+                       return;
+               }
 
-                       Worker::add(PRIORITY_LOW, 'GProbe', $my_url);
-                       $arr = array('zrl' => $my_url, 'url' => $a->cmd);
-                       call_hooks('zrl_init', $arr);
+               // Try to find the public contact entry of the visitor.
+               $cid = Contact::getIdForURL($visitor_handle);
+               if(!$cid) {
+                       logger('owt: unable to finger ' . $visitor_handle, LOGGER_DEBUG);
+                       return;
                }
+
+               $visitor = DBA::selectFirst('contact', [], ['id' => $cid]);
+
+               // Authenticate the visitor.
+               $_SESSION['authenticated'] = 1;
+               $_SESSION['visitor_id'] = $visitor['id'];
+               $_SESSION['visitor_handle'] = $visitor['addr'];
+               $_SESSION['visitor_home'] = $visitor['url'];
+               $_SESSION['my_url'] = $visitor['url'];
+
+               $arr = [
+                       'visitor' => $visitor,
+                       'url' => $a->query_string
+               ];
+               /**
+                * @hooks magic_auth_success
+                *   Called when a magic-auth was successful.
+                *   * \e array \b visitor
+                *   * \e string \b url
+                */
+               Addon::callHooks('magic_auth_success', $arr);
+
+               $a->contact = $arr['visitor'];
+
+               info(L10n::t('OpenWebAuth: %1$s welcomes %2$s', $a->get_hostname(), $visitor['name']));
+
+               logger('OpenWebAuth: auth success from ' . $visitor['addr'], LOGGER_DEBUG);
        }
 
-       function zrl($s, $force = false)
+       public static function zrl($s, $force = false)
        {
                if (!strlen($s)) {
                        return $s;
@@ -991,7 +1120,7 @@ class Profile
                        $s = $s . '/';
                }
                $achar = strpos($s, '?') ? '&' : '?';
-               $mine = get_my_url();
+               $mine = self::getMyURL();
                if ($mine && !link_compare($mine, $s)) {
                        return $s . $achar . 'zrl=' . urlencode($mine);
                }
@@ -999,7 +1128,7 @@ class Profile
        }
 
        /**
-        * @brief Get the user ID of the page owner
+        * 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
@@ -1007,12 +1136,13 @@ class Profile
         * system pconfig, which means they don't want to see anybody else's theme
         * settings except their own while on this site.
         *
+        * @brief Get the user ID of the page owner
         * @return int user ID
         *
         * @note Returns local_user instead of user ID if "always_my_theme"
         *      is set to true
         */
-       function get_theme_uid()
+       public static function getThemeUid()
        {
                $uid = ((!empty($_REQUEST['puid'])) ? intval($_REQUEST['puid']) : 0);
                if ((local_user()) && ((PConfig::get(local_user(), 'system', 'always_my_theme')) || (!$uid))) {
@@ -1022,4 +1152,25 @@ class Profile
                return $uid;
        }
 
+       /**
+       * Stip zrl parameter from a string.
+       *
+       * @param string $s The input string.
+       * @return string The zrl.
+       */
+       public static function stripZrls($s)
+       {
+               return preg_replace('/[\?&]zrl=(.*?)([\?&]|$)/is', '', $s);
+       }
+
+       /**
+       * Stip query parameter from a string.
+       *
+       * @param string $s The input string.
+       * @return string The query parameter.
+       */
+       public static function stripQueryParam($s, $param)
+       {
+               return preg_replace('/[\?&]' . $param . '=(.*?)(&|$)/ism', '$2', $s);
+       }
 }