1
/***************************************************************************
2
khtml.cpp - KHTML ruby extension
4
begin : Sat Jun 28 2008
5
copyright : (C) 2008 by Richard Dale
6
email : richard.j.dale@gmail.com
7
***************************************************************************/
9
/***************************************************************************
11
* This program is free software; you can redistribute it and/or modify *
12
* it under the terms of the GNU General Public License as published by *
13
* the Free Software Foundation; either version 2 of the License, or *
14
* (at your option) any later version. *
16
***************************************************************************/
24
#include <smoke/khtml_smoke.h>
30
static VALUE getClassList(VALUE /*self*/)
32
VALUE classList = rb_ary_new();
33
for (int i = 1; i <= khtml_Smoke->numClasses; i++) {
34
if (khtml_Smoke->classes[i].className && !khtml_Smoke->classes[i].external)
35
rb_ary_push(classList, rb_str_new2(khtml_Smoke->classes[i].className));
41
resolve_classname_khtml(smokeruby_object * o)
43
return qtruby_modules[o->smoke].binding->className(o->classId);
46
extern TypeHandler KHTML_handlers[];
51
VALUE khtml_internal_module;
53
static QtRuby::Binding binding;
60
binding = QtRuby::Binding(khtml_Smoke);
62
smokeList << khtml_Smoke;
64
QtRubyModule module = { "KHTML", resolve_classname_khtml, 0, &binding };
65
qtruby_modules[khtml_Smoke] = module;
67
install_handlers(KHTML_handlers);
69
dom_module = rb_define_module("DOM");
70
khtml_internal_module = rb_define_module_under(dom_module, "Internal");
72
rb_define_singleton_method(khtml_internal_module, "getClassList", (VALUE (*) (...)) getClassList, 0);
74
rb_require("khtml/khtml.rb");
75
rb_funcall(khtml_internal_module, rb_intern("init_all_classes"), 0);