(RADIATOR) EAP_TTLS

Steve Caporossi capoross at musc.edu
Tue Oct 1 07:36:04 CDT 2002


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.
> 
> 

===
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