forked from GNUsocial/gnu-social
108 lines
2.8 KiB
PHP
Executable File
108 lines
2.8 KiB
PHP
Executable File
#!/usr/bin/env php
|
|
<?php
|
|
/*
|
|
* StatusNet - a distributed open-source microblogging tool
|
|
* Copyright (C) 2008, 2009, StatusNet, 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/>.
|
|
*/
|
|
|
|
define('INSTALLDIR', realpath(dirname(__FILE__) . '/../..'));
|
|
|
|
require_once INSTALLDIR . '/extlib/OAuth.php';
|
|
|
|
$shortoptions = 't:s:';
|
|
$longoptions = array('oauth_token=', 'oauth_token_secret=');
|
|
|
|
$helptext = <<<END_OF_VERIFY_HELP
|
|
oauth_verify_creds.php [options]
|
|
Access /api/account/verify_credentials.xml with OAuth
|
|
|
|
-t --oauth_token access token
|
|
-s --oauth_token_secret access token secret
|
|
|
|
END_OF_VERIFY_HELP;
|
|
|
|
$token = null;
|
|
$token_secret = null;
|
|
|
|
require_once INSTALLDIR . '/scripts/commandline.inc';
|
|
|
|
if (have_option('t', 'oauth_token')) {
|
|
$token = get_option_value('t', 'oauth_token');
|
|
}
|
|
|
|
if (have_option('s', 'token_secret')) {
|
|
$token_secret = get_option_value('s', 'oauth_token_secret');
|
|
}
|
|
|
|
if (empty($token)) {
|
|
print "Please specify an access token (--help for help).\n";
|
|
exit(1);
|
|
}
|
|
|
|
if (empty($token_secret)) {
|
|
print "Please specify an access token secret (--help for help).\n";
|
|
exit(1);
|
|
}
|
|
|
|
$ini = parse_ini_file("oauth.ini");
|
|
$consumer = new OAuthConsumer($ini['consumer_key'], $ini['consumer_secret']);
|
|
$endpoint = $ini['apiroot'] . '/account/verify_credentials.xml';
|
|
|
|
$atok = new OAuthToken($token, $token_secret);
|
|
$parsed = parse_url($endpoint);
|
|
|
|
parse_str($parsed['query'], $params);
|
|
|
|
try {
|
|
|
|
$hmac_method = new OAuthSignatureMethod_HMAC_SHA1();
|
|
|
|
$oauthReq = OAuthRequest::from_consumer_and_token(
|
|
$consumer,
|
|
$atok,
|
|
"GET",
|
|
$endpoint,
|
|
$params
|
|
);
|
|
|
|
$oauthReq->sign_request($hmac_method, $consumer, $atok);
|
|
|
|
$httpReq = httpRequest($oauthReq->to_url());
|
|
|
|
} catch (Exception $e) {
|
|
print "Error! HTTP response body: " . $httpReq->getBody();
|
|
exit(1);
|
|
}
|
|
|
|
print $httpReq->getBody();
|
|
|
|
function httpRequest($url)
|
|
{
|
|
$request = HTTPClient::start();
|
|
|
|
$request->setConfig(
|
|
array(
|
|
'follow_redirects' => true,
|
|
'connect_timeout' => 120,
|
|
'timeout' => 120,
|
|
'ssl_verify_peer' => false,
|
|
'ssl_verify_host' => false
|
|
)
|
|
);
|
|
|
|
return $request->get($url);
|
|
}
|