Страница 1 из 1
FreeBSD 8.1, FreeRADIUS 2.1.9, Perl 5.10 etc.
Добавлено: Пт сен 03, 2010 5:38 am
chtito
На днях собираемся апгрейдить FreeBSD 8.0->8.1, FreeRADIUS 2.1.3->2.1.9, MySQL 5.1->5.5
Perl тоже, с версии 5.8.8. С каким перлом нормально работает rlm_perl? Есть выбор: 5.8.9, 5.10, 5.12. Хочется 5.12
Прошу поделиться вашим опытом в аналогичных ситуациях, какие есть подводные камни и т.п. Спасибо за любые комментарии и советы.
Re: FreeBSD 8.1, FreeRADIUS 2.1.9, Perl 5.10 etc.
Добавлено: Пт сен 03, 2010 11:30 am
l30l3
Я обычно перед обновлением ганяю всё на виртуальной машине. Многие проблемы так получилось предупредить. Но как показала практика, некоторые косяки всплывают только под нагрузкой (у меня при использовании ng_car происходит cernel panic при онлайне 70+)
Я вообще заливаю дампы разделов сервера на разделы виртуальной машини по SSH, и так получаю клон для экспериментов. Если интересно, могу рассказать подробнее ...
Re: FreeBSD 8.1, FreeRADIUS 2.1.9, Perl 5.10 etc.
Добавлено: Пт сен 03, 2010 11:41 am
chtito
Спасибо, но вопрос неудачных апгрейдов классического типа у нас не стоит, т.к. апгрейд будет совмещен с переездом на новую машину, т.е. установлено все будет с нуля.
Re: FreeBSD 8.1, FreeRADIUS 2.1.9, Perl 5.10 etc.
Добавлено: Пт сен 03, 2010 1:07 pm
~AsmodeuS~
с 5.12 еще не пробовали
Re: FreeBSD 8.1, FreeRADIUS 2.1.9, Perl 5.10 etc.
Добавлено: Сб сен 04, 2010 4:01 pm
chtito
~AsmodeuS~ писал(а):с 5.12 еще не пробовали
Установил MySQL 5.5, Perl 5.12, FreeRADIUS 2.1.9. Скопировал туда всю БД.
radclient успешно сработал.
radiusd/rlm_perl в целом нормально запускается, с одним предупреждением:
Starting radiusd.
defined(%hash) is deprecated at /usr/abills/libexec/rauth.pl line 232.
(Maybe you should just omit the defined()?)
Subroutine access_deny redefined at /usr/abills/libexec/rauth.pl line 254.
Reply-Message = "Unknow server ''"
А вторая ошибка и раньше всегда была, ерунда.
Надеюсь нигде не будет более серьезных несоответствий с Perl 5.12
Работаем дальше.
Re: FreeBSD 8.1, FreeRADIUS 2.1.9, Perl 5.10 etc.
Добавлено: Сб сен 04, 2010 8:40 pm
~AsmodeuS~
это последний форк абилс?
Re: FreeBSD 8.1, FreeRADIUS 2.1.9, Perl 5.10 etc.
Добавлено: Вс сен 05, 2010 7:21 am
chtito
~AsmodeuS~ писал(а):это последний форк абилс?
Нет, 0.40b форк от 15-го сентября 2008 + свои доработки.
Все село на ура и без запинки, даже не ожидал, осталось проверить в действии.
Re: FreeBSD 8.1, FreeRADIUS 2.1.9, Perl 5.10 etc.
Добавлено: Чт фев 03, 2011 10:10 pm
zulu_radist
Тоже какой то варнинг плюет при старте радиуса
Код: Выделить всё
* Starting radiusd ...
defined(%hash) is deprecated at /usr/abills/libexec/rauth.pl line 259.
(Maybe you should just omit the defined()?) [ ok ]
Оно то вроде как работает но хотелось бы найти причину и устранить, чтобы потом не всплыло.
Re: FreeBSD 8.1, FreeRADIUS 2.1.9, Perl 5.10 etc.
Добавлено: Пт фев 04, 2011 4:06 am
chtito
zulu_radist писал(а):Тоже какой то варнинг плюет при старте радиуса
Код: Выделить всё
* Starting radiusd ...
defined(%hash) is deprecated at /usr/abills/libexec/rauth.pl line 259.
(Maybe you should just omit the defined()?) [ ok ]
Оно то вроде как работает но хотелось бы найти причину и устранить, чтобы потом не всплыло.
$ perldoc -f defined
Use of "defined" on aggregates (hashes and arrays) is
deprecated. It used to report whether memory for that
aggregate has ever been allocated. This behavior may disappear
in future versions of Perl. You should instead use a simple
test for size:
if (@an_array) { print "has array elements\n" }
if (%a_hash) { print "has hash members\n" }
т.е. по идее можно просто убрать defined.
if (defined(%RAD_REQUEST)) {
поменять на
if (%RAD_REQUEST) {
Re: FreeBSD 8.1, FreeRADIUS 2.1.9, Perl 5.10 etc.
Добавлено: Пт фев 04, 2011 6:51 am
zulu_radist
Спасибо большое, помогло
