[TCL] Подставление "правильного" идента боту через oidentd.

Возникла необходимость подставлять моим ботам «правильные» иденты на сервере, на котором запущен oidentd. Решение пришло в голову быстро ;)

Скрипт прилагается.
## oidentd.tcl
# Данный скрипт будет проводить идентификацию пользователя при помощи oidentd
# на IRC сервере и подставлять тот ident, который прописан в конфиге.

namespace eval oid {}
foreach k [array names oid *] { catch {unset oid($k) } }

set oid(oidfile)	"~/.oidentd.conf"
set oid(ident)		$username

set oid(openfile) [open "$oid(oidfile)" w]
puts $oid(openfile) "global { reply \"$oid(ident)\" }"
close $oid(openfile)

putlog "oidentd.tcl by lumian (http://www.chaters.ru/blog/eggdrop/) loaded."

Кроме установки данного скрипта на eggdrop, ваш oidentd должен будет считывать файлик .oidentd из домашней директории пользователя. Для этого у себя я сделал так:
root@srv:~# cat /etc/oidentd.conf
# Configuration for oidentd
# see oidentd.conf(5)
#
default {
        default {
                allow spoof
                allow spoof_all
                deny spoof_privport
                allow random
                allow random_numeric
                allow numeric
                allow hide
        }
}

Скачать oidentd.tcl с нашего сервера.
  • 0
  • lumian
  • 13 июля 2010, 20:59

Реклама:

Комментарии (0)

RSS свернуть / развернуть

комментировать

Ваше имя
Ваш e-mail (будет скрыто и используется только для отправки ответов на ваш комментарий)
Вы — гость, и вам запрещено использовать HTML-теги.
 
Введите цифры и буквы: