On Mon, Mar 26, 2007 at 01:56:40PM +0100, Stephen Gran wrote:
> This one time, at band camp, Philipp Kolmann said:
> Huh. Interestingly, etch's perl doesn't seem to be linked against
> libperl. I wonder if that's intended.
Also sid's perl isn't linked to libperl.... Installed freeradius on my
workstation running sid and there I have the same problem.
> Well, just to be sure that you
> actually have the symbol that is failing to be found, please post the
> output of:
>
> [EMAIL PROTECTED]:~$ objdump -T /usr/lib/libperl.so | grep Perl_sv_cmp
> 0009b030 g DF .text 0000038d Base Perl_sv_cmp
> 0009b3c0 g DF .text 00000104 Base Perl_sv_cmp_locale
> [EMAIL PROTECTED]:~$ objdump -T /usr/bin/perl | grep Perl_sv_cmp
> 080d4ba0 g DF .text 00000372 Base Perl_sv_cmp
> 080d4f20 g DF .text 000000f4 Base Perl_sv_cmp_locale
moria:~# objdump -T /usr/lib/libperl.so | grep Perl_sv_cmp
0009b030 g DF .text 0000038d Base Perl_sv_cmp
0009b3c0 g DF .text 00000104 Base Perl_sv_cmp_locale
moria:~# objdump -T /usr/bin/perl | grep Perl_sv_cmp
080d4ba0 g DF .text 00000372 Base Perl_sv_cmp
080d4f20 g DF .text 000000f4 Base Perl_sv_cmp_locale
You can check with the following config:
/etc/freeradius/radiusd.conf:
modules {
[...]
perl dtcheck {
module = /etc/freeradius/dtcheck.pm
func_post_auth = post_auth
max_clones = 32
start_clones = 32
min_spare_clones = 0
max_spare_clones = 32
cleanup_delay = 5
max_request_per_clone = 0
}
}
[...]
post-auth {
[...]
dtcheck
}
}
and a minimal /etc/freeradius/dtcheck.pm:
====
use strict;
# This is very important ! Without this script will not get the filled
# hashesh from main.
use vars qw(%RAD_REQUEST %RAD_REPLY %RAD_CHECK);
use Data::Dumper;
====
should crash.
Thanks
Philipp
--
The more I learn about people, the more I like my dog!
--
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]
