From: zach <zach@controlyourself.ca>
Date: Fri, 22 Aug 2008 03:41:57 +0000 (-0400)
Subject: Twitter integration - Oh look, a Twitter settings tab.
X-Git-Url: https://git.mxchange.org/?a=commitdiff_plain;h=a90b556e214aca4023898a811a86e1a6864f68a9;p=quix0rs-gnu-social.git
Twitter integration - Oh look, a Twitter settings tab.
darcs-hash:20080822034157-462f3-398e2ba92d9c38520ea6518c3ff614b41f3cc7ec.gz
---
diff --git a/actions/twittersettings.php b/actions/twittersettings.php
new file mode 100644
index 0000000000..95649f7066
--- /dev/null
+++ b/actions/twittersettings.php
@@ -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;
+ }
+
+
+}
\ No newline at end of file
diff --git a/htaccess.sample b/htaccess.sample
index 364c35b079..d45b119d13 100644
--- a/htaccess.sample
+++ b/htaccess.sample
@@ -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]
diff --git a/lib/settingsaction.php b/lib/settingsaction.php
index 33fec0f1dc..9aa5247d9d 100644
--- a/lib/settingsaction.php
+++ b/lib/settingsaction.php
@@ -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'));
diff --git a/lib/util.php b/lib/util.php
index f0aabfa29d..0ac679afc8 100644
--- a/lib/util.php
+++ b/lib/util.php
@@ -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']);