使用 php 4 加速 web 传输

web

/***************************************
** Title.........: PHP4 HTTP Compression Speeds up the Web
** Version.......: 1.10
** Author........: catoc
** Filename......: gzdoc.php
** Last changed..: 25/08/2000
** Requirments...: PHP4 >= 4.0.1
**                 PHP was configured with --with-zlib[=DIR]
** Notes.........: Dynamic Content Acceleration compresses
**                 the data transmission data on the fly
**                 code by sun jin hu (catoc)
**                 Most newer browsers since 1998/1999 have
**                 been equipped to support the HTTP 1.1
**                 standard known as "content-encoding."
**                 Essentially the browser indicates to the
**                 server that it can accept "content encoding"
**                 and if the server is capable it will then
**                 compress the data and transmit it. The
**                 browser decompresses it and then renders
**                 the page.
** Useage........:
**                 No space before the beginning of the first '' tag.
**                 ------------Start of file----------
**                 |
**                 | include('gzdoc.php');
**                 | print "Start output !!";
**                 |?>
**                 |
**                 |... the page ...
**                 |
**                 |
**                 | gzdocout();
**                 |?>
**                 -------------End of file-----------
***************************************/
ob_start();
ob_implicit_flush(0);
function GetHeader(){
    $headers = getallheaders();
    while (list($header, $value) = each($headers)) {
        $Message .= "$header: $value
\n";
    }
    return $Message;
}
function CheckCanGzip(){
    global $HTTP_ACCEPT_ENCODING, $PHP_SELF, $Wget, $REMOTE_ADDR, $S_UserName;
    if (connection_timeout() || connection_aborted()){
        return 0;
    }
    if ((strpos('catoc'.$HTTP_ACCEPT_ENCODING, 'gzip')) || $Wget == 'Y'){
        if (strpos('catoc'.$HTTP_ACCEPT_ENCODING, 'x-gzip')){
            $ENCODING = "x-gzip";
            $Error_Msg = str_replace('
','',GetHeader());
            $Error_Msg .= "Time: ".date("Y-m-d H:i:s")."\n";
            $Error_Msg .= "Remote-Address: ".$REMOTE_ADDR."\n";
            //mail('your@none.net', "User have x-gzip output in file $PHP_SELF!!!", $Error_Msg);
        }else{
            $ENCODING = "gzip";
        }
        return $ENCODING;
    }else{
        return 0;
    }
}
function GzDocOut(){
    global $PHP_SELF, $CatocGz, $REMOTE_ADDR, $S_UserName;
    $ENCODING = CheckCanGzip();
    if ($ENCODING){
        print "\n\n";
        $Contents = ob_get_contents();
        ob_end_clean();
        if ($CatocGz == 'Y'){
            print "Not compress lenth: ".strlen($Contents)."
";
            print "Compressed lenth: ".strlen(gzcompress($Contents))."
";
            exit;
        }else{
            header("Content-Encoding: $ENCODING");
        }
        print pack('cccccccc',0x1f,0x8b,0x08,0x00,0x00,0x00,0x00,0x00);
        $Size = strlen($Contents);
        $Crc = crc32($Contents);
        $Contents = gzcompress($Contents);
        $Contents = substr($Contents, 0, strlen($Contents) - 4);
        print $Contents;
        print pack('V',$Crc);
        print pack('V',$Size);
        exit;
    }else{
        ob_end_flush();
        $Error_Msg = str_replace('
','',GetHeader());
        $Error_Msg .= "Time: ".date("Y-m-d H:i:s")."\n";
        $Error_Msg .= "Remote-Address: ".$REMOTE_ADDR."\n";
        //mail('your@none.net', "User can not use gzip output in file $PHP_SELF!!!", $Error_Msg);
        exit;
    }
}
?>