форумы  помощь  поиск  регистрация  майллист  вход/выход  слежка

Вариант для распечатки		Пред. тема | След. тема
Форумы OpenNET: Виртуальная конференция (Public)
Изначальное сообщение		[ Отслеживать ]

"ПРоблема с telnet"		+/–
Сообщение от varlone (ok) on 25-Июл-09, 20:21
Есть проблемма с скидыванием клиентов. тоесть freenibs c помощью скрипта должен скидывать узеров. По гуглев нашел скрипт (приведен ниже)но ничего не выходит. Посмотрел в логах mpd4 пишет что не проходит авторизация. Проверил  по телнету из консоли все  прекрасно заходит. Уже весь нет перерыл непойму в чем дело. Люди помогите кто чем может #!/usr/bin/perl $hostname="127.0.0.1"; $port="5555"; if( $ARGV[3] eq '' ) { die 'Usage: user nasip userip nasport'; }; $user=$ARGV[0]; $nasip=$ARGV[1]; $userip=$ARGV[2]; $nasport=$ARGV[3]; use Net::Telnet (); $t = new Net::Telnet ; $t->open(Host=> $hostname, Port => $port, Timeout => 10); $t->waitfor('/Username:.*$/'); $t->print("mpd"); $t->waitfor('/Password:.*$/'); $t->print("pptp"); $t->waitfor('/]/'); $t->print("bundle pptp".$nasport); $t->waitfor('/]/'); $t->print("close"); $t->waitfor('/]/'); $t->print("exit"); exit 0;
Высказать мнение | Ответить | Правка | Cообщить модератору

Сообщения по теме

[Сортировка по времени | RSS]

1. "ПРоблема с telnet"		+/–
Сообщение от shadow_alone (ok) on 26-Июл-09, 10:16
А зачем тебе перл то, юзай expect #!/usr/bin/expect -f spawn /usr/bin/telnet куда_коннектимся expect  "Username:" { send "логинt\n"} expect  "Password:" { send "пароль\n"} expect "]" {send "команда\n"} expect "]" {send "команда2\n"} expect "]" {send "exit\n"}
Высказать мнение | Ответить | Правка | Наверх | Cообщить модератору

2. "ПРоблема с telnet"		+/–
Сообщение от Deac (ok) on 28-Июл-09, 10:10
>[оверквотинг удален] >$t->print("mpd"); >$t->waitfor('/Password:.*$/'); >$t->print("pptp"); >$t->waitfor('/]/'); >$t->print("bundle pptp".$nasport); >$t->waitfor('/]/'); >$t->print("close"); >$t->waitfor('/]/'); >$t->print("exit"); >exit 0; binmode для mpd4 поставь в "1"
Высказать мнение | Ответить | Правка | Наверх | Cообщить модератору

Архив | Удалить

Индекс форумов | Темы | Пред. тема | След. тема