]> jspc29.x-matter.uni-frankfurt.de Git - daqtools.git/commitdiff
Additional information in index-page
authorManuel Penschuck <manuel.penschuck@stud.uni-frankfurt.de>
Tue, 29 Jan 2013 20:25:01 +0000 (21:25 +0100)
committerManuel Penschuck <manuel.penschuck@stud.uni-frankfurt.de>
Tue, 29 Jan 2013 20:25:01 +0000 (21:25 +0100)
web/htdocs/index.html [changed mode: 0644->0755]
web/htdocs/layout/styles.css

old mode 100644 (file)
new mode 100755 (executable)
index 551937d..aab7872
@@ -1,3 +1,13 @@
+#!/usr/bin/env perl
+
+use CGI qw/:standard/;
+print "HTTP/1.0 200 OK\n";
+print header("text/html");
+
+my $dn = $ENV{'PWD'};
+my $daqop = $ENV{'DAQOPSERVER'};
+
+print <<"HTML_DOCUMENT"
 <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
 <html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
 <head>
@@ -33,5 +43,21 @@ The main documentation of the network can be found in these two documents:
 <li><a href="network/map.htm">Network Map</a>
 </ul>
 </div>
+
+<h3>Server Details</h3>
+<div class="index">
+   <table id="server-details">
+      <tr>
+         <td class="label">Location</td>
+         <td class="pre-value"><pre>$dn</pre></td></tr>
+      </tr>
+      <tr>
+         <td class="label">DAQ OP Server</td>
+         <td class="pre-value"><pre>$daqop</pre></td></tr>
+      </tr>
+   </table>
+</div>
 </body>
-</html>
\ No newline at end of file
+</html>
+HTML_DOCUMENT
+;
\ No newline at end of file
index d56656044ce760d5147a0df7e0730642a2e2a3c5..aef2778dd62f1fb3aa1a4addd0aa76c7c27d54df 100644 (file)
@@ -232,5 +232,12 @@ table#content.map td + td + td + td + td{width:120px;}
   margin-top:3px;
 }
 
+table#server-details td.label {
+   padding-right: 10px;
+}
 
+table#server-details pre {
+   display: inline;
+}
+