# IPFire default theme. #
###############################################################################
-require "${General::swroot}/lang.pl";
###############################################################################
#
# print menu html elements for submenu entries
# @param submenu entries
sub showsubmenu() {
my $submenus = shift;
-
+
print "<ul>";
foreach my $item (sort keys %$submenus) {
$link = getlink($submenus->{$item});
print <<EOF;
<div id='traffic'>
<strong>Traffic:</strong>
- In <span id='rx_kbs'>--.-- Bit/s</span>
- Out <span id='tx_kbs'>--.-- Bit/s</span>
+ In <span id='rx_kbs'>--.-- bit/s</span>
+ Out <span id='tx_kbs'>--.-- bit/s</span>
</div>
EOF
}
foreach my $k1 ( sort keys %$menu ) {
$link = getlink($menu->{$k1});
next if (!is_menu_visible($link) or $link eq '');
- print '<li class="has-sub "><a><span>'.$menu->{$k1}->{'caption'}.'</span></a>';
+ print '<li class="has-sub "><a href="#"><span>'.$menu->{$k1}->{'caption'}.'</span></a>';
my $submenus = $menu->{$k1}->{'subMenu'};
&showsubmenu($submenus) if ($submenus);
print "</li>";
my $title = shift;
my $boh = shift;
my $extrahead = shift;
- my $suppressMenu = shift;
+ my $suppressMenu = shift // 0;
my @tmp = split(/\./, basename($0));
my $scriptName = @tmp[0];
- @URI=split ('\?', $ENV{'REQUEST_URI'} );
- &General::readhash("${swroot}/main/settings", \%settings);
- &genmenu();
-
my $headline = "IPFire";
- if ($settings{'WINDOWWITHHOSTNAME'} eq 'on') {
+ if (($settings{'WINDOWWITHHOSTNAME'} eq 'on') || ($settings{'WINDOWWITHHOSTNAME'} eq '')) {
$headline = "$settings{'HOSTNAME'}.$settings{'DOMAINNAME'}";
}
-print <<END
-<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
-<html>
+print <<END;
+<!DOCTYPE html>
+<html lang="$language">
<head>
<title>$headline - $title</title>
- $extrahead
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8"/>
<link rel="shortcut icon" href="/favicon.ico" />
- <link href="/themes/ipfire-new/include/css/style.css" rel="stylesheet" type="text/css" />
- <script type="text/javascript" src="/include/jquery-1.9.1.min.js"></script>
-END
-;
-if ($settings{'SPEED'} ne 'off') {
-print <<END
- <script type="text/javascript" src="/themes/ipfire-new/include/js/refreshInetInfo.js"></script>
+ <script type="text/javascript" src="/include/jquery.js"></script>
+ <script src="/include/rrdimage.js"></script>
+
+ $extrahead
+ <script type="text/javascript">
+ function swapVisibility(id) {
+ \$('#' + id).toggle();
+ }
+ </script>
END
-;
-}
-if ($settings{'FX'} ne 'off') {
+
+print "<link href=\"/themes/ipfire/include/css/style.css\" rel=\"stylesheet\" type=\"text/css\" />\n";
+
+
+if ($settings{'SPEED'} ne 'off') {
print <<END
- <meta http-equiv="Page-Enter" content="blendTrans(Duration=0.5,Transition=12)" />
- <meta http-equiv="Page-Exit" content="blendTrans(Duration=0.5,Transition=12)" />
+ <script type="text/javascript" src="/themes/ipfire/include/js/refreshInetInfo.js"></script>
END
;
}
<body>
<div id="header" class="fixed">
<div id="logo">
+ <a href="https://www.ipfire.org" style="text-decoration: none;">
+ <img src="/themes/ipfire/images/tux2.png" style="float:left; margin-left: -3px; margin-top: -3px;"/>
END
;
- if ($settings{'WINDOWWITHHOSTNAME'} eq 'on') {
- print "<h1>$settings{'HOSTNAME'}.$settings{'DOMAINNAME'}</h1>";
+ if ($settings{'WINDOWWITHHOSTNAME'} ne 'off') {
+ print "</a><h1>$settings{'HOSTNAME'}.$settings{'DOMAINNAME'}</h1>";
} else {
- print "<h1>IPFire</h1>";
+ print "<h1>IPFire</h1></a>";
}
print <<END
END
;
-&showmenu() if ($suppressMenu != 1);
+unless($suppressMenu) {
+ &genmenu();
+ &showmenu();
+}
print <<END
<div class="bigbox fixed">
<div id="main_inner" class="fixed">
- <h1>$title</h1>
+ <div id="main_header">
+ <h1>$title</h1>
+END
+;
+
+# Print user manual link
+my $manual_url = &Header::get_manualpage_url($scriptName);
+if($manual_url) {
+ print <<END
+ <span><a href="$manual_url" title="$Lang::tr{'online help en'}" target="_blank"><img src="/images/help-browser.png" alt="$Lang::tr{'online help en'}"></a></span>
+END
+;
+}
+
+print <<END
+ </div>
END
;
}
sub closepage () {
open(FILE, "</etc/system-release");
my $system_release = <FILE>;
- $system_release =~ s/core/Core Update/;
+ $system_release =~ s/core/Core Update /;
close(FILE);
print <<END;
<div id="footer" class='bigbox fixed'>
<span class="pull-right">
- <a href="http://www.ipfire.org/" target="_blank"><strong>IPFire.org</strong></a> •
- <a href="http://www.ipfire.org/donate" target="_blank">$Lang::tr{'support donation'}</a>
+ <a href="https://www.ipfire.org/" target="_blank"><strong>IPFire.org</strong></a> •
+ <a href="https://www.ipfire.org/donate" target="_blank">$Lang::tr{'support donation'}</a>
</span>
<strong>$system_release</strong>
$align = $_[1];
$caption = $_[2];
- print "<div class='post' align='$align'>\n";
+ if($align eq 'center') {
+ print "<div class='post' align='center'>\n"
+ }
+ else {
+ print "<div class='post'>\n";
+ }
if ($caption) {
print "<h2>$caption</h2>\n";
sub closebox {
print "</div>";
}
-
-1;