X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?p=spider.git;a=blobdiff_plain;f=perl%2Fcluster.pl;h=143713babc1e0346bada54066d1bb5617dae601b;hp=f1eade415bc263ae5778b03dec2fcf2e8c9ad4f8;hb=f63d598af3f797b56b8d5e23ec4ff5254192eee9;hpb=66a5726687662b1a4726ac1de972340ac856ef7a diff --git a/perl/cluster.pl b/perl/cluster.pl index f1eade41..143713ba 100755 --- a/perl/cluster.pl +++ b/perl/cluster.pl @@ -121,6 +121,7 @@ use DXXml; use DXSql; use IsoTime; use BPQMsg; +use DXCIDR; use Data::Dumper; use IO::File; @@ -477,6 +478,9 @@ DXUser->init($userfn, 1); } } +# get any bad IPs +DXCIDR::init(); + # start listening for incoming messages/connects dbg("starting listeners ..."); my $conn = IntMsg->new_server($clusteraddr, $clusterport, \&login);