smeserver-proftpd/createlinks

#!/usr/bin/perl -w

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

safe_symlink("proftpd", "root/var/service/ftp");

templates2events("/etc/logrotate.d/proftpd", qw(
	bootstrap-console-save
	smeserver-proftpd-update
	));
templates2events("/etc/pam.d/ftp", qw(
	bootstrap-console-save
	smeserver-proftpd-update
	));
templates2events("/etc/ftpusers", qw(
	bootstrap-console-save
	network-create
	network-delete
	remoteaccess-update
	password-modify
	user-lock
	smeserver-proftpd-update
	));

templates2events("/etc/proftpd.conf", qw(
	console-save
	bootstrap-console-save
	domain-create
	domain-delete
	domain-modify
	ibay-create
	ibay-delete
	ibay-modify
	ibay-modify-servers
	ip-change
	network-create
	network-delete
	remoteaccess-update
	password-modify
	smeserver-proftpd-update
	ssl-update
	));

foreach my $event (qw(
    remoteaccess-update))
{
    safe_symlink("sigusr1", "root/etc/e-smith/events/$event/services2adjust/ftp");
}

foreach my $event (qw(
    bootstrap-console-save
    network-create
    remoteaccess-update
    network-delete
    smeserver-proftpd-update
    ))
{
    templates2events("/var/service/ftp/peers/0", $event);
    templates2events("/var/service/ftp/peers/local", $event);
}
foreach my $event (qw(
    network-create
    network-delete
    ))
{
    safe_symlink("sigusr1", "root/etc/e-smith/events/$event/services2adjust/ftp");
}

safe_symlink("restart", "root/etc/e-smith/events/ssl-update/services2adjust/ftp");

my $event = 'smeserver-proftpd-update';
safe_symlink("restart", "root/etc/e-smith/events/$event/services2adjust/ftp");
safe_symlink("restart", "root/etc/e-smith/events/$event/services2adjust/rsyslog");
templates2events("/etc/systemd/system-preset/49-koozali.preset", $event);
event_link("systemd-reload", $event, "89");
templates2events("/etc/rsyslog.conf", $event);

exit 0;