diff options
| author | Justin Fletcher <jfletcher@phuket.vyatta.com> | 2007-11-05 17:35:29 -0800 |
|---|---|---|
| committer | Justin Fletcher <jfletcher@phuket.vyatta.com> | 2007-11-05 17:35:29 -0800 |
| commit | 42dfee070aaa757ff9b8230fa2879b89883ab205 (patch) | |
| tree | 12fe7dd1a1b9dc6ba98a2f0192b1399c27d7a9a9 /scripts/vyatta_quagga_utils.pl | |
| parent | 56c73bf4dee6082a5a6277b237038b0a68131c8c (diff) | |
| parent | d2de5c5263822a0c3bfa625f8d7cb3a2baa9377c (diff) | |
| download | vyatta-cfg-quagga-42dfee070aaa757ff9b8230fa2879b89883ab205.tar.gz vyatta-cfg-quagga-42dfee070aaa757ff9b8230fa2879b89883ab205.zip | |
Merge branch 'master' of /usr/local/git/vyatta-cfg-quagga
Diffstat (limited to 'scripts/vyatta_quagga_utils.pl')
| -rw-r--r-- | scripts/vyatta_quagga_utils.pl | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/scripts/vyatta_quagga_utils.pl b/scripts/vyatta_quagga_utils.pl index 2b5b05ac..d64be3a9 100644 --- a/scripts/vyatta_quagga_utils.pl +++ b/scripts/vyatta_quagga_utils.pl @@ -8,11 +8,13 @@ use Getopt::Long; GetOptions("check-prefix-boundry=s" => \$prefix, "not-exists=s" => \$notexists, "exists=s" => \$exists, + "check-ospf-area=s" => \$area, ); if (defined $prefix) { check_prefix_boundry($prefix); } if (defined $notexists) { check_not_exists($notexists); } if (defined $exists) { check_exists($exists); } +if (defined $area) { check_ospf_area($area); } exit 0; @@ -52,3 +54,19 @@ sub check_not_exists() { exit 1; } +sub check_ospf_area() { + my $area = shift; + + if ($area =~ m/^\d+$/) { + if ($area >= 0 && $area <= 4294967295) { + return 0; + } + } + + if (isIpAddress($area)) { + return 0; + } + print "invalid ospf area\n"; + exit 1; +} + |