Handle hostnames with upper-case letters
[webmin.git] / bandwidth / backup_config.pl
1
2 do 'bandwidth-lib.pl';
3 &foreign_require("firewall", "backup_config.pl");
4 if ($syslog_module) {
5         &foreign_require($syslog_module, "backup_config.pl");
6         }
7
8 # backup_config_files()
9 # Returns files and directories that can be backed up
10 sub backup_config_files
11 {
12 # Just backup syslog and firewall
13 return ( &firewall::backup_config_files(),
14          $syslog_module ? &foreign_call($syslog_module, "backup_config_files")
15                         : ( ) );
16 }
17
18 # pre_backup(&files)
19 # Called before the files are actually read
20 sub pre_backup
21 {
22 return &firewall::pre_backup() &&
23        ($syslog_module ? &foreign_call($syslog_module, "pre_backup") : 1);
24 }
25
26 # post_backup(&files)
27 # Called after the files are actually read
28 sub post_backup
29 {
30 return &firewall::post_backup() &&
31        ($syslog_module ? &foreign_call($syslog_module, "post_backup") : 1);
32 }
33
34 # pre_restore(&files)
35 # Called before the files are restored from a backup
36 sub pre_restore
37 {
38 return &firewall::pre_restore() &&
39        ($syslog_module ? &foreign_call($syslog_module, "pre_restore") : 1);
40 }
41
42 # post_restore(&files)
43 # Called after the files are restored from a backup
44 sub post_restore
45 {
46 return &firewall::post_restore() &&
47        ($syslog_module ? &foreign_call($syslog_module, "post_restore") : 1);
48 }
49
50 1;
51