Файловый менеджер - Редактировать - /usr/share/webmin/at/irix-lib.pl
Назад
# solaris-lib.pl use POSIX; no warnings "redefine"; sub list_atjobs { local @rv; opendir(DIR, $config{'at_dir'}) || return (); while($f = readdir(DIR)) { local $p = "$config{'at_dir'}/$f"; if ($f =~ /^(\d+)\.a$/) { local @st = stat($p); local $job = { 'id' => $f, 'date' => $1, 'user' => scalar(getpwuid($st[4])), 'created' => $st[9] }; open(FILE, "<".$p); while(<FILE>) { $job->{'cmd'} .= $_; } close(FILE); $job->{'realcmd'} = $job->{'cmd'}; $job->{'realcmd'} =~ s/^[\000-\177]+#ident.*\ncd\s+\S+\nulimit\s+\S+\numask\s+\S+\n//; push(@rv, $job); } } closedir(DIR); return @rv; } # create_atjob(user, time, commands, directory, send-mail) sub create_atjob { local @tm = localtime($_[1]); local $date = strftime "%H:%M %b %d", @tm; local $mailflag = $_[4] ? "-m" : ""; local $cmd = "cd ".quotemeta($_[3])." ; at $mailflag $date"; local @uinfo = getpwnam($_[0]); if ($uinfo[2] != $<) { # Only SU if we are not already the user $cmd = &command_as_user($_[0], 0, $cmd); } &open_execute_command(AT, "$cmd >/dev/null 2>&1", 0); print AT $_[2]; close(AT); &additional_log('exec', undef, "su \"$_[0]\" -c \"cd $_[3] ; at $date\""); } # delete_atjob(id) sub delete_atjob { &system_logged("at -r ".quotemeta($_[0])); }
| ver. 1.4 |
Github
|
.
| PHP 7.4.3-4ubuntu2.28 | Генерация страницы: 0.01 |
proxy
|
phpinfo
|
Настройка