wow!  Nice work hondaman!



___________________________
Britt Priddy, CCNA
Developer / Network Engineer
Power Zones
www.powerzones.com

----- Original Message -----
From: "hondaman" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Monday, December 13, 2004 11:52 PM
Subject: Re: [hlds_linux] When will the "nosteam" hacks be fixed?


#!/usr/bin/perl

use strict;

my $file_list = `find . -follow -name \*log`;
my (%player,%ip,%ban);
my $bans = `cat /gaming/test_logs/masterbanlist.cfg`;

foreach my $file (split '\n',$file_list) {
       open(FILE,"<$file");
       while(<FILE>) {
               if ( my ($uid,$ip) = /<(\d+)><STEAM_ID_PENDING>.*address
\"(\S+):/) {
                       $player{$uid} = $ip;
               } elsif (my ($Nuid,$sid) =
/<(\d+)><(STEAM_\S+?)>.*entered the game/) {
                       if ( $bans =~ /$sid/g) {
                               if(exists $ip{$player{$Nuid}} and
$ip{$player{$Nuid}} ne $sid) {
                       #               print "$player{$Nuid}: old
$ip{$player{$Nuid}} : new $sid\n" if $player{$Nuid} ne "";
                                       $ban{$player{$Nuid}} = 0 if
$player{$Nuid} ne "";
                               } else {
                                       $ip{$player{$Nuid}} = $sid;
                               }
                       } else {
                               delete $player{$Nuid};
                       }
               }
       }
       close(FILE);
}
foreach my $i (sort keys %ban) {
       print "banip 0 $i\n";
}


The above is a cool little script that will catch the ban evadors and output it nicely. You will have to cat /path/to/server1/banned_user.cfg /path/to/server2/banned_user.cfg | sort | uniq > masterbanlist.cfg to get yourself a "masterbanlist" ln -s all your logs into a common dir, then run this script. It will catch those bastards once and for all.



dual_bereta_r0x wrote:

Citando Kingsley Foreman <[EMAIL PROTECTED]>:



welcome to my pain.



Welcome to the real world. Welcome to the world of Marlb^H^H^H^HValve.



Kingsley



-- dual_bereta_r0x -- Alexandre Hautequest ArenaNetwork Lan House & Cyber -- www.arenanetwork.com.br ICQ 126063524

----------------------------------------------------------------
Mensagem Enviada utilizando o Onda Mail.
http://www.onda.com.br
Onda Provedor de Servicos S/A


_______________________________________________ To unsubscribe, edit your list preferences, or view the list archives, please visit: http://list.valvesoftware.com/mailman/listinfo/hlds_linux







_______________________________________________
To unsubscribe, edit your list preferences, or view the list archives,
please visit:
http://list.valvesoftware.com/mailman/listinfo/hlds_linux



_______________________________________________
To unsubscribe, edit your list preferences, or view the list archives, please 
visit:
http://list.valvesoftware.com/mailman/listinfo/hlds_linux

Reply via email to