Subversion Repositories f9daq

#include <stdio.h>
#include <stdlib.h>
#include <TROOT.h>
#include <TF1.h>
#include <TH1F.h>
#include <TH1D.h>
#include <TH2D.h>
#include <TTree.h>
#include <TCanvas.h>
#include <TStyle.h>
#include <TSystem.h>
#include <TFile.h>
#include <TDirectory.h>
#include <TGraph.h>
#include <TLegend.h>

#include <TPaveText.h>

#include "TXMLEngine.h"

// const char nodes[][20]={"TMON0","TMON1", "dna", "VDD", "V2P","V2N","VSS","VTH1","VTH2","VCC12","VCC15","VCC25","V38P",0};
const char nodes[][20]={ "VDD", "V2P","V2N","VSS","VTH1","VTH2","VCC12","VCC15","VCC25","V38P",0};
const double ul[20]   ={  1.7 , 2.1,  -1.85, -1.61, 3,      3,     1.31,    1.61   ,  2.61 , 3.91 };
const double ll[20]   ={  1.61, 1.85,  -2.09, -1.69 , 0,      0,     1.09,    1.39   ,  2.39 , 3.69 };

Int_t mid=0;
void hinit( int id){
        int i=0;
        char name[0xFF];
sprintf(name,"title%d",id);
//printf("ime naslova=%s\n", name);
TPaveText *pt = new TPaveText(.2,.2,.7,.7);
pt->SetName(name);
gDirectory->GetList()->Add(pt);
       
        do {
                sprintf(name,"%s_%d",nodes[i],id);
                printf("name=%s\n",name);
                TGraph *g=  new TGraph();
                g->SetName(name);
                g->SetLineColor(i%9+1);
                g->SetLineWidth(3);
                gDirectory->GetList()->Add(g);
                i++;   
        } while (strlen(nodes[i])> 1); 
}      
       
void hplot(int id){
        int i=0;
        char name[0xFF];
        char title[0xFF]= "Feb Test";

   TLegend  *leg = new TLegend(0.60,0.1,0.99,0.9);
   //leg->SetHeader("Legend");
        do {
                sprintf(name,"%s_%d",nodes[i],id);
                if (gROOT->FindObject(name) ) {
                        TGraph *g = (TGraph *) (gROOT->FindObject(name)) ;
                    if (i==0) {
                                TH2F *frame = new TH2F("frame",title,g->GetN(),0,g->GetN()+5,40,-2.5,4.5);
                frame->SetStats(0);                            
                frame->Draw();
                        }
                        double x, y;
                        g->GetPoint(g->GetN()-1,x,y);
                        if (y>ll[i] && y<ul[i]){
                            sprintf(title,"%s\t=%2.2f V",nodes[i], y);
                        }       else   {
                                sprintf(title,"%s\t=%2.2f V ERROR",nodes[i], y);
                        }
                        leg->AddEntry(g,title,"l");
                        g->Draw("ls");
                } else {
                        printf("%s not found!\n",name);
                }      
                i++;
        } while (strlen(nodes[i])> 1); 
        leg->Draw();
}

void hpt( int id ){
char name[0xFF];
sprintf(name,"title%d",id);

//printf("title=%s\n", name);
     TPaveText *pt =  (TPaveText *) (gROOT->FindObject(name));
     if (pt) pt->Draw();
         
         
       
}

void hend(){
   TCanvas *c= new TCanvas("slowcontrol");
   c->Divide(2,2);
   for (int i=0;i<4;i++) {
         c->cd(i+1);  
         hplot(i);
   }
   c->Modified();
   c->Update();
}


void DisplayNode(TXMLEngine* xml, XMLNodePointer_t node, Int_t level)
{
   // this function display all accessible information about xml node and its children
   
   //printf("%*c node: %s\n",level,' ', xml->GetNodeName(node));
   
   // display namespace
   XMLNsPointer_t ns = xml->GetNS(node);
   if (ns!=0)
      printf("%*c namespace: %s refer: %s\n",level+2,' ', xml->GetNSName(ns), xml->GetNSReference(ns));
   
   // display attributes
   XMLAttrPointer_t attr = xml->GetFirstAttr(node);
   while (attr!=0) {
       //printf("%*c attr: %s value: %s\n",level+2,' ', xml->GetAttrName(attr), xml->GetAttrValue(attr));
       attr = xml->GetNextAttr(attr);  
   }
   
   // display content (if exists)
   const char* content = xml->GetNodeContent(node);
   
   if (content!=0){
      //printf("%*c cont: %s\n",level+2,' ', content);
          if (strcmp(xml->GetNodeName(node),"time")==0) {
           // printf("Time=%s\n", content);
           char name[0xFF];
           //sprintf(name,"Cas kki ga hocem=\t%s",content);
           //printf("Time=%s\n", name);
                  for (int ii=0;ii<4;ii++){
                    sprintf(name,"title%d",ii);
                        printf("title=%s\n",name);
                    TPaveText *pt = (TPaveText *) (gROOT->FindObject(name)) ;
                    if (pt) {
                         pt->AddText("ARICH FEB QA test");
                          sprintf(name,"Time= %s",content);
                          pt->AddText(name);
                         
                       
                    }
              }
          }              
         
          if (strcmp(xml->GetNodeName(node),"id")==0) {
           mid=atoi(content);
           //printf("ID---->%d\n",mid);
      } else {
                 char name[0xFF];
                 sprintf(name,"%s_%d",xml->GetNodeName(node),mid);
                 TGraph *g = (TGraph *) (gROOT->FindObject(name)) ;
                 if (g) g->SetPoint(g->GetN(), g->GetN() ,atof(content));
                 else printf("%s not found!\n",name);
          }
   }  
   // display all child nodes  
   XMLNodePointer_t child = xml->GetChild(node);
   while (child!=0) {
      DisplayNode(xml, child, level+2);
      child = xml->GetNext(child);
   }
}


void slowcxml2root(const char* filename = "febslowc_0044.xml")
{
  TTree *run = new TTree("run", "run");
 
   // First create engine
   TXMLEngine* xml = new TXMLEngine;
   
   // Now try to parse xml file
   // Only file with restricted xml syntax are supported
   XMLDocPointer_t xmldoc = xml->ParseFile(filename);
   if (xmldoc==0) {
      delete xml;
      return;  
   }

   // take access to main node  
   XMLNodePointer_t mainnode = xml->DocGetRootElement(xmldoc);
   
   // display recursively all nodes and subnodes
   for (int i=0;i<4;i++) hinit(i);
   DisplayNode(xml, mainnode, 1);
   //hend();  
   // Release memory before exit
   xml->FreeDoc(xmldoc);
   delete xml;
}