Hello - I've got a Handler that looks at the Nas-IP-Address to determine
what to do.  I've also got a bad nas that doesn't send Nas-IP-Address in
the access packet.  I used to have a preclienthook to set this up, but
that is now built into radiator.  I've put a log statement in the getNasId
and the last statement that is supposed to fix this is indeed working.
However, my Handler isn't being matched.   From Trace 4:


Wed Oct 27 12:25:27 1999: DEBUG: Packet dump:
*** Received from 111.111.49.2 port 1536 ....
Code:       Access-Request
Identifier: 181
Authentic:  r<23><198>~#<18>~_&e 4<255>_Yp
Attributes:
        User-Name = "usera"
        Password = "<254>a%G<225><10>d<218>OW<186>!<28><159>cT"
        Service-Type = Framed-User
        Framed-Protocol = PPP
        NAS-Port = 9

Wed Oct 27 12:25:27 1999: DEBUG: Check if Handler
NAS-IP-Address=/111.111.(49|59).2/, Service-Type=Framed-User should be
used to handle this request

Wed Oct 27 12:25:27 1999: DEBUG: Check if Handler Realm="",
User-Name=/^[a-z0-9\-\.]+$/ should be used to handle this request

Wed Oct 27 12:25:27 1999: DEBUG: Handling request with Handler 'Realm="",
User-Name=/^[a-z0-9\-\.]+$/'



I have another similiar Handler clause for a set of nas units that do send
the Nas-IP-Address in the access packet and they work as intended.
Any thoughts on why this may not be working?  This is version 2.14.1
For posterity here is my old PreClientHook - which I have not tried under
2.14.1 as of yet:


PreClientHook sub { \
 if (${$_[0]}->getAttrByNum(4) eq '')\
 {\
        my @l = Socket::unpack_sockaddr_in(${$_[0]}->{RecvFrom});\
        my $x = Socket::inet_ntoa($l[1]);\
        ${$_[0]}->addAttrByNum(4, $x);\
        ${$_[0]}->{CachedAttrs}{4} = $x;\
 }\
}


--------------------------------------------------------------------------
Aaron Holtz
ComNet Inc.
UNIX Systems Administration/Network Operations
"It's not broken, it just lacks duct tape."
--------------------------------------------------------------------------



===
Archive at http://www.thesite.com.au/~radiator/
To unsubscribe, email '[EMAIL PROTECTED]' with
'unsubscribe radiator' in the body of the message.

Reply via email to