From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <w_n_b@mail.ru>
X-Spam-Checker-Version: SpamAssassin 3.1.4 (2006-07-25) on gt66.ru
X-Virus-Scanned: ClamAV 
X-Spam-Score: 0.085
X-Spam-Level: 
X-Spam-Status: No, score=0.085 tagged_above=-1 required=5 tests=[AWL=0.085]
Date: Tue, 6 Mar 2007 14:38:48 +0500
From: =?koi8-r?B?4sXM0cXXIPcu7i4=?= <w_n_b@mail.ru>
X-Mailer: The Bat! (v2.00.6) Business
X-Priority: 3 (Normal)
Message-ID: <245390030.20070306143848@mail.ru>
To: ALT Linux Sisyphus discussion list <sisyphus@lists.altlinux.org>
In-Reply-To: <20070306111843.0d0e81fe@shadow.orionagro.com.ua>
References: <a1b0b2150702281055g2e700f8cu3e7388dd91fabe03@mail.gmail.com>
	<200703011828.09746.ashen@nsrz.ru>
	<a1b0b2150703010825t9b798a1uf3cf436df82e69cd@mail.gmail.com>
	<200703011932.30337.ashen@nsrz.ru>
	<a1b0b2150703010842x68f767fes89ea99f297ad84ee@mail.gmail.com>
	<a1b0b2150703010958h6f897afbw699973b17ca272fc@mail.gmail.com>
	<472848766.20070306135628@mail.ru>
	<20070306111843.0d0e81fe@shadow.orionagro.com.ua>
MIME-Version: 1.0
Content-Type: text/plain; charset=koi8-r
Content-Transfer-Encoding: 8bit
Subject: Re: [sisyphus] sarg
X-BeenThere: sisyphus@lists.altlinux.org
X-Mailman-Version: 2.1.9rc1
Precedence: list
Reply-To: =?koi8-r?B?4sXM0cXXIPcu7i4=?= <w_n_b@mail.ru>,
	ALT Linux Sisyphus discussion list <sisyphus@lists.altlinux.org>
List-Id: ALT Linux Sisyphus discussion list <sisyphus.lists.altlinux.org>
List-Unsubscribe: <https://lists.altlinux.org/mailman/listinfo/sisyphus>,
	<mailto:sisyphus-request@lists.altlinux.org?subject=unsubscribe>
List-Archive: <http://lists.altlinux.org/pipermail/sisyphus>
List-Post: <mailto:sisyphus@lists.altlinux.org>
List-Help: <mailto:sisyphus-request@lists.altlinux.org?subject=help>
List-Subscribe: <https://lists.altlinux.org/mailman/listinfo/sisyphus>,
	<mailto:sisyphus-request@lists.altlinux.org?subject=subscribe>
X-List-Received-Date: Tue, 06 Mar 2007 09:38:52 -0000
Archived-At: <http://lore.altlinux.org/sisyphus/245390030.20070306143848@mail.ru/>
List-Archive: <http://lore.altlinux.org/sisyphus/>
List-Post: <mailto:sisyphus@altlinux.ru>

Hello Dmitriy,

Tuesday, March 6, 2007, 2:18:43 PM, you wrote:

DLK> На календаре было: Вторник, 06 Март 2007 года,
DLK> Беляев В.Н. писал(а) в сообщении: 

DLK>  == Беляев В.Н.

>> Создает после небольшого напильника. Также возможна автоматическая
>> блокировка превысивших лимит.
DLK> Напильник в студию...
DLK> Студия у нас на wiki :)



Скрипт блокирования за месяц:
-------------------------------------------
#!/usr/bin/perl
#

use File::Basename;
push (@INC,(fileparse($0))[1]);
 
require "lightsquid.cfg";
require "common.pl";
 
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)=localtime;
$year=sprintf("%02d",$year+1900);
$month=sprintf("%02d",$mon+1);
 
$filter="$year$month";
 
@daylist=glob("$reportpath/$filter*");
 
foreach $daypath (sort @daylist) {
  open FF,"<$daypath/.total";
#  GetRealName($daypath,"?"); # init realname for day
  while (<FF>) {
    ($user,$size,$hit)=split;
    $h{$user}{size}+=$size;
    $h{$user}{hit}+=$hit;
  }  
  close FF;
}
 
  open FF,"</usr/local/squid/limit";
  while (<FF>) {
    ($user,$limit)=split;
    $tt{$user}{limit}=$limit;
  }  
  close FF;
 
    open FF,">","/usr/local/squid/blocked_users";
 
foreach $user (sort {$h{$b}{size}<=>$h{$a}{size}} keys     %h) {
    print FF ("$user\n") if ($h{$user}{size} > $tt{$user}{limit});
}
close FF;
 
exec '/usr/local/squid/sbin/squid -k reconfigure' 
--------------------------------------------------------------------

Запускается каждые 20 минут.

/usr/local/squid/limit
файл с именем и лимитом трафика

В сквиде есть ACL

acl bl_users proxy_auth_regex -i '/usr/local/squid/blocked_users'
http_access deny bl_users



DLK> --
DLK> Best regards,
DLK>  Dmitriy L. Kruglikov                     .--.
DLK>  Dmitriy.Kruglikov_at_gmail_dot_com      |@_@ |
DLK>  DKR6-RIPE                               |!_/ |
DLK>  XMPP:dkr6@jabber.ru                    //   \ \
DLK>                                        (|     | )
DLK>                                       /'\_   _/`\
DLK> Powered by Linux                      \___)=(___/
 
DLK> -- Мысль --
DLK> Не пренебрегай маленькими людьми: они могут помочь тебе возвыситься.
DLK> 		-- Абуль-Фарадж



-- 
С уважением, Беляев
ICQ: 119181289