From f97e8ee8ac983a8f404e60f99693b6aed58837c9 Mon Sep 17 00:00:00 2001 From: Robert Bays Date: Mon, 10 Mar 2008 23:32:51 -0700 Subject: fix for bug 2713 --- scripts/bgp/vyatta-bgp.pl | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'scripts/bgp') diff --git a/scripts/bgp/vyatta-bgp.pl b/scripts/bgp/vyatta-bgp.pl index 059ce1a5..bf29a56e 100755 --- a/scripts/bgp/vyatta-bgp.pl +++ b/scripts/bgp/vyatta-bgp.pl @@ -36,6 +36,13 @@ sub check_peer_name() { print "malformed neighbor address $neighbor\n"; exit 1; } + + # Quagga treats the first byte as a potential IPv6 address + # so we can't use it as a peer group name. So let's check for it. + if (/^[A-Ga-g]{1,4}$/) { + print "malformed neighbor address $neighbor\n"; + exit 1; + } } # Make sure we aren't deleteing a peer-group that has -- cgit v1.2.3