billd не вышибает юзеров

[fozzy]

с отрицательным или нулевым балансом.
abills current cvs от 03092007, mpd 4.2.2. С веба hangup работает.

[fozzy]

Баг найден: жесткая привязка к названию бандла в nas.pl

#*******************************************************************
# HANGUP MPD
# hangup_mpd4($SERVER, $PORT)
#*******************************************************************
sub hangup_mpd4 {
my ($NAS, $PORT, $attr) = @_;


my $ctl_port = "pptp$PORT";

У меня x. Бандлы могут называться произвольно. Да и вообще, пользуем l2tp. Казалось бы, при чем тут pptp?

[~AsmodeuS~]

если с веба работает должно и из билд работать

[fozzy]

если с веба работает должно и из билд работать

"должно" - не значит "работает".
после внесения исправлений работает.

[igor_s]

у меня billd при установленном в нем дебаге выдает список юзеров (это нормально) и если есть юзер, к-рый зашел в "0" либо "-" сообщение "Alarm clock"и юзера не отшибает. Пробовал телнетом на 127.0.0.1 5005 - все нормально, можна отключить пользователя. Из веба отшибает нормально. пользую мпд4.

[Илия]

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}) ) {

[igor_s]

не помогает

[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 $переменная" ничего не выдает на консоль. В общем еще раз ХЕЛП.

[~AsmodeuS~]

Включить в config.pl

$conf{debugmods}='LOG_DEBUG LOG_NOTICE LOG_ALERT LOG_WARNING LOG_ERR LOG_INFO';

и потом посмореть в abills.log

[igor_s]

ок. попробуем. сразу встречный вопрос. при включенном вот таком дебаге, строка в abills.log при _удачном_ входе должна изменить свой вид? я имею в виду добавится еще какие-то параметры???? и еще - при стандартных параметрах при отработке billd в лог вообще ничего не попадало
вопрос еще такой. я тестирую billd на отрубление таким образом - захожу тестовым юзером с положительным балансом, потом снимаю у нео со счета деньги, чтобы у него стал "-" и запускаю billd. это правильно?

[~AsmodeuS~]

При дебага будут передаваться все параметры что передаются пользователю радиусом

Снимать - Да правильно

[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: '

[igor_s]

нет решения ? какая то проблема с формированием строки для телнета??? куда глянуть? может сам подправлю???

[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
ЧТо делать ?

[~AsmodeuS~]

MPD Version 4.2.1 Протетировал Версия с CVS всё нормально.