From ca1b8a267da429de1fffa6207e76f0713e1536c7 Mon Sep 17 00:00:00 2001
From: Tobias Diekershoff <tobias.diekershoff@gmx.net>
Date: Tue, 8 Feb 2011 15:17:41 +0100
Subject: [PATCH] post to StatusNet addon for Friendika
---
addon/statusnet/OAuth.php | 874 ++++++++++++++++++++++++
addon/statusnet/signinwithstatusnet.png | Bin 0 -> 5808 bytes
addon/statusnet/slinky.php | 704 +++++++++++++++++++
addon/statusnet/statusnet.css | 67 ++
addon/statusnet/statusnet.php | 243 +++++++
addon/statusnet/twitteroauth.php | 245 +++++++
6 files changed, 2133 insertions(+)
create mode 100644 addon/statusnet/OAuth.php
create mode 100644 addon/statusnet/signinwithstatusnet.png
create mode 100644 addon/statusnet/slinky.php
create mode 100644 addon/statusnet/statusnet.css
create mode 100644 addon/statusnet/statusnet.php
create mode 100644 addon/statusnet/twitteroauth.php
diff --git a/addon/statusnet/OAuth.php b/addon/statusnet/OAuth.php
new file mode 100644
index 0000000000..67a94c4790
--- /dev/null
+++ b/addon/statusnet/OAuth.php
@@ -0,0 +1,874 @@
+<?php
+// vim: foldmethod=marker
+
+/* Generic exception class
+ */
+class OAuthException extends Exception {
+ // pass
+}
+
+class OAuthConsumer {
+ public $key;
+ public $secret;
+
+ function __construct($key, $secret, $callback_url=NULL) {
+ $this->key = $key;
+ $this->secret = $secret;
+ $this->callback_url = $callback_url;
+ }
+
+ function __toString() {
+ return "OAuthConsumer[key=$this->key,secret=$this->secret]";
+ }
+}
+
+class OAuthToken {
+ // access tokens and request tokens
+ public $key;
+ public $secret;
+
+ /**
+ * key = the token
+ * secret = the token secret
+ */
+ function __construct($key, $secret) {
+ $this->key = $key;
+ $this->secret = $secret;
+ }
+
+ /**
+ * generates the basic string serialization of a token that a server
+ * would respond to request_token and access_token calls with
+ */
+ function to_string() {
+ return "oauth_token=" .
+ OAuthUtil::urlencode_rfc3986($this->key) .
+ "&oauth_token_secret=" .
+ OAuthUtil::urlencode_rfc3986($this->secret);
+ }
+
+ function __toString() {
+ return $this->to_string();
+ }
+}
+
+/**
+ * A class for implementing a Signature Method
+ * See section 9 ("Signing Requests") in the spec
+ */
+abstract class OAuthSignatureMethod {
+ /**
+ * Needs to return the name of the Signature Method (ie HMAC-SHA1)
+ * @return string
+ */
+ abstract public function get_name();
+
+ /**
+ * Build up the signature
+ * NOTE: The output of this function MUST NOT be urlencoded.
+ * the encoding is handled in OAuthRequest when the final
+ * request is serialized
+ * @param OAuthRequest $request
+ * @param OAuthConsumer $consumer
+ * @param OAuthToken $token
+ * @return string
+ */
+ abstract public function build_signature($request, $consumer, $token);
+
+ /**
+ * Verifies that a given signature is correct
+ * @param OAuthRequest $request
+ * @param OAuthConsumer $consumer
+ * @param OAuthToken $token
+ * @param string $signature
+ * @return bool
+ */
+ public function check_signature($request, $consumer, $token, $signature) {
+ $built = $this->build_signature($request, $consumer, $token);
+ return $built == $signature;
+ }
+}
+
+/**
+ * The HMAC-SHA1 signature method uses the HMAC-SHA1 signature algorithm as defined in [RFC2104]
+ * where the Signature Base String is the text and the key is the concatenated values (each first
+ * encoded per Parameter Encoding) of the Consumer Secret and Token Secret, separated by an '&'
+ * character (ASCII code 38) even if empty.
+ * - Chapter 9.2 ("HMAC-SHA1")
+ */
+class OAuthSignatureMethod_HMAC_SHA1 extends OAuthSignatureMethod {
+ function get_name() {
+ return "HMAC-SHA1";
+ }
+
+ public function build_signature($request, $consumer, $token) {
+ $base_string = $request->get_signature_base_string();
+ $request->base_string = $base_string;
+
+ $key_parts = array(
+ $consumer->secret,
+ ($token) ? $token->secret : ""
+ );
+
+ $key_parts = OAuthUtil::urlencode_rfc3986($key_parts);
+ $key = implode('&', $key_parts);
+
+ return base64_encode(hash_hmac('sha1', $base_string, $key, true));
+ }
+}
+
+/**
+ * The PLAINTEXT method does not provide any security protection and SHOULD only be used
+ * over a secure channel such as HTTPS. It does not use the Signature Base String.
+ * - Chapter 9.4 ("PLAINTEXT")
+ */
+class OAuthSignatureMethod_PLAINTEXT extends OAuthSignatureMethod {
+ public function get_name() {
+ return "PLAINTEXT";
+ }
+
+ /**
+ * oauth_signature is set to the concatenated encoded values of the Consumer Secret and
+ * Token Secret, separated by a '&' character (ASCII code 38), even if either secret is
+ * empty. The result MUST be encoded again.
+ * - Chapter 9.4.1 ("Generating Signatures")
+ *
+ * Please note that the second encoding MUST NOT happen in the SignatureMethod, as
+ * OAuthRequest handles this!
+ */
+ public function build_signature($request, $consumer, $token) {
+ $key_parts = array(
+ $consumer->secret,
+ ($token) ? $token->secret : ""
+ );
+
+ $key_parts = OAuthUtil::urlencode_rfc3986($key_parts);
+ $key = implode('&', $key_parts);
+ $request->base_string = $key;
+
+ return $key;
+ }
+}
+
+/**
+ * The RSA-SHA1 signature method uses the RSASSA-PKCS1-v1_5 signature algorithm as defined in
+ * [RFC3447] section 8.2 (more simply known as PKCS#1), using SHA-1 as the hash function for
+ * EMSA-PKCS1-v1_5. It is assumed that the Consumer has provided its RSA public key in a
+ * verified way to the Service Provider, in a manner which is beyond the scope of this
+ * specification.
+ * - Chapter 9.3 ("RSA-SHA1")
+ */
+abstract class OAuthSignatureMethod_RSA_SHA1 extends OAuthSignatureMethod {
+ public function get_name() {
+ return "RSA-SHA1";
+ }
+
+ // Up to the SP to implement this lookup of keys. Possible ideas are:
+ // (1) do a lookup in a table of trusted certs keyed off of consumer
+ // (2) fetch via http using a url provided by the requester
+ // (3) some sort of specific discovery code based on request
+ //
+ // Either way should return a string representation of the certificate
+ protected abstract function fetch_public_cert(&$request);
+
+ // Up to the SP to implement this lookup of keys. Possible ideas are:
+ // (1) do a lookup in a table of trusted certs keyed off of consumer
+ //
+ // Either way should return a string representation of the certificate
+ protected abstract function fetch_private_cert(&$request);
+
+ public function build_signature($request, $consumer, $token) {
+ $base_string = $request->get_signature_base_string();
+ $request->base_string = $base_string;
+
+ // Fetch the private key cert based on the request
+ $cert = $this->fetch_private_cert($request);
+
+ // Pull the private key ID from the certificate
+ $privatekeyid = openssl_get_privatekey($cert);
+
+ // Sign using the key
+ $ok = openssl_sign($base_string, $signature, $privatekeyid);
+
+ // Release the key resource
+ openssl_free_key($privatekeyid);
+
+ return base64_encode($signature);
+ }
+
+ public function check_signature($request, $consumer, $token, $signature) {
+ $decoded_sig = base64_decode($signature);
+
+ $base_string = $request->get_signature_base_string();
+
+ // Fetch the public key cert based on the request
+ $cert = $this->fetch_public_cert($request);
+
+ // Pull the public key ID from the certificate
+ $publickeyid = openssl_get_publickey($cert);
+
+ // Check the computed signature against the one passed in the query
+ $ok = openssl_verify($base_string, $decoded_sig, $publickeyid);
+
+ // Release the key resource
+ openssl_free_key($publickeyid);
+
+ return $ok == 1;
+ }
+}
+
+class OAuthRequest {
+ private $parameters;
+ private $http_method;
+ private $http_url;
+ // for debug purposes
+ public $base_string;
+ public static $version = '1.0';
+ public static $POST_INPUT = 'php://input';
+
+ function __construct($http_method, $http_url, $parameters=NULL) {
+ @$parameters or $parameters = array();
+ $parameters = array_merge( OAuthUtil::parse_parameters(parse_url($http_url, PHP_URL_QUERY)), $parameters);
+ $this->parameters = $parameters;
+ $this->http_method = $http_method;
+ $this->http_url = $http_url;
+ }
+
+
+ /**
+ * attempt to build up a request from what was passed to the server
+ */
+ public static function from_request($http_method=NULL, $http_url=NULL, $parameters=NULL) {
+ $scheme = (!isset($_SERVER['HTTPS']) || $_SERVER['HTTPS'] != "on")
+ ? 'http'
+ : 'https';
+ @$http_url or $http_url = $scheme .
+ '://' . $_SERVER['HTTP_HOST'] .
+ ':' .
+ $_SERVER['SERVER_PORT'] .
+ $_SERVER['REQUEST_URI'];
+ @$http_method or $http_method = $_SERVER['REQUEST_METHOD'];
+
+ // We weren't handed any parameters, so let's find the ones relevant to
+ // this request.
+ // If you run XML-RPC or similar you should use this to provide your own
+ // parsed parameter-list
+ if (!$parameters) {
+ // Find request headers
+ $request_headers = OAuthUtil::get_headers();
+
+ // Parse the query-string to find GET parameters
+ $parameters = OAuthUtil::parse_parameters($_SERVER['QUERY_STRING']);
+
+ // It's a POST request of the proper content-type, so parse POST
+ // parameters and add those overriding any duplicates from GET
+ if ($http_method == "POST"
+ && @strstr($request_headers["Content-Type"],
+ "application/x-www-form-urlencoded")
+ ) {
+ $post_data = OAuthUtil::parse_parameters(
+ file_get_contents(self::$POST_INPUT)
+ );
+ $parameters = array_merge($parameters, $post_data);
+ }
+
+ // We have a Authorization-header with OAuth data. Parse the header
+ // and add those overriding any duplicates from GET or POST
+ if (@substr($request_headers['Authorization'], 0, 6) == "OAuth ") {
+ $header_parameters = OAuthUtil::split_header(
+ $request_headers['Authorization']
+ );
+ $parameters = array_merge($parameters, $header_parameters);
+ }
+
+ }
+
+ return new OAuthRequest($http_method, $http_url, $parameters);
+ }
+
+ /**
+ * pretty much a helper function to set up the request
+ */
+ public static function from_consumer_and_token($consumer, $token, $http_method, $http_url, $parameters=NULL) {
+ @$parameters or $parameters = array();
+ $defaults = array("oauth_version" => OAuthRequest::$version,
+ "oauth_nonce" => OAuthRequest::generate_nonce(),
+ "oauth_timestamp" => OAuthRequest::generate_timestamp(),
+ "oauth_consumer_key" => $consumer->key);
+ if ($token)
+ $defaults['oauth_token'] = $token->key;
+
+ $parameters = array_merge($defaults, $parameters);
+
+ return new OAuthRequest($http_method, $http_url, $parameters);
+ }
+
+ public function set_parameter($name, $value, $allow_duplicates = true) {
+ if ($allow_duplicates && isset($this->parameters[$name])) {
+ // We have already added parameter(s) with this name, so add to the list
+ if (is_scalar($this->parameters[$name])) {
+ // This is the first duplicate, so transform scalar (string)
+ // into an array so we can add the duplicates
+ $this->parameters[$name] = array($this->parameters[$name]);
+ }
+
+ $this->parameters[$name][] = $value;
+ } else {
+ $this->parameters[$name] = $value;
+ }
+ }
+
+ public function get_parameter($name) {
+ return isset($this->parameters[$name]) ? $this->parameters[$name] : null;
+ }
+
+ public function get_parameters() {
+ return $this->parameters;
+ }
+
+ public function unset_parameter($name) {
+ unset($this->parameters[$name]);
+ }
+
+ /**
+ * The request parameters, sorted and concatenated into a normalized string.
+ * @return string
+ */
+ public function get_signable_parameters() {
+ // Grab all parameters
+ $params = $this->parameters;
+
+ // Remove oauth_signature if present
+ // Ref: Spec: 9.1.1 ("The oauth_signature parameter MUST be excluded.")
+ if (isset($params['oauth_signature'])) {
+ unset($params['oauth_signature']);
+ }
+
+ return OAuthUtil::build_http_query($params);
+ }
+
+ /**
+ * Returns the base string of this request
+ *
+ * The base string defined as the method, the url
+ * and the parameters (normalized), each urlencoded
+ * and the concated with &.
+ */
+ public function get_signature_base_string() {
+ $parts = array(
+ $this->get_normalized_http_method(),
+ $this->get_normalized_http_url(),
+ $this->get_signable_parameters()
+ );
+
+ $parts = OAuthUtil::urlencode_rfc3986($parts);
+
+ return implode('&', $parts);
+ }
+
+ /**
+ * just uppercases the http method
+ */
+ public function get_normalized_http_method() {
+ return strtoupper($this->http_method);
+ }
+
+ /**
+ * parses the url and rebuilds it to be
+ * scheme://host/path
+ */
+ public function get_normalized_http_url() {
+ $parts = parse_url($this->http_url);
+
+ $port = @$parts['port'];
+ $scheme = $parts['scheme'];
+ $host = $parts['host'];
+ $path = @$parts['path'];
+
+ $port or $port = ($scheme == 'https') ? '443' : '80';
+
+ if (($scheme == 'https' && $port != '443')
+ || ($scheme == 'http' && $port != '80')) {
+ $host = "$host:$port";
+ }
+ return "$scheme://$host$path";
+ }
+
+ /**
+ * builds a url usable for a GET request
+ */
+ public function to_url() {
+ $post_data = $this->to_postdata();
+ $out = $this->get_normalized_http_url();
+ if ($post_data) {
+ $out .= '?'.$post_data;
+ }
+ return $out;
+ }
+
+ /**
+ * builds the data one would send in a POST request
+ */
+ public function to_postdata() {
+ return OAuthUtil::build_http_query($this->parameters);
+ }
+
+ /**
+ * builds the Authorization: header
+ */
+ public function to_header($realm=null) {
+ $first = true;
+ if($realm) {
+ $out = 'Authorization: OAuth realm="' . OAuthUtil::urlencode_rfc3986($realm) . '"';
+ $first = false;
+ } else
+ $out = 'Authorization: OAuth';
+
+ $total = array();
+ foreach ($this->parameters as $k => $v) {
+ if (substr($k, 0, 5) != "oauth") continue;
+ if (is_array($v)) {
+ throw new OAuthException('Arrays not supported in headers');
+ }
+ $out .= ($first) ? ' ' : ',';
+ $out .= OAuthUtil::urlencode_rfc3986($k) .
+ '="' .
+ OAuthUtil::urlencode_rfc3986($v) .
+ '"';
+ $first = false;
+ }
+ return $out;
+ }
+
+ public function __toString() {
+ return $this->to_url();
+ }
+
+
+ public function sign_request($signature_method, $consumer, $token) {
+ $this->set_parameter(
+ "oauth_signature_method",
+ $signature_method->get_name(),
+ false
+ );
+ $signature = $this->build_signature($signature_method, $consumer, $token);
+ $this->set_parameter("oauth_signature", $signature, false);
+ }
+
+ public function build_signature($signature_method, $consumer, $token) {
+ $signature = $signature_method->build_signature($this, $consumer, $token);
+ return $signature;
+ }
+
+ /**
+ * util function: current timestamp
+ */
+ private static function generate_timestamp() {
+ return time();
+ }
+
+ /**
+ * util function: current nonce
+ */
+ private static function generate_nonce() {
+ $mt = microtime();
+ $rand = mt_rand();
+
+ return md5($mt . $rand); // md5s look nicer than numbers
+ }
+}
+
+class OAuthServer {
+ protected $timestamp_threshold = 300; // in seconds, five minutes
+ protected $version = '1.0'; // hi blaine
+ protected $signature_methods = array();
+
+ protected $data_store;
+
+ function __construct($data_store) {
+ $this->data_store = $data_store;
+ }
+
+ public function add_signature_method($signature_method) {
+ $this->signature_methods[$signature_method->get_name()] =
+ $signature_method;
+ }
+
+ // high level functions
+
+ /**
+ * process a request_token request
+ * returns the request token on success
+ */
+ public function fetch_request_token(&$request) {
+ $this->get_version($request);
+
+ $consumer = $this->get_consumer($request);
+
+ // no token required for the initial token request
+ $token = NULL;
+
+ $this->check_signature($request, $consumer, $token);
+
+ // Rev A change
+ $callback = $request->get_parameter('oauth_callback');
+ $new_token = $this->data_store->new_request_token($consumer, $callback);
+
+ return $new_token;
+ }
+
+ /**
+ * process an access_token request
+ * returns the access token on success
+ */
+ public function fetch_access_token(&$request) {
+ $this->get_version($request);
+
+ $consumer = $this->get_consumer($request);
+
+ // requires authorized request token
+ $token = $this->get_token($request, $consumer, "request");
+
+ $this->check_signature($request, $consumer, $token);
+
+ // Rev A change
+ $verifier = $request->get_parameter('oauth_verifier');
+ $new_token = $this->data_store->new_access_token($token, $consumer, $verifier);
+
+ return $new_token;
+ }
+
+ /**
+ * verify an api call, checks all the parameters
+ */
+ public function verify_request(&$request) {
+ $this->get_version($request);
+ $consumer = $this->get_consumer($request);
+ $token = $this->get_token($request, $consumer, "access");
+ $this->check_signature($request, $consumer, $token);
+ return array($consumer, $token);
+ }
+
+ // Internals from here
+ /**
+ * version 1
+ */
+ private function get_version(&$request) {
+ $version = $request->get_parameter("oauth_version");
+ if (!$version) {
+ // Service Providers MUST assume the protocol version to be 1.0 if this parameter is not present.
+ // Chapter 7.0 ("Accessing Protected Ressources")
+ $version = '1.0';
+ }
+ if ($version !== $this->version) {
+ throw new OAuthException("OAuth version '$version' not supported");
+ }
+ return $version;
+ }
+
+ /**
+ * figure out the signature with some defaults
+ */
+ private function get_signature_method(&$request) {
+ $signature_method =
+ @$request->get_parameter("oauth_signature_method");
+
+ if (!$signature_method) {
+ // According to chapter 7 ("Accessing Protected Ressources") the signature-method
+ // parameter is required, and we can't just fallback to PLAINTEXT
+ throw new OAuthException('No signature method parameter. This parameter is required');
+ }
+
+ if (!in_array($signature_method,
+ array_keys($this->signature_methods))) {
+ throw new OAuthException(
+ "Signature method '$signature_method' not supported " .
+ "try one of the following: " .
+ implode(", ", array_keys($this->signature_methods))
+ );
+ }
+ return $this->signature_methods[$signature_method];
+ }
+
+ /**
+ * try to find the consumer for the provided request's consumer key
+ */
+ private function get_consumer(&$request) {
+ $consumer_key = @$request->get_parameter("oauth_consumer_key");
+ if (!$consumer_key) {
+ throw new OAuthException("Invalid consumer key");
+ }
+
+ $consumer = $this->data_store->lookup_consumer($consumer_key);
+ if (!$consumer) {
+ throw new OAuthException("Invalid consumer");
+ }
+
+ return $consumer;
+ }
+
+ /**
+ * try to find the token for the provided request's token key
+ */
+ private function get_token(&$request, $consumer, $token_type="access") {
+ $token_field = @$request->get_parameter('oauth_token');
+ $token = $this->data_store->lookup_token(
+ $consumer, $token_type, $token_field
+ );
+ if (!$token) {
+ throw new OAuthException("Invalid $token_type token: $token_field");
+ }
+ return $token;
+ }
+
+ /**
+ * all-in-one function to check the signature on a request
+ * should guess the signature method appropriately
+ */
+ private function check_signature(&$request, $consumer, $token) {
+ // this should probably be in a different method
+ $timestamp = @$request->get_parameter('oauth_timestamp');
+ $nonce = @$request->get_parameter('oauth_nonce');
+
+ $this->check_timestamp($timestamp);
+ $this->check_nonce($consumer, $token, $nonce, $timestamp);
+
+ $signature_method = $this->get_signature_method($request);
+
+ $signature = $request->get_parameter('oauth_signature');
+ $valid_sig = $signature_method->check_signature(
+ $request,
+ $consumer,
+ $token,
+ $signature
+ );
+
+ if (!$valid_sig) {
+ throw new OAuthException("Invalid signature");
+ }
+ }
+
+ /**
+ * check that the timestamp is new enough
+ */
+ private function check_timestamp($timestamp) {
+ if( ! $timestamp )
+ throw new OAuthException(
+ 'Missing timestamp parameter. The parameter is required'
+ );
+
+ // verify that timestamp is recentish
+ $now = time();
+ if (abs($now - $timestamp) > $this->timestamp_threshold) {
+ throw new OAuthException(
+ "Expired timestamp, yours $timestamp, ours $now"
+ );
+ }
+ }
+
+ /**
+ * check that the nonce is not repeated
+ */
+ private function check_nonce($consumer, $token, $nonce, $timestamp) {
+ if( ! $nonce )
+ throw new OAuthException(
+ 'Missing nonce parameter. The parameter is required'
+ );
+
+ // verify that the nonce is uniqueish
+ $found = $this->data_store->lookup_nonce(
+ $consumer,
+ $token,
+ $nonce,
+ $timestamp
+ );
+ if ($found) {
+ throw new OAuthException("Nonce already used: $nonce");
+ }
+ }
+
+}
+
+class OAuthDataStore {
+ function lookup_consumer($consumer_key) {
+ // implement me
+ }
+
+ function lookup_token($consumer, $token_type, $token) {
+ // implement me
+ }
+
+ function lookup_nonce($consumer, $token, $nonce, $timestamp) {
+ // implement me
+ }
+
+ function new_request_token($consumer, $callback = null) {
+ // return a new token attached to this consumer
+ }
+
+ function new_access_token($token, $consumer, $verifier = null) {
+ // return a new access token attached to this consumer
+ // for the user associated with this token if the request token
+ // is authorized
+ // should also invalidate the request token
+ }
+
+}
+
+class OAuthUtil {
+ public static function urlencode_rfc3986($input) {
+ if (is_array($input)) {
+ return array_map(array('OAuthUtil', 'urlencode_rfc3986'), $input);
+ } else if (is_scalar($input)) {
+ return str_replace(
+ '+',
+ ' ',
+ str_replace('%7E', '~', rawurlencode($input))
+ );
+ } else {
+ return '';
+ }
+}
+
+
+ // This decode function isn't taking into consideration the above
+ // modifications to the encoding process. However, this method doesn't
+ // seem to be used anywhere so leaving it as is.
+ public static function urldecode_rfc3986($string) {
+ return urldecode($string);
+ }
+
+ // Utility function for turning the Authorization: header into
+ // parameters, has to do some unescaping
+ // Can filter out any non-oauth parameters if needed (default behaviour)
+ public static function split_header($header, $only_allow_oauth_parameters = true) {
+ $pattern = '/(([-_a-z]*)=("([^"]*)"|([^,]*)),?)/';
+ $offset = 0;
+ $params = array();
+ while (preg_match($pattern, $header, $matches, PREG_OFFSET_CAPTURE, $offset) > 0) {
+ $match = $matches[0];
+ $header_name = $matches[2][0];
+ $header_content = (isset($matches[5])) ? $matches[5][0] : $matches[4][0];
+ if (preg_match('/^oauth_/', $header_name) || !$only_allow_oauth_parameters) {
+ $params[$header_name] = OAuthUtil::urldecode_rfc3986($header_content);
+ }
+ $offset = $match[1] + strlen($match[0]);
+ }
+
+ if (isset($params['realm'])) {
+ unset($params['realm']);
+ }
+
+ return $params;
+ }
+
+ // helper to try to sort out headers for people who aren't running apache
+ public static function get_headers() {
+ if (function_exists('apache_request_headers')) {
+ // we need this to get the actual Authorization: header
+ // because apache tends to tell us it doesn't exist
+ $headers = apache_request_headers();
+
+ // sanitize the output of apache_request_headers because
+ // we always want the keys to be Cased-Like-This and arh()
+ // returns the headers in the same case as they are in the
+ // request
+ $out = array();
+ foreach( $headers AS $key => $value ) {
+ $key = str_replace(
+ " ",
+ "-",
+ ucwords(strtolower(str_replace("-", " ", $key)))
+ );
+ $out[$key] = $value;
+ }
+ } else {
+ // otherwise we don't have apache and are just going to have to hope
+ // that $_SERVER actually contains what we need
+ $out = array();
+ if( isset($_SERVER['CONTENT_TYPE']) )
+ $out['Content-Type'] = $_SERVER['CONTENT_TYPE'];
+ if( isset($_ENV['CONTENT_TYPE']) )
+ $out['Content-Type'] = $_ENV['CONTENT_TYPE'];
+
+ foreach ($_SERVER as $key => $value) {
+ if (substr($key, 0, 5) == "HTTP_") {
+ // this is chaos, basically it is just there to capitalize the first
+ // letter of every word that is not an initial HTTP and strip HTTP
+ // code from przemek
+ $key = str_replace(
+ " ",
+ "-",
+ ucwords(strtolower(str_replace("_", " ", substr($key, 5))))
+ );
+ $out[$key] = $value;
+ }
+ }
+ }
+ return $out;
+ }
+
+ // This function takes a input like a=b&a=c&d=e and returns the parsed
+ // parameters like this
+ // array('a' => array('b','c'), 'd' => 'e')
+ public static function parse_parameters( $input ) {
+ if (!isset($input) || !$input) return array();
+
+ $pairs = explode('&', $input);
+
+ $parsed_parameters = array();
+ foreach ($pairs as $pair) {
+ $split = explode('=', $pair, 2);
+ $parameter = OAuthUtil::urldecode_rfc3986($split[0]);
+ $value = isset($split[1]) ? OAuthUtil::urldecode_rfc3986($split[1]) : '';
+
+ if (isset($parsed_parameters[$parameter])) {
+ // We have already recieved parameter(s) with this name, so add to the list
+ // of parameters with this name
+
+ if (is_scalar($parsed_parameters[$parameter])) {
+ // This is the first duplicate, so transform scalar (string) into an array
+ // so we can add the duplicates
+ $parsed_parameters[$parameter] = array($parsed_parameters[$parameter]);
+ }
+
+ $parsed_parameters[$parameter][] = $value;
+ } else {
+ $parsed_parameters[$parameter] = $value;
+ }
+ }
+ return $parsed_parameters;
+ }
+
+ public static function build_http_query($params) {
+ if (!$params) return '';
+
+ // Urlencode both keys and values
+ $keys = OAuthUtil::urlencode_rfc3986(array_keys($params));
+ $values = OAuthUtil::urlencode_rfc3986(array_values($params));
+ $params = array_combine($keys, $values);
+
+ // Parameters are sorted by name, using lexicographical byte value ordering.
+ // Ref: Spec: 9.1.1 (1)
+ uksort($params, 'strcmp');
+
+ $pairs = array();
+ foreach ($params as $parameter => $value) {
+ if (is_array($value)) {
+ // If two or more parameters share the same name, they are sorted by their value
+ // Ref: Spec: 9.1.1 (1)
+ natsort($value);
+ foreach ($value as $duplicate_value) {
+ $pairs[] = $parameter . '=' . $duplicate_value;
+ }
+ } else {
+ $pairs[] = $parameter . '=' . $value;
+ }
+ }
+ // For each parameter, the name is separated from the corresponding value by an '=' character (ASCII code 61)
+ // Each name-value pair is separated by an '&' character (ASCII code 38)
+ return implode('&', $pairs);
+ }
+}
+
+?>
diff --git a/addon/statusnet/signinwithstatusnet.png b/addon/statusnet/signinwithstatusnet.png
new file mode 100644
index 0000000000000000000000000000000000000000..a33998d5cf6ddfc7b71a437b7727586f601af976
GIT binary patch
literal 5808
zcmV;h7EkGkP)<h;3K|Lk000e1NJLTq006xJ000;W1^@s6uLk^W00001b5ch_0Itp)
z=>Px#24YJ`L;(K){{a7>y{D4^000SaNLh0L01ejw01ejxLMWSf00007bV*G`2ipP&
z3Ks+fAo!X902VMwL_t(|+U=Wpbe+d_*nczM^1knFz+12pBtQ@VSCKSHiQ=MNqN93I
zB_G$0)JRU_*maY-Ij&WolN`6TW5-DyCuz^IW7SP%Nmd-!wIkNDl*$xEEtE)cktpsf
z2#^FxfY_I}eB1Pox8OYx1Swf|{RihCoNwOD+&g#felG;Tp?&)}`e%QkE&Spa)|!dh
zH+Ub%k*|M)>*M<Pbq}Q!LWm)y)GI=WzXWyx{{26A5`FhGn_2dO4{+q*!Cwenzq4{5
zAl@s`!1Iv0UIKpo6|Rq8>kvXHrBo7l0JtC6cK;8aynFM*pF;dGXrFlT#TUXYEq9~T
zyE-@|1yX<;D7-6dJ^1DSgl1XSU*Y=rP0;>Zg%H1`ulmS+Yt2;ZE)@jVq>)RSdm!iY
zt^FgMneh4NtzrJff(Wu=zfua#wjfZ~seOI?ri{CQwc6L8{n^>TafD`?moc^!IznhD
zRC%r>7@vQAkbzvl@}$YLJsG4BtWKL{9v4C&G@ZU*Y(W~vb#h-HzX>jnP)a5A;#UQ;
zO9JIGI@v?t$UgGU7|qF>h(}ro8MO!$r^Z~)PWn7|ZvzQa^6kT;{O_(wKD{W0i@Lg{
zm?>}&0yWLO62-aqGbSjVr)F^FepRu@m0(VXH`}^vrNd10{Z-!W{i4rIZ*etxy<7Sh
z&$wN$<UJt-qm$jddiX0$<}Q{%apc^O2^lr4Tl6UN(i@1GJ^*JXed;aAg-k%&(yn?b
zr4&+#60q`o00^b<g8)<436vrTf?vsFmEcMt2moCO9N$Ni@>dpg3n2)ULYoFtUP0*m
zARwgc_!V@U4X>-wce+9;DVl2)rkVD>ABv(Rprv>Bg8)rRT;DIiPzos}QV1N+Lzl9A
zx2q|aN<2k{QU{WHnX>`U&#`s?mvFoZK#-0vL6as!6DM)JabA4qi`>5KYqU4q&f0pD
zM|TbqHzXM^;J>X;k@aWL@?r|1?cLq{<j?`mjEt0jo)e4n`!}s+d1E84@AL5=J`KRb
zt5$R0lBMWUzVDje@qHeB{^y(>9R=Vg|MKBkAODvX2Bj3P@AGe-{Xg_gOcY=~^e~gI
z!|OfWfM8wAJmMj%_%MQxKJ^3uH#9WzAMd&wQ`2U}AyA6LeSQ3|1N%AB-&YoxbU4Co
z^XK#62Uej8$(EBR5CRgm&FVSLXxDfzr4+B6?!pZMOikmq`EA!slPl3r2tg18I2G>>
z@XdQaL`x#U3&)S~{k?kt`1?;jh!En6%Bduneh_fDzmE&!;{;0a!H&)<#uq|}64Rqg
zix=MhcR1cSx@PmwRzF5KlmY~S@_BymXCc?eJKg`2x#<n8ueUfh;?fe;`SPk7LfVxz
zWuO$h&z<G3Uw;jNjjgS;CsK?%d7eFbg!AL0EUv3#B$qAk$$K7N5TI+?WoAxQ%hRm+
z)tR(eNwb&6L_SX}6q?cuS8;o0(|j|1qZE1HN3Vc6lFKqMIl*_|+zCKqG|H0tdNe5+
z&Sk1}M&9!<D)vsllLF3<jq#0FwvlyRmNz!?fyO5Ce!$j~$2mSYK+f|Jz<1x=0YG~)
z#ge*u!iF)kJ2dU?S=Z&eZ|=nLeQe#}#^$+%D`K_j`zpV$<W82X{6J>1YVJq--{Ie`
z-$2H3%X0&nNt)v|v${S?De|7jvqz7x>+D$oHng-7HVm|)@>EJuX8MdXz~K1Nf_9nr
zAW^G<K=}pf5;~h!{uR&e{yipgePo?M+F~glY>)DZMYW(C_^yj)82Fh?^@Avd=lksK
z?JXm?p=Caeu_&$|u(+;)h-nl8XCyZ?Gyu>Pixmi_6g$rJaP-n87N*lIs;lG22Mz%6
z;EI*REsO8%dJ`c8>2R18jZN%5-;1ef+|$uX%rq}!S}6o88k>k1CLvuXKr!h!{NU}k
zkV5dlvSoA)4RQ3+C6?6HbMw3wgs5hIr4%onI>pJMK~Rd%+;lVJPM*Kt_cp0;m<N{K
zz=?qYw)b=+h2WDbR<N>Z4z-qzrR(hN?Pd45v*q(PA34P9XS&g)#zz+~sZtmx1_wCO
z-%mUg;_i-4Y+bLSuO9@Q9UUR-7MNt+yjD6>DTIK<b#;v8bGW`=)|vqQlM{S@?;eDJ
zPv5wfp=^fDhYq1hi6JHFNQ8~8tt9L)0N>rU6R+rUI=;u_dv~KtjZZ9JLHF<wdwP2d
z*6ikWh4pXl#LzU>&Yj1KrY0uxd3K!Xp>JXW0W`#7teR7xhwBGryewVk=%s!JGa1~#
zFVB0vk1D#oUZ8ljyNmN<V;EA>nNG8+X$}a%_xJAM^w3aw-{X6BV;Kf(nwwcYrx_{4
z6w{Ao&LD-3>t|_gxEn=v3RBl?LPi|d&oDC4#r)bPmc|7~AAf=qPd!b3c$n0R<*fO$
zuMuu&tdK;3uM{C|%IAN%>l7bfzJi2pQx}a8(sVQ-Q78`f^_9)K<NG}I_FkSpcC4&H
z)-=y$PwzPZZZDeH7fu`pAZnWY<DrA(JdZ#rj`a8O=xujY!7ee%!M=-h6^Wyi;^M?O
zTTY$;U@(&@!}!^e!+d`I25xU#fL?J<-uIbs^8DZ9#{jsay`7$s5w@H>LBh7VWquo5
zPn~32*C`exlZ@qZ?7w({b48ab8MfJf@xoL+qpuIGXudZUO>&7j|NP}`_(6aIdPau%
z*Eg@nsCb(~3{>!s6|m*xF`DBy(in|VYuOlDl8oc9z58^Pb=%(4jpKRTzjPU|_w=y!
z)Jcq@Wp#=|@}2wcCt{jx@9r+|^_AlFo*sfgv9Yz4cP?Bg)8V&QtV97@Pn`t7Hgp=I
zQU3Uae_|}3M-u{FN&=;DgMc6X_Cr;vkIqz@1AP}cGctm&f{HgQ#6=gz$NADfJx9*-
zFg1-pDZC)yj<yB-t2H;Wy}O&d@0IuMICBOe3cRthu?eYZQ%rA}Nfd?b%|!M*wwb76
z5~TwCzyTD79;PN9=C#j#j{etoV5L(uZrs47UAx)#$%k0?H-ANH^{TR=(}ZBn+_}7c
z;XJ)#W9;rd$L`*9#7vXMSe!rFu#viGl&m*p&T^i|xv^2Uo;(G>ZEbC=Zl24Io}Q_P
za~(3SQ{f5-KDBx^yUw0v@A+Q#^!768<S{L~N`U<!AgC~pIoD&t$xjvCG>t!8x1R6p
zEVu&C9y!ALme#U~ELn@TM5?^!NPj;)Bg19fFOHAXH8cpo+;|O+=U18J4XyKOj@R(S
zTYCZc*s>ewOr=SM?W%PG`0PzLv*qLoP7DsPt*eViR<A)fLshsm#G)*3Y-In%i*yf<
z@RhAEV(SLUu+77(R<j_P;>&m5&DXYV1)w1s<B`>?Nrl7cQlmYY;tLyZL6?$A*X7$g
z3f(AAzO{!>-?Wym-o1&hZQF`h^yxppegg^HCKd`+G1-KZuVUh?<8pR%l(Bq)zV|Iz
zN_(o{HcvWv#`F0KX9&WkNkcTsjx#+p#$r{Dm+J>Sv3EB)&!a7o;KPfSka1le-@BWa
zPj}IgO7SOm-o+2z-plcU0RaAB-8vF>nEFU`ie9B7V|FvTw9sXUx4Qm2N(BfcAkd`A
z>Ao%G+z~Wsl8!B*ck5RAcf84*O`G`et1q+hvA^ZcAO8bL$vfZt7Mg9BeJw-Nm|IiB
z!>iZuz|v(bNG7SZEXEy&6N3Z%_4e0reZQ(8><0mtCML@SU0UBjYfUXn>g%V-5U8p>
zmZ38z9;Y^Jm**xOm*6r#^70s=vWC{4O41aMm%oRzSsdT5@*g!JNZ1x_iGp%CK5&Vn
z{g+tN+)UPW>6;j*rx>tzrqYBAy$WX14pSeEmcJXLQ5L4tG{xdr6>DoOi>7#tXed<H
z>RH#TN=52YQXh@-u^X22;EI(jt*<9x+vI$Y-mx*hz2go1AfP@r1<%wqI#Ov`6A5CW
z5M#M4n-3r6Td%!ZW_W;;gF~27qahY8TU#jv?a34ik|}B|8$qSp2Nepss9Y4$VjXCE
zPd9tconthYWl_2g%P^|;hjpEs=e4k>_gs}iQz){o!-0#1tm5h6VZOcd4IbaSyS(P;
zrAs93FqS?QYqTa3w5L;~BH?mUM6bm5&gI|W7yJH*;fYf`xA!wFYk7!}9^+{5GxU$_
zM<5C5aS)QBLx<2Ui-o`Y2=4eeN-5&)3uwCIc6$DCGhQZBW_&3G2|LW9v_@kj%8I5r
z^o@_P<>X0D4Gq#YJjA5yRB2xYxPezT*%8B}#<sAv3Y4csoSKvcpSfa9pn@5LsM$I$
z;vtLL%GL={5R}RwRSH4aG+9(v$LZl=`X(m0I5Ez;mKFvkC(D`!V16Qjq3M_5s*9=M
zRF@j2uAvKA#RP_?QES<lnyhdyF27U646z`QBxQ$LTHnB>%q08HpXb%?(@Z!Hqq!_`
z%dWDDh9)tj#z=O8@9o}2&huE=*hpI<$>t-6r(glPsCE%eT_dDvRW3;B-SWYd=9f}X
zAC2<R%2ga6xJ2*RC@-JxDrn|pimz_kRJGqS4cd|kOikm|;84|j<%(%bHwb7;Bw00Q
zPT|}4F*J>Z=`@BWsyYKqO(!I^vTLf8n$q-v@=3>+(Ao4+ydcX&_5yDl`3trk_!Ig@
z_LZx#B^O8)0}H>xEf7*8*WZs3k5Q=b7Am=35b*syyLs-&VZ0!qJ(;9El}3uGw58+u
zmt{JmW(c#0?4I6pxSr3>b7!uc4=)nAO7qOJ_DVxat?G>ONvb+qVCg#T$rMrudWH+G
zO<N+#lDc}{=qdQX9my1_NCbUaFkQlR$|5-!Qo9UafhexKaym5#0*>_e@x<OejOKE*
z)Yh^vU02Q)g$<)@$x10oUj>Mw))>j=$aw`uZLX;yU15RBDMtxm!<@2=zCzOqbP88g
z^DmB%v-jM&sv8(mBVrod*0z9;EMCImy1IfD85(5Laf<4sDCAOOPApDSELL_GOZ8JJ
z1dED$$8uQ~B$KRbX=O!I6H*8|QfUlL!_xH%*VV<)^m5$?n9}s6bk5p^U!W;*BfC!g
zS3EykhFD^PtTV)=(StOu-^j_Qp60Eu{3*9T`2?D2aOT<P7}|e;Id|Pz#c^H`Fq+Hp
zd`~w&IdrgE;|a;8&JIjXBVXY{NGYg`M7U!?J1?9#Ue*rl=CxEY&h!kaKvd1inV1?;
z#X|y+m3zeHsaH|9In`REDHg}jH1eKDb39ISO`M$P;TMDA8|Ti&G7RK2c9udAF+-&6
zFoW3)kL}vYW4m_p<i|fzjhiUmX%>O?i!RtpU8i`d>(piU-O$=f+zO#f$;Q_CyxM)5
zbEBjD?oWTrJsq8F>gb>;7URPBIL{wDM#D6wFKNzO=g;To$BvTsJU+Aerz}V&`O{4w
zWO2H#y!J0&dxe|l&8rfafy^X-^ZNG7g#Om~^NX1qQNa&_xMguydq-8aNeY2&7;Nh3
z<ka9GgV`+KdhOM!Gap#G3^!0LZ){}e*@ANX_s{<vfM<T^k#bg1zr0xBGB3T6d3Coi
znd>7^9+r{7GHOsLE{z`K(Aj_B=H*{x#h3mA`~S-~dEwp<Vbs)+9~eNhEtdSj=LlRE
zS@c7t5PWFSVmi_(1}8IQJrAW6u~3NC+FIIEDdM3Jj_-5Ff(7`2qBE5yVTbvx&V|%R
zqnsZbqd6XDIGZgpoJL63kwS9s!i9|I9p=^4U`R<vD$T9)+t8#yms*v%D+rY2mSP|o
zF$+1|h#BJcwl)-yv?FLj@Zm*^8Oh~nj7E{-@*<fo1$EH~_jWF1Fq2_fLjyII&HO}y
zdpbJEdmhUg8nJZ^FHqdpwtzDuBScLTT}tXAVLr8H4Tt;t$v6&{t~22{Xi{)bM+Z6A
zqcfexkdl>6P3W4$)HF09tL`L#mYP~VyLK)8;}c{&4=?bE7$$S#aXQm!l6JUItm*8e
zE)rodlR*l}()xO8EQ?20t>&GJ7cn(SOKpO~{r%)Um&RzUkjB&`x3;wr4TZ`Dw)wRQ
zlv1?R*7Aqz)^qIAB~p<HO|ck8(F!c8t0QUKeDRiBIXyhgNG^*eB#p5sOX?elg+c@>
zD8GAqDn-OFSz2GuT?^XDxGt8iV`@4P)1)I^$LBX}EHl0?B&kT4Md>>7zK^Br+|by_
zr*FK8?%`p)z^BHtnaJnMagjK7?3nU08KsBA*Hm6pN?~X=y@PMkkX*&#@BA%YKP&{W
zx@B?akA6rfl`NEyLm~D*`Xva3$ht0*jziw}@Qdj+U6Vu%lZa`eNlDi87|vwyf`A&!
zB5WA^=NGqdLqh|JaG2pthMyKK#iDeY&)vM9`e>A~T#l^g5j9QXp%59@Wi*#Vmy%>S
zjIHa)qNy*rTO-*l<3&cRwJf|KU^tsa0kxJzNY@$7X32OS5yK#1+l7ammaBJtpP_7q
zoa+${g@}bhxTUj#fLhxoYMKR@xf~OYgRSc%Y#U8VCLD+Hd>+^LF*S`^+eQk(Xf{jU
z_lcS&u~4YI&eSv#wq39uMO=a)An$ohI8MRJ6w{l!6xfDI%rr4{9h4&Dx{T%X<ziLb
zvWOZcS<hp_$$<h>*KvFg$McDpCJEa{*EDj)y;;{qp@^9wYVAU{Y20zh6a`k7lB`=u
z8`oGNEW;%0I%HiJ*AI|FU>Q2GP>7JGlk+@=itk=)S;Rsia-PR<E=%6^2o>oSHcf&c
zAmh4Bx(<2QLx@7$6EQ;tJ`#ew=P{noGwHenL4a+VB#Lh;gis}>M-PYJb%Ri$lTzd8
zW8dTG|M)v@{k!jxT(NwrOS8!I(z42xNi~C+F2xH$@v&6VEy;NvFL#|{Yu8Cm4-TP8
zNmD$|lDax>n%ly{bef1c<!8zYH?3qeMNzX)FPK%Xkrn+KGo2$VaIEa_DEE0(^m<gm
zm<E43%*u7D0$(cdnek3SlyR=CPO542t*nSnUl&xkf1=p0Grd`@>h47xXWBdczNPn=
zj=!1#ujw?HzFy7nj??cds@n{zXiWvZi@y!(S50MHp|oEnjOWpE-$xiaaDe&^>+vQg
zs@(uJMKosVZBfPMqRKg4N><HjW?pS=Ax)<gx+bZyEb1arBBois%yj(ZEWIBkCXiQY
zoSMF7S`SCnS<_)%X>K}Rm3N*7=$h{|{qJl_>PlzHLdkhr>~nd_OG<g!{H*u5%I`D%
zcBS=|LOvV3k_#(m-v5erTlbk?)ZcaI?+INO@1?1#r0uPAn#i0vWdTx3Aq}0r7p~q<
ze<dc7LSUOFwU$jP9HuTBr9KiR5e^r6MrL66s|o3^p=bM=;r}vty_>yPTYIf%z1Mrp
z_WOIG*L#Im{1?LCmv8_4XS<xi!I#8UBxkmv+cx#<*P*5raDrUEIxX@pAE{IXvUHu8
zS@2D5!?<e4;q`HST)~@oNeHn^e(age{;GTKxhHU(my}ZK{n9)^G4ET-;QTV@ijwJ_
zrrEDE{`E0CpR1B<r-TqMJ@E8X_b8=&dD8>;b7<c_4uAFQA9P1XH@;sGrLJFR%<JR-
uC&vq52zW**wNWYc!DoKw5gvH@DgGZ}&`KHS;3Vq+0000<MNUMnLSTZ>IdBR9
literal 0
HcmV?d00001
diff --git a/addon/statusnet/slinky.php b/addon/statusnet/slinky.php
new file mode 100644
index 0000000000..51432c3f53
--- /dev/null
+++ b/addon/statusnet/slinky.php
@@ -0,0 +1,704 @@
+<?php
+/*
+Copyright (c) 2009, Beau Lebens
+All rights reserved.
+
+Redistribution and use in source and binary forms, with or without modification,
+are permitted provided that the following conditions are met:
+
+ - Redistributions of source code must retain the above copyright notice, this
+ list of conditions and the following disclaimer.
+ - Redistributions in binary form must reproduce the above copyright notice,
+ this list of conditions and the following disclaimer in the documentation
+ and/or other materials provided with the distribution.
+ - Neither the name of Dented Reality nor the names of the authors may be used
+ to endorse or promote products derived from this software without specific
+ prior written permission.
+
+THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
+ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR
+ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
+(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
+LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON
+ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
+(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+
+*/
+
+// Return options for Slinky_Service->url_get() and ->url_post()
+define( 'SLINKY_BODY', 1 ); // Default
+define( 'SLINKY_HEADERS', 2 ); // Not implemented yet
+define( 'SLINKY_FINAL_URL', 3 ); // Default for lengthening URLs
+
+// So that services may decide what to do with us
+define( 'SLINKY_USER_AGENT', 'Slinky v1.0 +http://dentedreality.com.au/projects/slinky/' );
+
+// How many seconds until remote requests should be cut?
+define( 'SLINKY_TIMEOUT', 10 );
+
+/**
+ * Slinky allows you to go back and forth between "long" and shortened URLs
+ * using popular URL shortening services.
+ *
+ * Slinky assumes you have cURL installed and working, and requires the JSON
+ * extension installed if you're working with a service that uses JSON.
+ *
+ * Slinky will ONLY work with PHP5+
+ *
+ * It supports some of the more popular services, with easy extensibility for
+ * adding your own relatively easily. It defaults to using TinyURL
+ * for shortening URLs. If you want to use some of the other services, you need
+ * to set some configuration options before actually shortening/lengthening
+ * URLs. I'd strongly suggest that you cache results using memcached, a local
+ * DB or whatever to avoid having to hit APIs etc every time you encounter a
+ * URL.
+ *
+ * Slinky supports shortening, and auto-detection (for lengthening URLs)
+ * using these services:
+ * - Bit.ly
+ * - Tr.im
+ * - TinyURL
+ * - Is.Gd
+ * - Fon.gs
+ * - Micurl.com
+ * - ur1.ca
+ * - Ptiturl
+ * - Tighturl
+ * - 2tu.us
+ * - Snipr / Snipurl / Snurl.com / Sn.im
+ *
+ *
+ * To use Slinky:
+ *
+ * $slinky = new Slinky( 'http://dentedreality.com.au/' );
+ * - Creates a new Slinky instance, will default to using TinyURL for ->short();
+ *
+ * $slinky = new Slinky( 'http://dentedreality.com.au', new Slinky_Bitly() );
+ * - Creates new Slinky, forces use of Bit.ly for ->short();
+ *
+ * $slinky = new Slinky( 'http://dentedreality.com.au/' );
+ * echo $slinky->short();
+ * - echos the short version of http://dentedreality.com.au/ (default to TinyURL)
+ *
+ * $slinky = new Slinky( 'http://tinyurl.com/jw5sh' );
+ * echo $slinky->long();
+ * - echos out the long version of http://tinyurl.com/jw5sh (which should be http://dentedreality.com.au/)
+ *
+ * $slinky = new Slinky( 'http://dentedreality.com.au/' );
+ * echo $slinky->long();
+ * - Attempts to lengthen the URL, but will not auto-detect which service it is
+ * so it will just output the original URL. Useful for always attempting to
+ * lengthen any URL you come across (fails gracefully)
+ *
+ * $slinky = new Slinky( 'http://dentedreality.com.au/' );
+ * $slinky->set_cascade( array( new Slinky_Trim(), new Slinky_IsGd(), new Slinky_TinyURL() ) );
+ * echo $slinky->short();
+ * - Uses the powerful cascade mode to make sure that we get a short URL from
+ * Tr.im, Is.Gd or TinyURL (in that order).
+ *
+ * See specific service class definitions below for examples of how to use them,
+ * as some services allow (or require) additional properties before you can use
+ * them (for authentication etc).
+ *
+ * To use a different service with Slinky, just create your own class and
+ * extend Slinky_Service(). Make sure you implement url_is_short(), url_is_long(),
+ * make_short() and make_long(). If you need to GET or POST a URL, you can use
+ * ->url_get() and ->url_post(), which your class will have inherited.
+**/
+class Slinky {
+ var $url = false;
+ var $service = false;
+ var $cascade = false;
+
+ function __construct( $url = false, $service = false ) {
+ $this->url = $url;
+ $this->service = $service;
+ }
+
+ /**
+ * Specify which URL Service to use
+ *
+ * @param Slinky_Service $service Packaged or custom Service object
+ * @return void
+ */
+ public function set_service( $service = false ) {
+ if ( is_object( $service ) ) {
+ $this->service = $service;
+ }
+ }
+
+ /**
+ * If you pass an array of Slinky_Service objects to this method, they will
+ * be used in order to try to get a short URL, so if one fails, it will
+ * try the next and so on, until it gets a valid short URL, or it runs
+ * out of options.
+ *
+ * @param array $services List of Slinky_Service objects as an array
+ **/
+ public function set_cascade( $services = false ) {
+ if ( !$services || !is_array( $services ) )
+ return false;
+
+ $this->cascade = $services;
+ }
+
+ /**
+ * Guess the URL service to use from known domains of short URLs
+ *
+ * @param string $url
+ */
+ public function set_service_from_url( $url = false ) {
+ if ( !$url )
+ $url = $this->url;
+
+ $host = parse_url( $url, PHP_URL_HOST );
+ switch ( str_replace( 'www.', '', $host ) ) {
+ case 'bit.ly':
+ if ( class_exists( 'Slinky_Bitly' ) ) {
+ $this->service = new Slinky_Bitly();
+ break;
+ }
+ case 'tr.im':
+ if ( class_exists( 'Slinky_Trim' ) ) {
+ $this->service = new Slinky_Trim();
+ break;
+ }
+ case 'tinyurl.com':
+ if ( class_exists( 'Slinky_TinyURL' ) ) {
+ $this->service = new Slinky_TinyURL();
+ break;
+ }
+ case 'is.gd':
+ if ( class_exists( 'Slinky_IsGd' ) ) {
+ $this->service = new Slinky_IsGd();
+ break;
+ }
+ case 'fon.gs':
+ if ( class_exists( 'Slinky_Fongs' ) ) {
+ $this->service = new Slinky_Fongs();
+ break;
+ }
+ case 'micurl.com':
+ if ( class_exists( 'Slinky_Micurl' ) ) {
+ $this->service = new Slinky_Micurl();
+ break;
+ }
+ case 'ur1.ca':
+ if ( class_exists( 'Slinky_Ur1ca' ) ) {
+ $this->service = new Slinky_Ur1ca();
+ break;
+ }
+ case 'ptiturl.com':
+ if ( class_exists( 'Slinky_PtitURL' ) ) {
+ $this->service = new Slinky_PtitURL();
+ break;
+ }
+ case 'tighturl.com':
+ case '2tu.us':
+ if ( class_exists( 'Slinky_TightURL' ) ) {
+ $this->service = new Slinky_TightURL();
+ break;
+ }
+ case 'snipr.com':
+ case 'snipurl.com':
+ case 'snurl.com':
+ case 'sn.im':
+ if ( class_exists( 'Slinky_Snipr' ) ) {
+ $this->service = new Slinky_Snipr();
+ break;
+ }
+ default:
+ $this->service = new Slinky_Default();
+ break;
+ }
+ }
+
+ /**
+ * Take a long URL and make it short. Will avoid "re-shortening" a URL if it
+ * already seems to be short.
+ *
+ * @param string $url Optional URL to shorten, otherwise use $this->url
+ * @return The short version of the URL
+ */
+ public function short( $url = false ) {
+ if ( $url )
+ $this->url = $url;
+
+ if ( !$this->service )
+ $this->set_service( new Slinky_TinyURL() ); // Defaults to tinyurl because it doesn't require any configuration
+
+ if ( !$this->cascade )
+ $this->cascade = array( $this->service ); // Use a single service in cascade mode
+
+ foreach ( $this->cascade as $service ) {
+ if ( $service->url_is_short( $this->url ) )
+ return trim( $this->url ); // Identified as already short, using this service
+
+ $response = trim( $service->make_short( $this->url ) );
+ if ( $response && $this->url != $response )
+ return trim( $response );
+ }
+
+ return $this->url; // If all else fails, just send back the URL we already know about
+ }
+
+ /**
+ * Take a short URL and make it long ("resolve" it).
+ *
+ * @param string $url The short URL
+ * @return A long URL
+ */
+ public function long( $url = false ) {
+ if ( $url )
+ $this->url = $url;
+
+ if ( !$this->service )
+ $this->set_service_from_url();
+
+ if ( $this->service->url_is_long( $this->url ) )
+ return trim( $this->url );
+
+ return trim( $this->service->make_long( $this->url ) );
+ }
+}
+
+/**
+ * Use this class to create a Service implementation for your own URL
+ * shortening service. Extend the class and customize methods to suit your
+ * service. Note that it is an "abstract" class, so there are certain methods
+ * which you *must* define.
+**/
+abstract class Slinky_Service {
+
+ /**
+ * Determine, based on the input URL, if it's already a short URL, from
+ * this particular service. e.g. a Bit.ly URL contains "bit.ly/"
+ **/
+ abstract function url_is_short( $url );
+
+ /**
+ * Determine if this is a "long" URL (just means it hasn't been shortened)
+ * already. e.g. a no-Bit.ly URL would NOT contain "bit.ly/"
+ **/
+ abstract function url_is_long( $url );
+
+ /**
+ * Handle taking the $url and converting it to a short URL via whatever
+ * means is provided at the remote service.
+ **/
+ abstract function make_short( $url );
+
+ /**
+ * Return the long/expanded version of a URL via any API means available
+ * from this service. As a fallback, you might
+ * consider just following the URL and using SLINKY_FINAL_URL as the
+ * return method from a $this->url_get() call to find out.
+ *
+ * This one is optional for Services extending this class, if they don't
+ * then the following implementation will work on most services anyway.
+ **/
+ public function make_long( $url ) {
+ return $this->url_get( $url, SLINKY_FINAL_URL );
+ }
+
+ /**
+ * Method for getting properties that you might need during the process
+ * of shortening/lengthening a URL (e.g. auth credentials)
+ **/
+ public function get( $prop ) {
+ if ( empty( $this->$prop ) )
+ return null;
+
+ return $this->$prop;
+ }
+
+ /**
+ * Method for setting properties that you might need during the process
+ * of shortening/lengthening a URL (e.g. auth credentials)
+ **/
+ public function set( $prop, $val ) {
+ $this->$prop = $val;
+ }
+
+ /**
+ * Internal helper for performing a GET request on a remote URL.
+ *
+ * @param string $url The URL to GET
+ * @param const $return The return method [ SLINKY_BODY | SLINKY_FINAL_URL | SLINKY_HEADERS ]
+ * @return Mixed, based on the $return var passed in.
+ **/
+ protected function url_get( $url, $return = SLINKY_BODY ) {
+ $ch = curl_init( $url );
+ curl_setopt( $ch, CURLOPT_USERAGENT, SLINKY_USER_AGENT );
+ curl_setopt( $ch, CURLOPT_SSL_VERIFYPEER, 0 ); // Don't stress about SSL validity
+ curl_setopt( $ch, CURLOPT_RETURNTRANSFER, 1 ); // Return the response, don't output it
+ curl_setopt( $ch, CURLOPT_TIMEOUT, SLINKY_TIMEOUT ); // Limit how long we'll wait for a response
+ curl_setopt( $ch, CURLOPT_FOLLOWLOCATION, 1 ); // Allow following of redirections
+ $r = curl_exec( $ch );
+ if ( curl_errno( $ch ) ) {
+ return false;
+ }
+
+ // Return whatever we were asked for
+ if ( SLINKY_FINAL_URL == $return )
+ return curl_getinfo( $ch, CURLINFO_EFFECTIVE_URL );
+ else if ( SLINKY_BODY == $return )
+ return $r;
+
+ return false;
+ }
+
+ /**
+ * Internal helper for performing a POST request on a remote URL.
+ *
+ * @param string $url The URL to POST to
+ * @param array $payload Array containing name/value pairs of the parameters to POST
+ * @param const $return The return method [ SLINKY_BODY | SLINKY_FINAL_URL | SLINKY_HEADERS ]
+ * @return Mixed, based on the $return var passed in.
+ **/
+ protected function url_post( $url, $payload = array(), $return = SLINKY_BODY ) {
+ $ch = curl_init( $url );
+ curl_setopt( $ch, CURLOPT_POST, true );
+ curl_setopt( $ch, CURLOPT_POSTFIELDS, (array) $payload );
+ curl_setopt( $ch, CURLOPT_USERAGENT, SLINKY_USER_AGENT );
+ curl_setopt( $ch, CURLOPT_SSL_VERIFYPEER, 0 ); // Don't stress about SSL validity
+ curl_setopt( $ch, CURLOPT_RETURNTRANSFER, 1 ); // Return the response, don't output it
+ curl_setopt( $ch, CURLOPT_TIMEOUT, SLINKY_TIMEOUT ); // Limit how long we'll wait for a response
+ curl_setopt( $ch, CURLOPT_FOLLOWLOCATION, 1 ); // Allow following of redirections
+ $r = curl_exec( $ch );
+ if ( curl_errno( $ch ) ) {
+ return false;
+ }
+
+ // Return whatever we were asked for
+ if ( SLINKY_FINAL_URL == $return )
+ return curl_getinfo( $ch, CURLINFO_EFFECTIVE_URL );
+ else if ( SLINKY_BODY == $return )
+ return $r;
+
+ return false;
+ }
+}
+
+// This default service is used in cases when you try to do something based
+// on auto-detection, but we can't detect anything. It will also resolve URLs
+// to their "long" version by following all redirects.
+class Slinky_Default extends Slinky_Service {
+ function url_is_short( $url ) {
+ return false;
+ }
+
+ function url_is_long( $url ) {
+ return false;
+ }
+
+ function make_short( $url ) {
+ return $url;
+ }
+}
+
+// Implementation of TinyURL as a Slinky Service
+class Slinky_TinyURL extends Slinky_Service {
+ function url_is_short( $url ) {
+ return stristr( $url, 'tinyurl.com/' );
+ }
+
+ function url_is_long( $url ) {
+ return !stristr( $url, 'tinyurl.com/' );
+ }
+
+ function make_short( $url ) {
+ return $this->url_get( 'http://tinyurl.com/api-create.php?url=' . urlencode( $url ) );
+ }
+
+ function make_long( $url ) {
+ $bits = parse_url( $url );
+ $result = $this->url_get( 'http://tinyurl.com/preview.php?num=' . substr( $bits['path'], 1 ) );
+ if ( preg_match('/<a id="redirecturl" href="([^"]+)">/is', $result, $matches ) )
+ return $matches[1];
+ else
+ return $url;
+ }
+}
+
+// Implementation of Bit.ly as a Slinky Service
+/*
+To use Bit.ly, you MUST set your login and apiKey for the service first, e.g.
+
+$bitly = new Slinky_Bitly();
+$bitly->set( 'login', 'bitly_login' );
+$bitly->set( 'apiKey', 'bitly_apiKey' );
+
+$slinky = new Slinky( $url, $bitly );
+echo $slinky->short();
+
+You could also do this if the URL was already a bit.ly URL and you
+were going to make it longer, since Bitly is supported for auto-detection:
+
+$slinky = new Slinky( $url );
+$slinky->set_service_from_url();
+$slinky->service->set( 'login', 'bitly_login' );
+$slinky->service->set( 'apiKey', 'bitly_apiKey' );
+echo $slinky->long();
+
+*/
+class Slinky_Bitly extends Slinky_Service {
+ function url_is_short( $url ) {
+ return stristr( $url, 'bit.ly/' );
+ }
+
+ function url_is_long( $url ) {
+ return !stristr( $url, 'bit.ly/' );
+ }
+
+ function make_short( $url ) {
+ // Can't do anything unless these 2 properties are set first
+ if ( !$this->get( 'login' ) || !$this->get( 'apiKey' ) )
+ return $url;
+
+ $result = $this->url_post( 'http://api.bit.ly/shorten?version=2.0.1&format=json&login=' . $this->get( 'login' ) . '&apiKey=' . $this->get( 'apiKey' ) . '&longUrl=' . urlencode( $url ) );
+ $result = json_decode( $result );
+ if ( !$result->errorCode ) {
+ foreach ( $result->results as $detail ) {
+ return $detail->shortUrl;
+ }
+ } else {
+ return false;
+ }
+ }
+
+ function make_long( $url ) {
+ // Can't do anything unless these 2 properties are set first
+ if ( !$this->get( 'login' ) || !$this->get( 'apiKey' ) )
+ return $url;
+
+ $result = $this->url_post( 'http://api.bit.ly/expand?version=2.0.1&format=json&login=' . $this->get( 'login' ) . '&apiKey=' . $this->get( 'apiKey' ) . '&shortUrl=' . urlencode( $url ) );
+ $result = json_decode( $result );
+ if ( !$result->errorCode ) {
+ foreach ( $result->results as $detail ) {
+ return $detail->longUrl;
+ }
+ } else {
+ return false;
+ }
+ }
+}
+
+// Implementation of Tr.im as a Slinky Service
+/*
+When using Tr.im, you MAY optionally set your username and password to tie
+URLs to your account, e.g.
+
+$trim = new Slinky_Trim();
+$trim->set( 'username', 'trim_username' );
+$trim->set( 'password', 'trim_password' );
+
+$slinky = new Slinky( $url, $trim );
+echo $slinky->short();
+
+You could also do this if the URL was already a tr.im URL and you
+were going to make it longer, since Tr.im is supported for auto-detection:
+
+$slinky = new Slinky( $url );
+$slinky->set_service_from_url();
+echo $slinky->long();
+
+*/
+class Slinky_Trim extends Slinky_Service {
+ function url_is_short( $url ) {
+ return stristr( $url, 'tr.im/' );
+ }
+
+ function url_is_long( $url ) {
+ return !stristr( $url, 'tr.im/' );
+ }
+
+ function make_short( $url ) {
+ $url = 'http://api.tr.im/api/trim_simple?url=' . urlencode( $url );
+
+ if ( $this->get( 'username' ) && $this->get( 'password' ) )
+ $url .= '&username=' . urlencode( $this->get( 'username' ) ) . '&password=' . urlencode( $this->get( 'password' ) );
+
+ return $this->url_get( $url );
+ }
+
+ function make_long( $url ) {
+ $bits = parse_url( $url );
+ $result = $this->url_get( 'http://api.tr.im/api/trim_destination.json?trimpath=' . substr( $bits['path'], 1 ) );
+ $result = json_decode($result);
+ if ( 'OK' == $result->status->result )
+ return $result->destination;
+ else
+ return $url;
+ }
+}
+
+// Implementation of Is.Gd as a Slinky Service
+class Slinky_IsGd extends Slinky_Service {
+ function url_is_short( $url ) {
+ return stristr( $url, 'is.gd/' );
+ }
+
+ function url_is_long( $url ) {
+ return !stristr( $url, 'is.gd/' );
+ }
+
+ function make_short( $url ) {
+ $response = $this->url_get( 'http://is.gd/api.php?longurl=' . urlencode( $url ) );
+ if ( 'error' == substr( strtolower( $response ), 0, 5 ) )
+ return false;
+ else
+ return $response;
+ }
+}
+
+// Fon.gs
+class Slinky_Fongs extends Slinky_Service {
+ function url_is_short( $url ) {
+ return stristr( $url, 'fon.gs/' );
+ }
+
+ function url_is_long( $url ) {
+ return !stristr( $url, 'fon.gs/' );
+ }
+
+ function make_short( $url ) {
+ $response = $this->url_get( 'http://fon.gs/create.php?url=' . urlencode( $url ) );
+ if ( 'OK:' == substr( $response, 0, 3 ) )
+ return str_replace( 'OK: ', '', $response );
+ else
+ return $url;
+ }
+}
+
+// Micu.rl
+class Slinky_Micurl extends Slinky_Service {
+ function url_is_short( $url ) {
+ return stristr( $url, 'micurl.com/' );
+ }
+
+ function url_is_long( $url ) {
+ return !stristr( $url, 'micurl.com/' );
+ }
+
+ function make_short( $url ) {
+ $result = $this->url_get( 'http://micurl.com/api.php?url=' . urlencode( $url ) );
+ if ( 1 != $result && 2 != $result )
+ return 'http://micurl.com/' . $result;
+ else
+ return $url;
+ }
+}
+
+// ur1.ca
+class Slinky_Ur1ca extends Slinky_Service {
+ function url_is_short( $url ) {
+ return stristr( $url, 'ur1.ca/' );
+ }
+
+ function url_is_long( $url ) {
+ return !stristr( $url, 'ur1.ca/' );
+ }
+
+ function make_short( $url ) {
+ $result = $this->url_post( 'http://ur1.ca/', array( 'longurl' => $url ) );
+ if ( preg_match( '/<p class="success">Your ur1 is: <a href="([^"]+)">/', $result, $matches ) )
+ return $matches[1];
+ else
+ return $url;
+ }
+}
+
+// PtitURL.com
+class Slinky_PtitURL extends Slinky_Service {
+ function url_is_short( $url ) {
+ return stristr( $url, 'ptiturl.com/' );
+ }
+
+ function url_is_long( $url ) {
+ return !stristr( $url, 'ptiturl.com/' );
+ }
+
+ function make_short( $url ) {
+ $result = $this->url_get( 'http://ptiturl.com/index.php?creer=oui&url=' . urlencode( $url ) );
+ if ( preg_match( '/<pre><a href=\'?([^\'>]+)\'?>/', $result, $matches ) )
+ return $matches[1];
+ else
+ return $url;
+ }
+}
+
+// Tighturl.com
+class Slinky_TightURL extends Slinky_Service {
+ function url_is_short( $url ) {
+ return stristr( $url, 'tighturl.com/' )
+ || stristr( $url, '2tu.us/' );
+ }
+
+ function url_is_long( $url ) {
+ return !stristr( $url, 'tighturl.com/' )
+ && !stristr( $url, '2tu.us/' );
+ }
+
+ function make_short( $url ) {
+ $response = $this->url_get( 'http://tighturl.com/?save=y&url=' . urlencode( $url ) );
+ if ( preg_match( '/Your tight URL is: <code><a href=\'([^\']+)\' target=\'_blank\'>/', $response, $matches ) ) {
+ return $matches[1];
+ } else {
+ return $url;
+ }
+ }
+}
+
+// Snipr for Slinky
+/*
+To use Snipr, you MUST set your user_id and API (key) for the service first, e.g.
+
+$snipr = new Slinky_Snipr();
+$snipr->set( 'user_id', 'Snipr User ID' );
+$snipr->set( 'API', 'Snipr API Key' );
+
+$slinky = new Slinky( $url, $snipr );
+echo $slinky->short();
+
+NOTE: Snipr requires the SimpleXML extension to be installed for lengthening URLs
+*/
+class Slinky_Snipr extends Slinky_Service {
+ // Snipurl, Snurl, Snipr, Sn.im
+ function url_is_short( $url ) {
+ return stristr( $url, 'snipr.com/' ) || stristr( $url, 'snipurl.com/' ) || stristr( $url, 'snurl.com/' ) || stristr( $url, 'sn.im/' );
+ }
+
+ function url_is_long( $url ) {
+ return !stristr( $url, 'snipr.com/' ) || !stristr( $url, 'snipurl.com/' ) || !stristr( $url, 'snurl.com/' ) || !stristr( $url, 'sn.im/' );
+ }
+
+ function make_short( $url ) {
+ if ( !$this->get( 'user_id' ) || !$this->get( 'API' ) )
+ return $url;
+
+ $response = $this->url_post( 'http://snipr.com/site/getsnip', array( 'sniplink' => urlencode( $url ), 'snipuser' => $this->get( 'user_id'), 'snipapi' => $this->get( 'API' ), 'snipformat' => 'simple' ) );
+ if ( 'ERROR' != substr( $response, 0, 5 ) )
+ return $response;
+ else
+ return $url;
+ }
+}
+
+// If you're testing things out, http://dentedreality.com.au/ should convert to:
+// - http://tinyurl.com/jw5sh
+// - http://bit.ly/hEkAD
+// - http://tr.im/sk1H
+// - http://is.gd/1yJ81
+// - http://fon.gs/tc1p8c
+// - http://micurl.com/qen3uub
+// - http://ur1.ca/7dcd
+// - http://ptiturl.com/?id=bac8fb
+// - http://tighturl.com/kgd
+// - http://snipr.com/nbbw3
+//
+// $slinky = new Slinky( 'http://dentedreality.com.au/' );
+// echo $slinky->short();
diff --git a/addon/statusnet/statusnet.css b/addon/statusnet/statusnet.css
new file mode 100644
index 0000000000..4e27b09380
--- /dev/null
+++ b/addon/statusnet/statusnet.css
@@ -0,0 +1,67 @@
+
+
+#statusnet-avatar {
+ float: left;
+ width: 48px;
+ height: 48px;
+ padding: 2px;
+}
+#statusnet-info-block {
+ height: 52px;
+ vertical-align: middle;
+}
+#statusnet-disconnect-label {
+ float: left;
+ width: 200px;
+ margin-bottom: 25px;
+}
+
+#statusnet-disconnect {
+ float: left;
+}
+#statusnet-enable-label {
+ float: left;
+ width: 200px;
+ margin-bottom: 5px;
+}
+
+#statusnet-checkbox {
+ float: left;
+}
+#statusnet-pin-label {
+ float: left;
+ width: 200px;
+ margin-bottom: 25px;
+}
+#statusnet-pin {
+ float: left;
+}
+
+
+#statusnet-consumerkey-label {
+ float: left;
+ width: 200px;
+ margin-bottom: 8px;
+}
+#statusnet-consumerkey {
+ float: left;
+ margin-bottom: 8px;
+}
+#statusnet-consumersecret-label {
+ float: left;
+ width: 200px;
+ margin-bottom: 8px;
+}
+#statusnet-consumersecret {
+ float: left;
+ margin-bottom: 8px;
+}
+#statusnet-baseapi-label {
+ float: left;
+ width: 200px;
+ margin-bottom: 25px;
+}
+#statusnet-baseapi {
+ float: left;
+ margin-bottom: 8px;
+}
diff --git a/addon/statusnet/statusnet.php b/addon/statusnet/statusnet.php
new file mode 100644
index 0000000000..b1d330541f
--- /dev/null
+++ b/addon/statusnet/statusnet.php
@@ -0,0 +1,243 @@
+<?php
+
+/* StatusNet Plugin for Friendika
+ *
+ * Author: Tobias Diekershoff
+ * tobias.diekershoff@gmx.net
+ *
+ * License:3-clause BSD license (same as Friendika)
+ *
+ * Configuration:
+ * To activate the plugin itself add it to the $a->config['system']['addon']
+ * setting. After this, your user can configure their Twitter account settings
+ * from "Settings -> Plugin Settings".
+ *
+ * Requirements: PHP5, curl [Slinky library]
+ *
+ * Documentation: http://diekershoff.homeunix.net/redmine/wiki/friendikaplugin/StatusNet_Plugin
+ */
+
+/* __TODO__
+ *
+ * - what about multimedia content?
+ * so far we just strip HTML tags from the message
+ */
+
+
+/***
+ * We have to alter the TwitterOAuth class a little bit to work with any StatusNet
+ * installation abroad. Basically it's only make the API path variable and be happy.
+ *
+ * Thank you guys for the Twitter compatible API!
+ */
+require_once('addon/twitter/twitteroauth.php');
+class StatusNetOAuth extends TwitterOAuth {
+ function get_maxlength() {
+ $config = $this->get($this->host . 'statusnet/config.json');
+ return $config->site->textlimit;
+ }
+ function accessTokenURL() { return $this->host.'oauth/access_token'; }
+ function authenticateURL() { return $this->host.'oauth/authenticate'; }
+ function authorizeURL() { return $this->host.'oauth/authorize'; }
+ function requestTokenURL() { return $this->host.'oauth/request_token'; }
+ function __construct($apipath, $consumer_key, $consumer_secret, $oauth_token = NULL, $oauth_token_secret = NULL) {
+ parent::__construct($consumer_key, $consumer_secret, $oauth_token, $oauth_token_secret);
+ $this->host = $apipath;
+ }
+}
+
+function statusnet_install() {
+ // we need some hooks, for the configuration and for sending tweets
+ register_hook('plugin_settings', 'addon/statusnet/statusnet.php', 'statusnet_settings');
+ register_hook('plugin_settings_post', 'addon/statusnet/statusnet.php', 'statusnet_settings_post');
+ register_hook('post_local_end', 'addon/statusnet/statusnet.php', 'statusnet_post_hook');
+ logger("installed statusnet");
+}
+
+
+function statusnet_uninstall() {
+ unregister_hook('plugin_settings', 'addon/statusnet/statusnet.php', 'statusnet_settings');
+ unregister_hook('plugin_settings_post', 'addon/statusnet/statusnet.php', 'statusnet_settings_post');
+ unregister_hook('post_local_end', 'addon/statusnet/statusnet.php', 'statusnet_post_hook');
+}
+
+function statusnet_settings_post ($a,$post) {
+ if(! local_user())
+ return;
+ if (isset($_POST['statusnet-disconnect'])) {
+ /***
+ * if the statusnet-disconnect checkbox is set, clear the statusnet configuration
+ * TODO can we revoke the access tokens at Twitter and do we need to do so?
+ */
+ del_pconfig( local_user(), 'statusnet', 'consumerkey' );
+ del_pconfig( local_user(), 'statusnet', 'consumersecret' );
+ del_pconfig( local_user(), 'statusnet', 'post' );
+ del_pconfig( local_user(), 'statusnet', 'oauthtoken' );
+ del_pconfig( local_user(), 'statusnet', 'oauthsecret' );
+ del_pconfig( local_user(), 'statusnet', 'baseapi' );
+ } else {
+ if (isset($_POST['statusnet-consumersecret'])) {
+ set_pconfig(local_user(), 'statusnet', 'consumerkey', $_POST['statusnet-consumerkey']);
+ set_pconfig(local_user(), 'statusnet', 'consumersecret', $_POST['statusnet-consumersecret']);
+ set_pconfig(local_user(), 'statusnet', 'baseapi', $_POST['statusnet-baseapi']);
+ header('Location: '.$a->get_baseurl().'/settings/addon');
+ } else {
+ if (isset($_POST['statusnet-pin'])) {
+ // if the user supplied us with a PIN from Twitter, let the magic of OAuth happen
+ logger('got a StatusNet security code');
+ $api = get_pconfig(local_user(), 'statusnet', 'baseapi');
+ $ckey = get_pconfig(local_user(), 'statusnet', 'consumerkey' );
+ $csecret = get_pconfig(local_user(), 'statusnet', 'consumersecret' );
+ // the token and secret for which the PIN was generated were hidden in the settings
+ // form as token and token2, we need a new connection to Twitter using these token
+ // and secret to request a Access Token with the PIN
+ $connection = new StatusNetOAuth($api, $ckey, $csecret, $_POST['statusnet-token'], $_POST['statusnet-token2']);
+ $token = $connection->getAccessToken( $_POST['statusnet-pin'] );
+ // ok, now that we have the Access Token, save them in the user config
+ set_pconfig(local_user(),'statusnet', 'oauthtoken', $token['oauth_token']);
+ set_pconfig(local_user(),'statusnet', 'oauthsecret', $token['oauth_token_secret']);
+ set_pconfig(local_user(),'statusnet', 'post', 1);
+ // reload the Addon Settings page, if we don't do it see Bug #42
+ header('Location: '.$a->get_baseurl().'/settings/addon');
+ } else {
+ // if no PIN is supplied in the POST variables, the user has changed the setting
+ // to post a tweet for every new __public__ posting to the wall
+ set_pconfig(local_user(),'statusnet','post',intval($_POST['statusnet-enable']));
+ }}}
+}
+function statusnet_settings(&$a,&$s) {
+ if(! local_user())
+ return;
+ $a->page['htmlhead'] .= '<link rel="stylesheet" type="text/css" href="' . $a->get_baseurl() . '/addon/statusnet/statusnet.css' . '" media="all" />' . "\r\n";
+ /***
+ * 1) Check that we have a base api url and a consumer key & secret
+ * 2) If no OAuthtoken & stuff is present, generate button to get some
+ * 3) Checkbox for "Send public notices (respect size limitation)
+ */
+ $api = get_pconfig(local_user(), 'statusnet', 'baseapi');
+ $ckey = get_pconfig(local_user(), 'statusnet', 'consumerkey' );
+ $csecret = get_pconfig(local_user(), 'statusnet', 'consumersecret' );
+ $otoken = get_pconfig(local_user(), 'statusnet', 'oauthtoken' );
+ $osecret = get_pconfig(local_user(), 'statusnet', 'oauthsecret' );
+ $enabled = get_pconfig(local_user(), 'statusnet', 'post');
+ $checked = (($enabled) ? ' checked="checked" ' : '');
+ $s .= '<h3>'.t('StatusNet Posting Settings').'</h3>';
+
+ if ( (!$ckey) && (!$csecret) ) {
+ /***
+ * no consumer keys
+ */
+ $s .= '<p>'.t('No consumer key pair for StatusNet found. Register your Friendika Account as an desktop client on your StatusNet account, copy the consumer key pair here and enter the API base root.<br />Before you register your own OAuth key pair ask the administrator if there is already a key pair for this Friendika installation at your favorited StatusNet installation.').'</p>';
+ $s .= '<div id="statusnet-consumer-wrapper">';
+ $s .= '<label id="statusnet-consumerkey-label" for="statusnet-consumerkey">OAuth Consumer Key</label>';
+ $s .= '<input id="statusnet-consumerkey" type="text" name="statusnet-consumerkey" size="35" /><br />';
+ $s .= '<label id="statusnet-consumersecret-label" for="statusnet-consumersecret">OAuth Consumer Secret</label>';
+ $s .= '<input id="statusnet-consumersecret" type="text" name="statusnet-consumersecret" size="35" /><br />';
+ $s .= '<label id="statusnet-baseapi-label" for="statusnet-baseapi">Base API Path (remember the trailing /)</label>';
+ $s .= '<input id="statusnet-baseapi" type="text" name="statusnet-baseapi" size="35" /><br />';
+ $s .= '</div><div class="clear"></div>';
+ $s .= '<div class="settings-submit-wrapper" ><input type="submit" name="submit" class="settings-submit" value="' . t('Submit') . '" /></div>';
+ } else {
+ /***
+ * ok we have a consumer key pair now look into the OAuth stuff
+ */
+ if ( (!$otoken) && (!$osecret) ) {
+ /***
+ * the user has not yet connected the account to statusnet
+ * get a temporary OAuth key/secret pair and display a button with
+ * which the user can request a PIN to connect the account to a
+ * account at statusnet
+ */
+ $connection = new StatusNetOAuth($api, $ckey, $csecret);
+ $request_token = $connection->getRequestToken('oob');
+ $token = $request_token['oauth_token'];
+ /***
+ * make some nice form
+ */
+ $s .= '<p>'.t('To connect to your StatusNet account click the button below to get a security code from StatusNet which you have to copy into the input box below and submit the form. Only your <strong>public</strong> posts will be posted to StatusNet.').'</p>';
+ $s .= '<a href="'.$connection->getAuthorizeURL($token,False).'" target="_statusnet"><img src="addon/statusnet/signinwithstatusnet.png" alt="'.t('Log in with StatusNet').'"></a>';
+ $s .= '<div id="statusnet-pin-wrapper">';
+ $s .= '<label id="statusnet-pin-label" for="statusnet-pin">'.t('Copy the PIN from StatusNet here').'</label>';
+ $s .= '<input id="statusnet-pin" type="text" name="statusnet-pin" />';
+ $s .= '<input id="statusnet-token" type="hidden" name="statusnet-token" value="'.$token.'" />';
+ $s .= '<input id="statusnet-token2" type="hidden" name="statusnet-token2" value="'.$request_token['oauth_token_secret'].'" />';
+ $s .= '</div><div class="clear"></div>';
+ $s .= '<div class="settings-submit-wrapper" ><input type="submit" name="submit" class="settings-submit" value="' . t('Submit') . '" /></div>';
+ } else {
+ /***
+ * we have an OAuth key / secret pair for the user
+ * so let's give a chance to disable the postings to statusnet
+ */
+ $connection = new StatusNetOAuth($api,$ckey,$csecret,$otoken,$osecret);
+ $details = $connection->get('account/verify_credentials');
+ $s .= '<div id="statusnet-info" ><img id="statusnet-avatar" src="'.$details->profile_image_url.'" /><p id="statusnet-info-block">'.t('Currently connected to: ').'<a href="'.$details->statusnet_profile_url.'" target="_statusnet">'.$details->screen_name.'</a><br /><em>'.$details->description.'</em></p></div>';
+ $s .= '<p>'.t('If enabled all your <strong>public</strong> postings will be posted to the associated StatusNet account as well.').'</p>';
+ $s .= '<div id="statusnet-enable-wrapper">';
+ $s .= '<label id="statusnet-enable-label" for="statusnet-checkbox">'.t('Send public postings to StatusNet').'</label>';
+ $s .= '<input id="statusnet-checkbox" type="checkbox" name="statusnet-enable" value="1" ' . $checked . '/>';
+ $s .= '</div><div class="clear"></div>';
+ $s .= '<div id="statusnet-disconnect-wrapper">';
+ $s .= '<label id="statusnet-disconnect-label" for="statusnet-disconnect">'.t('Clear OAuth configuration').'</label>';
+ $s .= '<input id="statusnet-disconnect" type="checkbox" name="statusnet-disconnect" value="1" />';
+ $s .= '</div><div class="clear"></div>';
+ $s .= '<div class="settings-submit-wrapper" ><input type="submit" name="submit" class="settings-submit" value="' . t('Submit') . '" /></div>';
+ }
+ }
+ $s .= '</div><div class="clear"></div>';
+}
+
+
+function statusnet_post_hook(&$a,&$b) {
+
+ /**
+ * Post to statusnet
+ */
+
+ logger('StatusNet post invoked');
+
+ if((local_user()) && (local_user() == $b['uid']) && (! $b['private'])) {
+
+ load_pconfig(local_user(), 'statusnet');
+
+ $api = get_pconfig(local_user(), 'statusnet', 'baseapi');
+ $ckey = get_pconfig(local_user(), 'statusnet', 'consumerkey' );
+ $csecret = get_pconfig(local_user(), 'statusnet', 'consumersecret' );
+ $otoken = get_pconfig(local_user(), 'statusnet', 'oauthtoken' );
+ $osecret = get_pconfig(local_user(), 'statusnet', 'oauthsecret' );
+
+ if($ckey && $csecret && $otoken && $osecret) {
+
+ $statusnet_post = get_pconfig(local_user(),'statusnet','post');
+
+ if($statusnet_post) {
+ require_once('include/bbcode.php');
+ $dent = new StatusNetOAuth($api,$ckey,$csecret,$otoken,$osecret);
+ $max_char = $dent->get_maxlength(); // max. length for a dent
+ $msg = strip_tags(bbcode($b['body']));
+ if ( strlen($msg) > $max_char) {
+ $shortlink = "";
+ require_once('addon/statusnet/slinky.php');
+ // post url = base url + /display/ + owner + post id
+ // we construct this from the Owner link and replace
+ // profile by display - this will cause an error when
+ // /profile/ is in the owner url twice but I don't
+ // think this will be very common...
+ $posturl = str_replace('/profile/','/display/',$b['owner-link']).'/'.$b['id'];
+ $slinky = new Slinky( $posturl );
+ // setup a cascade of shortening services
+ // try to get a short link from these services
+ // in the order ur1.ca, trim, id.gd, tinyurl
+ $slinky->set_cascade( array( new Slinky_UR1ca(), new Slinky_Trim(), new Slinky_IsGd(), new Slinky_TinyURL() ) );
+ $shortlink = $slinky->short();
+ // the new message will be shortened such that "... $shortlink"
+ // will fit into the character limit
+ $msg = substr($msg, 0, $max_char-strlen($shortlink)-4);
+ $msg .= '... ' . $shortlink;
+ }
+ // and now tweet it :-)
+ $dent->post('statuses/update', array('status' => $msg));
+ }
+ }
+ }
+}
+
diff --git a/addon/statusnet/twitteroauth.php b/addon/statusnet/twitteroauth.php
new file mode 100644
index 0000000000..cc771391f8
--- /dev/null
+++ b/addon/statusnet/twitteroauth.php
@@ -0,0 +1,245 @@
+<?php
+
+/*
+ * Abraham Williams (abraham@abrah.am) http://abrah.am
+ *
+ * The first PHP Library to support OAuth for Twitter's REST API.
+ */
+
+/* Load OAuth lib. You can find it at http://oauth.net */
+require_once('addon/twitter/OAuth.php');
+
+/**
+ * Twitter OAuth class
+ */
+class TwitterOAuth {
+ /* Contains the last HTTP status code returned. */
+ public $http_code;
+ /* Contains the last API call. */
+ public $url;
+ /* Set up the API root URL. */
+ public $host = "https://api.twitter.com/1/";
+ /* Set timeout default. */
+ public $timeout = 30;
+ /* Set connect timeout. */
+ public $connecttimeout = 30;
+ /* Verify SSL Cert. */
+ public $ssl_verifypeer = FALSE;
+ /* Respons format. */
+ public $format = 'json';
+ /* Decode returned json data. */
+ public $decode_json = TRUE;
+ /* Contains the last HTTP headers returned. */
+ public $http_info;
+ /* Set the useragnet. */
+ public $useragent = 'TwitterOAuth v0.2.0-beta2';
+ /* Immediately retry the API call if the response was not successful. */
+ //public $retry = TRUE;
+
+
+
+
+ /**
+ * Set API URLS
+ */
+ function accessTokenURL() { return 'https://api.twitter.com/oauth/access_token'; }
+ function authenticateURL() { return 'https://twitter.com/oauth/authenticate'; }
+ function authorizeURL() { return 'https://twitter.com/oauth/authorize'; }
+ function requestTokenURL() { return 'https://api.twitter.com/oauth/request_token'; }
+
+ /**
+ * Debug helpers
+ */
+ function lastStatusCode() { return $this->http_status; }
+ function lastAPICall() { return $this->last_api_call; }
+
+ /**
+ * construct TwitterOAuth object
+ */
+ function __construct($consumer_key, $consumer_secret, $oauth_token = NULL, $oauth_token_secret = NULL) {
+ $this->sha1_method = new OAuthSignatureMethod_HMAC_SHA1();
+ $this->consumer = new OAuthConsumer($consumer_key, $consumer_secret);
+ if (!empty($oauth_token) && !empty($oauth_token_secret)) {
+ $this->token = new OAuthConsumer($oauth_token, $oauth_token_secret);
+ } else {
+ $this->token = NULL;
+ }
+ }
+
+
+ /**
+ * Get a request_token from Twitter
+ *
+ * @returns a key/value array containing oauth_token and oauth_token_secret
+ */
+ function getRequestToken($oauth_callback = NULL) {
+ $parameters = array();
+ if (!empty($oauth_callback)) {
+ $parameters['oauth_callback'] = $oauth_callback;
+ }
+ $request = $this->oAuthRequest($this->requestTokenURL(), 'GET', $parameters);
+ $token = OAuthUtil::parse_parameters($request);
+ $this->token = new OAuthConsumer($token['oauth_token'], $token['oauth_token_secret']);
+ return $token;
+ }
+
+ /**
+ * Get the authorize URL
+ *
+ * @returns a string
+ */
+ function getAuthorizeURL($token, $sign_in_with_twitter = TRUE) {
+ if (is_array($token)) {
+ $token = $token['oauth_token'];
+ }
+ if (empty($sign_in_with_twitter)) {
+ return $this->authorizeURL() . "?oauth_token={$token}";
+ } else {
+ return $this->authenticateURL() . "?oauth_token={$token}";
+ }
+ }
+
+ /**
+ * Exchange request token and secret for an access token and
+ * secret, to sign API calls.
+ *
+ * @returns array("oauth_token" => "the-access-token",
+ * "oauth_token_secret" => "the-access-secret",
+ * "user_id" => "9436992",
+ * "screen_name" => "abraham")
+ */
+ function getAccessToken($oauth_verifier = FALSE) {
+ $parameters = array();
+ if (!empty($oauth_verifier)) {
+ $parameters['oauth_verifier'] = $oauth_verifier;
+ }
+ $request = $this->oAuthRequest($this->accessTokenURL(), 'GET', $parameters);
+ $token = OAuthUtil::parse_parameters($request);
+ $this->token = new OAuthConsumer($token['oauth_token'], $token['oauth_token_secret']);
+ return $token;
+ }
+
+ /**
+ * One time exchange of username and password for access token and secret.
+ *
+ * @returns array("oauth_token" => "the-access-token",
+ * "oauth_token_secret" => "the-access-secret",
+ * "user_id" => "9436992",
+ * "screen_name" => "abraham",
+ * "x_auth_expires" => "0")
+ */
+ function getXAuthToken($username, $password) {
+ $parameters = array();
+ $parameters['x_auth_username'] = $username;
+ $parameters['x_auth_password'] = $password;
+ $parameters['x_auth_mode'] = 'client_auth';
+ $request = $this->oAuthRequest($this->accessTokenURL(), 'POST', $parameters);
+ $token = OAuthUtil::parse_parameters($request);
+ $this->token = new OAuthConsumer($token['oauth_token'], $token['oauth_token_secret']);
+ return $token;
+ }
+
+ /**
+ * GET wrapper for oAuthRequest.
+ */
+ function get($url, $parameters = array()) {
+ $response = $this->oAuthRequest($url, 'GET', $parameters);
+ if ($this->format === 'json' && $this->decode_json) {
+ return json_decode($response);
+ }
+ return $response;
+ }
+
+ /**
+ * POST wrapper for oAuthRequest.
+ */
+ function post($url, $parameters = array()) {
+ $response = $this->oAuthRequest($url, 'POST', $parameters);
+ if ($this->format === 'json' && $this->decode_json) {
+ return json_decode($response);
+ }
+ return $response;
+ }
+
+ /**
+ * DELETE wrapper for oAuthReqeust.
+ */
+ function delete($url, $parameters = array()) {
+ $response = $this->oAuthRequest($url, 'DELETE', $parameters);
+ if ($this->format === 'json' && $this->decode_json) {
+ return json_decode($response);
+ }
+ return $response;
+ }
+
+ /**
+ * Format and sign an OAuth / API request
+ */
+ function oAuthRequest($url, $method, $parameters) {
+ if (strrpos($url, 'https://') !== 0 && strrpos($url, 'http://') !== 0) {
+ $url = "{$this->host}{$url}.{$this->format}";
+ }
+ $request = OAuthRequest::from_consumer_and_token($this->consumer, $this->token, $method, $url, $parameters);
+ $request->sign_request($this->sha1_method, $this->consumer, $this->token);
+ switch ($method) {
+ case 'GET':
+ return $this->http($request->to_url(), 'GET');
+ default:
+ return $this->http($request->get_normalized_http_url(), $method, $request->to_postdata());
+ }
+ }
+
+ /**
+ * Make an HTTP request
+ *
+ * @return API results
+ */
+ function http($url, $method, $postfields = NULL) {
+ $this->http_info = array();
+ $ci = curl_init();
+ /* Curl settings */
+ curl_setopt($ci, CURLOPT_USERAGENT, $this->useragent);
+ curl_setopt($ci, CURLOPT_CONNECTTIMEOUT, $this->connecttimeout);
+ curl_setopt($ci, CURLOPT_TIMEOUT, $this->timeout);
+ curl_setopt($ci, CURLOPT_RETURNTRANSFER, TRUE);
+ curl_setopt($ci, CURLOPT_HTTPHEADER, array('Expect:'));
+ curl_setopt($ci, CURLOPT_SSL_VERIFYPEER, $this->ssl_verifypeer);
+ curl_setopt($ci, CURLOPT_HEADERFUNCTION, array($this, 'getHeader'));
+ curl_setopt($ci, CURLOPT_HEADER, FALSE);
+
+ switch ($method) {
+ case 'POST':
+ curl_setopt($ci, CURLOPT_POST, TRUE);
+ if (!empty($postfields)) {
+ curl_setopt($ci, CURLOPT_POSTFIELDS, $postfields);
+ }
+ break;
+ case 'DELETE':
+ curl_setopt($ci, CURLOPT_CUSTOMREQUEST, 'DELETE');
+ if (!empty($postfields)) {
+ $url = "{$url}?{$postfields}";
+ }
+ }
+
+ curl_setopt($ci, CURLOPT_URL, $url);
+ $response = curl_exec($ci);
+ $this->http_code = curl_getinfo($ci, CURLINFO_HTTP_CODE);
+ $this->http_info = array_merge($this->http_info, curl_getinfo($ci));
+ $this->url = $url;
+ curl_close ($ci);
+ return $response;
+ }
+
+ /**
+ * Get the header info to store.
+ */
+ function getHeader($ch, $header) {
+ $i = strpos($header, ':');
+ if (!empty($i)) {
+ $key = str_replace('-', '_', strtolower(substr($header, 0, $i)));
+ $value = trim(substr($header, $i + 2));
+ $this->http_header[$key] = $value;
+ }
+ return strlen($header);
+ }
+}
--
2.39.5