Move is_ip_v4_or_v6() to VyattaMisc.pm so other scripts can use it.

1 files changed, 0 insertions, 23 deletions

diff --git a/scripts/vyatta-interfaces.pl b/scripts/vyatta-interfaces.pl
index 2f59bd3..0c219c1 100644
--- a/scripts/vyatta-interfaces.pl
+++ b/scripts/vyatta-interfaces.pl
@@ -220,29 +220,6 @@ sub dhcp_update_config {
     dhcp_write_file($conf_file, $output);
 }
 
-sub is_ip_v4_or_v6 {
-    my $addr = shift;
-
-    my $ip = NetAddr::IP->new($addr);
-    if (defined $ip && $ip->version() == 4) {
-	#
-	# the call to IP->new() will accept 1.1 and consider
-        # it to be 1.1.0.0, so add a check to force all
-	# 4 octets to be defined
-        #
-	if ($addr !~ /\d+\.\d+\.\d+\.\d+/) {
-	    return undef;
-	}
-	return 4;
-    }
-    $ip = NetAddr::IP->new6($addr);
-    if (defined $ip && $ip->version() == 6) {
-	return 6;
-    }
-    
-    return undef;
-}
-
 sub generate_dhclient_intf_files {
     my $intf = shift;