One Hat Cyber Team

Your IP: 216.73.216.13
Server IP: 109.199.105.153
Server: Linux connect.inboxifs.com 5.15.0-152-generic #162-Ubuntu SMP Wed Jul 23 09:48:42 UTC 2025 x86_64
Server Software: Apache
PHP Version: 8.2.29
Buat File | Buat Folder

View File Name : backup_config.pl

use strict;
use warnings;
no warnings 'redefine';
no warnings 'uninitialized';
our %config;

do 'at-lib.pl';

# backup_config_files()
# Returns files and directories that can be backed up
sub backup_config_files
{
my @rv;
if (opendir(my $DIR, $config{'at_dir'})) {
	while(my $f = readdir($DIR)) {
		next if ($f eq "." || $f eq ".." || $f eq ".SEQ");
		if (!-d "$config{'at_dir'}/$f") {
			push(@rv, "$config{'at_dir'}/$f");
			}
		}
	closedir($DIR);
	}
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
{
return undef;
}

# post_restore(&files)
# Called after the files are restored from a backup
sub post_restore
{
return undef;
}

1;