/[PAMELA software]/eventviewer/flight/src/FEVpamevcontrol.cpp
ViewVC logotype

Diff of /eventviewer/flight/src/FEVpamevcontrol.cpp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.5 by mocchiut, Thu Nov 8 11:05:35 2007 UTC revision 1.13 by mocchiut, Fri Apr 13 08:07:31 2012 UTC
# Line 104  PAMevcontrol::PAMevcontrol(const TGWindo Line 104  PAMevcontrol::PAMevcontrol(const TGWindo
104    cvar = &var;    cvar = &var;
105    thefigure = &figure;    thefigure = &figure;
106    //    //
107    cframe1 = new TGCompositeFrame(this, 280, 40, kVerticalFrame);    cframe1 = new TGCompositeFrame(this, 280, 60, kVerticalFrame);
108    TGCompositeFrame *cframe2 = new TGCompositeFrame(this, 280, 60, kVerticalFrame);    TGCompositeFrame *cframe2 = new TGCompositeFrame(this, 280, 60, kVerticalFrame);
109    TGCompositeFrame *cframe3 = new TGCompositeFrame(this, 280, 60, kVerticalFrame);    TGCompositeFrame *cframe3 = new TGCompositeFrame(this, 280, 60, kVerticalFrame);
110    TGCompositeFrame *cframe4 = new TGCompositeFrame(this, 280, 60, kVerticalFrame);    TGCompositeFrame *cframe4 = new TGCompositeFrame(this, 280, 60, kVerticalFrame);
# Line 115  PAMevcontrol::PAMevcontrol(const TGWindo Line 115  PAMevcontrol::PAMevcontrol(const TGWindo
115    TGGroupFrame *jumpf = new TGGroupFrame(cframe3, "Jump to");    TGGroupFrame *jumpf = new TGGroupFrame(cframe3, "Jump to");
116    TGGroupFrame *savef = new TGGroupFrame(cframe4, "Save figure as");    TGGroupFrame *savef = new TGGroupFrame(cframe4, "Save figure as");
117    //    //
118    TGHorizontalFrame *htexts = new TGHorizontalFrame(savef,400,800);    TGHorizontalFrame *htexts = new TGHorizontalFrame(savef,300,800);
119    TGHorizontalFrame *htextsl = new TGHorizontalFrame(cframe4,400,800);    TGHorizontalFrame *htextsl = new TGHorizontalFrame(cframe4,300,800);
120    TGHorizontalFrame *htext = new TGHorizontalFrame(inputf,400,800);    TGHorizontalFrame *htext = new TGHorizontalFrame(inputf,300,800);
121    TGHorizontalFrame *htext2 = new TGHorizontalFrame(inputf,400,800);    TGHorizontalFrame *htext2 = new TGHorizontalFrame(inputf,300,800);
122    TGHorizontalFrame *htext3 = new TGHorizontalFrame(jumpf,400,800);    TGHorizontalFrame *htext3 = new TGHorizontalFrame(jumpf,300,800);
123    TGHorizontalFrame *htext4 = new TGHorizontalFrame(jumpf,400,80);    TGHorizontalFrame *htext4 = new TGHorizontalFrame(jumpf,300,80);
124    TGHorizontalFrame *hframe = new TGHorizontalFrame(this,400,800);    TGHorizontalFrame *hframe = new TGHorizontalFrame(this,300,800);
125    for (Int_t fr=0; fr<12; fr++) hframedec[fr] = new TGHorizontalFrame(gf, 7, 7);    for (Int_t fr=0; fr<12; fr++) hframedec[fr] = new TGHorizontalFrame(gf, 7, 7);
126    TGHorizontalFrame *hframe3 = new TGHorizontalFrame(gf2, 280, 40);    TGHorizontalFrame *hframe3 = new TGHorizontalFrame(gf2, 280, 60);
127    TGHorizontalFrame *hframe4 = new TGHorizontalFrame(gf2,280,10);    TGHorizontalFrame *hframe4 = new TGHorizontalFrame(gf2,280,10);
128    TGVerticalFrame *hframe5 = new TGVerticalFrame(hframe4, 280, 40);    TGVerticalFrame *hframe5 = new TGVerticalFrame(hframe4, 280, 60);
129    TGHorizontalFrame *hfrprog = new TGHorizontalFrame(this,400,800);    TGHorizontalFrame *hfrprog = new TGHorizontalFrame(this,300,800);
130    //    //
131    TGTextEntry *fText = new TGTextEntry(htext, new TGTextBuffer(20),-1);    TGTextEntry *fText = new TGTextEntry(htext, new TGTextBuffer(20),-1);
132    fText->SetText(cvar->thefilename.Data());    fText->SetText(cvar->thefilename.Data());
# Line 288  PAMevcontrol::PAMevcontrol(const TGWindo Line 288  PAMevcontrol::PAMevcontrol(const TGWindo
288    fchkinfo = new TGCheckButton(hframe3, "Infos");      fchkinfo = new TGCheckButton(hframe3, "Infos");  
289    fchkinfo->Connect("Clicked()","PAMevcontrol",this,"chkinfo()");      fchkinfo->Connect("Clicked()","PAMevcontrol",this,"chkinfo()");  
290    if ( cvar->INFOS ) fchkinfo->SetState(kButtonDown);    if ( cvar->INFOS ) fchkinfo->SetState(kButtonDown);
291    hframe3->AddFrame(fchkinfo, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,0,5,5,5));    hframe3->AddFrame(fchkinfo, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,0,1,5,5));
292    //    //
293    fchknames = new TGCheckButton(hframe3, "Names");      fchknames = new TGCheckButton(hframe3, "Names");  
294    fchknames->Connect("Clicked()","PAMevcontrol",this,"chknames()");      fchknames->Connect("Clicked()","PAMevcontrol",this,"chknames()");  
295    if ( cvar->VINFOS ) fchknames->SetState(kButtonDown);    if ( cvar->VINFOS ) fchknames->SetState(kButtonDown);
296    hframe3->AddFrame(fchknames, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,5,5,5));    hframe3->AddFrame(fchknames, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,0,1,5,5));
297    
298    fchkpalette = new TGCheckButton(hframe3, "Palette");      fchkpalette = new TGCheckButton(hframe3, "Palette");  
299    fchkpalette->Connect("Clicked()","PAMevcontrol",this,"chkpalette()");      fchkpalette->Connect("Clicked()","PAMevcontrol",this,"chkpalette()");  
300    if ( cvar->PALETTE) fchkpalette->SetState(kButtonDown);    if ( cvar->PALETTE) fchkpalette->SetState(kButtonDown);
301    hframe3->AddFrame(fchkpalette, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,10,5,5,5));    hframe3->AddFrame(fchkpalette, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,0,2,5,5));
302    
303      fchktrigger = new TGCheckButton(hframe3, "Trigger");  
304      fchktrigger->Connect("Clicked()","PAMevcontrol",this,"chktrigger()");  
305      if ( cvar->PATTRIG) fchktrigger->SetState(kButtonDown);
306      hframe3->AddFrame(fchktrigger, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,1,2,5,5));
307    
308    gf2->AddFrame(hframe3, new TGLayoutHints(kLHintsExpandX));    gf2->AddFrame(hframe3, new TGLayoutHints(kLHintsExpandX));
309    //    //
310    TGVButtonGroup *group = new TGVButtonGroup(hframe4);    TGVButtonGroup *group = new TGVButtonGroup(hframe4);
# Line 441  PAMevcontrol::PAMevcontrol(const TGWindo Line 448  PAMevcontrol::PAMevcontrol(const TGWindo
448    //    //
449  }  }
450    
451    void PAMevcontrol::Refresh(){
452      // bah
453      return;
454      this->Clear();
455      MapSubwindows();
456      // Initialize the layout algorithm
457      Resize(GetDefaultSize());
458      // Map main frame
459      MapWindow();  
460    }
461    
462  void PAMevcontrol::DIALOG(Int_t ty, TString warn){      void PAMevcontrol::DIALOG(Int_t ty, TString warn){    
463      //      //
464      // ty = 0 -> INFO, ty = 1 -> WARNING, ty = 3 -> ERROR      // ty = 0 -> INFO, ty = 1 -> WARNING, ty = 2 -> ERROR
465      //      //
466      Int_t retval;      Int_t retval;
467      TString title;      TString title;
468      EMsgBoxIcon mb_icon = kMBIconStop;      EMsgBoxIcon mb_icon = kMBIconStop;
469      if ( ty == 0 ){      if ( ty == 2 || ty == 3 ){
470          if ( ty == 2 ){
471            title="ERROR!!";
472            mb_icon = kMBIconStop;
473            new TGMsgBox(gClient->GetRoot(), this, title.Data(), warn.Data(), mb_icon, kMBOk, &retval);
474          } else {
475            title="HELP";
476            mb_icon = kMBIconQuestion;
477            new TGMsgBox(gClient->GetRoot(), this, title.Data(), warn.Data(), mb_icon, kMBOk, &retval);
478          };
479        } else {
480          if ( ty == 0 ){
481          title="INFO";          title="INFO";
482          mb_icon = kMBIconAsterisk;          mb_icon = kMBIconAsterisk;
483      };        };
484      if ( ty == 1 ){        if ( ty == 1 ){
485          title="WARNING!";          title="WARNING!";
486          mb_icon = kMBIconExclamation;          mb_icon = kMBIconExclamation;
487          };      
488          if ( ty == 4 ){
489            title="DATA";
490            mb_icon = kMBIconExclamation;
491          };
492          const TGPicture *icon_pic;
493          switch (mb_icon) {
494          case kMBIconStop:
495            icon_pic = gClient->GetPicture("mb_stop_s.xpm");
496            if (!icon_pic) Error("TGMsgBox", "mb_stop_s.xpm not found");
497            break;
498            
499          case kMBIconQuestion:
500            icon_pic = gClient->GetPicture("mb_question_s.xpm");
501            if (!icon_pic) Error("TGMsgBox", "mb_question_s.xpm not found");
502            break;
503            
504          case kMBIconExclamation:
505            icon_pic = gClient->GetPicture("mb_exclamation_s.xpm");
506            if (!icon_pic) Error("TGMsgBox", "mb_exclamation_s.xpm not found");
507            break;
508            
509          case kMBIconAsterisk:
510            icon_pic = gClient->GetPicture("mb_asterisk_s.xpm");
511            if (!icon_pic) Error("TGMsgBox", "mb_asterisk_s.xpm not found");
512            break;
513            
514          default:
515            icon_pic = 0;
516            break;
517          }
518          //
519          if ( ty == 4 ){// non funziona il recupero dei puntatori a questi oggetti come e` possibile?
520            //      gObjectTable->Print();
521            TGLabel *la=dynamic_cast<TGLabel*>(gDirectory->FindObject("la"));
522            TGHorizontalFrame *fLabelFrame=dynamic_cast<TGHorizontalFrame*>(gDirectory->FindObject("fLabelFrame"));
523            TGTransientFrame *compofra=dynamic_cast<TGTransientFrame*>(gDirectory->FindObject("compofra"));
524            if ( la ) la->Delete();
525            if ( fLabelFrame ) fLabelFrame->Delete();
526            if ( compofra ){
527              compofra->DestroyWindow();
528              compofra->Delete();  
529            };
530          };
531          TGTransientFrame *compofra = new TGTransientFrame(gClient->GetRoot(), 0, 200, 80, kHorizontalFrame);      
532          TGHorizontalFrame *fIconFrame = NULL;
533          TGIcon *fIcon = NULL;
534          if ( ty != 4 ){
535            compofra->DontCallClose();      
536            fIconFrame = new TGHorizontalFrame(compofra, 98, 78);
537            fIcon = new TGIcon(fIconFrame, icon_pic, icon_pic->GetWidth(), icon_pic->GetHeight());
538            fIconFrame->AddFrame(fIcon, new TGLayoutHints(kLHintsCenterX|kLHintsCenterY, 1, 1, 1, 1));
539            compofra->AddFrame(fIconFrame, new TGLayoutHints(kLHintsCenterX|kLHintsCenterY, 1, 1, 1, 1));
540          };
541          //
542          TGHorizontalFrame *fLabelFrame = new TGHorizontalFrame(compofra, 98, 78);
543          TGLabel *la=new TGLabel(fLabelFrame,warn.Data());
544          la->SetTextJustify(kLHintsCenterX);
545          fLabelFrame->AddFrame(la, new TGLayoutHints(kLHintsCenterX|kLHintsCenterY, 1, 1, 1, 1));
546          compofra->AddFrame(fLabelFrame, new TGLayoutHints(kLHintsCenterX|kLHintsCenterY, 1, 1, 1, 1));
547          //                
548          compofra->SetWindowName(title.Data());
549          compofra->MapSubwindows();
550          if ( ty != 4 ){
551            compofra->Resize(compofra->GetDefaultWidth(),80);
552          } else {
553            compofra->Resize(compofra->GetDefaultSize());
554          };
555          compofra->CenterOnParent();
556          compofra->MapWindow();
557          //
558          if ( ty != 4 ){
559            Int_t kkk = 0;
560            while ( kkk < 200 ){
561              gSystem->ProcessEvents();
562              gSystem->Sleep(10);
563              kkk++;
564            };
565          };
566          if ( compofra && ty != 4 ){
567            la->Delete();
568            fLabelFrame->Delete();
569            if ( fIcon ) fIcon->Delete();
570            if ( fIconFrame ) fIconFrame->Delete();
571            compofra->DestroyWindow();
572            compofra->Delete();    
573          };
574      };      };
575      if ( ty == 2 ){      //
         title="ERROR!!";  
         mb_icon = kMBIconStop;  
     };  
     new TGMsgBox(gClient->GetRoot(), this, title.Data(), warn.Data(), mb_icon, kMBOk, &retval);  
576  }  }
577    
578  void PAMevcontrol::refreshdec(Int_t n){  void PAMevcontrol::refreshdec(Int_t n){
# Line 569  void PAMevcontrol::SetFilename() { Line 681  void PAMevcontrol::SetFilename() {
681      TGTextEntry *entry = (TGTextEntry*)gTQSender;      TGTextEntry *entry = (TGTextEntry*)gTQSender;
682      TString text = entry->GetText();      TString text = entry->GetText();
683      cvar->thefilename=text.Data();      cvar->thefilename=text.Data();
684        cvar->i = 0;
685      cvar->nevents = 0;      cvar->nevents = 0;
686      cvar->firstevno = 0;      cvar->firstevno = 0;
687      cvar->lastevno = 0;      cvar->lastevno = 0;
# Line 601  void PAMevcontrol::getl0file() { Line 714  void PAMevcontrol::getl0file() {
714    cout<<"PSW  "<<psw<<endl;    cout<<"PSW  "<<psw<<endl;
715    cout<<"~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~"<<endl;    cout<<"~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~"<<endl;
716    TSQLServer *dbc = TSQLServer::Connect(host.Data(),user.Data(),psw.Data());    TSQLServer *dbc = TSQLServer::Connect(host.Data(),user.Data(),psw.Data());
717      //
718      TSQLResult *pResult;
719      TSQLRow *Row;
720      //
721    if( dbc && dbc->IsConnected() ){    if( dbc && dbc->IsConnected() ){
722      //      //
723      // Starting from level2      // Retrieve the file
724      //      //
725      if ( clev->file == 2 ){      if ( clev->file == 2 ){
726          //
727          // Starting from level2
728          //
729        GL_ROOT glroot = GL_ROOT();        GL_ROOT glroot = GL_ROOT();
730        if( !glroot.Query_GL_ROOT(cvar->idroot,dbc) ){        if( !glroot.Query_GL_ROOT(cvar->idroot,dbc) ){
731          //          //
# Line 624  void PAMevcontrol::getl0file() { Line 744  void PAMevcontrol::getl0file() {
744            cvar->thefilter="";            cvar->thefilter="";
745            cvar->selex = true;            cvar->selex = true;
746          };          };
747          cvar->i = -(cvar->EVF + cvar->i -1);          cvar->i = cvar->EVF + cvar->i ;
748          //cvar->refresh = true;          //cvar->refresh = true;
749          //      cvar->file = 0;          //      cvar->file = 0;
750          //          //
751        } else {        } else {  
752          stringstream warning;          stringstream warning;
753          warning.str("");          warning.str("");
754          warning << " Problems getting Level0 file ";          warning << " Problems getting Level0 file ";
755          DIALOG(2,warning.str().c_str());          DIALOG(2,warning.str().c_str());
756        };        };
757      } else {      } else {      
758        //        //
759        // starting from L0        // starting from L0
760        //        //
761        stringstream warning;        stringstream query;
762        warning.str("");        query.str("");
763        warning << " Not yet implemented ";        query << " SELECT ID FROM GL_ROOT WHERE NAME='"<< gSystem->BaseName(cvar->thefilename.Data()) <<"' order by INSERT_TIME desc limit 1;";
764        DIALOG(2,warning.str().c_str());        //      printf(" query is %s \n",query.str().c_str());
765          pResult = dbc->Query(query.str().c_str());
766          Row = pResult->Next();      
767          UInt_t idrl0 = 0;
768          if ( Row ){
769            idrl0 = (UInt_t)atoll(Row->GetField(0));
770          };
771          //
772          query.str("");
773          query << " SELECT ID,ID_ROOT_L2,EV_FROM FROM GL_RUN WHERE EV_FROM<="<<cvar->i<<" AND EV_TO>="<< cvar->i<<" AND ID_ROOT_L0="<< idrl0 <<";";
774          //      printf(" query is %s \n",query.str().c_str());
775          pResult = dbc->Query(query.str().c_str());
776          Row = pResult->Next();      
777          UInt_t idrl2 = 0;
778          UInt_t idrlun = 0;
779          UInt_t evfrom = 0;
780          if ( Row ){
781            idrlun = (UInt_t)atoll(Row->GetField(0));
782            idrl2 = (UInt_t)atoll(Row->GetField(1));
783            evfrom = (UInt_t)atoll(Row->GetField(2));
784          };
785          //
786          query.str("");
787          query << " SELECT ID,NEVENTS FROM GL_RUN WHERE ID_ROOT_L2="<< idrl2 <<" order by RUNHEADER_TIME asc;";
788          //      printf(" query is %s \n",query.str().c_str());
789          pResult = dbc->Query(query.str().c_str());
790          Row = pResult->Next();      
791          UInt_t coren = 0;
792          while ( Row ){
793            if ( (UInt_t)atoll(Row->GetField(0)) == idrlun ) break;
794            coren += (UInt_t)atoll(Row->GetField(1));
795            Row = pResult->Next();      
796          };
797          coren += cvar->i - evfrom;
798          //
799          GL_ROOT glroot = GL_ROOT();
800          if( !glroot.Query_GL_ROOT(idrl2,dbc) ){
801            //
802            cvar->i = coren;
803            //
804            cvar->thefilename= glroot.PATH + glroot.NAME;
805            cvar->nevents = 0;
806            cvar->firstevno = 0;
807            cvar->lastevno = 0;
808            if ( cvar->fl0 ) {
809              cvar->fl0 = false;
810              ffl0->SetState(kButtonUp);
811            };
812            cvar->restart = true;
813            cvar->waitforever = false;
814            //
815            if ( cvar->thefilter != "" ){
816              cvar->thefilter="";
817              cvar->selex = true;
818            };
819            //
820          } else {  
821            stringstream warning;
822            warning.str("");
823            warning << " Problems getting Level2 file ";
824            DIALOG(2,warning.str().c_str());
825          };
826          //      stringstream warning;
827          //      warning.str("");
828          //      warning << " Not yet implemented ";
829          //      DIALOG(2,warning.str().c_str());
830      };      };
831      //      //
832    } else {    } else {
# Line 687  void PAMevcontrol::StopSearching() { Line 872  void PAMevcontrol::StopSearching() {
872  void PAMevcontrol::RefreshButtons() {  void PAMevcontrol::RefreshButtons() {
873    if ( cvar->jumprog ){    if ( cvar->jumprog ){
874      jbwc1->SetState(kButtonDown);      jbwc1->SetState(kButtonDown);
875        jbwc0->SetState(kButtonUp);
876    } else {    } else {
877        jbwc1->SetState(kButtonUp);
878      jbwc0->SetState(kButtonDown);      jbwc0->SetState(kButtonDown);
879    };    };
880    if ( cvar->fl0 ){    if ( cvar->fl0 ){
# Line 698  void PAMevcontrol::RefreshButtons() { Line 885  void PAMevcontrol::RefreshButtons() {
885    //  if ( cvar->tracknds4) ftrks4->SetState(kButtonDown);    //  if ( cvar->tracknds4) ftrks4->SetState(kButtonDown);
886    if ( cvar->bw ){    if ( cvar->bw ){
887      bwc1->SetState(kButtonDown);      bwc1->SetState(kButtonDown);
888        bwc0->SetState(kButtonUp);
889    } else {    } else {
890      bwc0->SetState(kButtonDown);      bwc0->SetState(kButtonDown);
891        bwc1->SetState(kButtonUp);
892    };    };
893      if ( cvar->PATTRIG) fchktrigger->SetState(kButtonDown); else fchktrigger->SetState(kButtonUp);
894    if ( cvar->PALETTE) fchkpalette->SetState(kButtonDown); else fchkpalette->SetState(kButtonUp);    if ( cvar->PALETTE) fchkpalette->SetState(kButtonDown); else fchkpalette->SetState(kButtonUp);
895    if ( cvar->VINFOS ) fchknames->SetState(kButtonDown); else fchknames->SetState(kButtonUp);    if ( cvar->VINFOS ) fchknames->SetState(kButtonDown); else fchknames->SetState(kButtonUp);
896    if ( cvar->INFOS ) fchkinfo->SetState(kButtonDown); else fchkinfo->SetState(kButtonUp);    if ( cvar->INFOS ) fchkinfo->SetState(kButtonDown); else fchkinfo->SetState(kButtonUp);
# Line 1153  void PAMevcontrol::chkpalette() { Line 1343  void PAMevcontrol::chkpalette() {
1343    cvar->goon = true;    cvar->goon = true;
1344  }  }
1345    
1346    void PAMevcontrol::chktrigger() {
1347      if ( cvar->PATTRIG ) {
1348        cvar->PATTRIG = 0;
1349      } else {
1350        cvar->PATTRIG = 1;
1351      };
1352      cvar->i--;
1353      cvar->goon = true;
1354    }
1355    
1356  void PAMevcontrol::next() {  void PAMevcontrol::next() {
1357    SetSearching();    SetSearching();
1358    if ( cvar->i == cvar->nevents-1  ) {    if ( cvar->i == cvar->nevents-1  ) {
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.13
  ViewVC Help
Powered by ViewVC 1.1.23