remove 'name' to the list of utf8 encoded parameters.
authorDietmar Maurer <dietmar@proxmox.com>
Tue, 13 Mar 2012 05:56:31 +0000 (06:56 +0100)
committerDietmar Maurer <dietmar@proxmox.com>
Tue, 13 Mar 2012 05:56:31 +0000 (06:56 +0100)
Revert previous change. Add dns-name format instead.

data/PVE/JSONSchema.pm
data/PVE/Tools.pm
debian/changelog

index ef89fb5..816083a 100644 (file)
@@ -174,6 +174,19 @@ sub pve_verify_email {
     return $email;
 }
 
+register_format('dns-name', \&pve_verify_dns_name);
+sub pve_verify_dns_name {
+    my ($name, $noerr) = @_;
+
+    my $namere = "([a-zA-Z]|[a-zA-Z][a-zA-Z0-9\-]*[a-zA-Z0-9])";
+
+    if ($name !~ /^(${namere}\.)*${namere}$/) {
+          return undef if $noerr;
+          die "value does not look like a valid DNS name\n";
+    }
+    return $name;
+}
+
 # network interface name
 register_format('pve-iface', \&pve_verify_iface);
 sub pve_verify_iface {
index d1dfa5d..66bc644 100644 (file)
@@ -733,7 +733,7 @@ sub decode_text {
 sub decode_utf8_parameters {
     my ($param) = @_;
 
-    foreach my $p (qw(name comment description firstname lastname)) {
+    foreach my $p (qw(comment description firstname lastname)) {
        $param->{$p} = decode('utf8', $param->{$p}) if $param->{$p};
     }
 
index 97ace88..e373585 100644 (file)
@@ -1,6 +1,6 @@
 libpve-common-perl (1.0-19) unstable; urgency=low
 
-  * add 'name' to the list of utf8 encoded parameters
+  * add dns-name format
 
  -- Proxmox Support Team <support@proxmox.com>  Mon, 12 Mar 2012 12:31:27 +0100