diff --git a/smradiusd b/smradiusd index b738f728fae19f09b1e63cd1fad50e672a3bc9ed..4cfd6c6450785e8d5d97ad30e179a4501b9811ea 100755 --- a/smradiusd +++ b/smradiusd @@ -513,6 +513,13 @@ sub process_request { } } } + # Tell the NAS we got its packet + my $resp = Radius::Packet->new($self->{'radius'}->{'dictionary'}); + $resp->set_code('Accounting-Response'); + $resp->set_identifier($pkt->identifier); + $resp->set_authenticator($pkt->authenticator); + $udp_packet = auth_resp($resp->pack, "test"); + $server->{'client'}->send($udp_packet); # Or maybe a access request