(RADIATOR) Radiator Crashes on Monitor quit command

[Ernst Oudhof]

Hi,

I think I found a bug in radiator 4 which causes the server to crash
when given the quit command in a monitor session...

The debug log:

eoudhof at binky:~$ radiusd -config_file monitor.cfg
Tue Mar  4 11:13:39 2008: DEBUG: Creating StreamServer tcp port
0.0.0.0:9048
Tue Mar  4 11:13:39 2008: DEBUG: Finished reading configuration file
'monitor.cfg'
Tue Mar  4 11:13:39 2008: DEBUG: Reading dictionary file './dictionary'
Tue Mar  4 11:13:39 2008: DEBUG: Creating authentication port
0.0.0.0:1645
Tue Mar  4 11:13:39 2008: DEBUG: Creating accounting port 0.0.0.0:1646
Tue Mar  4 11:13:39 2008: NOTICE: Server started: Radiator 4.1 on binky
Tue Mar  4 11:13:51 2008: DEBUG: New StreamServer Connection created for
127.0.0.1:34273
Tue Mar  4 11:13:51 2008: DEBUG: New MonitorConnection created for
127.0.0.1:34273
Tue Mar  4 11:13:53 2008: DEBUG: Monitor received command: quit
Can't locate object method "disconnect" via package
"Radius::MonitorConnection"
at /usr/local/share/perl/5.8.8/Radius/Monitor.pm line 341.
eoudhof at binky:~$ 


in 3.17 the following sub is in Monitor.pm this seems to be missing in
4.x

sub disconnect
{
    my ($self) = @_;

    # Deleting any references to this MonitorConnection will
    # cause it to be destroyed    
    &Radius::Select::remove_file
        (fileno($self->{socket}), 1, 1, 1);
    &Radius::LogGeneric::remove_logger($self);
    close($self->{socket});
    $self->{parent}->log($main::LOG_DEBUG,  "MonitorConnection
disconnected from $self->{peeraddr}:$self->{peerport}");
}

Regards,

Ernst

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