Сброс сессий в mpd-4.0rc1
Добавлено: Пт фев 02, 2007 6:32 am
Подскажите, что нужно подправить в файле /usr/local/abills/Abills/nas.pl чтобы он при выборе сервера mpd сбрасывал сессии. Сейчас он у меня просто подключается к консоли но, встретив приглашение на ввод имени и пароля, просто тупо висит и отваливается по таймауту.
Дело в том что я нашел участок, кода отвечающий за это, но там нет процедур ввода имени и пароля для входа в консоль mpd. Существующий код написан под старую версию mpd, когда еще авторизация не запрашивалась.
Вот код, я пытался добавить в него ввод имени и пароля, но без знаний перла у меня ничего не выходит:
Подскажите чего сюда добавить?
Дело в том что я нашел участок, кода отвечающий за это, но там нет процедур ввода имени и пароля для входа в консоль mpd. Существующий код написан под старую версию mpd, когда еще авторизация не запрашивалась.
Вот код, я пытался добавить в него ввод имени и пароля, но без знаний перла у меня ничего не выходит:
Код: Выделить всё
#####################################################################
# MPD functions
#*******************************************************************
# HANGUP MPD
# hangup_mpd($SERVER, $PORT)
#*******************************************************************
sub hangup_mpd {
my ($NAS_IP, $PORT) = @_;
my $ctl_port = "pptp$PORT";
my @commands=("\]\tlink $ctl_port",
"\]\tlink $ctl_port",
"\]\tclose",
"\]\texit");
my $result = telnet_cmd("$NAS->{NAS_MNG_IP_PORT}", \@commands);
print $result;
return 0;
}Подскажите чего сюда добавить?