OrbitalInfo/src/OrbitalInfo.cpp

#include <OrbitalInfo.h>

using namespace std;

ClassImp(OrbitalInfoTrkVar);
ClassImp(OrbitalInfo);

OrbitalInfoTrkVar::OrbitalInfoTrkVar(){
  this->Clear();
}

void OrbitalInfoTrkVar::Clear(Option_t *t){
  trkseqno = 0;
  pitch = -1000.;
}


OrbitalInfo::OrbitalInfo(){
  OrbitalInfoTrk = 0; //ELENA
  this->Clear();
}

void OrbitalInfo::Delete(Option_t *t){ //ELENA
  //
  if(OrbitalInfoTrk){ 
    OrbitalInfoTrk->Delete(); //ELENA
    delete OrbitalInfoTrk;  //ELENA
  }
  // 
}; //ELENA

void OrbitalInfo::Set(){//ELENA
  if ( !OrbitalInfoTrk ) OrbitalInfoTrk = new TClonesArray("OrbitalInfoTrkVar",2); //ELENA
}//ELENA


void OrbitalInfo::Clear(Option_t *t){
  //
  if ( OrbitalInfoTrk ) OrbitalInfoTrk->Delete();
  //
  absTime = 0;
  OBT = 0;
  pkt_num = 0;

  lon = -1000.;
  lat = -1000.;
  alt = -1000.;

  Bnorth = -1000.;
  Beast = -1000.;
  Bdown = -1000.;
  Babs = -1000.;
  BB0 = -1000.;
  L = -1000.;

  londip = -1000.;
  latdip = -1000.;
  altdip = -1000.;

  loncgm = -1000.;
  latcgm = -1000.;
  altcgm = -1000.;

  loncbm = -1000.;
  latcbm = -1000.;
  altcbm = -1000.;

  std::fill_n(cutoff, 20, 0.);

  // Quaternions
  q0 = -1000.;
  q1 = -1000.;
  q2 = -1000.;
  q3 = -1000.;

  // Euler angles (nadir reference frame)
  theta = -1000.;
  phi = -1000.;
  etha = -1000.;

  // Euler angles (local field reference frame)
  //  thetamag = -1000.;
  //  phimag = -1000.;
  //  ethamag = -1000.;

  pamzenitangle = -1000.;
  pamBangle = -1000.;


  mode = 0;
  //  std::fill_n(goodAttitude, 5, 0);
}

/**
 * Fills a struct cOrbitalInfo with values from a OrbitalInfo object (to put data into a F77 common).
 */
void OrbitalInfo::GetLevel2Struct(cOrbitalInfo *l2) const{
  l2->abstime  = absTime;
  l2->obt      = OBT;
  l2->pkt_num  = pkt_num;

  l2->lon = lon;
  l2->lat = lat;
  l2->alt = alt;

  l2->Bnorth = Bnorth;
  l2->Beast = Beast;
  l2->Bdown = Bdown;
  l2->Babs = Babs;
  l2->BB0 = BB0;
  l2->L = L;

  l2->londip = londip;
  l2->latdip = latdip;
  l2->altdip = altdip;

  l2->loncgm = loncgm;
  l2->latcgm = latcgm;
  l2->altcgm = altcgm;

  l2->loncbm = loncbm;
  l2->latcbm = latcbm;
  l2->altcbm = altcbm;

  memcpy(l2->cutoff, cutoff, sizeof(cutoff));

  // Quaternions
  l2->q0 = q0;
  l2->q1 = q1;
  l2->q2 = q2;
  l2->q3 = q3;

  // Euler angles (nadir reference frame)
  l2->theta = theta;
  l2->phi = phi;
  l2->etha = etha;

  l2->mode = mode;
  // Euler angles (local field reference frame)
//   l2->thetamag = thetamag;
//   l2->phimag = phimag;
//   l2->ethamag = ethamag;

//   memcpy(l2->goodAttitude, goodAttitude, sizeof(goodAttitude));
}

