writer_utils.cc

Go to the documentation of this file.

// Write utilities implementation -*- C++ -*-

// $Id: writer_utils.cc 875 2009-02-13 13:10:41Z dferi $
// Copyright (C) 2001-2003 Hermann Schichl, Oleg Shcherbina
//
// This file is part of the COCONUT API.  This library
// is free software; you can redistribute it and/or modify it under the
// terms of the Library GNU General Public License as published by the
// Free Software Foundation; either version 2, or (at your option)
// any later version.

// This library 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
// Library GNU General Public License for more details.

// As a special exception, you may use this file as part of a free software
// library without restriction.  Specifically, if other files instantiate
// templates or use macros or inline functions from this file, or you compile
// this file and link it with other files to produce an executable, this
// file does not by itself cause the resulting executable to be covered by
// the Library GNU General Public License.  This exception does not however
// invalidate any other reasons why the executable file might be covered by
// the Library GNU General Public License.

#include <coconut_config.h>
#include <writer_utils.h>
#include <sstream>
#include <algorithm>
#include <api_exception.h>
#include <infinity.h>

namespace coco {

std::string i2a(int x)
{
  std::stringstream s;
  std::string t;
  s << x;
  s >> t;
  return std::string(s.str());
}

std::string datetime(const struct tm *timeptr)
{
  std::string month = i2a(timeptr->tm_mon+1);
  if(timeptr->tm_mon+1 < 10)
    month = '0'+ i2a(timeptr->tm_mon+1);
  else
    month =  i2a(timeptr->tm_mon+1);
  std::string minute;
  if(timeptr->tm_min+1 < 10)
    minute = '0'+ i2a(timeptr->tm_min);
  else
    minute =  i2a(timeptr->tm_min);
  std::string second;
  if(timeptr->tm_sec < 10)
    second = '0'+ i2a(timeptr->tm_sec);
  else
    second =  i2a(timeptr->tm_min);
  return std::string("at ") + i2a(timeptr->tm_mday)+ '/' + month + '/' +
         i2a(1900 + timeptr->tm_year)+ ' ' + i2a(timeptr->tm_hour)+ ':' +
         minute + ':' + second;
}

std::string localdatetime()
{
  time_t rawtime;
  struct tm * timeinfo;
                                                                                                                                              
  time ( &rawtime );
  timeinfo = localtime ( &rawtime );
  return datetime(timeinfo);
}

std::string e2D(double x)
{
  std::ostringstream os;
  os.setf(std::ios::scientific, std::ios::floatfield);
  os.precision(18);
  os << double_out(x);
  std::string s;
  s = os.str();
  replace(s.begin(),s.end(),'e','D');
  return s;
}

#ifdef COCONUT_WINDOWS
} // namespace coco

#include <cstdarg>
#include <vsscanfwr.h>

namespace coco {

// I HATE WINDOWS FOR THAT (AND FOR OTHER THINGS, AS WELL)
// very stupid hack required for @@=))$//(=!"§/(="!§ windows to read in ***doubles*** properly!
int coconut_sscanfdouble(double* d, const char* cp, const char* format, ...)
{
  char *form = (char *) malloc(strlen(format)+7);
  char buf[101];
  int ret;
  if(strlen(format) > 0)
  {
    strcpy(form, format);
    strcat(form, " %100s");
    va_list args;
    va_start(args, format);
    ret = vsscanfwr(cp, form, buf, args);
    va_end(args);
  }
  else
  {
        strncpy(buf, cp, 100);
        ret = 1;
  }
  if(!strncmp(buf, "inf", 3))
    *d = COCO_INF;
  else if(!strncmp(buf, "-inf", 4))
    *d = -COCO_INF;
  else if(sscanf(buf, "%lf", d) != 1)
    ret--;
  free(form);
  return ret;
}
#endif

} // namespace coco

---