X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Funset%2Flockout.pl;h=02169f30744ea2ac4fe790218cf64faba24fb634;hb=ab811a0c902225075a9bd69749f65594079433a9;hp=71641c6e38b81bee2c5109039ef7c72e6d480eab;hpb=337f38bfac57a5e5df34c63094fb869b0e2f6bee;p=spider.git diff --git a/cmd/unset/lockout.pl b/cmd/unset/lockout.pl index 71641c6e..02169f30 100644 --- a/cmd/unset/lockout.pl +++ b/cmd/unset/lockout.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 Iain Phillips G0RDI # -# $Id$ +# # my ($self, $line) = @_; my @args = split /\s+/, $line; @@ -13,16 +13,25 @@ my @out; my $user; my $ref; -return (1, $self->msg('e5')) if $self->priv < 9; +if ($self->priv < 9) { + Log('DXCommand', $self->call . " attempted to un-lockout @args"); + return (1, $self->msg('e5')); +} foreach $call (@args) { $call = uc $call; - if ($ref = DXUser->get_current($call)) { - $ref->lockout(0); - $ref->put(); - push @out, $self->msg("lockoutun", $call); + unless ($self->remotecmd || $self->inscript) { + if ($ref = DXUser::get_current($call)) { + $ref->lockout(0); + $ref->put(); + push @out, $self->msg("lockoutun", $call); + Log('DXCommand', $self->call . " un-locked out $call"); + } else { + push @out, $self->msg('e3', 'unset/lockout', $call); + } } else { - push @out, $self->msg('e3', 'unset/lockout', $call); + Log('DXCommand', $self->call . " attempted to un-lockout $call remotely"); + push @out, $self->msg('sorry'); } } return (1, @out);