Logo ROOT  
Reference Guide
TLeafL.cxx
Go to the documentation of this file.
1 // @(#)root/tree:$Id$
2 // Author: Rene Brun 12/01/96
3 
4 /*************************************************************************
5  * Copyright (C) 1995-2000, Rene Brun and Fons Rademakers. *
6  * All rights reserved. *
7  * *
8  * For the licensing terms see $ROOTSYS/LICENSE. *
9  * For the list of contributors see $ROOTSYS/README/CREDITS. *
10  *************************************************************************/
11 
12 /** \class TLeafL
13 \ingroup tree
14 
15 A TLeaf for a 64 bit Integer data type.
16 */
17 
18 #include "TLeafL.h"
19 #include "TBranch.h"
20 #include "TBuffer.h"
21 #include "TClonesArray.h"
22 #include <iostream>
23 
25 
26 ////////////////////////////////////////////////////////////////////////////////
27 /// Default constructor for LeafL.
28 
30 {
31  fLenType = sizeof(Long64_t);
32  fMinimum = 0;
33  fMaximum = 0;
34  fValue = 0;
35  fPointer = 0;
36 }
37 
38 ////////////////////////////////////////////////////////////////////////////////
39 /// Create a LeafL.
40 
41 TLeafL::TLeafL(TBranch *parent, const char *name, const char *type)
42  :TLeaf(parent, name,type)
43 {
44  fLenType = sizeof(Long64_t);
45  fMinimum = 0;
46  fMaximum = 0;
47  fValue = 0;
48  fPointer = 0;
49 }
50 
51 ////////////////////////////////////////////////////////////////////////////////
52 /// Default destructor for a LeafL.
53 
55 {
56  if (ResetAddress(0,kTRUE)) delete [] fValue;
57 }
58 
59 ////////////////////////////////////////////////////////////////////////////////
60 /// Export element from local leaf buffer to ClonesArray.
61 
63 {
64  Long64_t *value = fValue;
65  for (Int_t i=0;i<n;i++) {
66  char *first = (char*)list->UncheckedAt(i);
67  Long64_t *ii = (Long64_t*)&first[fOffset];
68  for (Int_t j=0;j<fLen;j++) {
69  ii[j] = value[j];
70  }
71  value += fLen;
72  }
73 }
74 
75 ////////////////////////////////////////////////////////////////////////////////
76 /// Pack leaf elements in Basket output buffer.
77 
79 {
80  Int_t i;
81  Int_t len = GetLen();
82  if (fPointer) fValue = *fPointer;
83  if (IsRange()) {
84  if (fValue[0] > fMaximum) fMaximum = fValue[0];
85  }
86  if (IsUnsigned()) {
87  for (i=0;i<len;i++) b << (ULong64_t)fValue[i];
88  } else {
89  b.WriteFastArray(fValue,len);
90  }
91 }
92 
93 ////////////////////////////////////////////////////////////////////////////////
94 /// Returns name of leaf type.
95 
96 const char *TLeafL::GetTypeName() const
97 {
98  if (fIsUnsigned) return "ULong64_t";
99  return "Long64_t";
100 }
101 
102 ////////////////////////////////////////////////////////////////////////////////
103 /// Returns current value of leaf.
104 /// - if leaf is a simple type, i must be set to 0
105 /// - if leaf is an array, i is the array element number to be returned
106 
108 {
109  if (fIsUnsigned) return (Double_t)((ULong64_t)fValue[i]);
110  return fValue[i];
111 }
112 
113 ////////////////////////////////////////////////////////////////////////////////
114 /// Returns current value of leaf
115 /// - if leaf is a simple type, i must be set to 0
116 /// - if leaf is an array, i is the array element number to be returned
117 
119 {
120  if (fIsUnsigned) return (LongDouble_t)((ULong64_t)fValue[i]);
121  return fValue[i];
122 }
123 
124 ////////////////////////////////////////////////////////////////////////////////
125 /// Copy/set fMinimum and fMaximum to include/be wide than those of the parameter
126 
128 {
129  if (input) {
130  if (input->GetMaximum() > this->GetMaximum())
131  this->SetMaximum( input->GetMaximum() );
132  if (input->GetMinimum() < this->GetMinimum())
133  this->SetMinimum( input->GetMinimum() );
134  return kTRUE;
135  } else {
136  return kFALSE;
137  }
138 }
139 
140 ////////////////////////////////////////////////////////////////////////////////
141 /// Import element from ClonesArray into local leaf buffer.
142 
144 {
145  const Int_t kIntUndefined = -9999;
146  Int_t j = 0;
147  char *clone;
148  for (Int_t i=0;i<n;i++) {
149  clone = (char*)list->UncheckedAt(i);
150  if (clone) memcpy(&fValue[j],clone + fOffset, 8*fLen);
151  else memcpy(&fValue[j],&kIntUndefined, 8*fLen);
152  j += fLen;
153  }
154 }
155 
156 ////////////////////////////////////////////////////////////////////////////////
157 /// Prints leaf value.
158 
160 {
161  if (fIsUnsigned) {
162  ULong64_t *uvalue = (ULong64_t*)GetValuePointer();
163  printf("%llu",uvalue[l]);
164  } else {
165  Long64_t *value = (Long64_t*)GetValuePointer();
166  printf("%lld",value[l]);
167  }
168 }
169 
170 ////////////////////////////////////////////////////////////////////////////////
171 /// Read leaf elements from Basket input buffer.
172 
174 {
175  if (!fLeafCount && fNdata == 1) {
176  b.ReadLong64(fValue[0]);
177  } else {
178  if (fLeafCount) {
179  Long64_t entry = fBranch->GetReadEntry();
180  if (fLeafCount->GetBranch()->GetReadEntry() != entry) {
181  fLeafCount->GetBranch()->GetEntry(entry);
182  }
183  Int_t len = Int_t(fLeafCount->GetValue());
184  if (len > fLeafCount->GetMaximum()) {
185  printf("ERROR leaf:%s, len=%d and max=%d\n",GetName(),len,fLeafCount->GetMaximum());
186  len = fLeafCount->GetMaximum();
187  }
188  fNdata = len*fLen;
189  b.ReadFastArray(fValue,len*fLen);
190  } else {
191  b.ReadFastArray(fValue,fLen);
192  }
193  }
194 }
195 
196 ////////////////////////////////////////////////////////////////////////////////
197 /// Deserialize input by performing byteswap as needed.
199 {
200  if (R__unlikely(fLeafCount)) {return false;}
201  return input_buf.ByteSwapBuffer(fLen*N, kLong64_t);
202 }
203 
204 ////////////////////////////////////////////////////////////////////////////////
205 /// Read leaf elements from Basket input buffer and export buffer to
206 /// TClonesArray objects.
207 
209 {
210  if (n*fLen == 1) {
211  b >> fValue[0];
212  } else {
213  b.ReadFastArray(fValue,n*fLen);
214  }
215  Long64_t *value = fValue;
216  for (Int_t i=0;i<n;i++) {
217  char *first = (char*)list->UncheckedAt(i);
218  Long64_t *ii = (Long64_t*)&first[fOffset];
219  for (Int_t j=0;j<fLen;j++) {
220  ii[j] = value[j];
221  }
222  value += fLen;
223  }
224 }
225 
226 ////////////////////////////////////////////////////////////////////////////////
227 /// Read a long integer from std::istream s and store it into the branch buffer.
228 
229 void TLeafL::ReadValue(std::istream &s, Char_t /*delim = ' '*/)
230 {
231 #if defined(_MSC_VER) && (_MSC_VER<1300)
232  printf("Due to a bug in VC++6, the function TLeafL::ReadValue is dummy\n");
233 #else
234  if (fIsUnsigned) {
235  ULong64_t *uvalue = (ULong64_t*)GetValuePointer();
236  for (Int_t i=0;i<fLen;i++) s >> uvalue[i];
237  } else {
238  Long64_t *value = (Long64_t*)GetValuePointer();
239  for (Int_t i=0;i<fLen;i++) s >> value[i];
240  }
241 #endif
242 }
243 
244 ////////////////////////////////////////////////////////////////////////////////
245 /// Set leaf buffer data address.
246 
247 void TLeafL::SetAddress(void *add)
248 {
249  if (ResetAddress(add) && (add!=fValue)) {
250  delete [] fValue;
251  }
252  if (add) {
253  if (TestBit(kIndirectAddress)) {
254  fPointer = (Long64_t**) add;
255  Int_t ncountmax = fLen;
256  if (fLeafCount) ncountmax = fLen*(fLeafCount->GetMaximum() + 1);
257  if ((fLeafCount && ncountmax > Int_t(fLeafCount->GetValue())) ||
258  ncountmax > fNdata || *fPointer == 0) {
259  if (*fPointer) delete [] *fPointer;
260  if (ncountmax > fNdata) fNdata = ncountmax;
261  *fPointer = new Long64_t[fNdata];
262  }
263  fValue = *fPointer;
264  } else {
265  fValue = (Long64_t*)add;
266  }
267  } else {
268  fValue = new Long64_t[fNdata];
269  fValue[0] = 0;
270  }
271 }
272 
TLeaf::IsUnsigned
virtual Bool_t IsUnsigned() const
Definition: TLeaf.h:149
l
auto * l
Definition: textangle.C:4
n
const Int_t n
Definition: legend1.C:16
TLeafL::TLeafL
TLeafL()
Default constructor for LeafL.
Definition: TLeafL.cxx:29
first
Definition: first.py:1
TLeafL
Definition: TLeafL.h:27
TLeafL::fMinimum
Long64_t fMinimum
Minimum value if leaf range is specified.
Definition: TLeafL.h:36
kTRUE
const Bool_t kTRUE
Definition: RtypesCore.h:91
TObject::TestBit
R__ALWAYS_INLINE Bool_t TestBit(UInt_t f) const
Definition: TObject.h:172
TLeafL.h
TLeafL::SetMinimum
virtual void SetMinimum(Long64_t min)
Definition: TLeafL.h:65
ClassImp
#define ClassImp(name)
Definition: Rtypes.h:364
TBranch.h
Long64_t
long long Long64_t
Definition: RtypesCore.h:73
TBranch::GetReadEntry
Long64_t GetReadEntry() const
Definition: TBranch.h:233
TGeant4Unit::s
static constexpr double s
Definition: TGeant4SystemOfUnits.h:168
Int_t
int Int_t
Definition: RtypesCore.h:45
N
#define N
TLeaf::GetValue
virtual Double_t GetValue(Int_t i=0) const
Definition: TLeaf.h:182
TLeafL::GetValueLongDouble
virtual LongDouble_t GetValueLongDouble(Int_t i=0) const
Returns current value of leaf.
Definition: TLeafL.cxx:118
TLeafL::fPointer
Long64_t ** fPointer
! Address of pointer to data buffer
Definition: TLeafL.h:39
TBuffer
Definition: TBuffer.h:43
TObjArray::UncheckedAt
TObject * UncheckedAt(Int_t i) const
Definition: TObjArray.h:90
TLeafL::Import
virtual void Import(TClonesArray *list, Int_t n)
Import element from ClonesArray into local leaf buffer.
Definition: TLeafL.cxx:143
b
#define b(i)
Definition: RSha256.hxx:118
bool
TClonesArray.h
TLeafL::fValue
Long64_t * fValue
! Pointer to data buffer
Definition: TLeafL.h:38
TLeaf::fLenType
Int_t fLenType
Number of bytes for this data type.
Definition: TLeaf.h:73
TBranch
Definition: TBranch.h:89
TBuffer.h
TLeaf
Definition: TLeaf.h:57
TLeaf::fLen
Int_t fLen
Number of fixed length elements in the leaf's data.
Definition: TLeaf.h:72
TLeafL::SetMaximum
virtual void SetMaximum(Long64_t max)
Definition: TLeafL.h:64
kFALSE
const Bool_t kFALSE
Definition: RtypesCore.h:92
TLeafL::~TLeafL
virtual ~TLeafL()
Default destructor for a LeafL.
Definition: TLeafL.cxx:54
TBranch::GetEntry
virtual Int_t GetEntry(Long64_t entry=0, Int_t getall=0)
Read all leaves of entry and return total number of bytes read.
Definition: TBranch.cxx:1582
R__unlikely
#define R__unlikely(expr)
Definition: RConfig.hxx:604
TLeaf::kIndirectAddress
@ kIndirectAddress
Data member is a pointer to an array of basic types.
Definition: TLeaf.h:95
TLeaf::IsRange
virtual Bool_t IsRange() const
Definition: TLeaf.h:148
TBuffer::ByteSwapBuffer
Bool_t ByteSwapBuffer(Long64_t n, EDataType type)
Byte-swap N primitive-elements in the buffer.
Definition: TBuffer.cxx:392
TLeafL::fMaximum
Long64_t fMaximum
Maximum value if leaf range is specified.
Definition: TLeafL.h:37
TLeafL::ReadBasketExport
virtual void ReadBasketExport(TBuffer &b, TClonesArray *list, Int_t n)
Read leaf elements from Basket input buffer and export buffer to TClonesArray objects.
Definition: TLeafL.cxx:208
TLeaf::fIsUnsigned
Bool_t fIsUnsigned
(=kTRUE if unsigned, kFALSE otherwise)
Definition: TLeaf.h:76
TLeafL::ReadBasketFast
virtual bool ReadBasketFast(TBuffer &, Long64_t)
Deserialize input by performing byteswap as needed.
Definition: TLeafL.cxx:198
TLeaf::ResetAddress
Int_t ResetAddress(void *add, Bool_t destructor=kFALSE)
Helper routine for TLeafX::SetAddress.
Definition: TLeaf.cxx:406
kLong64_t
@ kLong64_t
Definition: TDataType.h:38
TLeaf::fOffset
Int_t fOffset
Offset in ClonesArray object (if one)
Definition: TLeaf.h:74
TLeafL::GetValue
virtual Double_t GetValue(Int_t i=0) const
Returns current value of leaf.
Definition: TLeafL.cxx:107
TLeaf::fNdata
Int_t fNdata
! Number of elements in fAddress data buffer.
Definition: TLeaf.h:71
TLeaf::GetLen
virtual Int_t GetLen() const
Return the number of effective elements of this leaf, for the current entry.
Definition: TLeaf.cxx:381
TLeafL::PrintValue
virtual void PrintValue(Int_t i=0) const
Prints leaf value.
Definition: TLeafL.cxx:159
ULong64_t
unsigned long long ULong64_t
Definition: RtypesCore.h:74
TLeaf::GetBranch
TBranch * GetBranch() const
Definition: TLeaf.h:115
TLeafL::FillBasket
virtual void FillBasket(TBuffer &b)
Pack leaf elements in Basket output buffer.
Definition: TLeafL.cxx:78
TLeaf::GetMaximum
virtual Int_t GetMaximum() const
Definition: TLeaf.h:133
LongDouble_t
long double LongDouble_t
Definition: RtypesCore.h:61
Double_t
double Double_t
Definition: RtypesCore.h:59
TLeaf::GetMinimum
virtual Int_t GetMinimum() const
Definition: TLeaf.h:134
TLeafL::ReadValue
virtual void ReadValue(std::istream &s, Char_t delim=' ')
Read a long integer from std::istream s and store it into the branch buffer.
Definition: TLeafL.cxx:229
TLeafL::ReadBasket
virtual void ReadBasket(TBuffer &b)
Read leaf elements from Basket input buffer.
Definition: TLeafL.cxx:173
TLeafL::IncludeRange
virtual Bool_t IncludeRange(TLeaf *)
Copy/set fMinimum and fMaximum to include/be wide than those of the parameter.
Definition: TLeafL.cxx:127
name
char name[80]
Definition: TGX11.cxx:110
TLeaf::fLeafCount
TLeaf * fLeafCount
Pointer to Leaf count if variable length (we do not own the counter)
Definition: TLeaf.h:77
TLeafL::GetValuePointer
virtual void * GetValuePointer() const
Definition: TLeafL.h:54
TNamed::GetName
virtual const char * GetName() const
Returns name of object.
Definition: TNamed.h:53
TLeafL::Export
virtual void Export(TClonesArray *list, Int_t n)
Export element from local leaf buffer to ClonesArray.
Definition: TLeafL.cxx:62
type
int type
Definition: TGX11.cxx:121
TLeafL::SetAddress
virtual void SetAddress(void *add=0)
Set leaf buffer data address.
Definition: TLeafL.cxx:247
Char_t
char Char_t
Definition: RtypesCore.h:33
TLeafL::GetTypeName
const char * GetTypeName() const
Returns name of leaf type.
Definition: TLeafL.cxx:96
TClonesArray
Definition: TClonesArray.h:29
TLeaf::fBranch
TBranch * fBranch
! Pointer to supporting branch (we do not own the branch)
Definition: TLeaf.h:78
int