File Manager

003 File Manager

Current Path: /usr/share/examples/ipfilter

📁 ..
📄 BASIC.NAT(1.58 KB)
📄 BASIC_1.FW(3.92 KB)
📄 BASIC_2.FW(2.51 KB)
📄 README(374 B)
📄 example.1(133 B)
📄 example.10(431 B)
📄 example.11(820 B)
📄 example.12(376 B)
📄 example.13(468 B)
📄 example.14(2.05 KB)
📄 example.2(149 B)
📄 example.3(990 B)
📄 example.4(66 B)
📄 example.5(689 B)
📄 example.6(186 B)
📄 example.7(362 B)
📄 example.8(326 B)
📄 example.9(291 B)
📄 example.sr(2.04 KB)
📄 examples.txt(18.47 KB)
📄 firewall(1.5 KB)
📄 firewall.1(1.36 KB)
📄 firewall.2(3.01 KB)
📄 ftp-proxy(1.24 KB)
📄 ftppxy(272 B)
📄 ipf-howto.txt(112.46 KB)
📄 ipf.conf.permissive(1.23 KB)
📄 ipf.conf.restrictive(3.99 KB)
📄 ipf.conf.sample(783 B)
📄 ipnat.conf.sample(126 B)
📄 mkfilters(2.62 KB)
📄 nat-setup(2.78 KB)
📄 nat.eg(596 B)
📄 rules.txt(5.1 KB)
📄 server(471 B)
📄 tcpstate(453 B)

Editing: mkfilters

#!/usr/local/bin/perl
# for best results, bring up all your interfaces before running this

if ($^O =~ m/^irix/i)
{
    &irix_mkfilters || regular_mkfilters || die $!;
}
else
{
    &regular_mkfilters || irix_mkfilters || die $!;
}

foreach $i (keys %ifaces) {
	$net{$i} = $inet{$i}."/".$netmask{$i} if (defined($inet{$i}));
}
#
# print out route suggestions
#
print "#\n";
print "# The following routes should be configured, if not already:\n";
print "#\n";
foreach $i (keys %ifaces) {
	next if (($i =~ /lo/) || !defined($net{$i}) || defined($ppp{$i}));
	print "# route add $inet{$i} localhost 0\n";
}
print "#\n";

#
# print out some generic filters which people should use somewhere near the top
#
print "block in log quick from any to any with ipopts\n";
print "block in log quick proto tcp from any to any with short\n";

$grpi = 0;

foreach $i (keys %ifaces) {
	if (!defined($inet{$i})) {
		next;
	}

$grpi += 100;
	$grpo = $grpi + 50;

if ($i !~ /lo/) {
		print "pass out on $i all head $grpo\n";
		print "block out from 127.0.0.0/8 to any group $grpo\n";
		print "block out from any to 127.0.0.0/8 group $grpo\n";
		print "block out from any to $inet{$i}/32 group $grpo\n";
		print "pass in on $i all head $grpi\n";
		print "block in from 127.0.0.0/8 to any group $grpi\n";
		print "block in from $inet{$i}/32 to any group $grpi\n";
		foreach $j (keys %ifaces) {
			if ($i ne $j && $j !~ /^lo/ && defined($net{$j})) {
				print "block in from $net{$j} to any group $grpi\n";
			}
		}
	}
}

sub irix_mkfilters
{
    open(NETSTAT, "/usr/etc/netstat -i|") || return 0;

while (defined($line = <NETSTAT>))
    {
	if ($line =~ m/^Name/)
	{
	    next;
	}
	elsif ($line =~ m/^(\S+)/)
	{
	    open(I, "/usr/etc/ifconfig $1|") || return 0;
	    &scan_ifconfig;
	    close I;		# being neat... - Allen
	}
    }
    close NETSTAT;			# again, being neat... - Allen
    return 1;
}

sub regular_mkfilters
{
    open(I, "ifconfig -a|") || return 0;
    &scan_ifconfig;
    close I;			# being neat... - Allen
    return 1;
}

sub scan_ifconfig
{
    while (<I>) {
	chop;
	if (/^[a-zA-Z]+\d+:/) {
	    ($iface = $_) =~ s/^([a-zA-Z]+\d+).*/$1/;
	    $ifaces{$iface} = $iface;
	    next;
	}
	if (/inet/) {
	    if (/\-\-\>/) { # PPP, (SLIP?)
			($inet{$iface} = $_) =~ s/.*inet ([^ ]+) \-\-\> ([^ ]+).*/$1/;
			($ppp{$iface} = $_) =~ s/.*inet ([^ ]+) \-\-\> ([^ ]+).*/$2/;
		    } else {
			($inet{$iface} = $_) =~ s/.*inet ([^ ]+).*/$1/;
		    }
	}
	if (/netmask/) {
	    ($mask = $_) =~ s/.*netmask ([^ ]+).*/$1/;
		    $mask =~ s/^/0x/ if ($mask =~ /^[0-9a-f]*$/);
	    $netmask{$iface} = $mask;
	}
	if (/broadcast/) {
	    ($bcast{$iface} = $_) =~ s/.*broadcast ([^ ]+).*/$1/;
	}
    }
}

003 File Manager

Editing: mkfilters

Upload File

Create Folder