-sub showl7rules {
- open( FILE, "< $level7file" ) or die "Unable to read $level7file";
- @l7rules = <FILE>;
- close FILE;
- if (@l7rules) {
- &Header::openbox('100%', 'center', 'Level7-Regeln');
- print <<END
- <table border='0' width='100%' cellspacing='0'>
- <tr><td bgcolor='lightgrey' width='14%'>Interface
- <td bgcolor='lightgrey' width='14%'>Klasse
- <td bgcolor='lightgrey' width='14%'>Protokoll
- <td bgcolor='lightgrey' width='14%'>Quell-IP-Adresse
- <td bgcolor='lightgrey' width='14%'>Ziel-IP-Adresse
- <td bgcolor='lightgrey' width='30%'>Aktionen
-END
-;
- foreach $l7ruleentry (sort @l7rules)
- {
- @l7ruleline = split( /\;/, $l7ruleentry );
- if ( $l7ruleline[1] eq $qossettings{'RED_DEV'} )
- {
- print <<END
- <tr><td align='center' bgcolor='#EAEAEA'>$l7ruleline[1]
- <td align='center' bgcolor='#EAEAEA'>$l7ruleline[0]
- <td align='center' bgcolor='#EAEAEA'>$l7ruleline[2]
- <td align='center' bgcolor='#EAEAEA'>$l7ruleline[3]
- <td align='center' bgcolor='#EAEAEA'>$l7ruleline[4]
- <td align='right' bgcolor='#EAEAEA'>
- <table border='0'><tr>
- <td><form method='post' action='$ENV{'SCRIPT_NAME'}'>
- <input type='hidden' name='CLASS' value='$l7ruleline[0]'>
- <input type='hidden' name='L7PROT' value='$l7ruleline[2]'>
- <input type='hidden' name='DOLEVEL7' value='Bearbeiten'>
- <input type='image' alt='Bearbeiten' src='/images/edit.gif'>
- </form>
- <td><form method='post' action='$ENV{'SCRIPT_NAME'}'>
- <input type='hidden' name='CLASS' value='$l7ruleline[0]'>
- <input type='hidden' name='L7PROT' value='$l7ruleline[2]'>
- <input type='hidden' name='DOLEVEL7' value='Loeschen'>
- <input type='image' alt='Loeschen' src='/images/delete.gif'>
- </form>
- </table>
-END
-;
- }
- }
- print "\t<tr><td colspan='8' bgcolor='lightgrey' height='2'>";
- foreach $l7ruleentry (sort @l7rules)
- {
- @l7ruleline = split( /\;/, $l7ruleentry );
- if ( $l7ruleline[1] eq $qossettings{'IMQ_DEV'} )
- {
- print <<END
- <tr><td align='center' bgcolor='#EAEAEA'>$l7ruleline[1]
- <td align='center' bgcolor='#EAEAEA'>$l7ruleline[0]
- <td align='center' bgcolor='#EAEAEA'>$l7ruleline[2]
- <td align='center' bgcolor='#EAEAEA'>$l7ruleline[3]
- <td align='center' bgcolor='#EAEAEA'>$l7ruleline[4]
- <td align='right' bgcolor='#EAEAEA'>
- <table border='0'><tr>
- <td><form method='post' action='$ENV{'SCRIPT_NAME'}'>
- <input type='hidden' name='CLASS' value='$l7ruleline[0]'>
- <input type='hidden' name='L7PROT' value='$l7ruleline[2]'>
- <input type='hidden' name='DOLEVEL7' value='Bearbeiten'>
- <input type='image' alt='Bearbeiten' src='/images/edit.gif'>
- </form>
- <td><form method='post' action='$ENV{'SCRIPT_NAME'}'>
- <input type='hidden' name='CLASS' value='$l7ruleline[0]'>
- <input type='hidden' name='L7PROT' value='$l7ruleline[2]'>
- <input type='hidden' name='DOLEVEL7' value='Loeschen'>
- <input type='image' alt='Loeschen' src='/images/delete.gif'>
- </form>
- </table>