Simple script to return php configuration

tedious.php

<?php
    /*
     * tedious version 0.1
     * 
     *  Simple script to return php configuration
     */
#settings
$password = 'ablabla';
// some password protection
if ($_GET['pass'] != $password) 
{
    die();
}
#data
$phpinfo_opts = array(
    'INFO_GENERAL'          => INFO_GENERAL,
    'INFO_CREDITS'          => INFO_CREDITS,
    'INFO_CONFIGURATION'    => INFO_CONFIGURATION,
    'INFO_MODULES'          => INFO_MODULES,
    'INFO_ENVIRONMENT'      => INFO_ENVIRONMENT,
    'INFO_VARIABLES'        => INFO_VARIABLES,
    'INFO_LICENSE'          => INFO_LICENSE,
    'INFO_ALL'              => INFO_ALL
);
// get type of phpinfo, or INFO_ALL
$cond = ( (isset($_GET['what'])) 
    AND (in_array($_GET['what'], array_flip($phpinfo_opts) )) 
);
$key = $_GET['what'];
$what = ($cond) ? $phpinfo_opts[$key] : INFO_ALL;
// init extension, default value
$extension = '.html';
# functions
/**
 *  taken http://php.net/manual/en/function.phpinfo.php#106862 to get phpinfo 
 *  output to an array
 * 
 * @param string $data
 * @return array
 */
function phpinfo_array($data)
{
    $info_arr = array();
    $info_lines = explode("\n", strip_tags($data, "<tr><td><h2>"));
    $cat = "General";
    foreach($info_lines as $line)
    {
        // new cat?
        preg_match("~<h2>(.*)</h2>~", $line, $title) ? $cat = $title[1] : null;
        if(preg_match("~<tr><td[^>]+>([^<]*)</td><td[^>]+>([^<]*)</td></tr>~", $line, $val))
        {
            $info_arr[$cat][$val[1]] = $val[2];
        }
        elseif(preg_match("~<tr><td[^>]+>([^<]*)</td><td[^>]+>([^<]*)</td><td[^>]+>([^<]*)</td></tr>~", $line, $val))
        {
            $info_arr[$cat][$val[1]] = array("local" => $val[2], "master" => $val[3]);
        }
    }
    return $info_arr;
}
function outputAsFile($data)
{
    global $extension;
    
    // create a file
    $fn = tempnam(sys_get_temp_dir, 'phpinfo_');
    // add data in it
    file_put_contents($fn, $data);
    
    // output file
    output_file($fn, 'phpinfo'.$extension);
    
    // delete file
    unlink($fn);
}
/**
 * taken from http://w-shadow.com/blog/2007/08/12/how-to-force-file-download-with-php/
 * 
 * @param string $file
 * @param string $name
 * @param string $mime_type
 */
function output_file($file, $name, $mime_type='')
{
 /*
 This function takes a path to a file to output ($file),
 the filename that the browser will see ($name) and
 the MIME type of the file ($mime_type, optional).
 
 If you want to do something on download abort/finish,
 register_shutdown_function('function_name');
 */
 if(!is_readable($file)) die('File not found or inaccessible!');
  
 $size = filesize($file);
 $name = rawurldecode($name);
  
 /* Figure out the MIME type (if not specified) */
 $known_mime_types=array(
    "pdf" => "application/pdf",
    "txt" => "text/plain",
    "html" => "text/html",
    "htm" => "text/html",
    "exe" => "application/octet-stream",
    "zip" => "application/zip",
    "doc" => "application/msword",
    "xls" => "application/vnd.ms-excel",
    "ppt" => "application/vnd.ms-powerpoint",
    "gif" => "image/gif",
    "png" => "image/png",
    "jpeg"=> "image/jpg",
    "jpg" =>  "image/jpg",
    "php" => "text/plain"
 );
       
 if($mime_type==''){
     $file_extension = strtolower(substr(strrchr($file,"."),1));
     if(array_key_exists($file_extension, $known_mime_types)){
        $mime_type=$known_mime_types[$file_extension];
     } else {
        $mime_type="application/force-download";
     };
 };
  
 @ob_end_clean(); //turn off output buffering to decrease cpu usage
  
 // required for IE, otherwise Content-Disposition may be ignored
 if(ini_get('zlib.output_compression'))
  ini_set('zlib.output_compression', 'Off');
   
 header('Content-Type: ' . $mime_type);
 header('Content-Disposition: attachment; filename="'.$name.'"');
 header("Content-Transfer-Encoding: binary");
 header('Accept-Ranges: bytes');
  
 /* The three lines below basically make the
    download non-cacheable */
 header("Cache-control: private");
 header('Pragma: private');
 header("Expires: Mon, 26 Jul 1997 05:00:00 GMT");
 
 // multipart-download and download resuming support
 if(isset($_SERVER['HTTP_RANGE']))
 {
    list($a, $range) = explode("=",$_SERVER['HTTP_RANGE'],2);
    list($range) = explode(",",$range,2);
    list($range, $range_end) = explode("-", $range);
    $range=intval($range);
    if(!$range_end) {
        $range_end=$size-1;
    } else {
        $range_end=intval($range_end);
    }
 
    $new_length = $range_end-$range+1;
    header("HTTP/1.1 206 Partial Content");
    header("Content-Length: $new_length");
    header("Content-Range: bytes $range-$range_end/$size");
 } else {
    $new_length=$size;
    header("Content-Length: ".$size);
 }
 
 /* output the file itself */
 $chunksize = 1*(1024*1024); //you may want to change this
 $bytes_send = 0;
 if ($file = fopen($file, 'r'))
 {
    if(isset($_SERVER['HTTP_RANGE']))
    fseek($file, $range);
     
    while(!feof($file) &&
        (!connection_aborted()) &&
        ($bytes_send<$new_length)
          )
    {
        $buffer = fread($file, $chunksize);
        print($buffer); //echo($buffer); // is also possible
        flush();
        $bytes_send += strlen($buffer);
    }
 fclose($file);
 } else die('Error - can not open file.');
  
die();
}   
# main
ob_start();
phpinfo($what);
$clean = ob_get_clean();
$out = $clean;
if (isset($_GET['format']))
{
    $arr = phpinfo_array($clean);
    switch ($_GET['format'])
    {        
        case 'json':
            if (function_exists('json_encode'))
            {
                $out = json_encode($arr);
                $extension = '.json';
            }
            else {
                $out = 'Error: No json_encode function present';
            }
            break;
        
        default:
            $out = 'Error: Unknown format';
    }
}
// output
if (isset($_GET['file']))
{
    outputAsFile($out);
}
else 
{
    echo $out;
}