...
| Блок кода | ||
|---|---|---|
| ||
#
# Example nas hangup
#
sub hangup_dell {
my $self = shift;
my ($NAS, $PORT, $attr) = @_;
print print "Hangup!!!!\n";
return 0;
}
1 |
Тестирование RADIUS
...
| Блок кода |
|---|
./radtest.sh auth -rad -rad_file auth.mikrotik |
Проверить получение запроса можно через дебаг радиуса
| Блок кода |
|---|
radiusd -X |