On Sat, Feb 12, 2005 at 01:02:34AM -0600, Dudley Atkinson wrote:
> I'd like to implement the rlm_perl to rewrite some attributes, and I get a
> segfault. I've included the debug and the perl -VV so maybe someone more
> knowledgeable can tell me why it fails (or give me a good pointer).
>
First apply patches from bug 111 and 179 to fresh rlm_perl taken from CVS
> Attr_rewrite won't work for this, because I want to change the User-Name
> based on what the Cisco-AVPair is. If attr_rewrite will work for this
> situation, I'm all ears (or eyes as the case may be), but I couldn't see how
> to do that from the faq/doc/googles.
>
You can do this with attr_rewrite and perl xlat.
attr_rewrite test {
attribute = User-Name
# may be "packet", "reply", "proxy", "proxy_reply" or "config"
searchin = packet
searchfor = "\.*"
replacewith = %{perl:%{Cisco-AVPair[*]}
}
ignore_case = no
new_attribute = no
max_matches = 1
## If set to yes then the replace string will be appended to the
original string
append = no
}
in your perl script
sub xlat {
@CiscoAVPair = @_;
#some code here
return $username;
}
and put test (name of instance of attr_rewrite) in authorize section.
I hope this will help.
--
Best Regards,
Boian Jordanov
SNE
Orbitel - the Internet Company
tel. +359 2 4004 723
-
List info/subscribe/unsubscribe? See http://www.freeradius.org/list/users.html
