From 1803a1723c2952723a4ec9ad67e3cd1184fcf137 Mon Sep 17 00:00:00 2001
From: Daniel Friesel <derf@finalrewind.org>
Date: Sun, 13 Jun 2021 08:48:08 +0200
Subject: move user name validation to Users model

---
 lib/Travelynx/Model/Users.pm | 26 ++++++++++++++++++++++++++
 1 file changed, 26 insertions(+)

(limited to 'lib/Travelynx/Model/Users.pm')

diff --git a/lib/Travelynx/Model/Users.pm b/lib/Travelynx/Model/Users.pm
index 8bd60f0..535b938 100644
--- a/lib/Travelynx/Model/Users.pm
+++ b/lib/Travelynx/Model/Users.pm
@@ -201,6 +201,32 @@ sub change_mail_with_token {
 	return;
 }
 
+sub is_name_invalid {
+	my ( $self, %opt ) = @_;
+	my $db   = $opt{db} // $self->{pg}->db;
+	my $name = $opt{name};
+
+	if ( not length($name) ) {
+		return 'user_empty';
+	}
+
+	if ( $name !~ m{ ^ [0-9a-zA-Z_-]+ $ }x ) {
+		return 'user_format';
+	}
+
+	if (
+		$self->user_name_exists(
+			db   => $db,
+			name => $name
+		)
+	  )
+	{
+		return 'user_collision';
+	}
+
+	return;
+}
+
 sub change_name {
 	my ( $self, %opt ) = @_;
 	my $db  = $opt{db} // $self->{pg}->db;
-- 
cgit v1.2.3