parameters.h

Go to the documentation of this file.

// The libMesh Finite Element Library.
// Copyright (C) 2002-2019 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
 
// 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 <sstream>
#include <string>
#include <typeinfo>
#include <vector>
 
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 (const auto & p : *param)
    os << p << " ";
}
 
//non-member vector<vector> print function
template<typename P>
void print_helper(std::ostream & os, const std::vector<std::vector<P>> * param)
{
  for (const auto & pv : *param)
    for (const auto & p : pv)
      os << p << " ";
}
 
} // namespace libMesh
 
#endif // LIBMESH_PARAMETERS_H