QGpCoreTools/Number.h

Go to the documentation of this file.

/***************************************************************************
**
**  This file is part of QGpCoreTools.
**
**  This library 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.1 of the License, or (at your option) any later version.
**
**  This file 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 library; if not, write to the Free Software
**  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
**
**  See http://www.geopsy.org for more information.
**
**  Created : 2008-03-28
**  Authors :
**    Marc Wathelet
**    Marc Wathelet (LGIT, Grenoble, France)
**
***************************************************************************/

#ifndef NUMBER_H
#define NUMBER_H

#include "QGpCoreToolsDLLExport.h"
#include "Trace.h"
#include "Complex.h"
#include "Translations.h"

namespace QGpCoreTools {

#ifdef BIGNUM
#include <mp/mpreal.h>
#endif

class QGPCORETOOLS_EXPORT Number
{
  TRANSLATIONS("Number");
public:
  enum Type {Fixed=0, Scientific, Weeks, Days, Hours, Minutes, Seconds};

  static unsigned int nextPowerOfTwo(unsigned int val);
  static inline double sign(double val);
  static inline int sign(int val);
  static inline Type type(char t);
  static inline char type(Type t);

  static inline QString toString(double val, Type t, int precision);
  static inline QString toString(double val, int precision);
  static inline QString toString(const Complex& val, int precision);

  static inline double toDouble(const QString& str, Type t, bool * ok=0);

  static double toDouble(float f);
  static double toDouble(const Complex & c) {return c.abs();}
  static double toDouble(double a) {return a;}
#ifdef BIGNUM
  static double toDouble(mp_real a) {return dble(a);}
#endif
  static unsigned char fromBinaryCodedDecimal(unsigned char bcd);
  static unsigned short fromBinaryCodedDecimal(unsigned short bcd);
  static unsigned int fromBinaryCodedDecimal(unsigned int bcd);
  static unsigned char toBinaryCodedDecimal(unsigned char val);
  static unsigned short toBinaryCodedDecimal(unsigned short val);
  static unsigned int toBinaryCodedDecimal(unsigned int val);

  static QList<int> divisors(int n);

  static QString secondsToTime(double sec, Number::Type type=Number::Weeks, int numberPrecision=-1);
  static double timeToSeconds(const QString& str);
private:
  inline static bool timeToSecondsSign(const QChar * p, int& i, int n);
  static double timeToSecondsError(const QString& str, int pos);
};

inline double abs(double a)
{
  return ::fabs(a);
}

inline double abs2(double a)
{
  return a*a;
}

inline Number::Type Number::type(char t)
{
  switch(t) {
  case 'e':
    return Scientific;
  case 't': // Compatibility
  case 'w':
    return Weeks;
  case 'd':
    return Days;
  case 'h':
    return Hours;
  case 'm':
    return Minutes;
  case 's':
    return Seconds;
  default:
    return Fixed;
  }
}

inline char Number::type(Type t)
{
  switch(t) {
  case Fixed:
    break;
  case Scientific:
    return 'e';
  case Weeks:
    return 'w';
  case Days:
    return 'd';
  case Hours:
    return 'h';
  case Minutes:
    return 'm';
  case Seconds:
    return 's';
  }
  return 'f';
}

inline double Number::toDouble(const QString& str, Type t, bool * ok)
{
  switch(t) {
  case Fixed:
  case Scientific:
    return str.toDouble(ok);
  case Weeks:
  case Days:
  case Hours:
  case Minutes:
  case Seconds:
    return timeToSeconds(str);
  }
  return 0.0;
}

inline QString Number::toString(double val, Type t, int precision)
{
  switch(t) {
  case Fixed:
    return QString::number(val, 'f', precision);
  case Scientific:
    return QString::number(val, 'e', precision);
  case Weeks:
  case Days:
  case Hours:
  case Minutes:
  case Seconds:
    return secondsToTime(val, t, precision);
  }
  return QString::null;
}

inline QString Number::toString(double val, int precision)
{
  return QString::number(val, 'g', precision);
}

inline QString Number::toString(const Complex& val, int precision)
{
  return val.toString(precision);
}

inline double Number::sign(double val)
{
  if(val>0.0) {
    return 1.0;
  } else if(val<0.0) {
    return -1.0;
  } else {
    return 0.0;
  }
}

inline int Number::sign(int val)
{
  if(val>0) {
    return 1;
  } else if(val<0) {
    return -1;
  } else {
    return 0;
  }
}

} // namespace QGpCoreTools

#endif // NUMBER_H