5,576
edits
Changes
From SME Server
Jump to navigationJump to searchCreatelinks example script (view source)
Revision as of 16:40, 29 December 2013
, 16:40, 29 December 2013→Example : denyhost
==== Example : denyhost ====
==== Example : denyhost ====
#!/usr/bin/perl -w
#!/usr/bin/perl -w
use esmith::Build::CreateLinks qw(:all);
use esmith::Build::CreateLinks qw(:all);
panel_link("denyhosts", "manager");
panel_link("denyhosts", "manager");
service_link_enhanced("denyhosts", "S01", "7");
service_link_enhanced("denyhosts", "S01", "7");
safe_symlink('restart', "root/etc/e-smith/events/conf-denyhosts/services2adjust/denyhosts");
safe_symlink('restart', "root/etc/e-smith/events/conf-denyhosts/services2adjust/denyhosts");
foreach $file (
foreach $file (
qw(/var/lib/denyhosts/allowed-hosts /etc/hosts.allow /etc/denyhosts.conf))
qw(/var/lib/denyhosts/allowed-hosts /etc/hosts.allow /etc/denyhosts.conf))
{
{
templates2events($file, qw(bootstrap-console-save conf-denyhosts));
templates2events($file, qw(bootstrap-console-save conf-denyhosts));
}
}
exit 0;
[[Category:SME Server Development Framework]]
[[Category:SME Server Development Framework]]
[[Category:Development Tools]]
[[Category:Development Tools]]
[[Category:SME9-Development]]
[[Category:SME9-Development]]
