#! /usr/bin/perl -w

use esmith::Build::CreateLinks qw(:all);


#link to services2adjust and templates2expand for dhcp-dns event
for  my $event (qw( dhcp-dns  smeserver-dhcp-dns-update))
    {
        # services to launch on event
        safe_symlink("sigusr1", "root/etc/e-smith/events/$event/services2adjust/dnscache");
        safe_symlink("sigusr1", "root/etc/e-smith/events/$event/services2adjust/tinydns");
	safe_symlink("restart", "root/etc/e-smith/events/$event/services2adjust/dhcp-dns");
    }

my $event = "smeserver-dhcp-dns-update";
event_link("systemd-reload", $event, "89");
event_link("systemd-default", $event, "88");
                                            
#creation of dhcp-dns service
#    safe_symlink("daemontools", "root/etc/rc.d/init.d/dhcp-dns");
#    service_link_enhanced("dhcp-dns", "S85", "7");
#    service_link_enhanced("dhcp-dns", "K65", "6");
#    service_link_enhanced("dhcp-dns", "K65", "0");
#    service_link_enhanced("dhcp-dns", "K65", "1");
#    safe_symlink("/var/service/dhcp-dns/", "root/service/dhcp-dns");