]> git.mxchange.org Git - friendica.git/blobdiff - include/diaspora.php
Merge https://github.com/friendica/friendica into pull
[friendica.git] / include / diaspora.php
index 104ccadf2ec51a378d3627264bd21184eafd0489..0ca9163a8565cdd8f7f62c08bd84a10e0cb0fd3c 100755 (executable)
@@ -9,6 +9,12 @@ require_once('include/queue_fn.php');
 
 function diaspora_dispatch_public($msg) {
 
+       $enabled = intval(get_config('system','diaspora_enabled'));
+       if(! $enabled) {
+               logger('mod-diaspora: disabled');
+               return;
+       }
+
        $r = q("SELECT `user`.* FROM `user` WHERE `user`.`uid` IN ( SELECT `contact`.`uid` FROM `contact` WHERE `contact`.`network` = '%s' AND `contact`.`addr` = '%s' ) AND `account_expired` = 0 ",
                dbesc(NETWORK_DIASPORA),
                dbesc($msg['author'])
@@ -29,6 +35,12 @@ function diaspora_dispatch($importer,$msg) {
 
        $ret = 0;
 
+       $enabled = intval(get_config('system','diaspora_enabled'));
+       if(! $enabled) {
+               logger('mod-diaspora: disabled');
+               return;
+       }
+
        // php doesn't like dashes in variable names
 
        $msg['message'] = str_replace(
@@ -71,6 +83,9 @@ function diaspora_dispatch($importer,$msg) {
        elseif($xmlbase->signed_retraction) {
                $ret = diaspora_signed_retraction($importer,$xmlbase->signed_retraction,$msg);
        }
+       elseif($xmlbase->relayable_retraction) {
+               $ret = diaspora_signed_retraction($importer,$xmlbase->relayable_retraction,$msg);
+       }
        elseif($xmlbase->photo) {
                $ret = diaspora_photo($importer,$xmlbase->photo,$msg);
        }
@@ -557,6 +572,14 @@ function diaspora_request($importer,$xml) {
                return;
        }
 
+       $g = q("select def_gid from user where uid = %d limit 1",
+               intval($importer['uid'])
+       );
+       if($g && intval($g[0]['def_gid'])) {
+               require_once('include/group.php');
+               group_add_member($importer['uid'],'',$contact_record['id'],$g[0]['def_gid']);
+       }
+
        if($importer['page-flags'] == PAGE_NORMAL) {
 
                $hash = random_string() . (string) time();   // Generate a confirm_key
@@ -657,7 +680,7 @@ function diaspora_post($importer,$xml) {
                return;
        }
 
-    // allocate a guid on our system - we aren't fixing any collisions.
+       // allocate a guid on our system - we aren't fixing any collisions.
        // we're ignoring them
 
        $g = q("select * from guid where guid = '%s' limit 1",
@@ -694,10 +717,10 @@ function diaspora_post($importer,$xml) {
                                        continue;
 
                                $basetag = str_replace('_',' ',substr($tag,1));
-                               $body = str_replace($tag,'#[url=' . $a->get_baseurl() . '/search?search=' . rawurlencode($basetag) . ']' . $basetag . '[/url]',$body);
+                               $body = str_replace($tag,'#[url=' . $a->get_baseurl() . '/search?tag=' . rawurlencode($basetag) . ']' . $basetag . '[/url]',$body);
                                if(strlen($str_tags))
                                        $str_tags .= ',';
-                               $str_tags .= '#[url=' . $a->get_baseurl() . '/search?search=' . rawurlencode($basetag) . ']' . $basetag . '[/url]';
+                               $str_tags .= '#[url=' . $a->get_baseurl() . '/search?tag=' . rawurlencode($basetag) . ']' . $basetag . '[/url]';
                                continue;
                        }
                }
@@ -824,7 +847,7 @@ function diaspora_reshare($importer,$xml) {
        $prefix = '♲ ' . $details . "\n"; 
 
 
-    // allocate a guid on our system - we aren't fixing any collisions.
+       // allocate a guid on our system - we aren't fixing any collisions.
        // we're ignoring them
 
        $g = q("select * from guid where guid = '%s' limit 1",
@@ -860,10 +883,10 @@ function diaspora_reshare($importer,$xml) {
 
 
                                $basetag = str_replace('_',' ',substr($tag,1));
-                               $body = str_replace($tag,'#[url=' . $a->get_baseurl() . '/search?search=' . rawurlencode($basetag) . ']' . $basetag . '[/url]',$body);
+                               $body = str_replace($tag,'#[url=' . $a->get_baseurl() . '/search?tag=' . rawurlencode($basetag) . ']' . $basetag . '[/url]',$body);
                                if(strlen($str_tags))
                                        $str_tags .= ',';
-                               $str_tags .= '#[url=' . $a->get_baseurl() . '/search?search=' . rawurlencode($basetag) . ']' . $basetag . '[/url]';
+                               $str_tags .= '#[url=' . $a->get_baseurl() . '/search?tag=' . rawurlencode($basetag) . ']' . $basetag . '[/url]';
                                continue;
                        }
                }
@@ -928,7 +951,7 @@ function diaspora_asphoto($importer,$xml) {
                return;
        }
 
-    // allocate a guid on our system - we aren't fixing any collisions.
+       // allocate a guid on our system - we aren't fixing any collisions.
        // we're ignoring them
 
        $g = q("select * from guid where guid = '%s' limit 1",
@@ -1037,45 +1060,64 @@ function diaspora_comment($importer,$xml,$msg) {
        }
        $parent_item = $r[0];
 
-       $author_signed_data = $guid . ';' . $parent_guid . ';' . $text . ';' . $diaspora_handle;
 
-       $author_signature = base64_decode($author_signature);
+       /* How Diaspora performs comment signature checking:
 
-       if(strcasecmp($diaspora_handle,$msg['author']) == 0) {
-               $person = $contact;
-               $key = $msg['key'];
-       }
-       else {
-               $person = find_diaspora_person_by_handle($diaspora_handle);     
+          - If an item has been sent by the comment author to the top-level post owner to relay on
+            to the rest of the contacts on the top-level post, the top-level post owner should check
+            the author_signature, then create a parent_author_signature before relaying the comment on
+          - If an item has been relayed on by the top-level post owner, the contacts who receive it
+            check only the parent_author_signature. Basically, they trust that the top-level post
+            owner has already verified the authenticity of anything he/she sends out
+          - In either case, the signature that get checked is the signature created by the person
+            who sent the salmon
+       */
 
-               if(is_array($person) && x($person,'pubkey'))
-                       $key = $person['pubkey'];
-               else {
-                       logger('diaspora_comment: unable to find author details');
-                       return;
-               }
-       }
-
-       if(! rsa_verify($author_signed_data,$author_signature,$key,'sha256')) {
-               logger('diaspora_comment: verification failed.');
-               return;
-       }
+       $signed_data = $guid . ';' . $parent_guid . ';' . $text . ';' . $diaspora_handle;
+       $key = $msg['key'];
 
        if($parent_author_signature) {
-               $owner_signed_data = $guid . ';' . $parent_guid . ';' . $text . ';' . $diaspora_handle;
+               // If a parent_author_signature exists, then we've received the comment
+               // relayed from the top-level post owner. There's no need to check the
+               // author_signature if the parent_author_signature is valid
 
                $parent_author_signature = base64_decode($parent_author_signature);
 
-               $key = $msg['key'];
+               if(! rsa_verify($signed_data,$parent_author_signature,$key,'sha256')) {
+                       logger('diaspora_comment: top-level owner verification failed.');
+                       return;
+               }
+       }
+       else {
+               // If there's no parent_author_signature, then we've received the comment
+               // from the comment creator. In that case, the person is commenting on
+               // our post, so he/she must be a contact of ours and his/her public key
+               // should be in $msg['key']
+
+               $author_signature = base64_decode($author_signature);
 
-               if(! rsa_verify($owner_signed_data,$parent_author_signature,$key,'sha256')) {
-                       logger('diaspora_comment: owner verification failed.');
+               if(! rsa_verify($signed_data,$author_signature,$key,'sha256')) {
+                       logger('diaspora_comment: comment author verification failed.');
                        return;
                }
        }
 
        // Phew! Everything checks out. Now create an item.
 
+       // Find the original comment author information.
+       // We need this to make sure we display the comment author
+       // information (name and avatar) correctly.
+       if(strcasecmp($diaspora_handle,$msg['author']) == 0)
+               $person = $contact;
+       else {
+               $person = find_diaspora_person_by_handle($diaspora_handle);     
+
+               if(! is_array($person)) {
+                       logger('diaspora_comment: unable to find author details');
+                       return;
+               }
+       }
+
        $body = diaspora2bb($text);
 
        $message_id = $diaspora_handle . ':' . $guid;
@@ -1101,10 +1143,10 @@ function diaspora_comment($importer,$xml,$msg) {
 
 
                                $basetag = str_replace('_',' ',substr($tag,1));
-                               $body = str_replace($tag,'#[url=' . $a->get_baseurl() . '/search?search=' . rawurlencode($basetag) . ']' . $basetag . '[/url]',$body);
+                               $body = str_replace($tag,'#[url=' . $a->get_baseurl() . '/search?tag=' . rawurlencode($basetag) . ']' . $basetag . '[/url]',$body);
                                if(strlen($str_tags))
                                        $str_tags .= ',';
-                               $str_tags .= '#[url=' . $a->get_baseurl() . '/search?search=' . rawurlencode($basetag) . ']' . $basetag . '[/url]';
+                               $str_tags .= '#[url=' . $a->get_baseurl() . '/search?tag=' . rawurlencode($basetag) . ']' . $basetag . '[/url]';
                                continue;
                        }
                }
@@ -1160,7 +1202,7 @@ function diaspora_comment($importer,$xml,$msg) {
                proc_run('php','include/notifier.php','comment',$message_id);
        }
 
-       $myconv = q("SELECT `author-link`, `author-avatar`, `parent` FROM `item` WHERE `parent-uri` = '%s' AND `uid` = %d AND `parent` != 0 ",
+       $myconv = q("SELECT `author-link`, `author-avatar`, `parent` FROM `item` WHERE `parent-uri` = '%s' AND `uid` = %d AND `parent` != 0 AND `deleted` = 0 ",
                dbesc($parent_item['uri']),
                intval($importer['uid'])
        );
@@ -1582,60 +1624,85 @@ function diaspora_like($importer,$xml,$msg) {
                        logger('diaspora_like: duplicate like: ' . $guid);
                        return;
                } 
+               // Note: I don't think "Like" objects with positive = "false" are ever actually used
+               // It looks like "RelayableRetractions" are used for "unlike" instead
                if($positive === 'false') {
-                       q("UPDATE `item` SET `deleted` = 1 WHERE `id` = %d AND `uid` = %d LIMIT 1",
+                       logger('diaspora_like: received a like with positive set to "false"...ignoring');
+/*                     q("UPDATE `item` SET `deleted` = 1 WHERE `id` = %d AND `uid` = %d LIMIT 1",
                                intval($r[0]['id']),
                                intval($importer['uid'])
-                       );
-                       // FIXME
+                       );*/
+                       // FIXME--actually don't unless it turns out that Diaspora does indeed send out "false" likes
                        //  send notification via proc_run()
                        return;
                }
        }
+       // Note: I don't think "Like" objects with positive = "false" are ever actually used
+       // It looks like "RelayableRetractions" are used for "unlike" instead
        if($positive === 'false') {
-               logger('diaspora_like: unlike received with no corresponding like');
+               logger('diaspora_like: received a like with positive set to "false"');
+               logger('diaspora_like: unlike received with no corresponding like...ignoring');
                return; 
        }
 
-       $author_signed_data = $guid . ';' . $target_type . ';' . $parent_guid . ';' . $positive . ';' . $diaspora_handle;
 
-       $author_signature = base64_decode($author_signature);
+       /* How Diaspora performs "like" signature checking:
 
-       if(strcasecmp($diaspora_handle,$msg['author']) == 0) {
-               $person = $contact;
-               $key = $msg['key'];
-       }
-       else {
-               $person = find_diaspora_person_by_handle($diaspora_handle);     
-               if(is_array($person) && x($person,'pubkey'))
-                       $key = $person['pubkey'];
-               else {
-                       logger('diaspora_like: unable to find author details');
-                       return;
-               }
-       }
+          - If an item has been sent by the like author to the top-level post owner to relay on
+            to the rest of the contacts on the top-level post, the top-level post owner should check
+            the author_signature, then create a parent_author_signature before relaying the like on
+          - If an item has been relayed on by the top-level post owner, the contacts who receive it
+            check only the parent_author_signature. Basically, they trust that the top-level post
+            owner has already verified the authenticity of anything he/she sends out
+          - In either case, the signature that get checked is the signature created by the person
+            who sent the salmon
+       */
 
-       if(! rsa_verify($author_signed_data,$author_signature,$key,'sha256')) {
-               logger('diaspora_like: verification failed.');
-               return;
-       }
+       $signed_data = $guid . ';' . $target_type . ';' . $parent_guid . ';' . $positive . ';' . $diaspora_handle;
+       $key = $msg['key'];
 
        if($parent_author_signature) {
-
-               $owner_signed_data = $guid . ';' . $target_type . ';' . $parent_guid . ';' . $positive . ';' . $diaspora_handle;
+               // If a parent_author_signature exists, then we've received the like
+               // relayed from the top-level post owner. There's no need to check the
+               // author_signature if the parent_author_signature is valid
 
                $parent_author_signature = base64_decode($parent_author_signature);
 
-               $key = $msg['key'];
+               if(! rsa_verify($signed_data,$parent_author_signature,$key,'sha256')) {
+                       logger('diaspora_like: top-level owner verification failed.');
+                       return;
+               }
+       }
+       else {
+               // If there's no parent_author_signature, then we've received the like
+               // from the like creator. In that case, the person is "like"ing
+               // our post, so he/she must be a contact of ours and his/her public key
+               // should be in $msg['key']
+
+               $author_signature = base64_decode($author_signature);
 
-               if(! rsa_verify($owner_signed_data,$parent_author_signature,$key,'sha256')) {
-                       logger('diaspora_like: owner verification failed.');
+               if(! rsa_verify($signed_data,$author_signature,$key,'sha256')) {
+                       logger('diaspora_like: like creator verification failed.');
                        return;
                }
        }
 
        // Phew! Everything checks out. Now create an item.
 
+       // Find the original comment author information.
+       // We need this to make sure we display the comment author
+       // information (name and avatar) correctly.
+       if(strcasecmp($diaspora_handle,$msg['author']) == 0)
+               $person = $contact;
+       else {
+               $person = find_diaspora_person_by_handle($diaspora_handle);
+
+               if(! is_array($person)) {
+                       logger('diaspora_like: unable to find author details');
+                       return;
+               }
+       }
+
        $uri = $diaspora_handle . ':' . $guid;
 
        $activity = ACTIVITY_LIKE;
@@ -1763,38 +1830,88 @@ function diaspora_signed_retraction($importer,$xml,$msg) {
        $type = notags(unxmlify($xml->target_type));
        $sig = notags(unxmlify($xml->target_author_signature));
 
+       $parent_author_signature = (($xml->parent_author_signature) ? notags(unxmlify($xml->parent_author_signature)) : '');
+
        $contact = diaspora_get_contact_by_handle($importer['uid'],$diaspora_handle);
        if(! $contact) {
                logger('diaspora_signed_retraction: no contact');
                return;
        }
 
-       // this may not yet work for comments. Need to see how the relaying works
-       // and figure out who signs it.
-
 
        $signed_data = $guid . ';' . $type ;
+       $key = $msg['key'];
 
-       $sig = base64_decode($sig);
+       /* How Diaspora performs relayable_retraction signature checking:
 
-       $key = $msg['key'];
+          - If an item has been sent by the item author to the top-level post owner to relay on
+            to the rest of the contacts on the top-level post, the top-level post owner checks
+            the author_signature, then creates a parent_author_signature before relaying the item on
+          - If an item has been relayed on by the top-level post owner, the contacts who receive it
+            check only the parent_author_signature. Basically, they trust that the top-level post
+            owner has already verified the authenticity of anything he/she sends out
+          - In either case, the signature that get checked is the signature created by the person
+            who sent the salmon
+       */
+
+       if($parent_author_signature) {
+
+               $parent_author_signature = base64_decode($parent_author_signature);
+
+               if(! rsa_verify($signed_data,$parent_author_signature,$key,'sha256')) {
+                       logger('diaspora_signed_retraction: top-level post owner verification failed');
+                       return;
+               }
 
-       if(! rsa_verify($signed_data,$sig,$key,'sha256')) {
-               logger('diaspora_signed_retraction: owner verification failed.' . print_r($msg,true));
-               return;
        }
+       else {
+
+               $sig_decode = base64_decode($sig);
 
-       if($type === 'StatusMessage') {
+               if(! rsa_verify($signed_data,$sig_decode,$key,'sha256')) {
+                       logger('diaspora_signed_retraction: retraction owner verification failed.' . print_r($msg,true));
+                       return;
+               }
+       }
+
+       if($type === 'StatusMessage' || $type === 'Comment' || $type === 'Like') {
                $r = q("select * from item where guid = '%s' and uid = %d and not file like '%%[%%' limit 1",
                        dbesc($guid),
                        intval($importer['uid'])
                );
                if(count($r)) {
                        if(link_compare($r[0]['author-link'],$contact['url'])) {
-                               q("update item set `deleted` = 1, `changed` = '%s' where `id` = %d limit 1",
+                               q("update item set `deleted` = 1, `edited` = '%s', `changed` = '%s', `body` = '' , `title` = '' where `id` = %d limit 1",
+                                       dbesc(datetime_convert()),                      
                                        dbesc(datetime_convert()),                      
                                        intval($r[0]['id'])
                                );
+       
+                               // Now check if the retraction needs to be relayed by us
+                               //
+                               // The first item in the `item` table with the parent id is the parent. However, MySQL doesn't always
+                               // return the items ordered by `item`.`id`, in which case the wrong item is chosen as the parent.
+                               // The only item with `parent` and `id` as the parent id is the parent item.
+                               $p = q("select origin from item where parent = %d and id = %d limit 1",
+                                       $r[0]['parent'],
+                                       $r[0]['parent']
+                               );
+                               if(count($p)) {
+                                       if(($p[0]['origin']) && (! $parent_author_signature)) {
+                                               q("insert into sign (`retract_iid`,`signed_text`,`signature`,`signer`) values (%d,'%s','%s','%s') ",
+                                                       $r[0]['id'],
+                                                       dbesc($signed_data),
+                                                       dbesc($sig),
+                                                       dbesc($diaspora_handle)
+                                               );
+
+                                               // the existence of parent_author_signature would have meant the parent_author or owner
+                                               // is already relaying.
+                                               logger('diaspora_signed_retraction: relaying relayable_retraction');
+
+                                               proc_run('php','include/notifier.php','relayable_retraction',$r[0]['id']);
+                                       }
+                               }
                        }
                }
        }
@@ -1920,6 +2037,7 @@ function diaspora_send_status($item,$owner,$contact,$public_batch = false) {
 
        $images = array();
 
+       $title = $item['title'];
        $body = $item['body'];
 
 /*
@@ -1944,9 +2062,12 @@ function diaspora_send_status($item,$owner,$contact,$public_batch = false) {
                }
        }       
 */
-
        $body = xmlify(html_entity_decode(bb2diaspora($body)));
 
+       if(strlen($title))
+               $body = xmlify('**' . html_entity_decode($title) . '**' . "\n") . $body;
+
+
        if($item['attach']) {
                $cnt = preg_match_all('/href=\"(.*?)\"(.*?)title=\"(.*?)\"/ism',$item['attach'],$matches,PREG_SET_ORDER);
                if(cnt) {
@@ -2029,10 +2150,14 @@ function diaspora_send_followup($item,$owner,$contact,$public_batch = false) {
 
        $a = get_app();
        $myaddr = $owner['nickname'] . '@' .  substr($a->get_baseurl(), strpos($a->get_baseurl(),'://') + 3);
-       $theiraddr = $contact['addr'];
-
-       $p = q("select guid from item where parent = %d limit 1",
-               $item['parent']
+//     $theiraddr = $contact['addr'];
+
+       // The first item in the `item` table with the parent id is the parent. However, MySQL doesn't always
+       // return the items ordered by `item`.`id`, in which case the wrong item is chosen as the parent.
+       // The only item with `parent` and `id` as the parent id is the parent item.
+       $p = q("select guid from item where parent = %d and id = %d limit 1",
+               intval($item['parent']),
+               intval($item['parent'])
        );
        if(count($p))
                $parent_guid = $p[0]['guid'];
@@ -2043,7 +2168,11 @@ function diaspora_send_followup($item,$owner,$contact,$public_batch = false) {
                $tpl = get_markup_template('diaspora_like.tpl');
                $like = true;
                $target_type = 'Post';
-               $positive = (($item['deleted']) ? 'false' : 'true');
+//             $positive = (($item['deleted']) ? 'false' : 'true');
+               $positive = 'true';
+
+               if(($item['deleted']))
+                       logger('diaspora_send_followup: received deleted "like". Those should go to diaspora_send_retraction');
        }
        else {
                $tpl = get_markup_template('diaspora_comment.tpl');
@@ -2083,41 +2212,58 @@ function diaspora_send_relay($item,$owner,$contact,$public_batch = false) {
 
 
        $a = get_app();
-       $myaddr = $owner['nickname'] . '@' .  substr($a->get_baseurl(), strpos($a->get_baseurl(),'://') + 3);
-       $theiraddr = $contact['addr'];
+       $myaddr = $owner['nickname'] . '@' . substr($a->get_baseurl(), strpos($a->get_baseurl(),'://') + 3);
+//     $theiraddr = $contact['addr'];
+
+       $body = $item['body'];
+       $text = html_entity_decode(bb2diaspora($body));
 
 
-       $p = q("select guid from item where parent = %d limit 1",
-               $item['parent']
+       // The first item in the `item` table with the parent id is the parent. However, MySQL doesn't always
+       // return the items ordered by `item`.`id`, in which case the wrong item is chosen as the parent.
+       // The only item with `parent` and `id` as the parent id is the parent item.
+       $p = q("select guid from item where parent = %d and id = %d limit 1",
+               intval($item['parent']),
+               intval($item['parent'])
        );
        if(count($p))
                $parent_guid = $p[0]['guid'];
        else
                return;
 
-       if($item['verb'] === ACTIVITY_LIKE) {
-               $tpl = get_markup_template('diaspora_like_relay.tpl');
+       $like = false;
+       $relay_retract = false;
+       $sql_sign_id = 'iid';
+       if( $item['deleted']) {
+               $relay_retract = true;
+
+               $target_type = ( ($item['verb'] === ACTIVITY_LIKE) ? 'Like' : 'Comment');
+               $sender_signed_text = $item['guid'] . ';' . $target_type ;
+
+               $sql_sign_id = 'retract_iid';
+               $tpl = get_markup_template('diaspora_relayable_retraction.tpl');
+       }
+       elseif($item['verb'] === ACTIVITY_LIKE) {
                $like = true;
+
                $target_type = 'Post';
-               $positive = (($item['deleted']) ? 'false' : 'true');
+//             $positive = (($item['deleted']) ? 'false' : 'true');
+               $positive = 'true';
+               $sender_signed_text = $item['guid'] . ';' . $target_type . ';' . $parent_guid . ';' . $positive . ';' . $myaddr;
+
+               $tpl = get_markup_template('diaspora_like_relay.tpl');
        }
-       else {
+       else { // item is a comment
+               $sender_signed_text = $item['guid'] . ';' . $parent_guid . ';' . $text . ';' . $myaddr;
+
                $tpl = get_markup_template('diaspora_comment_relay.tpl');
-               $like = false;
        }
 
-       $body = $item['body'];
-
-       $text = html_entity_decode(bb2diaspora($body));
 
-       // fetch the original signature if somebody sent the post to us to relay
-       // If we are relaying for a reply originating on our own account, there wasn't a 'send to relay'
-       // action. It wasn't needed. In that case create the original signature and the 
-       // owner (parent author) signature
-       // comments from other networks will be relayed under our name, with a brief 
-       // preamble to describe what's happening and noting the real author
+       // fetch the original signature if the relayable was created by a Diaspora
+       // or DFRN user. Relayables for other networks are not supported.
 
-       $r = q("select * from sign where iid = %d limit 1",
+       $r = q("select * from sign where " . $sql_sign_id . " = %d limit 1",
                intval($item['id'])
        );
        if(count($r)) { 
@@ -2128,52 +2274,39 @@ function diaspora_send_relay($item,$owner,$contact,$public_batch = false) {
        }
        else {
 
-               $itemcontact = q("select * from contact where `id` = %d limit 1",
-                       intval($item['contact-id'])
-               );
-               if(count($itemcontact)) {
-                       if(! $itemcontact[0]['self']) {
-                               $prefix = sprintf( t('[Relayed] Comment authored by %s from network %s'),
-                                       '['. $item['author-name'] . ']' . '(' . $item['author-link'] . ')',  
-                                       network_to_name($itemcontact['network'])) . "\n";
-                               $body = $prefix . $body;
-                       }
-               }
-               else {
-
-                       if($like)
-                               $signed_text = $item['guid'] . ';' . $target_type . ';' . $parent_guid . ';' . $positive . ';' . $myaddr;
-                       else
-                               $signed_text = $item['guid'] . ';' . $parent_guid . ';' . $text . ';' . $myaddr;
-
-                       $authorsig = base64_encode(rsa_sign($signed_text,$owner['uprvkey'],'sha256'));
-
-                       q("insert into sign (`iid`,`signed_text`,`signature`,`signer`) values (%d,'%s','%s','%s') ",
-                               intval($item['id']),
-                               dbesc($signed_text),
-                               dbesc(base64_encode($authorsig)),
-                               dbesc($myaddr)
-                       );
-                       $handle = $myaddr;
-               }
+               // Author signature information (for likes, comments, and retractions of likes or comments,
+               // whether from Diaspora or Friendica) must be placed in the `sign` table before this 
+               // function is called
+               logger('diaspora_send_relay: original author signature not found, cannot send relayable');
+               return;
        }
 
-       // sign it
+       // Sign the relayable with the top-level owner's signature
+       //
+       // We'll use the $sender_signed_text that we just created, instead of the $signed_text
+       // stored in the database, because that provides the best chance that Diaspora will
+       // be able to reconstruct the signed text the same way we did. This is particularly a
+       // concern for the comment, whose signed text includes the text of the comment. The
+       // smallest change in the text of the comment, including removing whitespace, will
+       // make the signature verification fail. Since we translate from BB code to Diaspora's
+       // markup at the top of this function, which is AFTER we placed the original $signed_text
+       // in the database, it's hazardous to trust the original $signed_text.
 
-       $parentauthorsig = base64_encode(rsa_sign($signed_text,$owner['uprvkey'],'sha256'));
+       $parentauthorsig = base64_encode(rsa_sign($sender_signed_text,$owner['uprvkey'],'sha256'));
 
        $msg = replace_macros($tpl,array(
                '$guid' => xmlify($item['guid']),
                '$parent_guid' => xmlify($parent_guid),
                '$target_type' =>xmlify($target_type),
-               '$authorsig' => xmlify($orig_sign['signature']),
+               '$authorsig' => xmlify($authorsig),
                '$parentsig' => xmlify($parentauthorsig),
                '$body' => xmlify($text),
                '$positive' => xmlify($positive),
                '$handle' => xmlify($handle)
        ));
 
-       logger('diaspora_relay_comment: base message: ' . $msg, LOGGER_DATA);
+       logger('diaspora_send_relay: base message: ' . $msg, LOGGER_DATA);
+
 
        $slap = 'xml=' . urlencode(urlencode(diaspora_msg_build($msg,$owner,$contact,$owner['uprvkey'],$contact['pubkey'],$public_batch)));
 
@@ -2188,14 +2321,25 @@ function diaspora_send_retraction($item,$owner,$contact,$public_batch = false) {
        $a = get_app();
        $myaddr = $owner['nickname'] . '@' .  substr($a->get_baseurl(), strpos($a->get_baseurl(),'://') + 3);
 
-       $signed_text = $item['guid'] . ';' . 'StatusMessage';
+       // Check whether the retraction is for a top-level post or whether it's a relayable
+       if( $item['uri'] !== $item['parent-uri'] ) {
+
+               $tpl = get_markup_template('diaspora_relay_retraction.tpl');
+               $target_type = (($item['verb'] === ACTIVITY_LIKE) ? 'Like' : 'Comment');
+       }
+       else {
+               
+               $tpl = get_markup_template('diaspora_signed_retract.tpl');
+               $target_type = 'StatusMessage';
+       }
+
+       $signed_text = $item['guid'] . ';' . $target_type;
 
-       $tpl = get_markup_template('diaspora_signed_retract.tpl');
        $msg = replace_macros($tpl, array(
-               '$guid'   => $item['guid'],
-               '$type'   => 'StatusMessage',
-               '$handle' => $myaddr,
-               '$signature' => base64_encode(rsa_sign($signed_text,$owner['uprvkey'],'sha256'))
+               '$guid'   => xmlify($item['guid']),
+               '$type'   => xmlify($target_type),
+               '$handle' => xmlify($myaddr),
+               '$signature' => xmlify(base64_encode(rsa_sign($signed_text,$owner['uprvkey'],'sha256')))
        ));
 
        $slap = 'xml=' . urlencode(urlencode(diaspora_msg_build($msg,$owner,$contact,$owner['uprvkey'],$contact['pubkey'],$public_batch)));
@@ -2267,6 +2411,11 @@ function diaspora_send_mail($item,$owner,$contact) {
 
 function diaspora_transmit($owner,$contact,$slap,$public_batch) {
 
+       $enabled = intval(get_config('system','diaspora_enabled'));
+       if(! $enabled) {
+               return 200;
+       }
+
        $a = get_app();
        $logid = random_string(4);
        $dest_url = (($public_batch) ? $contact['batch'] : $contact['notify']);
@@ -2277,14 +2426,20 @@ function diaspora_transmit($owner,$contact,$slap,$public_batch) {
 
        logger('diaspora_transmit: ' . $logid . ' ' . $dest_url);
 
-       if(! intval(get_config('system','diaspora_test')))
-               post_url($dest_url . '/', $slap);
+       if(was_recently_delayed($contact['id'])) {
+               $return_code = 0;
+       }
        else {
-               logger('diaspora_transmit: test_mode');
-               return 200;
+               if(! intval(get_config('system','diaspora_test'))) {
+                       post_url($dest_url . '/', $slap);
+                       $return_code = $a->get_curl_code();
+               }
+               else {
+                       logger('diaspora_transmit: test_mode');
+                       return 200;
+               }
        }
-
-       $return_code = $a->get_curl_code();
+       
        logger('diaspora_transmit: ' . $logid . ' returns: ' . $return_code);
 
        if((! $return_code) || (($return_code == 503) && (stristr($a->get_curl_headers(),'retry-after')))) {
@@ -2308,3 +2463,5 @@ function diaspora_transmit($owner,$contact,$slap,$public_batch) {
 
        return(($return_code) ? $return_code : (-1));
 }
+
+