[RADIATOR] Preventing Computer/Machine Authentication in AuthBy NTLM

[Heikki Vatiainen]

On 04/18/2014 07:31 PM, Michael Rodrigues wrote:

> I tried adding an AuthBy INTERNAL to the outer handler, using the perl 
> snippet you had suggested with RequestHook. I get a hook error whenever 
> it is called. I'm not a perl guru but I tried changing "${$_[1]}" to 
> just "$_[1]" and got rid of the SCALAR error, but I was still getting a 
> "Hook error" with no specific information.

Hello Michael,

your hook needs a couple of small changes. Try this.

RequestHook sub { my $rp = $_[1];
$rp->changeUserName($rp->{inner_identity}); return $main::ACCEPT;}

The hook parameter types depend on the hook. With RequestHook the Hook
gets passed a reference, not a reference to a reference like it does for
some Hooks. Also, you need to return a suitable return value because
AuthBy INTERNAL checks what the hook returns.

Thanks,
Heikki

-- 
Heikki Vatiainen <hvn at open.com.au>

Radiator: the most portable, flexible and configurable RADIUS server
anywhere. SQL, proxy, DBM, files, LDAP, NIS+, password, NT, Emerald,
Platypus, Freeside, TACACS+, PAM, external, Active Directory, EAP, TLS,
TTLS, PEAP, TNC, WiMAX, RSA, Vasco, Yubikey, MOTP, HOTP, TOTP,
DIAMETER etc. Full source on Unix, Windows, MacOSX, Solaris, VMS,
NetWare etc.