Logo ROOT  
Reference Guide
TLeafD.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 TLeafD
13 \ingroup tree
14 
15 A TLeaf for a 64 bit floating point data type.
16 */
17 
18 #include "TLeafD.h"
19 #include "TBranch.h"
20 #include "TBuffer.h"
21 #include "TClonesArray.h"
22 #include <iostream>
23 
25 
26 ////////////////////////////////////////////////////////////////////////////////
27 /// Default constructor for LeafD.
28 
30 {
31  fLenType = 8;
32  fMinimum = 0;
33  fMaximum = 0;
34  fValue = 0;
35  fPointer = 0;
36 }
37 
38 ////////////////////////////////////////////////////////////////////////////////
39 /// Create a LeafD.
40 
41 TLeafD::TLeafD(TBranch *parent, const char *name, const char *type)
42  :TLeaf(parent, name,type)
43 {
44  fLenType = 8;
45  fMinimum = 0;
46  fMaximum = 0;
47  fValue = 0;
48  fPointer = 0;
49 }
50 
51 ////////////////////////////////////////////////////////////////////////////////
52 /// Default destructor for a LeafD.
53 
55 {
56  if (ResetAddress(0,kTRUE)) delete [] fValue;
57 }
58 
59 ////////////////////////////////////////////////////////////////////////////////
60 /// Export element from local leaf buffer to ClonesArray.
61 
63 {
64  Int_t j = 0;
65  for (Int_t i=0;i<n;i++) {
66  memcpy((char*)list->UncheckedAt(i) + fOffset,&fValue[j], 8*fLen);
67  j += fLen;
68  }
69 }
70 
71 ////////////////////////////////////////////////////////////////////////////////
72 /// Pack leaf elements in Basket output buffer.
73 
75 {
76  Int_t len = GetLen();
77  if (fPointer) fValue = *fPointer;
78  b.WriteFastArray(fValue,len);
79 }
80 
81 ////////////////////////////////////////////////////////////////////////////////
82 /// Import element from ClonesArray into local leaf buffer.
83 
85 {
86  const Double_t kDoubleUndefined = -9999.;
87  Int_t j = 0;
88  char *clone;
89  for (Int_t i=0;i<n;i++) {
90  clone = (char*)list->UncheckedAt(i);
91  if (clone) memcpy(&fValue[j],clone + fOffset, 8*fLen);
92  else memcpy(&fValue[j],&kDoubleUndefined, 8*fLen);
93  j += fLen;
94  }
95 }
96 
97 ////////////////////////////////////////////////////////////////////////////////
98 /// Prints leaf value.
99 
101 {
102  Double_t *value = (Double_t *)GetValuePointer();
103  printf("%g",value[l]);
104 }
105 
106 ////////////////////////////////////////////////////////////////////////////////
107 /// Read leaf elements from Basket input buffer.
108 
110 {
111  if (!fLeafCount && fNdata == 1) {
112  b.ReadDouble(fValue[0]);
113  }else {
114  if (fLeafCount) {
115  Long64_t entry = fBranch->GetReadEntry();
116  if (fLeafCount->GetBranch()->GetReadEntry() != entry) {
117  fLeafCount->GetBranch()->GetEntry(entry);
118  }
119  Int_t len = Int_t(fLeafCount->GetValue());
120  if (len > fLeafCount->GetMaximum()) {
121  printf("ERROR leaf:%s, len=%d and max=%d\n",GetName(),len,fLeafCount->GetMaximum());
122  len = fLeafCount->GetMaximum();
123  }
124  fNdata = len*fLen;
125  b.ReadFastArray(fValue,len*fLen);
126  } else {
127  b.ReadFastArray(fValue,fLen);
128  }
129  }
130 }
131 
132 // Deserialize N events from an input buffer.
134  if (R__unlikely(fLeafCount)) { return false; }
135  return input_buf.ByteSwapBuffer(fLen*N, kDouble_t);
136 }
137 
138 ////////////////////////////////////////////////////////////////////////////////
139 /// Read leaf elements from Basket input buffer and export buffer to
140 /// TClonesArray objects.
141 
143 {
144  b.ReadFastArray(fValue,n*fLen);
145 
146  Int_t j = 0;
147  for (Int_t i=0;i<n;i++) {
148  memcpy((char*)list->UncheckedAt(i) + fOffset,&fValue[j], 8*fLen);
149  j += fLen;
150  }
151 }
152 
153 ////////////////////////////////////////////////////////////////////////////////
154 /// Read a double from std::istream s and store it into the branch buffer.
155 
156 void TLeafD::ReadValue(std::istream &s, Char_t /*delim = ' '*/)
157 {
158  Double_t *value = (Double_t*)GetValuePointer();
159  for (Int_t i=0;i<fLen;i++) s >> value[i];
160 }
161 
162 ////////////////////////////////////////////////////////////////////////////////
163 /// Set leaf buffer data address.
164 
165 void TLeafD::SetAddress(void *add)
166 {
167  if (ResetAddress(add) && (add!= fValue)) {
168  delete [] fValue;
169  }
170  if (add) {
171  if (TestBit(kIndirectAddress)) {
172  fPointer = (Double_t**) add;
173  Int_t ncountmax = fLen;
174  if (fLeafCount) ncountmax = fLen*(fLeafCount->GetMaximum() + 1);
175  if ((fLeafCount && ncountmax > Int_t(fLeafCount->GetValue())) ||
176  ncountmax > fNdata || *fPointer == 0) {
177  if (*fPointer) delete [] *fPointer;
178  if (ncountmax > fNdata) fNdata = ncountmax;
179  *fPointer = new Double_t[fNdata];
180  }
181  fValue = *fPointer;
182  } else {
183  fValue = (Double_t*)add;
184  }
185  } else {
186  fValue = new Double_t[fNdata];
187  fValue[0] = 0;
188  }
189 }
TLeafD::fPointer
Double_t ** fPointer
! Address of pointer to data buffer
Definition: TLeafD.h:38
l
auto * l
Definition: textangle.C:4
kDouble_t
@ kDouble_t
Definition: TDataType.h:37
n
const Int_t n
Definition: legend1.C:16
TLeafD::ReadValue
virtual void ReadValue(std::istream &s, Char_t delim=' ')
Read a double from std::istream s and store it into the branch buffer.
Definition: TLeafD.cxx:156
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
TLeafD::FillBasket
virtual void FillBasket(TBuffer &b)
Pack leaf elements in Basket output buffer.
Definition: TLeafD.cxx:74
ClassImp
#define ClassImp(name)
Definition: Rtypes.h:364
TBranch.h
TLeafD::SetAddress
virtual void SetAddress(void *add=0)
Set leaf buffer data address.
Definition: TLeafD.cxx:165
Long64_t
long long Long64_t
Definition: RtypesCore.h:73
TBranch::GetReadEntry
Long64_t GetReadEntry() const
Definition: TBranch.h:233
TLeafD
Definition: TLeafD.h:26
TGeant4Unit::s
static constexpr double s
Definition: TGeant4SystemOfUnits.h:168
Int_t
int Int_t
Definition: RtypesCore.h:45
N
#define N
TLeafD::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: TLeafD.cxx:142
TLeaf::GetValue
virtual Double_t GetValue(Int_t i=0) const
Definition: TLeaf.h:182
TLeafD.h
TBuffer
Definition: TBuffer.h:43
TObjArray::UncheckedAt
TObject * UncheckedAt(Int_t i) const
Definition: TObjArray.h:90
b
#define b(i)
Definition: RSha256.hxx:118
TClonesArray.h
TLeafD::Import
virtual void Import(TClonesArray *list, Int_t n)
Import element from ClonesArray into local leaf buffer.
Definition: TLeafD.cxx:84
TLeafD::fValue
Double_t * fValue
! Pointer to data buffer
Definition: TLeafD.h:37
TLeaf::fLenType
Int_t fLenType
Number of bytes for this data type.
Definition: TLeaf.h:73
TBranch
Definition: TBranch.h:89
TLeafD::GetValuePointer
virtual void * GetValuePointer() const
Definition: TLeafD.h:50
TBuffer.h
TLeaf
Definition: TLeaf.h:57
TLeafD::fMinimum
Double_t fMinimum
Minimum value if leaf range is specified.
Definition: TLeafD.h:35
TLeaf::fLen
Int_t fLen
Number of fixed length elements in the leaf's data.
Definition: TLeaf.h:72
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
TBuffer::ByteSwapBuffer
Bool_t ByteSwapBuffer(Long64_t n, EDataType type)
Byte-swap N primitive-elements in the buffer.
Definition: TBuffer.cxx:392
TLeaf::ResetAddress
Int_t ResetAddress(void *add, Bool_t destructor=kFALSE)
Helper routine for TLeafX::SetAddress.
Definition: TLeaf.cxx:406
TLeaf::fOffset
Int_t fOffset
Offset in ClonesArray object (if one)
Definition: TLeaf.h:74
TLeafD::~TLeafD
virtual ~TLeafD()
Default destructor for a LeafD.
Definition: TLeafD.cxx:54
TLeaf::fNdata
Int_t fNdata
! Number of elements in fAddress data buffer.
Definition: TLeaf.h:71
TLeafD::fMaximum
Double_t fMaximum
Maximum value if leaf range is specified.
Definition: TLeafD.h:36
TLeaf::GetLen
virtual Int_t GetLen() const
Return the number of effective elements of this leaf, for the current entry.
Definition: TLeaf.cxx:381
TLeaf::GetBranch
TBranch * GetBranch() const
Definition: TLeaf.h:115
TLeaf::GetMaximum
virtual Int_t GetMaximum() const
Definition: TLeaf.h:133
Double_t
double Double_t
Definition: RtypesCore.h:59
TLeafD::TLeafD
TLeafD()
Default constructor for LeafD.
Definition: TLeafD.cxx:29
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
TLeafD::ReadBasketFast
virtual bool ReadBasketFast(TBuffer &, Long64_t)
Definition: TLeafD.cxx:133
TNamed::GetName
virtual const char * GetName() const
Returns name of object.
Definition: TNamed.h:53
TLeafD::ReadBasket
virtual void ReadBasket(TBuffer &b)
Read leaf elements from Basket input buffer.
Definition: TLeafD.cxx:109
type
int type
Definition: TGX11.cxx:121
TLeafD::Export
virtual void Export(TClonesArray *list, Int_t n)
Export element from local leaf buffer to ClonesArray.
Definition: TLeafD.cxx:62
Char_t
char Char_t
Definition: RtypesCore.h:33
TClonesArray
Definition: TClonesArray.h:29
TLeaf::fBranch
TBranch * fBranch
! Pointer to supporting branch (we do not own the branch)
Definition: TLeaf.h:78
TLeafD::PrintValue
virtual void PrintValue(Int_t i=0) const
Prints leaf value.
Definition: TLeafD.cxx:100
int