]> git.mxchange.org Git - quix0rs-gnu-social.git/blob - plugins/OStatus/classes/Ostatus_profile.php
Pull <atom:author> info as well as <activity:actor> when we have an old-style Activit...
[quix0rs-gnu-social.git] / plugins / OStatus / classes / Ostatus_profile.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  * @package OStatusPlugin
22  * @maintainer Brion Vibber <brion@status.net>
23  */
24
25 class Ostatus_profile extends Memcached_DataObject
26 {
27     public $__table = 'ostatus_profile';
28
29     public $uri;
30
31     public $profile_id;
32     public $group_id;
33
34     public $feeduri;
35     public $salmonuri;
36     public $avatar; // remote URL of the last avatar we saved
37
38     public $created;
39     public $modified;
40
41     public /*static*/ function staticGet($k, $v=null)
42     {
43         return parent::staticGet(__CLASS__, $k, $v);
44     }
45
46     /**
47      * return table definition for DB_DataObject
48      *
49      * DB_DataObject needs to know something about the table to manipulate
50      * instances. This method provides all the DB_DataObject needs to know.
51      *
52      * @return array array of column definitions
53      */
54
55     function table()
56     {
57         return array('uri' => DB_DATAOBJECT_STR + DB_DATAOBJECT_NOTNULL,
58                      'profile_id' => DB_DATAOBJECT_INT,
59                      'group_id' => DB_DATAOBJECT_INT,
60                      'feeduri' => DB_DATAOBJECT_STR,
61                      'salmonuri' =>  DB_DATAOBJECT_STR,
62                      'avatar' =>  DB_DATAOBJECT_STR,
63                      'created' => DB_DATAOBJECT_STR + DB_DATAOBJECT_DATE + DB_DATAOBJECT_TIME + DB_DATAOBJECT_NOTNULL,
64                      'modified' => DB_DATAOBJECT_STR + DB_DATAOBJECT_DATE + DB_DATAOBJECT_TIME + DB_DATAOBJECT_NOTNULL);
65     }
66
67     static function schemaDef()
68     {
69         return array(new ColumnDef('uri', 'varchar',
70                                    255, false, 'PRI'),
71                      new ColumnDef('profile_id', 'integer',
72                                    null, true, 'UNI'),
73                      new ColumnDef('group_id', 'integer',
74                                    null, true, 'UNI'),
75                      new ColumnDef('feeduri', 'varchar',
76                                    255, true, 'UNI'),
77                      new ColumnDef('salmonuri', 'text',
78                                    null, true),
79                      new ColumnDef('avatar', 'text',
80                                    null, true),
81                      new ColumnDef('created', 'datetime',
82                                    null, false),
83                      new ColumnDef('modified', 'datetime',
84                                    null, false));
85     }
86
87     /**
88      * return key definitions for DB_DataObject
89      *
90      * DB_DataObject needs to know about keys that the table has; this function
91      * defines them.
92      *
93      * @return array key definitions
94      */
95
96     function keys()
97     {
98         return array_keys($this->keyTypes());
99     }
100
101     /**
102      * return key definitions for Memcached_DataObject
103      *
104      * Our caching system uses the same key definitions, but uses a different
105      * method to get them.
106      *
107      * @return array key definitions
108      */
109
110     function keyTypes()
111     {
112         return array('uri' => 'K', 'profile_id' => 'U', 'group_id' => 'U', 'feeduri' => 'U');
113     }
114
115     function sequenceKey()
116     {
117         return array(false, false, false);
118     }
119
120     /**
121      * Fetch the StatusNet-side profile for this feed
122      * @return Profile
123      */
124     public function localProfile()
125     {
126         if ($this->profile_id) {
127             return Profile::staticGet('id', $this->profile_id);
128         }
129         return null;
130     }
131
132     /**
133      * Fetch the StatusNet-side profile for this feed
134      * @return Profile
135      */
136     public function localGroup()
137     {
138         if ($this->group_id) {
139             return User_group::staticGet('id', $this->group_id);
140         }
141         return null;
142     }
143
144     /**
145      * Returns an ActivityObject describing this remote user or group profile.
146      * Can then be used to generate Atom chunks.
147      *
148      * @return ActivityObject
149      */
150     function asActivityObject()
151     {
152         if ($this->isGroup()) {
153             return ActivityObject::fromGroup($this->localGroup());
154         } else {
155             return ActivityObject::fromProfile($this->localProfile());
156         }
157     }
158
159     /**
160      * Returns an XML string fragment with profile information as an
161      * Activity Streams noun object with the given element type.
162      *
163      * Assumes that 'activity' namespace has been previously defined.
164      *
165      * @fixme replace with wrappers on asActivityObject when it's got everything.
166      *
167      * @param string $element one of 'actor', 'subject', 'object', 'target'
168      * @return string
169      */
170     function asActivityNoun($element)
171     {
172         if ($this->isGroup()) {
173             $noun = ActivityObject::fromGroup($this->localGroup());
174             return $noun->asString('activity:' . $element);
175         } else {
176             $noun = ActivityObject::fromProfile($this->localProfile());
177             return $noun->asString('activity:' . $element);
178         }
179     }
180
181     /**
182      * @return boolean true if this is a remote group
183      */
184     function isGroup()
185     {
186         if ($this->profile_id && !$this->group_id) {
187             return false;
188         } else if ($this->group_id && !$this->profile_id) {
189             return true;
190         } else if ($this->group_id && $this->profile_id) {
191             throw new ServerException("Invalid ostatus_profile state: both group and profile IDs set for $this->uri");
192         } else {
193             throw new ServerException("Invalid ostatus_profile state: both group and profile IDs empty for $this->uri");
194         }
195     }
196
197     /**
198      * Send a subscription request to the hub for this feed.
199      * The hub will later send us a confirmation POST to /main/push/callback.
200      *
201      * @return bool true on success, false on failure
202      * @throws ServerException if feed state is not valid
203      */
204     public function subscribe()
205     {
206         $feedsub = FeedSub::ensureFeed($this->feeduri);
207         if ($feedsub->sub_state == 'active') {
208             // Active subscription, we don't need to do anything.
209             return true;
210         } else {
211             // Inactive or we got left in an inconsistent state.
212             // Run a subscription request to make sure we're current!
213             return $feedsub->subscribe();
214         }
215     }
216
217     /**
218      * Send a PuSH unsubscription request to the hub for this feed.
219      * The hub will later send us a confirmation POST to /main/push/callback.
220      *
221      * @return bool true on success, false on failure
222      * @throws ServerException if feed state is not valid
223      */
224     public function unsubscribe() {
225         $feedsub = FeedSub::staticGet('uri', $this->feeduri);
226         if (!$feedsub || $feedsub->sub_state == '' || $feedsub->sub_state == 'inactive') {
227             // No active PuSH subscription, we can just leave it be.
228             return true;
229         } else {
230             // PuSH subscription is either active or in an indeterminate state.
231             // Send an unsubscribe.
232             return $feedsub->unsubscribe();
233         }
234     }
235
236     /**
237      * Check if this remote profile has any active local subscriptions, and
238      * if not drop the PuSH subscription feed.
239      *
240      * @return boolean
241      */
242     public function garbageCollect()
243     {
244         if ($this->isGroup()) {
245             $members = $this->localGroup()->getMembers(0, 1);
246             $count = $members->N;
247         } else {
248             $count = $this->localProfile()->subscriberCount();
249         }
250         if ($count == 0) {
251             common_log(LOG_INFO, "Unsubscribing from now-unused remote feed $this->feeduri");
252             $this->unsubscribe();
253             return true;
254         } else {
255             return false;
256         }
257     }
258
259     /**
260      * Send an Activity Streams notification to the remote Salmon endpoint,
261      * if so configured.
262      *
263      * @param Profile $actor  Actor who did the activity
264      * @param string  $verb   Activity::SUBSCRIBE or Activity::JOIN
265      * @param Object  $object object of the action; must define asActivityNoun($tag)
266      */
267     public function notify($actor, $verb, $object=null)
268     {
269         if (!($actor instanceof Profile)) {
270             $type = gettype($actor);
271             if ($type == 'object') {
272                 $type = get_class($actor);
273             }
274             throw new ServerException("Invalid actor passed to " . __METHOD__ . ": " . $type);
275         }
276         if ($object == null) {
277             $object = $this;
278         }
279         if ($this->salmonuri) {
280
281             $text = 'update';
282             $id = TagURI::mint('%s:%s:%s',
283                                $verb,
284                                $actor->getURI(),
285                                common_date_iso8601(time()));
286
287             // @fixme consolidate all these NS settings somewhere
288             $attributes = array('xmlns' => Activity::ATOM,
289                                 'xmlns:activity' => 'http://activitystrea.ms/spec/1.0/',
290                                 'xmlns:thr' => 'http://purl.org/syndication/thread/1.0',
291                                 'xmlns:georss' => 'http://www.georss.org/georss',
292                                 'xmlns:ostatus' => 'http://ostatus.org/schema/1.0',
293                                 'xmlns:poco' => 'http://portablecontacts.net/spec/1.0',
294                                 'xmlns:media' => 'http://purl.org/syndication/atommedia');
295
296             $entry = new XMLStringer();
297             $entry->elementStart('entry', $attributes);
298             $entry->element('id', null, $id);
299             $entry->element('title', null, $text);
300             $entry->element('summary', null, $text);
301             $entry->element('published', null, common_date_w3dtf(common_sql_now()));
302
303             $entry->element('activity:verb', null, $verb);
304             $entry->raw($actor->asAtomAuthor());
305             $entry->raw($actor->asActivityActor());
306             $entry->raw($object->asActivityNoun('object'));
307             $entry->elementEnd('entry');
308
309             $xml = $entry->getString();
310             common_log(LOG_INFO, "Posting to Salmon endpoint $this->salmonuri: $xml");
311
312             $salmon = new Salmon(); // ?
313             return $salmon->post($this->salmonuri, $xml, $actor);
314         }
315         return false;
316     }
317
318     /**
319      * Send a Salmon notification ping immediately, and confirm that we got
320      * an acceptable response from the remote site.
321      *
322      * @param mixed $entry XML string, Notice, or Activity
323      * @return boolean success
324      */
325     public function notifyActivity($entry, $actor)
326     {
327         if ($this->salmonuri) {
328             $salmon = new Salmon();
329             return $salmon->post($this->salmonuri, $this->notifyPrepXml($entry), $actor);
330         }
331
332         return false;
333     }
334
335     /**
336      * Queue a Salmon notification for later. If queues are disabled we'll
337      * send immediately but won't get the return value.
338      *
339      * @param mixed $entry XML string, Notice, or Activity
340      * @return boolean success
341      */
342     public function notifyDeferred($entry, $actor)
343     {
344         if ($this->salmonuri) {
345             $data = array('salmonuri' => $this->salmonuri,
346                           'entry' => $this->notifyPrepXml($entry),
347                           'actor' => $actor->id);
348
349             $qm = QueueManager::get();
350             return $qm->enqueue($data, 'salmon');
351         }
352
353         return false;
354     }
355
356     protected function notifyPrepXml($entry)
357     {
358         $preamble = '<?xml version="1.0" encoding="UTF-8" ?' . '>';
359         if (is_string($entry)) {
360             return $entry;
361         } else if ($entry instanceof Activity) {
362             return $preamble . $entry->asString(true);
363         } else if ($entry instanceof Notice) {
364             return $preamble . $entry->asAtomEntry(true, true);
365         } else {
366             throw new ServerException("Invalid type passed to Ostatus_profile::notify; must be XML string or Activity entry");
367         }
368     }
369
370     function getBestName()
371     {
372         if ($this->isGroup()) {
373             return $this->localGroup()->getBestName();
374         } else {
375             return $this->localProfile()->getBestName();
376         }
377     }
378
379     /**
380      * Read and post notices for updates from the feed.
381      * Currently assumes that all items in the feed are new,
382      * coming from a PuSH hub.
383      *
384      * @param DOMDocument $doc
385      * @param string $source identifier ("push")
386      */
387     public function processFeed(DOMDocument $doc, $source)
388     {
389         $feed = $doc->documentElement;
390
391         if ($feed->localName == 'feed' && $feed->namespaceURI == Activity::ATOM) {
392             $this->processAtomFeed($feed, $source);
393         } else if ($feed->localName == 'rss') { // @fixme check namespace
394             $this->processRssFeed($feed, $source);
395         } else {
396             throw new Exception("Unknown feed format.");
397         }
398     }
399
400     public function processAtomFeed(DOMElement $feed, $source)
401     {
402         $entries = $feed->getElementsByTagNameNS(Activity::ATOM, 'entry');
403         if ($entries->length == 0) {
404             common_log(LOG_ERR, __METHOD__ . ": no entries in feed update, ignoring");
405             return;
406         }
407
408         for ($i = 0; $i < $entries->length; $i++) {
409             $entry = $entries->item($i);
410             $this->processEntry($entry, $feed, $source);
411         }
412     }
413
414     public function processRssFeed(DOMElement $rss, $source)
415     {
416         $channels = $rss->getElementsByTagName('channel');
417
418         if ($channels->length == 0) {
419             throw new Exception("RSS feed without a channel.");
420         } else if ($channels->length > 1) {
421             common_log(LOG_WARNING, __METHOD__ . ": more than one channel in an RSS feed");
422         }
423
424         $channel = $channels->item(0);
425
426         $items = $channel->getElementsByTagName('item');
427
428         for ($i = 0; $i < $items->length; $i++) {
429             $item = $items->item($i);
430             $this->processEntry($item, $channel, $source);
431         }
432     }
433
434     /**
435      * Process a posted entry from this feed source.
436      *
437      * @param DOMElement $entry
438      * @param DOMElement $feed for context
439      * @param string $source identifier ("push" or "salmon")
440      */
441     public function processEntry($entry, $feed, $source)
442     {
443         $activity = new Activity($entry, $feed);
444
445         if ($activity->verb == ActivityVerb::POST) {
446             $this->processPost($activity, $source);
447         } else {
448             common_log(LOG_INFO, "Ignoring activity with unrecognized verb $activity->verb");
449         }
450     }
451
452     /**
453      * Process an incoming post activity from this remote feed.
454      * @param Activity $activity
455      * @param string $method 'push' or 'salmon'
456      * @return mixed saved Notice or false
457      * @fixme break up this function, it's getting nasty long
458      */
459     public function processPost($activity, $method)
460     {
461         if ($this->isGroup()) {
462             // A group feed will contain posts from multiple authors.
463             // @fixme validate these profiles in some way!
464             $oprofile = self::ensureActorProfile($activity);
465             if ($oprofile->isGroup()) {
466                 // Groups can't post notices in StatusNet.
467                 common_log(LOG_WARNING, "OStatus: skipping post with group listed as author: $oprofile->uri in feed from $this->uri");
468                 return false;
469             }
470         } else {
471             $actor = $activity->actor;
472
473             if (empty($actor)) {
474                 // OK here! assume the default
475             } else if ($actor->id == $this->uri || $actor->link == $this->uri) {
476                 $this->updateFromActivityObject($actor);
477             } else {
478                 throw new Exception("Got an actor '{$actor->title}' ({$actor->id}) on single-user feed for {$this->uri}");
479             }
480
481             $oprofile = $this;
482         }
483
484         // It's not always an ActivityObject::NOTE, but... let's just say it is.
485
486         $note = $activity->object;
487
488         // The id URI will be used as a unique identifier for for the notice,
489         // protecting against duplicate saves. It isn't required to be a URL;
490         // tag: URIs for instance are found in Google Buzz feeds.
491         $sourceUri = $note->id;
492         $dupe = Notice::staticGet('uri', $sourceUri);
493         if ($dupe) {
494             common_log(LOG_INFO, "OStatus: ignoring duplicate post: $sourceUri");
495             return false;
496         }
497
498         // We'll also want to save a web link to the original notice, if provided.
499         $sourceUrl = null;
500         if ($note->link) {
501             $sourceUrl = $note->link;
502         } else if ($activity->link) {
503             $sourceUrl = $activity->link;
504         } else if (preg_match('!^https?://!', $note->id)) {
505             $sourceUrl = $note->id;
506         }
507
508         // Use summary as fallback for content
509
510         if (!empty($note->content)) {
511             $sourceContent = $note->content;
512         } else if (!empty($note->summary)) {
513             $sourceContent = $note->summary;
514         } else if (!empty($note->title)) {
515             $sourceContent = $note->title;
516         } else {
517             // @fixme fetch from $sourceUrl?
518             throw new ClientException("No content for notice {$sourceUri}");
519         }
520
521         // Get (safe!) HTML and text versions of the content
522
523         $rendered = $this->purify($sourceContent);
524         $content = html_entity_decode(strip_tags($rendered));
525
526         $shortened = common_shorten_links($content);
527
528         // If it's too long, try using the summary, and make the
529         // HTML an attachment.
530
531         $attachment = null;
532
533         if (Notice::contentTooLong($shortened)) {
534             $attachment = $this->saveHTMLFile($note->title, $rendered);
535             $summary = html_entity_decode(strip_tags($note->summary));
536             if (empty($summary)) {
537                 $summary = $content;
538             }
539             $shortSummary = common_shorten_links($summary);
540             if (Notice::contentTooLong($shortSummary)) {
541                 $url = common_shorten_url(common_local_url('attachment',
542                                                            array('attachment' => $attachment->id)));
543                 $shortSummary = substr($shortSummary,
544                                        0,
545                                        Notice::maxContent() - (mb_strlen($url) + 2));
546                 $shortSummary .= '… ' . $url;
547                 $content = $shortSummary;
548                 $rendered = common_render_text($content);
549             }
550         }
551
552         $options = array('is_local' => Notice::REMOTE_OMB,
553                         'url' => $sourceUrl,
554                         'uri' => $sourceUri,
555                         'rendered' => $rendered,
556                         'replies' => array(),
557                         'groups' => array(),
558                         'tags' => array(),
559                         'urls' => array());
560
561         // Check for optional attributes...
562
563         if (!empty($activity->time)) {
564             $options['created'] = common_sql_date($activity->time);
565         }
566
567         if ($activity->context) {
568             // Any individual or group attn: targets?
569             $replies = $activity->context->attention;
570             $options['groups'] = $this->filterReplies($oprofile, $replies);
571             $options['replies'] = $replies;
572
573             // Maintain direct reply associations
574             // @fixme what about conversation ID?
575             if (!empty($activity->context->replyToID)) {
576                 $orig = Notice::staticGet('uri',
577                                           $activity->context->replyToID);
578                 if (!empty($orig)) {
579                     $options['reply_to'] = $orig->id;
580                 }
581             }
582
583             $location = $activity->context->location;
584             if ($location) {
585                 $options['lat'] = $location->lat;
586                 $options['lon'] = $location->lon;
587                 if ($location->location_id) {
588                     $options['location_ns'] = $location->location_ns;
589                     $options['location_id'] = $location->location_id;
590                 }
591             }
592         }
593
594         // Atom categories <-> hashtags
595         foreach ($activity->categories as $cat) {
596             if ($cat->term) {
597                 $term = common_canonical_tag($cat->term);
598                 if ($term) {
599                     $options['tags'][] = $term;
600                 }
601             }
602         }
603
604         // Atom enclosures -> attachment URLs
605         foreach ($activity->enclosures as $href) {
606             // @fixme save these locally or....?
607             $options['urls'][] = $href;
608         }
609
610         try {
611             $saved = Notice::saveNew($oprofile->profile_id,
612                                      $content,
613                                      'ostatus',
614                                      $options);
615             if ($saved) {
616                 Ostatus_source::saveNew($saved, $this, $method);
617                 if (!empty($attachment)) {
618                     File_to_post::processNew($attachment->id, $saved->id);
619                 }
620             }
621         } catch (Exception $e) {
622             common_log(LOG_ERR, "OStatus save of remote message $sourceUri failed: " . $e->getMessage());
623             throw $e;
624         }
625         common_log(LOG_INFO, "OStatus saved remote message $sourceUri as notice id $saved->id");
626         return $saved;
627     }
628
629     /**
630      * Clean up HTML
631      */
632     protected function purify($html)
633     {
634         require_once INSTALLDIR.'/extlib/htmLawed/htmLawed.php';
635         $config = array('safe' => 1,
636                         'deny_attribute' => 'id,style,on*');
637         return htmLawed($html, $config);
638     }
639
640     /**
641      * Filters a list of recipient ID URIs to just those for local delivery.
642      * @param Ostatus_profile local profile of sender
643      * @param array in/out &$attention_uris set of URIs, will be pruned on output
644      * @return array of group IDs
645      */
646     protected function filterReplies($sender, &$attention_uris)
647     {
648         common_log(LOG_DEBUG, "Original reply recipients: " . implode(', ', $attention_uris));
649         $groups = array();
650         $replies = array();
651         foreach ($attention_uris as $recipient) {
652             // Is the recipient a local user?
653             $user = User::staticGet('uri', $recipient);
654             if ($user) {
655                 // @fixme sender verification, spam etc?
656                 $replies[] = $recipient;
657                 continue;
658             }
659
660             // Is the recipient a remote group?
661             $oprofile = Ostatus_profile::staticGet('uri', $recipient);
662             if ($oprofile) {
663                 if ($oprofile->isGroup()) {
664                     // Deliver to local members of this remote group.
665                     // @fixme sender verification?
666                     $groups[] = $oprofile->group_id;
667                 } else {
668                     common_log(LOG_DEBUG, "Skipping reply to remote profile $recipient");
669                 }
670                 continue;
671             }
672
673             // Is the recipient a local group?
674             // @fixme uri on user_group isn't reliable yet
675             // $group = User_group::staticGet('uri', $recipient);
676             $id = OStatusPlugin::localGroupFromUrl($recipient);
677             if ($id) {
678                 $group = User_group::staticGet('id', $id);
679                 if ($group) {
680                     // Deliver to all members of this local group if allowed.
681                     $profile = $sender->localProfile();
682                     if ($profile->isMember($group)) {
683                         $groups[] = $group->id;
684                     } else {
685                         common_log(LOG_DEBUG, "Skipping reply to local group $group->nickname as sender $profile->id is not a member");
686                     }
687                     continue;
688                 } else {
689                     common_log(LOG_DEBUG, "Skipping reply to bogus group $recipient");
690                 }
691             }
692
693             common_log(LOG_DEBUG, "Skipping reply to unrecognized profile $recipient");
694
695         }
696         $attention_uris = $replies;
697         common_log(LOG_DEBUG, "Local reply recipients: " . implode(', ', $replies));
698         common_log(LOG_DEBUG, "Local group recipients: " . implode(', ', $groups));
699         return $groups;
700     }
701
702     /**
703      * Look up and if necessary create an Ostatus_profile for the remote entity
704      * with the given profile page URL. This should never return null -- you
705      * will either get an object or an exception will be thrown.
706      *
707      * @param string $profile_url
708      * @return Ostatus_profile
709      * @throws Exception
710      */
711
712     public static function ensureProfileURL($profile_url, $hints=array())
713     {
714         $oprofile = self::getFromProfileURL($profile_url);
715
716         if (!empty($oprofile)) {
717             return $oprofile;
718         }
719
720         $hints['profileurl'] = $profile_url;
721
722         // Fetch the URL
723         // XXX: HTTP caching
724
725         $client = new HTTPClient();
726         $client->setHeader('Accept', 'text/html,application/xhtml+xml');
727         $response = $client->get($profile_url);
728
729         if (!$response->isOk()) {
730             throw new Exception("Could not reach profile page: " . $profile_url);
731         }
732
733         // Check if we have a non-canonical URL
734
735         $finalUrl = $response->getUrl();
736
737         if ($finalUrl != $profile_url) {
738
739             $hints['profileurl'] = $finalUrl;
740
741             $oprofile = self::getFromProfileURL($finalUrl);
742
743             if (!empty($oprofile)) {
744                 return $oprofile;
745             }
746         }
747
748         // Try to get some hCard data
749
750         $body = $response->getBody();
751
752         $hcardHints = DiscoveryHints::hcardHints($body, $finalUrl);
753
754         if (!empty($hcardHints)) {
755             $hints = array_merge($hints, $hcardHints);
756         }
757
758         // Check if they've got an LRDD header
759
760         $lrdd = LinkHeader::getLink($response, 'lrdd', 'application/xrd+xml');
761
762         if (!empty($lrdd)) {
763
764             $xrd = Discovery::fetchXrd($lrdd);
765             $xrdHints = DiscoveryHints::fromXRD($xrd);
766
767             $hints = array_merge($hints, $xrdHints);
768         }
769
770         // If discovery found a feedurl (probably from LRDD), use it.
771
772         if (array_key_exists('feedurl', $hints)) {
773             return self::ensureFeedURL($hints['feedurl'], $hints);
774         }
775
776         // Get the feed URL from HTML
777
778         $discover = new FeedDiscovery();
779
780         $feedurl = $discover->discoverFromHTML($finalUrl, $body);
781
782         if (!empty($feedurl)) {
783             $hints['feedurl'] = $feedurl;
784             return self::ensureFeedURL($feedurl, $hints);
785         }
786
787         throw new Exception("Could not find a feed URL for profile page " . $finalUrl);
788     }
789
790     /**
791      * Look up the Ostatus_profile, if present, for a remote entity with the
792      * given profile page URL. Will return null for both unknown and invalid
793      * remote profiles.
794      *
795      * @return mixed Ostatus_profile or null
796      * @throws Exception for local profiles
797      */
798     static function getFromProfileURL($profile_url)
799     {
800         $profile = Profile::staticGet('profileurl', $profile_url);
801
802         if (empty($profile)) {
803             return null;
804         }
805
806         // Is it a known Ostatus profile?
807
808         $oprofile = Ostatus_profile::staticGet('profile_id', $profile->id);
809
810         if (!empty($oprofile)) {
811             return $oprofile;
812         }
813
814         // Is it a local user?
815
816         $user = User::staticGet('id', $profile->id);
817
818         if (!empty($user)) {
819             throw new Exception("'$profile_url' is the profile for local user '{$user->nickname}'.");
820         }
821
822         // Continue discovery; it's a remote profile
823         // for OMB or some other protocol, may also
824         // support OStatus
825
826         return null;
827     }
828
829     /**
830      * Look up and if necessary create an Ostatus_profile for remote entity
831      * with the given update feed. This should never return null -- you will
832      * either get an object or an exception will be thrown.
833      *
834      * @return Ostatus_profile
835      * @throws Exception
836      */
837     public static function ensureFeedURL($feed_url, $hints=array())
838     {
839         $discover = new FeedDiscovery();
840
841         $feeduri = $discover->discoverFromFeedURL($feed_url);
842         $hints['feedurl'] = $feeduri;
843
844         $huburi = $discover->getAtomLink('hub');
845         $hints['hub'] = $huburi;
846         $salmonuri = $discover->getAtomLink(Salmon::NS_REPLIES);
847         $hints['salmon'] = $salmonuri;
848
849         if (!$huburi) {
850             // We can only deal with folks with a PuSH hub
851             throw new FeedSubNoHubException();
852         }
853
854         $feedEl = $discover->root;
855
856         if ($feedEl->tagName == 'feed') {
857             return self::ensureAtomFeed($feedEl, $hints);
858         } else if ($feedEl->tagName == 'channel') {
859             return self::ensureRssChannel($feedEl, $hints);
860         } else {
861             throw new FeedSubBadXmlException($feeduri);
862         }
863     }
864
865     /**
866      * Look up and, if necessary, create an Ostatus_profile for the remote
867      * profile with the given Atom feed - actually loaded from the feed.
868      * This should never return null -- you will either get an object or
869      * an exception will be thrown.
870      *
871      * @param DOMElement $feedEl root element of a loaded Atom feed
872      * @param array $hints additional discovery information passed from higher levels
873      * @fixme should this be marked public?
874      * @return Ostatus_profile
875      * @throws Exception
876      */
877     public static function ensureAtomFeed($feedEl, $hints)
878     {
879         // Try to get a profile from the feed activity:subject
880
881         $subject = ActivityUtils::child($feedEl, Activity::SUBJECT, Activity::SPEC);
882
883         if (!empty($subject)) {
884             $subjObject = new ActivityObject($subject);
885             return self::ensureActivityObjectProfile($subjObject, $hints);
886         }
887
888         // Otherwise, try the feed author
889
890         $author = ActivityUtils::child($feedEl, Activity::AUTHOR, Activity::ATOM);
891
892         if (!empty($author)) {
893             $authorObject = new ActivityObject($author);
894             return self::ensureActivityObjectProfile($authorObject, $hints);
895         }
896
897         // Sheesh. Not a very nice feed! Let's try fingerpoken in the
898         // entries.
899
900         $entries = $feedEl->getElementsByTagNameNS(Activity::ATOM, 'entry');
901
902         if (!empty($entries) && $entries->length > 0) {
903
904             $entry = $entries->item(0);
905
906             $actor = ActivityUtils::child($entry, Activity::ACTOR, Activity::SPEC);
907
908             if (!empty($actor)) {
909                 $actorObject = new ActivityObject($actor);
910                 return self::ensureActivityObjectProfile($actorObject, $hints);
911
912             }
913
914             $author = ActivityUtils::child($entry, Activity::AUTHOR, Activity::ATOM);
915
916             if (!empty($author)) {
917                 $authorObject = new ActivityObject($author);
918                 return self::ensureActivityObjectProfile($authorObject, $hints);
919             }
920         }
921
922         // XXX: make some educated guesses here
923
924         throw new FeedSubException("Can't find enough profile information to make a feed.");
925     }
926
927     /**
928      * Look up and, if necessary, create an Ostatus_profile for the remote
929      * profile with the given RSS feed - actually loaded from the feed.
930      * This should never return null -- you will either get an object or
931      * an exception will be thrown.
932      *
933      * @param DOMElement $feedEl root element of a loaded RSS feed
934      * @param array $hints additional discovery information passed from higher levels
935      * @fixme should this be marked public?
936      * @return Ostatus_profile
937      * @throws Exception
938      */
939     public static function ensureRssChannel($feedEl, $hints)
940     {
941         // Special-case for Posterous. They have some nice metadata in their
942         // posterous:author elements. We should use them instead of the channel.
943
944         $items = $feedEl->getElementsByTagName('item');
945
946         if ($items->length > 0) {
947             $item = $items->item(0);
948             $authorEl = ActivityUtils::child($item, ActivityObject::AUTHOR, ActivityObject::POSTEROUS);
949             if (!empty($authorEl)) {
950                 $obj = ActivityObject::fromPosterousAuthor($authorEl);
951                 // Posterous has multiple authors per feed, and multiple feeds
952                 // per author. We check if this is the "main" feed for this author.
953                 if (array_key_exists('profileurl', $hints) &&
954                     !empty($obj->poco) &&
955                     common_url_to_nickname($hints['profileurl']) == $obj->poco->preferredUsername) {
956                     return self::ensureActivityObjectProfile($obj, $hints);
957                 }
958             }
959         }
960
961         // @fixme we should check whether this feed has elements
962         // with different <author> or <dc:creator> elements, and... I dunno.
963         // Do something about that.
964
965         $obj = ActivityObject::fromRssChannel($feedEl);
966
967         return self::ensureActivityObjectProfile($obj, $hints);
968     }
969
970     /**
971      * Download and update given avatar image
972      *
973      * @param string $url
974      * @throws Exception in various failure cases
975      */
976     protected function updateAvatar($url)
977     {
978         if ($url == $this->avatar) {
979             // We've already got this one.
980             return;
981         }
982         if (!common_valid_http_url($url)) {
983             throw new ServerException(_m("Invalid avatar URL %s"), $url);
984         }
985
986         if ($this->isGroup()) {
987             $self = $this->localGroup();
988         } else {
989             $self = $this->localProfile();
990         }
991         if (!$self) {
992             throw new ServerException(sprintf(
993                 _m("Tried to update avatar for unsaved remote profile %s"),
994                 $this->uri));
995         }
996
997         // @fixme this should be better encapsulated
998         // ripped from oauthstore.php (for old OMB client)
999         $temp_filename = tempnam(sys_get_temp_dir(), 'listener_avatar');
1000         if (!copy($url, $temp_filename)) {
1001             throw new ServerException(sprintf(_m("Unable to fetch avatar from %s"), $url));
1002         }
1003
1004         if ($this->isGroup()) {
1005             $id = $this->group_id;
1006         } else {
1007             $id = $this->profile_id;
1008         }
1009         // @fixme should we be using different ids?
1010         $imagefile = new ImageFile($id, $temp_filename);
1011         $filename = Avatar::filename($id,
1012                                      image_type_to_extension($imagefile->type),
1013                                      null,
1014                                      common_timestamp());
1015         rename($temp_filename, Avatar::path($filename));
1016         $self->setOriginal($filename);
1017
1018         $orig = clone($this);
1019         $this->avatar = $url;
1020         $this->update($orig);
1021     }
1022
1023     /**
1024      * Pull avatar URL from ActivityObject or profile hints
1025      *
1026      * @param ActivityObject $object
1027      * @param array $hints
1028      * @return mixed URL string or false
1029      */
1030
1031     protected static function getActivityObjectAvatar($object, $hints=array())
1032     {
1033         if ($object->avatarLinks) {
1034             $best = false;
1035             // Take the exact-size avatar, or the largest avatar, or the first avatar if all sizeless
1036             foreach ($object->avatarLinks as $avatar) {
1037                 if ($avatar->width == AVATAR_PROFILE_SIZE && $avatar->height = AVATAR_PROFILE_SIZE) {
1038                     // Exact match!
1039                     $best = $avatar;
1040                     break;
1041                 }
1042                 if (!$best || $avatar->width > $best->width) {
1043                     $best = $avatar;
1044                 }
1045             }
1046             return $best->url;
1047         } else if (array_key_exists('avatar', $hints)) {
1048             return $hints['avatar'];
1049         }
1050         return false;
1051     }
1052
1053     /**
1054      * Get an appropriate avatar image source URL, if available.
1055      *
1056      * @param ActivityObject $actor
1057      * @param DOMElement $feed
1058      * @return string
1059      */
1060
1061     protected static function getAvatar($actor, $feed)
1062     {
1063         $url = '';
1064         $icon = '';
1065         if ($actor->avatar) {
1066             $url = trim($actor->avatar);
1067         }
1068         if (!$url) {
1069             // Check <atom:logo> and <atom:icon> on the feed
1070             $els = $feed->childNodes();
1071             if ($els && $els->length) {
1072                 for ($i = 0; $i < $els->length; $i++) {
1073                     $el = $els->item($i);
1074                     if ($el->namespaceURI == Activity::ATOM) {
1075                         if (empty($url) && $el->localName == 'logo') {
1076                             $url = trim($el->textContent);
1077                             break;
1078                         }
1079                         if (empty($icon) && $el->localName == 'icon') {
1080                             // Use as a fallback
1081                             $icon = trim($el->textContent);
1082                         }
1083                     }
1084                 }
1085             }
1086             if ($icon && !$url) {
1087                 $url = $icon;
1088             }
1089         }
1090         if ($url) {
1091             $opts = array('allowed_schemes' => array('http', 'https'));
1092             if (Validate::uri($url, $opts)) {
1093                 return $url;
1094             }
1095         }
1096         return common_path('plugins/OStatus/images/96px-Feed-icon.svg.png');
1097     }
1098
1099     /**
1100      * Fetch, or build if necessary, an Ostatus_profile for the actor
1101      * in a given Activity Streams activity.
1102      * This should never return null -- you will either get an object or
1103      * an exception will be thrown.
1104      *
1105      * @param Activity $activity
1106      * @param string $feeduri if we already know the canonical feed URI!
1107      * @param string $salmonuri if we already know the salmon return channel URI
1108      * @return Ostatus_profile
1109      * @throws Exception
1110      */
1111
1112     public static function ensureActorProfile($activity, $hints=array())
1113     {
1114         return self::ensureActivityObjectProfile($activity->actor, $hints);
1115     }
1116
1117     /**
1118      * Fetch, or build if necessary, an Ostatus_profile for the profile
1119      * in a given Activity Streams object (can be subject, actor, or object).
1120      * This should never return null -- you will either get an object or
1121      * an exception will be thrown.
1122      *
1123      * @param ActivityObject $object
1124      * @param array $hints additional discovery information passed from higher levels
1125      * @return Ostatus_profile
1126      * @throws Exception
1127      */
1128
1129     public static function ensureActivityObjectProfile($object, $hints=array())
1130     {
1131         $profile = self::getActivityObjectProfile($object);
1132         if ($profile) {
1133             $profile->updateFromActivityObject($object, $hints);
1134         } else {
1135             $profile = self::createActivityObjectProfile($object, $hints);
1136         }
1137         return $profile;
1138     }
1139
1140     /**
1141      * @param Activity $activity
1142      * @return mixed matching Ostatus_profile or false if none known
1143      * @throws ServerException if feed info invalid
1144      */
1145     public static function getActorProfile($activity)
1146     {
1147         return self::getActivityObjectProfile($activity->actor);
1148     }
1149
1150     /**
1151      * @param ActivityObject $activity
1152      * @return mixed matching Ostatus_profile or false if none known
1153      * @throws ServerException if feed info invalid
1154      */
1155     protected static function getActivityObjectProfile($object)
1156     {
1157         $uri = self::getActivityObjectProfileURI($object);
1158         return Ostatus_profile::staticGet('uri', $uri);
1159     }
1160
1161     /**
1162      * Get the identifier URI for the remote entity described
1163      * by this ActivityObject. This URI is *not* guaranteed to be
1164      * a resolvable HTTP/HTTPS URL.
1165      *
1166      * @param ActivityObject $object
1167      * @return string
1168      * @throws ServerException if feed info invalid
1169      */
1170     protected static function getActivityObjectProfileURI($object)
1171     {
1172         if ($object->id) {
1173             if (ActivityUtils::validateUri($object->id)) {
1174                 return $object->id;
1175             }
1176         }
1177
1178         // If the id is missing or invalid (we've seen feeds mistakenly listing
1179         // things like local usernames in that field) then we'll use the profile
1180         // page link, if valid.
1181         if ($object->link && common_valid_http_url($object->link)) {
1182             return $object->link;
1183         }
1184         throw new ServerException("No author ID URI found");
1185     }
1186
1187     /**
1188      * @fixme validate stuff somewhere
1189      */
1190
1191     /**
1192      * Create local ostatus_profile and profile/user_group entries for
1193      * the provided remote user or group.
1194      * This should never return null -- you will either get an object or
1195      * an exception will be thrown.
1196      *
1197      * @param ActivityObject $object
1198      * @param array $hints
1199      *
1200      * @return Ostatus_profile
1201      */
1202     protected static function createActivityObjectProfile($object, $hints=array())
1203     {
1204         $homeuri = $object->id;
1205         $discover = false;
1206
1207         if (!$homeuri) {
1208             common_log(LOG_DEBUG, __METHOD__ . " empty actor profile URI: " . var_export($activity, true));
1209             throw new Exception("No profile URI");
1210         }
1211
1212         $user = User::staticGet('uri', $homeuri);
1213         if ($user) {
1214             throw new Exception("Local user can't be referenced as remote.");
1215         }
1216
1217         if (OStatusPlugin::localGroupFromUrl($homeuri)) {
1218             throw new Exception("Local group can't be referenced as remote.");
1219         }
1220
1221         if (array_key_exists('feedurl', $hints)) {
1222             $feeduri = $hints['feedurl'];
1223         } else {
1224             $discover = new FeedDiscovery();
1225             $feeduri = $discover->discoverFromURL($homeuri);
1226         }
1227
1228         if (array_key_exists('salmon', $hints)) {
1229             $salmonuri = $hints['salmon'];
1230         } else {
1231             if (!$discover) {
1232                 $discover = new FeedDiscovery();
1233                 $discover->discoverFromFeedURL($hints['feedurl']);
1234             }
1235             $salmonuri = $discover->getAtomLink(Salmon::NS_REPLIES);
1236         }
1237
1238         if (array_key_exists('hub', $hints)) {
1239             $huburi = $hints['hub'];
1240         } else {
1241             if (!$discover) {
1242                 $discover = new FeedDiscovery();
1243                 $discover->discoverFromFeedURL($hints['feedurl']);
1244             }
1245             $huburi = $discover->getAtomLink('hub');
1246         }
1247
1248         if (!$huburi) {
1249             // We can only deal with folks with a PuSH hub
1250             throw new FeedSubNoHubException();
1251         }
1252
1253         $oprofile = new Ostatus_profile();
1254
1255         $oprofile->uri        = $homeuri;
1256         $oprofile->feeduri    = $feeduri;
1257         $oprofile->salmonuri  = $salmonuri;
1258
1259         $oprofile->created    = common_sql_now();
1260         $oprofile->modified   = common_sql_now();
1261
1262         if ($object->type == ActivityObject::PERSON) {
1263             $profile = new Profile();
1264             $profile->created = common_sql_now();
1265             self::updateProfile($profile, $object, $hints);
1266
1267             $oprofile->profile_id = $profile->insert();
1268             if (!$oprofile->profile_id) {
1269                 throw new ServerException("Can't save local profile");
1270             }
1271         } else {
1272             $group = new User_group();
1273             $group->uri = $homeuri;
1274             $group->created = common_sql_now();
1275             self::updateGroup($group, $object, $hints);
1276
1277             $oprofile->group_id = $group->insert();
1278             if (!$oprofile->group_id) {
1279                 throw new ServerException("Can't save local profile");
1280             }
1281         }
1282
1283         $ok = $oprofile->insert();
1284
1285         if ($ok) {
1286             $avatar = self::getActivityObjectAvatar($object, $hints);
1287             if ($avatar) {
1288                 $oprofile->updateAvatar($avatar);
1289             }
1290             return $oprofile;
1291         } else {
1292             throw new ServerException("Can't save OStatus profile");
1293         }
1294     }
1295
1296     /**
1297      * Save any updated profile information to our local copy.
1298      * @param ActivityObject $object
1299      * @param array $hints
1300      */
1301     public function updateFromActivityObject($object, $hints=array())
1302     {
1303         if ($this->isGroup()) {
1304             $group = $this->localGroup();
1305             self::updateGroup($group, $object, $hints);
1306         } else {
1307             $profile = $this->localProfile();
1308             self::updateProfile($profile, $object, $hints);
1309         }
1310         $avatar = self::getActivityObjectAvatar($object, $hints);
1311         if ($avatar) {
1312             $this->updateAvatar($avatar);
1313         }
1314     }
1315
1316     protected static function updateProfile($profile, $object, $hints=array())
1317     {
1318         $orig = clone($profile);
1319
1320         $profile->nickname = self::getActivityObjectNickname($object, $hints);
1321
1322         if (!empty($object->title)) {
1323             $profile->fullname = $object->title;
1324         } else if (array_key_exists('fullname', $hints)) {
1325             $profile->fullname = $hints['fullname'];
1326         }
1327
1328         if (!empty($object->link)) {
1329             $profile->profileurl = $object->link;
1330         } else if (array_key_exists('profileurl', $hints)) {
1331             $profile->profileurl = $hints['profileurl'];
1332         } else if (Validate::uri($object->id, array('allowed_schemes' => array('http', 'https')))) {
1333             $profile->profileurl = $object->id;
1334         }
1335
1336         $profile->bio      = self::getActivityObjectBio($object, $hints);
1337         $profile->location = self::getActivityObjectLocation($object, $hints);
1338         $profile->homepage = self::getActivityObjectHomepage($object, $hints);
1339
1340         if (!empty($object->geopoint)) {
1341             $location = ActivityContext::locationFromPoint($object->geopoint);
1342             if (!empty($location)) {
1343                 $profile->lat = $location->lat;
1344                 $profile->lon = $location->lon;
1345             }
1346         }
1347
1348         // @fixme tags/categories
1349         // @todo tags from categories
1350
1351         if ($profile->id) {
1352             common_log(LOG_DEBUG, "Updating OStatus profile $profile->id from remote info $object->id: " . var_export($object, true) . var_export($hints, true));
1353             $profile->update($orig);
1354         }
1355     }
1356
1357     protected static function updateGroup($group, $object, $hints=array())
1358     {
1359         $orig = clone($group);
1360
1361         $group->nickname = self::getActivityObjectNickname($object, $hints);
1362         $group->fullname = $object->title;
1363
1364         if (!empty($object->link)) {
1365             $group->mainpage = $object->link;
1366         } else if (array_key_exists('profileurl', $hints)) {
1367             $group->mainpage = $hints['profileurl'];
1368         }
1369
1370         // @todo tags from categories
1371         $group->description = self::getActivityObjectBio($object, $hints);
1372         $group->location = self::getActivityObjectLocation($object, $hints);
1373         $group->homepage = self::getActivityObjectHomepage($object, $hints);
1374
1375         if ($group->id) {
1376             common_log(LOG_DEBUG, "Updating OStatus group $group->id from remote info $object->id: " . var_export($object, true) . var_export($hints, true));
1377             $group->update($orig);
1378         }
1379     }
1380
1381     protected static function getActivityObjectHomepage($object, $hints=array())
1382     {
1383         $homepage = null;
1384         $poco     = $object->poco;
1385
1386         if (!empty($poco)) {
1387             $url = $poco->getPrimaryURL();
1388             if ($url && $url->type == 'homepage') {
1389                 $homepage = $url->value;
1390             }
1391         }
1392
1393         // @todo Try for a another PoCo URL?
1394
1395         return $homepage;
1396     }
1397
1398     protected static function getActivityObjectLocation($object, $hints=array())
1399     {
1400         $location = null;
1401
1402         if (!empty($object->poco) &&
1403             isset($object->poco->address->formatted)) {
1404             $location = $object->poco->address->formatted;
1405         } else if (array_key_exists('location', $hints)) {
1406             $location = $hints['location'];
1407         }
1408
1409         if (!empty($location)) {
1410             if (mb_strlen($location) > 255) {
1411                 $location = mb_substr($note, 0, 255 - 3) . ' â€¦ ';
1412             }
1413         }
1414
1415         // @todo Try to find location some othe way? Via goerss point?
1416
1417         return $location;
1418     }
1419
1420     protected static function getActivityObjectBio($object, $hints=array())
1421     {
1422         $bio  = null;
1423
1424         if (!empty($object->poco)) {
1425             $note = $object->poco->note;
1426         } else if (array_key_exists('bio', $hints)) {
1427             $note = $hints['bio'];
1428         }
1429
1430         if (!empty($note)) {
1431             if (Profile::bioTooLong($note)) {
1432                 // XXX: truncate ok?
1433                 $bio = mb_substr($note, 0, Profile::maxBio() - 3) . ' â€¦ ';
1434             } else {
1435                 $bio = $note;
1436             }
1437         }
1438
1439         // @todo Try to get bio info some other way?
1440
1441         return $bio;
1442     }
1443
1444     protected static function getActivityObjectNickname($object, $hints=array())
1445     {
1446         if ($object->poco) {
1447             if (!empty($object->poco->preferredUsername)) {
1448                 return common_nicknamize($object->poco->preferredUsername);
1449             }
1450         }
1451
1452         if (!empty($object->nickname)) {
1453             return common_nicknamize($object->nickname);
1454         }
1455
1456         if (array_key_exists('nickname', $hints)) {
1457             return $hints['nickname'];
1458         }
1459
1460         // Try the profile url (like foo.example.com or example.com/user/foo)
1461
1462         $profileUrl = ($object->link) ? $object->link : $hints['profileurl'];
1463
1464         if (!empty($profileUrl)) {
1465             $nickname = self::nicknameFromURI($profileUrl);
1466         }
1467
1468         // Try the URI (may be a tag:, http:, acct:, ...
1469
1470         if (empty($nickname)) {
1471             $nickname = self::nicknameFromURI($object->id);
1472         }
1473
1474         // Try a Webfinger if one was passed (way) down
1475
1476         if (empty($nickname)) {
1477             if (array_key_exists('webfinger', $hints)) {
1478                 $nickname = self::nicknameFromURI($hints['webfinger']);
1479             }
1480         }
1481
1482         // Try the name
1483
1484         if (empty($nickname)) {
1485             $nickname = common_nicknamize($object->title);
1486         }
1487
1488         return $nickname;
1489     }
1490
1491     protected static function nicknameFromURI($uri)
1492     {
1493         preg_match('/(\w+):/', $uri, $matches);
1494
1495         $protocol = $matches[1];
1496
1497         switch ($protocol) {
1498         case 'acct':
1499         case 'mailto':
1500             if (preg_match("/^$protocol:(.*)?@.*\$/", $uri, $matches)) {
1501                 return common_canonical_nickname($matches[1]);
1502             }
1503             return null;
1504         case 'http':
1505             return common_url_to_nickname($uri);
1506             break;
1507         default:
1508             return null;
1509         }
1510     }
1511
1512     /**
1513      * Look up, and if necessary create, an Ostatus_profile for the remote
1514      * entity with the given webfinger address.
1515      * This should never return null -- you will either get an object or
1516      * an exception will be thrown.
1517      *
1518      * @param string $addr webfinger address
1519      * @return Ostatus_profile
1520      * @throws Exception on error conditions
1521      */
1522     public static function ensureWebfinger($addr)
1523     {
1524         // First, try the cache
1525
1526         $uri = self::cacheGet(sprintf('ostatus_profile:webfinger:%s', $addr));
1527
1528         if ($uri !== false) {
1529             if (is_null($uri)) {
1530                 // Negative cache entry
1531                 throw new Exception('Not a valid webfinger address.');
1532             }
1533             $oprofile = Ostatus_profile::staticGet('uri', $uri);
1534             if (!empty($oprofile)) {
1535                 return $oprofile;
1536             }
1537         }
1538
1539         // Try looking it up
1540
1541         $oprofile = Ostatus_profile::staticGet('uri', 'acct:'.$addr);
1542
1543         if (!empty($oprofile)) {
1544             self::cacheSet(sprintf('ostatus_profile:webfinger:%s', $addr), $oprofile->uri);
1545             return $oprofile;
1546         }
1547
1548         // Now, try some discovery
1549
1550         $disco = new Discovery();
1551
1552         try {
1553             $xrd = $disco->lookup($addr);
1554         } catch (Exception $e) {
1555             // Save negative cache entry so we don't waste time looking it up again.
1556             // @fixme distinguish temporary failures?
1557             self::cacheSet(sprintf('ostatus_profile:webfinger:%s', $addr), null);
1558             throw new Exception('Not a valid webfinger address.');
1559         }
1560
1561         $hints = array('webfinger' => $addr);
1562
1563         $dhints = DiscoveryHints::fromXRD($xrd);
1564
1565         $hints = array_merge($hints, $dhints);
1566
1567         // If there's an Hcard, let's grab its info
1568
1569         if (array_key_exists('hcard', $hints)) {
1570             if (!array_key_exists('profileurl', $hints) ||
1571                 $hints['hcard'] != $hints['profileurl']) {
1572                 $hcardHints = DiscoveryHints::fromHcardUrl($hints['hcard']);
1573                 $hints = array_merge($hcardHints, $hints);
1574             }
1575         }
1576
1577         // If we got a feed URL, try that
1578
1579         if (array_key_exists('feedurl', $hints)) {
1580             try {
1581                 common_log(LOG_INFO, "Discovery on acct:$addr with feed URL " . $hints['feedurl']);
1582                 $oprofile = self::ensureFeedURL($hints['feedurl'], $hints);
1583                 self::cacheSet(sprintf('ostatus_profile:webfinger:%s', $addr), $oprofile->uri);
1584                 return $oprofile;
1585             } catch (Exception $e) {
1586                 common_log(LOG_WARNING, "Failed creating profile from feed URL '$feedUrl': " . $e->getMessage());
1587                 // keep looking
1588             }
1589         }
1590
1591         // If we got a profile page, try that!
1592
1593         if (array_key_exists('profileurl', $hints)) {
1594             try {
1595                 common_log(LOG_INFO, "Discovery on acct:$addr with profile URL $profileUrl");
1596                 $oprofile = self::ensureProfileURL($hints['profileurl'], $hints);
1597                 self::cacheSet(sprintf('ostatus_profile:webfinger:%s', $addr), $oprofile->uri);
1598                 return $oprofile;
1599             } catch (Exception $e) {
1600                 common_log(LOG_WARNING, "Failed creating profile from profile URL '$profileUrl': " . $e->getMessage());
1601                 // keep looking
1602             }
1603         }
1604
1605         // XXX: try hcard
1606         // XXX: try FOAF
1607
1608         if (array_key_exists('salmon', $hints)) {
1609
1610             $salmonEndpoint = $hints['salmon'];
1611
1612             // An account URL, a salmon endpoint, and a dream? Not much to go
1613             // on, but let's give it a try
1614
1615             $uri = 'acct:'.$addr;
1616
1617             $profile = new Profile();
1618
1619             $profile->nickname = self::nicknameFromUri($uri);
1620             $profile->created  = common_sql_now();
1621
1622             if (isset($profileUrl)) {
1623                 $profile->profileurl = $profileUrl;
1624             }
1625
1626             $profile_id = $profile->insert();
1627
1628             if (!$profile_id) {
1629                 common_log_db_error($profile, 'INSERT', __FILE__);
1630                 throw new Exception("Couldn't save profile for '$addr'");
1631             }
1632
1633             $oprofile = new Ostatus_profile();
1634
1635             $oprofile->uri        = $uri;
1636             $oprofile->salmonuri  = $salmonEndpoint;
1637             $oprofile->profile_id = $profile_id;
1638             $oprofile->created    = common_sql_now();
1639
1640             if (isset($feedUrl)) {
1641                 $profile->feeduri = $feedUrl;
1642             }
1643
1644             $result = $oprofile->insert();
1645
1646             if (!$result) {
1647                 common_log_db_error($oprofile, 'INSERT', __FILE__);
1648                 throw new Exception("Couldn't save ostatus_profile for '$addr'");
1649             }
1650
1651             self::cacheSet(sprintf('ostatus_profile:webfinger:%s', $addr), $oprofile->uri);
1652             return $oprofile;
1653         }
1654
1655         throw new Exception("Couldn't find a valid profile for '$addr'");
1656     }
1657
1658     function saveHTMLFile($title, $rendered)
1659     {
1660         $final = sprintf("<!DOCTYPE html>\n<html><head><title>%s</title></head>".
1661                          '<body><div>%s</div></body></html>',
1662                          htmlspecialchars($title),
1663                          $rendered);
1664
1665         $filename = File::filename($this->localProfile(),
1666                                    'ostatus', // ignored?
1667                                    'text/html');
1668
1669         $filepath = File::path($filename);
1670
1671         file_put_contents($filepath, $final);
1672
1673         $file = new File;
1674
1675         $file->filename = $filename;
1676         $file->url      = File::url($filename);
1677         $file->size     = filesize($filepath);
1678         $file->date     = time();
1679         $file->mimetype = 'text/html';
1680
1681         $file_id = $file->insert();
1682
1683         if ($file_id === false) {
1684             common_log_db_error($file, "INSERT", __FILE__);
1685             throw new ServerException(_('Could not store HTML content of long post as file.'));
1686         }
1687
1688         return $file;
1689     }
1690 }