]> git.mxchange.org Git - friendica.git/blobdiff - src/Model/Contact/Relation.php
Merge pull request #13442 from annando/channel-contac-visibility
[friendica.git] / src / Model / Contact / Relation.php
index 4f41e25ba0f491e23b5cfad3b23b8007d037c52d..9b4ebeb1d1f5e8cd9533074c365774de09b38cda 100644 (file)
@@ -1,6 +1,6 @@
 <?php
 /**
- * @copyright Copyright (C) 2010-2022, the Friendica project
+ * @copyright Copyright (C) 2010-2023, the Friendica project
  *
  * @license GNU AGPL version 3 or any later version
  *
@@ -31,6 +31,8 @@ use Friendica\Model\APContact;
 use Friendica\Model\Contact;
 use Friendica\Model\Profile;
 use Friendica\Model\User;
+use Friendica\Model\Verb;
+use Friendica\Protocol\Activity;
 use Friendica\Protocol\ActivityPub;
 use Friendica\Util\DateTimeFormat;
 use Friendica\Util\Strings;
@@ -68,6 +70,26 @@ class Relation
                DBA::insert('contact-relation', ['last-interaction' => $interaction_date, 'cid' => $target, 'relation-cid' => $actor], Database::INSERT_UPDATE);
        }
 
+       /**
+        * Fetch the followers of a given user
+        *
+        * @param integer $uid User ID
+        * @return void
+        */
+       public static function discoverByUser(int $uid)
+       {
+               $contact = Contact::selectFirst(['id', 'url', 'network'], ['uid' => $uid, 'self' => true]);
+               if (empty($contact)) {
+                       Logger::warning('Self contact for user not found', ['uid' => $uid]);
+                       return;
+               }
+
+               $followers = self::getContacts($uid, [Contact::FOLLOWER, Contact::FRIEND]);
+               $followings = self::getContacts($uid, [Contact::SHARING, Contact::FRIEND]);
+
+               self::updateFollowersFollowings($contact, $followers, $followings);
+       }
+
        /**
         * Fetches the followers of a given profile and adds them
         *
@@ -108,18 +130,32 @@ class Relation
                                $followings = [];
                        }
                } else {
-                       Logger::notice('Contact seems to be local but could not be found here', ['url' => $url]);
+                       Logger::warning('Contact seems to be local but could not be found here', ['url' => $url]);
                        $followers = [];
                        $followings = [];
                }
 
+               self::updateFollowersFollowings($contact, $followers, $followings);
+       }
+
+       /**
+        * Update followers and followings for the given contact
+        *
+        * @param array $contact
+        * @param array $followers
+        * @param array $followings
+        * @return void
+        */
+       private static function updateFollowersFollowings(array $contact, array $followers, array $followings)
+       {
                if (empty($followers) && empty($followings)) {
                        Contact::update(['last-discovery' => DateTimeFormat::utcNow()], ['id' => $contact['id']]);
-                       Logger::info('The contact does not offer discoverable data', ['id' => $contact['id'], 'url' => $url, 'network' => $contact['network']]);
+                       Logger::info('The contact does not offer discoverable data', ['id' => $contact['id'], 'url' => $contact['url'], 'network' => $contact['network']]);
                        return;
                }
 
                $target = $contact['id'];
+               $url    = $contact['url'];
 
                if (!empty($followers)) {
                        // Clear the follower list, since it will be recreated in the next step
@@ -212,6 +248,10 @@ class Relation
        {
                $contact_discovery = DI::config()->get('system', 'contact_discovery');
 
+               if (Contact::isLocal($url)) {
+                       return true;
+               }
+
                if ($contact_discovery == self::DISCOVERY_NONE) {
                        return false;
                }
@@ -261,7 +301,60 @@ class Relation
        }
 
        /**
-        * Returns an array of sugguested contacts for given user id
+        * Check if the cached suggestion is outdated
+        *
+        * @param integer $uid
+        * @return boolean
+        */
+       static public function areSuggestionsOutdated(int $uid): bool
+       {
+               return DI::pConfig()->get($uid, 'suggestion', 'last_update') + 3600 < time();
+       }
+
+       /**
+        * Update contact suggestions for a given user
+        *
+        * @param integer $uid
+        * @return void
+        */
+       static public function updateCachedSuggestions(int $uid)
+       {
+               if (!self::areSuggestionsOutdated($uid)) {
+                       return;
+               }
+
+               DBA::delete('account-suggestion', ['uid' => $uid, 'ignore' => false]);
+
+               foreach (self::getSuggestions($uid) as $contact) {
+                       DBA::insert('account-suggestion', ['uri-id' => $contact['uri-id'], 'uid' => $uid, 'level' => 1], Database::INSERT_IGNORE);
+               }
+
+               DI::pConfig()->set($uid, 'suggestion', 'last_update', time());
+       }
+
+       /**
+        * Returns a cached array of suggested contacts for given user id
+        *
+        * @param int $uid   User id
+        * @param int $start optional, default 0
+        * @param int $limit optional, default 80
+        * @return array
+        */
+       static public function getCachedSuggestions(int $uid, int $start = 0, int $limit = 80): array
+       {
+               $condition = ["`uid` = ? AND `uri-id` IN (SELECT `uri-id` FROM `account-suggestion` WHERE NOT `ignore` AND `uid` = ?)", 0, $uid];
+               $params = ['limit' => [$start, $limit]];
+               $cached = DBA::selectToArray('contact', [], $condition, $params);
+
+               if (!empty($cached)) {
+                       return $cached;
+               } else {
+                       return self::getSuggestions($uid, $start, $limit);
+               }
+       }
+
+       /**
+        * Returns an array of suggested contacts for given user id
         *
         * @param int $uid   User id
         * @param int $start optional, default 0
@@ -270,6 +363,10 @@ class Relation
         */
        static public function getSuggestions(int $uid, int $start = 0, int $limit = 80): array
        {
+               if ($uid == 0) {
+                       return [];
+               }
+
                $cid = Contact::getPublicIdByUserId($uid);
                $totallimit = $start + $limit;
                $contacts = [];
@@ -284,17 +381,13 @@ class Relation
                $results = DBA::select('contact', [], ["`id` IN (SELECT `cid` FROM `contact-relation` WHERE `relation-cid` IN
                                (SELECT `cid` FROM `contact-relation` WHERE `relation-cid` = ?)
                                        AND NOT `cid` IN (SELECT `id` FROM `contact` WHERE `uid` = ? AND `nurl` IN
-                                               (SELECT `nurl` FROM `contact` WHERE `uid` = ? AND `rel` IN (?, ?))))
-                       AND NOT `hidden` AND `network` IN (?, ?, ?, ?)",
+                                               (SELECT `nurl` FROM `contact` WHERE `uid` = ? AND `rel` IN (?, ?))) AND `id` = `cid`)
+                       AND NOT `hidden` AND `network` IN (?, ?, ?, ?)
+                       AND NOT `uri-id` IN (SELECT `uri-id` FROM `account-suggestion` WHERE `uri-id` = `contact`.`uri-id` AND `uid` = ?)",
                        $cid,
                        0,
-                       $uid,
-                       Contact::FRIEND,
-                       Contact::SHARING,
-                       Protocol::ACTIVITYPUB,
-                       Protocol::DFRN,
-                       $diaspora,
-                       $ostatus,
+                       $uid, Contact::FRIEND, Contact::SHARING,
+                       Protocol::ACTIVITYPUB, Protocol::DFRN, $diaspora, $ostatus, $uid
                        ], [
                                'order' => ['last-item' => true],
                                'limit' => $totallimit,
@@ -319,10 +412,11 @@ class Relation
                        ["`id` IN (SELECT `cid` FROM `contact-relation` WHERE `relation-cid` IN
                                (SELECT `relation-cid` FROM `contact-relation` WHERE `cid` = ?)
                                        AND NOT `cid` IN (SELECT `id` FROM `contact` WHERE `uid` = ? AND `nurl` IN
-                                               (SELECT `nurl` FROM `contact` WHERE `uid` = ? AND `rel` IN (?, ?))))
-                       AND NOT `hidden` AND `network` IN (?, ?, ?, ?)",
+                                               (SELECT `nurl` FROM `contact` WHERE `uid` = ? AND `rel` IN (?, ?))) AND `id` = `cid`)
+                       AND NOT `hidden` AND `network` IN (?, ?, ?, ?)
+                       AND NOT `uri-id` IN (SELECT `uri-id` FROM `account-suggestion` WHERE `uri-id` = `contact`.`uri-id` AND `uid` = ?)",
                        $cid, 0, $uid, Contact::FRIEND, Contact::SHARING,
