<?php


$flag_http_blacklist_1gb 
"/var/log/cpu/http-blacklist/".$_SERVER["REMOTE_ADDR"];
if (@
is_file ($flag_http_blacklist_1gb))
{
    die (
"Access from your IP is blocked.");
}

    
    
$path_1gb $_SERVER["SCRIPT_FILENAME"];
    if (
$path_1gb == '')
        
$path_1gb $_SERVER["PATH_TRANSLATED"];
    
$path_1gb substr$path_1gb0, - strlen($_SERVER['SCRIPT_NAME'])) . '/';
    
    
$config_1gb "$path_1gb/.cpu_limit.conf";
    
$config_1gb_auto "$path_1gb/.cpu_limit.auto.conf";
    
$config_1gb_message "$path_1gb/.cpu_limit_message.conf";

    if( !(
$cfg_1gb = @file($config_1gb_auto ) ) )
        if( !(
$cfg_1gb = @file($config_1gb ) ) )
            return;
        
    
$logfile_1gb_path $path_1gb '/.proclimit_' strtolower( @md5($path_1gb) );
    
    @
mkdir($logfile_1gb_path);
    
    
$logfile_1gb "$logfile_1gb_path/.cpu_limit_".date('Y-m-d').".log";
    
$logfile_1gb_debug "$logfile_1gb_path/.cpu_limit_".date('Y-m-d')."_ok.log";

    
$full_time_1gb 60 60 1000;

    
$ip_1gb $_SERVER["REMOTE_ADDR"];
    @list(
$ip_1gb) = @split','$ip_1gb );
    
$ip_parts_1gb = @split'\.'$ip_1gb );
    if (
count ($ip_parts_1gb) != 4)
        return;
    
$ip_1gb = @intval$ip_parts_1gb[0] ) << 24;
    
$ip_1gb |= @intval$ip_parts_1gb[1] ) << 16;
    
$ip_1gb |= @intval$ip_parts_1gb[2] ) << 8;
    
$ip_1gb |= @intval$ip_parts_1gb[3] );

    if( 
$ip_1gb 2147483647 )
    {
        
// Значит у нас 64-битная система. Нужно получить отрицательное число, как в 32-битной
        
$ip_1gb |= 0xFFFFFFFF00000000;
    }

    
$host_1gb = @addslashes(@strtoupper($_SERVER["SERVER_NAME"]));
    if( @
substr($host_1gb04) == "WWW." )
        
$host_1gb substr$host_1gb);
    
$site_id_1gb = @strtoupper( @md5$host_1gb ) );
    
    
$full_block_1gb 0.50 $full_time_1gb;
    
$client_block_1gb 0.50 $full_time_1gb;
    
$client_block_1gb_header '';
    foreach( 
$cfg_1gb as $lin1_1gb )
    {
        
$lparts_1gb = @split("="$lin1_1gb);
        if( 
count$lparts_1gb) != )
            continue;
        
$name_1gb strtouppertrim$lparts_1gb[0] ) );
        
$val_1gb trim$lparts_1gb[1] );
        
        if( 
$name_1gb == "FULL_BLOCK" )
            
$full_block_1gb = @floatval$val_1gb ) / 100 $full_time_1gb;
        if( 
$name_1gb == "IP_BLOCK" )
            
$client_block_1gb = @floatval$val_1gb ) / 100 $full_time_1gb;
        if( 
$name_1gb == "HTTP_CODE" )
        {
            if (
$val_1gb == 403$client_block_1gb_header = ('HTTP/1.0 403 Forbidden');
            else if (
$val_1gb == 500$client_block_1gb_header = ('HTTP/1.0 500 Internal Server Error');
            else if (
$val_1gb == 501$client_block_1gb_header = ('HTTP/1.0 501 Not Implemented');
            else if (
$val_1gb == 502$client_block_1gb_header = ('HTTP/1.0 502 Bad Gateway');
            else if (
$val_1gb == 503$client_block_1gb_header = ('HTTP/1.0 503 Service Unavailable');
            else if (
$val_1gb == 504$client_block_1gb_header = ('HTTP/1.0 504 Gateway Timeout');
            else 
$client_block_1gb_header = ('HTTP/1.0 '.($val_1gb));
        }
    }
    
    
$con_1gb = @mysql_connect"127.0.0.1:3399""user" );
    if( !
$con_1gb )
    {
        if( 
$logfile = @fopen$logfile_1gb_debug"at+" ) )
        {
            @
fwrite$logfiledate"Y-m-d H:i:s" ) . ", accounting database is offline\n" );
            @
fclose$logfile );
        }
        return;    
    }
    @
