diff options
| -rw-r--r-- | Makefile.am | 1 | ||||
| -rwxr-xr-x | scripts/firewall/valid_port_range.pl | 5 |
2 files changed, 6 insertions, 0 deletions
diff --git a/Makefile.am b/Makefile.am index 212b15a..dc0f6a9 100644 --- a/Makefile.am +++ b/Makefile.am @@ -14,6 +14,7 @@ sbin_SCRIPTS += scripts/firewall/vyatta-firewall-trap.pl sbin_SCRIPTS += scripts/firewall/firewall.init sbin_SCRIPTS += scripts/firewall/vyatta-ipset.pl sbin_SCRIPTS += scripts/firewall/vyatta-fw-global-state-policy.pl +sbin_SCRIPTS += scripts/firewall/valid_port_range.pl share_perl5_DATA = lib/Vyatta/IpTables/Rule.pm share_perl5_DATA += lib/Vyatta/IpTables/AddressFilter.pm diff --git a/scripts/firewall/valid_port_range.pl b/scripts/firewall/valid_port_range.pl new file mode 100755 index 0000000..1f3b3fc --- /dev/null +++ b/scripts/firewall/valid_port_range.pl @@ -0,0 +1,5 @@ +#!/usr/bin/env perl + +$arg = $ARGV[0]; + +exit(1) unless $arg =~ /^!?((\d+|\d+-\d+|[a-zA-Z0-9\-]+),)*((\d+|\d+-\d+|[a-zA-Z0-9\-]+))$/; |