-                       Protocol::ACTIVITYPUB, Protocol::DFRN, $diaspora, $ostatus],
+                       Protocol::ACTIVITYPUB, Protocol::DFRN, $diaspora, $ostatus, $uid],
                        ['order' => ['last-item' => true], 'limit' => $totallimit]
                );
 
@@ -340,9 +434,10 @@ class Relation
                // The query returns contacts that follow the given user but aren't followed by that user.
                $results = DBA::select('contact', [],
                        ["`nurl` IN (SELECT `nurl` FROM `contact` WHERE `uid` = ? AND `rel` = ?)
-                       AND NOT `hidden` AND `uid` = ? AND `network` IN (?, ?, ?, ?)",
-                       $uid, Contact::FOLLOWER, 0, 
-                       Protocol::ACTIVITYPUB, Protocol::DFRN, $diaspora, $ostatus],
+                       AND NOT `hidden` AND `uid` = ? AND `network` IN (?, ?, ?, ?)
+                       AND NOT `uri-id` IN (SELECT `uri-id` FROM `account-suggestion` WHERE `uri-id` = `contact`.`uri-id` AND `uid` = ?)",
+                       $uid, Contact::FOLLOWER, 0,
+                       Protocol::ACTIVITYPUB, Protocol::DFRN, $diaspora, $ostatus, $uid],
                        ['order' => ['last-item' => true], 'limit' => $totallimit]
                );
 
