From b883afbbfffb4a7410c9d26b9386c6fc1d23d49b Mon Sep 17 00:00:00 2001
From: clk <clk@teuto.net>
Date: Tue, 12 Jul 2022 11:11:24 +0200
Subject: [PATCH] Added validator for listname

Fix issue 6362
---
 interface/web/mail/form/mail_mailinglist.tform.php  | 4 ++++
 interface/web/mail/lib/lang/de_mail_mailinglist.lng | 1 +
 2 files changed, 5 insertions(+)

diff --git a/interface/web/mail/form/mail_mailinglist.tform.php b/interface/web/mail/form/mail_mailinglist.tform.php
index 295bd8d571..7834b005de 100644
--- a/interface/web/mail/form/mail_mailinglist.tform.php
+++ b/interface/web/mail/form/mail_mailinglist.tform.php
@@ -103,6 +103,10 @@ $form["tabs"]['mailinglist'] = array (
 					'errmsg'=> 'listname_error_empty'),
 				1 => array ( 'type' => 'UNIQUE',
 					'errmsg'=> 'listname_error_unique'),
+				2 => array (
+					'type'	=> 'REGEX',
+					'regex' => '/^[_a-z0-9][\w\.\-_\+@]{1,255}$/',
+					'errmsg'=> 'listname_error_regex'),
 			),
 			'filters'   => array(
 					0 => array( 'event' => 'SAVE',
diff --git a/interface/web/mail/lib/lang/de_mail_mailinglist.lng b/interface/web/mail/lib/lang/de_mail_mailinglist.lng
index 1d143b690c..e09153f44b 100644
--- a/interface/web/mail/lib/lang/de_mail_mailinglist.lng
+++ b/interface/web/mail/lib/lang/de_mail_mailinglist.lng
@@ -3,6 +3,7 @@ $wb['limit_mailmailinglist_txt'] = 'Limit erreicht';
 $wb['domain_error_empty'] = 'Domain ist leer.';
 $wb['listname_error_empty'] = 'Listenname ist leer.';
 $wb['domain_error_regex'] = 'Domain Name ist nicht gültig.';
+$wb['listname_error_regex'] = 'Der Listenname ist ungültig. Die Mindestlänge beträgt 2 Zeichen (erlaubt sind: [a-z 1-9 - _])';
 $wb['email_in_use_txt'] = 'E-Mail Adresse ist bereits in Benutzung';
 $wb['no_domain_perm'] = 'Sie haben keine Rechte für diese Domain.';
 $wb['password_strength_txt'] = 'Passwortkomplexität';
-- 
GitLab