00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016 #include "TGo4ComGetObjectStatus.h"
00017
00018 #include "Go4Log/TGo4Log.h"
00019 #include "Go4StatusBase/TGo4ObjectStatus.h"
00020 #include "Go4AnalysisClient/TGo4AnalysisClientImp.h"
00021 #include "Go4Analysis/TGo4AnalysisImp.h"
00022
00023 TGo4ComGetObjectStatus::TGo4ComGetObjectStatus(const char* obname)
00024 :TGo4AnalysisObjectCommand("ANObjectStatus","Get an object status from analysis",obname)
00025 {
00026 TRACE((12,"TGo4ComGetObjectStatus::TGo4ComGetObjectStatus(const Text_t*) ctor",__LINE__, __FILE__));
00027 SetReceiverName("AnalysisClient");
00028
00029 }
00030
00031 TGo4ComGetObjectStatus::~TGo4ComGetObjectStatus()
00032 {
00033 TRACE((12,"TGo4ComGetObjectStatus::~TGo4ComGetObjectStatus() dtor",__LINE__, __FILE__));
00034 }
00035
00036 TGo4ComGetObjectStatus::TGo4ComGetObjectStatus()
00037 :TGo4AnalysisObjectCommand("ANObjectStatus","Get an object status from analysis","his")
00038
00039 {
00040 TRACE((12,"TGo4ComGetObjectStatus::TGo4ComGetObjectStatus() ctor",__LINE__, __FILE__));
00041 SetReceiverName("AnalysisClient");
00042
00043 }
00044
00045 Int_t TGo4ComGetObjectStatus::ExeCom()
00046 {
00047 TRACE((12,"TGo4ComGetObjectStatus::ExeCom()",__LINE__, __FILE__));
00048
00049 if (fxReceiverBase!=0)
00050 {
00051 TRACE((11,"TGo4ComGetObjectStatus::ExeCom() - found valid receiver",__LINE__, __FILE__));
00052 TGo4Log::Debug(" Executing %s : Object %s Status requested ",
00053 GetName(), GetObjectName());
00054 TGo4AnalysisClient* cli=dynamic_cast<TGo4AnalysisClient*> (fxReceiverBase);
00055 TGo4Analysis* ana=TGo4Analysis::Instance();
00056 TGo4ObjectStatus* state= ana->CreateObjectStatus(GetObjectName(), GetFolderName());
00057 if(state)
00058 {
00059 TString name=state->GetName();
00060 name.Append("_status");
00061 state->SetName(name.Data());
00062 cli->SendObject(state, GetTaskName());
00063 delete state;
00064 }
00065 else
00066 {
00067 cli->SendStatusMessage(3, kTRUE,"GetObjectStatus - ERROR: no such object %s in folder %s",
00068 GetObjectName(), GetFolderName());
00069 }
00070
00071 }
00072
00073 else
00074
00075 {
00076 TRACE((11,"TGo4ComGetObject::ExeCom() - no receiver specified ERROR!",__LINE__, __FILE__));
00077 TGo4Log::Debug(" !!! %s : NO RECEIVER ERROR!!!",GetName());
00078 return 1;
00079 }
00080 return -1;
00081 }
00082
00083 ClassImp(TGo4ComGetObjectStatus)
00084
00085