@@ -359,10 +454,11 @@ class Relation
 
                // The query returns any contact that isn't followed by that user.
                $results = DBA::select('contact', [],
-                       ["NOT `nurl` IN (SELECT `nurl` FROM `contact` WHERE `uid` = ? AND `rel` IN (?, ?))
-                       AND NOT `hidden` AND `uid` = ? AND `network` IN (?, ?, ?, ?)",
-                       $uid, Contact::FRIEND, Contact::SHARING, 0, 
-                       Protocol::ACTIVITYPUB, Protocol::DFRN, $diaspora, $ostatus],
+                       ["NOT `nurl` IN (SELECT `nurl` FROM `contact` WHERE `uid` = ? AND `rel` IN (?, ?) AND `nurl` = `nurl`)
+                       AND NOT `hidden` AND `uid` = ? AND `network` IN (?, ?, ?, ?)
+                       AND NOT `uri-id` IN (SELECT `uri-id` FROM `account-suggestion` WHERE `uri-id` = `contact`.`uri-id` AND `uid` = ?)",
+                       $uid, Contact::FRIEND, Contact::SHARING, 0,
+                       Protocol::ACTIVITYPUB, Protocol::DFRN, $diaspora, $ostatus, $uid],
                        ['order' => ['last-item' => true], 'limit' => $totallimit]
                );
 
