Hi,
2- In example.pl a small sintaxe to UPPER case the Calling-Station-Id like
this,
$RAD_REQUEST{'Calling-Station-Id'} =
uc($RAD_REQUEST{'Calling-Station-Id'}); in the sub authorize and sub
preacct.
3- I commented the line 30 of example.pl, i.e., #use Data::Dumper; no
more problems
Well,
I guess this is not the correct workaround, but, I did:
1- In policy.conf a function mac-phase which returns MAC with hyphens.
As soon as possible I will do this in example.pl file...
2- In example.pl a small sintaxe to UPPER case the Calling-Station-Id like this,
Hi,
Can't load
'/usr/lib/perl5/5.10.0/i586-linux-thread-multi/auto/Data/Dumper/Dumper.so'
for module Data::Dumper:
/usr/lib/perl5/5.10.0/i586-linux-thread-multi/auto/Data/Dumper/Dumper.so:
undefined symbol: Perl_sv_cmp at
/usr/lib/perl5/5.10.0/i586-linux-thread-multi/XSLoader.pm line 64.
Ok...
I tried $RAD_REQUEST{'Calling-Station-Id'} =
uc($RAD_REQUEST{'Calling-Station-Id'}).
I guess in the sub authorize of example.pl ..The only file
I saw sub authorize in...
If I am wrong, please help me what is the correct file!
Running radiusd -X nothing happens in MAC address.
Did you create an alias in modules/perl that uses this script for authorize?
Did you add the alias name to the authorize section of your default server?
What return value are you using in the script (RLM_UPDATED)?
-Original Message-
From:
Did you create an alias in modules/perl that uses this script for
authorize?
Perl module is configured to run example.pl by default. There is no need
to make any changes in raddb/modules/perl. Only if you want to run a
different script.
Ivan Kalik
Kalik Informatika ISP
-
List
-BEGIN PGP SIGNED MESSAGE-
Hash: SHA1
that _should_ work for you:
- -- cut --
use vars qw(%RAD_REQUEST %RAD_REPLY %RAD_CHECK);
sub authorize {
$RAD_REQUEST{'Calling-Station-Id'} = uc($RAD_REQUEST{'Calling-Station-Id'});
}
sub preacct {
$RAD_REQUEST{'Calling-Station-Id'} =
Thanks Saraev,
Again, a new problem emerged... :-(
In /etc/raddb/modules I do not see perl module...:-(
I am running opensuse 11.1 and freeradius 2.1.1-1.27 from opensuse repository.
Is there a way to get this problem solved, i.e. , perl module missing
in modules subdirectory?
Is there
-BEGIN PGP SIGNED MESSAGE-
Hash: SHA1
http://wiki.freeradius.org/Rlm_perl
radiusd.conf:
- -- cut --
modules {
...
perl {
module = /path/to/blah.pl
}
}
...
authorize {
preprocess
...
sql
...
Thank you Kalik, Saraev and Garber.
I will upgrade my freeradius. Give a time to do this. I come back
later with news...
Guaraldi
2009/9/18 Stefan Saraev s...@link.bg:
-BEGIN PGP SIGNED MESSAGE-
Hash: SHA1
http://wiki.freeradius.org/Rlm_perl
radiusd.conf:
- -- cut --
modules {
Hi,
It´s me again...
I updated to 2.1.6.
Example.pl with $RAD_REQUEST{'Calling-Station-Id'} =
uc($RAD_REQUEST{'Calling-Station-Id'}); line in sub authorize.
Perl module under authorize in default file like this:
authorize {
preprocess
...
sql
...
perl
11 matches
Mail list logo