<?php

/**
* get_headers
*
* get_headers() is included in php5 but not php4. So lets make our own
* if it doesn't exist
*/
if(!function_exists('get_headers')){
	function get_headers($url ) {

		   $url_info=parse_url($url);
		   if (isset($url_info['scheme']) && $url_info['scheme'] == 'https') {
			   $port = 443;
			   @$fp=fsockopen('ssl://'.$url_info['host'], $port, $errno, $errstr, 10);
		   } else {
			   $port = isset($url_info['port']) ? $url_info['port'] : 80;
			   @$fp=fsockopen($url_info['host'], $port, $errno, $errstr, 10);
		   }
		   if($fp) {
			   stream_set_timeout($fp, 10);
			   $head = "HEAD ".@$url_info['path']."?".@$url_info['query'];
			   $head .= " HTTP/1.0\r\nHost: ".@$url_info['host']."\r\n\r\n";
			   fputs($fp, $head);
			   while(!feof($fp)) {
				   if($header=trim(fgets($fp, 1024))) {
							$sc_pos = strpos( $header, ':' );
							if( $sc_pos === false ) {
							   $headers['status'] = $header;
							} else {
								$label = substr( $header, 0, $sc_pos );
								$value = substr( $header, $sc_pos+1 );
								$headers[iwp_strtolower($label)] = trim($value);
							}
				   }
			   }
			   return $headers;
		   }
		   else {
			   return false;
		   }
	   }
}


if (!function_exists("stripos")) {
	function stripos($str,$needle,$offset=0)
	{
		return strpos(iwp_strtolower($str),iwp_strtolower($needle),$offset);
	}
}

if (!function_exists('json_decode')) {
	GetLib('class.json');
	function json_decode ($content, $assoc=false) {
		//	json_decode support for PHP < 5.2
		if ($assoc) {
			$json = new Services_JSON(SERVICES_JSON_LOOSE_TYPE);
		} else {
			$json = new Services_JSON();
		}
		return $json->decode($content);
	}
}

if (!function_exists('json_encode'))
{
  function json_encode($a=false)
  {
    if (is_null($a)) return 'null';
    if ($a === false) return 'false';
    if ($a === true) return 'true';
    if (is_scalar($a))
    {
      if (is_float($a))
      {
        // Always use "." for floats.
        return floatval(str_replace(",", ".", strval($a)));
      }

      if (is_string($a))
      {
        static $jsonReplaces = array(array("\\", "/", "\n", "\t", "\r", "\b", "\f", '"'), array('\\\\', '\\/', '\\n', '\\t', '\\r', '\\b', '\\f', '\"'));
        return '"' . str_replace($jsonReplaces[0], $jsonReplaces[1], $a) . '"';
      }
      else
        return $a;
    }
    $isList = true;
    for ($i = 0, reset($a); $i < count($a); $i++, next($a))
    {
      if (key($a) !== $i)
      {
        $isList = false;
        break;
      }
    }
    $result = array();
    if ($isList)
    {
      foreach ($a as $v) $result[] = json_encode($v);
      return '[' . implode(',', $result) . ']';
    }
    else
    {
      foreach ($a as $k => $v) $result[] = json_encode($k).':'.json_encode($v);
      return '{' . implode(',', $result) . '}';
    }
  }
}