]> git.mxchange.org Git - friendica.git/blobdiff - mod/item.php
Merge pull request #2739 from annando/1608-session-close
[friendica.git] / mod / item.php
index 2d2a5710fe9e6ea1f794e375e3c33c70890337ba..9a9b5895bdd719e0c8b04d8abec606c7bc5eafac 100644 (file)
@@ -24,6 +24,8 @@ require_once('include/threads.php');
 require_once('include/text.php');
 require_once('include/items.php');
 require_once('include/Scrape.php');
+require_once('include/diaspora.php');
+require_once('include/Contact.php');
 
 function item_post(&$a) {
 
@@ -137,19 +139,32 @@ function item_post(&$a) {
                                AND (normalise_link($parent_contact["url"]) != normalise_link($thrparent[0]["author-link"]))) {
                                $parent_contact = null;
 
-                               // @todo: Use gcontact
-                               require_once("include/Scrape.php");
-                               $probed_contact = probe_url($thrparent[0]["author-link"]);
-                               if ($probed_contact["network"] != NETWORK_FEED) {
-                                       $parent_contact = $probed_contact;
-                                       $parent_contact["nurl"] = normalise_link($probed_contact["url"]);
-                                       $parent_contact["thumb"] = $probed_contact["photo"];
-                                       $parent_contact["micro"] = $probed_contact["photo"];
-                                       $parent_contact["addr"] = $probed_contact["addr"];
+                               $r = q("SELECT * FROM `gcontact` WHERE `nurl` = '%s' LIMIT 1",
+                                       dbesc(normalise_link($thrparent[0]["author-link"])));
+                               if (count($r)) {
+                                       $parent_contact = $r[0];
+                                       $parent_contact["thumb"] = $parent_contact["photo"];
+                                       $parent_contact["micro"] = $parent_contact["photo"];
+                                       unset($parent_contact["id"]);
+                               }
+
+                               if (!isset($parent_contact["nick"])) {
+                                       require_once("include/Scrape.php");
+                                       $probed_contact = probe_url($thrparent[0]["author-link"]);
+                                       if ($probed_contact["network"] != NETWORK_FEED) {
+                                               $parent_contact = $probed_contact;
+                                               $parent_contact["nurl"] = normalise_link($probed_contact["url"]);
+                                               $parent_contact["thumb"] = $probed_contact["photo"];
+                                               $parent_contact["micro"] = $probed_contact["photo"];
+                                               $parent_contact["addr"] = $probed_contact["addr"];
+                                       }
                                }
                                logger('no contact found: '.print_r($thrparent, true), LOGGER_DEBUG);
                        } else
                                logger('parent contact: '.print_r($parent_contact, true), LOGGER_DEBUG);
+
+                       if ($parent_contact["nick"] == "")
+                               $parent_contact["nick"] = $parent_contact["name"];
                }
        }
 
@@ -491,10 +506,11 @@ function item_post(&$a) {
                }
        }
 
-       // embedded bookmark in post? set bookmark flag
+       // embedded bookmark or attachment in post? set bookmark flag
 
        $bookmark = 0;
