36 lines
1.1 KiB
Perl
36 lines
1.1 KiB
Perl
#!/usr/bin/perl -w
|
|
# This script creates the symlinks needed by this RPM
|
|
|
|
use strict;
|
|
use esmith::Build::CreateLinks qw(:all);
|
|
|
|
#-------------------------------------------------------------------
|
|
# actions for bootstrap-console-save event, e-smith-tinydns-update :
|
|
#-------------------------------------------------------------------
|
|
foreach (qw(
|
|
env/IP
|
|
env/DATALIMIT
|
|
root/data
|
|
))
|
|
{
|
|
templates2events("/var/service/tinydns/$_", qw(
|
|
bootstrap-console-save
|
|
e-smith-tinydns-update
|
|
));
|
|
}
|
|
|
|
#--------------------------------------------------
|
|
# actions for ip-change event
|
|
#--------------------------------------------------
|
|
my $event = "ip-change";
|
|
safe_symlink("sigusr2", "root/etc/e-smith/events/$event/services2adjust/tinydns");
|
|
|
|
#--------------------------------------------------
|
|
# actions for e-smith-tinydns-update event
|
|
#--------------------------------------------------
|
|
$event = "e-smith-tinydns-update";
|
|
safe_symlink("try-restart", "root/etc/e-smith/events/$event/services2adjust/tinydns");
|
|
templates2events("/etc/systemd/system-preset/49-koozali.preset", $event);
|
|
event_link("systemd-reload", $event, "89");
|
|
|