smeserver-openssh/createlinks

#!/usr/bin/perl -w

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

foreach (qw(
    /etc/ssh/sshd_config
    /etc/ssh/ssh_config    
	))
{
    templates2events("$_", qw(
	console-save
	bootstrap-console-save
	remoteaccess-update
	smeserver-openssh-update
	));
}

foreach (qw(
    /etc/rssh.conf
	))
{
    templates2events("$_", qw(
	bootstrap-console-save
	password-modify
	remoteaccess-update
	user-lock
	user-create
	user-delete
	user-modify
	smeserver-openssh-update
	));
}

foreach my $event (
    "console-save",
    "bootstrap-console-save",
    "remoteaccess-update",
    "smeserver-openssh-update"
)
{
    event_link("sshd-conf", $event, "65");
}

foreach my $event (
    "console-save",
    "remoteaccess-update")
{
    safe_symlink("reload", "root/etc/e-smith/events/$event/services2adjust/sshd");
}

my $event="smeserver-openssh-update";
# systemd-specific action mandatory for this package-update event
event_link("systemd-reload", $event, "89");
event_link("systemd-default", $event, "88");
safe_symlink("restart", "root/etc/e-smith/events/$event/services2adjust/sshd");
templates2events("/etc/rsyslog.conf",$event);
safe_symlink("restart", "root/etc/e-smith/events/$event/services2adjust/rsyslog");