Twitter integration - Oh look, a Twitter settings tab.
darcs-hash:20080822034157-462f3-398e2ba92d9c38520ea6518c3ff614b41f3cc7ec.gz
This commit is contained in:
parent
87305c1022
commit
a90b556e21
132
actions/twittersettings.php
Normal file
132
actions/twittersettings.php
Normal file
|
@ -0,0 +1,132 @@
|
|||
<?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/>.
|
||||
*/
|
||||
|
||||
if (!defined('LACONICA')) { exit(1); }
|
||||
|
||||
require_once(INSTALLDIR.'/lib/settingsaction.php');
|
||||
|
||||
class TwittersettingsAction extends SettingsAction {
|
||||
|
||||
function get_instructions() {
|
||||
return _('Enter your Twitter credentials to automatically send your notices to Twitter, ' .
|
||||
'and subscribe to Twitter friends already here.');
|
||||
}
|
||||
|
||||
function show_form($msg=NULL, $success=false) {
|
||||
$user = common_current_user();
|
||||
$profile = $user->getProfile();
|
||||
|
||||
$this->form_header(_('Twitter settings'), $msg, $success);
|
||||
|
||||
common_element_start('form', array('method' => 'post',
|
||||
'id' => 'twittersettings',
|
||||
'action' =>
|
||||
common_local_url('twittersettings')));
|
||||
|
||||
common_input('twitter_username', _('Twitter Username'),
|
||||
($this->arg('twitter_username')) ? $this->arg('twitter_username') : $profile->nickname,
|
||||
_('No spaces, please.')); // hey, it's what Twitter says
|
||||
|
||||
common_password('twitter_password', _('Twitter Password'));
|
||||
|
||||
// these checkboxes don't do anything yet
|
||||
|
||||
common_checkbox('repost', _('Automatically send my notices to Twitter.'), true);
|
||||
common_checkbox('subscribe_friends', _('Subscribe to my Twitter friends here.'), true);
|
||||
|
||||
common_submit('submit', _('Save'));
|
||||
common_element_end('form');
|
||||
common_show_footer();
|
||||
}
|
||||
|
||||
function handle_post() {
|
||||
|
||||
$twitter_username = $this->trimmed('twitter_username');
|
||||
$twitter_password = $this->trimmed('twitter_password');
|
||||
|
||||
if (!Validate::string($twitter_username, array('min_length' => 1,
|
||||
'max_length' => 64,
|
||||
'format' => VALIDATE_NUM . VALIDATE_ALPHA_LOWER))) {
|
||||
$this->show_form(_('Username must have only lowercase letters and numbers and no spaces.'));
|
||||
return;
|
||||
}
|
||||
|
||||
if (!$this->verify_credentials($twitter_username, $twitter_password)) {
|
||||
$this->show_form(_('Could not verify your Twitter credentials!'));
|
||||
return;
|
||||
}
|
||||
|
||||
|
||||
$user = common_current_user();
|
||||
|
||||
$this->show_form(_('Twitter settings saved.'), true);
|
||||
|
||||
|
||||
}
|
||||
|
||||
function verify_credentials($user, $password) {
|
||||
|
||||
$uri = 'http://twitter.com/account/verify_credentials.json';
|
||||
$data = $this->get_twitter_data($uri, $user, $password);
|
||||
|
||||
if (!$data) {
|
||||
return false;
|
||||
}
|
||||
|
||||
$creds = json_decode($data);
|
||||
|
||||
if (!$creds) {
|
||||
return false;
|
||||
}
|
||||
|
||||
if ($creds->authorized == 1) {
|
||||
return true;
|
||||
}
|
||||
|
||||
return false;
|
||||
}
|
||||
|
||||
// PHP's cURL the best thing to use here? -- Zach
|
||||
function get_twitter_data($uri, $user, $password) {
|
||||
$options = array(
|
||||
CURLOPT_USERPWD => "$user:$password",
|
||||
CURLOPT_RETURNTRANSFER => true,
|
||||
CURLOPT_FAILONERROR => true,
|
||||
CURLOPT_HEADER => false,
|
||||
CURLOPT_FOLLOWLOCATION => true,
|
||||
// CURLOPT_USERAGENT => "identi.ca",
|
||||
CURLOPT_CONNECTTIMEOUT => 120,
|
||||
CURLOPT_TIMEOUT => 120
|
||||
);
|
||||
|
||||
$ch = curl_init($uri);
|
||||
curl_setopt_array($ch, $options);
|
||||
$data = curl_exec($ch);
|
||||
$errmsg = curl_error($ch);
|
||||
|
||||
if ($errmsg) {
|
||||
common_debug("cURL error: $errmsg - trying to load: $uri with user $user.", __FILE__);
|
||||
}
|
||||
|
||||
curl_close($ch);
|
||||
return $data;
|
||||
}
|
||||
|
||||
|
||||
}
|
|
@ -45,6 +45,7 @@ RewriteRule ^settings/openid$ index.php?action=openidsettings [L,QSA]
|
|||
RewriteRule ^settings/im$ index.php?action=imsettings [L,QSA]
|
||||
RewriteRule ^settings/email$ index.php?action=emailsettings [L,QSA]
|
||||
RewriteRule ^settings/sms$ index.php?action=smssettings [L,QSA]
|
||||
RewriteRule ^settings/twitter$ index.php?action=twittersettings [L,QSA]
|
||||
|
||||
RewriteRule ^search/people$ index.php?action=peoplesearch [L,QSA]
|
||||
RewriteRule ^search/notice$ index.php?action=noticesearch [L,QSA]
|
||||
|
|
|
@ -100,7 +100,10 @@ class SettingsAction extends Action {
|
|||
_('Updates by SMS')),
|
||||
'imsettings' =>
|
||||
array(_('IM'),
|
||||
_('Updates by instant messenger (IM)')));
|
||||
_('Updates by instant messenger (IM)')),
|
||||
'twittersettings' =>
|
||||
array(_('Twitter'),
|
||||
_('Twitter integration options')));
|
||||
|
||||
$action = $this->trimmed('action');
|
||||
common_element_start('ul', array('id' => 'nav_views'));
|
||||
|
|
|
@ -848,6 +848,8 @@ function common_fancy_url($action, $args=NULL) {
|
|||
return common_path('settings/openid');
|
||||
case 'smssettings':
|
||||
return common_path('settings/sms');
|
||||
case 'twittersettings':
|
||||
return common_path('settings/twitter');
|
||||
case 'newnotice':
|
||||
if ($args && $args['replyto']) {
|
||||
return common_path('notice/new?replyto='.$args['replyto']);
|
||||
|
|
Loading…
Reference in New Issue
Block a user