%PDF-1.5 %���� ºaâÚÎΞ-ÌE1ÍØÄ÷{òò2ÿ ÛÖ^ÔÀá TÎ{¦?§®¥kuµùÕ5sLOšuY
Server IP : 49.231.201.246 / Your IP : 216.73.216.248 Web Server : Apache/2.4.18 (Ubuntu) System : Linux 246 4.4.0-210-generic #242-Ubuntu SMP Fri Apr 16 09:57:56 UTC 2021 x86_64 User : root ( 0) PHP Version : 7.0.33-0ubuntu0.16.04.16 Disable Function : pcntl_alarm,pcntl_fork,pcntl_waitpid,pcntl_wait,pcntl_wifexited,pcntl_wifstopped,pcntl_wifsignaled,pcntl_wifcontinued,pcntl_wexitstatus,pcntl_wtermsig,pcntl_wstopsig,pcntl_signal,pcntl_signal_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority, MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /usr/share/webmin/bacula-backup/ |
Upload File : |
#!/usr/bin/perl # Show a form for restoring an old node group backup job require './bacula-backup-lib.pl'; &ui_print_header(undef, $text{'grestore_title'}, "", "grestore"); print &ui_form_start("grestore.cgi", "post"); print &ui_table_start($text{'grestore_header'}, undef, 2); # Old job to restore $dbh = &connect_to_database(); $cmd = $dbh->prepare("select JobId,Name,SchedTime from Job where Name not like 'Restore%' order by SchedTime desc") || &error("prepare failed : ",$dbh->errstr); $cmd->execute(); while(my ($id, $name, $when) = $cmd->fetchrow()) { if ($oc = &is_oc_object($name)) { push(@opts, [ $id, "$oc ($id) ($when)" ]); } } $cmd->finish(); print &ui_table_row($text{'restore_job'}, &ui_select("job", undef, \@opts)); # Files to restore print &ui_table_row($text{'restore_files'}, &ui_textarea("files", undef, 8, 50)."\n". &bacula_file_button("files", "job")); # Destination client @clients = sort { lc($a->{'name'}) cmp lc($b->{'name'}) } grep { &is_oc_object($_, 1) } &get_bacula_clients(); print &ui_table_row($text{'restore_client'}, &ui_select("client", undef, [ map { [ $_->{'name'}, &text('clientstatus_on', $_->{'name'}, $_->{'address'}) ] } @clients ])); # Storage device @storages = sort { lc($a->{'name'}) cmp lc($b->{'name'}) } &get_bacula_storages(); print &ui_table_row($text{'restore_storage'}, &ui_select("storage", undef, [ map { [ $_->{'name'}, &text('storagestatus_on', $_->{'name'}, $_->{'address'}) ] } @storages ])); print &ui_table_end(); print &ui_form_end([ [ "restore", $text{'restore_ok'} ] ]); &ui_print_footer("", $text{'index_return'});