]> git.mxchange.org Git - friendica.git/blobdiff - include/socgraph.php
The global contacts now contain a "generation" value that defines how we know this...
[friendica.git] / include / socgraph.php
index 8b8eb915cc0b98eae96b8d9322d8be71aee92b21..ab348997c8c5f03958f521f80b920b5730182ec0 100644 (file)
@@ -12,14 +12,17 @@ require_once('include/datetime.php');
  *
  * Once the global contact is stored add (if necessary) the contact linkage which associates
  * the given uid, cid to the global contact entry. There can be many uid/cid combinations
- * pointing to the same global contact id. 
+ * pointing to the same global contact id.
  *
  */
+
 
 
 
 function poco_load($cid,$uid = 0,$zcid = 0,$url = null) {
+
+       require_once("include/html2bbcode.php");
+
        $a = get_app();
 
        if($cid) {
@@ -39,7 +42,7 @@ function poco_load($cid,$uid = 0,$zcid = 0,$url = null) {
        if(! $url)
                return;
 
-       $url = $url . (($uid) ? '/@me/@all?fields=displayName,urls,photos' : '?fields=displayName,urls,photos,updated') ;
+       $url = $url . (($uid) ? '/@me/@all?fields=displayName,urls,photos,updated,network,aboutMe,currentLocation,tags,gender,generation' : '?fields=displayName,urls,photos,updated,network,aboutMe,currentLocation,tags,gender,generation') ;
 
        logger('poco_load: ' . $url, LOGGER_DEBUG);
 
@@ -67,7 +70,16 @@ function poco_load($cid,$uid = 0,$zcid = 0,$url = null) {
                $profile_photo = '';
                $connect_url = '';
                $name = '';
+               $network = '';
                $updated = '0000-00-00 00:00:00';
+               $location = '';
+               $about = '';
+               $keywords = '';
+               $gender = '';
+               $generation = 0;
+
+               if ($uid == 0)
+                       $network = NETWORK_DFRN;
 
                $name = $entry->displayName;
 
@@ -95,46 +107,37 @@ function poco_load($cid,$uid = 0,$zcid = 0,$url = null) {
                if(isset($entry->updated))
                        $updated = date("Y-m-d H:i:s", strtotime($entry->updated));
 
-               if((! $name) || (! $profile_url) || (! $profile_photo))
-                       continue;
+               if(isset($entry->network))
+                       $network = $entry->network;
 
-               $gcid = poco_check($profile_url, $name, $profile_photo, $connect_url, $updated);
+               if(isset($entry->currentLocation))
+                       $location = $entry->currentLocation;
 
-               if(! $gcid)
-                       return;
+               if(isset($entry->aboutMe))
+                       $about = html2bbcode($entry->aboutMe);
 
-               $r = q("SELECT * FROM `glink` WHERE `cid` = %d AND `uid` = %d AND `gcid` = %d AND `zcid` = %d LIMIT 1",
-                       intval($cid),
-                       intval($uid),
-                       intval($gcid),
-                       intval($zcid)
-               );
-               if(! count($r)) {
-                       q("INSERT INTO `glink` (`cid`,`uid`,`gcid`,`zcid`, `updated`) VALUES (%d,%d,%d,%d, '%s') ",
-                               intval($cid),
-                               intval($uid),
-                               intval($gcid),
-                               intval($zcid),
-                               dbesc(datetime_convert())
-                       );
-               }
-               else {
-                       q("UPDATE `glink` SET `updated` = '%s' WHERE `cid` = %d AND `uid` = %d AND `gcid` = %d AND `zcid` = %d",
-                               dbesc(datetime_convert()),
-                               intval($cid),
-                               intval($uid),
-                               intval($gcid),
-                               intval($zcid)
-                       );
-               }
+               if(isset($entry->gender))
+                       $gender = $entry->gender;
 
-               // For unknown reasons there are sometimes duplicates
-               q("DELETE FROM `gcontact` WHERE `nurl` = '%s' AND `id` != %d AND
-                       NOT EXISTS (SELECT `gcid` FROM `glink` WHERE `gcid` = `gcontact`.`id`)",
-                       dbesc(normalise_link($profile_url)),
-                       intval($gcid)
-               );
+               if(isset($entry->generation) AND ($entry->generation > 0))
+                       $generation = ++$entry->generation;
+
+               if(isset($entry->tags))
+                       foreach($entry->tags as $tag)
+                               $keywords = implode(", ", $tag);
+
+               poco_check($profile_url, $name, $network, $profile_photo, $about, $location, $gender, $keywords, $connect_url, $updated, $generation, $cid, $uid, $zcid);
 
+               // Update the Friendica contacts. Diaspora is doing it via a message. (See include/diaspora.php)
+               if (($location != "") OR ($about != "") OR ($keywords != "") OR ($gender != ""))
+                       q("UPDATE `contact` SET `location` = '%s', `about` = '%s', `keywords` = '%s', `gender` = '%s'
+                               WHERE `nurl` = '%s' AND NOT `self` AND `network` = '%s'",
+                               dbesc($location),
+                               dbesc($about),
+                               dbesc($keywords),
+                               dbesc($gender),
+                               dbesc(normalise_link($profile_url)),
+                               dbesc(NETWORK_DFRN));
        }
        logger("poco_load: loaded $total entries",LOGGER_DEBUG);
 
@@ -146,41 +149,118 @@ function poco_load($cid,$uid = 0,$zcid = 0,$url = null) {
 
 }
 
-function poco_check($profile_url, $name, $profile_photo, $connect_url, $updated) {
+function poco_check($profile_url, $name, $network, $profile_photo, $about, $location, $gender, $keywords, $connect_url, $updated, $generation, $cid = 0, $uid = 0, $zcid = 0) {
+
+       // Generation:
+       //  0: No definition
+       //  1: Profiles on this server
+       //  2: Contacts of profiles on this server
+       //  3: Contacts of contacts of profiles on this server
+       //  4: ...
+
        $gcid = "";
 
-       if (($profile_url == "") OR ($name == "") OR ($profile_photo == ""))
+       if ($profile_url == "")
                return $gcid;
 
-       logger("profile-check URL: ".$profile_url." name: ".$name." avatar: ".$profile_photo, LOGGER_DEBUG);
+       $r = q("SELECT `network` FROM `contact` WHERE `nurl` = '%s' AND `network` != '' LIMIT 1",
+               dbesc(normalise_link($profile_url))
+       );
+       if(count($r))
+               $network = $r[0]["network"];
+
+       if ($network == "") {
+               $r = q("SELECT `network`, `url` FROM `contact` WHERE `alias` IN ('%s', '%s') AND `network` != '' LIMIT 1",
+                       dbesc($profile_url), dbesc(normalise_link($profile_url))
+               );
+               if(count($r)) {
+                       $network = $r[0]["network"];
+                       $profile_url = $r[0]["url"];
+               }
+       }
 
        $x = q("SELECT * FROM `gcontact` WHERE `nurl` = '%s' LIMIT 1",
                dbesc(normalise_link($profile_url))
        );
+       if(count($x) AND ($network == ""))
+               $network = $x[0]["network"];
+
+       if (($network == "") OR ($name == "") OR ($profile_photo == "")) {
+               require_once("include/Scrape.php");
+
+               $data = probe_url($profile_url, PROBE_DIASPORA);
+               $network = $data["network"];
+               $name = $data["name"];
+               $profile_photo = $data["photo"];
+       }
+
+       if (count($x) AND ($x[0]["network"] == "") AND ($network != "")) {
+               q("UPDATE `gcontact` SET `network` = '%s' WHERE `nurl` = '%s'",
+                       dbesc($network),
+                       dbesc(normalise_link($profile_url))
+               );
+       }
+
+       if (($name == "") OR ($profile_photo == ""))
+               return $gcid;
+
+       if (!in_array($network, array(NETWORK_DFRN, NETWORK_OSTATUS, NETWORK_DIASPORA, NETWORK_STATUSNET)))
+               return $gcid;
+
+       logger("profile-check generation: ".$generation." Network: ".$network." URL: ".$profile_url." name: ".$name." avatar: ".$profile_photo, LOGGER_DEBUG);
 
        if(count($x)) {
                $gcid = $x[0]['id'];
 
+               if (($location == "") AND ($x[0]['location'] != ""))
+                       $location = $x[0]['location'];
+
+               if (($about == "") AND ($x[0]['about'] != ""))
+                       $about = $x[0]['about'];
+
+               if (($gender == "") AND ($x[0]['gender'] != ""))
+                       $gender = $x[0]['gender'];
+
+               if (($keywords == "") AND ($x[0]['keywords'] != ""))
+                       $keywords = $x[0]['keywords'];
+
+               if (($generation == 0) AND ($x[0]['generation'] > 0))
+                       $generation = $x[0]['generation'];
+
                if($x[0]['name'] != $name || $x[0]['photo'] != $profile_photo || $x[0]['updated'] < $updated) {
-                       q("update gcontact set `name` = '%s', `photo` = '%s', `connect` = '%s', `url` = '%s', `updated` = '%s'
-                               where `nurl` = '%s'",
+                       q("UPDATE `gcontact` SET `name` = '%s', `network` = '%s', `photo` = '%s', `connect` = '%s', `url` = '%s',
+                               `updated` = '%s', `location` = '%s', `about` = '%s', `keywords` = '%s', `gender` = '%s', `generation` = %d
+                               WHERE (`generation` >= %d OR `generation` = 0) AND `nurl` = '%s'",
                                dbesc($name),
+                               dbesc($network),
                                dbesc($profile_photo),
                                dbesc($connect_url),
                                dbesc($profile_url),
                                dbesc($updated),
+                               dbesc($location),
+                               dbesc($about),
+                               dbesc($keywords),
+                               dbesc($gender),
+                               intval($generation),
+                               intval($generation),
                                dbesc(normalise_link($profile_url))
                        );
                }
        } else {
-               q("insert into `gcontact` (`name`,`url`,`nurl`,`photo`,`connect`, `updated`)
-                       values ('%s', '%s', '%s', '%s','%s', '%s')",
+               q("INSERT INTO `gcontact` (`name`,`network`, `url`,`nurl`,`photo`,`connect`, `updated`, `location`, `about`, `keywords`, `gender`, `generation`)
+                       VALUES ('%s', '%s', '%s', '%s', '%s','%s', '%s', '%s', '%s', '%s', '%s', %d)",
                        dbesc($name),
+                       dbesc($network),
                        dbesc($profile_url),
                        dbesc(normalise_link($profile_url)),
                        dbesc($profile_photo),
                        dbesc($connect_url),
-                       dbesc($updated)
+                       dbesc($updated),
+                       dbesc($location),
+                       dbesc($about),
+                       dbesc($keywords),
+                       dbesc($gender),
+                       intval($generation)
                );
                $x = q("SELECT * FROM `gcontact` WHERE `nurl` = '%s' LIMIT 1",
                        dbesc(normalise_link($profile_url))
@@ -188,9 +268,117 @@ function poco_check($profile_url, $name, $profile_photo, $connect_url, $updated)
                if(count($x))
                        $gcid = $x[0]['id'];
        }
+
+       if(! $gcid)
+               return $gcid;
+
+       $r = q("SELECT * FROM `glink` WHERE `cid` = %d AND `uid` = %d AND `gcid` = %d AND `zcid` = %d LIMIT 1",
+               intval($cid),
+               intval($uid),
+               intval($gcid),
+               intval($zcid)
+       );
+       if(! count($r)) {
+               q("INSERT INTO `glink` (`cid`,`uid`,`gcid`,`zcid`, `updated`) VALUES (%d,%d,%d,%d, '%s') ",
+                       intval($cid),
+                       intval($uid),
+                       intval($gcid),
+                       intval($zcid),
+                       dbesc(datetime_convert())
+               );
+       } else {
+               q("UPDATE `glink` SET `updated` = '%s' WHERE `cid` = %d AND `uid` = %d AND `gcid` = %d AND `zcid` = %d",
+                       dbesc(datetime_convert()),
+                       intval($cid),
+                       intval($uid),
+                       intval($gcid),
+                       intval($zcid)
+               );
+       }
+
+       // For unknown reasons there are sometimes duplicates
+       q("DELETE FROM `gcontact` WHERE `nurl` = '%s' AND `id` != %d AND
+               NOT EXISTS (SELECT `gcid` FROM `glink` WHERE `gcid` = `gcontact`.`id`)",
+               dbesc(normalise_link($profile_url)),
+               intval($gcid)
+       );
+
        return $gcid;
 }
 
+function poco_contact_from_body($body, $created, $cid, $uid) {
+       preg_replace_callback("/\[share(.*?)\].*?\[\/share\]/ism",
+               function ($match) use ($created, $cid, $uid){
+                       return(sub_poco_from_share($match, $created, $cid, $uid));
+               }, $body);
+}
+
+function sub_poco_from_share($share, $created, $cid, $uid) {
+        $profile = "";
+        preg_match("/profile='(.*?)'/ism", $share[1], $matches);
+        if ($matches[1] != "")
+                $profile = $matches[1];
+
+        preg_match('/profile="(.*?)"/ism', $share[1], $matches);
+        if ($matches[1] != "")
+                $profile = $matches[1];
+
+       if ($profile == "")
+               return;
+
+       logger("prepare poco_check for profile ".$profile, LOGGER_DEBUG);
+        poco_check($profile, "", "", "", "", "", "", "", "", $created, 3, $cid, $uid);
+}
+
+function poco_store($item) {
+
+       // Isn't it public?
+       if (!$item['private'])
+               return;
+
+       // Or is it from a network where we don't store the global contacts?
+       if (!in_array($item["network"], array(NETWORK_DFRN, NETWORK_DIASPORA, NETWORK_OSTATUS, "")))
+               return;
+
+       // Is it a global copy?
+       $store_gcontact = ($item["uid"] == 0);
+
+       // Is it a comment on a global copy?
+       if (!$store_gcontact AND ($item["uri"] != $item["parent-uri"])) {
+               $q = q("SELECT `id` FROM `item` WHERE `uri`='%s' AND `uid` = 0", $item["parent-uri"]);
+               $store_gcontact = count($q);
+       }
+
+       if (!$store_gcontact)
+               return;
+
+       // "3" means: We don't know this contact directly (Maybe a reshared item)
+       $generation = 3;
+       $network = "";
+
+       // Is it a user from our server?
+       $q = q("SELECT `id` FROM `contact` WHERE `self` AND `nurl` = '%s' LIMIT 1",
+               dbesc(normalise_link($item["author-link"])));
+       if (count($q)) {
+               $generation = 1;
+               $network = NETWORK_DFRN;
+       } else { // Is it a contact from a user on our server?
+               $q = q("SELECT `network` FROM `contact` WHERE `uid` != 0 AND `network` != ''
+                       AND (`nurl` = '%s' OR `alias` IN ('%s', '%s')) LIMIT 1",
+                       dbesc(normalise_link($item["author-link"])),
+                       dbesc(normalise_link($item["author-link"])),
+                       dbesc($item["author-link"]));
+               if (count($q)) {
+                       $generation = 2;
+                       $network = $q[0]["network"];
+               }
+       }
+       poco_check($item["author-link"], $item["author-name"], $network, $item["author-avatar"], "", "", "", "", "", $item["received"], $generation, $item["contact-id"], $item["uid"]);
+
+       // Maybe its a body with a shared item? Then extract a global contact from it.
+       poco_contact_from_body($item["body"], $item["received"], $item["contact-id"], $item["uid"]);
+}
+
 function count_common_friends($uid,$cid) {
 
        $r = q("SELECT count(*) as `total`
@@ -216,9 +404,9 @@ function common_friends($uid,$cid,$start = 0,$limit=9999,$shuffle = false) {
        if($shuffle)
                $sql_extra = " order by rand() ";
        else
-               $sql_extra = " order by `gcontact`.`name` asc "; 
+               $sql_extra = " order by `gcontact`.`name` asc ";
 
-       $r = q("SELECT `gcontact`.* 
+       $r = q("SELECT `gcontact`.*
                FROM `glink` INNER JOIN `gcontact` on `glink`.`gcid` = `gcontact`.`id`
                where `glink`.`cid` = %d and `glink`.`uid` = %d
                and `gcontact`.`nurl` in (select nurl from contact where uid = %d and self = 0 and blocked = 0 and hidden = 0 and id != %d ) 
@@ -238,7 +426,7 @@ function common_friends($uid,$cid,$start = 0,$limit=9999,$shuffle = false) {
 
 function count_common_friends_zcid($uid,$zcid) {
 
-       $r = q("SELECT count(*) as `total` 
+       $r = q("SELECT count(*) as `total`
                FROM `glink` INNER JOIN `gcontact` on `glink`.`gcid` = `gcontact`.`id`
                where `glink`.`zcid` = %d
                and `gcontact`.`nurl` in (select nurl from contact where uid = %d and self = 0 and blocked = 0 and hidden = 0 ) ",
@@ -257,9 +445,9 @@ function common_friends_zcid($uid,$zcid,$start = 0, $limit = 9999,$shuffle = fal
        if($shuffle)
                $sql_extra = " order by rand() ";
        else
-               $sql_extra = " order by `gcontact`.`name` asc "; 
+               $sql_extra = " order by `gcontact`.`name` asc ";
 
-       $r = q("SELECT `gcontact`.* 
+       $r = q("SELECT `gcontact`.*
                FROM `glink` INNER JOIN `gcontact` on `glink`.`gcid` = `gcontact`.`id`
                where `glink`.`zcid` = %d
                and `gcontact`.`nurl` in (select nurl from contact where uid = %d and self = 0 and blocked = 0 and hidden = 0 ) 
@@ -293,9 +481,9 @@ function count_all_friends($uid,$cid) {
 
 function all_friends($uid,$cid,$start = 0, $limit = 80) {
 
-       $r = q("SELECT `gcontact`.* 
+       $r = q("SELECT `gcontact`.*
                FROM `glink` INNER JOIN `gcontact` on `glink`.`gcid` = `gcontact`.`id`
-               where `glink`.`cid` = %d and `glink`.`uid` = %d 
+               where `glink`.`cid` = %d and `glink`.`uid` = %d
                order by `gcontact`.`name` asc LIMIT %d, %d ",
                intval($cid),
                intval($uid),
@@ -313,17 +501,31 @@ function suggestion_query($uid, $start = 0, $limit = 80) {
        if(! $uid)
                return array();
 
+       $network = array(NETWORK_DFRN);
+
+       if (get_config('system','diaspora_enabled'))
+               $network[] = NETWORK_DIASPORA;
+
+       if (!get_config('system','ostatus_disabled'))
+               $network[] = NETWORK_OSTATUS;
+
+       $sql_network = implode("', '", $network);
+       //$sql_network = "'".$sql_network."', ''";
+       $sql_network = "'".$sql_network."'";
+
        $r = q("SELECT count(glink.gcid) as `total`, gcontact.* from gcontact
                INNER JOIN glink on glink.gcid = gcontact.id
                where uid = %d and not gcontact.nurl in ( select nurl from contact where uid = %d )
                and not gcontact.name in ( select name from contact where uid = %d )
                and not gcontact.id in ( select gcid from gcign where uid = %d )
                AND `gcontact`.`updated` != '0000-00-00 00:00:00'
+               AND `gcontact`.`network` IN (%s)
                group by glink.gcid order by gcontact.updated desc,total desc limit %d, %d ",
                intval($uid),
                intval($uid),
                intval($uid),
                intval($uid),
+               $sql_network,
                intval($start),
                intval($limit)
        );
@@ -337,10 +539,12 @@ function suggestion_query($uid, $start = 0, $limit = 80) {
                and not gcontact.name in ( select name from contact where uid = %d )
                and not gcontact.id in ( select gcid from gcign where uid = %d )
                AND `gcontact`.`updated` != '0000-00-00 00:00:00'
+               AND `gcontact`.`network` IN (%s)
                order by rand() limit %d, %d ",
                intval($uid),
                intval($uid),
                intval($uid),
+               $sql_network,
                intval($start),
                intval($limit)
        );