-       if(preg_match_all("/\[bookmark\=([^\]]*)\](.*?)\[\/bookmark\]/ism",$body,$match,PREG_SET_ORDER)) {
+       $data = get_attachment_data($body);
+        if (preg_match_all("/\[bookmark\=([^\]]*)\](.*?)\[\/bookmark\]/ism", $body, $match, PREG_SET_ORDER) OR isset($data["type"])) {
                $objecttype = ACTIVITY_OBJ_BOOKMARK;
                $bookmark = 1;
        }
@@ -661,9 +677,11 @@ function item_post(&$a) {
        $datarray['owner-name']    = $contact_record['name'];
        $datarray['owner-link']    = $contact_record['url'];
        $datarray['owner-avatar']  = $contact_record['thumb'];
+       $datarray["owner-id"]      = get_contact($datarray["owner-link"], 0);
        $datarray['author-name']   = $author['name'];
        $datarray['author-link']   = $author['url'];
        $datarray['author-avatar'] = $author['thumb'];
+       $datarray["author-id"]     = get_contact($datarray["author-link"], 0);
        $datarray['created']       = datetime_convert();
        $datarray['edited']        = datetime_convert();
        $datarray['commented']     = datetime_convert();
@@ -696,6 +714,7 @@ function item_post(&$a) {
        $datarray['moderated']     = $allow_moderated;
        $datarray['gcontact-id']   = get_gcontact_id(array("url" => $datarray['author-link'], "network" => $datarray['network'],
                                                        "photo" => $datarray['author-avatar'], "name" => $datarray['author-name']));
+
        /**
         * These fields are for the convenience of plugins...
         * 'self' if true indicates the owner is posting on their own wall
@@ -764,7 +783,7 @@ function item_post(&$a) {
                // update filetags in pconfig
                file_tag_update_pconfig($uid,$categories_old,$categories_new,'category');
 
-               proc_run('php', "include/notifier.php", 'edit_post', "$post_id");
+               proc_run(PRIORITY_HIGH, "include/notifier.php", 'edit_post', $post_id);
                if((x($_REQUEST,'return')) && strlen($return_path)) {
                        logger('return: ' . $return_path);
                        goaway($a->get_baseurl() . "/" . $return_path );
@@ -775,10 +794,24 @@ function item_post(&$a) {
                $post_id = 0;
 
 
-       $r = q("INSERT INTO `item` (`guid`, `extid`, `uid`,`type`,`wall`,`gravity`, `network`, `contact-id`,`owner-name`,`owner-link`,`owner-avatar`, `author-name`, `author-link`, `author-avatar`,
-               `created`, `edited`, `commented`, `received`, `changed`, `uri`, `thr-parent`, `title`, `body`, `app`, `location`, `coord`, `tag`, `inform`, `verb`, `object-type`, `postopts`,
-               `allow_cid`, `allow_gid`, `deny_cid`, `deny_gid`, `private`, `pubmail`, `attach`, `bookmark`,`origin`, `moderated`, `file`, `rendered-html`, `rendered-hash`)
-               VALUES( '%s', '%s', %d, '%s', %d, %d, '%s', %d, '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', %d, %d, '%s', %d, %d, %d, '%s', '%s', '%s')",
+       $r = q("INSERT INTO `item` (`guid`, `extid`, `uid`,`type`,`wall`,`gravity`, `network`, `contact-id`,
+                                       `owner-name`,`owner-link`,`owner-avatar`, `owner-id`,
+                                       `author-name`, `author-link`, `author-avatar`, `author-id`,
+                                       `created`, `edited`, `commented`, `received`, `changed`,
+                                       `uri`, `thr-parent`, `title`, `body`, `app`, `location`, `coord`,
+                                       `tag`, `inform`, `verb`, `object-type`, `postopts`,
+                                       `allow_cid`, `allow_gid`, `deny_cid`, `deny_gid`, `private`,
+                                       `pubmail`, `attach`, `bookmark`,`origin`, `moderated`, `file`,
+                                       `rendered-html`, `rendered-hash`)
+               VALUES('%s', '%s', %d, '%s', %d, %d, '%s', %d,
+                       '%s', '%s', '%s', %d,
+                       '%s', '%s', '%s', %d,
+                       '%s', '%s', '%s', '%s', '%s',
+                       '%s', '%s', '%s', '%s', '%s', '%s', '%s',
+                       '%s', '%s', '%s', '%s', '%s',
+                       '%s', '%s', '%s', '%s', %d,
+                       %d, '%s', %d, %d, %d, '%s',
+                       '%s', '%s')",
                dbesc($datarray['guid']),
                dbesc($datarray['extid']),
                intval($datarray['uid']),
@@ -790,9 +823,11 @@ function item_post(&$a) {
                dbesc($datarray['owner-name']),
                dbesc($datarray['owner-link']),
                dbesc($datarray['owner-avatar']),
+               intval($datarray['owner-id']),
                dbesc($datarray['author-name']),
                dbesc($datarray['author-link']),
                dbesc($datarray['author-avatar']),
+               intval($datarray['author-id']),
                dbesc($datarray['created']),
                dbesc($datarray['edited']),
                dbesc($datarray['commented']),
@@ -834,9 +869,6 @@ function item_post(&$a) {
                // NOTREACHED
        }
 
-       // Store the guid and other relevant data
-       add_guid($datarray);
-
        $post_id = $r[0]['id'];
        logger('mod_item: saved item ' . $post_id);
 
@@ -890,7 +922,7 @@ function item_post(&$a) {
 
 
                // Store the comment signature information in case we need to relay to Diaspora
-               store_diaspora_comment_sig($datarray, $author, ($self ? $a->user['prvkey'] : false), $parent_item, $post_id);
+               diaspora::store_comment_signature($datarray, $author, ($self ? $user['prvkey'] : false), $post_id);
 
        } else {
                $parent = $post_id;
@@ -1000,7 +1032,7 @@ function item_post(&$a) {
        // Currently the only realistic fixes are to use a reliable server - which precludes shared hosting,
        // or cut back on plugins which do remote deliveries.
 
-       proc_run('php', "include/notifier.php", $notify_type, "$post_id");
+       proc_run(PRIORITY_HIGH, "include/notifier.php", $notify_type, $post_id);
 
        logger('post_complete');
 
@@ -1054,14 +1086,17 @@ function item_content(&$a) {
  * the appropiate link.
  *
  * @param unknown_type $body the text to replace the tag in
- * @param unknown_type $inform a comma-seperated string containing everybody to inform
- * @param unknown_type $str_tags string to add the tag to
- * @param unknown_type $profile_uid
- * @param unknown_type $tag the tag to replace
+ * @param string $inform a comma-seperated string containing everybody to inform
+ * @param string $str_tags string to add the tag to
+ * @param integer $profile_uid
+ * @param string $tag the tag to replace
+ * @param string $network The network of the post
  *
  * @return boolean true if replaced, false if not replaced
  */
 function handle_tag($a, &$body, &$inform, &$str_tags, $profile_uid, $tag, $network = "") {
+       require_once("include/Scrape.php");
+       require_once("include/socgraph.php");
 
        $replaced = false;
        $r = null;
@@ -1080,7 +1115,17 @@ function handle_tag($a, &$body, &$inform, &$str_tags, $profile_uid, $tag, $netwo
                        // Checking for the alias that is used for OStatus
                        $pattern = "/@\[url\=(.*?)\](.*?)\[\/url\]/ism";
                        if (preg_match($pattern, $tag, $matches)) {
-                               $data = probe_url($matches[1]);
+
+                               $r = q("SELECT `alias`, `name` FROM `contact` WHERE `nurl` = '%s' AND `alias` != '' AND `uid` = 0",
+                                       normalise_link($matches[1]));
+                               if (!$r)
+                                       $r = q("SELECT `alias`, `name` FROM `gcontact` WHERE `nurl` = '%s' AND `alias` != ''",
+                                               normalise_link($matches[1]));
+                               if ($r)
+                                       $data = $r[0];
+                               else
+                                       $data = probe_url($matches[1]);
+
                                if ($data["alias"] != "") {
                                        $newtag = '@[url='.$data["alias"].']'.$data["name"].'[/url]';
                                        if(!stristr($str_tags,$newtag)) {
@@ -1096,149 +1141,134 @@ function handle_tag($a, &$body, &$inform, &$str_tags, $profile_uid, $tag, $netwo
                $stat = false;
                //get the person's name
                $name = substr($tag,1);
-               //is it a link or a full dfrn address?
-               if((strpos($name,'@')) || (strpos($name,'http://'))) {
-                       $newname = $name;
-
-                       //get the profile links
-                       $links = @lrdd($name);
-                       if(count($links)) {
-                               //for all links, collect how is to inform and how's profile is to link
-                               foreach($links as $link) {
-                                       if($link['@attributes']['rel'] === 'http://webfinger.net/rel/profile-page')
-                                               $profile = $link['@attributes']['href'];
-                                       if($link['@attributes']['rel'] === 'salmon') {
-                                               if(strlen($inform))
-                                                       $inform .= ',';
-                                               $inform .= 'url:' . str_replace(',','%2c',$link['@attributes']['href']);
-                                       }
-                               }
-                       }
-               } elseif (($network != NETWORK_OSTATUS) AND ($network != NETWORK_TWITTER) AND
-                       ($network != NETWORK_STATUSNET) AND ($network != NETWORK_APPNET)) {
-                       //if it is a name rather than an address
-                       $newname = $name;
-                       $alias = '';
-                       $tagcid = 0;
-                       //is it some generated name?
-                       if(strrpos($newname,'+')) {
-                               //get the id
-                               $tagcid = intval(substr($newname,strrpos($newname,'+') + 1));
-                               //remove the next word from tag's name
-                               if(strpos($name,' ')) {
-                                       $name = substr($name,0,strpos($name,' '));
+
+               // Sometimes the tag detection doesn't seem to work right
+               // This is some workaround
+               $nameparts = explode(" ", $name);
+               $name = $nameparts[0];
+
+               // Try to detect the contact in various ways
+               if ((strpos($name,'@')) || (strpos($name,'http://'))) {
+                       // Is it in format @user@domain.tld or @http://domain.tld/...?
+
+                       // First check the contact table for the address
+                       $r = q("SELECT `id`, `url`, `nick`, `name`, `alias`, `network`, `notify` FROM `contact`
+                               WHERE `addr` = '%s' AND `uid` = %d AND
+                                       (`network` != '%s' OR (`notify` != '' AND `alias` != ''))
+                               LIMIT 1",
+                                       dbesc($name),
+                                       intval($profile_uid),
+                                       dbesc(NETWORK_OSTATUS)
+                       );
+
+                       // Then check in the contact table for the url
+                       if (!$r)
+                               $r = q("SELECT `id`, `url`, `nick`, `name`, `alias`, `network`, `notify` FROM `contact`
+                                       WHERE `nurl` = '%s' AND `uid` = %d AND
+                                               (`network` != '%s' OR (`notify` != '' AND `alias` != ''))
+                                       LIMIT 1",
+                                               dbesc(normalise_link($name)),
+                                               intval($profile_uid),
+                                               dbesc(NETWORK_OSTATUS)
+                               );
+
+                       // Then check in the global contacts for the address
+                       if (!$r)
+                               $r = q("SELECT `url`, `nick`, `name`, `alias`, `network`, `notify` FROM `gcontact`
+                                       WHERE `addr` = '%s' AND (`network` != '%s' OR (`notify` != '' AND `alias` != ''))
+                                       LIMIT 1",
+                                               dbesc($name),
+                                               dbesc(NETWORK_OSTATUS)
+                               );
+
+                       // Then check in the global contacts for the url
+                       if (!$r)
+                               $r = q("SELECT `url`, `nick`, `name`, `alias`, `network`, `notify` FROM `gcontact`
+                                       WHERE `nurl` = '%s' AND (`network` != '%s' OR (`notify` != '' AND `alias` != ''))
+                                       LIMIT 1",
+                                               dbesc(normalise_link($name)),
+                                               dbesc(NETWORK_OSTATUS)
+                               );
+
+                       if (!$r) {
+                               $probed = probe_url($name);
+                               if ($result['network'] != NETWORK_PHANTOM) {
+                                       update_gcontact($probed);
+                                       $r = q("SELECT `url`, `name`, `nick`, `network`, `alias`, `notify` FROM `gcontact` WHERE `nurl` = '%s' LIMIT 1",
+                                               dbesc(normalise_link($probed["url"])));
                                }
                        }
-                       if($tagcid) { //if there was an id
-                               //select contact with that id from the logged in user's contact list
-                               $r = q("SELECT * FROM `contact` WHERE `id` = %d AND `uid` = %d LIMIT 1",
+               } else {
+                       $r = false;
+                       if (strrpos($name,'+')) {
+                               // Is it in format @nick+number?
+                               $tagcid = intval(substr($name,strrpos($name,'+') + 1));
+
+                               $r = q("SELECT `id`, `url`, `nick`, `name`, `alias`, `network` FROM `contact` WHERE `id` = %d AND `uid` = %d LIMIT 1",
                                                intval($tagcid),
                                                intval($profile_uid)
                                );
                        }
-                       else {
-                               $newname = str_replace('_',' ',$name);
-
-                               // At first try to fetch a contact according to the given network
-                               if ($network != "") {
-                                       //select someone from this user's contacts by name
-                                       $r = q("SELECT * FROM `contact` WHERE `name` = '%s' AND `network` = '%s' AND `uid` = %d LIMIT 1",
-                                                       dbesc($newname),
-                                                       dbesc($network),
-                                                       intval($profile_uid)
-                                       );
-                                       if(! $r) {
-                                               //select someone by attag or nick and the name passed in
-                                               $r = q("SELECT * FROM `contact` WHERE `attag` = '%s' OR `nick` = '%s' AND `network` = '%s' AND `uid` = %d ORDER BY `attag` DESC LIMIT 1",
-                                                               dbesc($name),
-                                                               dbesc($name),
-                                                               dbesc($network),
-                                                               intval($profile_uid)
-                                               );
-                                       }
-                               } else
-                                       $r = false;
-
-                               if(! $r) {
-                                       //select someone from this user's contacts by name
-                                       $r = q("SELECT * FROM `contact` WHERE `name` = '%s' AND `uid` = %d LIMIT 1",
-                                                       dbesc($newname),
-                                                       intval($profile_uid)
-                                       );
-                               }
 
-                               if(! $r) {
-                                       //select someone by attag or nick and the name passed in
-                                       $r = q("SELECT * FROM `contact` WHERE `attag` = '%s' OR `nick` = '%s' AND `uid` = %d ORDER BY `attag` DESC LIMIT 1",
-                                                       dbesc($name),
-                                                       dbesc($name),
-                                                       intval($profile_uid)
-                                       );
-                               }
-                       }
-/*                     } elseif(strstr($name,'_') || strstr($name,' ')) { //no id
-                               //get the real name
-                               $newname = str_replace('_',' ',$name);
-                               //select someone from this user's contacts by name
-                               $r = q("SELECT * FROM `contact` WHERE `name` = '%s' AND `uid` = %d LIMIT 1",
-                                               dbesc($newname),
+                       //select someone by attag or nick and the name passed in the current network
+                       if(!$r AND ($network != ""))
+                               $r = q("SELECT `id`, `url`, `nick`, `name`, `alias`, `network` FROM `contact` WHERE `attag` = '%s' OR `nick` = '%s' AND `network` = '%s' AND `uid` = %d ORDER BY `attag` DESC LIMIT 1",
+                                               dbesc($name),
+                                               dbesc($name),
+                                               dbesc($network),
+                                               intval($profile_uid)
+                               );
+
+                       //select someone from this user's contacts by name in the current network
+                       if (!$r AND ($network != ""))
+                               $r = q("SELECT `id`, `url`, `nick`, `name`, `alias`, `network` FROM `contact` WHERE `name` = '%s' AND `network` = '%s' AND `uid` = %d LIMIT 1",
+                                               dbesc($name),
+                                               dbesc($network),
                                                intval($profile_uid)
                                );
-                       } else {
-                               //select someone by attag or nick and the name passed in
-                               $r = q("SELECT * FROM `contact` WHERE `attag` = '%s' OR `nick` = '%s' AND `uid` = %d ORDER BY `attag` DESC LIMIT 1",
+
+                       //select someone by attag or nick and the name passed in
+                       if(!$r)
+                               $r = q("SELECT `id`, `url`, `nick`, `name`, `alias`, `network` FROM `contact` WHERE `attag` = '%s' OR `nick` = '%s' AND `uid` = %d ORDER BY `attag` DESC LIMIT 1",
                                                dbesc($name),
                                                dbesc($name),
                                                intval($profile_uid)
                                );
-                       }*/
-                       //$r is set, if someone could be selected
-                       if(count($r)) {
-                               $profile = $r[0]['url'];
-                               //set newname to nick, find alias
-                               if(($r[0]['network'] === NETWORK_OSTATUS) OR ($r[0]['network'] === NETWORK_TWITTER)
-                                       OR ($r[0]['network'] === NETWORK_STATUSNET) OR ($r[0]['network'] === NETWORK_APPNET)) {
-                                       $newname = $r[0]['nick'];
-                                       $stat = true;
-                                       if($r[0]['alias'])
-                                               $alias = $r[0]['alias'];
-                               }
-                               else
-                                       $newname = $r[0]['name'];
-                               //add person's id to $inform
-                               if(strlen($inform))
-                                       $inform .= ',';
-                               $inform .= 'cid:' . $r[0]['id'];
-                       }
-               }
 
-               if(!isset($profile)) {
-                       $r = q("SELECT `url` FROM `gcontact` WHERE `addr` = '%s' LIMIT 1",
-                               dbesc($name));
-                       if ($r)
-                               $profile = $r[0]["url"];
+
+                       //select someone from this user's contacts by name
+                       if(!$r)
+                               $r = q("SELECT `id`, `url`, `nick`, `name`, `alias`, `network` FROM `contact` WHERE `name` = '%s' AND `uid` = %d LIMIT 1",
+                                               dbesc($name),
+                                               intval($profile_uid)
+                               );
                }
 
-               //if there is an url for this persons profile
-               if(isset($profile)) {
+               if ($r) {
+                       if(strlen($inform) AND (isset($r[0]["notify"]) OR isset($r[0]["id"])))
+                               $inform .= ',';
 
-                       $r = q("SELECT `nick`, `name`, `network` FROM `gcontact` WHERE `nurl` = '%s' LIMIT 1",
-                               dbesc(normalise_link($profile)));
-                       if ($r) {
+                       if (isset($r[0]["id"]))
+                               $inform .= 'cid:' . $r[0]["id"];
+                       elseif (isset($r[0]["notify"]))
+                               $inform  .= $r[0]["notify"];
+
+                       $profile = $r[0]["url"];
+                       $alias   = $r[0]["alias"];
+                       $newname = $r[0]["nick"];
+                       if (($newname == "") OR (($r[0]["network"] != NETWORK_OSTATUS) AND ($r[0]["network"] != NETWORK_TWITTER)
+                               AND ($r[0]["network"] != NETWORK_STATUSNET) AND ($r[0]["network"] != NETWORK_APPNET)))
                                $newname = $r[0]["name"];
+               }
 
-                               //set newname to nick
-                               if(($r[0]['network'] === NETWORK_OSTATUS) OR ($r[0]['network'] === NETWORK_TWITTER)
-                                       OR ($r[0]['network'] === NETWORK_STATUSNET) OR ($r[0]['network'] === NETWORK_APPNET)) {
-                                       $newname = $r[0]['nick'];
-                               }
-                       }
+               //if there is an url for this persons profile
+               if (isset($profile) AND ($newname != "")) {
 
                        $replaced = true;
                        //create profile link
                        $profile = str_replace(',','%2c',$profile);
-                       $newtag = '@[url=' . $profile . ']' . $newname  . '[/url]';
-                       $body = str_replace('@' . $name, $newtag, $body);
+                       $newtag = '@[url='.$profile.']'.$newname.'[/url]';
+                       $body = str_replace('@'.$name, $newtag, $body);
                        //append tag to str_tags
                        if(! stristr($str_tags,$newtag)) {
                                if(strlen($str_tags))
@@ -1250,7 +1280,7 @@ function handle_tag($a, &$body, &$inform, &$str_tags, $profile_uid, $tag, $netwo
                        // subscribed to you. But the nickname URL is OK if they are. Grrr. We'll tag both.
 
                        if(strlen($alias)) {
-                               $newtag = '@[url=' . $alias . ']' . $newname    . '[/url]';
+                               $newtag = '@[url='.$alias.']'.$newname.'[/url]';
                                if(! stristr($str_tags,$newtag)) {
                                        if(strlen($str_tags))
                                                $str_tags .= ',';
@@ -1262,42 +1292,3 @@ function handle_tag($a, &$body, &$inform, &$str_tags, $profile_uid, $tag, $netwo
 
        return array('replaced' => $replaced, 'contact' => $r[0]);
 }
-
-
-function store_diaspora_comment_sig($datarray, $author, $uprvkey, $parent_item, $post_id) {
-       // We won't be able to sign Diaspora comments for authenticated visitors - we don't have their private key
-
-       $enabled = intval(get_config('system','diaspora_enabled'));
-       if(! $enabled) {
-               logger('mod_item: diaspora support disabled, not storing comment signature', LOGGER_DEBUG);
-               return;
-       }
-
-
-       logger('mod_item: storing diaspora comment signature');
-
-       require_once('include/bb2diaspora.php');
-       $signed_body = html_entity_decode(bb2diaspora($datarray['body']));
-
-       // Only works for NETWORK_DFRN
-       $contact_baseurl_start = strpos($author['url'],'://') + 3;
-       $contact_baseurl_length = strpos($author['url'],'/profile') - $contact_baseurl_start;
-       $contact_baseurl = substr($author['url'], $contact_baseurl_start, $contact_baseurl_length);
-       $diaspora_handle = $author['nick'] . '@' . $contact_baseurl;
-
-       $signed_text = $datarray['guid'] . ';' . $parent_item['guid'] . ';' . $signed_body . ';' . $diaspora_handle;
-
-       if( $uprvkey !== false )
-               $authorsig = base64_encode(rsa_sign($signed_text,$uprvkey,'sha256'));
-       else
-               $authorsig = '';
-
-       q("insert into sign (`iid`,`signed_text`,`signature`,`signer`) values (%d,'%s','%s','%s') ",
-               intval($post_id),
-               dbesc($signed_text),
-               dbesc(base64_encode($authorsig)),
-               dbesc($diaspora_handle)
-       );
-
-       return;
-}