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;

}