logs.cgi: htmlcleanup, change html tags from uppercase to lowercase

[people/teissler/ipfire-2.x.git] / html / cgi-bin / logs.cgi / showrequestfromip.dat

diff --git a/html/cgi-bin/logs.cgi/showrequestfromip.dat b/html/cgi-bin/logs.cgi/showrequestfromip.dat
index 0e8a71fb5abd4921c022e1e5ed438daa324df048..09a60b519bc1fb6ad20bea38253775ea023b32d5 100644 (file)
--- a/html/cgi-bin/logs.cgi/showrequestfromip.dat
+++ b/html/cgi-bin/logs.cgi/showrequestfromip.dat
@@ -271,17 +271,17 @@ if ($start == 0) { $prev = -1; }
 if ($lines != 0) { &oldernewer(); }
 
 print <<END
-<TABLE WIDTH='100%'>
-<TR>
-<TD WIDTH='10%' ALIGN='CENTER' CLASS='boldbase'><B>$Lang::tr{'time'}</B></TD>
-<TD WIDTH='13%' ALIGN='CENTER' CLASS='boldbase'><B>$Lang::tr{'chain'}</B></TD>
-<TD WIDTH='5%' ALIGN='CENTER' CLASS='boldbase'><B>$Lang::tr{'iface'}</B></TD>
-<TD WIDTH='5%' ALIGN='CENTER' CLASS='boldbase'><B>$Lang::tr{'proto'}</B></TD>
-<TD WIDTH='16%' ALIGN='CENTER' CLASS='boldbase'><B>$Lang::tr{'source'}</B></TD>
-<TD WIDTH='10%' ALIGN='CENTER' CLASS='boldbase'><B>$Lang::tr{'src port'}</B></TD>
-<TD WIDTH='16%' ALIGN='CENTER' CLASS='boldbase'><B>$Lang::tr{'destination'}</B></TD>
-<TD WIDTH='16%' ALIGN='CENTER' CLASS='boldbase'><B>$Lang::tr{'dst port'}</B></TD>
-</TR>
+<table width='100%'>
+<tr>
+<td width='10%' align='center' class='boldbase'><b>$Lang::tr{'time'}</b></td>
+<td width='13%' align='center' class='boldbase'><b>$Lang::tr{'chain'}</b></td>
+<td width='5%' align='center' class='boldbase'><b>$Lang::tr{'iface'}</b></td>
+<td width='5%' align='center' class='boldbase'><b>$Lang::tr{'proto'}</b></td>
+<td width='16%' align='center' class='boldbase'><b>$Lang::tr{'source'}</b></td>
+<td width='10%' align='center' class='boldbase'><b>$Lang::tr{'src port'}</b></td>
+<td width='16%' align='center' class='boldbase'><b>$Lang::tr{'destination'}</b></td>
+<td width='16%' align='center' class='boldbase'><b>$Lang::tr{'dst port'}</b></td>
+</tr>
 END
 ;
 
@@ -306,7 +306,7 @@ foreach $_ (@slice)
        $timestamp =~ /(...) (..) (..:..:..)/;
        my $month = $1; my $day = $2; my $time = $3;
 
-       if ($a =~ /IN\=(\w+)/) { $in = $1; }
+       if ($a =~ /IN\=(\w+)/) { $iface = $1; }
        if ($a =~ /OUT\=(\w+)/) { $out = $1; }
        if ($a =~ /SRC\=([\d\.]+)/) { $srcaddr = $1; }
        if ($a =~ /DST\=([\d\.]+)/) { $dstaddr = $1; }
@@ -314,30 +314,29 @@ foreach $_ (@slice)
        my $protostrlc = lc($protostr);
        if ($a =~  /SPT\=([\d\.]+)/){ $srcport = $1; }
        if ($a =~  /DPT\=([\d\.]+)/){ $dstport = $1; }
-       $a =~ /IN=(\w+)/;       my $iface=$1;
 
        if ($lines % 2) {
                print "<tr bgcolor='${Header::table1colour}'>\n"; }
        else {
                print "<tr bgcolor='${Header::table2colour}'>\n"; }
        print <<END
-       <TD ALIGN='CENTER'>$time</TD>
-       <TD ALIGN='CENTER'>$chain</TD>
-       <TD ALIGN='CENTER'>$iface</TD>
-       <TD ALIGN='CENTER'>$protostr</TD>
+       <td align='center'>$time</td>
+       <td align='center'>$chain</td>
+       <td align='center'>$iface</td>
+       <td align='center'>$protostr</td>
        <td align='center'>
        <table width='100%' cellpadding='0' cellspacing='0'><tr>
        <td align='center'><a href='/cgi-bin/ipinfo.cgi?ip=$srcaddr'>$srcaddr</a></td>
        </tr></table>
        </td>
-       <TD ALIGN='CENTER'>$srcport</TD>
+       <td align='center'>$srcport</td>
        <td align='center'>
        <table width='100%' cellpadding='0' cellspacing='0'><tr>
        <td align='center'><a href='/cgi-bin/ipinfo.cgi?ip=$dstaddr'>$dstaddr</a></td>
        </tr></table>
        </td>
-       <TD ALIGN='CENTER'>$dstport</TD>
-</TR>
+       <td align='center'>$dstport</td>
+</tr>
 END
        ;
        $lines++;
@@ -346,7 +345,7 @@ END
 }
 
 print <<END
-</TABLE>
+</table>
 END
 ;