Linux vps-61133.fhnet.fr 4.9.0-19-amd64 #1 SMP Debian 4.9.320-2 (2022-06-30) x86_64
Apache/2.4.25 (Debian)
Server IP : 93.113.207.21 & Your IP : 216.73.216.122
Domains :
Cant Read [ /etc/named.conf ]
User : www-data
Terminal
Auto Root
Create File
Create Folder
Localroot Suggester
Backdoor Destroyer
Readme
/
usr /
share /
doc /
bacula-common /
examples /
conf /
Delete
Unzip
Name
Size
Permission
Date
Action
bacula-defs.m4
1.1
KB
-rw-r--r--
2016-09-21 11:58
console.conf
169
B
-rw-r--r--
2016-09-21 11:58
defaultconfig
673
B
-rwxr-xr-x
2016-09-21 11:58
fileset_convert.pl
723
B
-rwxr-xr-x
2016-09-21 11:58
kernsconfig
765
B
-rwxr-xr-x
2016-09-21 11:58
m4.Makefile
1.07
KB
-rw-r--r--
2016-09-21 11:58
m4.additions
1.4
KB
-rw-r--r--
2016-09-21 11:58
m4.bacula-dir.conf.gz
2.08
KB
-rw-r--r--
2016-09-21 11:58
m4.bacula-fd.conf
734
B
-rw-r--r--
2016-09-21 11:58
m4.bacula-sd.conf
3.88
KB
-rw-r--r--
2016-09-21 11:58
m4.email
1.15
KB
-rw-r--r--
2016-09-21 11:58
many-clients.txt
2.72
KB
-rw-r--r--
2016-09-21 11:58
Save
Rename
#!/usr/bin/perl # # A nice little script written by Matt Howard that will # convert old style Bacula FileSets into the new style. # # fileset_convert.pl bacula-dir.conf >output-file # use warnings; use strict; my $in; $in .= $_ while (<>); sub options { return "Options { ".join('; ',split(/\s+/, shift)) . " } "; } sub file_lines { return join($/, map {" File = $_"} split(/\n\s*/, shift)); } $in =~ s/Include\s*=\s*((?:\w+=\w+\s+)*){\s*((?:.*?\n)+?)\s*}/ "Include { " . ( $1 ? options($1) : '' ) . "\n" . file_lines($2) . "\n }" /eg; $in =~ s/Exclude\s*=\s*{\s*}/ "Exclude { }"/eg; $in =~ s/Exclude\s*=\s*{\s*((?:.*?\n)+?)\s*}/ "Exclude {\n" . file_lines($1) . "\n }"/eg; print $in;