webadmin/bpfire
1
0
Fork 0
mirror of https://github.com/vincentmli/bpfire.git synced 2026-04-28 11:43:25 +02:00
Code Issues Packages Projects Releases Wiki Activity

connections.cgi: Show name for "unknown" protocols.

Browse Source
This commit is contained in:
Michael Tremer
2012-07-19 13:14:52 +02:00
parent d9ac41d556
commit 7d55ca0da4
1 changed files with 28 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

24
html/cgi-bin/connections.cgi
View File

@@ -290,8 +290,28 @@ foreach my $line (@conntrack) {
# L4 protocol (tcp, udp, ...).
my $l4proto = $conn[2];
# Translate unknown protocols.
if ($l4proto eq 'unknown') {
$l4proto = '';
my $l4protonum = $conn[3];
if ($l4protonum eq '2') {
$l4proto = 'IGMP';
} elsif ($l4protonum eq '4') {
$l4proto = 'IPv4 Encap';
} elsif ($l4protonum eq '33') {
$l4proto = 'DCCP';
} elsif ($l4protonum eq '41') {
$l4proto = 'IPv6 Encap';
} elsif ($l4protonum eq '50') {
$l4proto = 'ESP';
} elsif ($l4protonum eq '51') {
$l4proto = 'AH';
} elsif ($l4protonum eq '132') {
$l4proto = 'SCTP';
} else {
$l4proto = $l4protonum;
}
} else {
$l4proto = uc($l4proto);
}
# Source and destination.
@@ -304,7 +324,7 @@ foreach my $line (@conntrack) {
my $ttl = $conn[4];
my $state;
if ($l4proto eq 'tcp') {
if ($l4proto eq 'TCP') {
$state = $conn[5];
}