@@ -387,7 +483,7 @@ class Relation
        public static function countFollows(int $cid, array $condition = []): int
        {
                $condition = DBA::mergeConditions($condition, [
-                       '`id` IN (SELECT `relation-cid` FROM `contact-relation` WHERE `cid` = ? AND `follows`)', 
+                       '`id` IN (SELECT `relation-cid` FROM `contact-relation` WHERE `cid` = ? AND `follows`)',
                        $cid,
                ]);
 
@@ -408,7 +504,7 @@ class Relation
        public static function listFollows(int $cid, array $condition = [], int $count = 30, int $offset = 0, bool $shuffle = false)
        {
                $condition = DBA::mergeConditions($condition,
-                       ['`id` IN (SELECT `relation-cid` FROM `contact-relation` WHERE `cid` = ? AND `follows`)', 
+                       ['`id` IN (SELECT `relation-cid` FROM `contact-relation` WHERE `cid` = ? AND `follows`)',
                        $cid]
                );
 
@@ -680,4 +776,79 @@ class Relation
                        ['limit' => [$offset, $count],  'order' => [$shuffle ? 'RAND()' : 'name']]
                );
        }
+
+       /**
+        * Calculate the interaction scores for the given user
+        *
+        * @param integer $uid
+        * @return void
+        */
+       public static function calculateInteractionScore(int $uid)
+       {
+               $days = DI::config()->get('channel', 'interaction_score_days');
+               $contact_id = Contact::getPublicIdByUserId($uid);
+
+               Logger::debug('Calculation - start', ['uid' => $uid, 'cid' => $contact_id, 'days' => $days]);
+
+               $follow = Verb::getID(Activity::FOLLOW);
+               $view = Verb::getID(Activity::VIEW);
+               $read = Verb::getID(Activity::READ);
+
+               DBA::update('contact-relation', ['score' => 0, 'relation-score' => 0, 'thread-score' => 0, 'relation-thread-score' => 0], ['relation-cid' => $contact_id]);
+
+               $total = DBA::fetchFirst("SELECT count(*) AS `activity` FROM `post-user` INNER JOIN `post` ON `post`.`uri-id` = `post-user`.`thr-parent-id` WHERE `post-user`.`author-id` = ? AND `post-user`.`received` >= ? AND `post-user`.`uid` = ? AND `post`.`author-id` != ? AND NOT `post`.`vid` IN (?, ?, ?)",
+                       $contact_id, DateTimeFormat::utc('now - ' . $days . ' day'), $uid, $contact_id, $follow, $view, $read);
+
+               Logger::debug('Calculate relation-score', ['uid' => $uid, 'total' => $total['activity']]);
+
+               $interactions = DBA::p("SELECT `post`.`author-id`, count(*) AS `activity`, EXISTS(SELECT `pid` FROM `account-user-view` WHERE `pid` = `post`.`author-id` AND `uid` = ? AND `rel` IN (?, ?)) AS `follows`
+                       FROM `post-user` INNER JOIN `post` ON `post`.`uri-id` = `post-user`.`thr-parent-id` WHERE `post-user`.`author-id` = ? AND `post-user`.`received` >= ? AND `post-user`.`uid` = ? AND `post`.`author-id` != ? AND NOT `post`.`vid` IN (?, ?, ?) GROUP BY `post`.`author-id`",
+                       $uid, Contact::SHARING, Contact::FRIEND, $contact_id, DateTimeFormat::utc('now - ' . $days . ' day'), $uid, $contact_id, $follow, $view, $read);
+               while ($interaction = DBA::fetch($interactions)) {
+                       $score = min((int)(($interaction['activity'] / $total['activity']) * 65535), 65535);
+                       DBA::update('contact-relation', ['relation-score' => $score, 'follows' => $interaction['follows']], ['relation-cid' => $contact_id, 'cid' => $interaction['author-id']]);
+               }
+               DBA::close($interactions);
+
+               $total = DBA::fetchFirst("SELECT count(*) AS `activity` FROM `post-user` INNER JOIN `post` ON `post`.`uri-id` = `post-user`.`parent-uri-id` WHERE `post-user`.`author-id` = ? AND `post-user`.`received` >= ? AND `post-user`.`uid` = ? AND `post`.`author-id` != ? AND NOT `post`.`vid` IN (?, ?, ?)",
+                       $contact_id, DateTimeFormat::utc('now - ' . $days . ' day'), $uid, $contact_id, $follow, $view, $read);
+
+               Logger::debug('Calculate relation-thread-score', ['uid' => $uid, 'total' => $total['activity']]);
+
+               $interactions = DBA::p("SELECT `post`.`author-id`, count(*) AS `activity`, EXISTS(SELECT `pid` FROM `account-user-view` WHERE `pid` = `post`.`author-id` AND `uid` = ? AND `rel` IN (?, ?)) AS `follows`
+                       FROM `post-user` INNER JOIN `post` ON `post`.`uri-id` = `post-user`.`parent-uri-id` WHERE `post-user`.`author-id` = ? AND `post-user`.`received` >= ? AND `post-user`.`uid` = ? AND `post`.`author-id` != ? AND NOT `post`.`vid` IN (?, ?, ?) GROUP BY `post`.`author-id`",
+                       $uid, Contact::SHARING, Contact::FRIEND, $contact_id, DateTimeFormat::utc('now - ' . $days . ' day'), $uid, $contact_id, $follow, $view, $read);
+               while ($interaction = DBA::fetch($interactions)) {
+                       $score = min((int)(($interaction['activity'] / $total['activity']) * 65535), 65535);
+                       DBA::update('contact-relation', ['relation-thread-score' => $score, 'follows' => !empty($interaction['follows'])], ['relation-cid' => $contact_id, 'cid' => $interaction['author-id']]);
+               }
+               DBA::close($interactions);
+
+               $total = DBA::fetchFirst("SELECT count(*) AS `activity` FROM `post-user` INNER JOIN `post` ON `post-user`.`uri-id` = `post`.`thr-parent-id` WHERE `post-user`.`author-id` = ? AND `post-user`.`received` >= ? AND `post-user`.`uid` = ? AND `post`.`author-id` != ? AND NOT `post`.`vid` IN (?, ?, ?)",
+                       $contact_id, DateTimeFormat::utc('now - ' . $days . ' day'), $uid, $contact_id, $follow, $view, $read);
+
+               Logger::debug('Calculate score', ['uid' => $uid, 'total' => $total['activity']]);
+
+               $interactions = DBA::p("SELECT `post`.`author-id`, count(*) AS `activity` FROM `post-user` INNER JOIN `post` ON `post-user`.`uri-id` = `post`.`thr-parent-id` WHERE `post-user`.`author-id` = ? AND `post-user`.`received` >= ? AND `post-user`.`uid` = ? AND `post`.`author-id` != ? AND NOT `post`.`vid` IN (?, ?, ?) GROUP BY `post`.`author-id`",
+                       $contact_id, DateTimeFormat::utc('now - ' . $days . ' day'), $uid, $contact_id, $follow, $view, $read);
+               while ($interaction = DBA::fetch($interactions)) {
+                       $score = min((int)(($interaction['activity'] / $total['activity']) * 65535), 65535);
+                       DBA::update('contact-relation', ['score' => $score], ['relation-cid' => $contact_id, 'cid' => $interaction['author-id']]);
+               }
+               DBA::close($interactions);
+
+               $total = DBA::fetchFirst("SELECT count(*) AS `activity` FROM `post-user` INNER JOIN `post` ON `post-user`.`uri-id` = `post`.`parent-uri-id` WHERE `post-user`.`author-id` = ? AND `post-user`.`received` >= ? AND `post-user`.`uid` = ? AND `post`.`author-id` != ? AND NOT `post`.`vid` IN (?, ?, ?)",
+                       $contact_id, DateTimeFormat::utc('now - ' . $days . ' day'), $uid, $contact_id, $follow, $view, $read);
+
+               Logger::debug('Calculate thread-score', ['uid' => $uid, 'total' => $total['activity']]);
+
+               $interactions = DBA::p("SELECT `post`.`author-id`, count(*) AS `activity` FROM `post-user` INNER JOIN `post` ON `post-user`.`uri-id` = `post`.`parent-uri-id` WHERE `post-user`.`author-id` = ? AND `post-user`.`received` >= ? AND `post-user`.`uid` = ? AND `post`.`author-id` != ? AND NOT `post`.`vid` IN (?, ?, ?) GROUP BY `post`.`author-id`",
+                       $contact_id, DateTimeFormat::utc('now - ' . $days . ' day'), $uid, $contact_id, $follow, $view, $read);
+               while ($interaction = DBA::fetch($interactions)) {
+                       $score = min((int)(($interaction['activity'] / $total['activity']) * 65535), 65535);
+                       DBA::update('contact-relation', ['thread-score' => $score], ['relation-cid' => $contact_id, 'cid' => $interaction['author-id']]);
+               }
+               DBA::close($interactions);
+               Logger::debug('Calculation - end', ['uid' => $uid]);
+       }
 }