#!/usr/bin/perl -w use esmith::Build::CreateLinks qw(:all); panel_link("navigation", "manager"); panel_link("noframes", "manager"); panel_link("bugreport", "manager"); event_link("navigation-conf", 'bootstrap-console-save', 50); for ( qw( sme_core.css sme_header.css sme_main.css sme_menu.css sme_panel_menu.css tkt.css ) ) { templates2events("/etc/e-smith/web/common/css/$_", qw( bootstrap-console-save e-smith-manager-update )); } templates2events("/etc/e-smith/web/panels/manager/html/header.htm", qw( console-save bootstrap-console-save network-create network-delete logrotate e-smith-manager-update )); templates2events("/etc/e-smith/web/common/head.tmpl", qw( console-save bootstrap-console-save network-create network-delete logrotate e-smith-manager-update )); templates2events("/etc/e-smith/web/common/foot.tmpl", qw( console-save bootstrap-console-save network-create network-delete logrotate e-smith-manager-update )); # conf-httpd-admin templates2events("/etc/httpd/admin-conf/httpd.conf", qw( console-save bootstrap-console-save network-create network-delete remoteaccess-update logrotate e-smith-manager-update )); templates2events("/etc/e-smith/web/common/cgi-bin/AuthTKT.cfg", 'bootstrap-console-save'); foreach (qw(console-save remoteaccess-update logrotate)) { safe_symlink("reload", "root/etc/e-smith/events/$_/services2adjust/httpd-admin"); } # Symlink httpd-admin to httpd. safe_symlink("httpd", "root/usr/sbin/httpd-admin"); my $event = "e-smith-manager-update"; event_link("systemd-reload", $event, "89"); event_link("systemd-default", $event, "88"); safe_symlink("reload-or-restart", "root/etc/e-smith/events/$event/services2adjust/httpd-admin"); templates2events("/etc/e-smith/web/common/cgi-bin/AuthTKT.cfg", $event);