parameters.h

Go to the documentation of this file.

// The libMesh Finite Element Library.
// Copyright (C) 2002-2018 Benjamin S. Kirk, John W. Peterson, Roy H. Stogner

// 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 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 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA



#ifndef LIBMESH_PARAMETERS_H
#define LIBMESH_PARAMETERS_H

// C++ includes
#include <typeinfo>
#include <string>
#include <map>

// Local includes
#include "libmesh/libmesh_common.h"
#include "libmesh/reference_counted_object.h"
#include "libmesh/print_trace.h"

// C++ includes
#include <cstddef>
#include <map>
#include <string>
#include <typeinfo>
#include <sstream>

namespace libMesh
{
template<typename P>
void print_helper(std::ostream & os, const P * param);

template<typename P>
void print_helper(std::ostream & os, const std::vector<P> * param);

template<typename P>
void print_helper(std::ostream & os, const std::vector<std::vector<P>> * param);

class Parameters
{
public:

  Parameters () {}

  Parameters (const Parameters &);

  virtual ~Parameters ();

  virtual Parameters & operator= (const Parameters & source);

  virtual Parameters & operator+= (const Parameters & source);

  template <typename T>
  bool have_parameter (const std::string &) const;

  template <typename T>
  const T & get (const std::string &) const;

  template <typename T>
  void insert (const std::string &);

  template <typename T>
  T & set (const std::string &);

  virtual void set_attributes(const std::string &, bool /*inserted_only*/) {}

  void remove (const std::string &);

  std::size_t n_parameters () const { return _values.size(); }

#ifdef LIBMESH_HAVE_RTTI

  template <typename T>
  unsigned int n_parameters () const;
#endif // LIBMESH_HAVE_RTTI

  virtual void clear ();

  void print (std::ostream & os=libMesh::out) const;

  class Value : public ReferenceCountedObject<Value>
  {
  public:

    virtual ~Value() {}

#ifdef LIBMESH_HAVE_RTTI

    virtual std::string type () const = 0;
#endif // LIBMESH_HAVE_RTTI

    virtual void print(std::ostream &) const = 0;

    virtual Value * clone () const = 0;
  };

  template <typename T>
  class Parameter : public Value
  {
  public:

    const T & get () const { return _value; }

    T & set () { return _value; }

#ifdef LIBMESH_HAVE_RTTI

    virtual std::string type () const;
#endif // LIBMESH_HAVE_RTTI

    virtual void print(std::ostream &) const;

    virtual Value * clone () const;

  private:
    T _value;
  };

  typedef std::map<std::string, Value *>::iterator iterator;

  typedef std::map<std::string, Value *>::const_iterator const_iterator;

  iterator begin();

  const_iterator begin() const;

  iterator end();

  const_iterator end() const;

protected:

