fifteen-theme: made wireless tables themeable

This commit is contained in:
Alexander Marx
2014-01-07 09:38:36 +01:00
parent 783bf6afa5
commit 633b0df5ee

View File

@@ -260,13 +260,13 @@ my @current = <FILE>;
close (FILE);
print <<END
<table width='100%'>
<table width='100%' class='tbl'>
<tr>
<td align='center' width='20%'><b>$Lang::tr{'hostname'}</b></td>
<td align='center' width='20%'><b>$Lang::tr{'source ip'}</b></td>
<td align='center' width='20%'><b>$Lang::tr{'mac address'}</b></td>
<td align='center' width='35%'><b>$Lang::tr{'remark'}</b></td>
<td align='center' colspan='3'><b>$Lang::tr{'action'}</b></td>
<th align='center' width='20%'><b>$Lang::tr{'hostname'}</b></th>
<th align='center' width='20%'><b>$Lang::tr{'source ip'}</b></th>
<th align='center' width='20%'><b>$Lang::tr{'mac address'}</b></t>
<th align='center' width='35%'><b>$Lang::tr{'remark'}</b></th>
<th align='center' colspan='3'><b>$Lang::tr{'action'}</b></th>
</tr>
END
;
@@ -333,20 +333,24 @@ foreach my $line (@current)
else { $gif = 'off.gif'; $toggle='on'; $gdesc=$Lang::tr{'click to enable'};}
my $remark = &Header::cleanhtml($temp[4]);
my $col="";
if ($cgiparams{'ACTION'} eq 'edit' && $cgiparams{'ID'} eq $id) {
print "<tr bgcolor='${Header::colouryellow}'>\n";
print "<tr>";
$col="bgcolor='${Header::colouryellow}'";
} elsif ($id % 2) {
print "<tr bgcolor='${Header::table1colour}'>\n";
print "<tr>";
$col="bgcolor='${Header::table1colour}'";
} else {
print "<tr bgcolor='${Header::table2colour}'>\n";
print "<tr>";
$col="bgcolor='${Header::table2colour}'";
}
print "<td align='center'>$hname</td>\n";
print "<td align='center'>$sourceip</td>\n";
print "<td align='center'>$sourcemac</td>\n";
print "<td align='center'>$remark</td>\n";
print "<td align='center' $col>$hname</td>\n";
print "<td align='center' $col>$sourceip</td>\n";
print "<td align='center' $col>$sourcemac</td>\n";
print "<td align='center' $col>$remark</td>\n";
print<<END
<td align='center'>
<td align='center' $col>
<form method='post' name='frma$id' action='$ENV{'SCRIPT_NAME'}'>
<input type='image' name='$Lang::tr{'toggle enable disable'}' src='/images/$gif' alt='$gdesc' title='$gdesc' />
<input type='hidden' name='ACTION' value='toggle'}' />
@@ -355,7 +359,7 @@ print<<END
</form>
</td>
<td align='center'>
<td align='center' $col>
<form method='post' name='frmb$id' action='$ENV{'SCRIPT_NAME'}'>
<input type='hidden' name='ACTION' value='edit' />
<input type='image' name='$Lang::tr{'edit'}' src='/images/edit.gif' alt='$Lang::tr{'edit'}' title='$Lang::tr{'edit'}' />
@@ -363,7 +367,7 @@ print<<END
</form>
</td>
<td align='center'>
<td align='center' $col>
<form method='post' name='frmc$id' action='$ENV{'SCRIPT_NAME'}'>
<input type='hidden' name='ACTION' value='remove' />
<input type='image' name='$Lang::tr{'remove'}' src='/images/delete.gif' alt='$Lang::tr{'remove'}' title='$Lang::tr{'remove'}' />
@@ -405,12 +409,13 @@ sub printblueleases
&Header::openbox('100%', 'left', "$Lang::tr{'current dhcp leases on blue'}");
print <<END
<table width='100%'>
<table width='100%' class='tbl'>
<tr>
<td width='25%' align='center'><b>$Lang::tr{'ip address'}</b></td>
<td width='25%' align='center'><b>$Lang::tr{'mac address'}</b></td>
<td width='20%' align='center'><b>$Lang::tr{'hostname'}</b></td>
<td width='30%' align='center'><b>$Lang::tr{'lease expires'} (local time d/m/y)</b></td>
<th width='25%' align='center'><b>$Lang::tr{'ip address'}</b></th>
<th width='25%' align='center'><b>$Lang::tr{'mac address'}</b></th>
<th width='20%' align='center'><b>$Lang::tr{'hostname'}</b></th>
<th width='30%' align='center'><b>$Lang::tr{'lease expires'} (local time d/m/y)</b></th>
<th></th>
</tr>
END
;
@@ -459,18 +464,21 @@ END
foreach my $key (sort blueleasesort keys %entries) {
my $hostname = &Header::cleanhtml($entries{$key}->{HOSTNAME},"y");
my $col="";
if ($id % 2) {
print "<tr bgcolor='$Header::table2colour'>";
print "<tr>";
$col="bgcolor='$Header::table2colour'";
} else {
print "<tr bgcolor='$Header::table1colour'>";
print "<tr>";
$col="bgcolor='$Header::table1colour'";
}
print <<END
<td align='center'>$entries{$key}->{IPADDR}</td>
<td align='center'>$entries{$key}->{ETHER}</td>
<td align='center'>&nbsp;$hostname </td>
<td align='center'>
<td align='center' $col>$entries{$key}->{IPADDR}</td>
<td align='center' $col>$entries{$key}->{ETHER}</td>
<td align='center' $col>&nbsp;$hostname </td>
<td align='center' $col>
END
;
@@ -493,7 +501,7 @@ END
}
print <<END
<td align='center'>
<td align='center' $col>
<form method='post' name='frmd$id' action='$ENV{'SCRIPT_NAME'}'>
<input type='hidden' name='ACTION' value='add' />
<input type='hidden' name='SOURCE_IP' value='' />