From: Lucas, David (David.Lucas@unh.edu)
Date: Tue Jun 29 2004 - 10:10:43 CDT
Tim,
You'll need to install Authen::Radius which can be downloaded from
www.cpan.org. Once you've done that then you need to add the following to
variables.pl file:
$AUTH_METHOD = "RADIUS";
# if ($AUTH_METHOD = "POP") { use Mail::POP3Client; }
if ($AUTH_METHOD = "RADIUS") { use Authen::Radius; }
# if ($AUTH_METHOD = "FTP") { use Net::FTP; }
I've also added to the variables.pl file:
$RADIUSSERVER = "x.x.x.x:1645";
Then in your register.cgi file you'll need to add something to the effect of
these lines:
sub authenticate {
if ($AUTH_METHOD eq "POP") {
$pop = new
Mail::POP3Client("$FORM{'user'}","$FORM{'pass'}","$POPSERVER");
$alive = $pop->POPStat;
$popmsg = $pop->Message;
$pop->Close;
unless ($alive ne "-1") {
error("Authentication Failed<P>ERROR:<br>$popmsg");
}
}
elsif ($AUTH_METHOD eq "FTP") {
$ftp = Net::FTP->new($FTPSERVER);
$ftp->login($FORM{'user'}, $FORM{'pass'});
$ftp->pwd()||error("Authentication Failed<P>Bad Username or
Password.");
}
elsif ($AUTH_METHOD eq "RADIUS") {
$r = new Authen::Radius(Host => $RADIUSSERVER, Secret => <your Radius
Seceret>);
$r->check_pwd($FORM{'user'}, $FORM{'pass'})||error("Authentication
Failed Bad Username or Password.\n");
}
else {
error("No Authentication Method");
}
}
That should do it. One thing that I would like to add is some redundancy if
that Radius server goes down. At some point I need to code that, just
haven't gotten around to it. If you have any questions let me know.
Dave
-----Original Message-----
From: owner-netreg@southwestern.edu [mailto:owner-netreg@southwestern.edu]
On Behalf Of Tim Tyler
Sent: Tuesday, June 29, 2004 10:55 AM
To: netreg@southwestern.edu
Subject: NetReg: Radius authentication for netreg?
Netreg experts,
We got netreg v1.3rc2 up and running and it seems to work well with POP
authentication for us. Great instructions!
However, we would prefer to use Radius instead of POP or the other
authentication methods at the moment. Has anyone gotten Radius working with
this version? If so, could you share the code and steps to getting it
working?
Much appreciation! -thanks!
Tim
Tim Tyler
Network Engineer
--------------------------------------
This Email Was brought to you by
WebMail
A Netwin Web Based EMail Client
http://netwinsite.com/webmail/tag.htm
**********************************************************************
To unsubscribe from this list, send an e-mail message to
majordomo@southwestern.edu containing a single line with the words:
unsubscribe netreg
Send requests for assistance to: owner-netreg@southwestern.edu
**********************************************************************
**********************************************************************
To unsubscribe from this list, send an e-mail message to
majordomo@southwestern.edu containing a single line with the words:
unsubscribe netreg
Send requests for assistance to: owner-netreg@southwestern.edu
**********************************************************************
This archive was generated by hypermail 2.1.4 : Thu Aug 12 2004 - 12:01:46 CDT