void OrbitalInfo::SetFromLevel2Struct(cOrbitalInfo *l2){
  absTime  = l2->abstime;
  OBT      = l2->obt;
  pkt_num  = l2->pkt_num;

  lon = l2->lon;
  lat = l2->lat;
  alt = l2->alt;

  l2->Bnorth = Bnorth;
  l2->Beast = Beast;
  l2->Bdown = Bdown;
  l2->Babs = Babs;
  BB0 = l2->BB0;
  L = l2->L;

  londip = l2->londip;
  latdip = l2->latdip;
  altdip = l2->altdip;

  loncgm = l2->loncgm;
  latcgm = l2->latcgm;
  altcgm = l2->altcgm;

  loncbm = l2->loncbm;
  latcbm = l2->latcbm;
  altcbm = l2->altcbm;

  memcpy(cutoff, l2->cutoff, sizeof(l2->cutoff));

  // Quaternions
  q0 = l2->q0;
  q1 = l2->q1;
  q2 = l2->q2;
  q3 = l2->q3;

  // Euler angles (nadir reference frame)
  theta = l2->theta;
  phi = l2->phi;
  etha = l2->etha;

  mode = l2->mode;
  // Euler angles (local field reference frame)
//   thetamag = l2->thetamag;
//   phimag = l2->phimag;
//   ethamag = l2->ethamag;

//   memcpy(goodAttitude, l2->goodAttitude, sizeof(l2->goodAttitude));
}

