extern/shorewall_code
1
0
Fork 1
mirror of https://gitlab.com/shorewall/code.git synced 2025-08-16 03:34:10 +02:00
Code Issues Packages Projects Releases Wiki Activity

Move IPv4 definitions to IPAddrs.pm

Browse Source 
git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@6327 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb
This commit is contained in:
teastep
2007-05-11 15:39:11 +00:00
parent f442e82886
commit c34422e9c8
6 changed files with 19 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
Shorewall-perl/Shorewall/Common.pm
View File

@ -34,8 +34,7 @@ use Cwd 'abs_path';
use strict;
our @ISA = qw(Exporter);
our @EXPORT = qw(ALLIPv4
our @EXPORT = qw(
create_temp_object
finalize_object
emit
@ -53,8 +52,6 @@ our @EXPORT = qw(ALLIPv4
create_temp_aux_config
finalize_aux_config
@allipv4
@rfc1918_networks
$line
$command
$doing
@ -64,15 +61,6 @@ our @EXPORT = qw(ALLIPv4
our @EXPORT_OK = ();
our @VERSION = 1.00;
#
# Some IPv4 useful stuff
#
our @allipv4 = ( '0.0.0.0/0' );
use constant { ALLIPv4 => '0.0.0.0/0' };
our @rfc1918_networks = ( "10.0.0.0/8", "172.16.0.0/12", "192.168.0.0/16" );
our $line = ''; # Current config file line
our ( $command, $doing, $done ) = qw/ compile Compiling Compiled/; #describe the current command, it's present progressive, and it's completion.