| Server IP : 104.21.25.180 / Your IP : 104.23.197.122 Web Server : Apache/2.4.37 System : Linux almalinux.duckdns.org 4.18.0-553.111.1.el8_10.x86_64 #1 SMP Sun Mar 8 20:06:07 EDT 2026 x86_64 User : ricodeal ( 1046) PHP Version : 7.4.33 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /usr/libexec/webmin/fsdump/ |
Upload File : |
#!/usr/bin/perl
# newtape.cgi
# Indicate that a new tape is loaded for a backup job
require './fsdump-lib.pl';
&ReadParse();
&error_setup($text{'newtape_err'});
&foreign_require("proc", "proc-lib.pl");
@procs = &proc::list_processes();
@running = &running_dumps(\@procs);
($job) = grep { $_->{'id'} eq $in{'id'} &&
$_->{'pid'} == $in{'pid'} } @running;
$job || &error($text{'newtape_egone'});
&can_edit_dir($job) || &error($text{'newtape_ecannot'});
$job->{'status'}->{'status'} eq 'tape' || &error($text{'newtape_estatus'});
kill('HUP', $job->{'status'}->{'tapepid'});
&redirect("");