source: trunk/Mars/mdata/MDataMember.cc @ 19257

Last change on this file since 19257 was 19257, checked in by tbretz, 6 months ago
Compatibility with root 6 -- more C++ like in general.
File size: 7.1 KB
Line 
1/* ======================================================================== *\
2!
3! *
4! * This file is part of MARS, the MAGIC Analysis and Reconstruction
5! * Software. It is distributed to you in the hope that it can be a useful
6! * and timesaving tool in analysing Data of imaging Cerenkov telescopes.
7! * It is distributed WITHOUT ANY WARRANTY.
8! *
9! * Permission to use, copy, modify and distribute this software and its
10! * documentation for any purpose is hereby granted without fee,
11! * provided that the above copyright notice appear in all copies and
12! * that both that copyright notice and this permission notice appear
13! * in supporting documentation. It is provided "as is" without express
14! * or implied warranty.
15! *
16!
17!
18!   Author(s): Thomas Bretz  04/2002 <mailto:tbretz@astro.uni-wuerzburg.de>
19!
20!   Copyright: MAGIC Software Development, 2000-2004
21!
22!
23\* ======================================================================== */
24
25/////////////////////////////////////////////////////////////////////////////
26//
27//   MDataMember
28//
29//   This objects corresponds to the data member of another object.
30//   You can either specify the object as a string, eg "MHillas.fWidth"
31//   where MHillas is the name of the container in the parameterlist
32//   and fWidth is it's data member, or you can specify it by giving
33//   the pointer corresponding to the instance of your object and
34//   a TMethodCall pointer corresponding to the Member function returning
35//   the requested value.
36//
37/////////////////////////////////////////////////////////////////////////////
38#include "MDataMember.h"
39
40#include <fstream>
41
42#include <TMethodCall.h>
43
44#include "MLog.h"
45#include "MLogManip.h"
46
47#include "MParList.h"
48
49ClassImp(MDataMember);
50
51using namespace std;
52
53// --------------------------------------------------------------------------
54//
55//  obj is a pointer to the instance of your class from which the data
56//  should be requested. TMethodCall (s. root dox) is a pointer
57//  to a TMethodCall object which should be the getter function for
58//  the data you want to get.
59//
60MDataMember::MDataMember(MParContainer *obj, TMethodCall *call)
61{
62    fObject = obj;
63    fCall   = call;
64
65    if (fCall->ReturnType()==TMethodCall::kLong)
66        SetBit(kIsInt);
67    else
68        ResetBit(kIsInt);
69
70    fDataMember = (TString)obj->GetName() + "." + call->GetName();
71}
72
73// --------------------------------------------------------------------------
74//
75//  obj is a pointer to the instance of your class from which the data
76//  should be requested. TMethodCall (s. root dox) is a pointer
77//  to a TMethodCall object which should be the getter function for
78//  the data you want to get.
79//
80MDataMember::MDataMember(MParContainer *obj, const TString call)
81{
82    fObject = obj;
83    fCall   = obj->GetterMethod(call);
84
85    if (fCall->ReturnType()==TMethodCall::kLong)
86        SetBit(kIsInt);
87    else
88        ResetBit(kIsInt);
89
90    fDataMember = (TString)obj->GetName() + "." + call;
91}
92
93// --------------------------------------------------------------------------
94//
95// Check if accessing fCall is safe
96//
97Bool_t MDataMember::CheckGet() const
98{
99    if (!fObject)
100    {
101        *fLog << err << "ERROR - MDataMember::Get: fObject not initialized ";
102        *fLog << "(not PreProcessed)... returning 0." << endl;
103        return kFALSE;
104    }
105
106    if (!fCall)
107    {
108        *fLog << err << "ERROR - MDataMemberGet: No TMethodCall for " << fDataMember << " of ";
109        *fLog << fObject->GetName() << " available... returning 0." << endl;
110        return kFALSE;
111    }
112
113    return kTRUE;
114}
115
116// --------------------------------------------------------------------------
117//
118// Returns the value you requested
119//
120Double_t MDataMember::GetValue() const
121{
122    if (!CheckGet())
123        return 0;
124
125    switch (fCall->ReturnType())
126    {
127    case TMethodCall::kLong:
128        Long_t l;
129        fCall->Execute(fObject, l);
130        return (Double_t)l;
131
132    case TMethodCall::kDouble:
133        Double_t v;
134        fCall->Execute(fObject, v);
135        return v;
136
137#if ROOT_VERSION_CODE < ROOT_VERSION(6,00,00)
138#define PARENT TMethodCall
139#else
140#define PARENT TInterpreter
141#endif
142
143
144    default:
145        *fLog << err << "ERROR - MDataMember::GetValue: " << fObject->GetName();
146        *fLog << "." << fDataMember << " has unkown type (=";
147        *fLog << static_cast<underlying_type<PARENT::EReturnType>::type>(fCall->ReturnType()) << ")... returning 0." << endl;
148        return 0;
149    }
150}
151
152// --------------------------------------------------------------------------
153//
154// Returns the string you requested
155//
156const char *MDataMember::GetString() const
157{
158    if (!CheckGet())
159        return NULL;
160
161    switch (fCall->ReturnType())
162    {
163    case TMethodCall::kString:
164        {
165            char *c=NULL;
166            fCall->Execute(fObject, &c);
167            return c;
168        }
169
170    default:
171        *fLog << err << "DataMember " << fDataMember << " of ";
172        *fLog << fObject->GetName() << " not a char*... returning NULL." << endl;
173        return NULL;
174    }
175}
176
177// --------------------------------------------------------------------------
178//
179// If a string was given PreProcess try to resolv the object name and
180// tries to get it from the parlist. And also tries to resolve
181// the data member (variable) name you requested and tries to get a
182// corresponding TMethodCall from the root Dictionary.
183// Remark: If your Data Member is called fDataMember the corresponding
184//         getter Method in your class must be calles fDataMember
185//
186Bool_t MDataMember::PreProcess(const MParList *plist)
187{
188    // The following change has to be checked :
189    // In order that fCall is initialized properly
190    // the original statement "if (fCall)" is replaced by the statement
191    if (fCall && !fObject)
192        return kTRUE;
193
194    TString cname(fDataMember);
195    TString mname(fDataMember);
196
197    const char *dot = strrchr(cname, '.');
198
199    if (dot)
200    {
201        const int pos = dot-cname;
202
203        cname.Remove(pos);
204        mname.Remove(0, pos+1);
205    }
206
207    fObject = (MParContainer*)plist->FindObject(cname);
208    if (!fObject)
209    {
210        *fLog << err << "Object '" << cname << "' not in parameter list... aborting." << endl;
211        return kFALSE;
212    }
213
214    fCall = fObject->GetterMethod(mname);
215
216    return fCall ? kTRUE : kFALSE;
217}
218
219// --------------------------------------------------------------------------
220//
221// Returns the ready-to-save flag of the data member container
222//
223Bool_t MDataMember::IsReadyToSave() const
224{
225    return IsValid() ? fObject->IsReadyToSave() : kFALSE;
226}
227
228// --------------------------------------------------------------------------
229//
230// Print the name of the data member without an CR.
231//
232/*
233void MDataMember::Print(Option_t *opt) const
234{
235    *fLog << fName << flush;
236}
237*/
238
239// --------------------------------------------------------------------------
240//
241// Builds a rule which can be used in a MDataPhrase to describe this object
242//
243TString MDataMember::GetRule() const
244{
245    return fDataMember;
246}
247
248// --------------------------------------------------------------------------
249//
250// Returns the data member.
251// This is mainly used in MTask::AddToBranchList
252//
253TString MDataMember::GetDataMember() const
254{
255    return fDataMember;
256}
Note: See TracBrowser for help on using the repository browser.