From 2d1707678eaec5176152234aeb3ab31d3482a407 Mon Sep 17 00:00:00 2001 From: Andreas Neiser Date: Sat, 29 Jun 2013 17:23:03 +0200 Subject: [PATCH] The schema requires some basic uniqueness, TrbData below TrbNetEntity must be grouped, some more minor fixes... --- xml-db/database/TDC.xml | 24 ++++++++++++++++++------ xml-db/database/TrbNetEntity.xsd | 21 ++++++++++++++------- xml-db/xml-db.pl | 2 +- 3 files changed, 33 insertions(+), 14 deletions(-) diff --git a/xml-db/database/TDC.xml b/xml-db/database/TDC.xml index 52f3aec..8c75609 100644 --- a/xml-db/database/TDC.xml +++ b/xml-db/database/TDC.xml @@ -4,22 +4,34 @@ name="TDC" address="c000" > - An FPGA-based tapped-delay line TDC + An FPGA-based tapped-delay line time-to-digital converter (TDC) - + - Basic controls + address="0000"> Debug word of the TDC readout FSM - bla + IDLE + IDLE - + + + + Debug word of the TDC readout FSM + IDLE + IDLE + + + + Trig - + - - - @@ -128,8 +124,7 @@ - + @@ -146,6 +141,14 @@ + + + + + + + + @@ -184,6 +187,10 @@ an error is indicated by this field --> + + + + diff --git a/xml-db/xml-db.pl b/xml-db/xml-db.pl index 7e48b9c..4860e3c 100755 --- a/xml-db/xml-db.pl +++ b/xml-db/xml-db.pl @@ -62,7 +62,7 @@ sub DoSomethingWithDb($) { # and base address (just add all previous offsets) my $baseaddress = 0; my $basename = ''; - foreach my $anc ($groupNode->findnodes('ancestor::group | .')) { + foreach my $anc ($groupNode->findnodes('ancestor-or-self::group')) { $baseaddress += hex($anc->getAttribute('address')); $basename .= '/'.$anc->getAttribute('name'); } -- 2.43.0