]> git.mxchange.org Git - quix0rs-gnu-social.git/blob - plugins/OStatus/OStatusPlugin.php
Type testing instead of just empty() in OStatusPlugin
[quix0rs-gnu-social.git] / plugins / OStatus / OStatusPlugin.php
1 <?php
2 /*
3  * StatusNet - the distributed open-source microblogging tool
4  * Copyright (C) 2009-2010, StatusNet, Inc.
5  *
6  * This program is free software: you can redistribute it and/or modify
7  * it under the terms of the GNU Affero General Public License as published by
8  * the Free Software Foundation, either version 3 of the License, or
9  * (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU Affero General Public License for more details.
15  *
16  * You should have received a copy of the GNU Affero General Public License
17  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
18  */
19
20 /**
21  * OStatusPlugin implementation for GNU Social
22  *
23  * Depends on: WebFinger plugin
24  *
25  * @package OStatusPlugin
26  * @maintainer Brion Vibber <brion@status.net>
27  */
28
29 if (!defined('GNUSOCIAL')) { exit(1); }
30
31 set_include_path(get_include_path() . PATH_SEPARATOR . dirname(__FILE__) . '/extlib/phpseclib');
32
33 class FeedSubException extends Exception
34 {
35     function __construct($msg=null)
36     {
37         $type = get_class($this);
38         if ($msg) {
39             parent::__construct("$type: $msg");
40         } else {
41             parent::__construct($type);
42         }
43     }
44 }
45
46 class OStatusPlugin extends Plugin
47 {
48     /**
49      * Hook for RouterInitialized event.
50      *
51      * @param Net_URL_Mapper $m path-to-action mapper
52      * @return boolean hook return
53      */
54     function onRouterInitialized($m)
55     {
56         // Discovery actions
57         $m->connect('main/ostatustag',
58                     array('action' => 'ostatustag'));
59         $m->connect('main/ostatustag?nickname=:nickname',
60                     array('action' => 'ostatustag'), array('nickname' => '[A-Za-z0-9_-]+'));
61         $m->connect('main/ostatus/nickname/:nickname',
62                   array('action' => 'ostatusinit'), array('nickname' => '[A-Za-z0-9_-]+'));
63         $m->connect('main/ostatus/group/:group',
64                   array('action' => 'ostatusinit'), array('group' => '[A-Za-z0-9_-]+'));
65         $m->connect('main/ostatus/peopletag/:peopletag/tagger/:tagger',
66                   array('action' => 'ostatusinit'), array('tagger' => '[A-Za-z0-9_-]+',
67                                                           'peopletag' => '[A-Za-z0-9_-]+'));
68         $m->connect('main/ostatus',
69                     array('action' => 'ostatusinit'));
70
71         // Remote subscription actions
72         $m->connect('main/ostatussub',
73                     array('action' => 'ostatussub'));
74         $m->connect('main/ostatusgroup',
75                     array('action' => 'ostatusgroup'));
76         $m->connect('main/ostatuspeopletag',
77                     array('action' => 'ostatuspeopletag'));
78
79         // PuSH actions
80         $m->connect('main/push/hub', array('action' => 'pushhub'));
81
82         $m->connect('main/push/callback/:feed',
83                     array('action' => 'pushcallback'),
84                     array('feed' => '[0-9]+'));
85
86         // Salmon endpoint
87         $m->connect('main/salmon/user/:id',
88                     array('action' => 'usersalmon'),
89                     array('id' => '[0-9]+'));
90         $m->connect('main/salmon/group/:id',
91                     array('action' => 'groupsalmon'),
92                     array('id' => '[0-9]+'));
93         $m->connect('main/salmon/peopletag/:id',
94                     array('action' => 'peopletagsalmon'),
95                     array('id' => '[0-9]+'));
96         return true;
97     }
98
99     /**
100      * Set up queue handlers for outgoing hub pushes
101      * @param QueueManager $qm
102      * @return boolean hook return
103      */
104     function onEndInitializeQueueManager(QueueManager $qm)
105     {
106         // Prepare outgoing distributions after notice save.
107         $qm->connect('ostatus', 'OStatusQueueHandler');
108
109         // Outgoing from our internal PuSH hub
110         $qm->connect('hubconf', 'HubConfQueueHandler');
111         $qm->connect('hubprep', 'HubPrepQueueHandler');
112
113         $qm->connect('hubout', 'HubOutQueueHandler');
114
115         // Outgoing Salmon replies (when we don't need a return value)
116         $qm->connect('salmon', 'SalmonQueueHandler');
117
118         // Incoming from a foreign PuSH hub
119         $qm->connect('pushin', 'PushInQueueHandler');
120         return true;
121     }
122
123     /**
124      * Put saved notices into the queue for pubsub distribution.
125      */
126     function onStartEnqueueNotice($notice, &$transports)
127     {
128         if ($notice->inScope(null)) {
129             // put our transport first, in case there's any conflict (like OMB)
130             array_unshift($transports, 'ostatus');
131             $this->log(LOG_INFO, "Notice {$notice->id} queued for OStatus processing");
132         } else {
133             // FIXME: we don't do privacy-controlled OStatus updates yet.
134             // once that happens, finer grain of control here.
135             $this->log(LOG_NOTICE, "Not queueing notice {$notice->id} for OStatus because of privacy; scope = {$notice->scope}");
136         }
137         return true;
138     }
139
140     /**
141      * Set up a PuSH hub link to our internal link for canonical timeline
142      * Atom feeds for users and groups.
143      */
144     function onStartApiAtom($feed)
145     {
146         $id = null;
147
148         if ($feed instanceof AtomUserNoticeFeed) {
149             $salmonAction = 'usersalmon';
150             $user = $feed->getUser();
151             $id   = $user->id;
152             $profile = $user->getProfile();
153         } else if ($feed instanceof AtomGroupNoticeFeed) {
154             $salmonAction = 'groupsalmon';
155             $group = $feed->getGroup();
156             $id = $group->id;
157         } else if ($feed instanceof AtomListNoticeFeed) {
158             $salmonAction = 'peopletagsalmon';
159             $peopletag = $feed->getList();
160             $id = $peopletag->id;
161         } else {
162             return true;
163         }
164
165         if (!empty($id)) {
166             $hub = common_config('ostatus', 'hub');
167             if (empty($hub)) {
168                 // Updates will be handled through our internal PuSH hub.
169                 $hub = common_local_url('pushhub');
170             }
171             $feed->addLink($hub, array('rel' => 'hub'));
172
173             // Also, we'll add in the salmon link
174             $salmon = common_local_url($salmonAction, array('id' => $id));
175             $feed->addLink($salmon, array('rel' => Salmon::REL_SALMON));
176
177             // XXX: these are deprecated, but StatusNet only looks for NS_REPLIES
178             $feed->addLink($salmon, array('rel' => Salmon::NS_REPLIES));
179             $feed->addLink($salmon, array('rel' => Salmon::NS_MENTIONS));
180         }
181
182         return true;
183     }
184
185     /**
186      * Add in an OStatus subscribe button
187      */
188     function onStartProfileRemoteSubscribe($output, $profile)
189     {
190         $this->onStartProfileListItemActionElements($output, $profile);
191         return false;
192     }
193
194     function onStartGroupSubscribe($widget, $group)
195     {
196         $cur = common_current_user();
197
198         if (empty($cur)) {
199             $widget->out->elementStart('li', 'entity_subscribe');
200
201             $url = common_local_url('ostatusinit',
202                                     array('group' => $group->nickname));
203             $widget->out->element('a', array('href' => $url,
204                                              'class' => 'entity_remote_subscribe'),
205                                 // TRANS: Link to subscribe to a remote entity.
206                                 _m('Subscribe'));
207
208             $widget->out->elementEnd('li');
209             return false;
210         }
211
212         return true;
213     }
214
215     function onStartSubscribePeopletagForm($output, $peopletag)
216     {
217         $cur = common_current_user();
218
219         if (empty($cur)) {
220             $output->elementStart('li', 'entity_subscribe');
221             $profile = $peopletag->getTagger();
222             $url = common_local_url('ostatusinit',
223                                     array('tagger' => $profile->nickname, 'peopletag' => $peopletag->tag));
224             $output->element('a', array('href' => $url,
225                                         'class' => 'entity_remote_subscribe'),
226                                 // TRANS: Link to subscribe to a remote entity.
227                                 _m('Subscribe'));
228
229             $output->elementEnd('li');
230             return false;
231         }
232
233         return true;
234     }
235
236     function onStartShowTagProfileForm($action, $profile)
237     {
238         $action->elementStart('form', array('method' => 'post',
239                                            'id' => 'form_tag_user',
240                                            'class' => 'form_settings',
241                                            'name' => 'tagprofile',
242                                            'action' => common_local_url('tagprofile', array('id' => @$profile->id))));
243
244         $action->elementStart('fieldset');
245         // TRANS: Fieldset legend.
246         $action->element('legend', null, _m('List remote profile'));
247         $action->hidden('token', common_session_token());
248
249         $user = common_current_user();
250
251         $action->elementStart('ul', 'form_data');
252         $action->elementStart('li');
253
254         // TRANS: Field label.
255         $action->input('uri', _m('LABEL','Remote profile'), $action->trimmed('uri'),
256                      // TRANS: Field title.
257                      _m('OStatus user\'s address, like nickname@example.com or http://example.net/nickname.'));
258         $action->elementEnd('li');
259         $action->elementEnd('ul');
260         // TRANS: Button text to fetch remote profile.
261         $action->submit('fetch', _m('BUTTON','Fetch'));
262         $action->elementEnd('fieldset');
263         $action->elementEnd('form');
264     }
265
266     function onStartTagProfileAction($action, $profile)
267     {
268         $err = null;
269         $uri = $action->trimmed('uri');
270
271         if (!$profile && $uri) {
272             try {
273                 if (Validate::email($uri)) {
274                     $oprofile = Ostatus_profile::ensureWebfinger($uri);
275                 } else if (Validate::uri($uri)) {
276                     $oprofile = Ostatus_profile::ensureProfileURL($uri);
277                 } else {
278                     // TRANS: Exception in OStatus when invalid URI was entered.
279                     throw new Exception(_m('Invalid URI.'));
280                 }
281
282                 // redirect to the new profile.
283                 common_redirect(common_local_url('tagprofile', array('id' => $oprofile->profile_id)), 303);
284
285             } catch (Exception $e) {
286                 // TRANS: Error message in OStatus plugin. Do not translate the domain names example.com
287                 // TRANS: and example.net, as these are official standard domain names for use in examples.
288                 $err = _m("Sorry, we could not reach that address. Please make sure that the OStatus address is like nickname@example.com or http://example.net/nickname.");
289             }
290
291             $action->showForm($err);
292             return false;
293         }
294         return true;
295     }
296
297     /*
298      * If the field being looked for is URI look for the profile
299      */
300     function onStartProfileCompletionSearch($action, $profile, $search_engine) {
301         if ($action->field == 'uri') {
302             $profile->joinAdd(array('id', 'user:id'));
303             $profile->whereAdd('uri LIKE "%' . $profile->escape($q) . '%"');
304             $profile->query();
305
306             if ($profile->N == 0) {
307                 try {
308                     if (Validate::email($q)) {
309                         $oprofile = Ostatus_profile::ensureWebfinger($q);
310                     } else if (Validate::uri($q)) {
311                         $oprofile = Ostatus_profile::ensureProfileURL($q);
312                     } else {
313                         // TRANS: Exception in OStatus when invalid URI was entered.
314                         throw new Exception(_m('Invalid URI.'));
315                     }
316                     return $this->filter(array($oprofile->localProfile()));
317
318                 } catch (Exception $e) {
319                 // TRANS: Error message in OStatus plugin. Do not translate the domain names example.com
320                 // TRANS: and example.net, as these are official standard domain names for use in examples.
321                     $this->msg = _m("Sorry, we could not reach that address. Please make sure that the OStatus address is like nickname@example.com or http://example.net/nickname.");
322                     return array();
323                 }
324             }
325             return false;
326         }
327         return true;
328     }
329
330     /**
331      * Find any explicit remote mentions. Accepted forms:
332      *   Webfinger: @user@example.com
333      *   Profile link: @example.com/mublog/user
334      * @param Profile $sender
335      * @param string $text input markup text
336      * @param array &$mention in/out param: set of found mentions
337      * @return boolean hook return value
338      */
339     function onEndFindMentions(Profile $sender, $text, &$mentions)
340     {
341         $matches = array();
342
343         // Webfinger matches: @user@example.com
344         if (preg_match_all('!(?:^|\s+)@((?:\w+\.)*\w+@(?:\w+\-?\w+\.)*\w+(?:\w+\-\w+)*\.\w+)!',
345                        $text,
346                        $wmatches,
347                        PREG_OFFSET_CAPTURE)) {
348             foreach ($wmatches[1] as $wmatch) {
349                 list($target, $pos) = $wmatch;
350                 $this->log(LOG_INFO, "Checking webfinger '$target'");
351                 try {
352                     $oprofile = Ostatus_profile::ensureWebfinger($target);
353                     if ($oprofile instanceof Ostatus_profile && !$oprofile->isGroup()) {
354                         $profile = $oprofile->localProfile();
355                         $matches[$pos] = array('mentioned' => array($profile),
356                                                'type' => 'mention',
357                                                'text' => $target,
358                                                'position' => $pos,
359                                                'url' => $profile->profileurl);
360                     }
361                 } catch (Exception $e) {
362                     $this->log(LOG_ERR, "Webfinger check failed: " . $e->getMessage());
363                 }
364             }
365         }
366
367         // Profile matches: @example.com/mublog/user
368         if (preg_match_all('!(?:^|\s+)@((?:\w+\.)*\w+(?:\w+\-\w+)*\.\w+(?:/\w+)+)!',
369                        $text,
370                        $wmatches,
371                        PREG_OFFSET_CAPTURE)) {
372             foreach ($wmatches[1] as $wmatch) {
373                 list($target, $pos) = $wmatch;
374                 $schemes = array('http', 'https');
375                 foreach ($schemes as $scheme) {
376                     $url = "$scheme://$target";
377                     $this->log(LOG_INFO, "Checking profile address '$url'");
378                     try {
379                         $oprofile = Ostatus_profile::ensureProfileURL($url);
380                         if ($oprofile instanceof Ostatus_profile && !$oprofile->isGroup()) {
381                             $profile = $oprofile->localProfile();
382                             $matches[$pos] = array('mentioned' => array($profile),
383                                                    'type' => 'mention',
384                                                    'text' => $target,
385                                                    'position' => $pos,
386                                                    'url' => $profile->profileurl);
387                             break;
388                         }
389                     } catch (Exception $e) {
390                         $this->log(LOG_ERR, "Profile check failed: " . $e->getMessage());
391                     }
392                 }
393             }
394         }
395
396         foreach ($mentions as $i => $other) {
397             // If we share a common prefix with a local user, override it!
398             $pos = $other['position'];
399             if (isset($matches[$pos])) {
400                 $mentions[$i] = $matches[$pos];
401                 unset($matches[$pos]);
402             }
403         }
404         foreach ($matches as $mention) {
405             $mentions[] = $mention;
406         }
407
408         return true;
409     }
410
411     /**
412      * Allow remote profile references to be used in commands:
413      *   sub update@status.net
414      *   whois evan@identi.ca
415      *   reply http://identi.ca/evan hey what's up
416      *
417      * @param Command $command
418      * @param string $arg
419      * @param Profile &$profile
420      * @return hook return code
421      */
422     function onStartCommandGetProfile($command, $arg, &$profile)
423     {
424         $oprofile = $this->pullRemoteProfile($arg);
425         if ($oprofile instanceof Ostatus_profile && !$oprofile->isGroup()) {
426             $profile = $oprofile->localProfile();
427             return false;
428         } else {
429             return true;
430         }
431     }
432
433     /**
434      * Allow remote group references to be used in commands:
435      *   join group+statusnet@identi.ca
436      *   join http://identi.ca/group/statusnet
437      *   drop identi.ca/group/statusnet
438      *
439      * @param Command $command
440      * @param string $arg
441      * @param User_group &$group
442      * @return hook return code
443      */
444     function onStartCommandGetGroup($command, $arg, &$group)
445     {
446         $oprofile = $this->pullRemoteProfile($arg);
447         if ($oprofile instanceof Ostatus_profile && $oprofile->isGroup()) {
448             $group = $oprofile->localGroup();
449             return false;
450         } else {
451             return true;
452         }
453     }
454
455     protected function pullRemoteProfile($arg)
456     {
457         $oprofile = null;
458         if (preg_match('!^((?:\w+\.)*\w+@(?:\w+\.)*\w+(?:\w+\-\w+)*\.\w+)$!', $arg)) {
459             // webfinger lookup
460             try {
461                 return Ostatus_profile::ensureWebfinger($arg);
462             } catch (Exception $e) {
463                 common_log(LOG_ERR, 'Webfinger lookup failed for ' .
464                                     $arg . ': ' . $e->getMessage());
465             }
466         }
467
468         // Look for profile URLs, with or without scheme:
469         $urls = array();
470         if (preg_match('!^https?://((?:\w+\.)*\w+(?:\w+\-\w+)*\.\w+(?:/\w+)+)$!', $arg)) {
471             $urls[] = $arg;
472         }
473         if (preg_match('!^((?:\w+\.)*\w+(?:\w+\-\w+)*\.\w+(?:/\w+)+)$!', $arg)) {
474             $schemes = array('http', 'https');
475             foreach ($schemes as $scheme) {
476                 $urls[] = "$scheme://$arg";
477             }
478         }
479
480         foreach ($urls as $url) {
481             try {
482                 return Ostatus_profile::ensureProfileURL($url);
483             } catch (Exception $e) {
484                 common_log(LOG_ERR, 'Profile lookup failed for ' .
485                                     $arg . ': ' . $e->getMessage());
486             }
487         }
488         return null;
489     }
490
491     /**
492      * Make sure necessary tables are filled out.
493      */
494     function onCheckSchema() {
495         $schema = Schema::get();
496         $schema->ensureTable('ostatus_profile', Ostatus_profile::schemaDef());
497         $schema->ensureTable('ostatus_source', Ostatus_source::schemaDef());
498         $schema->ensureTable('feedsub', FeedSub::schemaDef());
499         $schema->ensureTable('hubsub', HubSub::schemaDef());
500         $schema->ensureTable('magicsig', Magicsig::schemaDef());
501         return true;
502     }
503
504     public function onEndShowStylesheets(Action $action) {
505         $action->cssLink($this->path('theme/base/css/ostatus.css'));
506         return true;
507     }
508
509     function onEndShowStatusNetScripts($action) {
510         $action->script($this->path('js/ostatus.js'));
511         return true;
512     }
513
514     /**
515      * Override the "from ostatus" bit in notice lists to link to the
516      * original post and show the domain it came from.
517      *
518      * @param Notice in $notice
519      * @param string out &$name
520      * @param string out &$url
521      * @param string out &$title
522      * @return mixed hook return code
523      */
524     function onStartNoticeSourceLink($notice, &$name, &$url, &$title)
525     {
526         // If we don't handle this, keep the event handler going
527         if ($notice->source != 'ostatus') {
528             return true;
529         }
530
531         try {
532             $url = $notice->getUrl();
533             // If getUrl() throws exception, $url is never set
534             
535             $bits = parse_url($url);
536             $domain = $bits['host'];
537             if (substr($domain, 0, 4) == 'www.') {
538                 $name = substr($domain, 4);
539             } else {
540                 $name = $domain;
541             }
542
543             // TRANS: Title. %s is a domain name.
544             $title = sprintf(_m('Sent from %s via OStatus'), $domain);
545
546             // Abort event handler, we have a name and URL!
547             return false;
548         } catch (InvalidUrlException $e) {
549             // This just means we don't have the notice source data
550             return true;
551         }
552     }
553
554     /**
555      * Send incoming PuSH feeds for OStatus endpoints in for processing.
556      *
557      * @param FeedSub $feedsub
558      * @param DOMDocument $feed
559      * @return mixed hook return code
560      */
561     function onStartFeedSubReceive($feedsub, $feed)
562     {
563         $oprofile = Ostatus_profile::getKV('feeduri', $feedsub->uri);
564         if ($oprofile instanceof Ostatus_profile) {
565             $oprofile->processFeed($feed, 'push');
566         } else {
567             common_log(LOG_DEBUG, "No ostatus profile for incoming feed $feedsub->uri");
568         }
569     }
570
571     /**
572      * Tell the FeedSub infrastructure whether we have any active OStatus
573      * usage for the feed; if not it'll be able to garbage-collect the
574      * feed subscription.
575      *
576      * @param FeedSub $feedsub
577      * @param integer $count in/out
578      * @return mixed hook return code
579      */
580     function onFeedSubSubscriberCount($feedsub, &$count)
581     {
582         $oprofile = Ostatus_profile::getKV('feeduri', $feedsub->uri);
583         if ($oprofile instanceof Ostatus_profile) {
584             $count += $oprofile->subscriberCount();
585         }
586         return true;
587     }
588
589     /**
590      * When about to subscribe to a remote user, start a server-to-server
591      * PuSH subscription if needed. If we can't establish that, abort.
592      *
593      * @fixme If something else aborts later, we could end up with a stray
594      *        PuSH subscription. This is relatively harmless, though.
595      *
596      * @param Profile $profile  subscriber
597      * @param Profile $other    subscribee
598      *
599      * @return hook return code
600      *
601      * @throws Exception
602      */
603     function onStartSubscribe(Profile $profile, Profile $other)
604     {
605         if (!$profile->isLocal()) {
606             return true;
607         }
608
609         $oprofile = Ostatus_profile::getKV('profile_id', $other->id);
610         if (!$oprofile instanceof Ostatus_profile) {
611             return true;
612         }
613
614         if (!$oprofile->subscribe()) {
615             // TRANS: Exception thrown when setup of remote subscription fails.
616             throw new Exception(_m('Could not set up remote subscription.'));
617         }
618     }
619
620     /**
621      * Having established a remote subscription, send a notification to the
622      * remote OStatus profile's endpoint.
623      *
624      * @param Profile $profile  subscriber
625      * @param Profile $other    subscribee
626      *
627      * @return hook return code
628      *
629      * @throws Exception
630      */
631     function onEndSubscribe(Profile $profile, Profile $other)
632     {
633         if (!$profile->isLocal()) {
634             return true;
635         }
636
637         $oprofile = Ostatus_profile::getKV('profile_id', $other->id);
638         if (!$oprofile instanceof Ostatus_profile) {
639             return true;
640         }
641
642         $sub = Subscription::pkeyGet(array('subscriber' => $profile->id,
643                                            'subscribed' => $other->id));
644
645         $act = $sub->asActivity();
646
647         $oprofile->notifyActivity($act, $profile);
648
649         return true;
650     }
651
652     /**
653      * Notify remote server and garbage collect unused feeds on unsubscribe.
654      * @todo FIXME: Send these operations to background queues
655      *
656      * @param User $user
657      * @param Profile $other
658      * @return hook return value
659      */
660     function onEndUnsubscribe(Profile $profile, Profile $other)
661     {
662         if (!$profile->isLocal()) {
663             return true;
664         }
665
666         $oprofile = Ostatus_profile::getKV('profile_id', $other->id);
667         if (!$oprofile instanceof Ostatus_profile) {
668             return true;
669         }
670
671         // Drop the PuSH subscription if there are no other subscribers.
672         $oprofile->garbageCollect();
673
674         $act = new Activity();
675
676         $act->verb = ActivityVerb::UNFOLLOW;
677
678         $act->id   = TagURI::mint('unfollow:%d:%d:%s',
679                                   $profile->id,
680                                   $other->id,
681                                   common_date_iso8601(time()));
682
683         $act->time    = time();
684         // TRANS: Title for unfollowing a remote profile.
685         $act->title   = _m('TITLE','Unfollow');
686         // TRANS: Success message for unsubscribe from user attempt through OStatus.
687         // TRANS: %1$s is the unsubscriber's name, %2$s is the unsubscribed user's name.
688         $act->content = sprintf(_m('%1$s stopped following %2$s.'),
689                                $profile->getBestName(),
690                                $other->getBestName());
691
692         $act->actor   = ActivityObject::fromProfile($profile);
693         $act->object  = ActivityObject::fromProfile($other);
694
695         $oprofile->notifyActivity($act, $profile);
696
697         return true;
698     }
699
700     /**
701      * When one of our local users tries to join a remote group,
702      * notify the remote server. If the notification is rejected,
703      * deny the join.
704      *
705      * @param User_group $group
706      * @param Profile    $profile
707      *
708      * @return mixed hook return value
709      */
710     function onStartJoinGroup($group, $profile)
711     {
712         $oprofile = Ostatus_profile::getKV('group_id', $group->id);
713         if (!$oprofile instanceof Ostatus_profile) {
714             return true;
715         }
716
717         if (!$oprofile->subscribe()) {
718             // TRANS: Exception thrown when setup of remote group membership fails.
719             throw new Exception(_m('Could not set up remote group membership.'));
720         }
721
722         // NOTE: we don't use Group_member::asActivity() since that record
723         // has not yet been created.
724
725         $act = new Activity();
726         $act->id = TagURI::mint('join:%d:%d:%s',
727                                 $profile->id,
728                                 $group->id,
729                                 common_date_iso8601(time()));
730
731         $act->actor = ActivityObject::fromProfile($profile);
732         $act->verb = ActivityVerb::JOIN;
733         $act->object = $oprofile->asActivityObject();
734
735         $act->time = time();
736         // TRANS: Title for joining a remote groep.
737         $act->title = _m('TITLE','Join');
738         // TRANS: Success message for subscribe to group attempt through OStatus.
739         // TRANS: %1$s is the member name, %2$s is the subscribed group's name.
740         $act->content = sprintf(_m('%1$s has joined group %2$s.'),
741                                 $profile->getBestName(),
742                                 $oprofile->getBestName());
743
744         if ($oprofile->notifyActivity($act, $profile)) {
745             return true;
746         } else {
747             $oprofile->garbageCollect();
748             // TRANS: Exception thrown when joining a remote group fails.
749             throw new Exception(_m('Failed joining remote group.'));
750         }
751     }
752
753     /**
754      * When one of our local users leaves a remote group, notify the remote
755      * server.
756      *
757      * @fixme Might be good to schedule a resend of the leave notification
758      * if it failed due to a transitory error. We've canceled the local
759      * membership already anyway, but if the remote server comes back up
760      * it'll be left with a stray membership record.
761      *
762      * @param User_group $group
763      * @param Profile $profile
764      *
765      * @return mixed hook return value
766      */
767     function onEndLeaveGroup($group, $profile)
768     {
769         $oprofile = Ostatus_profile::getKV('group_id', $group->id);
770         if (!$oprofile instanceof Ostatus_profile) {
771             return true;
772         }
773
774         // Drop the PuSH subscription if there are no other subscribers.
775         $oprofile->garbageCollect();
776
777         $member = $profile;
778
779         $act = new Activity();
780         $act->id = TagURI::mint('leave:%d:%d:%s',
781                                 $member->id,
782                                 $group->id,
783                                 common_date_iso8601(time()));
784
785         $act->actor = ActivityObject::fromProfile($member);
786         $act->verb = ActivityVerb::LEAVE;
787         $act->object = $oprofile->asActivityObject();
788
789         $act->time = time();
790         // TRANS: Title for leaving a remote group.
791         $act->title = _m('TITLE','Leave');
792         // TRANS: Success message for unsubscribe from group attempt through OStatus.
793         // TRANS: %1$s is the member name, %2$s is the unsubscribed group's name.
794         $act->content = sprintf(_m('%1$s has left group %2$s.'),
795                                 $member->getBestName(),
796                                 $oprofile->getBestName());
797
798         $oprofile->notifyActivity($act, $member);
799     }
800
801     /**
802      * When one of our local users tries to subscribe to a remote peopletag,
803      * notify the remote server. If the notification is rejected,
804      * deny the subscription.
805      *
806      * @param Profile_list $peopletag
807      * @param User         $user
808      *
809      * @return mixed hook return value
810      */
811
812     function onStartSubscribePeopletag($peopletag, $user)
813     {
814         $oprofile = Ostatus_profile::getKV('peopletag_id', $peopletag->id);
815         if (!$oprofile instanceof Ostatus_profile) {
816             return true;
817         }
818
819         if (!$oprofile->subscribe()) {
820             // TRANS: Exception thrown when setup of remote list subscription fails.
821             throw new Exception(_m('Could not set up remote list subscription.'));
822         }
823
824         $sub = $user->getProfile();
825         $tagger = Profile::getKV($peopletag->tagger);
826
827         $act = new Activity();
828         $act->id = TagURI::mint('subscribe_peopletag:%d:%d:%s',
829                                 $sub->id,
830                                 $peopletag->id,
831                                 common_date_iso8601(time()));
832
833         $act->actor = ActivityObject::fromProfile($sub);
834         $act->verb = ActivityVerb::FOLLOW;
835         $act->object = $oprofile->asActivityObject();
836
837         $act->time = time();
838         // TRANS: Title for following a remote list.
839         $act->title = _m('TITLE','Follow list');
840         // TRANS: Success message for remote list follow through OStatus.
841         // TRANS: %1$s is the subscriber name, %2$s is the list, %3$s is the lister's name.
842         $act->content = sprintf(_m('%1$s is now following people listed in %2$s by %3$s.'),
843                                 $sub->getBestName(),
844                                 $oprofile->getBestName(),
845                                 $tagger->getBestName());
846
847         if ($oprofile->notifyActivity($act, $sub)) {
848             return true;
849         } else {
850             $oprofile->garbageCollect();
851             // TRANS: Exception thrown when subscription to remote list fails.
852             throw new Exception(_m('Failed subscribing to remote list.'));
853         }
854     }
855
856     /**
857      * When one of our local users unsubscribes to a remote peopletag, notify the remote
858      * server.
859      *
860      * @param Profile_list $peopletag
861      * @param User         $user
862      *
863      * @return mixed hook return value
864      */
865
866     function onEndUnsubscribePeopletag($peopletag, $user)
867     {
868         $oprofile = Ostatus_profile::getKV('peopletag_id', $peopletag->id);
869         if (!$oprofile instanceof Ostatus_profile) {
870             return true;
871         }
872
873         // Drop the PuSH subscription if there are no other subscribers.
874         $oprofile->garbageCollect();
875
876         $sub = Profile::getKV($user->id);
877         $tagger = Profile::getKV($peopletag->tagger);
878
879         $act = new Activity();
880         $act->id = TagURI::mint('unsubscribe_peopletag:%d:%d:%s',
881                                 $sub->id,
882                                 $peopletag->id,
883                                 common_date_iso8601(time()));
884
885         $act->actor = ActivityObject::fromProfile($member);
886         $act->verb = ActivityVerb::UNFOLLOW;
887         $act->object = $oprofile->asActivityObject();
888
889         $act->time = time();
890         // TRANS: Title for unfollowing a remote list.
891         $act->title = _m('Unfollow list');
892         // TRANS: Success message for remote list unfollow through OStatus.
893         // TRANS: %1$s is the subscriber name, %2$s is the list, %3$s is the lister's name.
894         $act->content = sprintf(_m('%1$s stopped following the list %2$s by %3$s.'),
895                                 $sub->getBestName(),
896                                 $oprofile->getBestName(),
897                                 $tagger->getBestName());
898
899         $oprofile->notifyActivity($act, $user);
900     }
901
902     /**
903      * Notify remote users when their notices get favorited.
904      *
905      * @param Profile or User $profile of local user doing the faving
906      * @param Notice $notice being favored
907      * @return hook return value
908      */
909     function onEndFavorNotice(Profile $profile, Notice $notice)
910     {
911         // Only distribute local users' favor actions, remote users
912         // will have already distributed theirs.
913         if (!$profile->isLocal()) {
914             return true;
915         }
916
917         $oprofile = Ostatus_profile::getKV('profile_id', $notice->profile_id);
918         if (!$oprofile instanceof Ostatus_profile) {
919             return true;
920         }
921
922         $fav = Fave::pkeyGet(array('user_id' => $user->id,
923                                    'notice_id' => $notice->id));
924
925         if (!$fav instanceof Fave) {
926             // That's weird.
927             // TODO: Make pkeyGet throw exception, since this is a critical failure.
928             return true;
929         }
930
931         $act = $fav->asActivity();
932
933         $oprofile->notifyActivity($act, $profile);
934
935         return true;
936     }
937
938     /**
939      * Notify remote user it has got a new people tag
940      *   - tag verb is queued
941      *   - the subscription is done immediately if not present
942      *
943      * @param Profile_tag $ptag the people tag that was created
944      * @return hook return value
945      */
946     function onEndTagProfile($ptag)
947     {
948         $oprofile = Ostatus_profile::getKV('profile_id', $ptag->tagged);
949         if (!$oprofile instanceof Ostatus_profile) {
950             return true;
951         }
952
953         $plist = $ptag->getMeta();
954         if ($plist->private) {
955             return true;
956         }
957
958         $act = new Activity();
959
960         $tagger = $plist->getTagger();
961         $tagged = Profile::getKV('id', $ptag->tagged);
962
963         $act->verb = ActivityVerb::TAG;
964         $act->id   = TagURI::mint('tag_profile:%d:%d:%s',
965                                   $plist->tagger, $plist->id,
966                                   common_date_iso8601(time()));
967         $act->time = time();
968         // TRANS: Title for listing a remote profile.
969         $act->title = _m('TITLE','List');
970         // TRANS: Success message for remote list addition through OStatus.
971         // TRANS: %1$s is the list creator's name, %2$s is the added list member, %3$s is the list name.
972         $act->content = sprintf(_m('%1$s listed %2$s in the list %3$s.'),
973                                 $tagger->getBestName(),
974                                 $tagged->getBestName(),
975                                 $plist->getBestName());
976
977         $act->actor  = ActivityObject::fromProfile($tagger);
978         $act->objects = array(ActivityObject::fromProfile($tagged));
979         $act->target = ActivityObject::fromPeopletag($plist);
980
981         $oprofile->notifyDeferred($act, $tagger);
982
983         // initiate a PuSH subscription for the person being tagged
984         if (!$oprofile->subscribe()) {
985             // TRANS: Exception thrown when subscribing to a remote list fails.
986             throw new Exception(sprintf(_m('Could not complete subscription to remote '.
987                                           'profile\'s feed. List %s could not be saved.'), $ptag->tag));
988             return false;
989         }
990         return true;
991     }
992
993     /**
994      * Notify remote user that a people tag has been removed
995      *   - untag verb is queued
996      *   - the subscription is undone immediately if not required
997      *     i.e garbageCollect()'d
998      *
999      * @param Profile_tag $ptag the people tag that was deleted
1000      * @return hook return value
1001      */
1002     function onEndUntagProfile($ptag)
1003     {
1004         $oprofile = Ostatus_profile::getKV('profile_id', $ptag->tagged);
1005         if (!$oprofile instanceof Ostatus_profile) {
1006             return true;
1007         }
1008
1009         $plist = $ptag->getMeta();
1010         if ($plist->private) {
1011             return true;
1012         }
1013
1014         $act = new Activity();
1015
1016         $tagger = $plist->getTagger();
1017         $tagged = Profile::getKV('id', $ptag->tagged);
1018
1019         $act->verb = ActivityVerb::UNTAG;
1020         $act->id   = TagURI::mint('untag_profile:%d:%d:%s',
1021                                   $plist->tagger, $plist->id,
1022                                   common_date_iso8601(time()));
1023         $act->time = time();
1024         // TRANS: Title for unlisting a remote profile.
1025         $act->title = _m('TITLE','Unlist');
1026         // TRANS: Success message for remote list removal through OStatus.
1027         // TRANS: %1$s is the list creator's name, %2$s is the removed list member, %3$s is the list name.
1028         $act->content = sprintf(_m('%1$s removed %2$s from the list %3$s.'),
1029                                 $tagger->getBestName(),
1030                                 $tagged->getBestName(),
1031                                 $plist->getBestName());
1032
1033         $act->actor  = ActivityObject::fromProfile($tagger);
1034         $act->objects = array(ActivityObject::fromProfile($tagged));
1035         $act->target = ActivityObject::fromPeopletag($plist);
1036
1037         $oprofile->notifyDeferred($act, $tagger);
1038
1039         // unsubscribe to PuSH feed if no more required
1040         $oprofile->garbageCollect();
1041
1042         return true;
1043     }
1044
1045     /**
1046      * Notify remote users when their notices get de-favorited.
1047      *
1048      * @param Profile $profile Profile person doing the de-faving
1049      * @param Notice  $notice  Notice being favored
1050      *
1051      * @return hook return value
1052      */
1053     function onEndDisfavorNotice(Profile $profile, Notice $notice)
1054     {
1055         // Only distribute local users' disfavor actions, remote users
1056         // will have already distributed theirs.
1057         if (!$profile->isLocal()) {
1058             return true;
1059         }
1060
1061         $oprofile = Ostatus_profile::getKV('profile_id', $notice->profile_id);
1062         if (!$oprofile instanceof Ostatus_profile) {
1063             return true;
1064         }
1065
1066         $act = new Activity();
1067
1068         $act->verb = ActivityVerb::UNFAVORITE;
1069         $act->id   = TagURI::mint('disfavor:%d:%d:%s',
1070                                   $profile->id,
1071                                   $notice->id,
1072                                   common_date_iso8601(time()));
1073         $act->time    = time();
1074         // TRANS: Title for unliking a remote notice.
1075         $act->title   = _m('Unlike');
1076         // TRANS: Success message for remove a favorite notice through OStatus.
1077         // TRANS: %1$s is the unfavoring user's name, %2$s is URI to the no longer favored notice.
1078         $act->content = sprintf(_m('%1$s no longer likes %2$s.'),
1079                                $profile->getBestName(),
1080                                $notice->getUrl());
1081
1082         $act->actor   = ActivityObject::fromProfile($profile);
1083         $act->object  = ActivityObject::fromNotice($notice);
1084
1085         $oprofile->notifyActivity($act, $profile);
1086
1087         return true;
1088     }
1089
1090     function onStartGetProfileUri($profile, &$uri)
1091     {
1092         $oprofile = Ostatus_profile::getKV('profile_id', $profile->id);
1093         if ($oprofile instanceof Ostatus_profile) {
1094             $uri = $oprofile->uri;
1095             return false;
1096         }
1097         return true;
1098     }
1099
1100     function onStartUserGroupHomeUrl($group, &$url)
1101     {
1102         return $this->onStartUserGroupPermalink($group, $url);
1103     }
1104
1105     function onStartUserGroupPermalink($group, &$url)
1106     {
1107         $oprofile = Ostatus_profile::getKV('group_id', $group->id);
1108         if ($oprofile instanceof Ostatus_profile) {
1109             // @fixme this should probably be in the user_group table
1110             // @fixme this uri not guaranteed to be a profile page
1111             $url = $oprofile->uri;
1112             return false;
1113         }
1114     }
1115
1116     function onStartShowSubscriptionsContent($action)
1117     {
1118         $this->showEntityRemoteSubscribe($action);
1119
1120         return true;
1121     }
1122
1123     function onStartShowUserGroupsContent($action)
1124     {
1125         $this->showEntityRemoteSubscribe($action, 'ostatusgroup');
1126
1127         return true;
1128     }
1129
1130     function onEndShowSubscriptionsMiniList($action)
1131     {
1132         $this->showEntityRemoteSubscribe($action);
1133
1134         return true;
1135     }
1136
1137     function onEndShowGroupsMiniList($action)
1138     {
1139         $this->showEntityRemoteSubscribe($action, 'ostatusgroup');
1140
1141         return true;
1142     }
1143
1144     function showEntityRemoteSubscribe($action, $target='ostatussub')
1145     {
1146         $user = common_current_user();
1147         if ($user && ($user->id == $action->profile->id)) {
1148             $action->elementStart('div', 'entity_actions');
1149             $action->elementStart('p', array('id' => 'entity_remote_subscribe',
1150                                              'class' => 'entity_subscribe'));
1151             $action->element('a', array('href' => common_local_url($target),
1152                                         'class' => 'entity_remote_subscribe'),
1153                                 // TRANS: Link text for link to remote subscribe.
1154                                 _m('Remote'));
1155             $action->elementEnd('p');
1156             $action->elementEnd('div');
1157         }
1158     }
1159
1160     /**
1161      * Ping remote profiles with updates to this profile.
1162      * Salmon pings are queued for background processing.
1163      */
1164     function onEndBroadcastProfile(Profile $profile)
1165     {
1166         $user = User::getKV('id', $profile->id);
1167
1168         // Find foreign accounts I'm subscribed to that support Salmon pings.
1169         //
1170         // @fixme we could run updates through the PuSH feed too,
1171         // in which case we can skip Salmon pings to folks who
1172         // are also subscribed to me.
1173         $sql = "SELECT * FROM ostatus_profile " .
1174                "WHERE profile_id IN " .
1175                "(SELECT subscribed FROM subscription WHERE subscriber=%d) " .
1176                "OR group_id IN " .
1177                "(SELECT group_id FROM group_member WHERE profile_id=%d)";
1178         $oprofile = new Ostatus_profile();
1179         $oprofile->query(sprintf($sql, $profile->id, $profile->id));
1180
1181         if ($oprofile->N == 0) {
1182             common_log(LOG_DEBUG, "No OStatus remote subscribees for $profile->nickname");
1183             return true;
1184         }
1185
1186         $act = new Activity();
1187
1188         $act->verb = ActivityVerb::UPDATE_PROFILE;
1189         $act->id   = TagURI::mint('update-profile:%d:%s',
1190                                   $profile->id,
1191                                   common_date_iso8601(time()));
1192         $act->time    = time();
1193         // TRANS: Title for activity.
1194         $act->title   = _m('Profile update');
1195         // TRANS: Ping text for remote profile update through OStatus.
1196         // TRANS: %s is user that updated their profile.
1197         $act->content = sprintf(_m('%s has updated their profile page.'),
1198                                $profile->getBestName());
1199
1200         $act->actor   = ActivityObject::fromProfile($profile);
1201         $act->object  = $act->actor;
1202
1203         while ($oprofile->fetch()) {
1204             $oprofile->notifyDeferred($act, $profile);
1205         }
1206
1207         return true;
1208     }
1209
1210     function onStartProfileListItemActionElements($item, $profile=null)
1211     {
1212         if (!common_logged_in()) {
1213
1214             $profileUser = User::getKV('id', $item->profile->id);
1215
1216             if (!empty($profileUser)) {
1217
1218                 if ($item instanceof Action) {
1219                     $output = $item;
1220                     $profile = $item->profile;
1221                 } else {
1222                     $output = $item->out;
1223                 }
1224
1225                 // Add an OStatus subscribe
1226                 $output->elementStart('li', 'entity_subscribe');
1227                 $url = common_local_url('ostatusinit',
1228                                         array('nickname' => $profileUser->nickname));
1229                 $output->element('a', array('href' => $url,
1230                                             'class' => 'entity_remote_subscribe'),
1231                                   // TRANS: Link text for a user to subscribe to an OStatus user.
1232                                  _m('Subscribe'));
1233                 $output->elementEnd('li');
1234
1235                 $output->elementStart('li', 'entity_tag');
1236                 $url = common_local_url('ostatustag',
1237                                         array('nickname' => $profileUser->nickname));
1238                 $output->element('a', array('href' => $url,
1239                                             'class' => 'entity_remote_tag'),
1240                                   // TRANS: Link text for a user to list an OStatus user.
1241                                  _m('List'));
1242                 $output->elementEnd('li');
1243             }
1244         }
1245
1246         return true;
1247     }
1248
1249     function onPluginVersion(&$versions)
1250     {
1251         $versions[] = array('name' => 'OStatus',
1252                             'version' => GNUSOCIAL_VERSION,
1253                             'author' => 'Evan Prodromou, James Walker, Brion Vibber, Zach Copley',
1254                             'homepage' => 'http://status.net/wiki/Plugin:OStatus',
1255                             // TRANS: Plugin description.
1256                             'rawdescription' => _m('Follow people across social networks that implement '.
1257                                '<a href="http://ostatus.org/">OStatus</a>.'));
1258
1259         return true;
1260     }
1261
1262     /**
1263      * Utility function to check if the given URI is a canonical group profile
1264      * page, and if so return the ID number.
1265      *
1266      * @param string $url
1267      * @return mixed int or false
1268      */
1269     public static function localGroupFromUrl($url)
1270     {
1271         $group = User_group::getKV('uri', $url);
1272         if ($group) {
1273             $local = Local_group::getKV('group_id', $group->id);
1274             if ($local) {
1275                 return $group->id;
1276             }
1277         } else {
1278             // To find local groups which haven't had their uri fields filled out...
1279             // If the domain has changed since a subscriber got the URI, it'll
1280             // be broken.
1281             $template = common_local_url('groupbyid', array('id' => '31337'));
1282             $template = preg_quote($template, '/');
1283             $template = str_replace('31337', '(\d+)', $template);
1284             if (preg_match("/$template/", $url, $matches)) {
1285                 return intval($matches[1]);
1286             }
1287         }
1288         return false;
1289     }
1290
1291     public function onStartProfileGetAtomFeed($profile, &$feed)
1292     {
1293         $oprofile = Ostatus_profile::getKV('profile_id', $profile->id);
1294
1295         if (!$oprofile instanceof Ostatus_profile) {
1296             return true;
1297         }
1298
1299         $feed = $oprofile->feeduri;
1300         return false;
1301     }
1302
1303     function onStartGetProfileFromURI($uri, &$profile)
1304     {
1305         // Don't want to do Web-based discovery on our own server,
1306         // so we check locally first.
1307
1308         $user = User::getKV('uri', $uri);
1309
1310         if (!empty($user)) {
1311             $profile = $user->getProfile();
1312             return false;
1313         }
1314
1315         // Now, check remotely
1316
1317         try {
1318             $oprofile = Ostatus_profile::ensureProfileURI($uri);
1319             $profile = $oprofile->localProfile();
1320             return !($profile instanceof Profile);  // localProfile won't throw exception but can return null
1321         } catch (Exception $e) {
1322             return true; // It's not an OStatus profile as far as we know, continue event handling
1323         }
1324     }
1325
1326     function onEndWebFingerNoticeLinks(XML_XRD $xrd, Notice $target)
1327     {
1328         $author = $target->getProfile();
1329         $salmon_url = common_local_url('usersalmon', array('id' => $author->id));
1330         $xrd->links[] = new XML_XRD_Element_Link(Salmon::REL_SALMON, $salmon_url);
1331         return true;
1332     }
1333
1334     function onEndWebFingerProfileLinks(XML_XRD $xrd, Profile $target)
1335     {
1336         $xrd->links[] = new XML_XRD_Element_Link(Discovery::UPDATESFROM,
1337                             common_local_url('ApiTimelineUser',
1338                                 array('id' => $target->id, 'format' => 'atom')),
1339                             'application/atom+xml');
1340
1341                 // Salmon
1342         $salmon_url = common_local_url('usersalmon',
1343                                        array('id' => $target->id));
1344
1345         $xrd->links[] = new XML_XRD_Element_Link(Salmon::REL_SALMON, $salmon_url);
1346
1347         // XXX: these are deprecated, but StatusNet only looks for NS_REPLIES
1348         $xrd->links[] = new XML_XRD_Element_Link(Salmon::NS_REPLIES, $salmon_url);
1349         $xrd->links[] = new XML_XRD_Element_Link(Salmon::NS_MENTIONS, $salmon_url);
1350
1351         // Get this user's keypair
1352         $magickey = Magicsig::getKV('user_id', $target->id);
1353         if (!($magickey instanceof Magicsig)) {
1354             // No keypair yet, let's generate one.
1355             $magickey = new Magicsig();
1356             $magickey->generate($target->id);
1357         }
1358
1359         $xrd->links[] = new XML_XRD_Element_Link(Magicsig::PUBLICKEYREL,
1360                             'data:application/magic-public-key,'. $magickey->toString(false));
1361
1362         // TODO - finalize where the redirect should go on the publisher
1363         $xrd->links[] = new XML_XRD_Element_Link('http://ostatus.org/schema/1.0/subscribe',
1364                               common_local_url('ostatussub') . '?profile={uri}',
1365                               null, // type not set
1366                               true); // isTemplate
1367
1368         return true;
1369     }
1370 }