STK_Binary.h

Go to the documentation of this file.

/*--------------------------------------------------------------------*/
/*     Copyright (C) 2007-2015  Serge Iovleff
 
    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU Lesser General Public License as
    published by the Free Software Foundation; either version 2 of the
    License, 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 Lesser General Public License for more details.
 
    You should have received a copy of the GNU Lesser General Public
    License along with this program; if not, write to the
    Free Software Foundation, Inc.,
    59 Temple Place,
    Suite 330,
    Boston, MA 02111-1307
    USA
 
    Contact : S..._Dot_I..._At_stkpp_Dot_org (see copyright for ...)
*/
 
/*
 * Project:  Base
 * Purpose:  Define the fundamental type Binary.
 * Author:   Serge Iovleff, S..._Dot_I..._At_stkpp_Dot_org (see copyright for ...)
 *
 **/
 
#ifndef STK_BINARY_H
#define STK_BINARY_H
 
#include <map>
 
namespace STK
{
enum Binary
{ zero_ =0, 
  one_  =1, 
  binaryNA_=INT_MIN 
};
 
 template<>
 struct Arithmetic<Binary> : public std::numeric_limits<Binary>
 {
   static inline Binary NA() throw() { return binaryNA_;}
   static const bool hasNA = true;
   static inline bool isNA(const Binary& x) throw() { return (x==binaryNA_);}
   static inline bool isInfinite(const Binary& x) throw() { return false; }
   static inline bool isFinite(const Binary& x) throw() { return (!isNA(x) && !isInfinite(x));}
 };
 
template<>
struct IdTypeImpl<Binary>
{
  static inline Base::IdType returnType() { return(Base::binary_);}
};
inline ostream& operator << (ostream& os, Binary const& value)
{
  return Arithmetic<Binary>::isNA(value) ? (os <<  stringNa)
                                         : (os << static_cast<int>(value));
}
 
inline istream& operator >> (istream& is, Binary& value)
{
  int res;
  // try to read an integer
  if (!(is >> res).fail())
  {
    switch (res)
    {
      case 0:
        value = zero_;
        break;
      case 1:
        value = one_;
        break;
      default:
        value = binaryNA_;
        break;
    }
  }
  else
  { value = binaryNA_; is.clear(); is.setstate(std::ios::failbit);}
  return is;
}
 
inline Binary stringToBinary( String const& str)
{
  if (toUpperString(str) == toUpperString(_T("0"))) return zero_;
  if (toUpperString(str) == toUpperString(_T("1"))) return one_;
  return binaryNA_;
}
 
inline Binary stringToBinary( String const& str, std::map<String, Binary> const& mapping)
{
  std::map<String, Binary>::const_iterator it=mapping.find(str);
  return (it == mapping.end()) ? binaryNA_ : it->second;
}
 
inline String binaryToString( Binary const& value, std::ios_base& (*f)(std::ios_base&) = std::dec)
{
  if (Arithmetic<Binary>::isNA(value)) return stringNa;
  ostringstream os;
  os << f << static_cast<int>(value);
  return os.str();
}
 
inline String binaryToString( Binary const& value, std::map<Binary, String> const& mapping)
{
  std::map<Binary, String>::const_iterator it=mapping.find(value);
  return (it == mapping.end()) ? Arithmetic<String>::NA() : it->second;
}
 
template<>
inline Binary stringToType<Binary>( String const& str)
{ return stringToBinary(str);}
 
template<>
inline String typeToString<Binary>( Binary const& t, std::ios_base& (*f)(std::ios_base&))
{ return binaryToString(t);}
 
} // namespace STK
 
#endif /*STK_BINARY_H*/