source: trunk/src/duchamp.cc @ 884

// -----------------------------------------------------------------------
// duchamp.cc: Warning and Error messages.
// -----------------------------------------------------------------------
// Copyright (C) 2006, Matthew Whiting, ATNF
//
// This program is free software; you can redistribute it and/or modify it
// under the terms of the GNU General Public License as published by the
// Free Software Foundation; either version 2 of the License, or (at your
// option) any later version.
//
// Duchamp 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 more details.
//
// You should have received a copy of the GNU General Public License
// along with Duchamp; if not, write to the Free Software Foundation,
// Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA
//
// Correspondence concerning Duchamp may be directed to:
//    Internet email: Matthew.Whiting [at] atnf.csiro.au
//    Postal address: Dr. Matthew Whiting
//                    Australia Telescope National Facility, CSIRO
//                    PO Box 76
//                    Epping NSW 1710
//                    AUSTRALIA
// -----------------------------------------------------------------------
#include <iostream>
#include <stdexcept>
#include <iomanip>
#include <string>
#include <duchamp/duchamp.hh>

namespace duchamp
{

  void duchampWarning(std::string subroutine, std::string warning)
  {
    /**
     * Prints a WARNING message to the standard error stream, quoting
     * the subroutine that the problem occurred in, and a descriptive
     * warning text.
     *
     * Format: WARNING \<function\> : Something happened that you should be aware of.
     */
    std::string preamble = "WARNING <" + subroutine + "> : ";
    std::cerr << preamble;
    for(size_t i=0;i<warning.size();i++){
      std::cerr << warning[i];
      if((i!=warning.size()-1)&&(warning[i]=='\n')) 
        std::cerr << std::setw(preamble.size()) <<": ";
    }
  }

  DuchampError::DuchampError(const std::string& message)
    : std::runtime_error(message)
  {}

  DuchampError::~DuchampError() throw()
  {}

  void duchampError(std::string subroutine, std::string error)
  {
    /**
     * Prints an ERROR message to the standard error stream, quoting
     * the subroutine that the problem occurred in, a descriptive
     * warning text, and sounding the bell.
     *
     * Format: ERROR \<function\> : Something bad happened.
     */
    std::string preamble = "\aERROR <" + subroutine + "> : ";
    std::cerr << preamble;
    for(size_t i=0;i<error.size();i++){
      std::cerr << error[i];
      if((i!=error.size()-1)&&(error[i]=='\n'))
        std::cerr << std::setw(preamble.size()-1) <<": ";
    }

    size_t loc=0;
    //    std::cout << "|"<<error<<"|\n";
    while (loc=error.find('\n',loc+1),
           //      std::cout << loc << " " << error.size() << " " << std::string::npos << "\n",
           loc!=std::string::npos){
      if(loc!=error.size()-1) error.replace(loc,1," -- ");
      else error[loc]=' ';
      //      std::cout << "|"<<error<<"|\n";
    }

    throw DuchampError(error);
  }

}