my $parser = XML::LibXML->new(line_numbers => 1);
my $db = $parser->parse_file($file);
my $name = $db->getDocumentElement->getAttribute('name');
- print h2("Read-out Controllers");
+ my $str;
+ print "<ul>";
foreach my $curctrl ($db->getDocumentElement->findnodes('controller')) {
my $ctrlname = $curctrl->getAttribute('name');
my $ctrlid = $curctrl->getAttribute('id');
my $ctrladdr = $curctrl->getAttribute('address');
-
+ printf("<li>Controller %i ($ctrlname) 0x%s\n",$ctrlid,$ctrladdr);
+ print("<ul>");
foreach my $curchain ($curctrl->findnodes('chain')) {
my $chainid = $curchain->getAttribute('id');
my $chainname = $curchain->getAttribute('name');
+ printf("<li>Chain %i ($chainname)",$chainid);
+ print("<ul>");
+ foreach my $cursensor ($curchain->findnodes('sensor')) {
+ my $sensid = $cursensor->getAttribute('id');
+ my $sensname = $cursensor->getAttribute('name');
+ my $sensfile = $cursensor->getAttribute('config');
+ my $sensena = $cursensor->getAttribute('enabled');
+ printf("<li>Sensor $sensid ($sensname) $sensfile %s",($sensena?"active":"disabled"));
+ }
+ print("</ul>");
}
+ print("</ul>");
}
+ print("</ul>");
}
print <<EOF;
<HTML>
<HEAD>
-<title>JTAG Editor</title>
+<title>JTAG Status</title>
<link href="../layout/styles.css" rel="stylesheet" type="text/css"/>
<link href="../layout/jtageditor_blue.css" rel="stylesheet" title="Light Blue" type="text/css"/>
EOF
debug text
</div>
<div id="overview">
+<div class="header">System Setup</div>
EOF
readConfig($configFile,1);
print <<EOF ;