3 * Functions that relate to HTTP requests
5 * On functions using the 3rd party library Requests:
6 * Thir goal here is to provide convenient wrapper functions to the Requests library. There are
7 * 2 types of functions for each METHOD, where METHOD is 'get' or 'post' (implement more as needed)
8 * - yourls_http_METHOD() :
9 * Return a complete Response object (with ->body, ->headers, ->status_code, etc...) or
10 * a simple string (error message)
11 * - yourls_http_METHOD_body() :
12 * Return a string (response body) or null if there was an error
18 * Perform a GET request, return response object or error string message
20 * Notable object properties: body, headers, status_code
23 * @see yourls_http_request
24 * @return mixed Response object, or error string
26 function yourls_http_get( $url, $headers = array(), $data = array(), $options = array() ) {
27 return yourls_http_request( 'GET', $url, $headers, $data, $options );
31 * Perform a GET request, return body or null if there was an error
34 * @see yourls_http_request
35 * @return mixed String (page body) or null if error
37 function yourls_http_get_body( $url, $headers = array(), $data = array(), $options = array() ) {
38 $return = yourls_http_get( $url, $headers, $data, $options );
39 return isset( $return->body ) ? $return->body : null;
43 * Perform a POST request, return response object
45 * Notable object properties: body, headers, status_code
48 * @see yourls_http_request
49 * @return mixed Response object, or error string
51 function yourls_http_post( $url, $headers = array(), $data = array(), $options = array() ) {
52 return yourls_http_request( 'POST', $url, $headers, $data, $options );
56 * Perform a POST request, return body
58 * Wrapper for yourls_http_request()
61 * @see yourls_http_request
62 * @return mixed String (page body) or null if error
64 function yourls_http_post_body( $url, $headers = array(), $data = array(), $options = array() ) {
65 $return = yourls_http_post( $url, $headers, $data, $options );
66 return isset( $return->body ) ? $return->body : null;
70 * Get proxy information
72 * @uses YOURLS_PROXY YOURLS_PROXY_USERNAME YOURLS_PROXY_PASSWORD
74 * @return mixed false if no proxy is defined, or string like '10.0.0.201:3128' or array like ('10.0.0.201:3128', 'username', 'password')
76 function yourls_http_get_proxy() {
79 if( defined( 'YOURLS_PROXY' ) ) {
80 $proxy = YOURLS_PROXY;
81 if( defined( 'YOURLS_PROXY_USERNAME' ) && defined( 'YOURLS_PROXY_PASSWORD' ) ) {
82 $proxy = array( YOURLS_PROXY, YOURLS_PROXY_USERNAME, YOURLS_PROXY_PASSWORD );
86 return yourls_apply_filter( 'http_get_proxy', $proxy );
90 * Get list of hosts that should bypass the proxy
92 * @uses YOURLS_PROXY_BYPASS_HOSTS
94 * @return mixed false if no host defined, or string like "example.com, *.mycorp.com"
96 function yourls_http_get_proxy_bypass_host() {
97 $hosts = defined( 'YOURLS_PROXY_BYPASS_HOSTS' ) ? YOURLS_PROXY_BYPASS_HOSTS : false;
99 return yourls_apply_filter( 'http_get_proxy_bypass_host', $hosts );
103 * Default HTTP requests options for YOURLS
105 * For a list of all available options, see function request() in /includes/Requests/Requests.php
108 * @return array Options
110 function yourls_http_default_options() {
112 'timeout' => yourls_apply_filter( 'http_default_options_timeout', 3 ),
113 'useragent' => yourls_http_user_agent(),
114 'follow_redirects' => true,
118 if( yourls_http_get_proxy() ) {
119 $options['proxy'] = yourls_http_get_proxy();
122 return yourls_apply_filter( 'http_default_options', $options );
126 * Whether URL should be sent through the proxy server.
128 * Concept stolen from WordPress. The idea is to allow some URLs, including localhost and the YOURLS install itself,
129 * to be requested directly and bypassing any defined proxy.
132 * @uses YOURLS_PROXY_BYPASS_HOSTS
134 * @param string $url URL to check
135 * @return bool true to request through proxy, false to request directly
137 function yourls_send_through_proxy( $url ) {
139 // Allow plugins to short-circuit the whole function
140 $pre = yourls_apply_filter( 'shunt_send_through_proxy', null, $url );
144 $check = @parse_url( $url );
146 if( !isset( $check['host'] ) ) {
150 // Malformed URL, can not process, but this could mean ssl, so let through anyway.
151 if ( $check === false )
154 // Self and loopback URLs are considered local (':' is parse_url() host on '::1')
155 $home = parse_url( YOURLS_SITE );
156 $local = array( 'localhost', '127.0.0.1', '127.1', '[::1]', ':', $home['host'] );
158 if( in_array( $check['host'], $local ) )
161 $bypass = yourls_http_get_proxy_bypass_host();
163 if( $bypass === false OR $bypass === '' ) {
167 // Build array of hosts to bypass
168 static $bypass_hosts;
169 static $wildcard_regex = false;
170 if ( null == $bypass_hosts ) {
171 $bypass_hosts = preg_split( '|\s*,\s*|', $bypass );
173 if ( false !== strpos( $bypass, '*' ) ) {
174 $wildcard_regex = array();
175 foreach ( $bypass_hosts as $host ) {
176 $wildcard_regex[] = str_replace( '\*', '.+', preg_quote( $host, '/' ) );
177 if ( false !== strpos( $host, '*' ) ) {
178 $wildcard_regex[] = str_replace( '\*\.', '', preg_quote( $host, '/' ) );
181 $wildcard_regex = '/^(' . implode( '|', $wildcard_regex ) . ')$/i';
185 if ( !empty( $wildcard_regex ) )
186 return !preg_match( $wildcard_regex, $check['host'] );
188 return !in_array( $check['host'], $bypass_hosts );
192 * Perform a HTTP request, return response object
195 * @param string $type HTTP request type (GET, POST)
196 * @param string $url URL to request
197 * @param array $headers Extra headers to send with the request
198 * @param array $data Data to send either as a query string for GET requests, or in the body for POST requests
199 * @param array $options Options for the request (see /includes/Requests/Requests.php:request())
200 * @return object Requests_Response object
202 function yourls_http_request( $type, $url, $headers, $data, $options ) {
203 yourls_http_load_library();
205 $options = array_merge( yourls_http_default_options(), $options );
207 if( yourls_http_get_proxy() && !yourls_send_through_proxy( $url ) )
208 unset( $options['proxy'] );
211 $result = Requests::request( $url, $headers, $data, $type, $options );
212 } catch( Requests_Exception $e ) {
213 $result = yourls_debug_log( $e->getMessage() . ' (' . $type . ' on ' . $url . ')' );
220 * Check if Requests class is defined, include Requests library if need be
222 * All HTTP functions should perform that check prior to any operation. This is to avoid
223 * include()-ing all the Requests files on every YOURLS instance disregarding whether needed or not.
227 function yourls_http_load_library() {
228 if ( !class_exists( 'Requests', false ) ) {
229 require_once dirname( __FILE__ ) . '/Requests/Requests.php';
230 Requests::register_autoloader();
235 * Return funky user agent string
238 * @return string UA string
240 function yourls_http_user_agent() {
241 return yourls_apply_filter( 'http_user_agent', 'YOURLS v'.YOURLS_VERSION.' +http://yourls.org/ (running on '.YOURLS_SITE.')' );
245 * Check api.yourls.org if there's a newer version of YOURLS
247 * This function collects various stats to help us improve YOURLS. See the blog post about it:
248 * http://blog.yourls.org/2014/01/on-yourls-1-7-and-api-yourls-org/
249 * Results of requests sent to api.yourls.org are stored in option 'core_version_checks' and is an object
250 * with the following properties:
251 * - failed_attempts : number of consecutive failed attempts
252 * - last_attempt : time() of last attempt
253 * - last_result : content retrieved from api.yourls.org during previous check
254 * - version_checked : installed YOURLS version that was last checked
257 * @return mixed JSON data if api.yourls.org successfully requested, false otherwise
259 function yourls_check_core_version() {
261 global $ydb, $yourls_user_passwords;
263 $checks = yourls_get_option( 'core_version_checks' );
265 // Invalidate check data when YOURLS version changes
266 if ( is_object( $checks ) && YOURLS_VERSION != $checks->version_checked ) {
270 if( !is_object( $checks ) ) {
271 $checks = new stdClass;
272 $checks->failed_attempts = 0;
273 $checks->last_attempt = 0;
274 $checks->last_result = '';
275 $checks->version_checked = YOURLS_VERSION;
278 // Config file location ('u' for '/user' or 'i' for '/includes')
279 $conf_loc = str_replace( YOURLS_ABSPATH, '', YOURLS_CONFIGFILE );
280 $conf_loc = str_replace( '/config.php', '', $conf_loc );
281 $conf_loc = ( $conf_loc == '/user' ? 'u' : 'i' );
283 // The collection of stuff to report
285 // Globally uniquish site identifier
286 'md5' => md5( YOURLS_SITE . YOURLS_ABSPATH ),
288 // Install information
289 'failed_attempts' => $checks->failed_attempts,
290 'yourls_site' => defined( 'YOURLS_SITE' ) ? YOURLS_SITE : 'unknown',
291 'yourls_version' => defined( 'YOURLS_VERSION' ) ? YOURLS_VERSION : 'unknown',
292 'php_version' => phpversion(),
293 'mysql_version' => $ydb->mysql_version(),
294 'locale' => yourls_get_locale(),
296 // custom DB driver if any, and useful common PHP extensions
297 'db_driver' => defined( 'YOURLS_DB_DRIVER' ) ? YOURLS_DB_DRIVER : 'unset',
298 'db_ext_pdo' => extension_loaded( 'pdo_mysql' ) ? 1 : 0,
299 'db_ext_mysql' => extension_loaded( 'mysql' ) ? 1 : 0,
300 'db_ext_mysqli' => extension_loaded( 'mysqli' ) ? 1 : 0,
301 'ext_curl' => extension_loaded( 'curl' ) ? 1 : 0,
303 // Config information
304 'num_users' => count( $yourls_user_passwords ),
305 'config_location' => $conf_loc,
306 'yourls_private' => defined( 'YOURLS_PRIVATE' ) && YOURLS_PRIVATE ? 1 : 0,
307 'yourls_unique' => defined( 'YOURLS_UNIQUE_URLS' ) && YOURLS_UNIQUE_URLS ? 1 : 0,
308 'yourls_url_convert' => defined( 'YOURLS_URL_CONVERT' ) ? YOURLS_URL_CONVERT : 'unknown',
309 'num_active_plugins' => yourls_has_active_plugins(),
310 'num_pages' => defined( 'YOURLS_PAGEDIR' ) ? count( (array) glob( YOURLS_PAGEDIR .'/*.php') ) : 0,
313 $stuff = yourls_apply_filter( 'version_check_stuff', $stuff );
316 $url = 'http://api.yourls.org/core/version/1.0/';
317 if( yourls_can_http_over_ssl() )
318 $url = yourls_set_url_scheme( $url, 'https' );
319 $req = yourls_http_post( $url, array(), $stuff );
321 $checks->last_attempt = time();
322 $checks->version_checked = YOURLS_VERSION;
324 // Unexpected results ?
325 if( is_string( $req ) or !$req->success ) {
326 $checks->failed_attempts = $checks->failed_attempts + 1;
327 yourls_update_option( 'core_version_checks', $checks );
332 $json = json_decode( trim( $req->body ) );
334 if( isset( $json->latest ) && isset( $json->zipurl ) ) {
335 // All went OK - mark this down
336 $checks->failed_attempts = 0;
337 $checks->last_result = $json;
338 yourls_update_option( 'core_version_checks', $checks );
343 // Request returned actual result, but not what we expected
348 * Determine if we want to check for a newer YOURLS version (and check if applicable)
350 * Currently checks are performed every 24h and only when someone is visiting an admin page.
351 * In the future (1.8?) maybe check with cronjob emulation instead.
354 * @return bool true if a check was needed and successfully performed, false otherwise
356 function yourls_maybe_check_core_version() {
358 // Allow plugins to short-circuit the whole function
359 $pre = yourls_apply_filter( 'shunt_maybe_check_core_version', null );
363 if( defined( 'YOURLS_NO_VERSION_CHECK' ) && YOURLS_NO_VERSION_CHECK )
366 if( !yourls_is_admin() )
369 $checks = yourls_get_option( 'core_version_checks' );
371 /* We don't want to check if :
372 - last_result is set (a previous check was performed)
373 - and it was less than 24h ago (or less than 2h ago if it wasn't successful)
374 - and version checked matched version running
375 Otherwise, we want to check.
377 if( !empty( $checks->last_result )
380 ( $checks->failed_attempts == 0 && ( ( time() - $checks->last_attempt ) < 24 * 3600 ) )
382 ( $checks->failed_attempts > 0 && ( ( time() - $checks->last_attempt ) < 2 * 3600 ) )
384 AND ( $checks->version_checked == YOURLS_VERSION )
388 // We want to check if there's a new version
389 $new_check = yourls_check_core_version();
391 // Could not check for a new version, and we don't have ancient data
392 if( false == $new_check && !isset( $checks->last_result->latest ) )
399 * Check if server can perform HTTPS requests, return bool
402 * @return bool whether the server can perform HTTP requests over SSL
404 function yourls_can_http_over_ssl() {
405 $ssl_curl = $ssl_socket = false;
407 if( function_exists( 'curl_exec' ) ) {
408 $curl_version = curl_version();
409 $ssl_curl = ( $curl_version['features'] & CURL_VERSION_SSL );
412 if( function_exists( 'stream_socket_client' ) ) {
413 $ssl_socket = extension_loaded( 'openssl' ) && function_exists( 'openssl_x509_parse' );
416 return ( $ssl_curl OR $ssl_socket );