]>
Commit | Line | Data |
---|---|---|
10e4f239 MT |
1 | #!/usr/bin/perl |
2 | # | |
3 | # This code is distributed under the terms of the GPL | |
4 | # | |
5 | # (c) written from scratch | |
6 | # | |
10e4f239 MT |
7 | |
8 | $dbdir="/var/ipfire/urlfilter/blacklists"; | |
9 | ||
10 | system("/usr/bin/squidGuard -C all"); | |
11 | ||
10e4f239 MT |
12 | system("chown -R nobody.nobody $dbdir"); |
13 | ||
1465b127 MT |
14 | &setpermissions ($dbdir); |
15 | ||
16 | # ------------------------------------------------------------------- | |
17 | ||
18 | sub setpermissions | |
10e4f239 | 19 | { |
1465b127 MT |
20 | my $bldir = $_[0]; |
21 | ||
22 | foreach $category (<$bldir/*>) | |
23 | { | |
24 | if (-d $category){ | |
25 | system("chmod 755 $category &> /dev/null"); | |
26 | foreach $blacklist (<$category/*>) | |
27 | { | |
28 | if (-f $blacklist) { system("chmod 644 $blacklist &> /dev/null"); } | |
29 | if (-d $blacklist) { system("chmod 755 $blacklist &> /dev/null"); } | |
30 | } | |
31 | system("chmod 666 $category/*.db &> /dev/null"); | |
32 | &setpermissions ($category); | |
10e4f239 | 33 | } |
10e4f239 MT |
34 | } |
35 | } | |
1465b127 MT |
36 | |
37 | # ------------------------------------------------------------------- |