gsexx_TCHK2.cc

Go to the documentation of this file.

#define TF_GSEXX_TCHK2_CC_VERSION \
  "TF_GSEXX_TCHK2_CC   V1.2"
#define TF_GSEXX_TCHK2_CC_CVSID \
  "$Id$"

#include<cmath>
#include <gsexx.h>
#include <sstream>
#include <cstdio>

namespace GSE2 {
namespace waveform {

namespace helper {

  intT abs(const intT& val)
  {
    return(val > 0 ? val : -val);
  } // int abs(const int* val)
  
} // namespace helper

const char* const TCHK2::GSEID="CHK2";

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

void TCHK2::add(const intT& value)
{
  const intT modulo=100000000; // a one and eight zeros
  intT sample_value=value;

  // check for sample value overflow 
  if (helper::abs(sample_value) >= modulo)
  {
    sample_value = sample_value - int(sample_value/modulo)*modulo;
  }

  // add the sample value to the checksum
  Msum += sample_value;

  // check for checksum overflow
  if (helper::abs(Msum) >= modulo)
  {
    Msum = Msum - int(Msum/modulo)*modulo;
  }
}

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

std::string TCHK2::write() const
{
  std::string retval("CHK2 ");
  char cvalue[10];
  std::sprintf(cvalue, "%8i\n", this->value());
  retval.append(cvalue);
  return(retval);
}

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

void TCHK2::read(std::istream& fis)
{
  // read lineID first to pass newline after last data character
  std::string lineID;
  fis >> lineID;
  // DEBUG: std::cerr << lineID << std::endl;
  // now read a full line to chomp newline after checksum too
  std::string theline;
  // DEBUG: std::cerr << theline << std::endl;
  std::getline(fis, theline);
  std::istringstream is(theline);
  if (!GSEIDmatch<TCHK2>(lineID)) throw
     Terror("ERROR (CHK2::read): missing CHK2 line!");
  is >> this->Msum;
/* former code (01/07/2005)
  std::string lineID;
  is >> lineID;
  if (!GSEIDmatch<TCHK2>(lineID)) throw
    Terror("ERROR (TCHK2::read): missing CHK2 line!");
  is >> this->Msum;
*/
}

} // namespace waveform
} // namespace GSE2

/* ----- END OF gsexx_TCHK2.cc ----- */