Страница 1 из 1

ednsbl.tcl - Проверка в DNS BlackList при входе на канал.

СообщениеДобавлено: 24 дек 2013 02:23
tvrsh
Название: ednsbl.tcl
Версия: 1.0
Автор: tvrsh
Описание: Easy DNS BlackLists. Скрипт проверяет хост входящего на канал юзера на присутствие в DNS BlackLists.
Поддержка Suzi: Да
Пример работы: Пока нет.
Дополнительная информация: На текущий момент проверяет в DroneBL, Barracuda Reputation Block List, SpamCop Blocking List.
Ссылка на скрипт:

Re: dronebl.tcl - Проверка юзера в DroneBL при входе на кана

СообщениеДобавлено: 24 дек 2013 02:39
indjov
If you check more lists would be better in my opinion.
Because the sometimes lags or not online

Re: dronebl.tcl - Проверка юзера в DroneBL при входе на кана

СообщениеДобавлено: 24 дек 2013 12:05
tvrsh
Ok, but did you check this scrpt? It works or not? Any errors?

Re: dronebl.tcl - Проверка юзера в DroneBL при входе на кана

СообщениеДобавлено: 24 дек 2013 23:45
indjov
Yup, your script works perfectly

Re: ednsbl.tcl - Проверка в DNS BlackList при входе на канал

СообщениеДобавлено: 26 дек 2013 08:47
tvrsh
Updated, added Barracuda Reputation Block List and SpamCop Blocking List.

Re: ednsbl.tcl - Проверка в DNS BlackList при входе на канал

СообщениеДобавлено: 25 июл 2014 10:09
Jake
Похоже, для более корректных банов, лучше оставить только DroneBL в скрипте, закомментировав Баракуду и СпамКоп, а то почти всех юзеров банит, заходящих на канал, также банит айпишники сотовых операторов, пробовал и с IP своего провайдера зайти на канал - тоже забанил (бот это всё банил, когда 3 блэклиста были активны). Пока оставил активным только DroneBL в скрипте ;)

Re: ednsbl.tcl - Проверка в DNS BlackList при входе на канал

СообщениеДобавлено: 25 июл 2014 22:54
tvrsh
Этот скрипт реально помогает? Тебя одолевают флудботы?

Re: ednsbl.tcl - Проверка в DNS BlackList при входе на канал

СообщениеДобавлено: 27 июл 2014 01:37
Jake
меня нет, но думаю можно его использовать для наказания нарушителей, которых, к примеру, забанил кто-либо на канале за нарушения и они решили обойти бан, используя Open Proxy. Параноидально, но всё же ;)

Re: ednsbl.tcl - Проверка в DNS BlackList при входе на канал

СообщениеДобавлено: 13 авг 2015 14:48
Jake
при бане юзера бот стал писать следующую ошибку:

[22:39:09] «bnc» [ERROR 0.003ms] дочерний процесс завершился некорректно
[22:39:10] «bnc» [ERROR] при выполнении
[22:39:10] «bnc» [ERROR] "close $input"


в чем может быть дело ? активен только DroneBL в скрипте:

TCL: [ Скачать ] [ Скрыть ]
# DroneBL.
proc ::ednsbl::ednsbl_proc_dronebl {nick uhost hand chan text} {
    variable ednsbl
   
    set reverseip [join [lreverse [split $text "."]] "."]
    set input [open "|[exec which nslookup] $reverseip.dnsbl.dronebl.org" r]
    set listed 1
    while ![eof $input] {
        catch {set result [gets $input]}
        if [eof $input] {break}
        set output [string trimleft $result]
        if {[string match  "** server can't find $reverseip.dnsbl.dronebl.org: NXDOMAIN*" $output]} {
            set listed 0
        }
    }
   
    if {$listed == "1"} {
        ::ednsbl::ednsbl_ban $nick $uhost $chan "You are listed in DroneBL. Visit http://dronebl.org/ for more info."
    } else {
        #::ednsbl::ednsbl_proc_efnetbl $nick $uhost $hand $chan $text
    }
    catch {close $input}  
    unset input
    unset result
    return 1  
}


P.S. Eggdrop 1.6.21 + Suzi + TCL 8.6.1

Re: ednsbl.tcl - Проверка в DNS BlackList при входе на канал

СообщениеДобавлено: 13 авг 2015 15:15
Vertigo
Jake писал(а):при бане юзера бот стал писать следующую ошибку

Это не ошибка. close $input завернут в catch. Ругаться явно на нее бот не может.

Re: ednsbl.tcl - Проверка в DNS BlackList при входе на канал

СообщениеДобавлено: 14 авг 2015 10:16
Jake
Vertigo писал(а):Это не ошибка. close $input завернут в catch. Ругаться явно на нее бот не может.

то есть ничего страшного в этом нет ? не обращать внимания ? ) ругается не сам бот, а при выполнении команды !tcl скрипта-аналога команды .tcl (бот сборки с виндроп клана)