forum.lissyara.su

Код: Выделить всё

cmd="/sbin/ipfw"

priv="192.168.1.11"
priv2="192.168.1.12"

$cmd pipe 1 config bw 1700Kbit/s

$cmd queue 1 config pipe 1 weight 30 mask dst-ip 0xffffffff
$cmd queue 2 config pipe 1 weight 20 mask dst-ip 0xffffffff
$cmd queue 3 config pipe 1 weight 50 mask dst-ip 0xffffffff

$cmd add 11 queue 3 all from not 192.168.0.0/16 to $priv
$cmd add 12 skipto 20 all from not 192.168.0.0/16 to $priv

$cmd add 13 queue 2 all from not 192.168.0.0/16 to $priv2
$cmd add 14 skipto 20 all from not 192.168.0.0/16 to $priv2

$cmd add 15 queue 1 all from not 192.168.0.0/16 to 192.168.0.0/16
$cmd add 16 skipto 20 all from not 192.168.0.0/16 to 192.168.0.0/16

$cmd add 20 count all from 127.0.0.1 to 127.0.0.1

Код: Выделить всё

#!/bin/sh
/sbin/ipfw pipe 11 config mask dst-ip 0x000000ff bw 1102Kbit/s delay -100ms
/sbin/ipfw pipe 12 config mask src-ip 0x000000ff bw 957Kbit/s delay -100ms

Код: Выделить всё

# INPUT
ipfw pipe 11 config mask dst-ip 0x000000ff bw 1700Kbit/s delay -100ms
ipfw add 200 pipe 11 ip from any to 10.0.0.0/24 in via rl2

# OUTPUT
ipfw pipe 12 config mask src-ip 0x000000ff bw 1500Kbit/s delay -100ms
ipfw add 210 pipe 12 ip from 10.0.0.0/24 to any in via rl3

Код: Выделить всё

system "/usr/bin/rsh localhost cle ip acco > /usr/BILLING/trash.txt";
system "/usr/bin/rsh localhost sh ip acco checkpoint > /usr/BILLING/point.txt";

Код: Выделить всё

$line = "";
open (P, "/usr/BILLING/point.txt");
while ($line = <P>) {
if ($line =~ /\./) {
($tr, $fromaddr, $toaddr, $tr, $bytes) = split (/\s+/, $line);
  if (($fromaddr =~ /^10./) & ($toaddr =~ /^10./)) { goto gonext }
  if (($fromaddr =~ /^255./) or ($toaddr =~ /.255$/)) { goto gonext }
 
if ($fromaddr =~ /^10.0/) {  
$upload{$fromaddr} = $upload{$fromaddr} + $bytes;
$upsum = $upsum + $bytes;
}  
if ($toaddr =~ /^10.0/) { 
$download{$toaddr} = $download{$toaddr} + $bytes;
$downsum = $downsum + $bytes;
}
#print "$fromaddr - $toaddr - $bytes\n";
}
gonext:
}
close (P);

Код: Выделить всё

$pushline11 = "/sbin/ipfw pipe 11 config mask dst-ip 0x000000ff bw ".$down_now."Kbit/s delay -100ms";
$pushline12 = "/sbin/ipfw pipe 12 config mask src-ip 0x000000ff bw ".$up_now."Kbit/s delay -100ms";

$upsum = int($upsum);
$downsum = int($downsum);

open (A, ">/usr/BILLING/PIPE.sh");
print A "#!/bin/sh\n\n";
print A "$pushline11\n";
print A "$pushline12\n";
print A "\n";
print A "#### \t BASE \t REAL \t CLIENT\n";
print A "#\n";
print A "# UP \t $uband \t $upsum \t $u($uuser) --> $up_now\n";
print A "# DOWN \t $dband \t $downsum \t $d($duser) --> $down_now\n";
print A "#   ";
close (A);

system ("/usr/BILLING/PIPE.sh");