lib/twitter.php

   1 <?php
   2 /*
   3  * Laconica - a distributed open-source microblogging tool
   4  * Copyright (C) 2008, Controlez-Vous, 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 if (!defined('LACONICA')) { exit(1); }
  21
  22 function get_twitter_data($uri, $screen_name, $password) {
  23
  24         $options = array(
  25                         CURLOPT_USERPWD => sprintf("%s:%s", $screen_name, $password),
  26                         CURLOPT_RETURNTRANSFER  => true,
  27                         CURLOPT_FAILONERROR             => true,
  28                         CURLOPT_HEADER                  => false,
  29                         CURLOPT_FOLLOWLOCATION  => true,
  30                         // CURLOPT_USERAGENT            => "identi.ca",
  31                         CURLOPT_CONNECTTIMEOUT  => 120,
  32                         CURLOPT_TIMEOUT                 => 120
  33         );
  34
  35
  36         $ch = curl_init($uri);
  37     curl_setopt_array($ch, $options);
  38     $data = curl_exec($ch);
  39     $errmsg = curl_error($ch);
  40
  41         if ($errmsg) {
  42                 common_debug("Twitter bridge - cURL error: $errmsg - trying to load: $uri with user $twit_user.",
  43                         __FILE__);
  44         }
  45
  46         curl_close($ch);
  47
  48         return $data;
  49 }
  50
  51 function twitter_user_info($screen_name, $password) {
  52
  53         $uri = "http://twitter.com/users/show/$screen_name.json";
  54         $data = get_twitter_data($uri, $screen_name, $password);
  55
  56         if (!$data) {
  57                 return false;
  58         }
  59
  60         $twit_user = json_decode($data);
  61
  62         if (!$twit_user) {
  63                 return false;
  64         }
  65
  66         return $twit_user;
  67 }
  68
  69 function update_twitter_user($fuser, $twitter_id, $screen_name) {
  70
  71         $original = clone($fuser);
  72         $fuser->nickname = $screen_name;
  73         $fuser->uri = 'http://twitter.com/' . $screen_name;
  74         $result = $fuser->updateKeys($original);
  75
  76         if (!$result) {
  77                 common_log_db_error($fuser, 'UPDATE', __FILE__);
  78                 return false;
  79         }
  80
  81         return true;
  82 }
  83
  84 function add_twitter_user($twitter_id, $screen_name) {
  85
  86         // Otherwise, create a new Twitter user
  87         $fuser = DB_DataObject::factory('foreign_user');
  88
  89         $fuser->nickname = $screen_name;
  90         $fuser->uri = 'http://twitter.com/' . $screen_name;
  91         $fuser->id = $twitter_id;
  92         $fuser->service = 1; // Twitter
  93         $fuser->created = common_sql_now();
  94         $result = $fuser->insert();
  95
  96         if (!$result) {
  97                 common_debug("Twitter bridge - failed to add new Twitter user: $twitter_id - $screen_name.");
  98                 common_log_db_error($fuser, 'INSERT', __FILE__);
  99                 return false;
 100         }
 101
 102         common_debug("Twitter bridge - Added new Twitter user: $screen_name ($twitter_id).");
 103
 104         return true;
 105 }
 106
 107 // Creates or Updates a Twitter user
 108 function save_twitter_user($twitter_id, $screen_name) {
 109
 110         // Check to see whether the Twitter user is already in the system,
 111         // and update its screen name and uri if so.
 112         $fuser = Foreign_user::getForeignUser($twitter_id, 1);
 113
 114         if ($fuser) {
 115
 116                 // Only update if Twitter screen name has changed
 117                 if ($fuser->nickname != $screen_name) {
 118
 119                         common_debug('Twitter bridge - Updated nickname (and URI) for Twitter user ' .
 120                                 "$fuser->id to $screen_name, was $fuser->nickname");
 121
 122                         return update_twitter_user($fuser, $twitter_id, $screen_name);
 123                 }
 124
 125         } else {
 126                 return add_twitter_user($twitter_id, $screen_name);
 127         }
 128
 129         return true;
 130 }
 131
 132 function retreive_twitter_friends($twitter_id, $screen_name, $password) {
 133
 134         $uri = "http://twitter.com/statuses/friends/$twitter_id.json?page=";
 135         $twitter_user = twitter_user_info($screen_name, $password);
 136
 137         // Calculate how many pages to get...
 138         $pages = ceil($twitter_user->friends_count / 100);
 139
 140         if ($pages == 0) {
 141                 common_debug("Twitter bridge - Twitter user $screen_name has no friends! Lame.");
 142         }
 143
 144         $friends = array();
 145
 146         for ($i = 1; $i <= $pages; $i++) {
 147
 148                 $data = get_twitter_data($uri . $i, $screen_name, $password);
 149
 150                 if (!$data) {
 151                         return NULL;
 152                 }
 153
 154                 $more_friends = json_decode($data);
 155
 156                 if (!$more_friends) {
 157                         return NULL;
 158                 }
 159
 160                 $friends = array_merge($friends, $more_friends);
 161         }
 162
 163         return $friends;
 164 }
 165
 166 function save_twitter_friends($user, $twitter_id, $screen_name, $password) {
 167
 168         $friends = retreive_twitter_friends($twitter_id, $screen_name, $password);
 169
 170         if (is_null($friends)) {
 171                 common_debug("Twitter bridge - Couldn't get friends data from Twitter.");
 172                 return false;
 173         }
 174
 175     foreach ($friends as $friend) {
 176
 177                 $friend_name = $friend->screen_name;
 178                 $friend_id = $friend->id;
 179
 180                 // Update or create the Foreign_user record
 181                 if (!save_twitter_user($friend_id, $friend_name)) {
 182                         return false;
 183                 }
 184
 185                 // Check to see if there's a related local user
 186                 $flink = Foreign_link::getByForeignID($friend_id, 1);
 187
 188                 if ($flink) {
 189
 190                         // Get associated user and subscribe her
 191                         $friend_user = User::staticGet('id', $flink->user_id);
 192                         subs_subscribe_to($user, $friend_user);
 193                         common_debug("Twitter bridge - subscribed $friend_user->nickname to $user->nickname.");
 194                 }
 195         }
 196
 197         return true;
 198 }
 199