1	mocchiut	1.1	#include <OrbitalInfo.h>
2
3	mocchiut	1.11	using namespace std;
4	pam-rm2	1.6
5	mocchiut	1.11	ClassImp(OrbitalInfoTrkVar);
6			ClassImp(OrbitalInfo);
7	pam-rm2	1.6
8	mocchiut	1.11	OrbitalInfoTrkVar::OrbitalInfoTrkVar(){
9			this->Clear();
10			}
11	pam-rm2	1.6
12	mocchiut	1.11	void OrbitalInfoTrkVar::Clear(Option_t *t){
13			trkseqno = 0;
14			pitch = -1000.;
15			}
16	pam-rm2	1.6
17
18	mocchiut	1.11	OrbitalInfo::OrbitalInfo(){
19			OrbitalInfoTrk = 0; //ELENA
20			this->Clear();
21			}
22	pam-rm2	1.6
23	mocchiut	1.11	void OrbitalInfo::Delete(Option_t *t){ //ELENA
24			//
25			if(OrbitalInfoTrk){
26			OrbitalInfoTrk->Delete(); //ELENA
27			delete OrbitalInfoTrk; //ELENA
28			}
29			//
30			}; //ELENA
31
32			void OrbitalInfo::Set(){//ELENA
33			if ( !OrbitalInfoTrk ) OrbitalInfoTrk = new TClonesArray("OrbitalInfoTrkVar",2); //ELENA
34			}//ELENA
35	mocchiut	1.1
36
37	mocchiut	1.10	void OrbitalInfo::Clear(Option_t *t){
38	mocchiut	1.11	//
39			if ( OrbitalInfoTrk ) OrbitalInfoTrk->Delete();
40			//
41	mocchiut	1.5	absTime = 0;
42			OBT = 0;
43			pkt_num = 0;
44	pam-rm2	1.6
45			lon = -1000.;
46			lat = -1000.;
47			alt = -1000.;
48
49			Bnorth = -1000.;
50			Beast = -1000.;
51			Bdown = -1000.;
52			Babs = -1000.;
53			BB0 = -1000.;
54			L = -1000.;
55
56			londip = -1000.;
57			latdip = -1000.;
58			altdip = -1000.;
59
60			loncgm = -1000.;
61			latcgm = -1000.;
62			altcgm = -1000.;
63
64			loncbm = -1000.;
65			latcbm = -1000.;
66			altcbm = -1000.;
67
68			std::fill_n(cutoff, 20, 0.);
69
70			// Quaternions
71			q0 = -1000.;
72			q1 = -1000.;
73			q2 = -1000.;
74			q3 = -1000.;
75
76			// Euler angles (nadir reference frame)
77	mocchiut	1.8	theta = -1000.;
78			phi = -1000.;
79			etha = -1000.;
80	pam-rm2	1.6
81			// Euler angles (local field reference frame)
82	mocchiut	1.9	// thetamag = -1000.;
83			// phimag = -1000.;
84			// ethamag = -1000.;
85	pam-rm2	1.6
86	mocchiut	1.11	pamzenitangle = -1000.;
87			pamBangle = -1000.;
88
89
90	mocchiut	1.9	mode = 0;
91			// std::fill_n(goodAttitude, 5, 0);
92	mocchiut	1.3	}
93
94	pam-fi	1.4	/**
95			* Fills a struct cOrbitalInfo with values from a OrbitalInfo object (to put data into a F77 common).
96			*/
97			void OrbitalInfo::GetLevel2Struct(cOrbitalInfo *l2) const{
98			l2->abstime = absTime;
99			l2->obt = OBT;
100			l2->pkt_num = pkt_num;
101	pam-rm2	1.6
102			l2->lon = lon;
103			l2->lat = lat;
104			l2->alt = alt;
105
106			l2->Bnorth = Bnorth;
107			l2->Beast = Beast;
108			l2->Bdown = Bdown;
109			l2->Babs = Babs;
110			l2->BB0 = BB0;
111			l2->L = L;
112
113			l2->londip = londip;
114			l2->latdip = latdip;
115			l2->altdip = altdip;
116
117			l2->loncgm = loncgm;
118			l2->latcgm = latcgm;
119			l2->altcgm = altcgm;
120
121			l2->loncbm = loncbm;
122			l2->latcbm = latcbm;
123			l2->altcbm = altcbm;
124
125			memcpy(l2->cutoff, cutoff, sizeof(cutoff));
126
127			// Quaternions
128			l2->q0 = q0;
129			l2->q1 = q1;
130			l2->q2 = q2;
131			l2->q3 = q3;
132
133			// Euler angles (nadir reference frame)
134	mocchiut	1.8	l2->theta = theta;
135			l2->phi = phi;
136			l2->etha = etha;
137	pam-rm2	1.6
138	mocchiut	1.9	l2->mode = mode;
139	pam-rm2	1.6	// Euler angles (local field reference frame)
140	mocchiut	1.9	// l2->thetamag = thetamag;
141			// l2->phimag = phimag;
142			// l2->ethamag = ethamag;
143	pam-rm2	1.6
144	mocchiut	1.9	// memcpy(l2->goodAttitude, goodAttitude, sizeof(goodAttitude));
145	pam-fi	1.4	}
146
147			void OrbitalInfo::SetFromLevel2Struct(cOrbitalInfo *l2){
148			absTime = l2->abstime;
149			OBT = l2->obt;
150			pkt_num = l2->pkt_num;
151	pam-rm2	1.6
152			lon = l2->lon;
153			lat = l2->lat;
154			alt = l2->alt;
155
156			l2->Bnorth = Bnorth;
157			l2->Beast = Beast;
158			l2->Bdown = Bdown;
159			l2->Babs = Babs;
160			BB0 = l2->BB0;
161			L = l2->L;
162
163			londip = l2->londip;
164			latdip = l2->latdip;
165			altdip = l2->altdip;
166
167			loncgm = l2->loncgm;
168			latcgm = l2->latcgm;
169			altcgm = l2->altcgm;
170
171			loncbm = l2->loncbm;
172			latcbm = l2->latcbm;
173			altcbm = l2->altcbm;
174
175			memcpy(cutoff, l2->cutoff, sizeof(l2->cutoff));
176
177			// Quaternions
178			q0 = l2->q0;
179			q1 = l2->q1;
180			q2 = l2->q2;
181			q3 = l2->q3;
182
183			// Euler angles (nadir reference frame)
184	mocchiut	1.8	theta = l2->theta;
185			phi = l2->phi;
186			etha = l2->etha;
187	pam-rm2	1.6
188	mocchiut	1.9	mode = l2->mode;
189	pam-rm2	1.6	// Euler angles (local field reference frame)
190	mocchiut	1.9	// thetamag = l2->thetamag;
191			// phimag = l2->phimag;
192			// ethamag = l2->ethamag;
193	pam-rm2	1.6
194	mocchiut	1.9	// memcpy(goodAttitude, l2->goodAttitude, sizeof(l2->goodAttitude));
195	pam-fi	1.4	}
196