Merge branch 'twitter-import' into 0.8.x

3 files changed, 548 insertions, 8 deletions

diff --git a/actions/twittersettings.php b/actions/twittersettings.php
index 45725d3ff..580d9ecf7 100644
--- a/actions/twittersettings.php
+++ b/actions/twittersettings.php
@@ -138,7 +138,7 @@ class TwittersettingsAction extends ConnectSettingsAction
 
         $this->elementStart('ul', 'form_data');
         $this->elementStart('li');
-        $this->checkbox('noticesync',
+        $this->checkbox('noticesend',
                         _('Automatically send my notices to Twitter.'),
                         ($flink) ?
                         ($flink->noticesync & FOREIGN_NOTICE_SEND) :
@@ -158,6 +158,13 @@ class TwittersettingsAction extends ConnectSettingsAction
                         ($flink->friendsync & FOREIGN_FRIEND_RECV) :
                         false);
         $this->elementEnd('li');
+        $this->elementStart('li');
+        $this->checkbox('noticerecv',
+                        _('Import my Friends Timeline.'),
+                        ($flink) ?
+                        ($flink->noticesync & FOREIGN_NOTICE_RECV) :
+                        false);
+        $this->elementEnd('li');
         $this->elementEnd('ul');
 
         if ($flink) {
@@ -261,7 +268,7 @@ class TwittersettingsAction extends ConnectSettingsAction
                                             'alt' =>  ($other->fullname) ?
                                             $other->fullname :
                                             $other->nickname));
-                
+
                 $this->element('span', 'fn nickname', $other->nickname);
                 $this->elementEnd('a');
                 $this->elementEnd('li');
