Add url::is_online(); to Helpers

[cecplex]

It's a bit of an unusual function as it's not like the other url functions; however, it's proven to be VERY helpful for me and might be for others too.

If you guys agree, maybe bring it into the Kohana core.

	/*
	 * Method: is_online
	 *  Checks if the provided URL is online.
	 *
	 * Parameters:
	 *  uri    - URL to check
	 *
	 * Returns:
	 *  True or False depending on the status of the given URI
	 */
	public static function is_online($link) {        
		$url_parts = @parse_url($link);

		if(empty($url_parts['host'])) { 
			return false;
		}
		
		if(!empty($url_parts['path'])) {
			$documentpath = $url_parts['path'];
		} else {
			$documentpath = "/";
		}

		if(!empty($url_parts['query'])) {
			$documentpath .= "?" . $url_parts['query'];
		}

		$host = $url_parts['host'];
		$port = $url_parts['port'];
		
		// Now (HTTP-)GET $documentpath at $host";
		$port = empty($port) ? 80 : $port;
		
		$socket = @fsockopen( $host, $port, $errno, $errstr, 30 );
		
		if(!$socket){
			return false;
		} else {
			fwrite ($socket, "HEAD ".$documentpath." HTTP/1.0\r\nHost: $host\r\n\r\n");
			$http_response = fgets($socket, 22);

			if(ereg("200 OK",$http_response,$regs)) {
				return true;
				fclose($socket);
			} else {
				return false;
			}
		}
	}

[gregmac]

This seems a bit too specialized, imho. The rest of the url helper has to do with the local site, this doesn't really fit in and goes against the kohana goal of being lightweight.

At best, it probably belongs in a "web" or "http" library (which may not be part of core) along side other methods like fetch_page(), post(), etc.. (those can probably be combined, but i digress).

[cecplex]

I have to agree with you. I think the Kohana developers may want to implement an http helper as you mentioned though, I can see a big demand for functions like what you mentioned. Adding a http::post() function alone could replace a lot of repetitive cURL code in the Payment drivers.

[Shadowhand]

See also: http://kohana.pastebin.com/md6cf8a9

[Shadowhand]

http://kohana.pastebin.com/f5b77720b if the above link does not work.

[Shadowhand]

See r3149.