Hi all,
After I upgraded my radiator from 1.13 to
1.14.1 , everything works now.
Regards,
Tom
On Fri, 30 Jul 1999, Hugh Irvine wrote:
> On Fri, 30 Jul 1999, tom wrote:
> > I put the following in <Realm DEFAULT> right
> > before the <AuthBy> clause.
> >
> > PreAuthHook sub {
> >
> > open(L, ">> /tmp/tmp.log");
> > printf L "(%s)\n", $_[0]->getUserName();
> > close(L);
> >
> > }
> >
> >
> > And I don't see any tmp.log file get created. What did I
> > do wrong?
> >
>
> Here is an example from the FAQ (which uses a file, but you don't have to).
>
> Notice that $p must be de-referenced: my $p = ${$_[0]}; (there was an error in
> the documentation about this that has now been corrected).
>
> <Realm xxxxx>
> PreAuthHook file:"preauthhook"
> ...
> </Realm>
>
> And in the file preauthhook:
>
> sub
> {
> my $p = ${$_[0]};
>
> return unless $p->code() eq 'Access-Request';
>
> my $username = $p->getAttrByNum($Radius::Radius::USER_NAME);
> my $nasaddress = $p->getAttrByNum($Radius::Radius::NAS_IP_ADDRESS);
> my $timestamp = time;
> # etc;
>
> if (open(LOGFILE, ">filename"))
> {
> print LOGFILE "$timestamp:$username:$nasaddress\n";
> close(LOGFILE);
> }
> }
>
> hth
>
> Hugh
>
> --
> Radiator: the most portable, flexible and configurable RADIUS server
> anywhere. SQL, proxy, DBM, files, LDAP, NIS+, password, NT, Emerald,
> Platypus, Freeside, TACACS+, PAM, external, etc etc on Unix, Win95/8,
> NT, Rhapsody
>
===
Archive at http://www.thesite.com.au/~radiator/
To unsubscribe, email '[EMAIL PROTECTED]' with
'unsubscribe radiator' in the body of the message.
