Increase domain component length limit

[hcoop/zz_old/portal.git] / webbw.mlt

<% @header [("title", ["Web usage stats"])] %>

<b><u>Web virtual host bandwidth</u></b> (bandwidth usage of Apache sites in this calendar month)<br>
<% if $"last" = "1" then %>
	<a href="webbw?last=2">[Previous]</a> | <a href="webbw?last=0">[Current]</a>
<% elseif $"last" = "2" then %>
	<a href="webbw?last=1">[Next]</a>
<% else %>
	<a href="webbw?last=1">[Last month]</a>
<% end %>
<br><br>

<% val (sum, doms, groups) = iff $"last" = "" then
			Stats.getWebbw 0
		else	
			Stats.getWebbw (Web.stoi ($"last")) %>

<table>
<tr><td></td><td><b>Bandwidth (kB)</b></td></tr>
<tr><td align="right"><b>Total Apache bandwidth</b></td> <td><% sum %></td></tr>
<tr><td>&nbsp;</td></tr>

<% foreach (d, n) in doms do %>
	<tr><td align="right"><a href="<% if #ssl d then %>https<% else %>http<% end %>://<% #hostname d %>/"><% #hostname d %></a> <a href="/webalizer/<% #id d %>/">[detail]</a></td><td><% n %></td></tr>
<% end %>

</table>

<br><br>
<b><u>Bandwidth by ownership</u></b>
<br><br>

<table>
<tr><td></td><td></td><td><b>Bandwidth (kB)</b></td></tr>
<tr><td>&nbsp;</td></tr>

<% foreach (gr, ds, n) in groups do %>
	<tr><td align="right"><% gr %></td><td>
	<% foreach dom in ds do %>
		[<a href="/webalizer/<% #id dom %>/"><% #hostname dom %></a> <a href="<% if #ssl dom then %>https<% else %>http<% end %>://<% #hostname dom %>/">(S)</a>]
	<% end %>
	</td><td><% n %></td></tr>
<% end %>

</table>

</body></html>