Subversion Repositories w11

// $Id: RtclContext.hpp 490 2013-02-22 18:43:26Z mueller $

//

// Copyright 2011-2013 by Walter F.J. Mueller <W.F.J.Mueller@gsi.de>

//

// This program is free software; you may redistribute and/or modify it under

// the terms of the GNU General Public License as published by the Free

// Software Foundation, either version 2, or at your option any later version.

//

// This program 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 complete details.

// 

// Revision History: 

// Date         Rev Version  Comment

// 2013-01-12   474   1.0.3  add FindProxy() method

// 2011-04-24   380   1.0.2  use boost::noncopyable (instead of private dcl's)

// 2011-03-12   368   1.0.1  drop fExitSeen, get exit handling right

// 2011-02-18   362   1.0    Initial version

// 2011-02-18   362   0.1    First draft

// ---------------------------------------------------------------------------

/*!

  \file

  \version $Id: RtclContext.hpp 490 2013-02-22 18:43:26Z mueller $

  \brief   Declaration of class RtclContext.

*/

#ifndef included_Retro_RtclContext

#define included_Retro_RtclContext 1

#include "tcl.h"

#include <string>

#include <set>

#include <map>

#include "boost/utility.hpp"

#include "RtclClassBase.hpp"

#include "RtclProxyBase.hpp"

namespace Retro {

  class RtclContext : private boost::noncopyable {

    public:

      typedef std::set<RtclClassBase*> cset_t;

      typedef cset_t::iterator         cset_it_t;

      typedef std::set<RtclProxyBase*> pset_t;

      typedef pset_t::iterator         pset_it_t;

      typedef std::map<Tcl_Interp*, RtclContext*>  xmap_t;

      typedef xmap_t::iterator                     xmap_it_t;

      typedef xmap_t::value_type                   xmap_val_t;

      explicit      RtclContext(Tcl_Interp* interp);

      virtual      ~RtclContext();

      void          RegisterClass(RtclClassBase* pobj);

      void          UnRegisterClass(RtclClassBase* pobj);

      void          RegisterProxy(RtclProxyBase* pobj);

      void          UnRegisterProxy(RtclProxyBase* pobj);

      bool          CheckProxy(RtclProxyBase* pobj);

      bool          CheckProxy(RtclProxyBase* pobj, const std::string& type);

      void          ListProxy(std::vector<RtclProxyBase*>& list,

                              const std::string& type);

      RtclProxyBase* FindProxy(const std::string& type,

                               const std::string& name);

      static RtclContext&  Find(Tcl_Interp* interp);

      static void   ThunkTclExitProc(ClientData cdata);

    protected:

      Tcl_Interp*   fInterp;                //!< associated tcl interpreter

      cset_t        fSetClass;              //!< set for Class objects

      pset_t        fSetProxy;              //!< set for Proxy objects

      static xmap_t fMapContext;            //!< map of contexts

  };

} // end namespace Retro

//#include "RtclContext.ipp"

#endif