wid2container.cc

Go to the documentation of this file.

#define TF_WID2CONTAINER_CC_VERSION \
  "TF_WID2CONTAINER_CC   V1.0   "

#include <cstring>
#include <fapidxx/helper.h>
#include <fapidxx/wid2container.h>
#include <fapidxx/error.h>

namespace fapidxx {

  void WID2container::setwid2(const std::string& line)
  {
    std::istringstream is(line);
    this->wid2.read(is);
    this->wasascii=true;
  } // void WID2container::setwid2(const std::string& line)

  /*----------------------------------------------------------------------*/

  void WID2container::setwid2(char *fstring, ftnlen slen)
  {
    /*
     * copy content immediately such that we do not rely on the ID string
     * being placed at byte offset 0 in WID2container::WID2struct
     */
    int w2size=sizeof(WID2container::WID2struct);
    FAPIDXX_assert(w2size<=slen,
                   "WID2container::setwid2: string is too short");
    WID2container::WID2struct* ws=new WID2container::WID2struct;
    std::memcpy(ws, fstring, w2size);
    // check for special ID, expect ASCII encoding if not ID does not match
    if (std::strncmp(ws->ID, WID2container::WID2struct::encodeID, 
                     WID2container::WID2struct::idlen)!=0)
    {
      this->setwid2(stringfromfstring(fstring, slen));
      this->wasascii=true;
    }
    else
    {
      /*
       * The byte sequence fstring points to is the content of a
       * WID2container::WID2struct struct. Create a WID2container::WID2struct
       * in memory, copy the memory contents fstring points to into
       * this struct and read the WID2 data from it.
       */
      this->wid2=ws->get();
      this->wasascii=false;
    }
    delete ws;
  } // void WID2container::setwid2(char *fstring, ftnlen slen)

  /*----------------------------------------------------------------------*/

  void WID2container::encode(char *fstring, ftnlen slen) const
  {
    if (this->wasascii)
    {
      this->encodeascii(fstring, slen);
    }
    else
    {
      this->encodebinary(fstring, slen);
    }
  } // void WID2container::encode(char *fstring, ftnlen slen)

  /*----------------------------------------------------------------------*/

  void WID2container::encodebinary(char *fstring, ftnlen slen) const
  {
    WID2container::WID2struct ws;
    ws.set(this->wid2);
    int w2size=sizeof(WID2container::WID2struct);
    FAPIDXX_assert(w2size<=slen,
                   "WID2container::encode: struct is too large");
    std::memcpy(fstring, &ws, w2size);
  } // void WID2container::encodebinary(char *fstring, ftnlen slen)

  /*----------------------------------------------------------------------*/

  void WID2container::encodeascii(char *fstring, ftnlen slen) const
  {
    fapidxx::fillfstring(this->wid2.line(), fstring, slen);
  } // void WID2container::encodeascii(char *fstring, ftnlen slen)

  /*======================================================================*/
  // WID2contsiner::WID2struct

  const char* WID2container::WID2struct::encodeID="WIDY";

  /*----------------------------------------------------------------------*/

  void WID2container::WID2struct::set(const ::sff::WID2& wid2)
  {
    strncpy(this->ID, WID2container::WID2struct::encodeID, idlen);
    strncpy(this->station, wid2.station.c_str(), slen);
    strncpy(this->channel, wid2.channel.c_str(), clen);
    strncpy(this->auxid, wid2.auxid.c_str(), alen);
    strncpy(this->instype, wid2.instype.c_str(), ilen);
    this->station[slen]='\0';
    this->channel[clen]='\0';
    this->auxid[alen]='\0';
    this->instype[ilen]='\0';
    this->hour=wid2.date.hour();
    this->minute=wid2.date.minute();
    this->second=wid2.date.second();
    this->milsec=wid2.date.milsec();
    this->micsec=wid2.date.micsec();
    this->year=wid2.date.year();
    this->month=wid2.date.month();
    this->day=wid2.date.day();
    this->calib=wid2.calib;
    this->calper=wid2.calper;
    this->dt=wid2.dt;
    this->nsamples=wid2.nsamples;
    this->vang=wid2.vang;
    this->hang=wid2.hang;
  } // void WID2container::WID2struct::set(const ::sff::WID2& wid2)

  /*----------------------------------------------------------------------*/

  ::sff::WID2 WID2container::WID2struct::get() const
  {
    ::sff::WID2 retval;
    libtime::TAbsoluteTime date(this->year, this->month, this->day,
                                this->hour, this->minute, this->second,
                                this->milsec, this->micsec);
    retval.date=date;
    retval.station=std::string(this->station);
    retval.channel=std::string(this->channel);
    retval.auxid=std::string(this->auxid);
    retval.instype=std::string(this->instype);
    retval.dt=this->dt;
    retval.nsamples=this->nsamples;
    retval.hang=this->hang;
    retval.vang=this->vang;
    retval.calib=this->calib;
    retval.calper=this->calper;
    return(retval);
  } // ::sff::WID2 WID2container::WID2struct::get() const

} // namespace fapidxx

/* ----- END OF wid2container.cc ----- */