#!/usr/bin/perl -w use esmith::Build::CreateLinks qw(:all); templates2events("/etc/rc.d/init.d/masq", "fail2ban-update"); templates2events("/etc/fail2ban/jail.conf", "fail2ban-conf"); templates2events("/etc/fail2ban/fail2ban.conf", "fail2ban-conf"); safe_symlink("adjust", "root/etc/e-smith/events/fail2ban-update/services2adjust/masq"); safe_symlink("adjust", "root/etc/e-smith/events/fail2ban-conf/services2adjust/fail2ban"); service_link_enhanced("fail2ban", "S92", "7"); service_link_enhanced("fail2ban", "K08", "6"); service_link_enhanced("fail2ban", "K08", "0"); safe_touch("root/var/service/fail2ban/down"); safe_symlink("../daemontools" , 'root/etc/rc.d/init.d/supervise/fail2ban'); safe_symlink("/var/service/fail2ban" , 'root/service/fail2ban');