X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fset%2Flockout.pl;h=d25a526108637d53755fef47593900b2dfa6eda4;hb=0154b38552abaaa4e79ebd9f3e647352acacbcc7;hp=911a82887977390027ce527b274723187d01d341;hpb=f38b81521d0430ef67023c3afaab2f4180e5b3bf;p=spider.git diff --git a/cmd/set/lockout.pl b/cmd/set/lockout.pl index 911a8288..d25a5261 100644 --- a/cmd/set/lockout.pl +++ b/cmd/set/lockout.pl @@ -13,19 +13,28 @@ 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 lockout @args"); + return (1, $self->msg('e5')); +} foreach $call (@args) { $call = uc $call; - if ($ref = DXUser->get_current($call)) { - $ref->lockout(1); - $ref->put(); - push @out, $self->msg("lockout", $call); + unless ($self->remotecmd || $self->inscript) { + if ($ref = DXUser->get_current($call)) { + $ref->lockout(1); + $ref->put(); + push @out, $self->msg("lockout", $call); + } else { + $ref = DXUser->new($call); + $ref->lockout(1); + $ref->put(); + push @out, $self->msg("lockoutc", $call); + } + Log('DXCommand', $self->call . " locked out $call"); } else { - $ref = DXUser->new($call); - $ref->lockout(1); - $ref->put(); - push @out, $self->msg("lockoutc", $call); + Log('DXCommand', $self->call . " attempted to lockout $call remotely"); + push @out, $self->msg('sorry'); } } return (1, @out);