techmodel/physics/TrackerReader.cpp

/** @file
 * $Source: /home/cvsmanager/yoda/techmodel/physics/TrackerReader.cpp,v $
 * $Id: TrackerReader.cpp,v 2.2 2004/12/22 11:39:16 kusanagi Exp $
 * $Author: kusanagi $
 * 
 * Implementation of the TrackerPhysicsReader class.
 */

#include <string>
#include <log4cxx/logger.h>
#include "TrackerReader.h"
#include "event/physics/tracker/TrackerEvent.h"
//#include <TArrayC.h>

extern "C" {
    //Passo il path verso la il file temporaneo
    extern void trkeventpkt_(int*, char*); 
    //Struct per il passaggio di dati da e verso la chiamata fortran
    extern struct {
      int good0;
      int nev0;
      int DAQmode[12];
      int DSPnumber[12];
      int DATAlength[12];
      int eventn[12];
      int nclust[12];
      int cutc[12];
      int cutcl[12];
      int addrcluster[12][3];
      int signcluster[12][3];
      int fc[12];
      int compressiontime[12];
      int fl5[12];
      int fl4[12];
      int fl3[12];
      int fl2[12];
      int fl1[12];
      int fl6[12];
      int pnum[12];
      int cmdnum[12];
      int bid[12];
      int alarm[12];
      int aswr[12];
      int TOTDATAlength;
      int datatracker[49152];
    } level0_; 
#include <dirent.h>
}

using namespace pamela;
using namespace pamela::tracker;

static log4cxx::LoggerPtr logger = log4cxx::Logger::getLogger(_T("pamela.techmodel.tracker.TrackerReader"));

/**
 * Constructor. 
 */
TrackerReader::TrackerReader(void): 
  TechmodelAlgorithm(PacketType::Physics, "TechmodelTrackerReader") { 
  logger->debug(_T("Constructor"));
  tracker = new TrackerEvent();
}

/**
 * Get a string with the version info of the algorithm.
 */
std::string TrackerReader::GetVersionInfo(void) const {
  return 
    "$Header: /home/cvsmanager/yoda/techmodel/physics/TrackerReader.cpp,v 2.2 2004/12/22 11:39:16 kusanagi Exp $";
}

/**
 * Initialize the algorithm with a special run. This will initialize the
 * event reader routines for all packet types.
 */
void TrackerReader::Init(PamelaRun *run) {
  logger->debug(_T("Initialize"));
  SetInputStream(run);
  run->WriteSubPacket(this, &tracker, tracker->Class());
}

/**
 * Unpack the orbital event from an input file.
 */
void TrackerReader::RunEvent(int EventNumber) {
  
}

/**
 * Unpack the Tracker data event from the physical packet.
 */
