TT#8704 Tighten peer name to not break kamailio

This prevents e.g. to insert \", which will break the trigger
populating kamailio, and will also protect against SQL injection
attacks, because the "name" value is taken as is in the trigger
statement without escaping it.

Change-Id: Ic2f911f4ce7fa79516796141d565bd3fe4a4044a

lib/NGCP/Panel/Form/Peering/Server.pm

@@ -119,6 +119,13 @@ has_block 'actions' => (
     render_list => [qw/save/],
 );
 
+sub validate_name {
+    my ($self, $field) = @_;
+    unless($field->value =~ /^[a-zA-Z0-9_\- ]+$/) {
+        $field->add_error("Invalid characters in name");
+    }
+}
+
 sub validate_via_route {
     my ($self, $field) = @_;