]> git.mxchange.org Git - friendica.git/blobdiff - src/Model/Profile.php
improve Profile model
[friendica.git] / src / Model / Profile.php
index 15ad83ed85f60dd916ff528c6fb27a7afd497af0..1437068f92c7068002c0012c8f1eaeb292b52487 100644 (file)
@@ -8,25 +8,62 @@ use Friendica\App;
 use Friendica\Content\Feature;
 use Friendica\Content\ForumManager;
 use Friendica\Content\Text\BBCode;
-use Friendica\Core\Addon;
+use Friendica\Content\Text\HTML;
+use Friendica\Content\Widget\ContactBlock;
 use Friendica\Core\Cache;
 use Friendica\Core\Config;
+use Friendica\Core\Hook;
 use Friendica\Core\L10n;
+use Friendica\Core\Logger;
 use Friendica\Core\PConfig;
+use Friendica\Core\Protocol;
+use Friendica\Core\Renderer;
+use Friendica\Core\Session;
 use Friendica\Core\System;
 use Friendica\Core\Worker;
 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\Strings;
 use Friendica\Util\Temporal;
 
-require_once 'include/dba.php';
-require_once 'mod/proxy.php';
-
 class Profile
 {
+       /**
+        * @brief Returns default profile for a given user id
+        *
+        * @param integer User ID
+        *
+        * @return array Profile data
+        * @throws \Exception
+        */
+       public static function getByUID($uid)
+       {
+               $profile = DBA::selectFirst('profile', [], ['uid' => $uid, 'is-default' => true]);
+               return $profile;
+       }
+
+       /**
+        * @brief Returns the profile based on a ID
+        *
+        * @param int $uid The User ID
+        * @param int $id The id of the profile (optional)
+        * @param array $fields The fields to retrieve
+        *
+        * @return array Array of profile data
+        * @throws \Exception
+        */
+       public static function select(int $uid, int $id = null, array $fields = [])
+       {
+               if (empty($id)) {
+                       return DBA::selectToArray('profile', $fields, ['uid' => $uid]);
+               } else {
+                       return DBA::selectFirst('profile', $fields, ['uid' => $uid, 'id' => $id]);
+               }
+       }
+
        /**
         * @brief Returns a formatted location string from the given profile array
         *
@@ -81,26 +118,31 @@ class Profile
         *      load a lot of theme-specific content
         *
         * @brief Loads a profile into the page sidebar.
-        * @param object  $a            App
+        * @param App     $a
         * @param string  $nickname     string
         * @param int     $profile      int
         * @param array   $profiledata  array
         * @param boolean $show_connect Show connect link
+        * @throws \Friendica\Network\HTTPException\InternalServerErrorException
+        * @throws \ImagickException
         */
        public static function load(App $a, $nickname, $profile = 0, array $profiledata = [], $show_connect = true)
        {
                $user = DBA::selectFirst('user', ['uid'], ['nickname' => $nickname, 'account_removed' => false]);
 
                if (!DBA::isResult($user) && empty($profiledata)) {
-                       logger('profile error: ' . $a->query_string, LOGGER_DEBUG);
-                       notice(L10n::t('Requested account is not available.') . EOL);
-                       $a->error = 404;
+                       Logger::log('profile error: ' . $a->query_string, Logger::DEBUG);
                        return;
                }
 
                if (count($profiledata) > 0) {
+                       // Ensure to have a "nickname" field
+                       if (empty($profiledata['nickname']) && !empty($profiledata['nick'])) {
+                               $profiledata['nickname'] = $profiledata['nick'];
+                       }
+
                        // Add profile data to sidebar
-                       $a->page['aside'] .= self::sidebar($profiledata, true, $show_connect);
+                       $a->page['aside'] .= self::sidebar($a, $profiledata, true, $show_connect);
 
                        if (!DBA::isResult($user)) {
                                return;
@@ -110,21 +152,21 @@ class Profile
                $pdata = self::getByNickname($nickname, $user['uid'], $profile);
 
                if (empty($pdata) && empty($profiledata)) {
-                       logger('profile error: ' . $a->query_string, LOGGER_DEBUG);
-                       notice(L10n::t('Requested profile is not available.') . EOL);
-                       $a->error = 404;
+                       Logger::log('profile error: ' . $a->query_string, Logger::DEBUG);
                        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'];
                        }
                }
 
@@ -132,7 +174,7 @@ 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'] . ' @ ' . Config::get('config', 'sitename');
 
@@ -146,7 +188,7 @@ class Profile
                * load/reload current theme info
                */
 
-               $a->set_template_engine(); // reset the template engine to the default in case the user's theme doesn't specify one
+               Renderer::setActiveTemplateEngine(); // reset the template engine to the default in case the user's theme doesn't specify one
 
                $theme_info_file = 'view/theme/' . $a->getCurrentTheme() . '/theme.php';
                if (file_exists($theme_info_file)) {
@@ -154,8 +196,8 @@ class Profile
                }
 
                if (local_user() && local_user() == $a->profile['uid'] && $profiledata) {
-                       $a->page['aside'] .= replace_macros(
-                               get_markup_template('profile_edlink.tpl'),
+                       $a->page['aside'] .= Renderer::replaceMacros(
+                               Renderer::getMarkupTemplate('profile_edlink.tpl'),
                                [
                                        '$editprofile' => L10n::t('Edit profile'),
                                        '$profid' => $a->profile['id']
@@ -171,7 +213,7 @@ class Profile
                 * But: When this profile was on the same server, then we could display the contacts
                 */
                if (!$profiledata) {
-                       $a->page['aside'] .= self::sidebar($a->profile, $block, $show_connect);
+                       $a->page['aside'] .= self::sidebar($a, $a->profile, $block, $show_connect);
                }
 
                return;
@@ -188,14 +230,15 @@ 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
+        * @param string $nickname   nick
+        * @param int    $uid        uid
+        * @param int    $profile_id ID of the profile
         * @return array
+        * @throws \Exception
         */
        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']]);
@@ -247,28 +290,28 @@ class Profile
         * because of all the conditional logic.
         *
         * @brief Formats a profile for display in the sidebar.
-        * @param array $profile
-        * @param int $block
+        * @param array   $profile
+        * @param int     $block
         * @param boolean $show_connect Show connect link
         *
         * @return string HTML sidebar module
         *
-        * @note Returns empty string if passed $profile is wrong type or not populated
+        * @throws \Friendica\Network\HTTPException\InternalServerErrorException
+        * @throws \ImagickException
+        * @note  Returns empty string if passed $profile is wrong type or not populated
         *
         * @hooks 'profile_sidebar_enter'
         *      array $profile - profile data
         * @hooks 'profile_sidebar'
         *      array $arr
         */
-       private static function sidebar($profile, $block = 0, $show_connect = true)
+       private static function sidebar(App $a, $profile, $block = 0, $show_connect = true)
        {
-               $a = get_app();
-
                $o = '';
                $location = false;
 
                // This function can also use contact information in $profile
-               $is_contact = x($profile, 'cid');
+               $is_contact = !empty($profile['cid']);
 
                if (!is_array($profile) && !count($profile)) {
                        return $o;
@@ -276,148 +319,131 @@ class Profile
 
                $profile['picdate'] = urlencode(defaults($profile, 'picdate', ''));
 
-               if (($profile['network'] != '') && ($profile['network'] != NETWORK_DFRN)) {
-                       $profile['network_name'] = format_network_name($profile['network'], $profile['url']);
+               if (($profile['network'] != '') && ($profile['network'] != Protocol::DFRN)) {
+                       $profile['network_link'] = Strings::formatNetworkName($profile['network'], $profile['url']);
                } else {
-                       $profile['network_name'] = '';
+                       $profile['network_link'] = '';
                }
 
-               Addon::callHooks('profile_sidebar_enter', $profile);
-
-
-               // don't show connect link to yourself
-               $connect = $profile['uid'] != local_user() ? L10n::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']) {
-                                       $connect = false;
-                                       break;
-                               }
-                       }
-               }
+               Hook::callAll('profile_sidebar_enter', $profile);
 
-               if (!$show_connect) {
-                       $connect = false;
+               if (isset($profile['url'])) {
+                       $profile_url = $profile['url'];
+               } else {
+                       $profile_url = $a->getBaseURL() . '/profile/' . $profile['nickname'];
                }
 
-               $profile_url = '';
-
-               // Is the local user already connected to that user?
-               if ($connect && local_user()) {
-                       if (isset($profile['url'])) {
-                               $profile_url = normalise_link($profile['url']);
-                       } else {
-                               $profile_url = normalise_link(System::baseUrl() . '/profile/' . $profile['nickname']);
-                       }
+               $follow_link = null;
+               $unfollow_link = null;
+               $subscribe_feed_link = null;
+               $wallmessage_link = null;
 
-                       if (DBA::exists('contact', ['pending' => false, 'uid' => local_user(), 'nurl' => $profile_url])) {
-                               $connect = false;
-                       }
-               }
 
-               if ($connect && ($profile['network'] != NETWORK_DFRN) && !isset($profile['remoteconnect'])) {
-                       $connect = false;
-               }
 
-               $remoteconnect = null;
-               if (isset($profile['remoteconnect'])) {
-                       $remoteconnect = $profile['remoteconnect'];
+               $visitor_contact = [];
+               if (!empty($profile['uid']) && self::getMyURL()) {
+                       $visitor_contact = Contact::selectFirst(['rel'], ['uid' => $profile['uid'], 'nurl' => Strings::normaliseLink(self::getMyURL())]);
                }
 
-               if ($connect && ($profile['network'] == NETWORK_DFRN) && !isset($remoteconnect)) {
-                       $subscribe_feed = L10n::t('Atom feed');
-               } else {
-                       $subscribe_feed = false;
+               $profile_contact = [];
+               if (!empty($profile['cid']) && self::getMyURL()) {
+                       $profile_contact = Contact::selectFirst(['rel'], ['id' => $profile['cid']]);
                }
 
-               if (remote_user() || (self::getMyURL() && x($profile, 'unkmail') && ($profile['uid'] != local_user()))) {
-                       $wallmessage = L10n::t('Message');
-                       $wallmessage_link = 'wallmessage/' . $profile['nickname'];
+               $profile_is_dfrn = $profile['network'] == Protocol::DFRN;
+               $profile_is_native = in_array($profile['network'], Protocol::NATIVE_SUPPORT);
+               $local_user_is_self = local_user() && local_user() == ($profile['profile_uid'] ?? 0);
+               $visitor_is_authenticated = (bool)self::getMyURL();
+               $visitor_is_following =
+                       in_array($visitor_contact['rel'] ?? 0, [Contact::FOLLOWER, Contact::FRIEND])
+                       || in_array($profile_contact['rel'] ?? 0, [Contact::SHARING, Contact::FRIEND]);
+               $visitor_is_followed =
+                       in_array($visitor_contact['rel'] ?? 0, [Contact::SHARING, Contact::FRIEND])
+                       || in_array($profile_contact['rel'] ?? 0, [Contact::FOLLOWER, Contact::FRIEND]);
+               $visitor_base_path = self::getMyURL() ? preg_replace('=/profile/(.*)=ism', '', self::getMyURL()) : '';
+
+               if (!$local_user_is_self && $show_connect) {
+                       if (!$visitor_is_authenticated) {
+                               $follow_link = 'dfrn_request/' . $profile['nickname'];
+                       } elseif ($profile_is_native) {
+                               if ($visitor_is_following) {
+                                       $unfollow_link = $visitor_base_path . '/unfollow?url=' . urlencode($profile_url);
+                               } else {
+                                       $follow_link =  $visitor_base_path .'/follow?url=' . urlencode($profile_url);
+                               }
+                       }
 
-                       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::FRIEND)
-                               );
-                       } else {
-                               $r = q(
-                                       "SELECT `url` FROM `contact` WHERE `uid` = %d AND `nurl` = '%s' AND `rel` = %d",
-                                       intval($profile['uid']),
-                                       DBA::escape(normalise_link(self::getMyURL())),
-                                       intval(Contact::FRIEND)
-                               );
+                       if ($profile_is_dfrn) {
+                               $subscribe_feed_link = 'dfrn_poll/' . $profile['nickname'];
                        }
-                       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']);
+
+                       if (Contact::canReceivePrivateMessages($profile)) {
+                               if ($visitor_is_followed || $visitor_is_following) {
+                                       $wallmessage_link = $visitor_base_path . '/message/new/' . base64_encode(defaults($profile, 'addr', ''));
+                               } elseif ($visitor_is_authenticated && !empty($profile['unkmail'])) {
+                                       $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'] = [System::baseUrl() . '/profiles', L10n::t('Profiles'), '', L10n::t('Manage/edit profiles')];
-                       $r = q(
-                               "SELECT * FROM `profile` WHERE `uid` = %d",
-                               local_user()
-                       );
+               if (!$is_contact && $local_user_is_self) {
+                       if (Feature::isEnabled(local_user(), 'multi_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'] = [
-                               'chg_photo' => L10n::t('Change profile photo'),
-                               'cr_new' => L10n::t('Create New Profile'),
-                               'entries' => [],
-                       ];
+                               $profile['menu'] = [
+                                       'chg_photo' => L10n::t('Change profile photo'),
+                                       'cr_new' => L10n::t('Create New Profile'),
+                                       'entries' => [],
+                               ];
 
-                       if (DBA::isResult($r)) {
-                               foreach ($r as $rr) {
-                                       $profile['menu']['entries'][] = [
-                                               'photo' => $rr['thumb'],
-                                               'id' => $rr['id'],
-                                               'alt' => L10n::t('Profile Image'),
-                                               'profile_name' => $rr['profile-name'],
-                                               'isdefault' => $rr['is-default'],
-                                               'visibile_to_everybody' => L10n::t('visible to everybody'),
-                                               'edit_visibility' => L10n::t('Edit visibility'),
-                                       ];
+                               if (DBA::isResult($r)) {
+                                       foreach ($r as $rr) {
+                                               $profile['menu']['entries'][] = [
+                                                       'photo' => $rr['thumb'],
+                                                       'id' => $rr['id'],
+                                                       'alt' => L10n::t('Profile Image'),
+                                                       'profile_name' => $rr['profile-name'],
+                                                       'isdefault' => $rr['is-default'],
+                                                       'visibile_to_everybody' => L10n::t('visible to everybody'),
+                                                       'edit_visibility' => L10n::t('Edit visibility'),
+                                               ];
+                                       }
                                }
+                       } else {
+                               $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' => [],
+                               ];
                        }
                }
-               if (!$is_contact && $profile['uid'] == local_user() && !Feature::isEnabled(local_user(), 'multi_profiles')) {
-                       $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' => [],
-                       ];
-               }
 
                // Fetch the account type
                $account_type = Contact::getAccountType($profile);
 
-               if (x($profile, 'address')
-                       || x($profile, 'location')
-                       || x($profile, 'locality')
-                       || x($profile, 'region')
-                       || x($profile, 'postal-code')
-                       || x($profile, 'country-name')
+               if (!empty($profile['address'])
+                       || !empty($profile['location'])
+                       || !empty($profile['locality'])
+                       || !empty($profile['region'])
+                       || !empty($profile['postal-code'])
+                       || !empty($profile['country-name'])
                ) {
                        $location = L10n::t('Location:');
                }
 
-               $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;
+               $gender   = !empty($profile['gender'])   ? L10n::t('Gender:')   : false;
+               $marital  = !empty($profile['marital'])  ? L10n::t('Status:')   : false;
+               $homepage = !empty($profile['homepage']) ? L10n::t('Homepage:') : false;
+               $about    = !empty($profile['about'])    ? L10n::t('About:')    : false;
+               $xmpp     = !empty($profile['xmpp'])     ? L10n::t('XMPP:')     : false;
 
-               if ((x($profile, 'hidewall') || $block) && !local_user() && !remote_user()) {
+               if ((!empty($profile['hidewall']) || $block) && !local_user() && !remote_user()) {
                        $location = $gender = $marital = $homepage = $about = false;
                }
 
@@ -425,7 +451,7 @@ class Profile
                $firstname = $split_name['first'];
                $lastname = $split_name['last'];
 
-               if (x($profile, 'guid')) {
+               if (!empty($profile['guid'])) {
                        $diaspora = [
                                'guid' => $profile['guid'],
                                'podloc' => System::baseUrl(),
@@ -444,9 +470,9 @@ class Profile
 
                $contact_block = '';
                $updated = '';
-               $contacts = 0;
+               $contact_count = 0;
                if (!$block) {
-                       $contact_block = contact_block();
+                       $contact_block = ContactBlock::getHTML($a->profile);
 
                        if (is_array($a->profile) && !$a->profile['hide-friends']) {
                                $r = q(
@@ -457,20 +483,15 @@ class Profile
                                        $updated = date('c', strtotime($r[0]['updated']));
                                }
 
-                               $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`
-                                               AND `network` IN ('%s', '%s', '%s', '')",
-                                       intval($profile['uid']),
-                                       DBA::escape(NETWORK_DFRN),
-                                       DBA::escape(NETWORK_DIASPORA),
-                                       DBA::escape(NETWORK_OSTATUS)
-                               );
-                               if (DBA::isResult($r)) {
-                                       $contacts = intval($r[0]['total']);
-                               }
+                               $contact_count = DBA::count('contact', [
+                                       'uid' => $profile['uid'],
+                                       'self' => false,
+                                       'blocked' => false,
+                                       'pending' => false,
+                                       'hidden' => false,
+                                       'archive' => false,
+                                       'network' => Protocol::FEDERATED,
+                               ]);
                        }
                }
 
@@ -484,26 +505,31 @@ class Profile
                        $p['about'] = BBCode::convert($p['about']);
                }
 
+               if (empty($p['address']) && !empty($p['location'])) {
+                       $p['address'] = $p['location'];
+               }
+
                if (isset($p['address'])) {
                        $p['address'] = BBCode::convert($p['address']);
-               } else {
-                       $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, [
+               $tpl = Renderer::getMarkupTemplate('profile_vcard.tpl');
+               $o .= Renderer::replaceMacros($tpl, [
                        '$profile' => $p,
                        '$xmpp' => $xmpp,
-                       '$connect' => $connect,
-                       '$remoteconnect' => $remoteconnect,
-                       '$subscribe_feed' => $subscribe_feed,
-                       '$wallmessage' => $wallmessage,
+                       '$follow' => L10n::t('Follow'),
+                       '$follow_link' => $follow_link,
+                       '$unfollow' => L10n::t('Unfollow'),
+                       '$unfollow_link' => $unfollow_link,
+                       '$subscribe_feed' => L10n::t('Atom feed'),
+                       '$subscribe_feed_link' => $subscribe_feed_link,
+                       '$wallmessage' => L10n::t('Message'),
                        '$wallmessage_link' => $wallmessage_link,
                        '$account_type' => $account_type,
                        '$location' => $location,
@@ -512,7 +538,7 @@ class Profile
                        '$homepage' => $homepage,
                        '$about' => $about,
                        '$network' => L10n::t('Network:'),
-                       '$contacts' => $contacts,
+                       '$contacts' => $contact_count,
                        '$updated' => $updated,
                        '$diaspora' => $diaspora,
                        '$contact_block' => $contact_block,
@@ -520,14 +546,14 @@ class Profile
 
                $arr = ['profile' => &$profile, 'entry' => &$o];
 
-               Addon::callHooks('profile_sidebar', $arr);
+               Hook::callAll('profile_sidebar', $arr);
 
                return $o;
        }
 
        public static function getBirthdays()
        {
-               $a = get_app();
+               $a = \get_app();
                $o = '';
 
                if (!local_user() || $a->is_mobile || $a->is_tablet) {
@@ -549,16 +575,25 @@ class Profile
                if (is_null($r)) {
                        $s = DBA::p(
                                "SELECT `event`.*, `event`.`id` AS `eid`, `contact`.* FROM `event`
-                               INNER JOIN `contact` ON `contact`.`id` = `event`.`cid`
+                               INNER JOIN `contact`
+                                       ON `contact`.`id` = `event`.`cid`
+                                       AND (`contact`.`rel` = ? OR `contact`.`rel` = ?)
+                                       AND NOT `contact`.`pending`
+                                       AND NOT `contact`.`hidden`
+                                       AND NOT `contact`.`blocked`
+                                       AND NOT `contact`.`archive`
+                                       AND NOT `contact`.`deleted`
                                WHERE `event`.`uid` = ? AND `type` = 'birthday' AND `start` < ? AND `finish` > ?
                                ORDER BY `start` ASC ",
+                               Contact::SHARING,
+                               Contact::FRIEND,
                                local_user(),
                                DateTimeFormat::utc('now + 6 days'),
                                DateTimeFormat::utcNow()
                        );
                        if (DBA::isResult($s)) {
                                $r = DBA::toArray($s);
-                               Cache::set($cachekey, $r, CACHE_HOUR);
+                               Cache::set($cachekey, $r, Cache::HOUR);
                        }
                }
 
@@ -595,15 +630,14 @@ class Profile
 
                                        $rr['link'] = Contact::magicLink($rr['url']);
                                        $rr['title'] = $rr['name'];
-                                       $rr['date'] = day_translate(DateTimeFormat::convert($rr['start'], $a->timezone, 'UTC', $rr['adjust'] ? $bd_format : $bd_short)) . (($today) ? ' ' . L10n::t('[today]') : '');
+                                       $rr['date'] = L10n::getDay(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, [
-                       '$baseurl' => System::baseUrl(),
+               $tpl = Renderer::getMarkupTemplate('birthdays_reminder.tpl');
+               return Renderer::replaceMacros($tpl, [
                        '$classtoday' => $classtoday,
                        '$count' => $total,
                        '$event_reminders' => L10n::t('Birthday Reminders'),
@@ -616,7 +650,7 @@ class Profile
 
        public static function getEventsReminderHTML()
        {
-               $a = get_app();
+               $a = \get_app();
                $o = '';
 
                if (!local_user() || $a->is_mobile || $a->is_tablet) {
@@ -633,40 +667,29 @@ class Profile
                $bd_format = L10n::t('g A l F d'); // 8 AM Friday January 18
                $classtoday = '';
 
-               $s = DBA::p(
-                       "SELECT `event`.*
-                       FROM `event`
-                       INNER JOIN `item`
-                               ON `item`.`uid` = `event`.`uid`
-                               AND `item`.`parent-uri` = `event`.`uri`
-                       WHERE `event`.`uid` = ?
-                       AND `event`.`type` != 'birthday'
-                       AND `event`.`start` < ?
-                       AND `event`.`start` >= ?
-                       AND `item`.`author-id` = ?
-                       AND (`item`.`verb` = ? OR `item`.`verb` = ?)
-                       AND `item`.`visible`
-                       AND NOT `item`.`deleted`
-                       ORDER BY  `event`.`start` ASC",
-                       local_user(),
-                       DateTimeFormat::utc('now + 7 days'),
-                       DateTimeFormat::utc('now - 1 days'),
-                       public_contact(),
-                       ACTIVITY_ATTEND,
-                       ACTIVITY_ATTENDMAYBE
-               );
+               $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 = [];
 
                if (DBA::isResult($s)) {
                        $istoday = false;
+                       $total = 0;
 
                        while ($rr = DBA::fetch($s)) {
-                               if (strlen($rr['name'])) {
-                                       $total ++;
+                               $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;
+                               }
+
+                               if (strlen($rr['summary'])) {
+                                       $total++;
                                }
 
-                               $strt = DateTimeFormat::convert($rr['start'], $rr['convert'] ? $a->timezone : 'UTC', 'UTC', 'Y-m-d');
+                               $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;
                                }
@@ -682,7 +705,7 @@ class Profile
                                        $description = L10n::t('[No description]');
                                }
 
-                               $strt = DateTimeFormat::convert($rr['start'], $rr['convert'] ? $a->timezone : 'UTC');
+                               $strt = DateTimeFormat::convert($rr['start'], $rr['adjust'] ? $a->timezone : 'UTC');
 
                                if (substr($strt, 0, 10) < DateTimeFormat::timezoneNow($a->timezone, 'Y-m-d')) {
                                        continue;
@@ -692,7 +715,7 @@ class Profile
 
                                $rr['title'] = $title;
                                $rr['description'] = $description;
-                               $rr['date'] = day_translate(DateTimeFormat::convert($rr['start'], $rr['adjust'] ? $a->timezone : 'UTC', 'UTC', $bd_format)) . (($today) ? ' ' . L10n::t('[today]') : '');
+                               $rr['date'] = L10n::getDay(DateTimeFormat::convert($rr['start'], $rr['adjust'] ? $a->timezone : 'UTC', 'UTC', $bd_format)) . (($today) ? ' ' . L10n::t('[today]') : '');
                                $rr['startime'] = $strt;
                                $rr['today'] = $today;
 
@@ -701,9 +724,8 @@ class Profile
                        DBA::close($s);
                        $classtoday = (($istoday) ? 'event-today' : '');
                }
-               $tpl = get_markup_template('events_reminder.tpl');
-               return replace_macros($tpl, [
-                       '$baseurl' => System::baseUrl(),
+               $tpl = Renderer::getMarkupTemplate('events_reminder.tpl');
+               return Renderer::replaceMacros($tpl, [
                        '$classtoday' => $classtoday,
                        '$count' => count($r),
                        '$event_reminders' => L10n::t('Event Reminders'),
@@ -714,16 +736,10 @@ class Profile
 
        public static function getAdvanced(App $a)
        {
-               $o = '';
-               $uid = $a->profile['uid'];
-
-               $o .= replace_macros(
-                       get_markup_template('section_title.tpl'),
-                       ['$title' => L10n::t('Profile')]
-               );
+               $uid = intval($a->profile['uid']);
 
                if ($a->profile['name']) {
-                       $tpl = get_markup_template('profile_advanced.tpl');
+                       $tpl = Renderer::getMarkupTemplate('profile_advanced.tpl');
 
                        $profile = [];
 
@@ -734,14 +750,14 @@ class Profile
                        }
 
                        if ($a->profile['gender']) {
-                               $profile['gender'] = [L10n::t('Gender:'), $a->profile['gender']];
+                               $profile['gender'] = [L10n::t('Gender:'), L10n::t($a->profile['gender'])];
                        }
 
-                       if (($a->profile['dob']) && ($a->profile['dob'] > '0001-01-01')) {
+                       if (!empty($a->profile['dob']) && $a->profile['dob'] > DBA::NULL_DATE) {
                                $year_bd_format = L10n::t('j F, Y');
                                $short_bd_format = L10n::t('j F');
 
-                               $val = day_translate(
+                               $val = L10n::getDay(
                                        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)
@@ -751,14 +767,14 @@ class Profile
                        }
 
                        if (!empty($a->profile['dob'])
-                               && $a->profile['dob'] > '0001-01-01'
+                               && $a->profile['dob'] > DBA::NULL_DATE
                                && $age = Temporal::getAgeByTimezone($a->profile['dob'], $a->profile['timezone'], '')
                        ) {
                                $profile['age'] = [L10n::t('Age:'), $age];
                        }
 
                        if ($a->profile['marital']) {
-                               $profile['marital'] = [L10n::t('Status:'), $a->profile['marital']];
+                               $profile['marital'] = [L10n::t('Status:'), L10n::t($a->profile['marital'])];
                        }
 
                        /// @TODO Maybe use x() here, plus below?
@@ -766,20 +782,20 @@ class Profile
                                $profile['marital']['with'] = $a->profile['with'];
                        }
 
-                       if (strlen($a->profile['howlong']) && $a->profile['howlong'] >= NULL_DATE) {
+                       if (strlen($a->profile['howlong']) && $a->profile['howlong'] > DBA::NULL_DATETIME) {
                                $profile['howlong'] = Temporal::getRelativeDate($a->profile['howlong'], L10n::t('for %1$d %2$s'));
                        }
 
                        if ($a->profile['sexual']) {
-                               $profile['sexual'] = [L10n::t('Sexual Preference:'), $a->profile['sexual']];
+                               $profile['sexual'] = [L10n::t('Sexual Preference:'), L10n::t($a->profile['sexual'])];
                        }
 
                        if ($a->profile['homepage']) {
-                               $profile['homepage'] = [L10n::t('Homepage:'), linkify($a->profile['homepage'])];
+                               $profile['homepage'] = [L10n::t('Homepage:'), HTML::toLink($a->profile['homepage'])];
                        }
 
                        if ($a->profile['hometown']) {
-                               $profile['hometown'] = [L10n::t('Hometown:'), linkify($a->profile['hometown'])];
+                               $profile['hometown'] = [L10n::t('Hometown:'), HTML::toLink($a->profile['hometown'])];
                        }
 
                        if ($a->profile['pub_keywords']) {
@@ -851,7 +867,7 @@ class Profile
                                $profile['edit'] = [System::baseUrl() . '/profiles/' . $a->profile['id'], L10n::t('Edit profile'), '', L10n::t('Edit profile')];
                        }
 
-                       return replace_macros($tpl, [
+                       return Renderer::replaceMacros($tpl, [
                                '$title' => L10n::t('Profile'),
                                '$basic' => L10n::t('Basic'),
                                '$advanced' => L10n::t('Advanced'),
@@ -862,32 +878,35 @@ class Profile
                return '';
        }
 
-       public static function getTabs($a, $is_owner = false, $nickname = null)
+    /**
+     * @param App    $a
+     * @param string $current
+     * @param bool   $is_owner
+     * @param string $nickname
+     * @return string
+     * @throws \Friendica\Network\HTTPException\InternalServerErrorException
+     */
+       public static function getTabs(App $a, string $current, bool $is_owner, string $nickname = null)
        {
                if (is_null($nickname)) {
                        $nickname = $a->user['nickname'];
                }
 
-               $tab = false;
-               if (x($_GET, 'tab')) {
-                       $tab = notags(trim($_GET['tab']));
-               }
-
-               $url = System::baseUrl() . '/profile/' . $nickname;
+               $baseProfileUrl = System::baseUrl() . '/profile/' . $nickname;
 
                $tabs = [
                        [
                                'label' => L10n::t('Status'),
-                               'url'   => $url,
-                               'sel'   => !$tab && $a->argv[0] == 'profile' ? 'active' : '',
+                               'url'   => $baseProfileUrl,
+                               'sel'   => !$current ? 'active' : '',
                                'title' => L10n::t('Status Messages and Posts'),
                                'id'    => 'status-tab',
                                'accesskey' => 'm',
                        ],
                        [
                                'label' => L10n::t('Profile'),
-                               'url'   => $url . '/?tab=profile',
-                               'sel'   => $tab == 'profile' ? 'active' : '',
+                               'url'   => $baseProfileUrl . '/?tab=profile',
+                               'sel'   => $current == 'profile' ? 'active' : '',
                                'title' => L10n::t('Profile Details'),
                                'id'    => 'profile-tab',
                                'accesskey' => 'r',
@@ -895,7 +914,7 @@ class Profile
                        [
                                'label' => L10n::t('Photos'),
                                'url'   => System::baseUrl() . '/photos/' . $nickname,
-                               'sel'   => !$tab && $a->argv[0] == 'photos' ? 'active' : '',
+                               'sel'   => $current == 'photos' ? 'active' : '',
                                'title' => L10n::t('Photo Albums'),
                                'id'    => 'photo-tab',
                                'accesskey' => 'h',
@@ -903,7 +922,7 @@ class Profile
                        [
                                'label' => L10n::t('Videos'),
                                'url'   => System::baseUrl() . '/videos/' . $nickname,
-                               'sel'   => !$tab && $a->argv[0] == 'videos' ? 'active' : '',
+                               'sel'   => $current == 'videos' ? 'active' : '',
                                'title' => L10n::t('Videos'),
                                'id'    => 'video-tab',
                                'accesskey' => 'v',
@@ -915,7 +934,7 @@ class Profile
                        $tabs[] = [
                                'label' => L10n::t('Events'),
                                'url'   => System::baseUrl() . '/events',
-                               'sel'   => !$tab && $a->argv[0] == 'events' ? 'active' : '',
+                               'sel'   => $current == 'events' ? 'active' : '',
                                'title' => L10n::t('Events and Calendar'),
                                'id'    => 'events-tab',
                                'accesskey' => 'e',
@@ -926,7 +945,7 @@ class Profile
                        $tabs[] = [
                                'label' => L10n::t('Events'),
                                'url'   => System::baseUrl() . '/cal/' . $nickname,
-                               'sel'   => !$tab && $a->argv[0] == 'cal' ? 'active' : '',
+                               'sel'   => $current == 'cal' ? 'active' : '',
                                'title' => L10n::t('Events and Calendar'),
                                'id'    => 'events-tab',
                                'accesskey' => 'e',
@@ -937,7 +956,7 @@ class Profile
                        $tabs[] = [
                                'label' => L10n::t('Personal Notes'),
                                'url'   => System::baseUrl() . '/notes',
-                               'sel'   => !$tab && $a->argv[0] == 'notes' ? 'active' : '',
+                               'sel'   => $current == 'notes' ? 'active' : '',
                                'title' => L10n::t('Only You Can See This'),
                                'id'    => 'notes-tab',
                                'accesskey' => 't',
@@ -954,23 +973,23 @@ class Profile
                        ];
                }
 
-               if (!$is_owner && empty($a->profile['hide-friends'])) {
+               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' : '',
+                               'url'   => $baseProfileUrl . '/contacts',
+                               'sel'   => $current == 'contacts' ? 'active' : '',
                                'title' => L10n::t('Contacts'),
                                'id'    => 'viewcontacts-tab',
                                'accesskey' => 'k',
                        ];
                }
 
-               $arr = ['is_owner' => $is_owner, 'nickname' => $nickname, 'tab' => $tab, 'tabs' => $tabs];
-               Addon::callHooks('profile_tabs', $arr);
+               $arr = ['is_owner' => $is_owner, 'nickname' => $nickname, 'tab' => $current, 'tabs' => $tabs];
+               Hook::callAll('profile_tabs', $arr);
 
-               $tpl = get_markup_template('common_tabs.tpl');
+               $tpl = Renderer::getMarkupTemplate('common_tabs.tpl');
 
-               return replace_macros($tpl, ['$tabs' => $arr['tabs']]);
+               return Renderer::replaceMacros($tpl, ['$tabs' => $arr['tabs']]);
        }
 
        /**
@@ -980,10 +999,7 @@ class Profile
         */
        public static function getMyURL()
        {
-               if (x($_SESSION, 'my_url')) {
-                       return $_SESSION['my_url'];
-               }
-               return null;
+               return Session::get('my_url');
        }
 
        /**
@@ -996,72 +1012,128 @@ class Profile
         * Ported from Hubzilla: https://framagit.org/hubzilla/core/blob/master/include/channel.php
         *
         * @param App $a Application instance.
+        * @throws \Friendica\Network\HTTPException\InternalServerErrorException
+        * @throws \ImagickException
         */
        public static function zrlInit(App $a)
        {
                $my_url = self::getMyURL();
                $my_url = Network::isUrlValid($my_url);
 
-               if ($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);
+               if (empty($my_url) || local_user()) {
+                       return;
+               }
 
-                               $result = Cache::get('gprobe:' . $urlparts['host']);
-                               if ((!is_null($result)) && (in_array($result['network'], [NETWORK_FEED, NETWORK_PHANTOM]))) {
-                                       logger('DDoS attempt detected for ' . $urlparts['host'] . ' by ' . $_SERVER['REMOTE_ADDR'] . '. server data: ' . print_r($_SERVER, true), LOGGER_DEBUG);
-                                       return;
-                               }
+               $arr = ['zrl' => $my_url, 'url' => $a->cmd];
+               Hook::callAll('zrl_init', $arr);
+
+               // Try to find the public contact entry of the visitor.
+               $cid = Contact::getIdForURL($my_url);
+               if (!$cid) {
+                       Logger::log('No contact record found for ' . $my_url, Logger::DEBUG);
+                       return;
+               }
 
-                               Worker::add(PRIORITY_LOW, 'GProbe', $my_url);
-                               $arr = ['zrl' => $my_url, 'url' => $a->cmd];
-                               Addon::callHooks('zrl_init', $arr);
+               $contact = DBA::selectFirst('contact',['id', 'url'], ['id' => $cid]);
 
-                               // 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;
-                               }
+               if (DBA::isResult($contact) && remote_user() && remote_user() == $contact['id']) {
+                       Logger::log('The visitor ' . $my_url . ' is already authenticated', Logger::DEBUG);
+                       return;
+               }
 
-                               $contact = DBA::selectFirst('contact',['id', 'url'], ['id' => $cid]);
+               // Avoid endless loops
+               $cachekey = 'zrlInit:' . $my_url;
+               if (Cache::get($cachekey)) {
+                       Logger::log('URL ' . $my_url . ' already tried to authenticate.', Logger::DEBUG);
+                       return;
+               } else {
+                       Cache::set($cachekey, true, Cache::MINUTE);
+               }
 
-                               if (DBA::isResult($contact) && remote_user() && remote_user() == $contact['id']) {
-                                       // The visitor is already authenticated.
-                                       return;
-                               }
+               Logger::log('Not authenticated. Invoking reverse magic-auth for ' . $my_url, Logger::DEBUG);
 
-                               logger('Not authenticated. Invoking reverse magic-auth for ' . $my_url, LOGGER_DEBUG);
+               Worker::add(PRIORITY_LOW, 'GProbe', $my_url);
 
-                               // 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);
+               // 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($a->getBaseURL() . '/' . $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];
+               // 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')) {
-                                       goaway($basepath . '/magic' . '?f=&owa=1&dest=' . $dest);
-                               }
+               if ($basepath != $a->getBaseURL() && !strstr($dest, '/magic') && !strstr($dest, '/rmagic')) {
+                       $magic_path = $basepath . '/magic' . '?f=&owa=1&dest=' . $dest;
+
+                       // We have to check if the remote server does understand /magic without invoking something
+                       $serverret = Network::curl($basepath . '/magic');
+                       if ($serverret->isSuccess()) {
+                               Logger::log('Doing magic auth for visitor ' . $my_url . ' to ' . $magic_path, Logger::DEBUG);
+                               System::externalRedirect($magic_path);
                        }
                }
        }
 
+       /**
+        * Set the visitor cookies (see remote_user()) for the given handle
+        *
+        * @param string $handle Visitor handle
+        * @return array Visitor contact array
+        */
+       public static function addVisitorCookieForHandle($handle)
+       {
+               $a = \get_app();
+
+               // Try to find the public contact entry of the visitor.
+               $cid = Contact::getIdForURL($handle);
+               if (!$cid) {
+                       Logger::log('unable to finger ' . $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'];
+
+               /// @todo replace this and the query for this variable with some cleaner functionality
+               $_SESSION['remote'] = [];
+
+               $remote_contacts = DBA::select('contact', ['id', 'uid'], ['nurl' => $visitor['nurl'], 'rel' => [Contact::FOLLOWER, Contact::FRIEND]]);
+               while ($contact = DBA::fetch($remote_contacts)) {
+                       if (($contact['uid'] == 0) || Contact::isBlockedByUser($visitor['id'], $contact['uid'])) {
+                               continue;
+                       }
+
+                       $_SESSION['remote'][] = ['cid' => $contact['id'], 'uid' => $contact['uid'], 'url' => $visitor['url']];
+               }
+
+               $a->contact = $visitor;
+
+               Logger::info('Authenticated visitor', ['url' => $visitor['url']]);
+
+               return $visitor;
+       }
+
        /**
         * OpenWebAuth authentication.
         *
         * Ported from Hubzilla: https://framagit.org/hubzilla/core/blob/master/include/zid.php
         *
         * @param string $token
+        * @throws \Friendica\Network\HTTPException\InternalServerErrorException
+        * @throws \ImagickException
         */
        public static function openWebAuthInit($token)
        {
-               $a = get_app();
+               $a = \get_app();
 
                // Clean old OpenWebAuthToken entries.
                OpenWebAuthToken::purge('owt', '3 MINUTE');
@@ -1070,26 +1142,15 @@ class Profile
                // we have stored in the database.
                $visitor_handle = OpenWebAuthToken::getMeta('owt', 0, $token);
 
-               if($visitor_handle === false) {
+               if ($visitor_handle === false) {
                        return;
                }
 
-               // 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);
+               $visitor = self::addVisitorCookieForHandle($visitor_handle);
+               if (empty($visitor)) {
                        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
@@ -1100,13 +1161,13 @@ class Profile
                 *   * \e array \b visitor
                 *   * \e string \b url
                 */
-               Addon::callHooks('magic_auth_success', $arr);
+               Hook::callAll('magic_auth_success', $arr);
 
                $a->contact = $arr['visitor'];
 
-               info(L10n::t('OpenWebAuth: %1$s welcomes %2$s', $a->get_hostname(), $visitor['name']));
+               info(L10n::t('OpenWebAuth: %1$s welcomes %2$s', $a->getHostName(), $visitor['name']));
 
-               logger('OpenWebAuth: auth success from ' . $visitor['addr'], LOGGER_DEBUG);
+               Logger::log('OpenWebAuth: auth success from ' . $visitor['addr'], Logger::DEBUG);
        }
 
        public static function zrl($s, $force = false)
@@ -1122,7 +1183,7 @@ class Profile
                }
                $achar = strpos($s, '?') ? '&' : '?';
                $mine = self::getMyURL();
-               if ($mine && !link_compare($mine, $s)) {
+               if ($mine && !Strings::compareLink($mine, $s)) {
                        return $s . $achar . 'zrl=' . urlencode($mine);
                }
                return $s;
@@ -1132,7 +1193,7 @@ class Profile
         * 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
+        * profile_uid variable set in App, 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.
@@ -1140,13 +1201,13 @@ class Profile
         * @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
+        * @throws \Friendica\Network\HTTPException\InternalServerErrorException
+        * @note Returns local_user instead of user ID if "always_my_theme" is set to true
         */
-       public static function getThemeUid()
+       public static function getThemeUid(App $a)
        {
-               $uid = ((!empty($_REQUEST['puid'])) ? intval($_REQUEST['puid']) : 0);
-               if ((local_user()) && ((PConfig::get(local_user(), 'system', 'always_my_theme')) || (!$uid))) {
+               $uid = !empty($a->profile_uid) ? intval($a->profile_uid) : 0;
+               if (local_user() && (PConfig::get(local_user(), 'system', 'always_my_theme') || !$uid)) {
                        return local_user();
                }
 
@@ -1154,7 +1215,7 @@ class Profile
        }
 
        /**
-       * Stip zrl parameter from a string.
+       * Strip zrl parameter from a string.
        *
        * @param string $s The input string.
        * @return string The zrl.
@@ -1165,13 +1226,125 @@ class Profile
        }
 
        /**
-       * Stip query parameter from a string.
-       *
-       * @param string $s The input string.
-       * @return string The query parameter.
-       */
+        * Strip query parameter from a string.
+        *
+        * @param string $s The input string.
+        * @param        $param
+        * @return string The query parameter.
+        */
        public static function stripQueryParam($s, $param)
        {
                return preg_replace('/[\?&]' . $param . '=(.*?)(&|$)/ism', '$2', $s);
        }
+
+       /**
+        * search for Profiles
+        *
+        * @param int  $start
+        * @param int  $count
+        * @param null $search
+        *
+        * @return array [ 'total' => 123, 'entries' => [...] ];
+        *
+        * @throws \Exception
+        */
+       public static function searchProfiles($start = 0, $count = 100, $search = null)
+       {
+               $publish = (Config::get('system', 'publish_all') ? '' : " AND `publish` = 1 ");
+               $total = 0;
+
+               if (!empty($search)) {
+                       $searchTerm = '%' . $search . '%';
+                       $cnt = DBA::fetchFirst("SELECT COUNT(*) AS `total` 
+                               FROM `profile`
+                               LEFT JOIN `user` ON `user`.`uid` = `profile`.`uid`
+                               WHERE `is-default` $publish AND NOT `user`.`blocked` AND NOT `user`.`account_removed`
+                               AND ((`profile`.`name` LIKE ?) OR
+                               (`user`.`nickname` LIKE ?) OR
+                               (`profile`.`pdesc` LIKE ?) OR
+                               (`profile`.`locality` LIKE ?) OR
+                               (`profile`.`region` LIKE ?) OR
+                               (`profile`.`country-name` LIKE ?) OR
+                               (`profile`.`gender` LIKE ?) OR
+                               (`profile`.`marital` LIKE ?) OR
+                               (`profile`.`sexual` LIKE ?) OR
+                               (`profile`.`about` LIKE ?) OR
+                               (`profile`.`romance` LIKE ?) OR
+                               (`profile`.`work` LIKE ?) OR
+                               (`profile`.`education` LIKE ?) OR
+                               (`profile`.`pub_keywords` LIKE ?) OR
+                               (`profile`.`prv_keywords` LIKE ?))",
+                               $searchTerm, $searchTerm, $searchTerm, $searchTerm, $searchTerm, $searchTerm, $searchTerm, $searchTerm,
+                               $searchTerm, $searchTerm, $searchTerm, $searchTerm, $searchTerm, $searchTerm, $searchTerm);
+               } else {
+                       $cnt = DBA::fetchFirst("SELECT COUNT(*) AS `total` 
+                               FROM `profile`
+                               LEFT JOIN `user` ON `user`.`uid` = `profile`.`uid`
+                               WHERE `is-default` $publish AND NOT `user`.`blocked` AND NOT `user`.`account_removed`");
+               }
+
+               if (DBA::isResult($cnt)) {
+                       $total = $cnt['total'];
+               }
+
+               $order = " ORDER BY `name` ASC ";
+               $profiles = [];
+
+               // If nothing found, don't try to select details
+               if ($total > 0) {
+                       if (!empty($search)) {
+                               $searchTerm = '%' . $search . '%';
+
+                               $profiles = DBA::p("SELECT `profile`.*, `profile`.`uid` AS `profile_uid`, `user`.`nickname`, `user`.`timezone` , `user`.`page-flags`,
+                       `contact`.`addr`, `contact`.`url` AS `profile_url`
+                       FROM `profile`
+                       LEFT JOIN `user` ON `user`.`uid` = `profile`.`uid`
+                       LEFT JOIN `contact` ON `contact`.`uid` = `user`.`uid`
+                       WHERE `is-default` $publish AND NOT `user`.`blocked` AND NOT `user`.`account_removed` AND `contact`.`self`
+                       AND ((`profile`.`name` LIKE ?) OR
+                               (`user`.`nickname` LIKE ?) OR
+                               (`profile`.`pdesc` LIKE ?) OR
+                               (`profile`.`locality` LIKE ?) OR
+                               (`profile`.`region` LIKE ?) OR
+                               (`profile`.`country-name` LIKE ?) OR
+                               (`profile`.`gender` LIKE ?) OR
+                               (`profile`.`marital` LIKE ?) OR
+                               (`profile`.`sexual` LIKE ?) OR
+                               (`profile`.`about` LIKE ?) OR
+                               (`profile`.`romance` LIKE ?) OR
+                               (`profile`.`work` LIKE ?) OR
+                               (`profile`.`education` LIKE ?) OR
+                               (`profile`.`pub_keywords` LIKE ?) OR
+                               (`profile`.`prv_keywords` LIKE ?))
+                       $order LIMIT ?,?",
+                                       $searchTerm, $searchTerm, $searchTerm, $searchTerm, $searchTerm, $searchTerm, $searchTerm, $searchTerm,
+                                       $searchTerm, $searchTerm, $searchTerm, $searchTerm, $searchTerm, $searchTerm, $searchTerm,
+                                       $start, $count
+                               );
+                       } else {
+                               $profiles = DBA::p("SELECT `profile`.*, `profile`.`uid` AS `profile_uid`, `user`.`nickname`, `user`.`timezone` , `user`.`page-flags`,
+                       `contact`.`addr`, `contact`.`url` AS `profile_url`
+                       FROM `profile`
+                       LEFT JOIN `user` ON `user`.`uid` = `profile`.`uid`
+                       LEFT JOIN `contact` ON `contact`.`uid` = `user`.`uid`
+                       WHERE `is-default` $publish AND NOT `user`.`blocked` AND NOT `user`.`account_removed` AND `contact`.`self`
+                       $order LIMIT ?,?",
+                                       $start, $count
+                               );
+                       }
+               }
+
+               if (DBA::isResult($profiles) && $total > 0) {
+                       return [
+                               'total'   => $total,
+                               'entries' => DBA::toArray($profiles),
+                       ];
+
+               } else {
+                       return [
+                               'total'   => $total,
+                               'entries' => [],
+                       ];
+               }
+       }
 }