diff options
Diffstat (limited to 'kohana/helpers/remote.php')
-rw-r--r-- | kohana/helpers/remote.php | 66 |
1 files changed, 0 insertions, 66 deletions
diff --git a/kohana/helpers/remote.php b/kohana/helpers/remote.php deleted file mode 100644 index f9e0267f..00000000 --- a/kohana/helpers/remote.php +++ /dev/null @@ -1,66 +0,0 @@ -<?php defined('SYSPATH') OR die('No direct access allowed.'); -/** - * Remote url/file helper. - * - * $Id: remote.php 3769 2008-12-15 00:48:56Z zombor $ - * - * @package Core - * @author Kohana Team - * @copyright (c) 2007-2008 Kohana Team - * @license http://kohanaphp.com/license.html - */ -class remote_Core { - - public static function status($url) - { - if ( ! valid::url($url, 'http')) - return FALSE; - - // Get the hostname and path - $url = parse_url($url); - - if (empty($url['path'])) - { - // Request the root document - $url['path'] = '/'; - } - - // Open a remote connection - $remote = fsockopen($url['host'], 80, $errno, $errstr, 5); - - if ( ! is_resource($remote)) - return FALSE; - - // Set CRLF - $CRLF = "\r\n"; - - // Send request - fwrite($remote, 'HEAD '.$url['path'].' HTTP/1.0'.$CRLF); - fwrite($remote, 'Host: '.$url['host'].$CRLF); - fwrite($remote, 'Connection: close'.$CRLF); - fwrite($remote, 'User-Agent: Kohana Framework (+http://kohanaphp.com/)'.$CRLF); - - // Send one more CRLF to terminate the headers - fwrite($remote, $CRLF); - - while ( ! feof($remote)) - { - // Get the line - $line = trim(fgets($remote, 512)); - - if ($line !== '' AND preg_match('#^HTTP/1\.[01] (\d{3})#', $line, $matches)) - { - // Response code found - $response = (int) $matches[1]; - - break; - } - } - - // Close the connection - fclose($remote); - - return isset($response) ? $response : FALSE; - } - -} // End remote
\ No newline at end of file |