void TrackerReader::RunEvent(int EventNumber, const char subData[], long int length) {
    int       ERROR;
    
    //Scrivo un file temporaneo per passarlo alla routine
    //Speriamo di cambiare la routine per passargli un buffer.....
    //DIR *dirp;
    
    //std::string pathDir((char*)getenv("YODA_DATA"));
    
    //pathDir = pathDir + "/todatemp.dat";
    stringstream oss;
    oss.str("");
    oss << getenv("YODA_DATA") << "/" << time(NULL) << "trev.dat";
    FILE *pfile;
    pfile = fopen(oss.str().c_str(), "wb");
    fwrite(subData, 1, length, pfile);
    fclose(pfile);
    
    //Call to the FORTRAN routin that unpack tracker events
    trkeventpkt_(&ERROR, (char*)oss.str().c_str());
    
    remove(oss.str().c_str());

    /*if (ERROR != 0) {
        char *errmsg;
        switch (ERROR){
            case 1: errmsg = "---------------------";
        }
    } else {*/
    //Store the unpacked data
    memcpy(tracker->DAQmode, level0_.DAQmode, sizeof(tracker->DAQmode));
    memcpy(tracker->DSPnumber, level0_.DSPnumber, sizeof(tracker->DSPnumber));
    memcpy(tracker->DATAlength, level0_.DATAlength, sizeof(tracker->DATAlength));
    memcpy(tracker->eventn, level0_.eventn, sizeof(tracker->eventn));
    memcpy(tracker->nclust, level0_.nclust, sizeof(tracker->nclust));
    memcpy(tracker->cutc, level0_.cutc, sizeof(tracker->cutc));
    memcpy(tracker->cutcl, level0_.cutcl, sizeof(tracker->cutcl));
//    memcpy(tracker->addrcluster, (level0_.addrcluster), sizeof(tracker->addrcluster));
//    memcpy(tracker->signcluster, (level0_.signcluster), sizeof(tracker->signcluster));
//--------have to invert array because of FORTRAN <-> C different management of the indexes
    int tempAddr[3][12];
    int tempSign[3][12];
    memcpy(tempAddr, (level0_.addrcluster), sizeof(tempAddr));
    memcpy(tempSign, (level0_.signcluster), sizeof(tempSign));
    for (int j = 0; j < 11; j++){
        for (int i = 0; i < 2; i++){
            tracker->addrcluster[j][i] = tempAddr[i][j];
            tracker->signcluster[j][i] = tempSign[i][j];
        }
    }
//-----------------------------------------------------------------------------------------
    
    memcpy(tracker->fc, level0_.fc, sizeof(tracker->fc));
    memcpy(tracker->compressiontime, level0_.compressiontime, sizeof(tracker->compressiontime));
    memcpy(tracker->fl1, level0_.fl1, sizeof(tracker->fl1));
    memcpy(tracker->fl2, level0_.fl2, sizeof(tracker->fl2));
    memcpy(tracker->fl3, level0_.fl3, sizeof(tracker->fl3));
    memcpy(tracker->fl4, level0_.fl4, sizeof(tracker->fl4));
    memcpy(tracker->fl5, level0_.fl5, sizeof(tracker->fl5));
    memcpy(tracker->fl6, level0_.fl6, sizeof(tracker->fl6));
    memcpy(tracker->pnum, level0_.pnum, sizeof(tracker->pnum));
    memcpy(tracker->cmdnum, level0_.cmdnum, sizeof(tracker->cmdnum));    
    memcpy(tracker->bid, level0_.bid, sizeof(tracker->bid));    
    memcpy(tracker->alarm, level0_.alarm, sizeof(tracker->alarm));    
    memcpy(tracker->aswr, level0_.aswr, sizeof(tracker->aswr));          
    tracker->TOTDATAlength = level0_.TOTDATAlength;

    tracker->TrackerData  = new TArrayI(level0_.TOTDATAlength, level0_.datatracker);
    //memcpy(tracker->datatracker, level0_.datatracker, sizeof(tracker->datatracker));          
    //}
    
}
1	/** @file
2	* $Source: /home/cvsmanager/yoda/techmodel/physics/TrackerReader.cpp,v $
3	* $Id: TrackerReader.cpp,v 2.2 2004/12/22 11:39:16 kusanagi Exp $
4	* $Author: kusanagi $
5	*
6	* Implementation of the TrackerPhysicsReader class.
7	*/
8
9	#include <string>
10	#include <log4cxx/logger.h>
11	#include "TrackerReader.h"
12	#include "event/physics/tracker/TrackerEvent.h"
13	//#include <TArrayC.h>
14
15	extern "C" {
16	//Passo il path verso la il file temporaneo
17	extern void trkeventpkt_(int, char);
18	//Struct per il passaggio di dati da e verso la chiamata fortran
19	extern struct {
20	int good0;
21	int nev0;
22	int DAQmode[12];
23	int DSPnumber[12];
24	int DATAlength[12];
25	int eventn[12];
26	int nclust[12];
27	int cutc[12];
28	int cutcl[12];
29	int addrcluster[12][3];
30	int signcluster[12][3];
31	int fc[12];
32	int compressiontime[12];
33	int fl5[12];
34	int fl4[12];
35	int fl3[12];
36	int fl2[12];
37	int fl1[12];
38	int fl6[12];
39	int pnum[12];
40	int cmdnum[12];
41	int bid[12];
42	int alarm[12];
43	int aswr[12];
44	int TOTDATAlength;
45	int datatracker[49152];
46	} level0_;
47	#include <dirent.h>
48	}
49
50	using namespace pamela;
51	using namespace pamela::tracker;
52
53	static log4cxx::LoggerPtr logger = log4cxx::Logger::getLogger(_T("pamela.techmodel.tracker.TrackerReader"));
54
55	/**
56	* Constructor.
57	*/
58	TrackerReader::TrackerReader(void):
59	TechmodelAlgorithm(PacketType::Physics, "TechmodelTrackerReader") {
60	logger->debug(_T("Constructor"));
61	tracker = new TrackerEvent();
62	}
63
64	/**
65	* Get a string with the version info of the algorithm.
66	*/
67	std::string TrackerReader::GetVersionInfo(void) const {
68	return
69	"$Header: /home/cvsmanager/yoda/techmodel/physics/TrackerReader.cpp,v 2.2 2004/12/22 11:39:16 kusanagi Exp $";
70	}
71
72	/**
73	* Initialize the algorithm with a special run. This will initialize the
74	* event reader routines for all packet types.
75	*/
76	void TrackerReader::Init(PamelaRun *run) {
77	logger->debug(_T("Initialize"));
78	SetInputStream(run);
79	run->WriteSubPacket(this, &tracker, tracker->Class());
80	}
81
82	/**
83	* Unpack the orbital event from an input file.
84	*/
85	void TrackerReader::RunEvent(int EventNumber) {
86
87	}
88
89	/**
90	* Unpack the Tracker data event from the physical packet.
91	*/
92	void TrackerReader::RunEvent(int EventNumber, const char subData[], long int length) {
93	int ERROR;
94
95	//Scrivo un file temporaneo per passarlo alla routine
96	//Speriamo di cambiare la routine per passargli un buffer.....
97	//DIR *dirp;
98
99	//std::string pathDir((char*)getenv("YODA_DATA"));
100
101	//pathDir = pathDir + "/todatemp.dat";
102	stringstream oss;
103	oss.str("");
104	oss << getenv("YODA_DATA") << "/" << time(NULL) << "trev.dat";
105	FILE *pfile;
106	pfile = fopen(oss.str().c_str(), "wb");
107	fwrite(subData, 1, length, pfile);
108	fclose(pfile);
109
110	//Call to the FORTRAN routin that unpack tracker events
111	trkeventpkt_(&ERROR, (char*)oss.str().c_str());
112
113	remove(oss.str().c_str());
114
115	/*if (ERROR != 0) {
116	char *errmsg;
117	switch (ERROR){
118	case 1: errmsg = "---------------------";
119	}
120	} else {*/
121	//Store the unpacked data
122	memcpy(tracker->DAQmode, level0_.DAQmode, sizeof(tracker->DAQmode));
123	memcpy(tracker->DSPnumber, level0_.DSPnumber, sizeof(tracker->DSPnumber));
124	memcpy(tracker->DATAlength, level0_.DATAlength, sizeof(tracker->DATAlength));
125	memcpy(tracker->eventn, level0_.eventn, sizeof(tracker->eventn));
126	memcpy(tracker->nclust, level0_.nclust, sizeof(tracker->nclust));
127	memcpy(tracker->cutc, level0_.cutc, sizeof(tracker->cutc));
128	memcpy(tracker->cutcl, level0_.cutcl, sizeof(tracker->cutcl));
129	// memcpy(tracker->addrcluster, (level0_.addrcluster), sizeof(tracker->addrcluster));
130	// memcpy(tracker->signcluster, (level0_.signcluster), sizeof(tracker->signcluster));
131	//--------have to invert array because of FORTRAN <-> C different management of the indexes
132	int tempAddr[3][12];
133	int tempSign[3][12];
134	memcpy(tempAddr, (level0_.addrcluster), sizeof(tempAddr));
135	memcpy(tempSign, (level0_.signcluster), sizeof(tempSign));
136	for (int j = 0; j < 11; j++){
137	for (int i = 0; i < 2; i++){
138	tracker->addrcluster[j][i] = tempAddr[i][j];
139	tracker->signcluster[j][i] = tempSign[i][j];
140	}
141	}
142	//-----------------------------------------------------------------------------------------
143
144	memcpy(tracker->fc, level0_.fc, sizeof(tracker->fc));
145	memcpy(tracker->compressiontime, level0_.compressiontime, sizeof(tracker->compressiontime));
146	memcpy(tracker->fl1, level0_.fl1, sizeof(tracker->fl1));
147	memcpy(tracker->fl2, level0_.fl2, sizeof(tracker->fl2));
148	memcpy(tracker->fl3, level0_.fl3, sizeof(tracker->fl3));
149	memcpy(tracker->fl4, level0_.fl4, sizeof(tracker->fl4));
150	memcpy(tracker->fl5, level0_.fl5, sizeof(tracker->fl5));
151	memcpy(tracker->fl6, level0_.fl6, sizeof(tracker->fl6));
152	memcpy(tracker->pnum, level0_.pnum, sizeof(tracker->pnum));
153	memcpy(tracker->cmdnum, level0_.cmdnum, sizeof(tracker->cmdnum));
154	memcpy(tracker->bid, level0_.bid, sizeof(tracker->bid));
155	memcpy(tracker->alarm, level0_.alarm, sizeof(tracker->alarm));
156	memcpy(tracker->aswr, level0_.aswr, sizeof(tracker->aswr));
157	tracker->TOTDATAlength = level0_.TOTDATAlength;
158
159	tracker->TrackerData = new TArrayI(level0_.TOTDATAlength, level0_.datatracker);
160	//memcpy(tracker->datatracker, level0_.datatracker, sizeof(tracker->datatracker));
161	//}
162
163	}