54 lines
2.8 KiB
Perl
Executable File
54 lines
2.8 KiB
Perl
Executable File
#!/usr/bin/perl -w
|
|
|
|
use esmith::Build::CreateLinks qw(:all);
|
|
use File::Basename;
|
|
use File::Path;
|
|
|
|
my $panel = "manager";
|
|
panel_link("wbl", $panel);
|
|
|
|
templates2events("/var/service/qpsmtpd/config/badmailfrom", "email-update");
|
|
templates2events("/var/service/qpsmtpd/config/whitelisthelo", "email-update");
|
|
templates2events("/var/service/qpsmtpd/config/whitelisthosts", "email-update");
|
|
templates2events("/var/service/qpsmtpd/config/whitelistsenders", "email-update");
|
|
|
|
|
|
my $wbl = "wbl-update";
|
|
templates2events("/var/qmail/control/badmailfrom", "$wbl");
|
|
templates2events("/var/service/qpsmtpd/config/badmailfrom", "$wbl");
|
|
templates2events("/var/service/qpsmtpd/config/badhelo", "$wbl");
|
|
templates2events("/var/service/qpsmtpd/config/dnsbl_zones", "$wbl");
|
|
templates2events("/var/service/qpsmtpd/config/rhsbl_zones ", "$wbl");
|
|
templates2events("/var/service/qpsmtpd/config/whitelisthelo", "$wbl");
|
|
templates2events("/var/service/qpsmtpd/config/whitelisthosts", "$wbl");
|
|
templates2events("/var/service/qpsmtpd/config/whitelistsenders", "$wbl");
|
|
templates2events("/var/service/qpsmtpd/config/peers/0", "$wbl");
|
|
templates2events("/var/service/qpsmtpd/config/peers/local", "$wbl");
|
|
templates2events("/etc/mail/spamassassin/local.cf", "$wbl");
|
|
safe_symlink("restart", "root/etc/e-smith/events/$wbl/services2adjust/spamassassin");
|
|
safe_symlink("restart", "root/etc/e-smith/events/$wbl/services2adjust/qpsmtpd");
|
|
safe_symlink("restart", "root/etc/e-smith/events/$wbl/services2adjust/sqpsmtpd");
|
|
safe_symlink("../../plugins/11whitelist",
|
|
"root/etc/e-smith/templates/var/service/qpsmtpd/config/peers/0/11whitelist");
|
|
|
|
# own event
|
|
my $wbl = "smeserver-wbl-update";
|
|
templates2events("/var/qmail/control/badmailfrom", "$wbl");
|
|
templates2events("/var/service/qpsmtpd/config/badmailfrom", "$wbl");
|
|
templates2events("/var/service/qpsmtpd/config/badhelo", "$wbl");
|
|
templates2events("/var/service/qpsmtpd/config/dnsbl_zones", "$wbl");
|
|
templates2events("/var/service/qpsmtpd/config/rhsbl_zones ", "$wbl");
|
|
templates2events("/var/service/qpsmtpd/config/whitelisthelo", "$wbl");
|
|
templates2events("/var/service/qpsmtpd/config/whitelisthosts", "$wbl");
|
|
templates2events("/var/service/qpsmtpd/config/whitelistsenders", "$wbl");
|
|
templates2events("/var/service/qpsmtpd/config/peers/0", "$wbl");
|
|
templates2events("/var/service/qpsmtpd/config/peers/local", "$wbl");
|
|
templates2events("/etc/mail/spamassassin/local.cf", "$wbl");
|
|
|
|
safe_symlink("restart", "root/etc/e-smith/events/$wbl/services2adjust/spamassassin");
|
|
safe_symlink("restart", "root/etc/e-smith/events/$wbl/services2adjust/qpsmtpd");
|
|
safe_symlink("restart", "root/etc/e-smith/events/$wbl/services2adjust/sqpsmtpd");
|
|
event_link("navigation-conf", $wbl, "80");
|
|
safe_symlink("../../plugins/11whitelist",
|
|
"root/etc/e-smith/templates/var/service/qpsmtpd/config/peers/0/11whitelist");
|