strange behavior of checkrad and radius with Authen::Radius

[Nick Porter]

On 14/02/2024 23:35, Igor Smitran wrote:
>
> But, when called from freeradius Authen::Radius looses $self{'secret'} 
> value, it becomes undef.
>
> When freeradius started with -X it prints:
>
> Use of uninitialized value in subroutine entry at 
> /usr/local/share/perl/5.34.0/Authen/Radius.pm line 1004.
>
This sounds like an issue retrieving the client password from 
/etc/raddb/naspasswd


> sub cisco_coa {
>
>         return 2 unless (check_authen_radius());
>
>         my ($login, $pass) = naspasswd($ARGV[1], 1);
>
I would add debug logging at this point to verify the values of $ARGV[1] 
and $pass are what you expect.


-- 
Nick Porter

-------------- next part --------------
A non-text attachment was scrubbed...
Name: OpenPGP_signature.asc
Type: application/pgp-signature
Size: 665 bytes
Desc: OpenPGP digital signature
URL: <http://lists.freeradius.org/pipermail/freeradius-users/attachments/20240215/cc1a6a69/attachment.sig>