* Mon Dec 30 2024 Jean-Philippe Pialasse <jpp@koozali.org> 11.0.1-3.sme

- move action pseudonym-cleanup and migrate 10AdminEmail to smeserver-email [SME: 12808]
This commit is contained in:
Jean-Philippe Pialasse 2024-12-30 22:09:57 -05:00
parent 0f13af540f
commit f373a70d99
4 changed files with 5 additions and 58 deletions

View File

@ -45,7 +45,6 @@ $event = "console-save";
#-------------------------------------------------- #--------------------------------------------------
$event = "bootstrap-console-save"; $event = "bootstrap-console-save";
event_link("pseudonym-cleanup", $event, "03");
event_link("qmail-update-user", $event, "55"); event_link("qmail-update-user", $event, "55");
#-------------------------------------------------- #--------------------------------------------------
@ -70,29 +69,22 @@ $event = "domain-delete";
$event = "email-update"; $event = "email-update";
event_link("qmail-update-user", $event, "03"); event_link("qmail-update-user", $event, "03");
event_link("pseudonym-cleanup", $event, "30");
#-------------------------------------------------- #--------------------------------------------------
# actions for group-create event: # actions for group-create event:
#-------------------------------------------------- #--------------------------------------------------
$event = "group-create"; $event = "group-create";
event_link("pseudonym-cleanup", $event, "03");
#-------------------------------------------------- #--------------------------------------------------
# actions for group-delete event: # actions for group-delete event:
#-------------------------------------------------- #--------------------------------------------------
$event = "group-delete"; $event = "group-delete";
event_link("pseudonym-cleanup", $event, "03");
#-------------------------------------------------- #--------------------------------------------------
# actions for group-modify event: # actions for group-modify event:
#-------------------------------------------------- #--------------------------------------------------
$event = "group-modify"; $event = "group-modify";
event_link("pseudonym-cleanup", $event, "03");
#-------------------------------------------------- #--------------------------------------------------
# actions for user-create event: # actions for user-create event:
#-------------------------------------------------- #--------------------------------------------------
@ -133,7 +125,6 @@ $event = "ip-change";
# actions for smeserver-mini-qmail-update event: # actions for smeserver-mini-qmail-update event:
#-------------------------------------------------- #--------------------------------------------------
$event = "smeserver-mini-qmail-update"; $event = "smeserver-mini-qmail-update";
event_link("pseudonym-cleanup", $event, "03");
#-------------------------------------------------- #--------------------------------------------------
# actions for pseudonym-{create,delete,modify} # actions for pseudonym-{create,delete,modify}
@ -142,7 +133,6 @@ foreach $event ( qw(pseudonym-create pseudonym-modify pseudonym-delete
user-create user-modify user-delete user-create user-modify user-delete
)) ))
{ {
event_link("pseudonym-cleanup", $event, "03");
templates2events("/var/qmail/control/virtualdomains", $event); templates2events("/var/qmail/control/virtualdomains", $event);
} }

View File

@ -1,24 +0,0 @@
{
my $conf = esmith::ConfigDB->open;
return unless $conf;
my $admin_email = $conf->get_value_and_delete('AdminEmail');
return unless defined $admin_email;
my $admin = $DB->get('admin') ||
$DB->new_record('admin', {type => 'system'});
if ($admin_email)
{
$admin->merge_props(
EmailForward => 'forward',
ForwardAddress => $admin_email,
);
}
else
{
$admin->merge_props(
EmailForward => 'local',
ForwardAddress => '',
);
}
}

View File

@ -1,22 +0,0 @@
#!/usr/bin/perl -w
use strict;
use esmith::AccountsDB;
use esmith::event;
my $accounts = esmith::AccountsDB->open() or
die "Unable to open accounts db: $!";
my ($self, $account) = @ARGV;
# Find all "pseudonyms" entries in the e-smith accounts database and
# if the pseudonyms has an unexisting Account associated we change
# it to user "admin".
foreach my $pseudo ( $accounts->pseudonyms ) {
unless ( $accounts->get($pseudo->prop('Account')) ) {
$pseudo->set_prop( 'Account', 'admin' );
print "orphaned pseudonym " . $pseudo->key. " has been associated to admin account"
}
}

View File

@ -4,7 +4,7 @@ Summary: startup scripts for Dan Bernstein's qmail package
%define name smeserver-mini-qmail %define name smeserver-mini-qmail
Name: %{name} Name: %{name}
%define version 11.0.1 %define version 11.0.1
%define release 2 %define release 3
Version: %{version} Version: %{version}
Release: %{release}%{?dist} Release: %{release}%{?dist}
License: GPL License: GPL
@ -18,7 +18,7 @@ Requires: mini-qmail
Obsoletes: qmail Obsoletes: qmail
Requires: dot-forward Requires: dot-forward
Requires: fastforward Requires: fastforward
Requires: smeserver-email Requires: smeserver-email
Provides: smeserver-mta Provides: smeserver-mta
Provides: e-smith-mta Provides: e-smith-mta
Obsoletes: qmail-initscripts Obsoletes: qmail-initscripts
@ -29,6 +29,9 @@ Provides: e-smith-qmail
AutoReqProv: no AutoReqProv: no
%changelog %changelog
* Mon Dec 30 2024 Jean-Philippe Pialasse <jpp@koozali.org> 11.0.1-3.sme
- move action pseudonym-cleanup and migrate 10AdminEmail to smeserver-email [SME: 12808]
* Tue Dec 03 2024 Jean-Philippe Pialasse <jpp@koozali.org> 11.0.1-2.sme * Tue Dec 03 2024 Jean-Philippe Pialasse <jpp@koozali.org> 11.0.1-2.sme
- initial release of smeserver-mini-qmail from former smeserver-qmail [SME: 12793] - initial release of smeserver-mini-qmail from former smeserver-qmail [SME: 12793]
. only for final delivery or forward behind qpsmtpd and postfix . only for final delivery or forward behind qpsmtpd and postfix