File Manager

X7ROOT File Manager

Current Path: /usr/libexec/webmin/backup-config

usr / libexec / webmin / backup-config /

📁 ..
📄 CHANGELOG(1.59 KB)
📄 backup-config-lib.pl(19.49 KB)
📄 backup.cgi(1.88 KB)
📄 backup.pl(2.11 KB)
📄 cgi_args.pl(284 B)
📄 config(34 B)
📄 config-syno-linux(111 B)
📄 config.info(223 B)
📄 config.info.ar(326 B)
📄 config.info.ca(256 B)
📄 config.info.cs(137 B)
📄 config.info.de(204 B)
📄 config.info.es(175 B)
📄 config.info.fr(171 B)
📄 config.info.hr(0 B)
📄 config.info.hu(166 B)
📄 config.info.it(188 B)
📄 config.info.ja(181 B)
📄 config.info.ko(164 B)
📄 config.info.ms(228 B)
📄 config.info.nl(231 B)
📄 config.info.no(248 B)
📄 config.info.pl(252 B)
📄 config.info.ru(292 B)
📄 config.info.sk(139 B)
📄 config.info.sv(0 B)
📄 config.info.tr(174 B)
📄 edit.cgi(2.66 KB)
📁 help
📁 images
📄 index.cgi(3.34 KB)
📁 lang
📄 log_parser.pl(730 B)
📄 module.info(210 B)
📄 module.info.af(0 B)
📄 module.info.af.auto(166 B)
📄 module.info.ar(224 B)
📄 module.info.be(0 B)
📄 module.info.be.auto(303 B)
📄 module.info.bg(0 B)
📄 module.info.bg.auto(303 B)
📄 module.info.ca(194 B)
📄 module.info.cs(42 B)
📄 module.info.cs.auto(131 B)
📄 module.info.da(0 B)
📄 module.info.da.auto(180 B)
📄 module.info.de(125 B)
📄 module.info.el(0 B)
📄 module.info.el.auto(368 B)
📄 module.info.es(48 B)
📄 module.info.es.auto(145 B)
📄 module.info.eu(0 B)
📄 module.info.eu.auto(176 B)
📄 module.info.fa(0 B)
📄 module.info.fa.auto(272 B)
📄 module.info.fi(0 B)
📄 module.info.fi.auto(168 B)
📄 module.info.fr(50 B)
📄 module.info.fr.auto(146 B)
📄 module.info.he(0 B)
📄 module.info.he.auto(196 B)
📄 module.info.hr(0 B)
📄 module.info.hr.auto(180 B)
📄 module.info.hu(32 B)
📄 module.info.hu.auto(152 B)
📄 module.info.it(42 B)
📄 module.info.it.auto(117 B)
📄 module.info.ja(48 B)
📄 module.info.ja.auto(172 B)
📄 module.info.ko(29 B)
📄 module.info.ko.auto(124 B)
📄 module.info.lt(0 B)
📄 module.info.lt.auto(195 B)
📄 module.info.lv(0 B)
📄 module.info.lv.auto(171 B)
📄 module.info.ms(158 B)
📄 module.info.mt(0 B)
📄 module.info.mt.auto(169 B)
📄 module.info.nl(34 B)
📄 module.info.nl.auto(131 B)
📄 module.info.no(38 B)
📄 module.info.no.auto(135 B)
📄 module.info.pl(181 B)
📄 module.info.pt(0 B)
📄 module.info.pt.auto(170 B)
📄 module.info.pt_BR(0 B)
📄 module.info.pt_BR.auto(176 B)
📄 module.info.ro(0 B)
📄 module.info.ro.auto(179 B)
📄 module.info.ru(96 B)
📄 module.info.ru.auto(244 B)
📄 module.info.sk(42 B)
📄 module.info.sk.auto(133 B)
📄 module.info.sl(0 B)
📄 module.info.sl.auto(182 B)
📄 module.info.sv(38 B)
📄 module.info.sv.auto(140 B)
📄 module.info.th(0 B)
📄 module.info.th.auto(341 B)
📄 module.info.tr(45 B)
📄 module.info.tr.auto(162 B)
📄 module.info.uk(0 B)
📄 module.info.uk.auto(302 B)
📄 module.info.ur(0 B)
📄 module.info.ur.auto(220 B)
📄 module.info.vi(0 B)
📄 module.info.vi.auto(200 B)
📄 module.info.zh(99 B)
📄 module.info.zh_TW(0 B)
📄 module.info.zh_TW.auto(124 B)
📄 restore.cgi(1.55 KB)
📄 save.cgi(3.38 KB)
📄 uninstall.pl(321 B)

Editing: backup.pl

#!/usr/bin/perl
# Execute a backup on schedule

use strict;
use warnings;
no warnings 'redefine';
no warnings 'uninitialized';
our (%text, %config, $no_acl_check);
$no_acl_check++;
require './backup-config-lib.pl';
&foreign_require("mailboxes", "mailboxes-lib.pl");

# Get the backup
my $backup = &get_backup($ARGV[0]);
$backup || die "Failed to find backup $ARGV[0]";

# Run the pre-backup command, if any
my $err;
my $premsg = "";
if ($backup->{'pre'} =~ /\S/) {
	my $preout = &backquote_command("($backup->{'pre'}) 2>&1 </dev/null");
	$premsg = &text('email_pre', $backup->{'pre'})."\n".
		  $preout."\n";
	if ($?) {
		$err = $text{'email_prefailed'};
		}
	}

# Do it
my @mods = split(/\s+/, $backup->{'mods'});
my $size;
if (!$err) {
	$err = &execute_backup(\@mods, $backup->{'dest'}, \$size, undef,
			       $backup->{'configfile'}, $backup->{'nofiles'},
			       [ split(/\t+/, $backup->{'others'}) ]);
	}

# Run the post-backup command, if any
my $postmsg = "";
if (!$err && $backup->{'post'} =~ /\S/) {
	my $postout = &backquote_command("($backup->{'post'}) 2>&1 </dev/null");
	$postmsg = "\n".
		  &text('email_post', $backup->{'post'})."\n".
		  $postout."\n";
	}

# Send off the results
if (($err || $backup->{'emode'} == 0) && $backup->{'email'}) {
	my $mlist;
	foreach my $m (@mods) {
		my %minfo = &get_module_info($m);
		$mlist .= "    $minfo{'desc'}\n";
		}
	my $host = &get_system_hostname();
	my $nice = &nice_dest($backup->{'dest'}, 1);
	$nice =~ s/<[^>]+>//g;
	my $msg;
	my $subject;
	if ($err) {
		$err =~ s/<[^>]+>//g;
		$msg = $premsg.
		       $text{'email_mods'}."\n".
		       $mlist.
		       "\n".
		       &text('email_failed', $nice)."\n\n".
		       "    $err\n";
		$subject = &text('email_sfailed', $host);
		}
	else {
		$msg = $premsg.
		       $text{'email_mods'}."\n".
		       $mlist.
		       "\n".
		       &text('email_ok', $nice)."\n".
		       &text('email_final', &nice_size($size))."\n".
		       $postmsg;
		$subject = &text('email_sok', $host);
		}
	&mailboxes::send_text_mail($config{'from_addr'} ||
				   &mailboxes::get_from_address(),
				   $backup->{'email'},
				   undef,
				   $subject,
				   $msg);
	}

X7ROOT File Manager

Editing: backup.pl

Upload File

Create Folder