]> git.mxchange.org Git - quix0rs-gnu-social.git/blobdiff - actions/accesstoken.php
don't do an end tag for empty elements
[quix0rs-gnu-social.git] / actions / accesstoken.php
index e28a9334542f83e214191c2c36a6840d4ec32c6d..1c1db8fbc4f0aab97dfe72aaa2ef6550d1c95a90 100644 (file)
 
 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__);
+                       $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());
+               }
        }
 }