  std::map<std::string, Value *> _values;

};

// ------------------------------------------------------------
// Parameters::Parameter<> class inline methods

// This only works with Run-Time Type Information, even though
// typeid(T) *should* be determinable at compile time regardless...
#ifdef LIBMESH_HAVE_RTTI
template <typename T>
inline
std::string Parameters::Parameter<T>::type () const
{
  return demangle(typeid(T).name());
}
#endif

template <typename T>
inline
void Parameters::Parameter<T>::print (std::ostream & os) const
{
  // Call helper function overloaded for basic scalar and vector types
  print_helper(os, static_cast<const T *>(&_value));
}

template <typename T>
inline
Parameters::Value * Parameters::Parameter<T>::clone () const
{
  Parameter<T> * copy = new Parameter<T>;

  libmesh_assert(copy);

  copy->_value = _value;

  return copy;
}


// ------------------------------------------------------------
// Parameters class inline methods
inline
void Parameters::clear () // since this is inline we must define it
{                         // before its first use (for some compilers)
  while (!_values.empty())
    {
      Parameters::iterator it = _values.begin();

      delete it->second;
      it->second = nullptr;

      _values.erase(it);
    }
}



inline
Parameters & Parameters::operator= (const Parameters & source)
{
  this->clear();
  *this += source;

  return *this;
}

inline
Parameters & Parameters::operator+= (const Parameters & source)
{
  for (const auto & pr : source._values)
    {
      if (_values.find(pr.first) != _values.end())
        delete _values[pr.first];
      _values[pr.first] = pr.second->clone();
    }

  return *this;
}

inline
Parameters::Parameters (const Parameters & p)
{
  *this = p;
}



inline
Parameters::~Parameters ()
{
  this->clear ();
}



inline
void Parameters::print (std::ostream & os) const
{
  Parameters::const_iterator it = _values.begin();

  os << "Name\t Type\t Value\n"
     << "---------------------\n";
  while (it != _values.end())
    {
      os << " "   << it->first
#ifdef LIBMESH_HAVE_RTTI
         << "\t " << it->second->type()
#endif // LIBMESH_HAVE_RTTI
         << "\t ";   it->second->print(os);
      os << '\n';

      ++it;
    }
}



// Declare this now that Parameters::print() is defined.
// By declaring this early we can use it in subsequent
// methods.  Required for gcc-4.0.2 -- 11/30/2005, BSK
inline
std::ostream & operator << (std::ostream & os, const Parameters & p)
{
  p.print(os);
  return os;
}



template <typename T>
inline
bool Parameters::have_parameter (const std::string & name) const
{
  Parameters::const_iterator it = _values.find(name);

  if (it != _values.end())
#ifdef LIBMESH_HAVE_RTTI
    if (dynamic_cast<const Parameter<T> *>(it->second) != nullptr)
#else // LIBMESH_HAVE_RTTI
      if (cast_ptr<const Parameter<T> *>(it->second) != nullptr)
#endif // LIBMESH_HAVE_RTTI
        return true;

  return false;
}



template <typename T>
inline
const T & Parameters::get (const std::string & name) const
{
  if (!this->have_parameter<T>(name))
    {
      std::ostringstream oss;

      oss << "ERROR: no";
#ifdef LIBMESH_HAVE_RTTI
      oss << ' ' << demangle(typeid(T).name());
#endif
      oss << " parameter named \""
          << name << "\" found.\n\n"
          << "Known parameters:\n"
          << *this;

      libmesh_error_msg(oss.str());
    }

  Parameters::const_iterator it = _values.find(name);

  libmesh_assert(it != _values.end());
  libmesh_assert(it->second);

  return cast_ptr<Parameter<T> *>(it->second)->get();
}

template <typename T>
inline
void Parameters::insert (const std::string & name)
{
  if (!this->have_parameter<T>(name))
    _values[name] = new Parameter<T>;

  set_attributes(name, true);
}


template <typename T>
inline
T & Parameters::set (const std::string & name)
{
  if (!this->have_parameter<T>(name))
    _values[name] = new Parameter<T>;

  set_attributes(name, false);

  return cast_ptr<Parameter<T> *>(_values[name])->set();
}

inline
void Parameters::remove (const std::string & name)
{
  Parameters::iterator it = _values.find(name);

  if (it != _values.end())
    {
      delete it->second;
      it->second = nullptr;

      _values.erase(it);
    }
}



#ifdef LIBMESH_HAVE_RTTI
template <typename T>
inline
unsigned int Parameters::n_parameters () const
{
  unsigned int cnt = 0;

  Parameters::const_iterator       it  = _values.begin();
  const Parameters::const_iterator vals_end = _values.end();

  for (; it != vals_end; ++it)
    if (dynamic_cast<Parameter<T> *>(it->second) != nullptr)
      cnt++;

  return cnt;
}
#endif

inline
Parameters::iterator Parameters::begin()
{
  return _values.begin();
}

inline
Parameters::const_iterator Parameters::begin() const
{
  return _values.begin();
}

inline
Parameters::iterator Parameters::end()
{
  return _values.end();
}

inline
Parameters::const_iterator Parameters::end() const
{
  return _values.end();
}

//non-member scalar print function
template<typename P>
void print_helper(std::ostream & os, const P * param)
{
  os << *param;
}

template<>
inline
void print_helper(std::ostream & os, const char * param)
{
  // Specialization so that we don't print out unprintable characters
  os << static_cast<int>(*param);
}

template<>
inline
void print_helper(std::ostream & os, const unsigned char * param)
{
  // Specialization so that we don't print out unprintable characters
  os << static_cast<int>(*param);
}

//non-member vector print function
template<typename P>
void print_helper(std::ostream & os, const std::vector<P> * param)
{
  for (std::size_t i=0; i<param->size(); ++i)
    os << (*param)[i] << " ";
}

//non-member vector<vector> print function
template<typename P>
void print_helper(std::ostream & os, const std::vector<std::vector<P>> * param)
{
  for (std::size_t i=0; i<param->size(); ++i)
    for (std::size_t j=0; j<(*param)[i].size(); ++j)
      os << (*param)[i][j] << " ";
}

} // namespace libMesh

#endif // LIBMESH_PARAMETERS_H