@@ -320,7 +327,8 @@ class TwittersettingsAction extends ConnectSettingsAction
     {
         $screen_name = $this->trimmed('twitter_username');
         $password    = $this->trimmed('twitter_password');
-        $noticesync  = $this->boolean('noticesync');
+        $noticesend  = $this->boolean('noticesend');
+        $noticerecv  = $this->boolean('noticerecv');
         $replysync   = $this->boolean('replysync');
         $friendsync  = $this->boolean('friendsync');
 
@@ -363,7 +371,7 @@ class TwittersettingsAction extends ConnectSettingsAction
         $flink->credentials = $password;
         $flink->created     = common_sql_now();
 
-        $flink->set_flags($noticesync, $replysync, $friendsync);
+        $flink->set_flags($noticesend, $noticerecv, $replysync, $friendsync);
 
         $flink_id = $flink->insert();
 
@@ -419,7 +427,8 @@ class TwittersettingsAction extends ConnectSettingsAction
 
     function savePreferences()
     {
-        $noticesync = $this->boolean('noticesync');
+        $noticesend = $this->boolean('noticesend');
+        $noticerecv = $this->boolean('noticerecv');
         $friendsync = $this->boolean('friendsync');
         $replysync  = $this->boolean('replysync');
 
@@ -448,7 +457,7 @@ class TwittersettingsAction extends ConnectSettingsAction
 
         $original = clone($flink);
 
-        $flink->set_flags($noticesync, $replysync, $friendsync);
+        $flink->set_flags($noticesend, $noticerecv, $replysync, $friendsync);
 
         $result = $flink->update($original);
 
diff --git a/classes/Foreign_link.php b/classes/Foreign_link.php
index afc0e2180..5d9c82a85 100644
--- a/classes/Foreign_link.php
+++ b/classes/Foreign_link.php
@@ -57,13 +57,19 @@ class Foreign_link extends Memcached_DataObject
         return null;
     }
 
-    function set_flags($noticesync, $replysync, $friendsync)
+    function set_flags($noticesend, $noticerecv, $replysync, $friendsync)
     {
-        if ($noticesync) {
+        if ($noticesend) {
             $this->noticesync |= FOREIGN_NOTICE_SEND;
         } else {
             $this->noticesync &= ~FOREIGN_NOTICE_SEND;
         }
+        
+        if ($noticerecv) {
+            $this->noticesync |= FOREIGN_NOTICE_RECV;
+        } else {
+            $this->noticesync &= ~FOREIGN_NOTICE_RECV;
+        }
 
         if ($replysync) {
             $this->noticesync |= FOREIGN_NOTICE_SEND_REPLY;
diff --git a/scripts/statusfetcher.php b/scripts/statusfetcher.php
new file mode 100644
index 000000000..8f4b60cf7
--- /dev/null
+++ b/scripts/statusfetcher.php
@@ -0,0 +1,525 @@
+#!/usr/bin/env php
+<?php
+/*
+ * Laconica - a distributed open-source microblogging tool
+ * Copyright (C) 2008, Controlez-Vous, Inc.
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Affero General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.     See the
+ * GNU Affero General Public License for more details.
+ *
+ * You should have received a copy of the GNU Affero General Public License
+ * along with this program.     If not, see <http://www.gnu.org/licenses/>.
+ */
+
+// Abort if called from a web server
+if (isset($_SERVER) && array_key_exists('REQUEST_METHOD', $_SERVER)) {
+    print "This script must be run from the command line\n";
+    exit();
+}
+
+define('INSTALLDIR', realpath(dirname(__FILE__) . '/..'));
+define('LACONICA', true);
+
+// Uncomment this to get useful console output
+define('SCRIPT_DEBUG', true);
+
+require_once(INSTALLDIR . '/lib/common.php');
+
+$children = array();
+$flink_ids = null;
+
+$MAXCHILDREN = 5;
+$POLL_INTERVAL = 10; // 10 seconds
+
+do {
+
+    $flink = new Foreign_link();
+    $flink->service = 1; // Twitter
+    $cnt = $flink->find();
+
+    if (defined('SCRIPT_DEBUG')) {
+        print "Updating Twitter friends subscriptions for $cnt users.\n";
+    }
+
+    $flink_ids = array();
+
+    // XXX: This only reliably happens once.  After the first interation of
+    // the do loop, the ->find() doesn't work ... lost DB connection?
+
+    while ($flink->fetch()) {
+
+        if (($flink->noticesync & FOREIGN_NOTICE_RECV) == FOREIGN_NOTICE_RECV) {
+            $flink_ids[] = $flink->foreign_id;
+        }
+    }
+
+    $flink->free();
+    unset($flink);
+
+    foreach ($flink_ids as $f){
+
+        $pid = pcntl_fork();
+
+        if ($pid == -1) {
+            die ("Couldn't fork!");
+        }
+
+        // Parent
+        if ($pid) {
+            if (defined('SCRIPT_DEBUG')) {
+                print "Parent: forked " . $pid . "\n";
+            }
+            $children[] = $pid;
+        } else {
+
+            // Child
+
+            // XXX: Each child needs its own DB connection
+
+            getTimeline($f);
+            exit();
+        }
+
+        // Remove child from ps list as it finishes
+        while(($c = pcntl_wait($status, WNOHANG OR WUNTRACED)) > 0) {
+            if (defined('SCRIPT_DEBUG')) {
+                print "Child $c finished.\n";
+            }
+            remove_ps($children, $c);
+        }
+
+        // Wait if we have too many kids
+        if(sizeof($children) > $MAXCHILDREN) {
+            if (defined('SCRIPT_DEBUG')) {
+                print "Too many children. Waiting...\n";
+            }
+            if( ($c = pcntl_wait($status, WUNTRACED) ) > 0){
+                if (defined('SCRIPT_DEBUG')) {
+                    print "Finished waiting for $c\n";
+                }
+                remove_ps($children, $c);
+            }
+        }
+    }
+
+    // Remove all children from the process list before restarting
+    while(($c = pcntl_wait($status, WUNTRACED)) > 0) {
+        if (defined('SCRIPT_DEBUG')) {
+            print "Child $c finished.\n";
+        }
+        remove_ps($children, $c);
+    }
+
+    // Rest for a bit before we fetch more statuses
+    if (defined('SCRIPT_DEBUG')) {
+        print "Waiting $POLL_INTERVAL secs before hitting Twitter again.\n";
+    }
+
+    sleep($POLL_INTERVAL);
+
+} while (true);
+
+
+function remove_ps(&$plist, $ps){
+    for($i = 0; $i < sizeof($plist); $i++){
+        if($plist[$i] == $ps){
+            unset($plist[$i]);
+            $plist = array_values($plist);
+            break;
+        }
+    }
+}
+
+function getTimeline($fid)
+{
+
+    // XXX: Need to reconnect to the DB here?
+
+    $flink = Foreign_link::getByForeignID($fid, 1);
+    $fuser = $flink->getForeignUser();
+
+    if (empty($fuser)) {
+        common_log(LOG_WARNING, "Unmatched user for ID " . $flink->user_id);
+        if (defined('SCRIPT_DEBUG')) {
+            print "Unmatched user for ID $flink->user_id\n";
+        }
+    }
+
+    $screenname = $fuser->nickname;
+
+    $url = 'http://twitter.com/statuses/friends_timeline.json';
+
+    $timeline_json = get_twitter_data($url, $fuser->nickname,
+        $flink->credentials);
+
+    $timeline = json_decode($timeline_json);
+
+    if (empty($timeline)) {
+        common_log(LOG_WARNING, "Empty timeline.");
+         if (defined('SCRIPT_DEBUG')) {
+            print "Empty timeline!\n";
+        }
+        return;
+    }
+
+    foreach ($timeline as $status) {
+
+        // Hacktastic: filter out stuff coming from Laconica
+        $source = mb_strtolower(common_config('integration', 'source'));
+
+        if (preg_match("/$source/", mb_strtolower($status->source))) {
+            continue;
+        }
+
+        saveStatus($status, $flink);
+    }
+
+}
+
+function saveStatus($status, $flink)
+{
+    // Do we have a profile for this Twitter user?
+
+    $id = ensureProfile($status->user);
+    $profile = Profile::staticGet($id);
+
+    if (!$profile) {
+        common_log(LOG_ERR, 'Problem saving notice. No associated Profile.');
+        if (defined('SCRIPT_DEBUG')) {
+            print "Problem saving notice. No associated Profile.\n";
+        }
+        return null;
+    }
+
+    $uri = 'http://twitter.com/' . $status->user->screen_name .
+        '/status/' . $status->id;
+
+    // Skip save if notice source is Laconica or Identi.ca?
+
+    $notice = Notice::staticGet('uri', $uri);
+
+    // check to see if we've already imported the status
+    if (!$notice) {
+
+        $notice = new Notice();
+        $notice->profile_id = $id;
+
+        $notice->query('BEGIN');
+
+        // XXX: figure out reply_to
+        $notice->reply_to = null;
+
+        // XXX: Should this be common_sql_now() instead of status create date?
+
+        $notice->created = strftime('%Y-%m-%d %H:%M:%S',
+            strtotime($status->created_at));
+        $notice->content = $status->text;
+        $notice->rendered = common_render_content($status->text, $notice);
+        $notice->source = 'twitter';
+        $notice->is_local = 0;
+        $notice->uri = $uri;
+
+        $notice_id = $notice->insert();
+
+        if (!$notice_id) {
+            common_log_db_error($notice, 'INSERT', __FILE__);
+            if (defined('SCRIPT_DEBUG')) {
+                print "Could not save notice!\n";
+            }
+        }
+
+        // XXX: Figure out a better way to link replies?
+        $notice->saveReplies();
+
+        // XXX: Do we want to polute our tag cloud with hashtags from Twitter?
+        $notice->saveTags();
+        $notice->saveGroups();
+
+        $notice->query('COMMIT');
+
+    }
+
+    if (!Notice_inbox::staticGet('notice_id', $notice->id)) {
+
+        // Add to inbox
+        $inbox = new Notice_inbox();
+        $inbox->user_id = $flink->user_id;
+        $inbox->notice_id = $notice->id;
+        $inbox->created = common_sql_now();
+
+        $inbox->insert();
+    }
+}
+
+function ensureProfile($user)
+{
+
+    // check to see if there's already a profile for this user
+    $profileurl = 'http://twitter.com/' . $user->screen_name;
+    $profile = Profile::staticGet('profileurl', $profileurl);
+
+    if ($profile) {
+        common_debug("Profile for $profile->nickname found.");
+
+        // Check to see if the user's Avatar has changed
+        checkAvatar($user, $profile);
+        return $profile->id;
+
+    } else {
+        $debugmsg = 'Adding profile and remote profile ' .
+            "for Twitter user: $profileurl\n";
+        common_debug($debugmsg, __FILE__);
+        if (defined('SCRIPT_DEBUG')) {
+            print $debugmsg;
+        }
+
+        $profile = new Profile();
+        $profile->query("BEGIN");
+
+        $profile->nickname = $user->screen_name;
+        $profile->fullname = $user->name;
+        $profile->homepage = $user->url;
+        $profile->bio = $user->description;
+        $profile->location = $user->location;
+        $profile->profileurl = $profileurl;
+        $profile->created = common_sql_now();
+
+        $id = $profile->insert();
+
+        if (empty($id)) {
+            common_log_db_error($profile, 'INSERT', __FILE__);
+            if (defined('SCRIPT_DEBUG')) {
+                print 'Could not insert Profile: ' .
+                    common_log_objstring($profile) . "\n";
+            }
+            $profile->query("ROLLBACK");
+            return false;
+        }
+
+        // check for remote profile
+        $remote_pro = Remote_profile::staticGet('uri', $profileurl);
+
+        if (!$remote_pro) {
+
+            $remote_pro = new Remote_profile();
+
+            $remote_pro->id = $id;
+            $remote_pro->uri = $profileurl;
+            $remote_pro->created = common_sql_now();
+
+            $rid = $remote_pro->insert();
+
+            if (empty($rid)) {
+                common_log_db_error($profile, 'INSERT', __FILE__);
+                if (defined('SCRIPT_DEBUG')) {
+                    print 'Could not insert Remote_profile: ' .
+                        common_log_objstring($remote_pro) . "\n";
+                }
+                $profile->query("ROLLBACK");
+                return false;
+            }
+        }
+
+        $profile->query("COMMIT");
+        $profile->free();
+        unset($profile);
+
+        saveAvatars($user, $id);
+
+        return $id;
+    }
+}
+
+function checkAvatar($user, $profile)
+{
+    $path_parts = pathinfo($user->profile_image_url);
+    $newname = 'Twitter_' . $user->id . '_' .
+        $path_parts['basename'];
+
+    $oldname = $profile->getAvatar(48)->filename;
+
+    if ($newname != $oldname) {
+
+        common_debug("Avatar for Twitter user $profile->nickname has changed.");
+        common_debug("old: $oldname new: $newname");
+
+        if (defined('SCRIPT_DEBUG')) {
+            print "Avatar for Twitter user $user->id has changed.\n";
+            print "old: $oldname\n";
+            print "new: $newname\n";
+        }
+
+        $img_root = substr($path_parts['basename'], 0, -11);
+        $ext = $path_parts['extension'];
+        $mediatype = getMediatype($ext);
+
+        foreach (array('mini', 'normal', 'bigger') as $size) {
+            $url = $path_parts['dirname'] . '/' .
+                $img_root . '_' . $size . ".$ext";
+            $filename = 'Twitter_' . $user->id . '_' .
+                $img_root . "_$size.$ext";
+
+            if (fetchAvatar($url, $filename)) {
+                updateAvatar($profile->id, $size, $mediatype, $filename);
+            }
+        }
+    }
+}
+
+function getMediatype($ext)
+{
+    $mediatype = null;
+
+    switch (strtolower($ext)) {
+    case 'jpg':
+        $mediatype = 'image/jpg';
+        break;
+    case 'gif':
+        $mediatype = 'image/gif';
+        break;
+    default:
+        $mediatype = 'image/png';
+    }
+
+    return $mediatype;
+}
+
+function saveAvatars($user, $id)
+{
+    $path_parts = pathinfo($user->profile_image_url);
+    $ext = $path_parts['extension'];
+    $end = strlen('_normal' . $ext);
+    $img_root = substr($path_parts['basename'], 0, -($end+1));
+    $mediatype = getMediatype($ext);
+
+    foreach (array('mini', 'normal', 'bigger') as $size) {
+        $url = $path_parts['dirname'] . '/' .
+            $img_root . '_' . $size . ".$ext";
+        $filename = 'Twitter_' . $user->id . '_' .
+            $img_root . "_$size.$ext";
+
+        if (fetchAvatar($url, $filename)) {
+            newAvatar($id, $size, $mediatype, $filename);
+        } else {
+            common_log(LOG_WARNING, "Problem fetching Avatar: $url", __FILE__);
+            if (defined('SCRIPT_DEBUG')) {
+                print "Problem fetching Avatar: $url\n";
+            }
+        }
+    }
+}
+
+function updateAvatar($profile_id, $size, $mediatype, $filename) {
+
+    common_debug("updating avatar: $size");
+
+    $profile = Profile::staticGet($profile_id);
+
+    if (!$profile) {
+        common_debug("Couldn't get profile: $profile_id!");
+        if (defined('SCRIPT_DEBUG')) {
+            print "Couldn't get profile: $profile_id!\n";
+        }
+        return;
+    }
+
+    $sizes = array('mini' => 24, 'normal' => 48, 'bigger' => 73);
+    $avatar = $profile->getAvatar($sizes[$size]);
+
+    if ($avatar) {
+        common_debug("Deleting $size avatar for $profile->nickname.");
+        @unlink(INSTALLDIR . '/avatar/' . $avatar->filename);
+        $avatar->delete();
+    }
+
+    newAvatar($profile->id, $size, $mediatype, $filename);
+}
+
+function newAvatar($profile_id, $size, $mediatype, $filename)
+{
+    $avatar = new Avatar();
+    $avatar->profile_id = $profile_id;
+
+    switch($size) {
+    case 'mini':
+        $avatar->width  = 24;
+        $avatar->height = 24;
+        break;
+    case 'normal':
+        $avatar->width  = 48;
+        $avatar->height = 48;
+        break;
+    default:
+
+        // Note: Twitter's big avatars are a different size than
+        // Laconica's (Laconica's = 96)
+
+        $avatar->width  = 73;
+        $avatar->height = 73;
+    }
+
+    $avatar->original = 0; // we don't have the original
+    $avatar->mediatype = $mediatype;
+    $avatar->filename = $filename;
+    $avatar->url = Avatar::url($filename);
+
+    common_debug("new filename: $avatar->url");
+
+    $avatar->created = common_sql_now();
+
+    $id = $avatar->insert();
+
+    if (!$id) {
+        common_log_db_error($avatar, 'INSERT', __FILE__);
+        if (defined('SCRIPT_DEBUG')) {
+            print "Could not insert avatar!\n";
+        }
+
+        return null;
+    }
+
+    common_debug("Saved new $size avatar for $profile_id.");
+
+    return $id;
+}
+
+function fetchAvatar($url, $filename)
+{
+    $avatar_dir = INSTALLDIR . '/avatar/';
+
+    $avatarfile = $avatar_dir . $filename;
+
+    $out = fopen($avatarfile, 'wb');
+    if (!$out) {
+        common_log(LOG_WARNING, "Couldn't open file $filename", __FILE__);
+        if (defined('SCRIPT_DEBUG')) {
+            print "Couldn't open file! $filename\n";
+        }
+        return false;
+    }
+
+    common_debug("Fetching avatar: $url", __FILE__);
+    if (defined('SCRIPT_DEBUG')) {
+        print "Fetching avatar from Twitter: $url\n";
+    }
+
+    $ch = curl_init();
+    curl_setopt($ch, CURLOPT_URL, $url);
+    curl_setopt($ch, CURLOPT_FILE, $out);
+    curl_setopt($ch, CURLOPT_BINARYTRANSFER, true);
+    curl_setopt($ch, CURLOPT_FOLLOWLOCATION, true);
+    curl_setopt($ch, CURLOPT_CONNECTTIMEOUT, 0);
+    $result = curl_exec($ch);
+    curl_close($ch);
+
+    fclose($out);
+
+    return $result;
+}