Re: Управление временно заблокированными адресами

В Втр, 08/02/2011 в 11:24 +0300, Dmitry Akindinov пишет:
> Здравствуйте,
>
> On 2011-02-08 10:46, Nazarkin Andrew N. wrote:
> > Коллеги!
> > А нет ли человеческого инструмента для управления временно
> > заблокированными IP ?
> > В перле не силен, признаюсь сразу.
> > С трудом осилил получение списка заблокированных IP :
> >
> > #!/usr/bin/perl -w
> > use CLI;
> > $CGServerAddress = "10.10.10.10";
> > my $Login = "postmaster\@domain.ru";
> > my $Password = "pass";
> > chomp $Password;
> > my $cli = new CGP::CLI( { PeerAddr => $CGServerAddress,
> > PeerPort => 106,
> > login => $Login,
> > password => $Password,
> > SecureLogin => 0} )
> > || die "Can't login to CGPro: ".$CGP::ERR_STRING."\n";
> > my $gettempblacklistedips=$cli->GetTempBlacklistedIPs;
> > die "\nError " . $cli->getErrMessage . "(".$cli->getErrCode.")
> > Gettting Blacklisted IPS\n"
> > unless ($gettempblacklistedips);
> > # print " $_\n" foreach(@$gettempblacklistedips);
> > print $cli->GetTempBlacklistedIPs;
> >
> > Нашел в примерах:
> > SetTempBlacklistedIPs(IPs)
> > Example:
> >
> > my $data=$cli->GetTempBlacklistedIPs();
> > if($cli->isSuccess) {
> > $data .="\\e11.22.33.44\\e22.33.44.55";
>
> Тут через пробел после адреса надо ещё указать TTL в секундах (* - если
> блокировать всегда.)

Ну это я на сталкерсом сайте нашел и скопипипастил.

>
> > $cli->SetTempBlacklistedIPs($data);
> > } else {
> > die "Error: ".$cli->getErrMessage.", quitting";
> > }
> > Как долилить до моих нужд - вообще без понятия :(
>
> Сделать из этого CGI скрипт.
Да в том-то и беда, что не силен в перле.

>
> > Мне собственно нужна возможность выгрузки/правки/загрузки блокированных
> > IP в/из файла.
> >
> > P.S. Жалко, что в админке не предусмотрели волшебной кнопки "получить
> > список" - поправить - "загрузить список"...
> > Но к разработчикам обращаться бесполезно - не раз пробовал, благодарили,
> > обещали включить в следующий релиз и...
> >
> > А так получается, что данный список практически неуправляемый. И время
> > от времени в него, к примеру, попадают вообще адреса из локалки.
>
> Если они не должны попадать туда вообще никогда, то их разумно было бы
> добавить в белый список.

Ну как-то это... В клиентские добавь, в белый список добавь.... Масло масленое получается.

>
> > Может,
> > из-за того, что пароль неправильно вводили, может, еще из-за чего...
> > Поди разберись...
> >
> >
>

--
Назаркин Андрей Николаевич
Mezhregiongarant.
MRG Life
CIO
email: su@mrglife.ru, su@mrggroup.ru
work tel: (495) 649-3010 #2205
mob. tel: (916) 814-3459
fax: (495) 647-0108 Получено Tue Feb 08 08:27:14 2011