initial commit of file from CVS for smeserver-qmail-notify on Sat Sep 7 20:57:46 AEST 2024

This commit is contained in:
Trevor Batley
2024-09-07 20:57:46 +10:00
parent 0cbc0c2ab7
commit 6815a080d0
10 changed files with 156 additions and 2 deletions

View File

@@ -0,0 +1 @@
enabled

View File

@@ -0,0 +1 @@
configuration

View File

@@ -0,0 +1,19 @@
{
use strict;
use warnings;
use esmith::ConfigDB;
my $configDB = esmith::ConfigDB->open_ro or die("can't open Config DB");
my $dbKey = 'qmail-notify';
my $status = $configDB->get_prop( $dbKey, 'status' ) || 'disabled';
my $minutes = $configDB->get_prop( $dbKey, 'minutes' ) || '30';
my $hours = $configDB->get_prop( $dbKey, 'hours' ) || '*';
my $file = $configDB->get_prop( $dbKey, 'filename' ) || 'qmail-notify-message.txt';
if ( $status eq 'enabled' ) {
$OUT .= "# run qmail-notify\n";
$OUT .= "$minutes $hours * * * root /usr/bin/qmail-notify -r -f /usr/local/lib/qmail-notify/$file\n";
$OUT .= "\n";
}
}

View File

@@ -0,0 +1,5 @@
Your message has been received by %s but has been
undeliverable to the following recipients for at least %s.
The mail system will continue to attempt to deliver your message
to these recipients for a total of %s. You do not need to
resend your message at this time.