Fix spacing in new uptime bar.
[people/teissler/ipfire-2.x.git] / html / html / themes / ipfire / include / functions.pl
CommitLineData
f8e080ef 1#!/usr/bin/perl
70df8302
MT
2###############################################################################
3# #
4# IPFire.org - A linux based firewall #
5# Copyright (C) 2007 Michael Tremer & Christian Schmidt #
6# #
7# This program is free software: you can redistribute it and/or modify #
8# it under the terms of the GNU General Public License as published by #
9# the Free Software Foundation, either version 3 of the License, or #
10# (at your option) any later version. #
11# #
12# This program is distributed in the hope that it will be useful, #
13# but WITHOUT ANY WARRANTY; without even the implied warranty of #
14# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the #
15# GNU General Public License for more details. #
16# #
17# You should have received a copy of the GNU General Public License #
18# along with this program. If not, see <http://www.gnu.org/licenses/>. #
19# #
20###############################################################################
f8e080ef
MT
21
22sub showmenu() {
23 print <<EOF
94ec137d
CS
24 <div id="menu">
25 <ul>
f8e080ef
MT
26EOF
27;
28 foreach my $k1 ( sort keys %$menu ) {
94ec137d
CS
29 if (! $menu->{$k1}{'enabled'}) {
30 next;
31 }
32 my $link = getlink($menu->{$k1});
33 if ($link eq '') {
34 next;
35 }
36 if (! is_menu_visible($link)) {
37 next;
38 }
39 if ($menu->{$k1}->{'selected'}) {
40 print "<li><a href=\"$link\" class=\"active\">$menu->{$k1}{'caption'}</a></li>";
41 } else {
42 print "<li><a href=\"$link\">$menu->{$k1}{'caption'}</a></li>";
43 }
f8e080ef
MT
44 }
45 print <<EOF
94ec137d
CS
46 </ul>
47 </div>
f8e080ef
MT
48EOF
49;
50}
51
52sub getselected($) {
53 my $root = shift;
54 if (!$root) {
94ec137d 55 return 0;
f8e080ef
MT
56 }
57
58 foreach my $item (%$root) {
94ec137d
CS
59 if ($root->{$item}{'selected'}) {
60 return $root->{$item};
61 }
f8e080ef
MT
62 }
63}
64
65sub showsubsection($$) {
66 my $root = shift;
67
68 if (! $root) {
94ec137d 69 return;
f8e080ef
MT
70 }
71 my $selected = getselected($root);
72 if (! $selected) {
94ec137d 73 return;
f8e080ef
MT
74 }
75 my $submenus = $selected->{'subMenu'};
76 if (! $submenus) {
94ec137d 77 return;
f8e080ef
MT
78 }
79
80 print <<EOF
94ec137d
CS
81 <h4><span>Side</span>menu</h4>
82 <ul class="links">
f8e080ef
MT
83EOF
84;
85 foreach my $item (sort keys %$submenus) {
94ec137d
CS
86 my $hash = $submenus->{$item};
87 if (! $hash->{'enabled'}) {
88 next;
89 }
90 my $link = getlink($hash);
91 if ($link eq '') {
92 next;
93 }
94 if (! is_menu_visible($link)) {
95 next;
96 }
97 if ($hash->{'selected'}) {
98 print '<li class="selected">';
99 } else {
100 print '<li>';
101 }
102
103 print "<a href=\"$link\">$hash->{'caption'}</a></li>";
f8e080ef
MT
104 }
105
106 print <<EOF
94ec137d 107 </ul>
f8e080ef
MT
108EOF
109;
110}
111
112
113sub showsubsubsection($) {
114 my $root = shift;
115 if (!$root) {
94ec137d 116 return;
f8e080ef
MT
117 }
118 my $selected = getselected($root);
119 if (! $selected) {
94ec137d 120 return
f8e080ef
MT
121 }
122 if (! $selected->{'subMenu'}) {
94ec137d 123 return
f8e080ef
MT
124 }
125
126 showsubsection($selected->{'subMenu'}, 'menu-subtop');
127}
128
129sub openpage {
130 my $title = shift;
131 my $boh = shift;
132 my $extrahead = shift;
133
134 @URI=split ('\?', $ENV{'REQUEST_URI'} );
6be4dd24 135 &General::readhash("${swroot}/main/settings", \%settings);
f8e080ef
MT
136 &genmenu();
137
138 my $h2 = gettitle($menu);
139
140 $title = "IPFire - $title";
141 if ($settings{'WINDOWWITHHOSTNAME'} eq 'on') {
142 $title = "$settings{'HOSTNAME'}.$settings{'DOMAINNAME'} - $title";
143 }
144
145 print <<END
8ed76a23
JIW
146<?xml version='1.0' encoding='UTF-8'?>
147<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0 Strict//EN' 'http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd'>
148<html xmlns='http://www.w3.org/1999/xhtml'>
149<head>
150 <title>$title</title>
f8e080ef 151 $extrahead
f8e080ef
MT
152END
153;
154 if ($settings{'FX'} ne 'off') {
155 print <<END
156 <meta http-equiv="Page-Enter" content="blendTrans(Duration=0.5,Transition=12)" />
157 <meta http-equiv="Page-Exit" content="blendTrans(Duration=0.5,Transition=12)" />
158END
159;
160 }
161 print <<END
162 <link rel="shortcut icon" href="/favicon.ico" />
163 <link rel="stylesheet" type="text/css" href="/themes/ipfire/include/style.css" />
5cf2c339 164 $extrahead
f8e080ef
MT
165 <script language="javascript" type="text/javascript">
166
167 function swapVisibility(id) {
168 el = document.getElementById(id);
94ec137d
CS
169 if(el.style.display != 'block') {
170 el.style.display = 'block'
171 }
172 else {
173 el.style.display = 'none'
174 }
f8e080ef
MT
175 }
176 </script>
18322edf
CS
177END
178;
179if ($settings{'SPEED'} ne 'off') {
180print <<END
d0d063fe 181 <script type="text/javascript" src="/include/jquery-1.9.1.min.js"></script>
d6a60bb3
DG
182 <script type="text/javascript">
183 var t_current;
184 var t_last;
185 var rxb_current;
186 var rxb_last;
187 var txb_current;
188 var txb_last;
189 function refreshInetInfo() {
190 \$.ajax({
191 url: '/cgi-bin/speed.cgi',
192 success: function(xml){
193 t_current = new Date();
194 var t_diff = t_current - t_last;
195 t_last = t_current;
196
197 rxb_current = \$("rxb",xml).text();
198 var rxb_diff = rxb_current - rxb_last;
199 rxb_last = rxb_current;
200
201 var rx_kbs = rxb_diff/t_diff;
202 rx_kbs = Math.round(rx_kbs*10)/10;
203
204 txb_current = \$("txb",xml).text();
205 var txb_diff = txb_current - txb_last;
206 txb_last = txb_current;
207
208 var tx_kbs = txb_diff/t_diff;
209 tx_kbs = Math.round(tx_kbs*10)/10;
210
211 \$("#rx_kbs").text(rx_kbs + ' kb/s');
212 \$("#tx_kbs").text(tx_kbs + ' kb/s');
94ec137d 213 }
d6a60bb3
DG
214 });
215 window.setTimeout("refreshInetInfo()", 3000);
216 }
217 \$(document).ready(function(){
218 refreshInetInfo();
219 });
220 </script>
f8e080ef 221 </head>
d6a60bb3 222 <body>
18322edf
CS
223END
224;
225}
226else {
5cf2c339 227 print "</head><body>";}
18322edf 228print <<END
f8e080ef
MT
229<!-- IPFIRE HEADER -->
230
231<div id="header">
5cf2c339
MT
232 <div id="header_inner" class="fixed">
233 <div id="logo">
d86ddb48
MT
234END
235;
5cf2c339
MT
236if ($settings{'WINDOWWITHHOSTNAME'} eq 'on') {
237 print "<h1><span>$settings{'HOSTNAME'}.$settings{'DOMAINNAME'}</span></h1><br />";
238}
239else {
240 print "<h1><span>IPFire</span></h1><br />";
241}
242print <<END
243 <h2>$h2</h2>
244 </div>
f8e080ef
MT
245END
246;
5cf2c339 247&showmenu();
f8e080ef 248
94ec137d 249print <<END
5cf2c339 250 </div>
f8e080ef
MT
251</div>
252
253<div id="main">
5cf2c339
MT
254 <div id="main_inner" class="fixed">
255 <div id="primaryContent_2columns">
256 <div id="columnA_2columns">
f8e080ef
MT
257END
258;
259}
260
261sub openpagewithoutmenu {
262 my $title = shift;
263 my $boh = shift;
264 my $extrahead = shift;
265
266 @URI=split ('\?', $ENV{'REQUEST_URI'} );
6be4dd24 267 &General::readhash("${swroot}/main/settings", \%settings);
f8e080ef
MT
268 &genmenu();
269
270 my $h2 = gettitle($menu);
271
272 $title = "IPFire - $title";
273 if ($settings{'WINDOWWITHHOSTNAME'} eq 'on') {
274 $title = "$settings{'HOSTNAME'}.$settings{'DOMAINNAME'} - $title";
275 }
276
277 print <<END
8ed76a23
JIW
278<?xml version='1.0' encoding='UTF-8'?>
279<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0 Strict//EN' 'http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd'>
280<html xmlns='http://www.w3.org/1999/xhtml'>
281<head>
5cf2c339 282 <title>$title</title>
f8e080ef
MT
283END
284;
285 if ($settings{'FX'} ne 'off') {
286 print <<END
287 <meta http-equiv="Page-Enter" content="blendTrans(Duration=0.5,Transition=12)" />
288 <meta http-equiv="Page-Exit" content="blendTrans(Duration=0.5,Transition=12)" />
289END
290;
291 }
292 print <<END
293 <link rel="shortcut icon" href="/favicon.ico" />
294 <link rel="stylesheet" type="text/css" href="/include/style.css" />
5cf2c339 295 $extrahead
f8e080ef
MT
296 <script language="javascript" type="text/javascript">
297
298 function swapVisibility(id) {
299 el = document.getElementById(id);
94ec137d
CS
300 if(el.style.display != 'block') {
301 el.style.display = 'block'
302 }
303 else {
304 el.style.display = 'none'
305 }
f8e080ef
MT
306 }
307 </script>
f8e080ef
MT
308 </head>
309 <body>
310<!-- IPFIRE HEADER -->
5cf2c339
MT
311 <div id="header">
312 <div id="header_inner" class="fixed">
313 <div id="logo">
314 <h1><span>IPFire</span></h1>
315 <h2>$h2</h2>
316 </div>
317 </div>
318 </div>
319 <div id="main">
320 <div id="main_inner" class="fixed">
321 <div id="primaryContent_2columns">
322 <div id="columnA_2columns">
f8e080ef
MT
323END
324;
325}
326
327sub closepage () {
70b1b5d2
JIW
328 my $status = &connectionstatus();
329 my $uptime = `/usr/bin/uptime|cut -d \" \" -f 4-`;
330 $uptime =~ s/year(s|)/$Lang::tr{'year'}/;
331 $uptime =~ s/month(s|)/$Lang::tr{'month'}/;
332 $uptime =~ s/day(s|)/$Lang::tr{'day'}/;
333 $uptime =~ s/user(s|)/$Lang::tr{'user'}/;
334 $uptime =~ s/load average/$Lang::tr{'uptime load average'}/;
335
f8e080ef 336 print <<END
5cf2c339
MT
337 </div>
338 </div>
339 <div id="secondaryContent_2columns">
340 <div id="columnC_2columns">
f8e080ef
MT
341END
342;
343 &showsubsection($menu);
344 &showsubsubsection($menu);
345
94ec137d 346 print <<END
5cf2c339
MT
347 </div>
348 </div>
349 <br class="clear" />
350 <div id="footer" class="fixed">
67fd2a70 351 <b>Status:</b> $status <b>Uptime:</b> $uptime
18322edf
CS
352END
353;
354if ($settings{'SPEED'} ne 'off') {
355print <<END
5cf2c339
MT
356 <br />
357 <b>$Lang::tr{'bandwidth usage'}:</b>
8a5823b8 358 $Lang::tr{'incoming'}: <span id="rx_kbs"></span>&nbsp;$Lang::tr{'outgoing'}: <span id="tx_kbs"></span>
18322edf
CS
359END
360;
361}
362print <<END
5cf2c339
MT
363 </div>
364 </div>
365 </div>
e455cafe 366</body>
f8e080ef
MT
367</html>
368END
369;
370}
371
372sub openbigbox
373{
374}
375
376sub closebigbox
377{
378}
379
380sub openbox
381{
5cf2c339
MT
382 $width = $_[0];
383 $align = $_[1];
384 $caption = $_[2];
f8e080ef 385
5cf2c339 386 print <<END
f8e080ef 387<!-- openbox -->
5cf2c339 388 <div class="post" style="text-align:$align">
f8e080ef
MT
389END
390;
391
5cf2c339 392 if ($caption) { print "<h3>$caption</h3>\n"; } else { print "&nbsp;"; }
f8e080ef
MT
393}
394
395sub closebox
396{
5cf2c339
MT
397 print <<END
398 </div>
399 <br class="clear" />
400 <!-- closebox -->
f8e080ef
MT
401END
402;
403}
404
4051;