00001 
00002 
00003 
00004 
00005 
00006 
00007 
00008 
00009 
00010 
00011 
00012 
00013 
00014 
00015 
00016 #include "TGo4ComSetProtections.h"
00017 
00018 #include "Go4Log/TGo4Log.h"
00019 #include "Go4AnalysisClient/TGo4AnalysisClientImp.h"
00020 #include "Go4Analysis/TGo4AnalysisImp.h"
00021 
00022 TGo4ComSetProtections::TGo4ComSetProtections(const char* obname, const char* flags)
00023 :TGo4AnalysisObjectCommand("ANSetProtect","Set protection properties for object",obname)
00024 {
00025    TRACE((12,"TGo4ComSetProtections::TGo4ComSetProtections(const Text_t*) ctor",__LINE__, __FILE__));
00026    SetReceiverName("AnalysisClient");  
00027                                       
00028    SetFlags(flags);
00029    SetProtection(kGo4ComModeController);
00030 }
00031 
00032 TGo4ComSetProtections::TGo4ComSetProtections()
00033 :TGo4AnalysisObjectCommand()
00034 {
00035    TRACE((12,"TGo4ComSetProtections::TGo4ComSetProtections() ctor",__LINE__, __FILE__));
00036    SetReceiverName("AnalysisClient");  
00037    SetName("ANSetProtect");
00038    SetDescription("Set protection properties for object");
00039    SetProtection(kGo4ComModeController);
00040 }
00041 
00042 TGo4ComSetProtections::~TGo4ComSetProtections()
00043 {
00044    TRACE((12,"TGo4ComSetProtections::~TGo4ComSetProtections() dtor",__LINE__, __FILE__));
00045 }
00046 
00047 Int_t TGo4ComSetProtections::ExeCom()
00048 {
00049    TGo4AnalysisClient* cli=dynamic_cast<TGo4AnalysisClient*> (fxReceiverBase);
00050    if (cli!=0)
00051       {
00052          TGo4Analysis* ana=TGo4Analysis::Instance();
00053          if(ana->ProtectObjects(GetObjectName(),(const Option_t*) fxFlags.Data()))
00054             {
00055                cli->SendStatusMessage(1, kFALSE,"Changed object or folder %s protections: %s ",
00056                                                GetObjectName(),fxFlags.Data());
00057             }
00058          else
00059             {      
00060                 cli->SendStatusMessage(2, kFALSE,"Could not change object/folder %s protections, no such object",
00061                                                GetObjectName());
00062             }
00063       }
00064    else
00065 
00066        {
00067          TGo4Log::Debug(" !!! %s : NO RECEIVER ERROR!!!",GetName());
00068          return 1;
00069       }
00070 
00071    return -1;
00072 }
00073 
00074 ClassImp(TGo4ComSetProtections)
00075 
00076