| 1 | // ArchTOIPipe           (C)     CEA/DAPNIA/SPP IN2P3/LAL | 
|---|
| 2 | //                               Eric Aubourg | 
|---|
| 3 | //                               Christophe Magneville | 
|---|
| 4 | //                               Reza Ansari | 
|---|
| 5 | // $Id: tgenw.cc,v 1.7 2001-11-13 16:01:39 aubourg Exp $ | 
|---|
| 6 |  | 
|---|
| 7 | /*   Test de GenWindowTOIProcessor (generic processor with window) | 
|---|
| 8 | ----------------   Exemple d'appel  --------------------- | 
|---|
| 9 | csh> time ./tgenw -intoi bolo -start 1 -end 50000 -wgen 16,1,64 -wlcr 0,0,0 \ | 
|---|
| 10 | -dbg 0 toto.fits xx.fits | 
|---|
| 11 | */ | 
|---|
| 12 |  | 
|---|
| 13 | #include "machdefs.h" | 
|---|
| 14 | #include <math.h> | 
|---|
| 15 | #include "array.h" | 
|---|
| 16 | #include <unistd.h> | 
|---|
| 17 | #include "toi.h" | 
|---|
| 18 | #include "toiprocessor.h" | 
|---|
| 19 | #include "fitstoirdr.h" | 
|---|
| 20 | #include "fitstoiwtr.h" | 
|---|
| 21 | #include "toimanager.h" | 
|---|
| 22 | #include "genwproc.h" | 
|---|
| 23 | #include "toiseqbuff.h" | 
|---|
| 24 | #include "timing.h" | 
|---|
| 25 | #include "sambainit.h" | 
|---|
| 26 | #include <stdexcept> | 
|---|
| 27 |  | 
|---|
| 28 | // ----- Classe de test heritant de GenWindowTOIProcessor ----- | 
|---|
| 29 | class TGenWProc : public GenWindowTOIProcessor { | 
|---|
| 30 | public: | 
|---|
| 31 | TGenWProc(int ntoiout, int wsz, int step, int wt); | 
|---|
| 32 | virtual void UserInit(int_8 kstart); | 
|---|
| 33 | virtual void UserProc(int_8 ks); | 
|---|
| 34 | virtual void UserEnd(int_8 kend); | 
|---|
| 35 | protected: | 
|---|
| 36 | int_8 SNRunning; | 
|---|
| 37 | }; | 
|---|
| 38 |  | 
|---|
| 39 | TGenWProc::TGenWProc(int ntoiout,int wsz, int step, int wt) | 
|---|
| 40 | : GenWindowTOIProcessor(1,ntoiout,wsz,step,wt) | 
|---|
| 41 | { | 
|---|
| 42 | SNRunning = 1; | 
|---|
| 43 | } | 
|---|
| 44 | void TGenWProc::UserInit(int_8 kstart) | 
|---|
| 45 | { | 
|---|
| 46 | cout << "TGenWProc::UserInit(" << kstart << ")" << endl; | 
|---|
| 47 | } | 
|---|
| 48 | void TGenWProc::UserEnd(int_8 kend) | 
|---|
| 49 | { | 
|---|
| 50 | cout << "TGenWProc::UserEnd(" << kend << ")" << endl; | 
|---|
| 51 | } | 
|---|
| 52 |  | 
|---|
| 53 | void TGenWProc::UserProc(int_8 ks) | 
|---|
| 54 | { | 
|---|
| 55 | if( ks==StartSampleNum() || ks>=EndSampleNum()-1 || ks%1000==0 ) | 
|---|
| 56 | cout<<"TGenWProc::UserProc("<<ks<<") CenterSample="<<GetWCenterSample()<<endl; | 
|---|
| 57 |  | 
|---|
| 58 | // Test pour fichier cmv toto.fits (sn=100000+i, bolo=i) | 
|---|
| 59 | r_8 * datatest = GetWDataPointer(); | 
|---|
| 60 | for(int_4 i=0;i<WSize;i++) { | 
|---|
| 61 | int_8 k=ks-WSize/2+i; | 
|---|
| 62 | if(k<SNbegin || k>SNend) continue; | 
|---|
| 63 | if(datatest[i]!=k-100000) {cout<<"PROBLEME ks="<<ks<<endl; break;} | 
|---|
| 64 | } | 
|---|
| 65 |  | 
|---|
| 66 | if(!NbOutput) return; | 
|---|
| 67 |  | 
|---|
| 68 | if(GetWStep()==1) { | 
|---|
| 69 | // Cas ou on a un step de 1 | 
|---|
| 70 | r_8 data; | 
|---|
| 71 | uint_8 flag; | 
|---|
| 72 | GetData(ks,data,flag); | 
|---|
| 73 | PutWData(ks,data,flag); | 
|---|
| 74 |  | 
|---|
| 75 | } else if(GetWStep()<GetWSize()) { | 
|---|
| 76 | // Cas ou on a un step plus petit que la fenetre: | 
|---|
| 77 | // on peut donc reconstituer le TOI original en sortie | 
|---|
| 78 | // (ca marche aussi pour WStep==1 mais test different) | 
|---|
| 79 | // ATTENTION: l'ordre d'ecriture depend de la taille relative | 
|---|
| 80 | // de WSize et WStep. | 
|---|
| 81 | // Il faut en plus faire attention au premier echantillon et au dernier | 
|---|
| 82 | // Visiblement il faut ecrire autant de donnees en sortie que lues en entree (??) | 
|---|
| 83 | // ===> Conduit a une logique d'une simplicite extreme: | 
|---|
| 84 | // ATTENTION: dans certains cas ca bloque car il peut arriver que | 
|---|
| 85 | // SNend ne soit jamais atteint selon les valeurs de WSize/WStep ! | 
|---|
| 86 | // et on ne peut donc pas ecrire autant de valeurs en sortie que lues en entree | 
|---|
| 87 | TVector<r_8> data; | 
|---|
| 88 | TVector<uint_8> flag; | 
|---|
| 89 | int_4 ideb,ifin,isndeb; | 
|---|
| 90 | if(GetWStep()<=GetWSize()/2+1) { | 
|---|
| 91 | //  ------|------ | 
|---|
| 92 | //      ------|------ | 
|---|
| 93 | //        :   : | 
|---|
| 94 | //        WStep | 
|---|
| 95 | //        :  : | 
|---|
| 96 | //        d..f | 
|---|
| 97 | ideb = GetWCenterIndex(); | 
|---|
| 98 | isndeb = GetWCenterSample(); | 
|---|
| 99 | ifin = ideb + GetWStep()-1; | 
|---|
| 100 | } else { | 
|---|
| 101 | //  ------|------ | 
|---|
| 102 | //             ------|------ | 
|---|
| 103 | //        :          : | 
|---|
| 104 | //            WStep | 
|---|
| 105 | //  :         : | 
|---|
| 106 | //  d.........f | 
|---|
| 107 | ifin = GetWSize()-1; | 
|---|
| 108 | ideb = ifin - GetWStep()+1; | 
|---|
| 109 | isndeb = GetWStartSample() + ideb; | 
|---|
| 110 | } | 
|---|
| 111 | if(isndeb<StartSampleNum()) { | 
|---|
| 112 | cout<<"........ ideb="<<ideb<<" isndeb="<<isndeb<<endl; | 
|---|
| 113 | ideb = StartSampleNum() - GetWStartSample(); | 
|---|
| 114 | isndeb = StartSampleNum(); | 
|---|
| 115 | } | 
|---|
| 116 | if(GetWStartSample()+ifin>EndSampleNum()) { | 
|---|
| 117 | cout<<"........ ifin="<<ifin<<endl; | 
|---|
| 118 | ifin = EndSampleNum() - GetWStartSample(); | 
|---|
| 119 | } | 
|---|
| 120 | cout<<".... ideb="<<ideb<<" ifin="<<ifin<<" isndeb="<<isndeb<<endl; | 
|---|
| 121 | data = GetWData()(Range(ideb,ifin)); | 
|---|
| 122 | flag = GetWFlag()(Range(ideb,ifin)); | 
|---|
| 123 | PutWData(isndeb,data,flag); | 
|---|
| 124 | } else { | 
|---|
| 125 | // Cas ou on ne peut reproduire le TOI initial | 
|---|
| 126 | // On renumerote les samples | 
|---|
| 127 | // ATTENTION: faut en mettre autant en sortie que lu en entree (???) | 
|---|
| 128 | // ATTENTION: dans certains cas ca bloque car il peut arriver que | 
|---|
| 129 | // SNend ne soit jamais atteint selon les valeurs de WSize/WStep ! | 
|---|
| 130 | // et on ne peut donc pas ecrire autant de valeurs en sortie que lues en entree | 
|---|
| 131 | // CA NE MARCHE PAS DANS CE CAS | 
|---|
| 132 | TVector<r_8> data; | 
|---|
| 133 | TVector<uint_8> flag; | 
|---|
| 134 | int_4 ideb=0, ifin=GetWSize()-1; | 
|---|
| 135 | int_8 ilen = EndSampleNum() - StartSampleNum() + 1; | 
|---|
| 136 | if(GetWStartSample()+ideb<StartSampleNum()) { | 
|---|
| 137 | cout<<"........ ideb="<<ideb<<endl; | 
|---|
| 138 | ideb = StartSampleNum() - GetWStartSample(); | 
|---|
| 139 | } | 
|---|
| 140 | if(GetWStartSample()+ifin>EndSampleNum()) { | 
|---|
| 141 | cout<<"........ ifin="<<ifin<<endl; | 
|---|
| 142 | ifin = EndSampleNum() - GetWStartSample(); | 
|---|
| 143 | } | 
|---|
| 144 | data = GetWData()(Range(ideb,ifin)); | 
|---|
| 145 | flag = GetWFlag()(Range(ideb,ifin)); | 
|---|
| 146 | cout<<".... ideb="<<ideb<<" ifin="<<ifin<<" SNRunning="<<SNRunning<<endl; | 
|---|
| 147 | PutWData(SNRunning,data,flag); | 
|---|
| 148 | SNRunning += ifin-ideb+1; | 
|---|
| 149 | if(SNRunning<=ilen && GetWStep()-GetWSize()>0) { | 
|---|
| 150 | for(int_4 i=0;i<GetWStep()-GetWSize() && SNRunning<=ilen;i++) | 
|---|
| 151 | {PutWData(SNRunning,0.,0); SNRunning++;} | 
|---|
| 152 | // De toute facon impossible a faire puisque | 
|---|
| 153 | // ce putwdata efface le vecteur du putwdata precedent | 
|---|
| 154 | } | 
|---|
| 155 | cout<<".................... SNRunning="<<SNRunning<<endl; | 
|---|
| 156 | } | 
|---|
| 157 | // Oh que voila une logique simple et utilisable par tout un chacun !!! | 
|---|
| 158 | } | 
|---|
| 159 |  | 
|---|
| 160 | void Usage(bool fgerr) | 
|---|
| 161 | { | 
|---|
| 162 | cout << endl; | 
|---|
| 163 | if (fgerr) { | 
|---|
| 164 | cout << " tgenw : Argument Error ! tgenw -h for usage " << endl; | 
|---|
| 165 | exit(1); | 
|---|
| 166 | } | 
|---|
| 167 | else { | 
|---|
| 168 | cout << "\n Usage : tgenw [-prt] [-dbg dbg] [-start snb] [-end sne] [-intoi name] \n" | 
|---|
| 169 | << "         [-wtoi sz] [-wgen sz,step,szt] inFitsName outFitsName \n" | 
|---|
| 170 | << "   -prt : sets TOISeqBuffered debug level to 1 \n" | 
|---|
| 171 | << "   -dbg : debug level for GenWProc \n" | 
|---|
| 172 | << "   -start snb : sets the start sample num \n" | 
|---|
| 173 | << "   -end sne : sets the end sample num \n" | 
|---|
| 174 | << "   -intoi toiName : select input TOI name (def boloMuV_27)\n" | 
|---|
| 175 | << "   -wtoi sz : sets TOISeqBuff buffer size (def= 8192)\n" | 
|---|
| 176 | << "   -wgen sz,step,szt : sets GenWProc window size, step total size \n" | 
|---|
| 177 | << "   -wlcr szl,szc,szr : sets LCR Window \n" | 
|---|
| 178 | << endl; | 
|---|
| 179 | exit(0); | 
|---|
| 180 | } | 
|---|
| 181 | } | 
|---|
| 182 |  | 
|---|
| 183 | int main(int narg, char** arg) { | 
|---|
| 184 |  | 
|---|
| 185 | if ((narg > 1) && (strcmp(arg[1],"-h") == 0) ) Usage(false); | 
|---|
| 186 |  | 
|---|
| 187 | cout << "tgenw starting - Decoding arguments " << " narg=" << narg << endl; | 
|---|
| 188 |  | 
|---|
| 189 | bool fgdbg = false; | 
|---|
| 190 | bool fgsetstart = false; | 
|---|
| 191 | int dbglevel = 0; | 
|---|
| 192 | int wtoi = 8192; | 
|---|
| 193 | int wgen = 16; | 
|---|
| 194 | int stepgen = 1; | 
|---|
| 195 | int wgl = 0, wgc = 0, wgr = 0; | 
|---|
| 196 | int wtotgen = 0; | 
|---|
| 197 | int istart = 0; | 
|---|
| 198 | int iend = 0; | 
|---|
| 199 | string infile; | 
|---|
| 200 | string outfile = ""; | 
|---|
| 201 | string outppfname; | 
|---|
| 202 | string intoi = "boloMuV_27"; | 
|---|
| 203 |  | 
|---|
| 204 | if (narg < 2) Usage(true); | 
|---|
| 205 | int ko=1; | 
|---|
| 206 | // decoding arguments | 
|---|
| 207 | for(int ia=1; ia<narg; ia++) { | 
|---|
| 208 | if (strcmp(arg[ia],"-start") == 0) { | 
|---|
| 209 | if (ia == narg-1) Usage(true);  // -start est suivi d'un argument | 
|---|
| 210 | istart = atoi(arg[ia+1]); ia++; | 
|---|
| 211 | fgsetstart = true; | 
|---|
| 212 | } | 
|---|
| 213 | else if (strcmp(arg[ia],"-end") == 0) { | 
|---|
| 214 | if (ia == narg-1) Usage(true); | 
|---|
| 215 | iend = atoi(arg[ia+1]); ia++; | 
|---|
| 216 | } | 
|---|
| 217 | else if (strcmp(arg[ia],"-wtoi") == 0) { | 
|---|
| 218 | if (ia == narg-1) Usage(true); | 
|---|
| 219 | wtoi = atoi(arg[ia+1]); ia++; | 
|---|
| 220 | } | 
|---|
| 221 | else if (strcmp(arg[ia],"-wgen") == 0) { | 
|---|
| 222 | if (ia == narg-1) Usage(true); | 
|---|
| 223 | sscanf(arg[ia+1],"%d,%d,%d",&wgen,&stepgen,&wtotgen); ia++; | 
|---|
| 224 | } | 
|---|
| 225 | else if (strcmp(arg[ia],"-wlcr") == 0) { | 
|---|
| 226 | if (ia == narg-1) Usage(true); | 
|---|
| 227 | sscanf(arg[ia+1],"%d,%d,%d",&wgl,&wgc,&wgr); ia++; | 
|---|
| 228 | } | 
|---|
| 229 | else if (strcmp(arg[ia],"-intoi") == 0) { | 
|---|
| 230 | if (ia == narg-1) Usage(true); | 
|---|
| 231 | intoi = arg[ia+1]; ia++; | 
|---|
| 232 | } | 
|---|
| 233 | else if (strcmp(arg[ia],"-dbg") == 0) { | 
|---|
| 234 | if (ia == narg-1) Usage(true); | 
|---|
| 235 | sscanf(arg[ia+1],"%d",&dbglevel); ia++; | 
|---|
| 236 | } | 
|---|
| 237 | else if (strcmp(arg[ia],"-prt") == 0)  fgdbg = true; | 
|---|
| 238 |  | 
|---|
| 239 | else { ko = ia; break; }  // Debut des noms | 
|---|
| 240 | } | 
|---|
| 241 |  | 
|---|
| 242 | if (iend < istart) iend = istart+wtoi*10; | 
|---|
| 243 | if ((narg-ko) < 1)  Usage(true); | 
|---|
| 244 | infile = arg[ko]; | 
|---|
| 245 | if(ko+1<narg) outfile = arg[ko+1]; | 
|---|
| 246 | // outppfname = arg[ko+2]; | 
|---|
| 247 |  | 
|---|
| 248 | cout << " Initializing SOPHYA ... " << endl; | 
|---|
| 249 | SophyaInit(); | 
|---|
| 250 | InitTim(); | 
|---|
| 251 |  | 
|---|
| 252 | cout << ">> tgenw: Infile= " << infile << " outFile=" | 
|---|
| 253 | << outfile << endl; | 
|---|
| 254 | cout << ">>> Window Size WTOI= " << wtoi << " WGenSz= " << wgen | 
|---|
| 255 | << " StepGen=" << stepgen << " WTot=" << wtotgen | 
|---|
| 256 | << " Wglcr=" << wgl << "," << wgc <<  "," << wgr << endl; | 
|---|
| 257 | cout << ">>>> InTOIName= " << intoi | 
|---|
| 258 | << "  iStart= " << istart << " iEnd= " << iend << endl; | 
|---|
| 259 |  | 
|---|
| 260 | try { | 
|---|
| 261 | TOIManager* mgr = TOIManager::getManager(); | 
|---|
| 262 |  | 
|---|
| 263 | //  mgr->setRequestedSample(11680920,11710584); | 
|---|
| 264 | //  mgr->setRequestedSample(104121000, 104946120); | 
|---|
| 265 | if (fgsetstart) | 
|---|
| 266 | mgr->setRequestedSample(istart, iend); | 
|---|
| 267 |  | 
|---|
| 268 | FITSTOIReader r(infile); | 
|---|
| 269 | cout << "reader created" << endl; | 
|---|
| 270 |  | 
|---|
| 271 | int ntoiout=0; | 
|---|
| 272 | FITSTOIWriter* w=NULL; | 
|---|
| 273 | if(outfile.size()>0) { | 
|---|
| 274 | ntoiout=1; | 
|---|
| 275 | w = new FITSTOIWriter(outfile); | 
|---|
| 276 | cout << "fits writer created" << endl; | 
|---|
| 277 | } | 
|---|
| 278 |  | 
|---|
| 279 | TOISeqBuffered * toiin = new TOISeqBuffered("f2in", wtoi); | 
|---|
| 280 | if (fgdbg) toiin->setDebugLevel(1); | 
|---|
| 281 |  | 
|---|
| 282 | TOISeqBuffered * toiout = NULL; | 
|---|
| 283 | if(w) { | 
|---|
| 284 | toiout = new TOISeqBuffered("genout", wtoi); | 
|---|
| 285 | if (fgdbg) toiout->setDebugLevel(1); | 
|---|
| 286 | } | 
|---|
| 287 |  | 
|---|
| 288 | TGenWProc tgenp(ntoiout, wgen, stepgen, wtotgen); | 
|---|
| 289 | tgenp.SetWSizeLCR(wgl,wgc,wgr); | 
|---|
| 290 | tgenp.SetDbgLevel(dbglevel); | 
|---|
| 291 |  | 
|---|
| 292 | cout << " Connecting to FitsReader ... " << endl; | 
|---|
| 293 | r.addOutput(intoi, toiin); | 
|---|
| 294 |  | 
|---|
| 295 | if(w && toiout) { | 
|---|
| 296 | cout << " Connecting to FitsWriter ... " << endl; | 
|---|
| 297 | w->addInput("genout",toiout,true); | 
|---|
| 298 | } | 
|---|
| 299 |  | 
|---|
| 300 | cout << " Connecting  TGenWProc ... " << endl; | 
|---|
| 301 | tgenp.addInput("in0",toiin); | 
|---|
| 302 | if(toiout) tgenp.addOutput("out0",toiout); | 
|---|
| 303 | tgenp.PrintStatus(cout); | 
|---|
| 304 |  | 
|---|
| 305 | PrtTim("starting threads"); | 
|---|
| 306 | r.start(); | 
|---|
| 307 | tgenp.start(); | 
|---|
| 308 | if(w) w->start(); | 
|---|
| 309 |  | 
|---|
| 310 | /* | 
|---|
| 311 | for(int jj=0; jj<3; jj++) { | 
|---|
| 312 | cout << *toiin; | 
|---|
| 313 | if(toiout) cout << *toiout; | 
|---|
| 314 | sleep(1); | 
|---|
| 315 | } | 
|---|
| 316 | */ | 
|---|
| 317 |  | 
|---|
| 318 | mgr->joinAll(); | 
|---|
| 319 | PrtTim("End threads"); | 
|---|
| 320 |  | 
|---|
| 321 | //    cout << " ------ FITSReaderTOI::PrintStatus() : ----- " << endl; | 
|---|
| 322 | //    r.PrintStatus(cout); | 
|---|
| 323 | //    cout << "----- FITSWriterTOI::PrintStatus() : ----- " << endl; | 
|---|
| 324 | //    w->PrintStatus(cout); | 
|---|
| 325 |  | 
|---|
| 326 | cout << " ------ toiin, toiout Status information ------- " << endl; | 
|---|
| 327 | cout << *toiin; | 
|---|
| 328 | if(toiout) cout << *toiout; | 
|---|
| 329 | tgenp.PrintStatus(cout); | 
|---|
| 330 |  | 
|---|
| 331 | // Fermeture du fitswriter | 
|---|
| 332 | if(w) delete w;; | 
|---|
| 333 |  | 
|---|
| 334 | } | 
|---|
| 335 | catch (PThrowable & exc) { | 
|---|
| 336 | cerr << "\n tgenw: Catched Exception \n" << (string)typeid(exc).name() | 
|---|
| 337 | << " - Msg= " << exc.Msg() << endl; | 
|---|
| 338 | } | 
|---|
| 339 | catch (const std::exception & sex) { | 
|---|
| 340 | cerr << "\n tgenw: Catched std::exception \n" | 
|---|
| 341 | << (string)typeid(sex).name() << endl; | 
|---|
| 342 | } | 
|---|
| 343 | catch (...) { | 
|---|
| 344 | cerr << "\n tgenw: some other exception was caught ! " << endl; | 
|---|
| 345 | } | 
|---|
| 346 |  | 
|---|
| 347 | return(0); | 
|---|
| 348 | } | 
|---|