pastebin - collaborative debugging

<?php
/**
 * is_file_url() check if a URL gives a valid response code
 *
 * @param   STRING  $url            - The URL to check (needs scheme and host, must be http only)
 * @param   BOOL    $allowRedirects - If a 3xx code is returned and a location header is given, should we follow it?
 * @param   INT     $maxNumRedirs   - How many redirects should we follow befroe bailing out?
 * @param   INT     $redirNum       - Do NOT Set this in your calls to the function--used to track recursive calls and avoid endless recursion
 * @return  BOOL                    - Whether or not the URL returned a valid response code
 */
function is_file_url($url,$allowRedirects=true,$maxNumRedirs=5,$redirNum=0)
{
  $returnValue = false;
  if($redirNum<=$maxNumRedirs)
  {
    $check = httpRequestStatus($url);
    if($check[0]==200)
    {
      $returnValue = true;
    }
    elseif($allowRedirects===true && substr($check[0],0,1)=='3' && !empty($check[1]))
    {
      $returnValue = is_file_url($check[1],$allowRedirects,$maxNumRedirs,($redirNum+1));
    }
  }
  return $returnValue;
}

function httpRequestStatus($url){
  $returnValue = array('0','');
  $urlParts = parse_url($url);
  if($urlParts['scheme']=='http' &&
     (gethostbyname($urlParts['host'])!=$urlParts['host'] ||
      preg_match("/^((\d{1,2}|1\d\d|2[0-4]\d|25[0-5])\.){3}(\d{1,2}|1\d\d|2[0-4]\d|25[0-5])$/",$urlParts['host'])
     )
    )
  {
    $urlParts['path'] = !empty($urlParts['path']) ? $urlParts['path'] : '/';
    $httpREQ = "HEAD {$urlParts['path']} HTTP/1.0\r\nHost: {$urlParts['host']}\r\n\r\n";
          $httpSocket = @fsockopen($urlParts['host'], 80, $errno, $errstr, 5);
    if(is_resource($httpSocket)){
      $returnFromServer = '';
      fputs($httpSocket, $httpREQ);
      while(!feof($httpSocket)){
        $returnFromServer .= fgets($httpSocket,128);
        if(ereg("\r\n\r\n",$returnFromServer)){
                                  break;
        }
      }
      fclose($httpSocket);
      if(!empty($returnFromServer)){
        if(preg_match('/\d{3}/',$returnFromServer,$statusCode)){
          $statusCode = $statusCode[0];
          $locationField = (
                            substr($statusCode,0,1)=='3' &&
                            preg_match('/Location: (.*?)\r\n/i',$returnFromServer,$parsedLocationField) &&
                            isset($parsedLocationField[1])
                           )
                         ? $parsedLocationField[1]
                         : '';
          $returnValue = array($statusCode,$locationField);
        }
      }
    }
        }
        return $returnValue;
}

//Examples:
//Valid URL, is_file_url() returns true
$url = 'http://www.jaaulde.com/';
echo $url.' is '.(is_file_url($url)?'good':'bad')."\n";
//Invalid URL, is_file_url() returns false
$url = 'http://www.jaaulde.com/feuhfiuhufih';
echo $url.' is '.(is_file_url($url)?'good':'bad')."\n";
//Valid URL, that has redirection, when allowing redirection is_file_url() returns true
$url = 'http://www.jaaulde.com/test_bed/cookieLib';
echo $url.' is '.(is_file_url($url)?'good':'bad')."\n";
//Valid URL, that has redirection, when NOT allowing redirection is_file_url() returns false
$url = 'http://www.jaaulde.com/test_bed/cookieLib';
echo $url.' is '.(is_file_url($url,false)?'good':'bad')."\n";

//Sample output when run from command line:
/*

Jims-MacBook-Pro:~ jim$ php isfileurl.php
http://www.jaaulde.com/ is good
http://www.jaaulde.com/feuhfiuhufih is bad
http://www.jaaulde.com/test_bed/cookieLib is good
http://www.jaaulde.com/test_bed/cookieLib is bad
Jims-MacBook-Pro:~ jim$

*/
?>