Trucation of octet attribute handled by rlm_perl

Iliya Peregoudov iperegudov at cboss.ru
Fri Mar 1 07:23:36 CET 2013


All attributes in rlm_perl scripts should be text. rlm_perl convert them 
to text before function call and convert them from text after function 
return. So you should use

$RAD_REPLY{'DHCP-Classless-Static-Route'} = '0x'.unpack('H*', $route);

On 28.02.2013 11:05, Бен Томпсон wrote:
> Hello everyone
>
> I am having a slight problem with rlm_perl and I would really
> appreciate any advice/help.
>
> I have a perl script which rlm_perl adds a value to the
> DHCP-Classless-Static-Route attribute something like this :-
>
> #### perl script snippets ############
> ...
> my $route = pack('C7', split(/\,/, "16,172,16,10,0,0,2"));
> ...
> &radiusd::radlog(RADLOG_DEBUG, "packed data: " . unpack('H*', $route));
> ...
> $RAD_REPLY{'DHCP-Classless-Static-Route'} = $route;
> ...
> ###############################


More information about the Freeradius-Users mailing list