33 lines
1.2 KiB
Perl
33 lines
1.2 KiB
Perl
#!/usr/bin/perl -w
|
|
|
|
use esmith::Build::CreateLinks qw(:all);
|
|
|
|
service_link_enhanced("ntop", "S93", "7");
|
|
service_link_enhanced("ntop", "K83", "6");
|
|
service_link_enhanced("ntop", "K83", "0");
|
|
|
|
safe_symlink("../daemontools" , 'root/etc/rc.d/init.d/supervise/ntop');
|
|
safe_symlink("/var/service/ntop" , 'root/service/ntop');
|
|
|
|
safe_touch("root/var/service/ntop/down");
|
|
|
|
templates2events("/etc/ntop.conf", "ntop-update");
|
|
templates2events("/etc/ntop.conf", "remoteaccess-update");
|
|
templates2events("/etc/ntop.conf", "network-create");
|
|
templates2events("/etc/ntop.conf", "network-delete");
|
|
templates2events("/etc/ntop.conf", "bootstrap-console-save");
|
|
templates2events("/etc/httpd/conf/httpd.conf", "ntop-update");
|
|
templates2events("/etc/services", "ntop-update");
|
|
templates2events("/etc/hosts.allow", "ntop-update");
|
|
|
|
foreach my $event (qw/ipasserelle-update bootstrap-ldap-save ntop-update/){
|
|
event_link("ntop-init-domain", "$event", "90");
|
|
}
|
|
|
|
for my $event qw(ntop-update remoteaccess-update network-create network-delete){
|
|
safe_symlink("restart", "root/etc/e-smith/events/$event/services2adjust/ntop");
|
|
}
|
|
|
|
safe_symlink("sigusr1", "root/etc/e-smith/events/ntop-update/services2adjust/httpd-e-smith");
|
|
|