mysql_query"use ProcLimit;"$con_1gb);

    
    
$__limit__message 
'<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
<html><head><title>Ограничение нагрузки сайта</title>
<meta http-equiv="Content-Type" content="text/html; charset=Windows-1251">
<meta name="robots" content="noindex,nofollow">
</head><body>
<div style="padding: 32px; margin: 40px; border: 1px solid gray; width:440px; white-space:nowrap;">
<p>Cайт превышает предел нагрузки на процессор
<br>приобретенного тарифного плана хостинга.</p>
<p>Попробуйте зайти позже.</p>
<p style="margin-top:40px;">Site exceeds CPU load allowed by purchased hosting plan.</p>
<p>Please try again later.</p></div>
<p style="color:gray;">Владельцу сайта:<br>описание ситуации на странице <a href="http://www.1gb.ru/autolimit" 
style="color:gray;">www.1gb.ru/autolimit</a>.</p>
</body></html>'
;
    
    
    
$q_1gb "SELECT ProcessorTime FROM Summary WHERE Summary.Site_ID = '$site_id_1gb'";
    
$res_1gb = @mysql_query$q_1gb$con_1gb );
    if( 
$res_1gb )
        
$res_1gb = @mysql_fetch_row$res_1gb );

    if( 
$res_1gb )
    {
        
$load_from_ip_1gb = @round ($res_1gb[0] * 100 $full_time_1gb2);
        if( 
$res_1gb[0] >= $full_block_1gb )
        {
            if( 
$logfile = @fopen$logfile_1gb"at+" ) )
            {
                @
fwrite$logfiledate"Y-m-d H:i:s" ) . ", blocked: $_SERVER[REMOTE_ADDR] ($load_from_ip_1gb %)\n" );
                @
fclose$logfile );
            }
            if (
$client_block_1gb_header != '')
                
header ($client_block_1gb_header);
            if (
$f = @fopen ($config_1gb_message'rb'))
                die (
fread ($f65536));
            else 
                die( 
$__limit__message );
        }
    }

                
    
$q_1gb "SELECT ProcessorTime FROM IPSummary WHERE IPSummary.Site_ID = '$site_id_1gb' AND IPSummary.IP = '$ip_1gb'";
    
$res_1gb = @mysql_query$q_1gb$con_1gb );
    if( 
$res_1gb )
        
$res_1gb = @mysql_fetch_row$res_1gb );
    
    if( 
$res_1gb )
    {
        
$load_total_1gb = @round ($res_1gb[0] * 100 $full_time_1gb2);
        if( 
$res_1gb[0] > $client_block_1gb )
        {
            if( 
$logfile = @fopen$logfile_1gb"at+" ) )
            {
                @
fwrite$logfiledate"Y-m-d H:i:s" ) . ", blocked: $_SERVER[REMOTE_ADDR] (IP load = $load_total_1gb %)\n" );
                @
fclose$logfile );
            }
            if (
$client_block_1gb_header != '')
                
header ($client_block_1gb_header);
            if (
$f = @fopen ($config_1gb_message'rb'))
                die (
fread ($f65536));
            else 
                die( 
$__limit__message );
        }
    }

    
    if( 
$logfile = @fopen$logfile_1gb_debug"at+" ) )
    {
        @
fwrite$logfiledate"Y-m-d H:i:s" ) . ", ok $_SERVER[REMOTE_ADDR] (IP load = $load_total_1gb %, total = $load_from_ip_1gb %)\n" );
        @
fclose$logfile );
    }
    
    
    unset( 
        
$path_1gb$config_gile$ip_1gb$host_1gb$logfile_1gb$logfile_1gb_debug$logfile$cfg_1gb$full_1gb$full_block_1gb$client_block_1gb
        
$lin1_1gb$lparts_1gb$name_1gb$val_1gb$q_1gb$res_1gb$ip_parts_1gb$full_time_1gb$load_from_ip_1gb$load_total_1gb$site_id_1gb$logfile_1gb_path,
        
$__limit__message$config_1gb_auto$config_1gb_message$client_block_1gb_header
        
);
    
?>