Subversion Repositories w11

// $Id: RiosState.cpp 488 2013-02-16 18:49:47Z mueller $
//
// Copyright 2006-2011 by Walter F.J. Mueller <W.F.J.Mueller@gsi.de>
//
// This program is free software; you may redistribute and/or modify it under
// the terms of the GNU General Public License as published by the Free
// Software Foundation, either version 2, or at your option any later version.
//
// This program is distributed in the hope that it will be useful, but
// WITHOUT ANY WARRANTY, without even the implied warranty of MERCHANTABILITY
// or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
// for complete details.
// 
// Revision History: 
// Date         Rev Version  Comment
// 2011-01-30   357   1.0    Adopted from CTBioState
// 2006-04-16     -   -      Last change on CTBioState
// ---------------------------------------------------------------------------
 
/*!
  \file
  \version $Id: RiosState.cpp 488 2013-02-16 18:49:47Z mueller $
  \brief   Implemenation of RiosState.
*/
 
#include "RiosState.hpp"
 
using namespace std;
 
/*!
  \class Retro::RiosState
  \brief Stack object for ostream state. **
*/
 
//------------------------------------------+-----------------------------------
// all method definitions in namespace Retro
namespace Retro {
 
//! Construct with stream.
 
RiosState::RiosState(ios& stream)
  : fStream(stream)
{
  fOldFlags     = fStream.flags();
  fOldPrecision = -1;
  fOldFill      =  0;
  fCtype        =  0;
}
 
//------------------------------------------+-----------------------------------
//! Construct from stream and format.
 
RiosState::RiosState(ios& stream, const char* form, int prec)
  : fStream(stream)
{
  fOldFlags     = fStream.flags();
  fOldPrecision = -1;
  fOldFill      =  0;
  SetFormat(form, prec);
}
 
//------------------------------------------+-----------------------------------
//! Destructor.
 
RiosState::~RiosState()
{
  fStream.flags(fOldFlags);
  if (fOldPrecision >= 0) fStream.precision(fOldPrecision);
  if (fOldFill      != 0) fStream.fill(fOldFill);
}
 
//------------------------------------------+-----------------------------------
//! Setup format.
 
void RiosState::SetFormat(const char* form, int prec)
{
  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 (form == 0) form = "";	    // allow null as format
 
  for (c = *form++; ; c = *form++) {
    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 = *form++; }
  if (c != 0) c_fill = c;
 
  if (prec >= 0) {
    int i_old_precision = fStream.precision(prec);
    if (fOldPrecision < 0) fOldPrecision = i_old_precision;
  }
  if (c_fill != 0) {
    char c_old_fill = fStream.fill(c_fill);
    if (fOldFill == 0) fOldFill = c_old_fill;
  }
 
  fCtype = c_ctype;
 
  switch(c_ctype) {
    case 'd':
	b_internal = !b_minus & (c_fill == '0');
	fStream.setf(ios::dec,ios::basefield);
	break;
    case 'o':
	b_internal = !b_minus & (c_fill == '0');
	fStream.setf(ios::oct,ios::basefield);
	break;
    case 'x':
    case 'X':
	b_internal = !b_minus & (c_fill == '0');
	fStream.setf(ios::hex,ios::basefield);
	if (isupper(c_ctype)) fStream.setf(ios::uppercase);
	break;
    case 'g':
    case 'G':
	b_internal = !b_minus & (c_fill == '0');
	fStream.setf(ios_base::fmtflags(0),ios::floatfield);
	if (isupper(c_ctype)) fStream.setf(ios::uppercase);
	break;
    case 'f':
	b_internal = !b_minus & (c_fill == '0');
	fStream.setf(ios::fixed,ios::floatfield);
	break;
    case 'e':
    case 'E':
	b_internal = !b_minus & (c_fill == '0');
	fStream.setf(ios::scientific,ios::floatfield);
	if (isupper(c_ctype)) fStream.setf(ios::uppercase);
	break;
    case 's':
    case 'p':
    case 'c':
	break;
  }
 
  {
    ios_base::fmtflags l_flags = ios_base::fmtflags(0);
    if (b_plus)   l_flags |= ios::showpos;
    if (b_point)  l_flags |= ios::showpoint;
    if (b_dollar) l_flags |= ios::showbase;
    fStream.setf(l_flags);
    fStream.setf(b_internal ? ios::internal : 
                   (b_minus ? ios::left : ios::right), ios::adjustfield);
  }
}
 
} // end namespace Retro