Planet
navi homePPSaboutscreenshotsdownloaddevelopmentforum

source: code/branches/console/src/core/TclBind.h @ 1255

Last change on this file since 1255 was 1255, checked in by landauf, 16 years ago
  • after a total rewrite of the TclThreadManager, there are some new problems, but most of the old ones are fixed. i commit this version to have a backup, not because it's finished.
  • 'exec' command is now called 'source' (tcl and orxonox)
  • 'orxonox' command is now called 'query' (tcl only)
  • added 'crossquery' command (tcl only)
File size: 2.0 KB
Line 
1/*
2 *   ORXONOX - the hottest 3D action shooter ever to exist
3 *                    > www.orxonox.net <
4 *
5 *
6 *   License notice:
7 *
8 *   This program is free software; you can redistribute it and/or
9 *   modify it under the terms of the GNU General Public License
10 *   as published by the Free Software Foundation; either version 2
11 *   of the License, or (at your option) any later version.
12 *
13 *   This program is distributed in the hope that it will be useful,
14 *   but WITHOUT ANY WARRANTY; without even the implied warranty of
15 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16 *   GNU General Public License for more details.
17 *
18 *   You should have received a copy of the GNU General Public License
19 *   along with this program; if not, write to the Free Software
20 *   Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
21 *
22 *   Author:
23 *      Fabian 'x3n' Landau
24 *   Co-authors:
25 *      ...
26 *
27 */
28
29#ifndef _TclBind_H__
30#define _TclBind_H__
31
32#include "CorePrereqs.h"
33
34#include "cpptcl/CppTcl.h"
35
36namespace orxonox
37{
38    class _CoreExport TclBind
39    {
40        public:
41            static TclBind& getInstance();
42
43            static std::string tcl(const std::string& tclcode);
44
45            void setDataPath(const std::string& datapath);
46            std::string getTclLibPath() const { return this->tclLibPath_; }
47            void createTclInterpreter();
48            void createNewTclInterpreter();
49            Tcl::interpreter* getTclInterpreter() const { return this->interpreter_; }
50
51            static std::string tcl_query(Tcl::object const &args);
52            static void tcl_execute(Tcl::object const &args);
53
54            static bool eval(const std::string& tclcode);
55
56        private:
57            TclBind();
58            TclBind(const TclBind& other);
59            ~TclBind();
60
61            Tcl::interpreter* interpreter_;
62            std::string tclLibPath_;
63            bool bSetTclLibPath_;
64    };
65}
66
67#endif /* _TclBind_H__ */
Note: See TracBrowser for help on using the repository browser.