Страница 1 из 1

rlm_perl ошибка

Добавлено: Сб апр 05, 2008 6:06 am
galaxy
День добрый!
Попробовал перейти на rlm_perl.
При просмотре лога радиус выдает следующее
Acct-Session-Id = "47F704635000"
User-Name = "vadim"
Acct-Status-Type = Interim-Update
Service-Type = Framed-User
Framed-Protocol = PPP
Acct-Authentic = RADIUS
Acct-Session-Time = 3802
Acct-Output-Octets = 51280703
Acct-Input-Octets = 1301478
Acct-Output-Packets = 38097
Acct-Input-Packets = 29427
Vendor-1979-Attr-233 = 0x00000000
Vendor-1979-Attr-232 = 0x00000000
Vendor-1979-Attr-231 = 0x00000000
Vendor-1979-Attr-230 = 0x00000000
Vendor-1979-Attr-237 = 0x00000000
Vendor-1979-Attr-236 = 0x00000000
Vendor-1979-Attr-235 = 0x00000000
Vendor-1979-Attr-234 = 0x00000000
Vendor-1979-Attr-241 = 0x00000000
Vendor-1979-Attr-240 = 0x00000000
Vendor-1979-Attr-239 = 0x00000000
Vendor-1979-Attr-238 = 0x00000000
Vendor-1979-Attr-245 = 0x00000000
Vendor-1979-Attr-244 = 0x00000000
Vendor-1979-Attr-243 = 0x00000000
Vendor-1979-Attr-242 = 0x00000000
NAS-Port-Type = Async
Framed-IP-Address = 172.16.5.187
NAS-IP-Address = xxx.xxx.xxx.xxx
NAS-Port = 11
Acct-Delay-Time = 0
perl_pool: item 0x80c147f0 asigned new request. Handled so far: 1
found interpetator at address 0x80c147f0
rlm_perl: perl_embed:: module = /usr/abills/libexec/rlm_perl.pl , func = accounting exit status= DBD::mysql::db do failed: handle 2 is owned by thread 800feb40 not current thread 80c147f0 (handles can't be shared between threads and your driver may need a CLONE method added) at /usr/abills/libexec/../Abills/mysql/main.pm line 147.
perl_pool total/active/spare [5/0/5]
Unreserve perl at address 0x80c147f0
rad_recv: Accounting-Request packet from host 212.1.118.98:33167, id=183, length=318

В результате пользователь не подключается.
на сервере установлен SuSe Linux

Добавлено: Сб апр 05, 2008 9:06 am
~AsmodeuS~
пока rlm_perl не работает с perl threads

Добавлено: Сб апр 05, 2008 9:09 am
galaxy
Тогда встречный вопрос - а как отключить трейды в перл?

Добавлено: Пн авг 18, 2008 6:15 am
Metsger
Планируется добавление поддержки perl с потоками?