LCIO  02.17
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Pages
lcevt.cc
Go to the documentation of this file.
1 #include "CPPFORT/lcevt.h"
2 
3 #include "lcio.h"
4 #include "IOIMPL/LCFactory.h"
5 #include "IMPL/LCRunHeaderImpl.h"
6 #include "IMPL/LCEventImpl.h"
7 #include "IMPL/LCCollectionVec.h"
8 #include "IMPL/LCTOOLS.h"
9 #include <iostream>
10 
11 
12 using namespace lcio ;
13 
14 
16  LCEventImpl* event = new LCEventImpl() ;
17  return reinterpret_cast<PTRTYPE>( event ) ;
18 }
19 
21  LCEventImpl* evt = reinterpret_cast<LCEventImpl*>(event) ;
22  delete evt ;
23  return LCIO::SUCCESS ;
24 }
25 
27  LCEventImpl* evt = reinterpret_cast<LCEventImpl*>(event) ;
28  return evt->getRunNumber() ;
29 }
30 
32  LCEventImpl* evt = reinterpret_cast<LCEventImpl*>(event) ;
33  return evt->getEventNumber() ;
34 }
35 
37  LCEventImpl* evt = reinterpret_cast<LCEventImpl*>(event) ;
38  return const_cast<char*> (evt->getDetectorName().c_str() ) ;
39 }
40 
42  LCEventImpl* evt = reinterpret_cast<LCEventImpl*>(event) ;
43  return reinterpret_cast<PTRTYPE> ( evt->getCollectionNames() ) ;
44 }
45 
46 // PTRTYPE lcevtgettrelationnames( PTRTYPE event ){
47 // LCEventImpl* evt = reinterpret_cast<LCEventImpl*>(event) ;
48 // return reinterpret_cast<PTRTYPE> ( evt->getRelationNames() ) ;
49 // }
50 
52 {
53  LCEventImpl* evt = reinterpret_cast<LCEventImpl*>(event) ;
54  return evt->getTimeStamp() ;
55 }
56 
57 PTRTYPE lcevtgetcollection(PTRTYPE event, const char* colname){
58  try{
59  LCEventImpl* evt = reinterpret_cast<LCEventImpl*>(event) ;
60  return reinterpret_cast<PTRTYPE>( evt->getCollection( colname ) ) ;
61  }catch(...){ return 0 ;}
62 }
63 
64 // PTRTYPE lcevtgetrelation(PTRTYPE event, const char* colname){
65 // try{
66 // LCEventImpl* evt = reinterpret_cast<LCEventImpl*>(event) ;
67 // return reinterpret_cast<PTRTYPE>( evt->getRelation( colname ) ) ;
68 // }catch(...){ return 0 ;}
69 // }
70 
71 int lcevtaddcollection( PTRTYPE event, PTRTYPE collection, char* colname ){
72  try{
73  LCEventImpl* evt = reinterpret_cast<LCEventImpl*>(event) ;
74  LCCollectionVec* col = reinterpret_cast<LCCollectionVec*>(collection) ;
75  evt->addCollection( col , colname ) ;
76  }catch(...){ return LCIO::ERROR ; }
77  return LCIO::SUCCESS ;
78 }
79 
80 int lcevtremovecollection( PTRTYPE event, char* colname ){
81  try{
82  LCEventImpl* evt = reinterpret_cast<LCEventImpl*>(event) ;
83  evt->removeCollection( colname ) ;
84  }catch(...){ return LCIO::ERROR ; }
85  return LCIO::SUCCESS ;
86 }
87 
88 // int lcevtaddrelation( PTRTYPE event, PTRTYPE relation, char* colname ){
89 // try{
90 // LCEventImpl* evt = reinterpret_cast<LCEventImpl*>(event) ;
91 // LCRelation* rel = reinterpret_cast<LCRelation*>(relation) ;
92 // evt->addRelation( rel , colname ) ;
93 // }catch(...){ return LCIO::ERROR ; }
94 // return LCIO::SUCCESS ;
95 // }
96 
97 // int lcevtremoverelation( PTRTYPE event, const char* colname ){
98 // try{
99 // LCEventImpl* evt = reinterpret_cast<LCEventImpl*>(event) ;
100 // evt->removeRelation( colname ) ;
101 // }catch(...){ return LCIO::ERROR ; }
102 // return LCIO::SUCCESS ;
103 // }
104 
106  LCEventImpl* evt = reinterpret_cast<LCEventImpl*>(event) ;
107  evt->setRunNumber( rn ) ;
108  return LCIO::SUCCESS ;
109 }
110 
112  LCEventImpl* evt = reinterpret_cast<LCEventImpl*>(event) ;
113  evt->setEventNumber( en ) ;
114  return LCIO::SUCCESS ;
115 }
116 
118  LCEventImpl* evt = reinterpret_cast<LCEventImpl*>(event) ;
119  evt->setDetectorName( dn ) ;
120  return LCIO::SUCCESS ;
121 }
122 
124  LCEventImpl* evt = reinterpret_cast<LCEventImpl*>(event) ;
125  evt->setTimeStamp( ts ) ;
126  return LCIO::SUCCESS ;
127 }
LCIO_DEPRECATED_CAPI PTRTYPE lcevtgetcollectionnames(PTRTYPE event)
Definition: lcevt.cc:41
LCIO_DEPRECATED_CAPI PTRTYPE lcevtgetcollection(PTRTYPE event, const char *colname)
Definition: lcevt.cc:57
LCIO_DEPRECATED_CAPI int lcevtsetdetectorname(PTRTYPE event, char *dn)
Definition: lcevt.cc:117
LCEvent * event
Definition: lsh.cc:80
LCIO_DEPRECATED_CAPI int lcevtgetrunnumber(PTRTYPE event)
Definition: lcevt.cc:26
LCIO_DEPRECATED_CAPI long lcevtgettimestamp(PTRTYPE event)
Definition: lcevt.cc:51
LCIO_DEPRECATED_CAPI int lcevtsetrunnumber(PTRTYPE event, int rn)
Definition: lcevt.cc:105
LCIO_DEPRECATED_CAPI int lcevtdelete(PTRTYPE event)
Definition: lcevt.cc:20
LCIO_DEPRECATED_CAPI int lcevtseteventnumber(PTRTYPE event, int en)
Definition: lcevt.cc:111
long PTRTYPE
Fortran interface - define the length of pointers this has to made machine independent ...
Definition: cpointer.h:12
LCIO_DEPRECATED_CAPI PTRTYPE lcevtcreate()
Header file for the f77-wrapper functions of the LCEventImpl class.
Definition: lcevt.cc:15
LCIO_DEPRECATED_CAPI int lcevtaddcollection(PTRTYPE event, PTRTYPE collection, char *colname)
Definition: lcevt.cc:71
LCIO_DEPRECATED_CAPI char * lcevtgetdetectorname(PTRTYPE event)
Definition: lcevt.cc:36
LCIO_DEPRECATED_CAPI int lcevtremovecollection(PTRTYPE event, char *name)
Definition: lcevt.cc:80
LCIO_DEPRECATED_CAPI int lcevtsettimestamp(PTRTYPE event, long ts)
Definition: lcevt.cc:123
LCIO_DEPRECATED_CAPI int lcevtgeteventnumber(PTRTYPE event)
Definition: lcevt.cc:31