source: trunk/external-alma/asdm2ASAP/ASDMReader.cc @ 2618

Last change on this file since 2618 was 2618, checked in by Takeshi Nakazato, 12 years ago

New Development: No

JIRA Issue: No

Ready for Test: Yes

Interface Changes: No

What Interface Changed:

Test Programs: test_importasdm_sd

Put in Release Notes: No

Module(s): Module Names change impacts.

Description: Describe your changes here...

Fix for failure of test_importasdm_sd
File size: 65.3 KB
Line 
1#include <iostream>
2#include <sstream>
3#include "limits.h"
4//#include "float.h"
5
6#include <measures/Measures/MEpoch.h>
7#include <measures/Measures/MPosition.h>
8#include <measures/Measures/MDirection.h>
9#include <measures/Measures/MCDirection.h>
10#include <measures/Measures/MeasFrame.h>
11#include <measures/Measures/MeasConvert.h>
12#include <casa/Logging/LogMessage.h>
13#include <casa/BasicSL/Constants.h>
14
15#include "ASDMReader.h"
16#include <atnf/PKSIO/SrcType.h>
17
18using namespace std ;
19//using namespace casa ;
20using namespace asdm ;
21using namespace sdmbin ;
22
23// sec to day
24double s2d = 1.0 / 86400.0 ;
25
26ASDMReader::ASDMReader()
27  : asdm_(0),
28    sdmBin_(0),
29    vmsData_(0),
30    antennaId_( -1 ),
31    antennaName_( "" ),
32    stationName_( "" ),
33    row_(-1),
34    apc_(AP_CORRECTED),
35    className_("ASDMReader"),
36    dataIndex_( UINT_MAX ),
37    //antennaRow_p( 0 ),
38    //stationRow_p( 0 ),
39    specWinRow_p( 0 ),
40    polarizationRow_p( 0 ),
41    fieldRow_p( 0 )
42{
43  configDescIdList_.resize(0) ;
44  feedIdList_.resize(0) ;
45  fieldIdList_.resize(0) ;
46  mainRow_.resize(0) ;
47  ifno_.clear() ;
48  corrMode_.reset() ;
49  timeSampling_.reset() ;
50}
51
52ASDMReader::~ASDMReader()
53{
54  close() ;
55  logsink_ = 0 ;
56}
57
58bool ASDMReader::open( const string &filename, const casa::Record &rec )
59{
60  casa::String funcName = "open" ;
61
62  // return value
63  bool status = true ;
64
65  // set default
66  timeSampling_.reset() ;
67  corrMode_.reset() ;
68  resolutionType_.reset() ;
69  apc_ = AP_CORRECTED ;
70
71  // parsing ASDM options
72  if ( rec.isDefined( "asdm" ) ) {
73    casa::Record asdmrec = rec.asRecord( "asdm" ) ;
74
75    // antenna
76    if ( asdmrec.isDefined( "antenna" ) ) {
77      if ( asdmrec.type( asdmrec.fieldNumber( "antenna" ) ) == casa::TpInt ) {
78        antennaId_ = asdmrec.asInt( "antenna" ) ;
79      }
80      else {
81        antennaName_ = asdmrec.asString( "antenna" ) ;
82      }
83    }
84    else {
85      antennaId_ = 0 ;
86    }
87
88    // ATM phase correction
89    if ( asdmrec.isDefined( "apc" ) ) {
90      if ( asdmrec.asBool( "apc" ) )
91        apc_ = AP_CORRECTED ;
92      else
93        apc_ = AP_UNCORRECTED ;
94    }
95
96    // time sampling
97    String timeSampling = "all" ; // take all time sampling by default
98    if ( asdmrec.isDefined( "sampling" ) ) {
99      timeSampling = asdmrec.asString( "sampling" ) ;
100    }
101    if ( timeSampling == "all" ) {
102      timeSampling_.set( INTEGRATION ) ;
103      timeSampling_.set( SUBINTEGRATION ) ;
104    }
105    else if ( timeSampling == "integration" ) {
106      timeSampling_.set( INTEGRATION ) ;
107    }
108    else if ( timeSampling == "subintegration" ) {
109      timeSampling_.set( SUBINTEGRATION ) ;
110    }
111    else {
112      //throw AipsError( "Unrecognized option for sampling" ) ;
113      logsink_->postLocally( LogMessage( "Unrecognized option for time sampling: "+String::toString(timeSampling), LogOrigin(className_,funcName,WHERE), LogMessage::WARN ) ) ;
114      status = false ;
115    }     
116
117    // spectral resolution type
118    string resolutionType = "all" ;
119    if ( asdmrec.isDefined( "srt" ) ) {
120      resolutionType = string( asdmrec.asString( "srt" ) ) ;
121    }
122    string resolutionTypes[3] ;
123    Int numType = split( resolutionType, resolutionTypes, 3, "," ) ;
124    for ( Int it = 0 ; it < numType ; it++ ) {
125      if ( resolutionTypes[it] == "all" ) {
126        resolutionType_.reset() ;
127        resolutionType_.set( FULL_RESOLUTION ) ;
128        resolutionType_.set( BASEBAND_WIDE ) ;
129        resolutionType_.set( CHANNEL_AVERAGE ) ;
130        break ;
131      }
132      else if ( resolutionTypes[it] == "fr" ) {
133        resolutionType_.set( FULL_RESOLUTION ) ;
134      }
135      else if ( resolutionTypes[it] == "bw" ) {
136        resolutionType_.set( BASEBAND_WIDE ) ;
137      }
138      else if ( resolutionTypes[it] == "ca" ) {
139        resolutionType_.set( CHANNEL_AVERAGE ) ;
140      }
141    }
142    if ( resolutionType_.size() == 0 ) {
143      logsink_->postLocally( LogMessage( "Unrecognized option for spectral resolution type: "+String::toString(resolutionType), LogOrigin(className_,funcName,WHERE), LogMessage::WARN ) ) ;
144      status = false ;
145    }
146   
147    // input correlation mode
148    string corrMode = "ao,ca" ;
149    if ( asdmrec.isDefined( "corr" ) ) {
150      corrMode = string( asdmrec.asString( "corr" ) ) ;
151      //logsink_->postLocally( LogMessage("corrMode = "+String(corrMode),LogOrigin(className_,funcName,WHERE)) ) ;
152    }
153    string corrModes[3] ;
154    Int numCorr = split( corrMode, corrModes, 3, "," ) ;
155    for ( Int ic = 0 ; ic < numCorr ; ic++ ) {
156      if ( corrModes[ic] == "ao" ) {
157        corrMode_.set( AUTO_ONLY ) ;
158      }
159      else if ( corrModes[ic] == "ca" ) {
160        corrMode_.set( CROSS_AND_AUTO ) ;
161      }
162    }
163    if ( corrMode_.size() == 0 ) {
164      logsink_->postLocally( LogMessage( "Invalid option for correlation mode: "+String::toString(corrMode), LogOrigin(className_,funcName,WHERE), LogMessage::WARN ) ) ;
165      status = false ;
166    }
167
168//     logsink_->postLocally( LogMessage( "### asdmrec summary ###", LogOrigin(className_,funcName,WHERE) ) ) ;
169//     ostringstream oss ;
170//     asdmrec.print( oss ) ;
171//     logsink_->postLocally( LogMessage( oss.str(), LogOrigin(className_,funcName,WHERE) ) ) ;
172//     logsink_->postLocally( LogMessage( "#######################", LogOrigin(className_,funcName,WHERE) ) ) ;
173  }
174
175  // create ASDM object
176  asdm_ = new ASDM() ;
177  asdm_->setFromFile( filename ) ;
178
179  AntennaTable &atab = asdm_->getAntenna() ;
180  AntennaRow *antennaRow ;
181  if ( antennaId_ == -1 ) {
182    vector<AntennaRow *> rows = atab.get() ;
183    int idx = -1 ;
184    for ( casa::uInt irow = 0 ; irow < rows.size() ; irow++ ) {
185      if ( casa::String(rows[irow]->getName()) == antennaName_ ) {
186        idx = rows[irow]->getAntennaId().getTagValue() ;
187        break ;
188      }
189    }
190    if ( idx == -1 ) {
191      close() ;
192      throw (casa::AipsError( antennaName_ + " not found." )) ;
193    }
194    else {
195      antennaId_ = idx ;
196    }
197    antennaTag_ = Tag( antennaId_, TagType::Antenna ) ;
198    antennaRow = rows[antennaId_] ;
199  }
200  else {
201    antennaTag_ = Tag( antennaId_, TagType::Antenna ) ;
202    antennaRow = atab.getRowByKey( antennaTag_ ) ;
203    if ( antennaRow == 0 ) {
204      close() ;
205      throw (casa::AipsError( "AntennaId " + casa::String::toString(antennaId_) + " is invalid." ) ) ;
206    }
207  }
208 
209
210  // set antenna name
211  if ( antennaName_.size() == 0 ) {
212    antennaName_ = casa::String( antennaRow->getName() ) ;
213  }
214
215  // get Station row
216  StationRow *stationRow = antennaRow->getStationUsingStationId() ;
217
218  // station name
219  stationName_ = casa::String( stationRow->getName() ) ;
220
221  // antenna position
222  antennaPosition_.resize( 3 ) ;
223  vector<Length> antpos = stationRow->getPosition() ;
224  for ( casa::uInt i = 0 ; i < 3 ; i++ )
225    antennaPosition_[i] = Quantity( casa::Double( antpos[i].get() ), Unit( "m" ) ) ;
226
227  // create SDMBinData object
228  sdmBin_ = new SDMBinData( asdm_, filename ) ;
229
230  // get Main rows
231  //mainRow_ = casa::Vector<MainRow *>(asdm_->getMain().get()) ;
232
233  // set up IFNO
234  setupIFNO() ;
235
236  // process Station table
237  processStation() ;
238
239  //logsink_->postLocally( LogMessage(  "antennaId_ = "+String::toString(antennaId_), LogOrigin(className_,funcName,WHERE) ) ) ;
240  //logsink_->postLocally( LogMessage(  "antennaName_ = "+antennaName_, LogOrigin(className_,funcName,WHERE) ) ) ;
241
242  return true ;
243}
244
245// void ASDMReader::fill()
246// {
247// }
248
249void ASDMReader::close()
250{
251  clearMainRow() ;
252
253  if ( sdmBin_ )
254    delete sdmBin_ ;
255  sdmBin_ = 0 ;
256
257  if ( asdm_ )
258    delete asdm_ ;
259  asdm_ = 0 ;
260
261  return ;
262}
263
264void ASDMReader::fillHeader( casa::Int &nchan,
265                             casa::Int &npol,
266                             casa::Int &nif,
267                             casa::Int &nbeam,
268                             casa::String &observer,
269                             casa::String &project,
270                             casa::String &obstype,
271                             casa::String &antennaname,
272                             casa::Vector<casa::Double> &antennaposition,
273                             casa::Float &equinox,
274                             casa::String &freqref,
275                             casa::Double &reffreq,
276                             casa::Double &bandwidth,
277                             casa::Double &utc,
278                             casa::String &fluxunit,
279                             casa::String &epoch,
280                             casa::String &poltype )
281{
282  casa::String funcName = "fillHeader" ;
283
284  ExecBlockTable &ebtab = asdm_->getExecBlock() ;
285  // at the moment take first row of ExecBlock table
286  ExecBlockRow *ebrow = ebtab.get()[0] ;
287  casa::String telescopeName( ebrow->getTelescopeName() ) ;
288  //casa::String stationName( stationRow_p->getName() ) ;
289
290  // antennaname
291  // <telescopeName>//<antennaName>@stationName
292  antennaname = telescopeName + "//" + antennaName_ + "@" + stationName_ ;
293  //logsink_->postLocally( LogMessage("antennaName = "+antennaname,LogOrigin(className_,funcName,WHERE)) ) ;
294
295  // antennaposition
296  antennaposition.resize( 3 ) ;
297  for ( casa::uInt i = 0 ; i < 3 ; i++ )
298    antennaposition[i] = antennaPosition_[i].getValue( Unit("m") ) ;
299
300  // observer
301  observer = ebrow->getObserverName() ;
302
303  // project
304  // T.B.D. (project UID?)
305  project = "T.B.D. (" + ebrow->getProjectUID().toString() + ")" ;
306
307  // utc
308  // start time of the project
309  utc = casa::Double( ebrow->getStartTime().getMJD() ) ;
310 
311
312  SpectralWindowTable &spwtab = asdm_->getSpectralWindow() ;
313  vector<SpectralWindowRow *> spwrows = spwtab.get() ;
314  int nspwrow = spwrows.size() ;
315
316  // nif
317  //nif = spwrows.size() ;
318  nif = getNumIFs() ;
319
320  // nchan
321  int refidx = -1 ;
322  vector<int> nchans ;
323  for ( int irow = 0 ; irow < nspwrow ; irow++ ) {
324    nchans.push_back( spwrows[irow]->getNumChan() ) ;
325    if ( refidx == -1 && nchans[irow] != 1 && nchans[irow] != 4 )
326      refidx = irow ;
327  }
328  nchan = casa::Int( *max_element( nchans.begin(), nchans.end() ) ) ;
329
330  //logsink_->postLocally( LogMessage("refidx = "+String::toString(refidx),LogOrigin(className_,funcName,WHERE)) ) ;
331
332  // bandwidth
333  vector<double> bws ;
334  for ( int irow = 0 ; irow < nspwrow ; irow++ ) {
335    if ( nchans[irow] != 4 ) { // exclude WVR data
336      bws.push_back( spwrows[irow]->getTotBandwidth().get() ) ;
337    }
338  }
339  bandwidth = casa::Double( *max_element( bws.begin(), bws.end() ) ) ;
340
341  // reffreq
342  reffreq = casa::Double( spwrows[refidx]->getRefFreq().get() ) ;
343
344  // freqref
345  if ( spwrows[refidx]->isMeasFreqRefExists() ) {
346    string mfr = CFrequencyReferenceCode::name( spwrows[refidx]->getMeasFreqRef() ) ;
347//     if (mfr == "TOPO") {
348//       freqref = "TOPOCENT";
349//     } else if (mfr == "GEO") {
350//       freqref = "GEOCENTR";
351//     } else if (mfr == "BARY") {
352//       freqref = "BARYCENT";
353//     } else if (mfr == "GALACTO") {
354//       freqref = "GALACTOC";
355//     } else if (mfr == "LGROUP") {
356//       freqref = "LOCALGRP";
357//     } else if (mfr == "CMB") {
358//       freqref = "CMBDIPOL";
359//     } else if (mfr == "REST") {
360//       freqref = "SOURCE";
361//     }
362    freqref = String( mfr ) ;
363  }
364  else {
365    // frequency reference is TOPOCENT by default
366    //freqref = "TOPOCENT" ;
367    freqref = "TOPO" ;
368  }
369
370
371  PolarizationTable &ptab = asdm_->getPolarization() ;
372  vector<PolarizationRow *> prows = ptab.get() ;
373  vector<int> npols ;
374  refidx = -1 ;
375  for ( unsigned int irow = 0 ; irow < prows.size() ; irow++ ) {
376    npols.push_back( prows[irow]->getNumCorr() ) ;
377    if ( refidx == -1 && npols[irow] != 1 )
378      refidx = irow ;
379  }
380  if ( refidx == -1 )
381    refidx = 0 ;
382
383  // npol
384  npol = casa::Int( *max_element( npols.begin(), npols.end() ) ) ;
385
386  // poltype
387  vector<StokesParameter> corrType = prows[refidx]->getCorrType() ;
388  if ( corrType[0] == I ||
389       corrType[0] == Q ||
390       corrType[0] == U ||
391       corrType[0] == V )
392    poltype = "stokes" ;
393  else if ( corrType[0] == RR ||
394            corrType[0] == RL ||
395            corrType[0] == LR ||
396            corrType[0] == LL )
397    poltype = "circular" ;
398  else if ( corrType[0] == XX ||
399            corrType[0] == XY ||
400            corrType[0] == YX ||
401            corrType[0] == YY )
402    poltype = "linear" ;
403  else if ( corrType[0] == PLINEAR ||
404            corrType[0] == PANGLE ) {
405    poltype = "linpol" ;
406  }
407  else {
408    poltype = "notype" ;
409  }
410
411
412  FeedTable &ftab = asdm_->getFeed() ;
413  vector<FeedRow *> frows = ftab.get() ;
414  vector<int> nbeams ;
415  for ( unsigned int irow = 0 ; irow < frows.size() ; irow++ ) {
416    if ( frows[irow]->isFeedNumExists() )
417      nbeams.push_back( frows[irow]->getFeedNum() ) ;
418    else
419      nbeams.push_back( 1 ) ;
420  }
421
422  // nbeam
423  nbeam = casa::Int( *max_element( nbeams.begin(), nbeams.end() ) ) ;
424
425  // fluxunit
426  // tentatively set 'K'? or empty?
427  fluxunit = "K" ;
428
429  // equinox
430  // tentatively set 2000.0
431  equinox = 2000.0 ;
432
433  // epoch
434  // tentatively set "UTC"
435  epoch = "UTC" ;
436
437  // obstype
438  // at the moment take observingMode attribute in SBSummary table
439  SBSummaryRow *sbrow = ebrow->getSBSummaryUsingSBSummaryId() ;
440  vector<string> obsmode = sbrow->getObservingMode() ;
441  obstype = "" ;
442  for ( unsigned int imode = 0 ; imode < obsmode.size() ; imode++ ) {
443    obstype += casa::String(obsmode[imode]) ;
444    if ( imode != obsmode.size()-1 )
445      obstype += "#" ;
446  }
447}
448
449void ASDMReader::selectConfigDescription()
450{
451  casa::String funcName = "selectConfigDescription" ;
452
453  vector<ConfigDescriptionRow *> cdrows = asdm_->getConfigDescription().get() ;
454  vector<Tag> cdidTags ;
455  for ( unsigned int irow = 0 ; irow < cdrows.size() ; irow++ ) {
456    //logsink_->postLocally( LogMessage("correlationMode["+String::toString(irow)+"] = "+String::toString(cdrows[irow]->getCorrelationMode()),LogOrigin(className_,funcName,WHERE)) ) ;
457    if ( cdrows[irow]->getCorrelationMode() != CROSS_ONLY ) {
458      cdidTags.push_back( cdrows[irow]->getConfigDescriptionId() ) ;
459    }
460  }
461
462  configDescIdList_.resize( cdidTags.size() ) ;
463  for ( unsigned int i = 0 ; i < cdidTags.size() ; i++ ) {
464    configDescIdList_[i] = casa::uInt( cdidTags[i].getTagValue() ) ;
465  }
466}
467
468void ASDMReader::selectFeed()
469{
470  feedIdList_.resize(0) ;
471  vector<FeedRow *> frows = asdm_->getFeed().get() ;
472  Tag atag( antennaId_, TagType::Antenna ) ;
473  for ( unsigned int irow = 0 ; irow < frows.size() ; irow++ ) {
474    casa::uInt feedId = (casa::uInt)(frows[irow]->getFeedId() ) ;
475    if ( casa::anyEQ( feedIdList_, feedId ) )
476      continue ;
477    if ( frows[irow]->getAntennaId() == atag ) {
478      unsigned int oldsize = feedIdList_.size() ;
479      feedIdList_.resize( oldsize+1, true ) ;
480      feedIdList_[oldsize] = feedId ;
481    }
482  }
483}
484
485casa::Vector<casa::uInt> ASDMReader::getFieldIdList()
486{
487  casa::String funcName = "getFieldIdList" ;
488
489  vector<FieldRow *> frows = asdm_->getField().get() ;
490  fieldIdList_.resize( frows.size() ) ;
491  for ( unsigned int irow = 0 ; irow < frows.size() ; irow++ ) {
492    //logsink_->postLocally( LogMessage("fieldId["+String::toString(irow)+"]="+String(frows[irow]->getFieldId().toString()),LogOrigin(className_,funcName,WHERE)) ) ;
493    fieldIdList_[irow] = frows[irow]->getFieldId().getTagValue() ;
494  }
495
496  return fieldIdList_ ;
497}
498
499casa::uInt ASDMReader::getNumMainRow()
500{
501  casa::uInt nrow = casa::uInt( mainRow_.size() ) ;
502
503  return nrow ;
504}
505
506void ASDMReader::select()
507{
508  // selection by input CorrelationMode
509  EnumSet<CorrelationMode> esCorrs ;
510  sdmBin_->select( corrMode_ ) ;
511
512  // selection by TimeSampling
513  sdmBin_->select( timeSampling_ ) ;
514
515  // selection by SpectralResolutionType
516  sdmBin_->select( resolutionType_ ) ;
517
518  // selection by AtmPhaseCorrection and output CorrelationMode
519  EnumSet<AtmPhaseCorrection> esApcs ;
520  esApcs.set( apc_ ) ;
521  // always take only autocorrelation data
522  Enum<CorrelationMode> esCorr = AUTO_ONLY ;
523  sdmBin_->selectDataSubset( esCorr, esApcs ) ;
524
525  // select valid configDescriptionId
526  selectConfigDescription() ;
527
528  // select valid feedId
529  selectFeed() ;
530}
531
532casa::Bool ASDMReader::setMainRow( casa::uInt irow )
533{
534  casa::Bool status = true ;
535  row_ = irow ;
536  execBlockTag_ = mainRow_[row_]->getExecBlockId() ;
537
538  unsigned int cdid = mainRow_[row_]->getConfigDescriptionId().getTagValue() ;
539  if ( (int)count(configDescIdList_.begin(),configDescIdList_.end(),cdid) == 0 )
540    status = false ;
541  else {
542    status = (casa::Bool)(sdmBin_->acceptMainRow( mainRow_[row_] )) ;
543  }
544  return status ;
545}
546
547casa::Bool ASDMReader::setMainRow( casa::uInt configDescId, casa::uInt fieldId )
548{
549  clearMainRow() ;
550
551  Tag configDescTag( (unsigned int)configDescId, TagType::ConfigDescription ) ;
552  Tag fieldTag( (unsigned int)fieldId, TagType::Field ) ;
553  mainRow_ = casa::Vector<MainRow *>( *(asdm_->getMain().getByContext( configDescTag, fieldTag ) ) ) ;
554 
555  return true ;
556}
557
558void ASDMReader::clearMainRow()
559{
560  mainRow_.resize(0) ;
561}
562
563void ASDMReader::setupIFNO()
564{
565  casa::String funcName = "setupIFNO" ;
566
567  vector<SpectralWindowRow *> spwrows = asdm_->getSpectralWindow().get() ;
568  unsigned int nrow = spwrows.size() ;
569  ifno_.clear() ;
570  casa::uInt idx = 0 ;
571  casa::uInt wvridx = 0 ;
572  for ( unsigned int irow = 0 ; irow < nrow ; irow++ ) {
573    casa::uInt index ;
574    if ( isWVR( spwrows[irow] ) ) {
575      //logsink_->postLocally( LogMessage(spwrows[irow]->getSpectralWindowId().toString()+" is WVR",LogOrigin(className_,funcName,WHERE)) ) ;
576      index = wvridx ;
577    }
578    else {
579      index = ++idx ;
580    }
581    ifno_.insert( pair<Tag,casa::uInt>(spwrows[irow]->getSpectralWindowId(),index) ) ;
582    //logsink_->postLocally( LogMessage(spwrows[irow]->getSpectralWindowId().toString()+": IFNO="+String::toString(index),LogOrigin(className_,funcName,WHERE)) ) ;
583  }
584}
585
586bool ASDMReader::isWVR( SpectralWindowRow *row )
587{
588  BasebandName bbname = row->getBasebandName() ;
589  int nchan = row->getNumChan() ;
590  if ( bbname == NOBB && nchan == 4 )
591    return true ;
592  else
593    return false ;
594}
595
596casa::Bool ASDMReader::setData()
597{
598  casa::String funcName = "setData" ;
599
600  //logsink_->postLocally( LogMessage("try to retrieve binary data",LogOrigin(className_,funcName,WHERE)) ) ;
601 
602//   EnumSet<AtmPhaseCorrection> esApcs ;
603//   esApcs.set( apc_ ) ;
604//   // always take only autocorrelation data
605//   Enum<CorrelationMode> esCorr = AUTO_ONLY ;
606//   vmsData_ = sdmBin_->getDataCols( esCorr, esApcs ) ;
607
608  // 2011/07/06 TN
609  // Workaround to avoid unwanted message from SDMBinData::getDataCols()
610  ostringstream oss ;
611  streambuf *buforg = cout.rdbuf(oss.rdbuf()) ;
612  vmsData_ = sdmBin_->getDataCols() ;
613  cout.rdbuf(buforg) ;
614
615//   logsink_->postLocally( LogMessage("oss.str() = "+oss.str(),LogOrigin(className_,funcName,WHERE)) ) ;
616//   cout << "This is test: oss.str()=" << oss.str() << endl ;
617
618
619  //logsink_->postLocally( LogMessage("processorId = "+String::toString(vmsData_->processorId),LogOrigin(className_,funcName,WHERE)) ) ;
620  //logsink_->postLocally( LogMessage("v_time.size() = "+String::toString(vmsData_->v_time.size()),LogOrigin(className_,funcName,WHERE)) ) ;
621  //logsink_->postLocally( LogMessage("   v_time[0] = "+String::toString(vmsData_->v_time[0]),LogOrigin(className_,funcName,WHERE)) ) ;
622  //logsink_->postLocally( LogMessage("v_interval.size() = "+String::toString(vmsData_->v_interval.size()),LogOrigin(className_,funcName,WHERE)) ) ;
623  //logsink_->postLocally( LogMessage("   v_interval[0] = "+String::toString(vmsData_->v_interval[0]),LogOrigin(className_,funcName,WHERE)) ) ;
624  //logsink_->postLocally( LogMessage("v_atmPhaseCorrection.size() = "+String::toString(vmsData_->v_atmPhaseCorrection.size()),LogOrigin(className_,funcName,WHERE)) ) ;
625  //logsink_->postLocally( LogMessage("binNum = "+String::toString(vmsData_->binNum),LogOrigin(className_,funcName,WHERE)) ) ;
626  //logsink_->postLocally( LogMessage("v_projectPath.size() = "+String::toString(vmsData_->v_projectPath.size()),LogOrigin(className_,funcName,WHERE)) ) ;
627  //logsink_->postLocally( LogMessage("v_antennaId1.size() = "+String::toString(vmsData_->v_antennaId1.size()),LogOrigin(className_,funcName,WHERE)) ) ;
628  //logsink_->postLocally( LogMessage("v_antennaId2.size() = "+String::toString(vmsData_->v_antennaId2.size()),LogOrigin(className_,funcName,WHERE)) ) ;
629  //logsink_->postLocally( LogMessage("v_feedId1.size() = "+String::toString(vmsData_->v_feedId1.size()),LogOrigin(className_,funcName,WHERE)) ) ;
630  //logsink_->postLocally( LogMessage("v_feedId2.size() = "+String::toString(vmsData_->v_feedId2.size()),LogOrigin(className_,funcName,WHERE)) ) ;
631  //logsink_->postLocally( LogMessage("v_dataDescId.size() = "+String::toString(vmsData_->v_dataDescId.size()),LogOrigin(className_,funcName,WHERE)) ) ;
632  //logsink_->postLocally( LogMessage("v_timeCentroid.size() = "+String::toString(vmsData_->v_timeCentroid.size()),LogOrigin(className_,funcName,WHERE)) ) ;
633  //logsink_->postLocally( LogMessage("v_exposure.size() = "+String::toString(vmsData_->v_exposure.size()),LogOrigin(className_,funcName,WHERE)) ) ;
634  //logsink_->postLocally( LogMessage("v_numData.size() = "+String::toString(vmsData_->v_numData.size()),LogOrigin(className_,funcName,WHERE)) ) ;
635  //logsink_->postLocally( LogMessage("vv_dataShape.size() = "+String::toString(vmsData_->vv_dataShape.size()),LogOrigin(className_,funcName,WHERE)) ) ;
636  //logsink_->postLocally( LogMessage("v_m_data.size() = "+String::toString(vmsData_->v_m_data.size()),LogOrigin(className_,funcName,WHERE)) ) ;
637  //logsink_->postLocally( LogMessage("v_phaseDir.size() = "+String::toString(vmsData_->v_phaseDir.size()),LogOrigin(className_,funcName,WHERE)) ) ;
638  //logsink_->postLocally( LogMessage("v_stateId.size() = "+String::toString(vmsData_->v_stateId.size()),LogOrigin(className_,funcName,WHERE)) ) ;
639  //logsink_->postLocally( LogMessage("v_msState.size() = "+String::toString(vmsData_->v_msState.size()),LogOrigin(className_,funcName,WHERE)) ) ;
640  //logsink_->postLocally( LogMessage("v_flag.size() = "+String::toString(vmsData_->v_flag.size()),LogOrigin(className_,funcName,WHERE)) ) ;
641
642  dataIdList_.clear() ;
643  unsigned int numTotalData = vmsData_->v_m_data.size() ;
644  for ( unsigned int idata = 0 ; idata < numTotalData ; idata++ ) {
645    if ( vmsData_->v_antennaId1[idata] == (int)antennaId_
646         && vmsData_->v_antennaId2[idata] == (int)antennaId_ )
647      dataIdList_.push_back( idata ) ;
648  }
649  numData_ = dataIdList_.size() ;
650  //logsink_->postLocally( LogMessage("numData_ = "+String::toString(numData_),LogOrigin(className_,funcName,WHERE)) ) ;
651  //logsink_->postLocally( LogMessage("dataSize = "+String::toString(mainRow_[row_]->getDataSize()),LogOrigin(className_,funcName,WHERE)) ) ;
652
653  return true ;
654}
655
656void ASDMReader::prepareData( unsigned int idx )
657{
658  unsigned int i = dataIdList_[idx] ;
659  if ( i != dataIndex_ ) {
660    dataIndex_ = dataIdList_[idx] ;
661    Tag dataDescTag( vmsData_->v_dataDescId[dataIndex_], TagType::DataDescription ) ;
662    DataDescriptionRow *dataDescRow = asdm_->getDataDescription().getRowByKey( dataDescTag ) ;
663    specWinTag_ = dataDescRow->getSpectralWindowId() ;
664    specWinRow_p = dataDescRow->getSpectralWindowUsingSpectralWindowId() ;
665    polarizationRow_p = dataDescRow->getPolarizationUsingPolOrHoloId() ;
666    Tag fieldTag( vmsData_->v_fieldId[dataIndex_], TagType::Field ) ;
667    fieldRow_p = asdm_->getField().getRowByKey( fieldTag ) ;
668    double startSec = vmsData_->v_time[dataIndex_] - 0.5 * vmsData_->v_interval[dataIndex_] ;
669    timeInterval_ = ArrayTimeInterval( startSec*s2d, vmsData_->v_interval[dataIndex_]*s2d ) ;
670  }
671}
672
673casa::uInt ASDMReader::getIFNo( unsigned int idx )
674{
675  prepareData( idx ) ;
676  return getIFNo() ;
677}
678
679casa::uInt ASDMReader::getIFNo()
680{
681  map<Tag,casa::uInt>::iterator iter = ifno_.find( specWinTag_ ) ;
682  if ( iter != ifno_.end() )
683    return iter->second ;
684  else {
685    return 0 ;
686  }
687}
688
689int ASDMReader::getNumPol( unsigned int idx )
690{
691  prepareData( idx ) ;
692  return getNumPol() ;
693}
694
695int ASDMReader::getNumPol()
696{
697  return polarizationRow_p->getNumCorr() ;
698}
699
700void ASDMReader::getFrequency( unsigned int idx,
701                               double &refpix,
702                               double &refval,
703                               double &incr,
704                               string &freqref )
705{
706  prepareData( idx ) ;
707  getFrequency( refpix, refval, incr, freqref ) ;
708}
709
710void ASDMReader::getFrequency( double &refpix,
711                               double &refval,
712                               double &incr,
713                               string &freqref )
714{
715  casa::String funcName = "getFrequency" ;
716
717  int nchan = specWinRow_p->getNumChan() ;
718  freqref = "TOPO" ;
719  if ( specWinRow_p->isMeasFreqRefExists() )
720    freqref = CFrequencyReferenceCode::toString( specWinRow_p->getMeasFreqRef() ) ;
721  if ( nchan == 1 ) {
722    //logsink_->postLocally( LogMessage("channel averaged data",LogOrigin(className_,funcName,WHERE)) ) ;
723    refpix = 0.0 ;
724    incr = specWinRow_p->getTotBandwidth().get() ;
725    if ( specWinRow_p->isChanFreqStartExists() ) {
726      refval = specWinRow_p->getChanFreqStart().get() ;
727    }
728    else if ( specWinRow_p->isChanFreqArrayExists() ) {
729      refval = specWinRow_p->getChanFreqArray()[0].get() ;
730    }
731    else {
732      throw (casa::AipsError( "Either chanFreqArray or chanFreqStart must exist." )) ;
733    }     
734  }
735  else if ( nchan % 2 ) {
736    // odd
737    //logsink_->postLocally( LogMessage("odd case",LogOrigin(className_,funcName,WHERE)) ) ;
738    refpix = 0.5 * ( (double)nchan - 1.0 ) ;
739    int ic = ( nchan - 1 ) / 2 ;
740    if ( specWinRow_p->isChanWidthExists() ) {
741      incr = specWinRow_p->getChanWidth().get() ;
742    }
743    else if ( specWinRow_p->isChanWidthArrayExists() ) {
744      incr = specWinRow_p->getChanWidthArray()[0].get() ;
745    }
746    else {
747      throw (casa::AipsError( "Either chanWidthArray or chanWidth must exist." )) ;
748    }     
749    if ( specWinRow_p->isChanFreqStepExists() ) {
750      if ( specWinRow_p->getChanFreqStep().get() < 0.0 )
751        incr *= -1.0 ;
752    }
753    else if ( specWinRow_p->isChanFreqArrayExists() ) {
754      vector<Frequency> chanFreqArr = specWinRow_p->getChanFreqArray() ;
755      if ( chanFreqArr[0].get() > chanFreqArr[1].get() )
756        incr *= -1.0 ;
757    }
758    else {
759      throw (casa::AipsError( "Either chanFreqArray or chanFreqStep must exist." )) ;
760    }         
761    if ( specWinRow_p->isChanFreqStartExists() ) {
762      refval = specWinRow_p->getChanFreqStart().get() + refpix * incr ;
763    }
764    else if ( specWinRow_p->isChanFreqArrayExists() ) {
765      refval = specWinRow_p->getChanFreqArray()[ic].get() ;
766    }
767    else {
768      throw (casa::AipsError( "Either chanFreqArray or chanFreqStart must exist." )) ;
769    }     
770  }
771  else {
772    // even
773    //logsink_->postLocally( LogMessage("even case",LogOrigin(className_,funcName,WHERE)) ) ;
774    refpix = 0.5 * ( (double)nchan - 1.0 ) ;
775    int ic = nchan / 2 ;
776    if ( specWinRow_p->isChanWidthExists() ) {
777      incr = specWinRow_p->getChanWidth().get() ;
778    }
779    else if ( specWinRow_p->isChanWidthArrayExists() ) {
780      incr = specWinRow_p->getChanWidthArray()[0].get() ;
781    }
782    else {
783      throw (casa::AipsError( "Either chanWidthArray or chanWidth must exist." )) ;
784    }
785    if ( specWinRow_p->isChanFreqStepExists() ) {
786      if ( specWinRow_p->getChanFreqStep().get() < 0.0 )
787        incr *= -1.0 ;
788    }
789    else if ( specWinRow_p->isChanFreqArrayExists() ) {
790      vector<Frequency> chanFreqArr = specWinRow_p->getChanFreqArray() ;
791      if ( chanFreqArr[0].get() > chanFreqArr[1].get() )
792        incr *= -1.0 ;
793    }
794    else {
795      throw (casa::AipsError( "Either chanFreqArray or chanFreqStep must exist." )) ;
796    }         
797    if ( specWinRow_p->isChanFreqStartExists() ) {
798      refval = specWinRow_p->getChanFreqStart().get() + refpix * incr ;
799    }
800    else if ( specWinRow_p->isChanFreqArrayExists() ) {
801      vector<Frequency> freqs = specWinRow_p->getChanFreqArray() ;
802      refval = 0.5 * ( freqs[ic-1].get() + freqs[ic].get() ) ;     
803    }
804    else {
805      throw (casa::AipsError( "Either chanFreqArray or chanFreqStart must exist." )) ;
806    }     
807  }
808}
809
810double ASDMReader::getTime( unsigned int idx )
811{
812  prepareData( idx ) ;
813  return getTime() ;
814}
815
816double ASDMReader::getTime()
817{
818  double tsec = vmsData_->v_time[dataIndex_] ;
819  return tsec * s2d ;
820}
821
822double ASDMReader::getInterval( unsigned int idx )
823{
824  prepareData( idx ) ;
825  return getInterval() ;
826}
827
828double ASDMReader::getInterval()
829{
830  return vmsData_->v_interval[dataIndex_] ;
831}
832
833void ASDMReader::getSourceProperty( unsigned int idx,
834                                    string &srcname,
835                                    string &fieldname,
836                                    vector<double> &srcdir,
837                                    vector<double> &srcpm,
838                                    double &sysvel,
839                                    vector<double> &restfreq )
840{
841  prepareData( idx ) ;
842  getSourceProperty( srcname, fieldname, srcdir, srcpm, sysvel, restfreq ) ;
843}
844
845void ASDMReader::getSourceProperty( string &srcname,
846                                    string &fieldname,
847                                    vector<double> &srcdir,
848                                    vector<double> &srcpm,
849                                    double &sysvel,
850                                    vector<double> &restfreq )
851{
852  String funcName = "getSourceProperty" ;
853  ostringstream oss ;
854  oss << fieldRow_p->getFieldName() << "__" << vmsData_->v_fieldId[dataIndex_] ;
855  fieldname = oss.str() ;
856  SourceRow *srow = 0 ;
857  if ( fieldRow_p->isSourceIdExists() ) {
858    int sourceId = fieldRow_p->getSourceId() ;
859    srow = asdm_->getSource().getRowByKey( sourceId, timeInterval_, specWinTag_ ) ;
860  }
861  if ( srow != 0 ) {
862    //logsink_->postLocally( LogMessage("timeInterval_="+String::toString(timeInterval_.getStart().getMJD()),LogOrigin(className_,funcName,WHERE)) ) ;
863    //logsink_->postLocally( LogMessage("specWinTag_="+String::toString(specWinTag_.toString()),LogOrigin(className_,funcName,WHERE)) ) ;
864    //SourceRow *srow = asdm_->getSource().getRowByKey( sourceId, timeInterval_, specWinTag_ ) ;
865    //logsink_->postLocally( LogMessage("sourceId="+String::toString(sourceId),LogOrigin(className_,funcName,WHERE)) ) ;
866    //if ( srow == 0 )
867    //logsink_->postLocally( LogMessage("nullpo",LogOrigin(className_,funcName,WHERE)) ) ;
868
869    // source name
870    srcname = srow->getSourceName() ;
871    //logsink_->postLocally( LogMessage("srcname="+String::toString(srcname),LogOrigin(className_,funcName,WHERE)) ) ;
872
873    // source direction
874    vector<Angle> srcdirA = srow->getDirection() ;
875    srcdir.resize( 2 ) ;
876    srcdir[0] = limitedAngle( srcdirA[0].get() ) ;
877    srcdir[1] = limitedAngle( srcdirA[1].get() ) ;
878    //logsink_->postLocally( LogMessage("srcdir=["+String::toString(srcdir[0])+","+String::toString(srcdir[1])+"]",LogOrigin(className_,funcName,WHERE)) ) ;
879    if ( srow->isDirectionCodeExists() ) {
880      DirectionReferenceCodeMod::DirectionReferenceCode dircode = srow->getDirectionCode() ;
881      //logsink_->postLocally( LogMessage("dircode="+CDirectionReferenceCode::toString(dircode),LogOrigin(className_,funcName,WHERE)) ) ;
882      if ( dircode != DirectionReferenceCodeMod::J2000 ) {
883        // if not J2000, need direction conversion
884        String ref( CDirectionReferenceCode::toString( dircode ) ) ;
885        double mjd = vmsData_->v_time[dataIndex_] * s2d ;
886        srcdir = toJ2000( srcdir, ref, mjd, antennaPosition_ ) ;
887      }
888    }
889
890    // source proper motion
891    srcpm.resize( 2 ) ;
892    vector<AngularRate> srcpmA = srow->getProperMotion() ;
893    srcpm[0] = srcpmA[0].get() ;
894    srcpm[1] = srcpmA[1].get() ;
895    //logsink_->postLocally( LogMessage("srcpm=["+String::toString(srcpm[0])+","+String::toString(srcpm[1])+"]",LogOrigin(className_,funcName,WHERE)) ) ;
896    // systemic velocity
897    if ( srow->isSysVelExists() ) {
898      vector<Speed> sysvelV = srow->getSysVel() ;
899      if ( sysvelV.size() > 0 )
900        sysvel = sysvelV[0].get() ;
901    }
902    else {
903      sysvel = 0.0 ;
904    }
905    //logsink_->postLocally( LogMessage("sysvel="+String::toString(sysvel),LogOrigin(className_,funcName,WHERE)) ) ;
906    // rest frequency
907    if ( srow->isRestFrequencyExists() ) {
908      //logsink_->postLocally( LogMessage("restFrequency exists",LogOrigin(className_,funcName,WHERE)) ) ;
909      vector<Frequency> rf = srow->getRestFrequency() ;
910      restfreq.resize( rf.size() ) ;
911      for ( unsigned int i = 0 ; i < restfreq.size() ; i++ )
912        restfreq[i] = rf[i].get() ;
913    }
914    else {
915      restfreq.resize( 0 ) ;
916    }
917    //logsink_->postLocally( LogMessage("restfreq.size()="+String::toString(restfreq.size()),LogOrigin(className_,funcName,WHERE)) ) ;
918  }
919  else {
920    srcname = fieldRow_p->getFieldName() ;
921    srcdir.resize( 2 ) ;
922    srcdir[0] = 0.0 ;
923    srcdir[1] = 0.0 ;
924    srcpm = srcdir ;
925    sysvel = 0.0 ;
926    restfreq.resize( 0 ) ;
927  }
928}
929
930int ASDMReader::getSrcType( unsigned int scan,
931                            unsigned int subscan )
932{
933  int srctype = SrcType::NOTYPE ;
934  ScanRow *scanrow = asdm_->getScan().getRowByKey( execBlockTag_, (int)scan ) ;
935  ScanIntentMod::ScanIntent scanIntent = scanrow->getScanIntent()[0] ;
936  SubscanRow *subrow = asdm_->getSubscan().getRowByKey( execBlockTag_, (int)scan, (int)subscan ) ;
937  if ( subrow == 0 ) {
938    return srctype ;
939  }
940  SubscanIntentMod::SubscanIntent subIntent = subrow->getSubscanIntent() ;
941  SwitchingModeMod::SwitchingMode swmode = SwitchingModeMod::NO_SWITCHING ;
942  if ( subrow->isSubscanModeExists() )
943    swmode = subrow->getSubscanMode() ;
944  if ( scanIntent == ScanIntentMod::OBSERVE_TARGET ) {
945    // on sky scan
946    if ( swmode == SwitchingModeMod::NO_SWITCHING || swmode == SwitchingModeMod::POSITION_SWITCHING ) {
947      // position switching
948      // tentatively set NO_SWITCHING = POSITION_SWITCHING
949      if ( subIntent == SubscanIntentMod::ON_SOURCE ) {
950        srctype = SrcType::PSON ;
951      }
952      else if ( subIntent == SubscanIntentMod::OFF_SOURCE ) {
953        srctype = SrcType::PSOFF ;
954      }
955    }
956    else if ( swmode == SwitchingModeMod::FREQUENCY_SWITCHING ) {
957      // frequency switching
958      if ( subIntent == SubscanIntentMod::ON_SOURCE ) {
959        srctype = SrcType::FSON ;
960      }
961      else if ( subIntent == SubscanIntentMod::OFF_SOURCE ) {
962        srctype = SrcType::FSOFF ;
963      }
964    }
965    else if ( swmode == SwitchingModeMod::NUTATOR_SWITCHING ) {
966      // nutator switching
967      if ( subIntent == SubscanIntentMod::ON_SOURCE ) {
968        srctype = SrcType::PSON ;
969      }
970      else if ( subIntent == SubscanIntentMod::OFF_SOURCE ) {
971        srctype = SrcType::PSOFF ;
972      }
973    }
974    else {
975      // other switching mode
976      if ( subIntent == SubscanIntentMod::ON_SOURCE ) {
977        srctype = SrcType::SIG ;
978      }
979      else if ( subIntent == SubscanIntentMod::OFF_SOURCE ) {
980        srctype = SrcType::REF ;
981      }
982    }
983  }
984  else if ( scanIntent == ScanIntentMod::CALIBRATE_ATMOSPHERE ) {
985    if ( swmode == SwitchingModeMod::NO_SWITCHING || swmode == SwitchingModeMod::POSITION_SWITCHING ) {
986      // position switching
987      // tentatively set NO_SWITCHING = POSITION_SWITCHING
988      if ( subIntent == SubscanIntentMod::ON_SOURCE ) {
989        srctype = SrcType::PONCAL ;
990      }
991      else if ( subIntent == SubscanIntentMod::OFF_SOURCE ) {
992        srctype = SrcType::POFFCAL ;
993      }
994    }
995    else if ( swmode == SwitchingModeMod::FREQUENCY_SWITCHING ) {
996      // frequency switching
997      if ( subIntent == SubscanIntentMod::ON_SOURCE ) {
998        srctype = SrcType::FONCAL ;
999      }
1000      else if ( subIntent == SubscanIntentMod::OFF_SOURCE ) {
1001        srctype = SrcType::FOFFCAL ;
1002      }
1003    }
1004    else if ( swmode == SwitchingModeMod::NUTATOR_SWITCHING ) {
1005      // nutator switching
1006      if ( subIntent == SubscanIntentMod::ON_SOURCE ) {
1007        srctype = SrcType::PONCAL ;
1008      }
1009      else if ( subIntent == SubscanIntentMod::OFF_SOURCE ) {
1010        srctype = SrcType::POFFCAL ;
1011      }
1012    }
1013    else {
1014      // other switching mode
1015      if ( subIntent == SubscanIntentMod::ON_SOURCE ) {
1016        srctype = SrcType::CAL ;
1017      }
1018      else if ( subIntent == SubscanIntentMod::OFF_SOURCE ) {
1019        srctype = SrcType::CAL ;
1020      }
1021    }
1022  }
1023  else {
1024    // off sky (e.g. calibrator device) scan
1025    if ( subIntent == SubscanIntentMod::ON_SOURCE ) {
1026      srctype = SrcType::SIG ;
1027    }
1028    else if ( subIntent == SubscanIntentMod::OFF_SOURCE ) {
1029      srctype = SrcType::REF ;
1030    }
1031    else if ( subIntent == SubscanIntentMod::HOT ) {
1032      srctype = SrcType::HOT ;
1033    }
1034    else if ( subIntent == SubscanIntentMod::AMBIENT ) {
1035      srctype = SrcType::SKY ;
1036    }
1037    else {
1038      srctype = SrcType::CAL ;
1039    }
1040  }
1041
1042  return srctype ;
1043}
1044
1045unsigned int ASDMReader::getSubscanNo( unsigned int idx )
1046{
1047  prepareData( idx ) ;
1048  return getSubscanNo() ;
1049}
1050
1051unsigned int ASDMReader::getSubscanNo()
1052{
1053  return mainRow_[row_]->getSubscanNumber() ;
1054}
1055
1056void ASDMReader::getSourceDirection( vector<double> &dir, string &ref )
1057{
1058  dir.resize( 2 ) ;
1059  ref = "J2000" ; // default is J2000
1060  SourceTable &tab = asdm_->getSource() ;
1061  SourceRow *row = tab.get()[0] ;
1062  vector<Angle> dirA = row->getDirection() ;
1063  dir[0] = dirA[0].get() ;
1064  dir[1] = dirA[1].get() ;
1065  if ( row->isDirectionCodeExists() ) {
1066    ref = CDirectionReferenceCode::toString( row->getDirectionCode() ) ;
1067  }
1068}
1069
1070unsigned int ASDMReader::getFlagRow( unsigned int idx )
1071{
1072  prepareData( idx ) ;
1073  return getFlagRow() ;
1074}
1075
1076unsigned int ASDMReader::getFlagRow()
1077{
1078  return vmsData_->v_flag[dataIndex_] ;
1079}
1080
1081vector<unsigned int> ASDMReader::getDataShape( unsigned int idx )
1082{
1083  prepareData( idx ) ;
1084  return getDataShape() ;
1085}
1086
1087vector<unsigned int> ASDMReader::getDataShape()
1088{
1089  return vmsData_->vv_dataShape[dataIndex_] ;
1090}
1091
1092float * ASDMReader::getSpectrum( unsigned int idx )
1093{
1094  prepareData( idx ) ;
1095  return getSpectrum() ;
1096}
1097
1098float * ASDMReader::getSpectrum()
1099{
1100  map<AtmPhaseCorrection, float*> data = vmsData_->v_m_data[dataIndex_] ;
1101  //map<AtmPhaseCorrection, float*>::iterator iter = data.find(AP_UNCORRECTED) ;
1102  map<AtmPhaseCorrection, float*>::iterator iter = data.find(apc_) ;
1103  float *autoCorr = iter->second ;
1104  return autoCorr ;
1105}
1106
1107vector< vector<float> > ASDMReader::getTsys( unsigned int idx )
1108{
1109  prepareData( idx ) ;
1110  return getTsys() ;
1111}
1112
1113vector< vector<float> > ASDMReader::getTsys()
1114{
1115  vector< vector<float> > defaultTsys( 1, vector<float>( 1, 1.0 ) ) ;
1116  SysCalRow *scrow = getSysCalRow() ;
1117  if ( scrow != 0 && scrow->isTsysSpectrumExists() ) {
1118    vector< vector<Temperature> > tsysSpec = scrow->getTsysSpectrum() ;
1119    unsigned int numReceptor = tsysSpec.size() ;
1120    unsigned int numChan = tsysSpec[0].size() ;
1121    vector< vector<float> > tsys( numReceptor, vector<float>( numChan, 1.0 ) ) ;
1122    for ( unsigned int ir = 0 ; ir < numReceptor ; ir++ ) {
1123      for ( unsigned int ic = 0 ; ic < numChan ; ic++ ) {
1124        tsys[ir][ic] = tsysSpec[ir][ic].get() ;
1125      }
1126    }
1127    return tsys ;
1128  }
1129//   else if ( scrow->isTsysExists() ) {
1130//     vector<Temperature> tsysScalar = scrow->getTsys() ;
1131//     unsigned int numReceptor = tsysScalar.size() ;
1132//     vector< vector<float> > tsys( numReceptor ) ;
1133//     for ( unsigned int ir = 0 ; ir < numReceptor ; ir++ )
1134//       tsys[ir] = vector<float>( 1, tsysScalar[ir].get() ) ;
1135//     return tsys ;
1136//   }
1137  else {
1138    return defaultTsys ;
1139  }
1140}
1141
1142vector< vector<float> > ASDMReader::getTcal( unsigned int idx )
1143{
1144  prepareData( idx ) ;
1145  return getTcal() ;
1146}
1147
1148vector< vector<float> > ASDMReader::getTcal()
1149{
1150  vector< vector<float> > defaultTcal( 1, vector<float>( 1, 1.0 ) ) ;
1151  SysCalRow *scrow = getSysCalRow() ;
1152  if ( scrow != 0 && scrow->isTcalSpectrumExists() ) {
1153    vector< vector<Temperature> > tcalSpec = scrow->getTcalSpectrum() ;
1154    unsigned int numReceptor = tcalSpec.size() ;
1155    unsigned int numChan = tcalSpec[0].size() ;
1156    vector< vector<float> > tcal( numReceptor, vector<float>( numChan, 1.0 ) ) ;
1157    for ( unsigned int ir = 0 ; ir < numReceptor ; ir++ ) {
1158      for ( unsigned int ic = 0 ; ic < numChan ; ic++ ) {
1159        tcal[ir][ic] = tcalSpec[ir][ic].get() ;
1160      }
1161    }
1162    return tcal ;
1163  }
1164//   else if ( scrow->isTcalExists() ) {
1165//     vector<Temperature> tcalScalar = scrow->getTcal() ;
1166//     unsigned int numReceptor = tcalScalar.size() ;
1167//     vector< vector<float> > tcal( numReceptor, vector<float>( 1, 1.0 ) ) ;
1168//     for ( unsigned int ir = 0 ; ir < numReceptor ; ir++ )
1169//       tcal[ir][0] = tcalScalar[ir][0].get() ;
1170//     return tcal ;
1171//   }
1172  else {
1173    return defaultTcal ;
1174  }
1175}
1176
1177void ASDMReader::getTcalAndTsys( unsigned int idx,
1178                                 vector< vector<float> > &tcal,
1179                                 vector< vector<float> > &tsys )
1180{
1181  prepareData( idx ) ;
1182  getTcalAndTsys( tcal, tsys ) ;
1183}
1184
1185void ASDMReader::getTcalAndTsys( vector< vector<float> > &tcal,
1186                                 vector< vector<float> > &tsys )
1187{
1188  String funcName = "getTcalAndTsys" ;
1189
1190  vector< vector<float> > defaultT( 1, vector<float>( 1, 1.0 ) ) ;
1191  SysCalRow *scrow = getSysCalRow() ;
1192  //logsink_->postLocally( LogMessage("scrow = "+String::toString((long)scrow),LogOrigin(className_,funcName,WHERE)) ) ;
1193  if ( scrow == 0 ) {
1194    tcal = defaultT ;
1195    tsys = defaultT ;
1196  }
1197  else {
1198    if ( scrow->isTsysSpectrumExists() ) {
1199      vector< vector<Temperature> > tsysSpec = scrow->getTsysSpectrum() ;
1200      unsigned int numReceptor = tsysSpec.size() ;
1201      unsigned int numChan = tsysSpec[0].size() ;
1202      //logsink_->postLocally( LogMessage("TSYS: numReceptor = "+String::toString(numReceptor),LogOrigin(className_,funcName,WHERE)) ) ;
1203      //logsink_->postLocally( LogMessage("TSYS:numChan = "+String::toString(numChan),LogOrigin(className_,funcName,WHERE)) ) ;
1204      tsys.resize( numReceptor ) ;
1205      for ( unsigned int ir = 0 ; ir < numReceptor ; ir++ ) {
1206        tsys[ir].resize( numChan ) ;
1207        for ( unsigned int ic = 0 ; ic < numChan ; ic++ ) {
1208          tsys[ir][ic] = tsysSpec[ir][ic].get() ;
1209        }
1210      }
1211    }
1212    else {
1213      tsys = defaultT ;
1214    }
1215    if ( scrow->isTcalSpectrumExists() ) {
1216      vector< vector<Temperature> > tcalSpec = scrow->getTcalSpectrum() ;
1217      unsigned int numReceptor = tcalSpec.size() ;
1218      unsigned int numChan = tcalSpec[0].size() ;
1219      //logsink_->postLocally( LogMessage("TCAL: numReceptor = "+String::toString(numReceptor),LogOrigin(className_,funcName,WHERE)) ) ;
1220      //logsink_->postLocally( LogMessage("TCAL: numChan = "+String::toString(numChan),LogOrigin(className_,funcName,WHERE)) ) ;
1221      tcal.resize( numReceptor ) ;
1222      for ( unsigned int ir = 0 ; ir < numReceptor ; ir++ ) {
1223        tcal[ir].resize( numChan ) ;
1224        for ( unsigned int ic = 0 ; ic < numChan ; ic++ ) {
1225          tcal[ir][ic] = tcalSpec[ir][ic].get() ;
1226        }
1227      }
1228    }
1229    else {
1230      tcal = defaultT ;
1231    }
1232  }
1233}
1234
1235vector<float> ASDMReader::getOpacity( unsigned int idx )
1236{
1237  prepareData( idx ) ;
1238  return getOpacity() ;
1239}
1240
1241vector<float> ASDMReader::getOpacity()
1242{
1243  vector<float> tau(0) ;
1244  CalAtmosphereTable &atmtab = asdm_->getCalAtmosphere() ;
1245  unsigned int nrow = atmtab.size() ;
1246  if ( nrow > 0 ) {
1247    //int feedid = vmsData_->v_feedId1[index] ;
1248    //BasebandName bbname = spwrow->getBasebandName() ;
1249    //FeedRow *frow = asdm_->getFeed().getRowByKey( atag, spwtag, tint, feedid ) ;
1250    //int nfeed = frow->getNumReceptor() ;
1251    //vector<ReceiverRow *> rrows = frow->getReceivers() ;
1252    vector<CalAtmosphereRow *> atmrows = atmtab.get() ;
1253    //ReceiverBand rb = rrows[0]->getFrequencyBand() ;
1254    int row0 = -1 ;
1255    //double eps = DBL_MAX ;
1256    double eps = 1.0e10 ;
1257    for ( unsigned int irow = 0 ; irow < nrow ; irow++ ) {
1258      CalAtmosphereRow *atmrow = atmrows[irow] ;
1259      if ( casa::String(atmrow->getAntennaName()) != antennaName_
1260           //|| atmrow->getReceiverBand() != rb
1261           //|| atmrow->getBasebandName() != bbname
1262           || atmrow->getCalDataUsingCalDataId()->getCalType() != CalTypeMod::CAL_ATMOSPHERE )
1263        continue ;
1264      else {
1265        double dt = timeInterval_.getStart().getMJD() - atmrow->getEndValidTime().getMJD() ;
1266        if ( dt >= 0 && dt < eps ) {
1267          eps = dt ;
1268          row0 = (int)irow ;
1269        }
1270      }
1271    }
1272    if ( row0 != -1 ) {
1273      CalAtmosphereRow *atmrow = atmrows[row0] ;
1274      tau = atmrow->getTau() ;
1275    }
1276    else {
1277      tau.resize( 1 ) ;
1278      tau[0] = 0.0 ;
1279    }
1280  }
1281  else {
1282    tau.resize( 1 ) ;
1283    tau[0] = 0.0 ;
1284  }
1285  return tau ;
1286}
1287
1288void ASDMReader::getWeatherInfo( unsigned int idx,
1289                                 float &temperature,
1290                                 float &pressure,
1291                                 float &humidity,
1292                                 float &windspeed,
1293                                 float &windaz )
1294{
1295  prepareData( idx ) ;
1296  getWeatherInfo( temperature, pressure, humidity, windspeed, windaz ) ;
1297}
1298
1299void ASDMReader::getWeatherInfo( float &temperature,
1300                                 float &pressure,
1301                                 float &humidity,
1302                                 float &windspeed,
1303                                 float &windaz )
1304{
1305  casa::String funcName = "getWeatherInfo" ;
1306
1307  temperature = 0.0 ;
1308  pressure = 0.0 ;
1309  humidity = 0.0 ;
1310  windspeed = 0.0 ;
1311  windaz = 0.0 ;
1312
1313  //logsink_->postLocally( LogMessage("weatherStationId_ = "+String::toString(weatherStationId_),LogOrigin(className_,funcName,WHERE)) ) ;
1314
1315  WeatherTable &wtab = asdm_->getWeather() ;
1316  if ( wtab.size() == 0 || weatherStationId_ == -1 )
1317    return ;
1318
1319  Tag sttag( (unsigned int)weatherStationId_, TagType::Station ) ;
1320  //WeatherRow *wrow = wtab.getRowByKey( sttag, tint ) ;
1321  vector<WeatherRow *> *wrows = wtab.getByContext( sttag ) ;
1322  WeatherRow *wrow = (*wrows)[0] ;
1323  unsigned int nrow = wrows->size() ;
1324  //logsink_->postLocally( LogMessage("There are "+String::toString(nrow)+" rows for given context: stationId "+String::toString(weatherStationId_),LogOrigin(className_,funcName,WHERE)) ) ;
1325  ArrayTime startTime = getMidTime( timeInterval_ ) ;
1326  if ( startTime < (*wrows)[0]->getTimeInterval().getStart() ) {
1327    temperature = (*wrows)[0]->getTemperature().get() ;
1328    pressure = (*wrows)[0]->getPressure().get() ;
1329    humidity = (*wrows)[0]->getRelHumidity().get() ;
1330    windspeed = (*wrows)[0]->getWindSpeed().get() ;
1331    windaz = (*wrows)[0]->getWindDirection().get() ;
1332  }
1333  else if ( startTime > getEndTime( (*wrows)[nrow-1]->getTimeInterval() ) ) {
1334    temperature = (*wrows)[nrow-1]->getTemperature().get() ;
1335    pressure = (*wrows)[nrow-1]->getPressure().get() ;
1336    humidity = (*wrows)[nrow-1]->getRelHumidity().get() ;
1337    windspeed = (*wrows)[nrow-1]->getWindSpeed().get() ;
1338    windaz = (*wrows)[nrow-1]->getWindDirection().get() ;
1339  }
1340  else {
1341    for ( unsigned int irow = 1 ; irow < wrows->size() ; irow++ ) {
1342      wrow = (*wrows)[irow-1] ;
1343      ArrayTime tStart = wrow->getTimeInterval().getStart() ;
1344      ArrayTime tEnd = (*wrows)[irow]->getTimeInterval().getStart() ;
1345      if ( startTime >= tStart && startTime <= tEnd ) {
1346        temperature = wrow->getTemperature().get() ;
1347        pressure = wrow->getPressure().get() ;
1348        humidity = wrow->getRelHumidity().get() ;
1349        windspeed = wrow->getWindSpeed().get() ;
1350        windaz = wrow->getWindDirection().get() ;
1351        break ;
1352      }
1353    }
1354  }
1355
1356  // Pa -> hPa
1357  pressure /= 100.0 ;
1358
1359  return ;
1360}
1361
1362void ASDMReader::processStation()
1363{
1364  antennaPad_.resize(0) ;
1365  weatherStation_.resize(0) ;
1366  StationTable &stab = asdm_->getStation() ;
1367  vector<StationRow *> srows = stab.get() ;
1368  for ( unsigned int irow = 0 ; irow < srows.size() ; irow++ ) {
1369    StationTypeMod::StationType stype = srows[irow]->getType() ;
1370    Tag stag = srows[irow]->getStationId() ;
1371    if ( stype == StationTypeMod::ANTENNA_PAD )
1372      antennaPad_.push_back( stag ) ;
1373    else if ( stype == StationTypeMod::WEATHER_STATION )
1374      weatherStation_.push_back( stag ) ;
1375  }
1376
1377   weatherStationId_ = getClosestWeatherStation() ;
1378}
1379
1380int ASDMReader::getClosestWeatherStation()
1381{
1382  if ( weatherStation_.size() == 0 )
1383    return -1 ;
1384
1385  vector<double> apos( 3 ) ;
1386  StationTable &stab = asdm_->getStation() ;
1387  apos[0] = antennaPosition_[0].getValue( Unit("m") ) ;
1388  apos[1] = antennaPosition_[1].getValue( Unit("m") ) ;
1389  apos[2] = antennaPosition_[2].getValue( Unit("m") ) ;
1390 
1391  //double eps = DBL_MAX ;
1392  double eps = 1.0e10 ;
1393  int retval = -1 ;
1394  for ( unsigned int ir = 0 ; ir < weatherStation_.size() ; ir++ ) {
1395    StationRow *srow = stab.getRowByKey( weatherStation_[ir] ) ;
1396    vector<Length> wpos = srow->getPosition() ;
1397    double dist = (apos[0]-wpos[0].get())*(apos[0]-wpos[0].get())
1398      + (apos[1]-wpos[1].get())*(apos[1]-wpos[1].get())
1399      + (apos[2]-wpos[2].get())*(apos[2]-wpos[2].get()) ;
1400    if ( dist < eps ) {
1401      retval = (int)(weatherStation_[ir].getTagValue()) ;
1402    }
1403  }
1404
1405  return retval ;
1406}
1407
1408void ASDMReader::getPointingInfo( unsigned int idx,
1409                                  vector<double> &dir,
1410                                  double &az,
1411                                  double &el,
1412                                  vector<double> &srate )
1413{
1414  prepareData( idx ) ;
1415  getPointingInfo( dir, az, el, srate ) ;
1416}
1417
1418void ASDMReader::getPointingInfo( vector<double> &dir,
1419                                  double &az,
1420                                  double &el,
1421                                  vector<double> &srate )
1422{
1423  String funcName = "getPointingInfo" ;
1424
1425  dir.resize(0) ;
1426  az = -1.0 ;
1427  el = -1.0 ;
1428  srate.resize(0) ;
1429
1430  //Tag atag( antennaId_, TagType::Antenna ) ;
1431  //unsigned int index = dataIdList_[idx] ;
1432  //vector<PointingRow *> *prows = asdm_->getPointing().getByContext( atag ) ;
1433  vector<PointingRow *> *prows = asdm_->getPointing().getByContext( antennaTag_ ) ;
1434
1435  if ( prows == 0 )
1436    return ;
1437
1438  PointingRow *prow ;
1439  PointingRow *qrow ;
1440  //ArrayTimeInterval tint( vmsData_->v_time[index]*s2d, vmsData_->v_interval[index]*s2d ) ;
1441  //double startSec = vmsData_->v_time[index] - 0.5 * vmsData_->v_interval[index] ;
1442  //ArrayTimeInterval tint( startSec*s2d, vmsData_->v_interval[index]*s2d ) ;
1443
1444  unsigned int nrow = prows->size() ;
1445  //logsink_->postLocally( LogMessage("There are " << nrow << " rows for given context: antennaId "+String::toString(antennaId_),LogOrigin(className_,funcName,WHERE)) ) ;
1446
1447//   for ( unsigned int irow = 0 ; irow < nrow ; irow++ ) {
1448//     prow = (*prows)[irow] ;
1449//     ArrayTimeInterval ati = prow->getTimeInterval() ;
1450//     ArrayTime pst = ati.getStart() ;
1451//     ArrayTime pet( ati.getStartInMJD()+ati.getDurationInDays() ) ;
1452//     logsink_->postLocally( LogMessage("start: "+pst.toFITS(),LogOrigin(className_,funcName,WHERE)) ) ;
1453//     logsink_->postLocally( LogMessage("end: "+pet.toFITS(),LogOrigin(className_,funcName,WHERE)) ) ;
1454//   }
1455 
1456  srate.resize(2) ;
1457  srate[0] = 0.0 ;
1458  srate[1] = 0.0 ;
1459  az = 0.0 ;
1460  el = 0.0 ;
1461  //double tcen = 0.0 ;
1462  //double tcen = getMidTime( tint ).getMJD() ;
1463  double tcen = getMidTime( timeInterval_ ).getMJD() ;
1464
1465  //
1466  // shape of pointingDirection is (numSample,2) if usePolynomial = False, while it is
1467  // (numTerm,2) if usePolynomial = True.
1468  //
1469  // In the former case, typical sampled time interval is 48msec, which is very small
1470  // compared with typical integration time (~a few sec).
1471  // Scan rate for this case is always [0,0] (or get slope?).
1472  //
1473  // In the later case, scan rate is (pointingDirection[1][0],pointingDirection[1][1])
1474  //
1475  // PointingDirection seems to store AZEL
1476  //
1477  ArrayTimeInterval pTime0 = (*prows)[0]->getTimeInterval() ;
1478  ArrayTimeInterval pTime1 = (*prows)[nrow-1]->getTimeInterval() ;
1479  //if ( tint.getStartInMJD()+tint.getDurationInDays() < pTime0.getStartInMJD() ) {
1480  //if ( getEndTime( tint ) < getStartTime( pTime0 ) ) {
1481  if ( getEndTime( timeInterval_ ) < getStartTime( pTime0 ) ) {
1482    logsink_->postLocally( LogMessage( "ArrayTimeInterval out of bounds: no data for given position (tint < ptime)", LogOrigin(className_,funcName,WHERE), LogMessage::WARN ) ) ;
1483    prow = (*prows)[0] ;
1484    vector< vector<double> > dirA = pointingDir( prow ) ;
1485    az = dirA[0][0] ;
1486    el = dirA[0][1] ;
1487    if ( prow->getUsePolynomials() && prow->getNumTerm() > 1 ) {
1488      srate[0] = dirA[1][0] ;
1489      srate[1] = dirA[1][1] ;
1490    }     
1491  }
1492  //else if ( tint.getStartInMJD() > pTime1.getStartInMJD()+pTime1.getDurationInDays() ) {
1493  //else if ( getStartTime( tint ) > getEndTime( pTime1 ) ) {
1494  else if ( getStartTime( timeInterval_ ) > getEndTime( pTime1 ) ) {
1495    logsink_->postLocally( LogMessage( "ArrayTimeInterval out of bounds: no data for given position (tint > ptime)", LogOrigin(className_,funcName,WHERE), LogMessage::WARN ) ) ;
1496    prow = (*prows)[nrow-1] ;
1497    int numSample = prow->getNumSample() ;
1498    vector< vector<double> > dirA = pointingDir( prow ) ;
1499    if ( prow->getUsePolynomials() ) {
1500      az = dirA[0][0] ;
1501      el = dirA[0][1] ;
1502      if ( prow->getNumTerm() > 1 ) {
1503        srate[0] = dirA[1][0] ;
1504        srate[1] = dirA[1][1] ;
1505      }
1506    }
1507    else {
1508      az = dirA[numSample-1][0] ;
1509      el = dirA[numSample-1][1] ;
1510    }
1511  }
1512  else {
1513    //ArrayTime startTime = tint.getStart() ;
1514    //ArrayTime endTime = getEndTime( tint ) ;
1515    ArrayTime startTime = timeInterval_.getStart() ;
1516    ArrayTime endTime = getEndTime( timeInterval_ ) ;
1517    int row0 = -1 ;
1518    int row1 = -1 ;
1519    int row2 = -1 ;
1520    //double dt0 = getMidTime( tint ).getMJD() ;
1521    double dt0 = getMidTime( timeInterval_ ).getMJD() ;
1522    for ( unsigned int irow = 0 ; irow < nrow ; irow++ ) {
1523      prow = (*prows)[irow] ;
1524      //double dt = getMidTime( tint ).getMJD() - getMidTime( prow->getTimeInterval() ).getMJD() ;
1525      double dt = getMidTime( timeInterval_ ).getMJD() - getMidTime( prow->getTimeInterval() ).getMJD() ;
1526      if ( dt > 0 && dt < dt0 ) {
1527        dt0 = dt ;
1528        row2 = irow ;
1529      }
1530      if ( prow->getTimeInterval().contains( startTime ) )
1531        row0 = irow ;
1532      else if ( prow->getTimeInterval().contains( endTime ) )
1533        row1 = irow ;
1534      if ( row0 != -1 && row1 != -1 )
1535        break ;
1536    }
1537    //logsink_->postLocally( LogMessage("row0 = "+String::toString(row0)+", row1 = "+String::toString(row1)+", row2 = "+String::toString(row2),LogOrigin(className_,funcName,WHERE)) ) ;
1538    if ( row0 == -1 && row1 == -1 ) {
1539      prow = (*prows)[row2] ;
1540      qrow = (*prows)[row2+1] ;
1541      double t0 = getEndTime( prow->getTimeInterval() ).getMJD() ;
1542      double t1 = qrow->getTimeInterval().getStartInMJD() ;
1543      vector< vector<double> > dirA = pointingDir( prow ) ;
1544      vector< vector<double> > dirB = pointingDir( qrow ) ;
1545      double da0 = dirA[0][0] ;
1546      double db0 = dirB[0][0] ;
1547      double da1 = dirA[0][1] ;
1548      double db1 = dirB[0][1] ;
1549      if ( prow->getUsePolynomials() && qrow->getUsePolynomials() ) {
1550        double dt = ( tcen - t0 ) / ( t1 - t0 ) ;
1551        az = da0 + ( db0 - da0 ) * dt ;
1552        el = da1 + ( db1 - da1 ) * dt ;
1553        if ( prow->getNumTerm() > 0 && qrow->getNumTerm() > 1 ) {
1554          double ra0 = dirA[1][0] ;
1555          double rb0 = dirB[1][0] ;
1556          double ra1 = dirA[1][1] ;
1557          double rb1 = dirB[1][1] ;
1558          srate[0] = ra0 + ( rb0 - ra0 ) * dt ;
1559          srate[1] = ra1 + ( rb1 - ra1 ) * dt ;
1560        }
1561      }
1562      else if ( !(qrow->getUsePolynomials()) ) {
1563        double dt = ( tcen - t0 ) / ( t1 - t0 ) ;
1564        az = da0 + ( db0 - da0 ) * dt ;
1565        el = da1 + ( db1 - da1 ) * dt ;
1566      }
1567      //else {
1568      // nothing to do
1569      //}
1570    }
1571    else {
1572      int ndir = 0 ;
1573      if ( row0 == -1 ) {
1574        row0 = row1 ;
1575      }
1576      else if ( row1 == -1 ) {
1577        row1 = row0 ;
1578      }
1579      prow = (*prows)[row0] ;
1580      qrow = (*prows)[row1] ;
1581      if ( prow->getUsePolynomials() && qrow->getUsePolynomials() ) {
1582        //logsink_->postLocally( LogMessage("usePolynomial = True",LogOrigin(className_,funcName,WHERE)) ) ;
1583        if ( row0 == row1 ) {
1584          prow = (*prows)[row0] ;
1585          vector< vector<double> > dirA = pointingDir( prow ) ;
1586          az = dirA[0][0] ;
1587          el = dirA[0][1] ;
1588          if ( prow->getNumTerm() > 1 ) {
1589            srate[0] = dirA[1][0] ;
1590            srate[1] = dirA[1][1] ;
1591          }
1592        }
1593        else {
1594          prow = (*prows)[row0] ;
1595          qrow = (*prows)[row1] ;
1596          vector< vector<double> > dirA = pointingDir( prow ) ;
1597          vector< vector<double> > dirB = pointingDir( qrow ) ;
1598          double t0 = getMidTime( prow->getTimeInterval() ).getMJD() ;
1599          double t1 = getMidTime( qrow->getTimeInterval() ).getMJD() ;
1600          double dt = ( tcen - t0 ) / ( t1 - t0 ) ;
1601          double da0 = dirA[0][0] ;
1602          double db0 = dirB[0][0] ;
1603          double da1 = dirA[0][1] ;
1604          double db1 = dirB[0][1] ;
1605          az = da0 + ( db0 - da0 ) * dt ;
1606          el = da1 + ( db1 - db0 ) * dt ;
1607          if ( prow->getNumTerm() > 0 && qrow->getNumTerm() > 1 ) {
1608            double ra0 = dirA[1][0] ;
1609            double rb0 = dirB[1][0] ;
1610            double ra1 = dirA[1][1] ;
1611            double rb1 = dirB[1][1] ;
1612            srate[0] = ra0 + ( rb0 - ra0 ) * dt ;
1613            srate[1] = ra1 + ( rb1 - ra1 ) * dt ;
1614          }
1615        }
1616      }
1617      else if ( prow->getUsePolynomials() == qrow->getUsePolynomials() ) {
1618        //logsink_->postLocally( LogMessage("numSample == numTerm",LogOrigin(className_,funcName,WHERE)) ) ;
1619        tcen = 0.0 ;
1620        for ( int irow = row0 ; irow <= row1 ; irow++ ) {
1621          prow = (*prows)[irow] ;
1622          int numSample = prow->getNumSample() ;
1623          //logsink_->postLocally( LogMessage("numSample = "+String::toString(numSample),LogOrigin(className_,funcName,WHERE)) ) ;
1624          vector< vector<double> > dirA = pointingDir( prow ) ;
1625          if ( prow->isSampledTimeIntervalExists() ) {
1626            //logsink_->postLocally( LogMessage("sampledTimeIntervalExists",LogOrigin(className_,funcName,WHERE)) ) ;
1627            vector<ArrayTimeInterval> stime = prow->getSampledTimeInterval() ;
1628            for ( int isam = 0 ; isam < numSample ; isam++ ) {
1629              //if ( tint.overlaps( stime[isam] ) ) {
1630              //if ( tint.contains( stime[isam] ) ) {
1631              if ( timeInterval_.contains( stime[isam] ) ) {
1632                az += dirA[isam][0] ;
1633                el += dirA[isam][1] ;
1634                tcen += getMidTime( stime[isam] ).getMJD() ;
1635                ndir++ ;
1636              }
1637            }
1638          }
1639          else {
1640            double sampleStart = prow->getTimeInterval().getStartInMJD() ;
1641            double sampleInterval = prow->getTimeInterval().getDurationInDays() / (double)numSample ;
1642            //logsink_->postLocally( LogMessage("sampleStart = "+String::toString(sampleStart),LogOrigin(className_,funcName,WHERE)) )
1643            //logsink_->postLocally( LogMessage("sampleInterval = "+String::toString(sampleInterval),LogOrigin(className_,funcName,WHERE)) ) ;
1644            //logsink_->postLocally( LogMessage("tint = "+tint.toString(),LogOrigin(className_,funcName,WHERE)) ) ;
1645            for ( int isam = 0 ; isam < numSample ; isam++ ) {
1646              ArrayTimeInterval stime( sampleStart+isam*sampleInterval, sampleInterval ) ;
1647              //if ( tint.overlaps( stime ) ) {
1648              //if ( tint.contains( stime ) ) {
1649              if ( timeInterval_.contains( stime ) ) {
1650                az += dirA[isam][0] ;
1651                el += dirA[isam][1] ;
1652                tcen += getMidTime( stime ).getMJD() ;
1653                ndir++ ;
1654              }
1655            }
1656          }
1657        }
1658        if ( ndir > 1 ) {
1659          az /= (double)ndir ;
1660          el /= (double)ndir ;
1661          tcen /= (double)ndir ;
1662        }
1663      }
1664      //else {
1665      // nothing to do
1666      //}
1667    }
1668   
1669    toJ2000( dir, az, el, tcen, antennaPosition_ ) ;
1670  }
1671
1672  return ;
1673}
1674
1675ArrayTime ASDMReader::getMidTime( const ArrayTimeInterval &t )
1676{
1677  return ArrayTime( t.getStartInMJD() + 0.5 * t.getDurationInDays() ) ;
1678}
1679
1680ArrayTime ASDMReader::getEndTime( const ArrayTimeInterval &t )
1681{
1682  return ArrayTime( t.getStartInMJD() + t.getDurationInDays() ) ;
1683}
1684
1685ArrayTime ASDMReader::getStartTime( const ArrayTimeInterval &t )
1686{
1687  return ArrayTime( t.getStartInMJD() ) ;
1688}
1689
1690void ASDMReader::toJ2000( vector<double> &dir,
1691                          double &az,
1692                          double &el,
1693                          double &mjd,
1694                          casa::Vector<casa::Quantity> &antpos )
1695//                          casa::Vector<casa::Double> antpos )
1696{
1697  String funcName = "toJ2000" ;
1698
1699  String ref = "AZELGEO" ;
1700  vector<double> azel( 2 ) ;
1701  azel[0] = az ;
1702  azel[1] = el ;
1703  dir = toJ2000( azel, ref, mjd, antpos ) ;
1704}
1705
1706vector<double> ASDMReader::toJ2000( vector<double> &dir,
1707                                    casa::String &dirref,
1708                                    double &mjd,
1709                                    casa::Vector<casa::Quantity> &antpos )
1710//                                    casa::Vector<casa::Double> antpos )
1711{
1712  casa::String funcName = "toJ2000" ;
1713
1714  vector<double> newd( dir ) ;
1715  if ( dirref != "J2000" ) {
1716    casa::MEpoch me( casa::Quantity( (casa::Double)mjd, "d" ), casa::MEpoch::UTC ) ;
1717    casa::MPosition mp( casa::MVPosition( antpos ),
1718                        casa::MPosition::ITRF ) ;
1719    //ostringstream oss ;
1720    //mp.print( oss ) ;
1721    //logsink_->postLocally( LogMessage(oss.str(),LogOrigin(className_,funcName,WHERE)) ) ;
1722   
1723    casa::MeasFrame mf( me, mp ) ;
1724    casa::MDirection::Types dirtype ;
1725    casa::Bool b = casa::MDirection::getType( dirtype, dirref ) ;
1726    if ( b ) {
1727      casa::MDirection::Convert toj2000( dirtype,
1728                                         casa::MDirection::Ref( casa::MDirection::J2000, mf ) ) ;
1729      casa::Vector<casa::Double> cdir = toj2000( dir ).getAngle( "rad" ).getValue() ;
1730      //logsink_->postLocally( LogMessage("cdir = "+String::toString(cdir),LogOrigin(className_,funcName,WHERE)) ) ;
1731      newd[0] = (double)(cdir[0]) ;
1732      newd[1] = (double)(cdir[1]) ;
1733    }
1734  }
1735  return newd ;
1736}
1737
1738void ASDMReader::setLogger( CountedPtr<LogSinkInterface> &logsink )
1739{
1740  logsink_ = logsink ;
1741}
1742
1743string ASDMReader::getFrame()
1744{
1745  casa::String funcName = "getFrame" ;
1746 
1747  // default is TOPO
1748  string frame = "TOPO" ;
1749
1750  SpectralWindowTable &spwtab = asdm_->getSpectralWindow() ;
1751  vector<SpectralWindowRow *> rows = spwtab.get() ;
1752  vector<FrequencyReferenceCodeMod::FrequencyReferenceCode> measFreqRef( rows.size() ) ;
1753  int nref = 0 ;
1754  for ( unsigned int irow = 0 ; irow < rows.size() ; irow++ ) {
1755    int nchan = rows[irow]->getNumChan() ;
1756    if ( nchan != 4 ) {
1757      if ( rows[irow]->isMeasFreqRefExists() ) {
1758        measFreqRef[nref] = rows[irow]->getMeasFreqRef() ;
1759        nref++ ;
1760      }
1761    }
1762  }
1763  if ( nref != 0 ) {
1764    frame = CFrequencyReferenceCode::toString( measFreqRef[0] ) ;
1765  }
1766 
1767  //logsink_->postLocally( LogMessage("frame = "+String::toString(frame),LogOrigin(className_,funcName,WHERE)) ) ;
1768
1769  return frame ;
1770}
1771
1772int ASDMReader::getNumIFs()
1773{
1774  casa::String funcName = "getNumIFs" ;
1775
1776  int nif = 0 ;
1777  vector<SpectralWindowRow *> rows = asdm_->getSpectralWindow().get() ;
1778  unsigned int nrow = rows.size() ;
1779  // check if all rows have freqGroup attribute
1780  bool freqGroupExists = true ;
1781  bool countedWvr = false ;
1782  for ( unsigned int irow = 0 ; irow < nrow ; irow++ ) {
1783    freqGroupExists &= rows[irow]->isFreqGroupExists() ;
1784    if ( rows[irow]->getNumChan() == 4 ) {
1785      if ( !countedWvr ) {
1786        countedWvr = true ;
1787        nif++ ;
1788      }
1789    }
1790    else {
1791      nif++ ;
1792    }
1793  }
1794 
1795  if ( freqGroupExists ) {
1796    vector<int> freqGroup(0) ;
1797    for ( unsigned int irow = 0 ; irow < nrow ; irow++ ) {
1798      int fg = rows[irow]->getFreqGroup() ;
1799      if ( (int)count( freqGroup.begin(), freqGroup.end(), fg ) == 0 ) {
1800        freqGroup.push_back( fg ) ;
1801      }
1802    }
1803    nif = freqGroup.size() ;
1804  }
1805
1806  //logsink_->postLocally( LogMessage("nif = "+String::toString(nif),LogOrigin(className_,funcName,WHERE)) ) ;
1807
1808  return nif ;
1809}
1810
1811SysCalRow *ASDMReader::getSysCalRow( unsigned int idx )
1812{
1813  prepareData( idx ) ;
1814  return getSysCalRow() ;
1815}
1816
1817SysCalRow *ASDMReader::getSysCalRow()
1818{
1819  String funcName = "getSysCalRow" ;
1820
1821  SysCalRow *row = 0 ;
1822  int feedid = vmsData_->v_feedId1[dataIndex_] ;
1823  SysCalTable &sctab = asdm_->getSysCal() ;
1824  vector<SysCalRow *> *rows = sctab.getByContext( antennaTag_, specWinTag_, feedid ) ;
1825  //if ( nrow == 0 ) {
1826  if ( rows == 0 ) {
1827    //logsink_->postLocally( LogMessage("no rows in SysCal table",LogOrigin(className_,funcName,WHERE)) ) ;
1828    row = 0 ;
1829  }
1830  else {
1831    unsigned int nrow = rows->size() ;
1832    //logsink_->postLocally( LogMessage("nrow = "+String::toString(nrow),LogOrigin(className_,funcName,WHERE)) ) ;
1833    int scindex = -1 ;
1834    if ( nrow == 1 ) {
1835      scindex = 0 ;
1836    }
1837    else if ( getEndTime( timeInterval_ ) <= getStartTime( (*rows)[0]->getTimeInterval() ) )
1838      scindex = 0 ;
1839    else {
1840      for ( unsigned int irow = 0 ; irow < nrow-1 ; irow++ ) {
1841        ArrayTime t = getMidTime( timeInterval_ ) ;
1842        if ( t > getStartTime( (*rows)[irow]->getTimeInterval() )
1843             && t <= getStartTime( (*rows)[irow+1]->getTimeInterval() ) ) {
1844          scindex = irow ;
1845          break ;
1846        }
1847      }
1848      if ( scindex == -1 )
1849        scindex = nrow-1 ;
1850    }
1851    //logsink_->postLocally( LogMessage("irow = "+String::toString(scindex),LogOrigin(className_,funcName,WHERE)) ) ;
1852    row = (*rows)[scindex] ;
1853  }
1854  return row ;
1855}
1856
1857double ASDMReader::limitedAngle( double angle )
1858{
1859  if ( angle > C::pi )
1860    while ( angle > C::pi ) angle -= C::_2pi ;
1861  else if ( angle < -C::pi )
1862    while ( angle < -C::pi ) angle += C::_2pi ;
1863  return angle ;
1864}
1865
1866vector< vector<double> > ASDMReader::pointingDir( PointingRow *row )
1867{
1868  //String funcName = "pointingDir" ;
1869  vector< vector<Angle> > aTar = row->getTarget() ;
1870  vector< vector<Angle> > aOff = row->getOffset() ;
1871  vector< vector<Angle> > aDir = row->getPointingDirection() ;
1872  vector< vector<Angle> > aEnc = row->getEncoder() ;
1873  unsigned int n = aTar.size() ;
1874  vector< vector<double> > dir( n ) ;
1875  double factor = 1.0 / cos( aTar[0][1].get() ) ;
1876  for ( unsigned int i = 0 ; i < n ; i++ ) {
1877    dir[i].resize( 2 ) ;
1878    /**
1879     * This is approximate way to add offset taking tracking error
1880     * into account
1881     *
1882     * az = dir[0][0] = target[0][0] + offset[0][0] / cos(el)
1883     *                 + encorder[0][0] - direction[0][0]
1884     * el = dir[0][1] = target[0][1] + offset[0][1]
1885     *                 + encorder[0][1] - direction[0][1]
1886     **/
1887    dir[i][0] = aTar[i][0].get() + factor * aOff[i][0].get()
1888               + aEnc[i][0].get() - aDir[i][0].get() ;
1889    dir[i][1] = aTar[i][1].get() + aOff[i][1].get()
1890               + aEnc[i][1].get() - aDir[i][1].get() ;
1891    //logsink_->postLocally( LogMessage("tracking offset: ["+String::toString(aEnc[i][0].get()-aDir[i][0].get())+","+String::toString(aEnc[i][0]-aDir[i][0].get())+"]",LogOrigin(className_,funcName,WHERE)) ) ;
1892  }
1893  return dir ;
1894}
Note: See TracBrowser for help on using the repository browser.