linux have 16 characters limit for interfaces,
but we can prepend "vxlan", "vrf",... when we generate
interfaces
Signed-off-by: Alexandre Derumier <aderumier@odiso.com>
sub parse_sdn_controller_id {
my ($id, $noerr) = @_;
sub parse_sdn_controller_id {
my ($id, $noerr) = @_;
- if ($id !~ m/^[a-z][a-z0-9\-\_\.]*[a-z0-9]$/i) {
+ if ($id !~ m/^[a-z][a-z0-9]*[a-z0-9]$/i) {
- die "SDN controller object ID '$id' contains illegal characters\n";
+ die "controller ID '$id' contains illegal characters\n";
+ die "controller ID '$id' can't be more length than 10 characters\n" if length($id) > 10;
sub parse_sdn_vnet_id {
my ($id, $noerr) = @_;
sub parse_sdn_vnet_id {
my ($id, $noerr) = @_;
- if ($id !~ m/^[a-z][a-z0-9\-\_\.]*[a-z0-9]$/i) {
+ if ($id !~ m/^[a-z][a-z0-9]*[a-z0-9]$/i) {
- die "SDN object vnet ID '$id' contains illegal characters\n";
+ die "vnet ID '$id' contains illegal characters\n";
+ die "vnet ID '$id' can't be more length than 10 characters\n" if length($id) > 10;
sub parse_sdn_zone_id {
my ($id, $noerr) = @_;
sub parse_sdn_zone_id {
my ($id, $noerr) = @_;
- if ($id !~ m/^[a-z][a-z0-9\-\_\.]*[a-z0-9]$/i) {
- return undef if $noerr;
- die "SDN zone object ID '$id' contains illegal characters\n";
+ if ($id !~ m/^[a-z][a-z0-9]*[a-z0-9]$/i) {
+ return undef if $noerr;
+ die "zone ID '$id' contains illegal characters\n";
+ die "zone ID '$id' can't be more length than 10 characters\n" if length($id) > 10;