94 lines
1.7 KiB
Perl
94 lines
1.7 KiB
Perl
#!/usr/bin/perl -w
|
|
|
|
use esmith::Build::CreateLinks qw(:all);
|
|
|
|
####################
|
|
# links to add
|
|
panel_link( "shellinabox", "manager" );
|
|
|
|
## Old code
|
|
## templates to expand
|
|
#
|
|
#foreach $event (
|
|
# qw (
|
|
# bootstrap-console-save
|
|
# console-save
|
|
# smeserver-shellinabox-update
|
|
# )
|
|
#) {
|
|
# templates2events( "/etc/sysconfig/shellinaboxd", $event );
|
|
# templates2events(
|
|
# "/usr/lib/systemd/system/shellinabox.service.d/50koozali.conf",
|
|
# $event );
|
|
#}
|
|
#
|
|
## services to launch on event
|
|
#
|
|
## actions to do
|
|
#
|
|
#for my $event (qw( smeserver-shellinabox-update console-save ))
|
|
#
|
|
#{
|
|
# event_link( "shellinabox-action", "$event", "20" );
|
|
#}
|
|
|
|
# links for rc.d from init.d
|
|
#service_link_enhanced( "shellinaboxd", "S99", "7" );
|
|
|
|
my $event = 'smeserver-shellinabox-update';
|
|
|
|
event_actions(
|
|
$event, qw(
|
|
systemd-default 88
|
|
systemd-reload 89
|
|
)
|
|
);
|
|
|
|
event_templates(
|
|
$event, qw(
|
|
/etc/httpd/conf/httpd.conf
|
|
/etc/sysconfig/shellinaboxd
|
|
/usr/lib/systemd/system/shellinaboxd.service.d/50koozali.conf
|
|
)
|
|
);
|
|
|
|
event_services(
|
|
$event, qw(
|
|
httpd-e-smith reload
|
|
shellinaboxd restart
|
|
)
|
|
);
|
|
|
|
# Other events
|
|
foreach $event (
|
|
qw(
|
|
remoteaccess-update
|
|
console-save
|
|
)
|
|
) {
|
|
event_templates(
|
|
$event, qw(
|
|
/etc/sysconfig/shellinaboxd
|
|
/usr/lib/systemd/system/shellinaboxd.service.d/50koozali.conf
|
|
)
|
|
);
|
|
event_services(
|
|
$event, qw(
|
|
shellinaboxd restart
|
|
)
|
|
);
|
|
}
|
|
|
|
foreach $event (
|
|
qw(
|
|
bootstrap-console-save
|
|
)
|
|
) {
|
|
event_templates(
|
|
$event, qw(
|
|
/etc/sysconfig/shellinaboxd
|
|
/usr/lib/systemd/system/shellinaboxd.service.d/50koozali.conf
|
|
)
|
|
);
|
|
}
|