---

CTBioState.cxx

Go to the documentation of this file.

/*----------------------------------------------------------------------------*/
/* C Tool Box: Designed and implemented by:                                   */
/*    Walter F.J. Mueller   Gesellschaft fuer Schwerionenforschung (GSI)      */
/*                          Planckstrasse 1, D-64291 Darmstadt, Germany       */
/*                  Email:  W.F.J.Mueller@gsi.de                              */
/*                  WWW:    http://www-kp3.gsi.de/www/kp3/people/mueller.html */
/*------------------------------------------+---------------------------------*/

#include    <ctype.h>

#include    "CTB.hxx"
#include    "CTBioState.hxx"

//------------------------------------------+-----------------------------------

CTBioState::CTBioState(ios& stream)
  : m_stream(stream)
{
  ml_old_flags     = m_stream.flags();
  mi_old_precision = -1;
  mc_old_fill      =  0;
  mc_ctype         =  0;
}

//------------------------------------------+-----------------------------------

CTBioState::CTBioState(ios& stream, const char* c_format, int i_precision)
  : m_stream(stream)
{
  ml_old_flags     = m_stream.flags();
  mi_old_precision = -1;
  mc_old_fill      =  0;
  SetFormat(c_format, i_precision);
}

//------------------------------------------+-----------------------------------

CTBioState::~CTBioState()
{
  m_stream.flags(ml_old_flags);
  if (mi_old_precision >= 0) m_stream.precision(mi_old_precision);
  if (mc_old_fill      != 0) m_stream.fill(mc_old_fill);
}

//------------------------------------------+-----------------------------------

void CTBioState::SetFormat(const char* c_format, int i_precision)
{
  bool    b_plus      = false;
  bool    b_minus     = false;
  bool    b_point     = false;
  bool    b_dollar    = false;
  bool    b_internal  = false;
  char    c_ctype     = 0;
  char    c_fill      = 0;
  char    c;

  if (c_format == 0) c_format = "";         // allow null as format

  for (c = *c_format++; ; c = *c_format++) {
    if (c == '+') { b_plus   = true; continue;}
    if (c == '-') { b_minus  = true; continue;}
    if (c == '.') { b_point  = true; continue;}
    if (c == '$') { b_dollar = true; continue;}
    break;
  }

  if (c != 0 && isalpha(c)) { c_ctype = c; c = *c_format++; }
  if (c != 0) c_fill = c;

  if (i_precision >= 0) {
    int i_old_precision = m_stream.precision(i_precision);
    if (mi_old_precision < 0) mi_old_precision = i_old_precision;
  }
  if (c_fill != 0) {
    char c_old_fill = m_stream.fill(c_fill);
    if (mc_old_fill == 0) mc_old_fill = c_old_fill;
  }

  mc_ctype = c_ctype;

  switch(c_ctype) {
    case 'd':
        b_internal = !b_minus & (c_fill == '0');
        m_stream.setf(ios::dec,ios::basefield);
        break;
    case 'o':
        b_internal = !b_minus & (c_fill == '0');
        m_stream.setf(ios::oct,ios::basefield);
        break;
    case 'x':
    case 'X':
        b_internal = !b_minus & (c_fill == '0');
        m_stream.setf(ios::hex,ios::basefield);
        if (isupper(c_ctype)) m_stream.setf(ios::uppercase);
        break;
    case 'g':
    case 'G':
        b_internal = !b_minus & (c_fill == '0');
        m_stream.setf(0,ios::floatfield);
        if (isupper(c_ctype)) m_stream.setf(ios::uppercase);
        break;
    case 'f':
        b_internal = !b_minus & (c_fill == '0');
        m_stream.setf(ios::fixed,ios::floatfield);
        break;
    case 'e':
    case 'E':
        b_internal = !b_minus & (c_fill == '0');
        m_stream.setf(ios::scientific,ios::floatfield);
        if (isupper(c_ctype)) m_stream.setf(ios::uppercase);
        break;
    case 's':
    case 'p':
    case 'c':
        break;
  }

  {
    long l_flags = 0;
    if (b_plus)   l_flags |= ios::showpos;
    if (b_point)  l_flags |= ios::showpoint;
    if (b_dollar) l_flags |= ios::showbase;
    m_stream.setf(l_flags);
    m_stream.setf( b_internal ? ios::internal :
                   b_minus    ? ios::left : ios::right, ios::adjustfield);
  }
}

//------------------------------------------+-----------------------------------
#if (defined(CTB__OutLine) || defined(CTBioState__OutLine))
#define inline
#include "CTBioState.icc"
#undef  inline
#endif

---