html/html/themes/ipfire/include/functions.pl

   1 #!/usr/bin/perl
   2
   3 sub showmenu() {
   4     print <<EOF
   5                 <div id="menu">
   6                         <ul>
   7 EOF
   8 ;
   9     foreach my $k1 ( sort keys %$menu ) {
  10         if (! $menu->{$k1}{'enabled'}) {
  11             next;
  12         }
  13         my $link = getlink($menu->{$k1});
  14         if ($link eq '') {
  15             next;
  16         }
  17         if (! is_menu_visible($link)) {
  18             next;
  19         }
  20         if ($menu->{$k1}->{'selected'}) {
  21             print "<li><a href=\"$link\" class=\"active\">$menu->{$k1}{'caption'}</a></li>";
  22         } else {
  23             print "<li><a href=\"$link\">$menu->{$k1}{'caption'}</a></li>";
  24         }
  25     }
  26     print <<EOF
  27                         </ul>
  28                 </div>
  29 EOF
  30 ;
  31 }
  32
  33 sub getselected($) {
  34     my $root = shift;
  35     if (!$root) {
  36         return 0;
  37     }
  38
  39     foreach my $item (%$root) {
  40         if ($root->{$item}{'selected'}) {
  41             return $root->{$item};
  42         }
  43     }
  44 }
  45
  46 sub showsubsection($$) {
  47     my $root = shift;
  48
  49     if (! $root) {
  50         return;
  51     }
  52     my $selected = getselected($root);
  53     if (! $selected) {
  54         return;
  55     }
  56     my $submenus = $selected->{'subMenu'};
  57     if (! $submenus) {
  58         return;
  59     }
  60
  61     print <<EOF
  62         <h4><span>Side</span>menu</h4>
  63         <ul class="links">
  64 EOF
  65 ;
  66     foreach my $item (sort keys %$submenus) {
  67         my $hash = $submenus->{$item};
  68         if (! $hash->{'enabled'}) {
  69             next;
  70         }
  71         my $link = getlink($hash);
  72         if ($link eq '') {
  73             next;
  74         }
  75         if (! is_menu_visible($link)) {
  76             next;
  77         }
  78         if ($hash->{'selected'}) {
  79             print '<li class="selected">';
  80         } else {
  81             print '<li>';
  82         }
  83
  84         print "<a href=\"$link\">$hash->{'caption'}</a></li>";
  85     }
  86
  87     print <<EOF
  88         </ul>
  89 EOF
  90 ;
  91 }
  92
  93
  94 sub showsubsubsection($) {
  95     my $root = shift;
  96     if (!$root) {
  97         return;
  98     }
  99     my $selected = getselected($root);
 100     if (! $selected) {
 101         return
 102     }
 103     if (! $selected->{'subMenu'}) {
 104         return
 105     }
 106
 107     showsubsection($selected->{'subMenu'}, 'menu-subtop');
 108 }
 109
 110 sub openpage {
 111     my $title = shift;
 112     my $boh = shift;
 113     my $extrahead = shift;
 114
 115     @URI=split ('\?',  $ENV{'REQUEST_URI'} );
 116     &General::readhash("${swroot}/main/settings", \%settings);
 117     &genmenu();
 118
 119     my $h2 = gettitle($menu);
 120
 121     $title = "IPFire - $title";
 122     if ($settings{'WINDOWWITHHOSTNAME'} eq 'on') {
 123         $title =  "$settings{'HOSTNAME'}.$settings{'DOMAINNAME'} - $title";
 124     }
 125
 126     print <<END
 127 <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
 128
 129 <html>
 130   <head>
 131   <title>$title</title>
 132
 133     $extrahead
 134     <meta http-equiv="Content-Type" content="text/html; charset=UTF-8"/>
 135 END
 136 ;
 137     if ($settings{'FX'} ne 'off') {
 138     print <<END
 139     <meta http-equiv="Page-Enter" content="blendTrans(Duration=0.5,Transition=12)" />
 140     <meta http-equiv="Page-Exit" content="blendTrans(Duration=0.5,Transition=12)" />
 141 END
 142 ;
 143     }
 144     print <<END
 145     <link rel="shortcut icon" href="/favicon.ico" />
 146     <link rel="stylesheet" type="text/css" href="/themes/ipfire/include/style.css" />
 147     <script language="javascript" type="text/javascript">
 148
 149         function swapVisibility(id) {
 150             el = document.getElementById(id);
 151             if(el.style.display != 'block') {
 152                 el.style.display = 'block'
 153             }
 154             else {
 155                 el.style.display = 'none'
 156             }
 157         }
 158     </script>
 159 END
 160 ;
 161 if ($settings{'SPEED'} ne 'off') {
 162 print <<END
 163                 <script type="text/javascript" language="javascript">
 164
 165                     var http_request = false;
 166
 167                     function LoadInetInfo(url) {
 168
 169                         http_request = false;
 170
 171                         if (window.XMLHttpRequest) { // Mozilla, Safari,...
 172                             http_request = new XMLHttpRequest();
 173                             if (http_request.overrideMimeType) {
 174                                 http_request.overrideMimeType('text/xml');
 175                                 // zu dieser Zeile siehe weiter unten
 176                             }
 177                         } else if (window.ActiveXObject) { // IE
 178                             try {
 179                                 http_request = new ActiveXObject("Msxml2.XMLHTTP");
 180                             } catch (e) {
 181                                 try {
 182                                     http_request = new ActiveXObject("Microsoft.XMLHTTP");
 183                                 } catch (e) {}
 184                             }
 185                         }
 186
 187                         if (!http_request) {
 188                             alert('Ende :( Kann keine XMLHTTP-Instanz erzeugen');
 189                             return false;
 190                         }
 191                         http_request.onreadystatechange = DisplayInetInfo;
 192                         http_request.open('GET', url, true);
 193                         http_request.send(null);
 194
 195                     }
 196
 197                     function DisplayInetInfo() {
 198                         if (http_request.readyState == 4) {
 199                              var xmldoc = http_request.responseXML;
 200                              var root1_node = xmldoc.getElementsByTagName('rx_kbs').item(0);
 201                              var root2_node = xmldoc.getElementsByTagName('tx_kbs').item(0);
 202                              var root3_node = xmldoc.getElementsByTagName('rxb').item(0);
 203                              var root4_node = xmldoc.getElementsByTagName('txb').item(0);
 204
 205                              document.forms['speed'].txkb.value  = root1_node.firstChild.data;
 206                              document.forms['speed'].rxkb.value  = root2_node.firstChild.data;
 207
 208                                         // document.getElementsByTagName("input")[0].style.color = "#00FF00";
 209                                         url    = "/cgi-bin/speed.cgi?rxb_last=" + root3_node.firstChild.data + "&txb_last=" + root4_node.firstChild.data;
 210
 211                               window.setTimeout("LoadInetInfo(url)", 3000);
 212                         }
 213
 214                     }
 215                 </script>
 216   </head>
 217   <body onLoad="LoadInetInfo('/cgi-bin/speed.cgi')">
 218 END
 219 ;
 220 }
 221 else {
 222 print "</head><body>";}
 223 print <<END
 224 <!-- IPFIRE HEADER -->
 225
 226 <div id="header">
 227
 228         <div id="header_inner" class="fixed">
 229
 230                 <div id="logo">
 231 END
 232 ;
 233     if ($settings{'WINDOWWITHHOSTNAME'} eq 'on') {
 234         print "<h1><span>$settings{'HOSTNAME'}.$settings{'DOMAINNAME'}</span></h1><br />";
 235     } else {
 236                                 print "<h1><span>IPFire</span></h1><br />";
 237                 }
 238                 print <<END
 239                         <h2>$h2</h2>
 240                 </div>
 241
 242 END
 243 ;
 244         &showmenu();
 245
 246 print <<END
 247         </div>
 248 </div>
 249
 250 <div id="main">
 251         <div id="main_inner" class="fixed">
 252                 <div id="primaryContent_2columns">
 253                         <div id="columnA_2columns">
 254 END
 255 ;
 256 }
 257
 258 sub openpagewithoutmenu {
 259     my $title = shift;
 260     my $boh = shift;
 261     my $extrahead = shift;
 262
 263     @URI=split ('\?',  $ENV{'REQUEST_URI'} );
 264     &General::readhash("${swroot}/main/settings", \%settings);
 265     &genmenu();
 266
 267     my $h2 = gettitle($menu);
 268
 269     $title = "IPFire - $title";
 270     if ($settings{'WINDOWWITHHOSTNAME'} eq 'on') {
 271         $title =  "$settings{'HOSTNAME'}.$settings{'DOMAINNAME'} - $title";
 272     }
 273
 274     print <<END
 275 <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
 276
 277 <html>
 278   <head>
 279   <title>$title</title>
 280
 281     $extrahead
 282     <meta http-equiv="Content-Type" content="text/html; charset=UTF-8"/>
 283 END
 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)" />
 289 END
 290 ;
 291     }
 292     print <<END
 293     <link rel="shortcut icon" href="/favicon.ico" />
 294     <link rel="stylesheet" type="text/css" href="/include/style.css" />
 295     <script language="javascript" type="text/javascript">
 296
 297         function swapVisibility(id) {
 298             el = document.getElementById(id);
 299             if(el.style.display != 'block') {
 300                 el.style.display = 'block'
 301             }
 302             else {
 303                 el.style.display = 'none'
 304             }
 305         }
 306     </script>
 307
 308   </head>
 309   <body>
 310 <!-- IPFIRE HEADER -->
 311
 312 <div id="header">
 313
 314         <div id="header_inner" class="fixed">
 315
 316                 <div id="logo">
 317                         <h1><span>IPFire</span></h1>
 318                         <h2>$h2</h2>
 319                 </div>
 320         </div>
 321 </div>
 322
 323 <div id="main">
 324         <div id="main_inner" class="fixed">
 325                 <div id="primaryContent_2columns">
 326                         <div id="columnA_2columns">
 327 END
 328 ;
 329 }
 330
 331 sub closepage () {
 332     my $status = &connectionstatus();
 333     $uptime = `/usr/bin/uptime`;
 334
 335     print <<END
 336                         </div>
 337                 </div>
 338
 339                 <div id="secondaryContent_2columns">
 340
 341                         <div id="columnC_2columns">
 342 END
 343 ;
 344     &showsubsection($menu);
 345     &showsubsubsection($menu);
 346
 347         print <<END
 348                         </div>
 349                 </div>
 350
 351                 <br class="clear" />
 352                 <div id="footer" class="fixed">
 353                         <b>Status:</b> $status <b>Uptime:</b>$uptime <b>Version:</b> $FIREBUILD
 354 END
 355 ;
 356 if ($settings{'SPEED'} ne 'off') {
 357 print <<END
 358                         <br />
 359                         <form name='speed'>
 360                                 <b>$Lang::tr{'bandwidth usage'}:</b> $Lang::tr{'incoming'}:<input type="text" name="rxkb" size="5" value="0 kb/s" style="font-size: 12px; font-family: Arial, Helvetica;text-align: center;color:green; border: none; padding: 0; background-color: #FFFFFF;vertical-align: middle" />
 361                                 $Lang::tr{'outgoing'}: <input type="text" name="txkb" size="5" value="0 kb/s" style="font-size: 12px; font-family: Arial, Helvetica;text-align: center;color:red; border: none; padding: 0; background-color: #FFFFFF;vertical-align: middle"/>
 362                         </form>
 363 END
 364 ;
 365 }
 366 print <<END
 367                 </div>
 368         </div>
 369 </div>
 370 </body>
 371 </html>
 372 END
 373 ;
 374 }
 375
 376 sub openbigbox
 377 {
 378 }
 379
 380 sub closebigbox
 381 {
 382 }
 383
 384 sub openbox
 385 {
 386         $width = $_[0];
 387         $align = $_[1];
 388         $caption = $_[2];
 389
 390         print <<END
 391 <!-- openbox -->
 392         <div class="post" align="$align">
 393 END
 394 ;
 395
 396         if ($caption) { print "<h3>$caption</h3>\n"; } else { print "&nbsp;"; }
 397 }
 398
 399 sub closebox
 400 {
 401         print <<END
 402         </div>
 403         <br class="clear" />
 404         <!-- closebox -->
 405 END
 406 ;
 407 }
 408
 409 1;