1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
|
/***************************************************************************
* rubyinterpreter.cpp
* This file is part of the KDE project
* copyright (C)2005 by Cyrille Berger (cberger@cberger.net)
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU Library General Public
* License as published by the Free Software Foundation; either
* version 2 of the License, 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
* Library General Public License for more details.
* You should have received a copy of the GNU Library General Public License
* along with this program; see the file COPYING. If not, write to
* the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
* Boston, MA 02110-1301, USA.
***************************************************************************/
#include "rubymodule.h"
#include "rubyconfig.h"
#include "rubyextension.h"
namespace Kross {
namespace Ruby {
class RubyModulePrivate {
friend class RubyModule;
/// The \a Kross::Api::Module this RubyExtension wraps.
Kross::Api::Module::Ptr m_module;
};
RubyModule::RubyModule(Kross::Api::Module::Ptr mod, TQString modname) : d(new RubyModulePrivate)
{
d->m_module = mod;
modname = modname.left(1).upper() + modname.right(modname.length() - 1 );
krossdebug(TQString("Module: %1").arg(modname));
VALUE rmodule = rb_define_module(modname.ascii());
rb_define_module_function(rmodule,"method_missing", (VALUE (*)(...))RubyModule::method_missing, -1);
VALUE rm = RubyExtension::toVALUE( (Kross::Api::Object::Ptr)mod.data() );
rb_define_const(rmodule, "MODULEOBJ", rm);
}
RubyModule::~RubyModule()
{
}
VALUE RubyModule::method_missing(int argc, VALUE *argv, VALUE self)
{
#ifdef KROSS_RUBY_MODULE_DEBUG
TQString funcname = rb_id2name(SYM2ID(argv[0]));
krossdebug(TQString("Function %1 missing in a module").arg(funcname));
#endif
VALUE rubyObjectModule = rb_funcall( self, rb_intern("const_get"), 1, ID2SYM(rb_intern("MODULEOBJ")) );
RubyModule* objectModule;
Data_Get_Struct(rubyObjectModule, RubyModule, objectModule);
Kross::Api::Object::Ptr object = (Kross::Api::Object*)objectModule->d->m_module;
return RubyExtension::call_method(object, argc, argv);
}
}
}
|
