Страница 1 из 2
billd не вышибает юзеров
Добавлено: Пн сен 03, 2007 9:25 am
fozzy
с отрицательным или нулевым балансом.
abills current cvs от 03092007, mpd 4.2.2. С веба hangup работает.
Добавлено: Пн сен 03, 2007 9:39 am
fozzy
Баг найден: жесткая привязка к названию бандла в nas.pl
#*******************************************************************
# HANGUP MPD
# hangup_mpd4($SERVER, $PORT)
#*******************************************************************
sub hangup_mpd4 {
my ($NAS, $PORT, $attr) = @_;
my $ctl_port = "pptp$PORT";
У меня x. Бандлы могут называться произвольно. Да и вообще, пользуем l2tp. Казалось бы, при чем тут pptp?
Добавлено: Пн сен 03, 2007 4:38 pm
~AsmodeuS~
если с веба работает должно и из билд работать
Добавлено: Вт сен 04, 2007 7:43 am
fozzy
~AsmodeuS~ писал(а):если с веба работает должно и из билд работать
"должно" - не значит "работает".
после внесения исправлений работает.
Добавлено: Вт сен 04, 2007 2:20 pm
igor_s
у меня billd при установленном в нем дебаге выдает список юзеров (это нормально) и если есть юзер, к-рый зашел в "0" либо "-" сообщение "Alarm clock"и юзера не отшибает. Пробовал телнетом на 127.0.0.1 5005 - все нормально, можна отключить пользователя. Из веба отшибает нормально. пользую мпд4.
billd error
Добавлено: Вт сен 04, 2007 7:22 pm
Илия
My version is: 0.36
hangup pri deposit 0 a ne pri -10 primerna !!!
Please open the file and edit line 234:/usr/abills/libexec/billd
if ( ($Billing->{PAYMENT_TYPE}==0) && ($line->[14] + $line->[15] < $self->{SUM}) ) {
change to:
if ( ($Billing->{PAYMENT_TYPE}==0) && ($line->[14] + $line->[15] <= $self->{SUM}) ) {
Добавлено: Вт сен 04, 2007 9:21 pm
igor_s
не помогает

Добавлено: Ср сен 05, 2007 7:02 am
igor_s
my $ret = hangup(\%NAS, "$nas_port_id", "$line->[0]", { ACCT_SESSION_IS => $acct_session_id,
если \%NAS поменять на mpd4, то:
скрипт отрабатывает и даже выдает кого он типа сбросил: "Hanguped Login:.... " и т.д. Причем правильно. именно того юзверя что надо. но на самом деле никого не сбрасывает. уважаемый автор - ХЕЛП ПЛИЗ. Куда порыть? Пробовал в nas.pl поковыряться. но он почему то мне не хочет обрабатывать "print". Пробовал повстявлять, чтобы глянуть какие переменные передаются. Там я так понял есть процедура hangup_mpd. Но в ней "print $переменная" ничего не выдает на консоль. В общем еще раз ХЕЛП.
Добавлено: Ср сен 05, 2007 7:26 am
~AsmodeuS~
Включить в config.pl
$conf{debugmods}='LOG_DEBUG LOG_NOTICE LOG_ALERT LOG_WARNING LOG_ERR LOG_INFO';
и потом посмореть в abills.log
Добавлено: Ср сен 05, 2007 12:17 pm
igor_s
ок. попробуем. сразу встречный вопрос. при включенном вот таком дебаге, строка в abills.log при _удачном_ входе должна изменить свой вид? я имею в виду добавится еще какие-то параметры???? и еще - при стандартных параметрах при отработке billd в лог вообще ничего не попадало

вопрос еще такой. я тестирую billd на отрубление таким образом - захожу тестовым юзером с положительным балансом, потом снимаю у нео со счета деньги, чтобы у него стал "-" и запускаю billd. это правильно?
Добавлено: Ср сен 05, 2007 1:06 pm
~AsmodeuS~
При дебага будут передаваться все параметры что передаются пользователю радиусом
Снимать - Да правильно
Добавлено: Ср сен 05, 2007 2:52 pm
igor_s
вот abills.log:
2007-09-05 17:50:01 LOG_DEBUG: Connected to 127.0.0.1:5005
2007-09-05 17:50:01 LOG_DEBUG: Get: "Multi-link PPP for FreeBSD, by Archie L. Cobbs.
"
Length: 49
2007-09-05 17:50:01 LOG_DEBUG: Wait for: ''
2007-09-05 17:50:01 LOG_DEBUG: Get: "Based on iij-ppp, by Toshiharu OHNO.
яыяэяыяэUsername: "
Length: 62
2007-09-05 17:50:01 LOG_DEBUG: Wait for: 'Username: '
2007-09-05 17:50:01 LOG_DEBUG: Send: admin
2007-09-05 17:50:01 LOG_DEBUG: Get: "admin"
Length: 4
2007-09-05 17:50:01 LOG_DEBUG: Wait for: 'Password: '
Добавлено: Пт сен 07, 2007 7:01 am
igor_s
нет решения

? какая то проблема с формированием строки для телнета??? куда глянуть? может сам подправлю???
Добавлено: Пт сен 07, 2007 1:12 pm
l30l3
Аналогичная ситуация!
Код: Выделить всё
Output from command /usr/abills/libexec/billd -all ..
Use of uninitialized value in addition (+) at /usr/abills/libexec/billd line 234.
Use of uninitialized value in addition (+) at /usr/abills/libexec/billd line 234.
Use of uninitialized value in addition (+) at /usr/abills/libexec/billd line 234.
Строка line 234:
Код: Выделить всё
if ( ($Billing->{PAYMENT_TYPE}==0) && ($line->[14] + $line->[15] <= $self->{SUM}) ) {
С веба hangup работает.
ABillS 0.37b + exppp
ЧТо делать ?

Добавлено: Сб сен 08, 2007 11:34 am
~AsmodeuS~
MPD Version 4.2.1 Протетировал Версия с CVS всё нормально.