plugins/TwitterBridge/lib/twitterimport.php

   1 <?php
   2 /**
   3  * StatusNet, the distributed open-source microblogging tool
   4  *
   5  * PHP version 5
   6  *
   7  * LICENCE: This program is free software: you can redistribute it and/or modify
   8  * it under the terms of the GNU Affero General Public License as published by
   9  * the Free Software Foundation, either version 3 of the License, or
  10  * (at your option) any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  * GNU Affero General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Affero General Public License
  18  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  19  *
  20  * @category  Plugin
  21  * @package   StatusNet
  22  * @author    Zach Copley <zach@status.net>
  23  * @author    Julien C <chaumond@gmail.com>
  24  * @author    Brion Vibber <brion@status.net>
  25  * @copyright 2009-2010 StatusNet, Inc.
  26  * @license   http://www.fsf.org/licensing/licenses/agpl-3.0.html GNU Affero General Public License version 3.0
  27  * @link      http://status.net/
  28  */
  29
  30 if (!defined('STATUSNET')) {
  31     exit(1);
  32 }
  33
  34 require_once INSTALLDIR . '/plugins/TwitterBridge/twitter.php';
  35
  36 /**
  37  * Encapsulation of the Twitter status -> notice incoming bridge import.
  38  * Is used by both the polling twitterstatusfetcher.php daemon, and the
  39  * in-progress streaming import.
  40  *
  41  * @category Plugin
  42  * @package  StatusNet
  43  * @author   Zach Copley <zach@status.net>
  44  * @author   Julien C <chaumond@gmail.com>
  45  * @author   Brion Vibber <brion@status.net>
  46  * @license  http://www.fsf.org/licensing/licenses/agpl-3.0.html GNU Affero General Public License version 3.0
  47  * @link     http://status.net/
  48  * @link     http://twitter.com/
  49  */
  50 class TwitterImport
  51 {
  52     public $avatarsizename = 'reasonably_small'; // a Twitter size name for 128x128 px
  53     public $avatarsize = 128;   // they're square...
  54
  55     public function importStatus($status)
  56     {
  57         // Hacktastic: filter out stuff coming from this StatusNet
  58         $source = mb_strtolower(common_config('integration', 'source'));
  59
  60         if (preg_match("/$source/", mb_strtolower($status->source))) {
  61             common_debug(__METHOD__ . ' - Skipping import of status ' .
  62                          twitter_id($status) . " with source {$source}");
  63             return null;
  64         }
  65
  66         // Don't save it if the user is protected
  67         // FIXME: save it but treat it as private
  68         if ($status->user->protected) {
  69             return null;
  70         }
  71
  72         $notice = $this->saveStatus($status);
  73
  74         return $notice;
  75     }
  76
  77     function name()
  78     {
  79         return get_class($this);
  80     }
  81
  82     function saveStatus($status)
  83     {
  84         $profile = $this->ensureProfile($status->user);
  85
  86         if (empty($profile)) {
  87             common_log(LOG_ERR, __METHOD__ . ' - Problem saving notice. No associated Profile.');
  88             return null;
  89         }
  90
  91         $statusId = twitter_id($status);
  92         $statusUri = $this->makeStatusURI($status->user->screen_name, $statusId);
  93
  94         // check to see if we've already imported the status
  95         $n2s = Notice_to_status::getKV('status_id', $statusId);
  96
  97         if (!empty($n2s)) {
  98             common_log(
  99                 LOG_INFO,
 100                 __METHOD__ . " - Ignoring duplicate import: {$statusId}"
 101             );
 102             return Notice::getKV('id', $n2s->notice_id);
 103         }
 104
 105         // If it's a retweet, save it as a repeat!
 106         if (!empty($status->retweeted_status)) {
 107             common_log(LOG_INFO, "Status {$statusId} is a retweet of " . twitter_id($status->retweeted_status) . ".");
 108             $original = $this->saveStatus($status->retweeted_status);
 109             if (empty($original)) {
 110                 return null;
 111             } else {
 112                 $author = $original->getProfile();
 113                 // TRANS: Message used to repeat a notice. RT is the abbreviation of 'retweet'.
 114                 // TRANS: %1$s is the repeated user's name, %2$s is the repeated notice.
 115                 $content = sprintf(_m('RT @%1$s %2$s'),
 116                                    $author->nickname,
 117                                    $original->content);
 118
 119                 if (Notice::contentTooLong($content)) {
 120                     $contentlimit = Notice::maxContent();
 121                     $content = mb_substr($content, 0, $contentlimit - 4) . ' ...';
 122                 }
 123
 124                 $repeat = Notice::saveNew($profile->id,
 125                                           $content,
 126                                           'twitter',
 127                                           array('repeat_of' => $original->id,
 128                                                 'uri' => $statusUri,
 129                                                 'is_local' => Notice::GATEWAY));
 130                 common_log(LOG_INFO, "Saved {$repeat->id} as a repeat of {$original->id}");
 131                 Notice_to_status::saveNew($repeat->id, $statusId);
 132                 return $repeat;
 133             }
 134         }
 135
 136         $notice = new Notice();
 137
 138         $notice->profile_id = $profile->id;
 139         $notice->uri        = $statusUri;
 140         $notice->url        = $statusUri;
 141         $notice->created    = strftime(
 142             '%Y-%m-%d %H:%M:%S',
 143             strtotime($status->created_at)
 144         );
 145
 146         $notice->source     = 'twitter';
 147
 148         $notice->reply_to   = null;
 149
 150         $replyTo = twitter_id($status, 'in_reply_to_status_id');
 151         if (!empty($replyTo)) {
 152             common_log(LOG_INFO, "Status {$statusId} is a reply to status {$replyTo}");
 153             $n2s = Notice_to_status::getKV('status_id', $replyTo);
 154             if (empty($n2s)) {
 155                 common_log(LOG_INFO, "Couldn't find local notice for status {$replyTo}");
 156             } else {
 157                 $reply = Notice::getKV('id', $n2s->notice_id);
 158                 if (empty($reply)) {
 159                     common_log(LOG_INFO, "Couldn't find local notice for status {$replyTo}");
 160                 } else {
 161                     common_log(LOG_INFO, "Found local notice {$reply->id} for status {$replyTo}");
 162                     $notice->reply_to     = $reply->id;
 163                     $notice->conversation = $reply->conversation;
 164                 }
 165             }
 166         }
 167
 168         if (empty($notice->conversation)) {
 169             $conv = Conversation::create();
 170             $notice->conversation = $conv->id;
 171             common_log(LOG_INFO, "No known conversation for status {$statusId} so making a new one {$conv->id}.");
 172         }
 173
 174         $notice->is_local   = Notice::GATEWAY;
 175
 176         $notice->content  = html_entity_decode($this->linkify($status, FALSE), ENT_QUOTES, 'UTF-8');
 177         $notice->rendered = $this->linkify($status, TRUE);
 178
 179         if (Event::handle('StartNoticeSave', array(&$notice))) {
 180
 181             $id = $notice->insert();
 182
 183             if (!$id) {
 184                 common_log_db_error($notice, 'INSERT', __FILE__);
 185                 common_log(LOG_ERR, __METHOD__ . ' - Problem saving notice.');
 186             }
 187
 188             Event::handle('EndNoticeSave', array($notice));
 189         }
 190
 191         Notice_to_status::saveNew($notice->id, $statusId);
 192
 193         $this->saveStatusMentions($notice, $status);
 194         $this->saveStatusAttachments($notice, $status);
 195
 196         $notice->blowOnInsert();
 197
 198         return $notice;
 199     }
 200
 201     /**
 202      * Make an URI for a status.
 203      *
 204      * @param object $status status object
 205      *
 206      * @return string URI
 207      */
 208     function makeStatusURI($username, $id)
 209     {
 210         return 'http://twitter.com/#!/'
 211           . $username
 212           . '/status/'
 213           . $id;
 214     }
 215
 216
 217     /**
 218      * Look up a Profile by profileurl field.  Profile::getKV() was
 219      * not working consistently.
 220      *
 221      * @param string $nickname   local nickname of the Twitter user
 222      * @param string $profileurl the profile url
 223      *
 224      * @return mixed value the first Profile with that url, or null
 225      */
 226     protected function getProfileByUrl($nickname, $profileurl)
 227     {
 228         $profile = new Profile();
 229         $profile->nickname = $nickname;
 230         $profile->profileurl = $profileurl;
 231         $profile->limit(1);
 232
 233         if (!$profile->find(true)) {
 234             throw new NoResultException($profile);
 235         }
 236         return $profile;
 237     }
 238
 239     protected function ensureProfile($twuser)
 240     {
 241         // check to see if there's already a profile for this user
 242         $profileurl = 'http://twitter.com/' . $twuser->screen_name;
 243         try {
 244             $profile = $this->getProfileByUrl($twuser->screen_name, $profileurl);
 245             $this->updateAvatar($twuser, $profile);
 246             return $profile;
 247         } catch (NoResultException $e) {
 248             common_debug(__METHOD__ . ' - Adding profile and remote profile ' .
 249                          "for Twitter user: $profileurl.");
 250         }
 251
 252         $profile = new Profile();
 253         $profile->query("BEGIN");
 254         $profile->nickname   = $twuser->screen_name;
 255         $profile->fullname   = $twuser->name;
 256         $profile->homepage   = $twuser->url;
 257         $profile->bio        = $twuser->description;
 258         $profile->location   = $twuser->location;
 259         $profile->profileurl = $profileurl;
 260         $profile->created    = common_sql_now();
 261
 262         try {
 263             $id = $profile->insert();   // insert _should_ throw exception on failure
 264             if (empty($id)) {
 265                 throw new Exception('Failed insert');
 266             }
 267         } catch(Exception $e) {
 268             common_log(LOG_WARNING, __METHOD__ . " Couldn't insert profile: " . $e->getMessage());
 269             common_log_db_error($profile, 'INSERT', __FILE__);
 270             $profile->query("ROLLBACK");
 271             return false;
 272         }
 273
 274         // check for remote profile
 275         $remote_pro = Remote_profile::getKV('uri', $profileurl);
 276
 277         if (!($remote_pro instanceof Remote_profile)) {
 278             $remote_pro = new Remote_profile();
 279             $remote_pro->id = $id;
 280             $remote_pro->uri = $profileurl;
 281             $remote_pro->created = common_sql_now();
 282
 283             try {
 284                 $rid = $remote_pro->insert();
 285                 if (empty($rid)) {
 286                     throw new Exception('Failed insert');
 287                 }
 288             } catch (Exception $e) {
 289                 common_log(LOG_WARNING, __METHOD__ . " Couldn't save remote profile: " . $e->getMessage());
 290                 common_log_db_error($profile, 'INSERT', __FILE__);
 291                 $profile->query("ROLLBACK");
 292                 return false;
 293             }
 294         }
 295
 296         $profile->query("COMMIT");
 297         $this->updateAvatar($twuser, $profile);
 298         return $profile;
 299     }
 300
 301     /*
 302      * Checks whether we have to update the profile's avatar
 303      *
 304      * @return true when updated, false on failure, null when no action taken
 305      */
 306     protected function updateAvatar($twuser, Profile $profile)
 307     {
 308         $path_parts = pathinfo($twuser->profile_image_url);
 309         $ext        = isset($path_parts['extension'])
 310                         ? '.'.$path_parts['extension']
 311                         : '';   // some lack extension
 312         $img_root   = basename($path_parts['basename'], '_normal'.$ext);        // cut off extension
 313         $filename   = "Twitter_{$twuser->id}_{$img_root}_{$this->avatarsizename}{$ext}";
 314
 315         try {
 316             $avatar = Avatar::getUploaded($profile);
 317             if ($avatar->filename === $filename) {
 318                 return null;
 319             }
 320             // else we continue with creating a new avatar
 321         } catch (Exception $e) {
 322             // Avatar was not found. We can catch NoResultException or FileNotFoundException
 323             // but generally we just want to continue creating a new avatar.
 324         }
 325
 326         $url        = "{$path_parts['dirname']}/{$img_root}_{$this->avatarsizename}{$ext}";
 327         $mediatype  = $this->getMediatype(mb_substr($ext, 1));
 328
 329         try {
 330             common_debug(__METHOD__ . " - Updating profile avatar (profile_id={$profile->id} to {$filename}");
 331             $this->newAvatar($profile, $url, $filename, $mediatype);
 332         } catch (Exception $e) {
 333             if (file_exists(Avatar::path($filename))) {
 334                 unlink(Avatar::path($filename));
 335             }
 336             return false;
 337         }
 338
 339         return true;
 340     }
 341
 342     protected function getMediatype($ext)
 343     {
 344         $mediatype = null;
 345
 346         switch (strtolower($ext)) {
 347         case 'jpeg':
 348         case 'jpg':
 349             $mediatype = 'image/jpeg';
 350             break;
 351         case 'gif':
 352             $mediatype = 'image/gif';
 353             break;
 354         default:
 355             $mediatype = 'image/png';
 356         }
 357
 358         return $mediatype;
 359     }
 360
 361     protected function newAvatar(Profile $profile, $url, $filename, $mediatype)
 362     {
 363         // Clear out old avatars, won't do anything if there are none
 364         Avatar::deleteFromProfile($profile);
 365
 366         // throws exception if unable to fetch
 367         $this->fetchRemoteUrl($url, Avatar::path($filename));
 368
 369         $avatar = new Avatar();
 370         $avatar->profile_id = $profile->id;
 371         $avatar->original   = 1; // this is an original/"uploaded" avatar
 372         $avatar->mediatype  = $mediatype;
 373         $avatar->filename   = $filename;
 374         $avatar->url        = Avatar::url($filename);
 375         $avatar->width      = $this->avatarsize;
 376         $avatar->height     = $this->avatarsize;
 377
 378         $avatar->created = common_sql_now();
 379
 380         $id = $avatar->insert();
 381
 382         if (empty($id)) {
 383             common_log(LOG_WARNING, __METHOD__ . " Couldn't insert avatar - " . $e->getMessage());
 384             common_log_db_error($avatar, 'INSERT', __FILE__);
 385             throw new ServerException('Could not insert avatar');
 386         }
 387
 388         common_debug(__METHOD__ . " - Saved new avatar for {$profile->id}.");
 389
 390         return $avatar;
 391     }
 392
 393     /**
 394      * Fetch a remote avatar image and save to local storage.
 395      *
 396      * @param string $url avatar source URL
 397      * @param string $filename bare local filename for download
 398      * @return bool true on success, false on failure
 399      */
 400     protected function fetchRemoteUrl($url, $filename)
 401     {
 402         common_debug(__METHOD__ . " - Fetching Twitter avatar: {$url} to {$filename}");
 403         $request = HTTPClient::start();
 404         $request->setConfig('connect_timeout', 3);  // I had problems with throttling
 405         $request->setConfig('timeout', 6);          // and locking the process sucks.
 406         $response = $request->get($url);
 407         if ($response->isOk()) {
 408             if (!file_put_contents($filename, $response->getBody())) {
 409                 throw new ServerException('Failed saving fetched file');
 410             }
 411         } else {
 412             throw new Exception('Unexpected HTTP status code');
 413         }
 414         return true;
 415     }
 416
 417     const URL = 1;
 418     const HASHTAG = 2;
 419     const MENTION = 3;
 420
 421     function linkify($status, $html = FALSE)
 422     {
 423         $text = $status->text;
 424
 425         if (empty($status->entities)) {
 426             $statusId = twitter_id($status);
 427             common_log(LOG_WARNING, "No entities data for {$statusId}; trying to fake up links ourselves.");
 428             $text = common_replace_urls_callback($text, 'common_linkify');
 429             $text = preg_replace('/(^|\&quot\;|\'|\(|\[|\{|\s+)#([\pL\pN_\-\.]{1,64})/e', "'\\1#'.TwitterStatusFetcher::tagLink('\\2')", $text);
 430             $text = preg_replace('/(^|\s+)@([a-z0-9A-Z_]{1,64})/e', "'\\1@'.TwitterStatusFetcher::atLink('\\2')", $text);
 431             return $text;
 432         }
 433
 434         // Move all the entities into order so we can
 435         // replace them and escape surrounding plaintext
 436         // in order
 437
 438         $toReplace = array();
 439
 440         if (!empty($status->entities->urls)) {
 441             foreach ($status->entities->urls as $url) {
 442                 $toReplace[$url->indices[0]] = array(self::URL, $url);
 443             }
 444         }
 445
 446         if (!empty($status->entities->hashtags)) {
 447             foreach ($status->entities->hashtags as $hashtag) {
 448                 $toReplace[$hashtag->indices[0]] = array(self::HASHTAG, $hashtag);
 449             }
 450         }
 451
 452         if (!empty($status->entities->user_mentions)) {
 453             foreach ($status->entities->user_mentions as $mention) {
 454                 $toReplace[$mention->indices[0]] = array(self::MENTION, $mention);
 455             }
 456         }
 457
 458         // sort in forward order by key
 459
 460         ksort($toReplace);
 461
 462         $result = '';
 463         $cursor = 0;
 464
 465         foreach ($toReplace as $part) {
 466             list($type, $object) = $part;
 467             $start = $object->indices[0];
 468             $end = $object->indices[1];
 469             if ($cursor < $start) {
 470                 // Copy in the preceding plaintext
 471                 $result .= $this->twitEscape(mb_substr($text, $cursor, $start - $cursor));
 472                 $cursor = $start;
 473             }
 474             $orig = $this->twitEscape(mb_substr($text, $start, $end - $start));
 475             switch($type) {
 476             case self::URL:
 477                 $linkText = $this->makeUrlLink($object, $orig, $html);
 478                 break;
 479             case self::HASHTAG:
 480                 if ($html) {
 481                     $linkText = $this->makeHashtagLink($object, $orig);
 482                 }else{
 483                     $linkText = $orig;
 484                 }
 485                 break;
 486             case self::MENTION:
 487                 if ($html) {
 488                     $linkText = $this->makeMentionLink($object, $orig);
 489                 }else{
 490                     $linkText = $orig;
 491                 }
 492                 break;
 493             default:
 494                 $linkText = $orig;
 495                 continue;
 496             }
 497             $result .= $linkText;
 498             $cursor = $end;
 499         }
 500         $last = $this->twitEscape(mb_substr($text, $cursor));
 501         $result .= $last;
 502
 503         return $result;
 504     }
 505
 506     function twitEscape($str)
 507     {
 508         // Twitter seems to preemptive turn < and > into &lt; and &gt;
 509         // but doesn't for &, so while you may have some magic protection
 510         // against XSS by not bothing to escape manually, you still get
 511         // invalid XHTML. Thanks!
 512         //
 513         // Looks like their web interface pretty much sends anything
 514         // through intact, so.... to do equivalent, decode all entities
 515         // and then re-encode the special ones.
 516         return htmlspecialchars(html_entity_decode($str, ENT_COMPAT, 'UTF-8'));
 517     }
 518
 519     function makeUrlLink($object, $orig, $html)
 520     {
 521         if ($html) {
 522             return '<a href="'.htmlspecialchars($object->expanded_url).'" class="extlink">'.htmlspecialchars($object->display_url).'</a>';
 523         }else{
 524             return htmlspecialchars($object->expanded_url);
 525         }
 526     }
 527
 528     function makeHashtagLink($object, $orig)
 529     {
 530         return "#" . self::tagLink($object->text, substr($orig, 1));
 531     }
 532
 533     function makeMentionLink($object, $orig)
 534     {
 535         return "@".self::atLink($object->screen_name, $object->name, substr($orig, 1));
 536     }
 537
 538     static function tagLink($tag, $orig)
 539     {
 540         return "<a href='https://search.twitter.com/search?q=%23{$tag}' class='hashtag'>{$orig}</a>";
 541     }
 542
 543     static function atLink($screenName, $fullName, $orig)
 544     {
 545         if (!empty($fullName)) {
 546             return "<a href='http://twitter.com/#!/{$screenName}' title='{$fullName}'>{$orig}</a>";
 547         } else {
 548             return "<a href='http://twitter.com/#!/{$screenName}'>{$orig}</a>";
 549         }
 550     }
 551
 552     function saveStatusMentions($notice, $status)
 553     {
 554         $mentions = array();
 555
 556         if (empty($status->entities) || empty($status->entities->user_mentions)) {
 557             return;
 558         }
 559
 560         foreach ($status->entities->user_mentions as $mention) {
 561             $flink = Foreign_link::getByForeignID($mention->id, TWITTER_SERVICE);
 562             if (!empty($flink)) {
 563                 $user = User::getKV('id', $flink->user_id);
 564                 if (!empty($user)) {
 565                     $reply = new Reply();
 566                     $reply->notice_id  = $notice->id;
 567                     $reply->profile_id = $user->id;
 568                     $reply->modified   = $notice->created;
 569                     common_log(LOG_INFO, __METHOD__ . ": saving reply: notice {$notice->id} to profile {$user->id}");
 570                     $id = $reply->insert();
 571                 }
 572             }
 573         }
 574     }
 575
 576     /**
 577      * Record URL links from the notice. Needed to get thumbnail records
 578      * for referenced photo and video posts, etc.
 579      *
 580      * @param Notice $notice
 581      * @param object $status
 582      */
 583     function saveStatusAttachments($notice, $status)
 584     {
 585         if (common_config('attachments', 'process_links')) {
 586             if (!empty($status->entities) && !empty($status->entities->urls)) {
 587                 foreach ($status->entities->urls as $url) {
 588                     File::processNew($url->url, $notice->id);
 589                 }
 590             }
 591         }
 592     }
 593 }