replace echo with Log:: calls
[shpub.git] / src / shpub / Command / Connect.php
1 <?php
2 namespace shpub;
3
4 /**
5  * @link http://micropub.net/draft/
6  * @link http://indieweb.org/authorization-endpoint
7  */
8 class Command_Connect
9 {
10     public static $client_id = 'http://cweiske.de/shpub.htm';
11
12     public function __construct(Config $cfg)
13     {
14         $this->cfg = $cfg;
15     }
16
17     public function run($server, $user, $newKey, $force)
18     {
19         $server = Validator::url($server, 'server');
20         if ($user === null) {
21             //indieweb: homepage is your identity
22             $user = $server;
23         } else {
24             $user = Validator::url($user, 'user');
25         }
26
27         $host = $this->getHost($newKey != '' ? $newKey : $server, $force);
28         if ($host === null) {
29             //already taken
30             return;
31         }
32         if ($host->endpoints->incomplete()) {
33             $host->server = $server;
34             $host->loadEndpoints();
35         }
36
37         list($redirect_uri, $socketStr) = $this->getHttpServerData();
38         $state = time();
39         Log::msg(
40             "To authenticate, open the following URL:\n"
41             . $this->getBrowserAuthUrl($host, $user, $redirect_uri, $state)
42         );
43
44         $authParams = $this->startHttpServer($socketStr);
45         if ($authParams['state'] != $state) {
46             Log::err('Wrong "state" parameter value: ' . $authParams['state']);
47             exit(2);
48         }
49         $code    = $authParams['code'];
50         $userUrl = $authParams['me'];
51
52         $accessToken = $this->fetchAccessToken(
53             $host, $userUrl, $code, $redirect_uri, $state
54         );
55
56         //all fine. update config
57         $host->user  = $userUrl;
58         $host->token = $accessToken;
59
60         if ($newKey != '') {
61             $hostKey = $newKey;
62         } else {
63             $hostKey = $this->cfg->getHostByName($server);
64             if ($hostKey === null) {
65                 $keyBase = parse_url($host->server, PHP_URL_HOST);
66                 $newKey  = $keyBase;
67                 $count = 0;
68                 while (isset($this->cfg->hosts[$newKey])) {
69                     $newKey = $keyBase . ++$count;
70                 }
71                 $hostKey = $newKey;
72             }
73         }
74         $this->cfg->hosts[$hostKey] = $host;
75         $this->cfg->save();
76         Log::info("Server configuration $hostKey saved successfully.");
77     }
78
79     protected function fetchAccessToken(
80         $host, $userUrl, $code, $redirect_uri, $state
81     ) {
82         $req = new \HTTP_Request2($host->endpoints->token, 'POST');
83         if (version_compare(PHP_VERSION, '5.6.0', '<')) {
84             //correct ssl validation on php 5.5 is a pain, so disable
85             $req->setConfig('ssl_verify_host', false);
86             $req->setConfig('ssl_verify_peer', false);
87         }
88         $req->setHeader('Content-Type: application/x-www-form-urlencoded');
89         $req->setBody(
90             http_build_query(
91                 [
92                     'me'           => $userUrl,
93                     'code'         => $code,
94                     'redirect_uri' => $redirect_uri,
95                     'client_id'    => static::$client_id,
96                     'state'        => $state,
97                 ]
98             )
99         );
100         $res = $req->send();
101         if (intval($res->getStatus() / 100) !== 2) {
102             Log::err('Failed to fetch access token');
103             Log::err('Server responded with HTTP status code ' . $res->getStatus());
104             Log::err($res->getBody());
105             exit(2);
106         }
107         if ($res->getHeader('content-type') != 'application/x-www-form-urlencoded') {
108             Log::err('Wrong content type in auth verification response');
109             exit(2);
110         }
111         parse_str($res->getBody(), $tokenParams);
112         if (!isset($tokenParams['access_token'])) {
113             Log::err('"access_token" missing');
114             exit(2);
115         }
116
117         $accessToken = $tokenParams['access_token'];
118         return $accessToken;
119     }
120
121     protected function getBrowserAuthUrl($host, $user, $redirect_uri, $state)
122     {
123         return $host->endpoints->authorization
124             . '?me=' . urlencode($user)
125             . '&client_id=' . urlencode(static::$client_id)
126             . '&redirect_uri=' . urlencode($redirect_uri)
127             . '&state=' . $state
128             . '&scope=post'
129             . '&response_type=code';
130     }
131
132     protected function getHost($keyOrServer, $force)
133     {
134         $host = new Config_Host();
135         $key = $this->cfg->getHostByName($keyOrServer);
136         if ($key !== null) {
137             $host = $this->cfg->hosts[$key];
138             if (!$force && $host->token != '') {
139                 Log::err('Token already available');
140                 return;
141             }
142         }
143         return $host;
144     }
145
146     protected function getHttpServerData()
147     {
148         $ip   = '127.0.0.1';
149         $port = 12345;
150
151         if (isset($_SERVER['SSH_CONNECTION'])) {
152             $parts = explode(' ', $_SERVER['SSH_CONNECTION']);
153             if (count($parts) >= 3) {
154                 $ip = $parts[2];
155             }
156         }
157         if (strpos($ip, ':') !== false) {
158             //ipv6
159             $ip = '[' . $ip . ']';
160         }
161
162         $redirect_uri = 'http://' . $ip . ':' . $port . '/callback';
163         $socketStr    = 'tcp://' . $ip . ':' . $port;
164         return [$redirect_uri, $socketStr];
165     }
166
167     protected function startHttpServer($socketStr)
168     {
169         $responseOk = "HTTP/1.0 200 OK\r\n"
170             . "Content-Type: text/plain\r\n"
171             . "\r\n"
172             . "Ok. You may close this tab and return to the shell.\r\n";
173         $responseErr = "HTTP/1.0 400 Bad Request\r\n"
174             . "Content-Type: text/plain\r\n"
175             . "\r\n"
176             . "Bad Request\r\n";
177
178         //5 minutes should be enough for the user to confirm
179         ini_set('default_socket_timeout', 60 * 5);
180         $server = stream_socket_server($socketStr, $errno, $errstr);
181         if (!$server) {
182             Log::err('Error starting HTTP server');
183             return false;
184         }
185
186         do {
187             $sock = stream_socket_accept($server);
188             if (!$sock) {
189                 Log::err('Error accepting socket connection');
190                 exit(1);
191             }
192
193             $headers = [];
194             $body    = null;
195             $content_length = 0;
196             //read request headers
197             while (false !== ($line = trim(fgets($sock)))) {
198                 if ('' === $line) {
199                     break;
200                 }
201                 $regex = '#^Content-Length:\s*([[:digit:]]+)\s*$#i';
202                 if (preg_match($regex, $line, $matches)) {
203                     $content_length = (int) $matches[1];
204                 }
205                 $headers[] = $line;
206             }
207
208             // read content/body
209             if ($content_length > 0) {
210                 $body = fread($sock, $content_length);
211             }
212
213             // send response
214             list($method, $url, $httpver) = explode(' ', $headers[0]);
215             if ($method == 'GET') {
216                 $parts = parse_url($url);
217                 if (isset($parts['path']) && $parts['path'] == '/callback'
218                     && isset($parts['query'])
219                 ) {
220                     parse_str($parts['query'], $query);
221                     if (isset($query['code'])
222                         && isset($query['state'])
223                         && isset($query['me'])
224                     ) {
225                         fwrite($sock, $responseOk);
226                         fclose($sock);
227                         return $query;
228                     }
229                 }
230             }
231
232             fwrite($sock, $responseErr);
233             fclose($sock);
234         } while (true);
235     }
236 }
237 ?>