(RADIATOR) EAP_TTLS

Mike McCauley mikem at open.com.au
Tue Oct 1 18:18:55 CDT 2002


Hi Steve,

thanks for your note and the suggestion of your colleague, but I suspect this 
problem is occurring because you dont have (or arent running) the 
AuthGeneric.pm from the 3.3.1 patches. The latest AuthGeneric.pm defines 
EAPType as an array, not as a scalar. Perhaps you have an earlier patch set?

Pls let me know how you go.



On Tue, 1 Oct 2002 22:36, Steve Caporossi wrote:
> Mike and Hugh,
>
> I downloaded, and installed the patches but got the same results...A
> colleague of mine, Chris Dufala, looked at the code in EAP.pm...tweaked
> it a bit and now it is working.  You should have an received an email
> from him as well.  However, since you are more familiar with all the
> code, maybe this was just a temporary fix for our problem, and may
> introduce problems later?
>
> His email is below....
>
> I am an associate of Steve Caporrossi's at the Medical University of
> South Carolina.
>
> Steve had notified you, regarding a problem using EAP-TTLS with the
> 3.3.1 version
> of Radiator with patches applied.  While looking through the EAP.pm
> module, I located
> a small syntax error in the code that was preventing a sucessful
> connection using the
> Odyssey Client :
>
> Error Message :
>
>     Mon Sep 30 12:44:25 2002: ERR: Could not handle an EAP request: Can't
>        use string ("TTLS") as an ARRAY ref while "strict refs" in use at
>        /usr/lib/perl5/site_perl/5.6.1/Radius/EAP.pm line 117.
>
> Resolution :  (lines 117 & 118)
>
> Current :
>         # my $defaulttype = $eap_name_to_type{$self->{EAPType}[0]}
>         #        || return ($main::REJECT, "Unknown default EAP type
> $self->{EAPType}[0]");
>
> Change to :
>         my $defaulttype = $eap_name_to_type{$self->{EAPType}}
>
>                 || return ($main::REJECT, "Unknown default EAP type
>
> $self->{EAPType}");
>
>
> I hope this helps :>
>
> -Chris
>
> Thanks,
>
> Steve
>
> Mike McCauley wrote:
> > Hello Steve,
> >
> > On Tue, 1 Oct 2002 08:27, Hugh Irvine wrote:
> >>Hello Steve -
> >>
> >>I have copied this mail to Mike, as he has been doing quite a bit of
> >>work on this code recently.
> >>
> >>You should download the latest patches from the web site and install
> >>them.
> >>
> >>Mike will be able to answer any questions.
> >
> > Yes, as Hugh suggests, you should collect the latest patches from
> > www.open.com.au/radiator/downloads/patches-3.3.1 and then let me know
> > what you see.
> >
> > Cheers.
> >
> >>regards
> >>
> >>Hugh
> >>
> >>On Tuesday, October 1, 2002, at 03:20 AM, Steve Caporossi wrote:
> >>>Hugh-
> >>>
> >>>Can you tell me what this means?  I looked through the EAP.pm
> >>>but....do not understand alot of it.
> >>>
> >>>Mon Sep 30 12:44:25 2002: ERR: Could not handle an EAP request: Can't
> >>>use string ("TTLS") as an ARRAY ref while "strict refs" in use at
> >>>/usr/lib/perl5/site_perl/5.6.1/Radius/EAP.pm line 117.
> >>>
> >>>I recently upgraded to 3.3.1, from 3.2, since then, I have been
> >>>getting this error when trying to use EAP_TTLS and the Odyssey client.
> >>> The config file is the same that I had in version 3.2.
> >>>
> >>>Thanks,
> >>>
> >>>Steve
> >>>
> >>>***********************************************************************
> >>>**
> >>>
> >>>My logs show the following...
> >>>
> >>>Mon Sep 30 12:44:25 2002: DEBUG: Packet dump:
> >>>*** Received from x.x.x.135 port 1030 ....
> >>>Code:       Access-Request
> >>>Identifier: 3
> >>>Authentic:  ^<236><21><243><153><4><203><225><232>4.R<150>u<162><21>
> >>>Attributes:
> >>>	User-Name = "username"
> >>>	NAS-IP-Address = x.x.x.135
> >>>	Called-Station-Id = "004096439873"
> >>>	Calling-Station-Id = "00078592640e"
> >>>	NAS-Identifier = "usb3ap1"
> >>>	NAS-Port = 37
> >>>	Framed-MTU = 1400
> >>>	NAS-Port-Type = 19
> >>>	EAP-Message = <2><0><0><13><1>username
> >>>	Message-Authenticator =
> >>><127>1@<26><194><180><230><203><189><138>(<188><214>h<23>"
> >>>
> >>>Mon Sep 30 12:44:25 2002: DEBUG: Handling request with Handler
> >>>'Realm=DEFAULT'
> >>>Mon Sep 30 12:44:25 2002: DEBUG:  Deleting session for username,
> >>>x.x.x.135, 37
> >>>Mon Sep 30 12:44:25 2002: DEBUG: Handling with Radius::AuthSQL
> >>>Mon Sep 30 12:44:25 2002: DEBUG: Handling with Radius::AuthUNIX:
> >>>Mon Sep 30 12:44:25 2002: DEBUG: Radius::AuthUNIX looks for match with
> >>>username
> >>>Mon Sep 30 12:44:25 2002: DEBUG: Handling with EAP
> >>>Mon Sep 30 12:44:25 2002: DEBUG: EAP code 2, 0, 13
> >>>Mon Sep 30 12:44:25 2002: DEBUG: Response type 1
> >>>Mon Sep 30 12:44:25 2002: ERR: Could not handle an EAP request: Can't
> >>>use string ("TTLS") as an ARRAY ref while "strict refs" in use at
> >>>/usr/lib/perl5/site_perl/5.6.1/Radius/EAP.pm line 117.
> >>>
> >>>Mon Sep 30 12:44:25 2002: DEBUG: Radius::AuthUNIX REJECT: Could not
> >>>handle an EAP request
> >>>Mon Sep 30 12:44:25 2002: INFO: Access rejected for username: Could
> >>>not handle an EAP request
> >>>Mon Sep 30 12:44:25 2002: DEBUG: Packet dump:
> >>>*** Sending to x.x.x.135 port 1030 ....
> >>>Code:       Access-Reject
> >>>Identifier: 3
> >>>Authentic:  ^<236><21><243><153><4><203><225><232>4.R<150>u<162><21>
> >>>Attributes:
> >>>	Reply-Message = "Request Denied"
> >>>
> >>>
> >>>===
> >>>Archive at http://www.open.com.au/archives/radiator/
> >>>Announcements on radiator-announce at open.com.au
> >>>To unsubscribe, email 'majordomo at open.com.au' with
> >>>'unsubscribe radiator' in the body of the message.
> >>
> >>NB: I am travelling this week, so there may be delays in our
> >>correspondence.

-- 
Mike McCauley                               mikem at open.com.au
Open System Consultants Pty. Ltd            Unix, Perl, Motif, C++, WWW
24 Bateman St Hampton, VIC 3188 Australia   http://www.open.com.au
Phone +61 3 9598-0985                       Fax   +61 3 9598-0955

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 etc on Unix, Windows, MacOS etc.

===
Archive at http://www.open.com.au/archives/radiator/
Announcements on radiator-announce at open.com.au
To unsubscribe, email 'majordomo at open.com.au' with
'unsubscribe radiator' in the body of the message.


More information about the radiator mailing list