add Net Socket

[quix0rs-gnu-social.git] / actions / accesstoken.php

diff --git a/actions/accesstoken.php b/actions/accesstoken.php
index e28a9334542f83e214191c2c36a6840d4ec32c6d..4907749ce0519dda5a8a6f1f8a38f9e6280caee0 100644 (file)
--- a/actions/accesstoken.php
+++ b/actions/accesstoken.php
@@ -19,9 +19,24 @@
 
 if (!defined('LACONICA')) { exit(1); }
 
+require_once(INSTALLDIR.'/lib/omb.php');
+
 class AccesstokenAction extends Action {
        function handle($args) {
                parent::handle($args);
-               common_server_error(_t('Not yet implemented.'));
+               try {
+                       common_debug('getting request from env variables', __FILE__);
+                       common_remove_magic_from_request();
+                       $req = OAuthRequest::from_request();
+                       common_debug('getting a server', __FILE__);
+                       $server = omb_oauth_server();
+                       common_debug('fetching the access token', __FILE__);
+                       $token = $server->fetch_access_token($req);
+                       common_debug('got this token: "'.print_r($token,TRUE).'"', __FILE__);
+                       common_debug('printing the access token', __FILE__);
+                       print $token;
+               } catch (OAuthException $e) {
+                       common_server_error($e->getMessage());
+               }
        }
 }