Найдено 18 результатов

uncleVALERA
Пн сен 28, 2015 10:34 am
Форум: DV
Тема: Распределение абонплаты
Ответы: 24
Просмотры: 36332

Re: Распределение абонплаты

Понятно что должно быть так как Вы говорите, но я проверил еще раз и результат тот же: списание не происходит, статус меняется. В этом фрагменте кода я так понимаю не хватает проверки на уровень отладки: elsif (($user{ACTIVATE} eq '0000-00-00' and $d == $START_PERIOD_DAY) || $TP_INFO->{ABON_DISTRIBU...
uncleVALERA
Пн сен 28, 2015 6:34 am
Форум: DV
Тема: Распределение абонплаты
Ответы: 24
Просмотры: 36332

Re: Распределение абонплаты

ну например как я уже писал:
/usr/abills/libexec/periodic monthly DEBUG=10 LOGIN=len2 DATE=2015-09-28

Представьте так протестировать не на одном юзере, а на всех
uncleVALERA
Вс сен 27, 2015 7:27 pm
Форум: DV
Тема: Распределение абонплаты
Ответы: 24
Просмотры: 36332

Re: Распределение абонплаты

Кстати еще одно замечание: при запуске скрипта в режиме дебага деньги не списываются, но вот статус меняется!
:)
uncleVALERA
Вс сен 27, 2015 7:14 pm
Форум: DV
Тема: Распределение абонплаты
Ответы: 24
Просмотры: 36332

Re: Распределение абонплаты

И у пользователей и в настройках тарифов кредит установлен в 0 Однако пользователям разрешено брать кредит: $conf{user_credit_change}='0:4:50:1:PERIOD=40;MAX_CREDIT_SUM=300;MIN_PAYMENT_SUM=60;PERCENT=100'; Но все это не важно, т.к. выяснилось что подобное поведение вызвано тем что дата активации у п...
uncleVALERA
Вс сен 27, 2015 3:24 pm
Форум: DV
Тема: Распределение абонплаты
Ответы: 24
Просмотры: 36332

Re: Распределение абонплаты

Проблема пока что так и не решена Запускаю для определенного логина: /usr/abills/libexec/periodic monthly DEBUG=10 LOGIN=len2 DATE=2015-09-28 Получаю: TP ID: 1002 MF: 250.00 POSTPAID: 0 REDUCTION: 1 EXT_BILL_ID: 0 CREDIT: 0.00 MIN_USE: 0.00 ABON_DISTR: 1 Login: len2 (1070) TP_ID: 1002 Fees: 250.00 R...
uncleVALERA
Пт сен 04, 2015 12:46 pm
Форум: DV
Тема: Next Pool
Ответы: 10
Просмотры: 17977

Re: Next Pool

Как раз добрался до этого места.
Условия соблюдаются...
Однако :

Код: Выделить всё

    if($next_pool_id) {
       my $tmp123 = $self->get_ip($nas_num, $nas_ip, { TP_IPPOOL => $next_pool_id });
       return $tmp123;
    }
И все работает.
В противном случае доходим до конца функции и получаем return 0;
Все верно?
uncleVALERA
Пт сен 04, 2015 12:00 pm
Форум: DV
Тема: Next Pool
Ответы: 10
Просмотры: 17977

Re: Next Pool

В общем проблема все таки возникает тогда, когда первый пул занят и делается попытка получить адрес из второго пула.
Причем иногда адрес все таки выдаются.
Оба пула привязаны к серверу доступа.
uncleVALERA
Пт сен 04, 2015 10:18 am
Форум: DV
Тема: Next Pool
Ответы: 10
Просмотры: 17977

Re: Next Pool

Дальнейшие исследования показали, что функция get_ip возвращает 0 (напомню, что проблема проявляет себя не при каждом подключении) # Return radius attr if ($self->{IP} ne '0') { $RAD_PAIRS->{'Framed-IP-Address'} = "$self->{IP}"; if (! $self->{REASSIGN}) { $self->online_add({ %$attr,. NAS_ID => $NAS-...
uncleVALERA
Пт сен 04, 2015 9:40 am
Форум: DV
Тема: Next Pool
Ответы: 10
Просмотры: 17977

Re: Next Pool

Прошу прощения
в это строчке я добавлял отладку:

Код: Выделить всё

  while(my ($k, $v) = each %insert_hash) {
`echo "$self->{USER_NAME} : $k, $v  " >> /tmp/auth.log`;
    if($k eq 'framed_ip_address' && $v) {
uncleVALERA
Пт сен 04, 2015 8:51 am
Форум: DV
Тема: Next Pool
Ответы: 10
Просмотры: 17977

Re: Next Pool

Собственно по этим статусам и ориентировался. В логах радиуса обнаружил вот такое: Use of uninitialized value $v in concatenation (.) or string at /usr/abills/libexec/../Abills/mysql/Auth.pm line 1646. Cleartext-Password := "1234"Cleartext-Password := "4321"Use of uninitialized value $v in concatena...
uncleVALERA
Чт сен 03, 2015 5:47 pm
Форум: DV
Тема: Next Pool
Ответы: 10
Просмотры: 17977

Re: Next Pool

Здравствуйте! Появилась аналогичная проблема, но она носит периодический характер (т.е. под одним и тем же пользователем адрес может выдаться с одного из двух пулов, а могут выдаться нули) Проблема появилась после изменений в тарифах проведенных в вэб-интерфейсе. До этого все проработало 3 месяца. З...
uncleVALERA
Вс авг 16, 2015 11:46 am
Форум: Maps
Тема: Online DHCP
Ответы: 7
Просмотры: 13001

Re: Online DHCP

В нашем случае через commit вызывается внешний скрипт, который и добавляет лизу в БД.
uncleVALERA
Вс авг 16, 2015 7:04 am
Форум: Maps
Тема: Online DHCP
Ответы: 7
Просмотры: 13001

Re: Online DHCP

Т.е. в случае с isc-dhcp-server только переписывать Maps.pm?
Странно что у вас нигде в возможностях модуля эти моменты не упоминаются.
uncleVALERA
Сб авг 15, 2015 7:37 pm
Форум: Maps
Тема: Online DHCP
Ответы: 7
Просмотры: 13001

Re: Online DHCP

Я вижу что модуль показывает всех абонентов. Но он показывает что все абоненты у меня оффлайн. Хотя есть активные лизы. В Maps.pm есть функция - users_online_list и в ней я вижу что идет выборка только из Dv. Собственно я пока вообще не обнаружил связи Maps с Dhcphosts. Может будет более корректно н...
uncleVALERA
Пт авг 14, 2015 7:14 am
Форум: Maps
Тема: Online DHCP
Ответы: 7
Просмотры: 13001

Online DHCP

Здравствуйте,

Я так понимаю (судя по исходникам) информация о статусе онлайн клиентов берется только из Dv.
А нет ли модифицированного Maps.pm для того чтобы отображать онлайн из Dhcphosts ?