| Server IP : 189.126.111.107 / Your IP : 216.73.217.69 Web Server : Apache System : Linux www.gadotticar.com.br 5.4.0-135-generic #152-Ubuntu SMP Wed Nov 23 20:19:22 UTC 2022 x86_64 User : gadotticar ( 1000) PHP Version : 8.2.27 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /usr/share/webmin/virtual-server/ |
Upload File : |
do 'virtual-server-lib.pl';
# backup_config_files()
# Returns files and directories that can be backed up
sub backup_config_files
{
local @rv;
# Add all domain files
foreach my $d (&list_domains()) {
push(@rv, $d->{'file'});
}
# Add all bandwidth files
foreach my $d (&list_domains()) {
push(@rv, "$bandwidth_dir/$d->{'id'}")
if (-r "$bandwidth_dir/$d->{'id'}");
}
# Add all templates
foreach my $t (&list_templates()) {
if ($t->{'id'} > 0) {
push(@rv, "$templates_dir/$t->{'id'}");
}
}
# Add records of installed scripts
foreach my $d (&list_domains()) {
push(@rv, "$script_log_directory/$d->{'id'}")
if (-r "$script_log_directory/$d->{'id'}");
}
# Add mail templates
foreach my $tf (@all_template_files) {
push(@rv, "$module_config_directory/$tf");
}
# Add other files
push(@rv, $custom_fields_file);
push(@rv, $scripts_unavail_file);
# Add spam and procmail config files
foreach my $d (&list_domains()) {
push(@rv, "$procmail_spam_dir/$d->{'id'}")
if (-r "$procmail_spam_dir/$d->{'id'}");
push(@rv, "$spam_config_dir/$d->{'id'}")
if (-r "$spam_config_dir/$d->{'id'}");
}
# Add initial users
foreach my $d (&list_domains()) {
push(@rv, "$initial_users_dir/$d->{'id'}")
if (-r "$initial_users_dir/$d->{'id'}");
}
# IDs files
push(@rv, $old_uids_file, $old_gids_file);
return @rv;
}
# pre_backup(&files)
# Called before the files are actually read
sub pre_backup
{
return undef;
}
# post_backup(&files)
# Called after the files are actually read
sub post_backup
{
return undef;
}
# pre_restore(&files)
# Called before the files are restored from a backup
sub pre_restore
{
# Delete other domains
foreach my $d (&list_domains()) {
&delete_domain($d);
}
return undef;
}
# post_restore(&files)
# Called after the files are restored from a backup
sub post_restore
{
return undef;
}
1;