rock-qtbindings 4.8.6.5

data/ext/ruby/qtruby/tools/rbuic/utils.h

@@ -0,0 +1,125 @@
+/****************************************************************************
+**
+** Copyright (C) 1992-2008 Trolltech ASA. All rights reserved.
+**
+** This file is part of the tools applications of the Qt Toolkit.
+**
+** This file may be used under the terms of the GNU General Public
+** License versions 2.0 or 3.0 as published by the Free Software
+** Foundation and appearing in the files LICENSE.GPL2 and LICENSE.GPL3
+** included in the packaging of this file.  Alternatively you may (at
+** your option) use any later version of the GNU General Public
+** License if such license has been publicly approved by Trolltech ASA
+** (or its successors, if any) and the KDE Free Qt Foundation. In
+** addition, as a special exception, Trolltech gives you certain
+** additional rights. These rights are described in the Trolltech GPL
+** Exception version 1.2, which can be found at
+** http://www.trolltech.com/products/qt/gplexception/ and in the file
+** GPL_EXCEPTION.txt in this package.
+**
+** Please review the following information to ensure GNU General
+** Public Licensing requirements will be met:
+** http://trolltech.com/products/qt/licenses/licensing/opensource/. If
+** you are unsure which license is appropriate for your use, please
+** review the following information:
+** http://trolltech.com/products/qt/licenses/licensing/licensingoverview
+** or contact the sales department at sales@trolltech.com.
+**
+** In addition, as a special exception, Trolltech, as the sole
+** copyright holder for Qt Designer, grants users of the Qt/Eclipse
+** Integration plug-in the right for the Qt/Eclipse Integration to
+** link to functionality provided by Qt Designer and its related
+** libraries.
+**
+** This file is provided "AS IS" with NO WARRANTY OF ANY KIND,
+** INCLUDING THE WARRANTIES OF DESIGN, MERCHANTABILITY AND FITNESS FOR
+** A PARTICULAR PURPOSE. Trolltech reserves all rights not expressly
+** granted herein.
+**
+** This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
+** WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+**
+****************************************************************************/
+
+#ifndef UTILS_H
+#define UTILS_H
+
+#include "ui4.h"
+#include <QtCore/QString>
+#include <QtCore/QList>
+#include <QtCore/QHash>
+
+inline bool toBool(const QString &str)
+{ return str.toLower() == QLatin1String("true"); }
+
+inline QString toString(const DomString *str)
+{ return str ? str->text() : QString(); }
+
+inline QString fixString(const QString &str, const QString &indent)
+{
+    QString cursegment;
+    QStringList result;
+    uchar cbyte;
+    QByteArray utf8 = str.toUtf8();
+
+    for (int i = 0; i < utf8.length(); ++i) {
+        cbyte = utf8.at(i);
+        if (cbyte >= 0x80) {
+            cursegment += QLatin1String("\\") + QString::number(cbyte, 8);
+        } else {
+            switch(cbyte) {
+            case '\\':
+                cursegment += QLatin1String("\\\\"); break;
+            case '\"':
+                cursegment += QLatin1String("\\\""); break;
+            case '\r':
+                break;
+            case '\n':
+                cursegment += QLatin1String("\\n\" \\\n\""); break;
+            default:
+                cursegment += QChar(cbyte);
+            }
+        }
+        
+        if (cursegment.length() > 1024) {
+            result << cursegment;
+            cursegment.clear();
+        }
+    }
+
+    if (!cursegment.isEmpty())
+        result << cursegment;
+
+    QString joinstr = QLatin1String("\"\n") + indent + indent + QLatin1Char('\"');
+    return QLatin1String("\"") + result.join(joinstr) + QLatin1String("\"");
+}
+
+inline QHash<QString, DomProperty *> propertyMap(const QList<DomProperty *> &properties)
+{
+    QHash<QString, DomProperty *> map;
+
+    for (int i=0; i<properties.size(); ++i) {
+        DomProperty *p = properties.at(i);
+        map.insert(p->attributeName(), p);
+    }
+
+    return map;
+}
+
+inline QStringList unique(const QStringList &lst)
+{
+    QHash<QString, bool> h;
+    for (int i=0; i<lst.size(); ++i)
+        h.insert(lst.at(i), true);
+    return h.keys();
+}
+
+inline QString toRubyIdentifier(const QString &id)
+{
+    QString result(id);
+    result = result.mid(0, 1).toLower() + result.mid(1);
+    result.prepend("@");
+    return result;
+}
+
+#endif // UTILS_H

data/ext/ruby/qtruby/tools/rbuic/validator.cpp

@@ -0,0 +1,100 @@
+/****************************************************************************
+**
+** Copyright (C) 1992-2008 Trolltech ASA. All rights reserved.
+**
+** This file is part of the tools applications of the Qt Toolkit.
+**
+** This file may be used under the terms of the GNU General Public
+** License versions 2.0 or 3.0 as published by the Free Software
+** Foundation and appearing in the files LICENSE.GPL2 and LICENSE.GPL3
+** included in the packaging of this file.  Alternatively you may (at
+** your option) use any later version of the GNU General Public
+** License if such license has been publicly approved by Trolltech ASA
+** (or its successors, if any) and the KDE Free Qt Foundation. In
+** addition, as a special exception, Trolltech gives you certain
+** additional rights. These rights are described in the Trolltech GPL
+** Exception version 1.2, which can be found at
+** http://www.trolltech.com/products/qt/gplexception/ and in the file
+** GPL_EXCEPTION.txt in this package.
+**
+** Please review the following information to ensure GNU General
+** Public Licensing requirements will be met:
+** http://trolltech.com/products/qt/licenses/licensing/opensource/. If
+** you are unsure which license is appropriate for your use, please
+** review the following information:
+** http://trolltech.com/products/qt/licenses/licensing/licensingoverview
+** or contact the sales department at sales@trolltech.com.
+**
+** In addition, as a special exception, Trolltech, as the sole
+** copyright holder for Qt Designer, grants users of the Qt/Eclipse
+** Integration plug-in the right for the Qt/Eclipse Integration to
+** link to functionality provided by Qt Designer and its related
+** libraries.
+**
+** This file is provided "AS IS" with NO WARRANTY OF ANY KIND,
+** INCLUDING THE WARRANTIES OF DESIGN, MERCHANTABILITY AND FITNESS FOR
+** A PARTICULAR PURPOSE. Trolltech reserves all rights not expressly
+** granted herein.
+**
+** This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
+** WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+**
+****************************************************************************/
+
+#include "validator.h"
+#include "driver.h"
+#include "ui4.h"
+#include "uic.h"
+
+#if defined(QT_BEGIN_NAMESPACE)
+  QT_BEGIN_NAMESPACE
+#endif
+
+Validator::Validator(Uic *uic)   :
+    m_driver(uic->driver())
+{
+}
+
+void Validator::acceptUI(DomUI *node)
+{
+    TreeWalker::acceptUI(node);
+}
+
+void Validator::acceptWidget(DomWidget *node)
+{
+    (void) m_driver->findOrInsertWidget(node);
+
+    TreeWalker::acceptWidget(node);
+}
+
+void Validator::acceptLayoutItem(DomLayoutItem *node)
+{
+    (void) m_driver->findOrInsertLayoutItem(node);
+
+    TreeWalker::acceptLayoutItem(node);
+}
+
+void Validator::acceptLayout(DomLayout *node)
+{
+    (void) m_driver->findOrInsertLayout(node);
+
+    TreeWalker::acceptLayout(node);
+}
+
+void Validator::acceptActionGroup(DomActionGroup *node)
+{
+    (void) m_driver->findOrInsertActionGroup(node);
+
+    TreeWalker::acceptActionGroup(node);
+}
+
+void Validator::acceptAction(DomAction *node)
+{
+    (void) m_driver->findOrInsertAction(node);
+
+    TreeWalker::acceptAction(node);
+}
+
+#if defined(QT_END_NAMESPACE)
+  QT_END_NAMESPACE
+#endif

data/ext/ruby/qtruby/tools/rbuic/validator.h

@@ -0,0 +1,80 @@
+/****************************************************************************
+**
+** Copyright (C) 1992-2008 Trolltech ASA. All rights reserved.
+**
+** This file is part of the tools applications of the Qt Toolkit.
+**
+** This file may be used under the terms of the GNU General Public
+** License versions 2.0 or 3.0 as published by the Free Software
+** Foundation and appearing in the files LICENSE.GPL2 and LICENSE.GPL3
+** included in the packaging of this file.  Alternatively you may (at
+** your option) use any later version of the GNU General Public
+** License if such license has been publicly approved by Trolltech ASA
+** (or its successors, if any) and the KDE Free Qt Foundation. In
+** addition, as a special exception, Trolltech gives you certain
+** additional rights. These rights are described in the Trolltech GPL
+** Exception version 1.2, which can be found at
+** http://www.trolltech.com/products/qt/gplexception/ and in the file
+** GPL_EXCEPTION.txt in this package.
+**
+** Please review the following information to ensure GNU General
+** Public Licensing requirements will be met:
+** http://trolltech.com/products/qt/licenses/licensing/opensource/. If
+** you are unsure which license is appropriate for your use, please
+** review the following information:
+** http://trolltech.com/products/qt/licenses/licensing/licensingoverview
+** or contact the sales department at sales@trolltech.com.
+**
+** In addition, as a special exception, Trolltech, as the sole
+** copyright holder for Qt Designer, grants users of the Qt/Eclipse
+** Integration plug-in the right for the Qt/Eclipse Integration to
+** link to functionality provided by Qt Designer and its related
+** libraries.
+**
+** This file is provided "AS IS" with NO WARRANTY OF ANY KIND,
+** INCLUDING THE WARRANTIES OF DESIGN, MERCHANTABILITY AND FITNESS FOR
+** A PARTICULAR PURPOSE. Trolltech reserves all rights not expressly
+** granted herein.
+**
+** This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
+** WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+**
+****************************************************************************/
+
+#ifndef VALIDATOR_H
+#define VALIDATOR_H
+
+#include "treewalker.h"
+
+#if defined(QT_BEGIN_NAMESPACE)
+  QT_BEGIN_NAMESPACE
+#endif
+
+class QTextStream;
+class Driver;
+class Uic;
+
+struct Option;
+
+struct Validator : public TreeWalker
+{
+    Validator(Uic *uic);
+
+    void acceptUI(DomUI *node);
+    void acceptWidget(DomWidget *node);
+
+    void acceptLayoutItem(DomLayoutItem *node);
+    void acceptLayout(DomLayout *node);
+
+    void acceptActionGroup(DomActionGroup *node);
+    void acceptAction(DomAction *node);
+
+private:
+    Driver *m_driver;
+};
+
+#if defined(QT_END_NAMESPACE)
+  QT_END_NAMESPACE
+#endif
+
+#endif // VALIDATOR_H

data/ext/ruby/qtscript/CMakeLists.txt

@@ -0,0 +1,19 @@
+include_directories( ${CMAKE_SOURCE_DIR}/smoke ${RUBY_INCLUDE_DIRS} ${CMAKE_SOURCE_DIR}/ruby/qtruby/src)
+INCLUDE_DIRECTORIES (${QT_INCLUDES} ${KDE4_INCLUDE_DIR})
+
+set(qtscript_LIBRARY_SRC qtscript.cpp qtscripthandlers.cpp)
+
+add_library(qtscript MODULE ${qtscript_LIBRARY_SRC})
+target_link_libraries(qtscript
+    ${QT_QTSCRIPT_LIBRARY}
+    smokeqtscript
+    qtruby4shared
+)
+set_target_properties(qtscript PROPERTIES PREFIX "")
+install(TARGETS qtscript DESTINATION ${CUSTOM_RUBY_SITE_ARCH_DIR})
+install(FILES qtscript.rb DESTINATION ${CUSTOM_RUBY_SITE_LIB_DIR}/qtscript)
+
+if (Q_WS_MAC)
+    install(CODE "execute_process(COMMAND ${CMAKE_COMMAND} -E create_symlink \"${CUSTOM_RUBY_SITE_ARCH_DIR}/qtscript.so\"  \"${CUSTOM_RUBY_SITE_ARCH_DIR}/qtscript.bundle\" )" )
+endif (Q_WS_MAC)
+

data/ext/ruby/qtscript/qtscript.cpp

@@ -0,0 +1,83 @@
+/***************************************************************************
+                          qtscript.cpp  -  QtScript ruby extension
+                             -------------------
+    begin                : 11-07-2008
+    copyright            : (C) 2008 by Richard Dale
+    email                : richard.j.dale@gmail.com
+ ***************************************************************************/
+
+/***************************************************************************
+ *                                                                         *
+ *   This program is free software; you can redistribute it and/or modify  *
+ *   it under the terms of the GNU General Public License as published by  *
+ *   the Free Software Foundation; either version 2 of the License, or     *
+ *   (at your option) any later version.                                   *
+ *                                                                         *
+ ***************************************************************************/
+
+#include <ruby.h>
+#undef read
+#undef write
+#undef connect
+#undef accept
+#undef truncate
+
+#include <QHash>
+#include <QList>
+#include <QtDebug>
+
+#include <smoke/qtscript_smoke.h>
+
+#include <qtruby.h>
+
+#include <iostream>
+
+static VALUE getClassList(VALUE /*self*/)
+{
+    VALUE classList = rb_ary_new();
+    for (int i = 1; i <= qtscript_Smoke->numClasses; i++) {
+        if (qtscript_Smoke->classes[i].className && !qtscript_Smoke->classes[i].external)
+            rb_ary_push(classList, rb_str_new2(qtscript_Smoke->classes[i].className));
+    }
+    return classList;
+}
+
+const char*
+resolve_classname_qtscript(smokeruby_object * o)
+{
+    return qtruby_modules[o->smoke].binding->className(o->classId);
+}
+
+extern TypeHandler QtScript_handlers[];
+
+extern "C" {
+
+VALUE qtscript_module;
+VALUE qtscript_internal_module;
+
+static QtRuby::Binding binding;
+
+Q_DECL_EXPORT void
+Init_qtscript()
+{
+    init_qtscript_Smoke();
+
+    binding = QtRuby::Binding(qtscript_Smoke);
+
+    smokeList << qtscript_Smoke;
+
+    QtRubyModule module = { "QtScript", resolve_classname_qtscript, 0, &binding };
+    qtruby_modules[qtscript_Smoke] = module;
+
+    install_handlers(QtScript_handlers);
+
+    qtscript_module = rb_define_module("QtScript");
+    qtscript_internal_module = rb_define_module_under(qtscript_module, "Internal");
+
+    rb_define_singleton_method(qtscript_internal_module, "getClassList", (VALUE (*) (...)) getClassList, 0);
+
+    rb_require("qtscript/qtscript.rb");
+    rb_funcall(qtscript_internal_module, rb_intern("init_all_classes"), 0);
+}
+
+}

data/ext/ruby/qtscript/qtscript.rb

@@ -0,0 +1,40 @@
+=begin
+/***************************************************************************
+                          qtscript.rb  -  QtScript ruby client lib
+                             -------------------
+    begin                : 11-07-2008
+    copyright            : (C) 2008 by Richard Dale
+    email                : richard.j.dale@gmail.com
+ ***************************************************************************/
+
+/***************************************************************************
+ *                                                                         *
+ *   This program is free software; you can redistribute it and/or modify  *
+ *   it under the terms of the GNU General Public License as published by  *
+ *   the Free Software Foundation; either version 2 of the License, or     *
+ *   (at your option) any later version.                                   *
+ *                                                                         *
+ ***************************************************************************/
+=end
+
+module QtScript
+  module Internal
+    def self.init_all_classes
+#      Qt::Internal::add_normalize_proc(Proc.new do |classname|
+#        if classname =~ /^QtScript/
+#          now = classname.sub(/^QtScript?(?=[A-Z])/,'QtScript::')
+#        end
+#        now
+#      end)
+      getClassList.each do |c|
+        classname = Qt::Internal::normalize_classname(c)
+        id = Qt::Internal::findClass(c);
+        Qt::Internal::insert_pclassid(classname, id)
+        Qt::Internal::cpp_names[classname] = c
+        klass = Qt::Internal::isQObject(c) ? Qt::Internal::create_qobject_class(classname, Qt) \
+                                           : Qt::Internal::create_qt_class(classname, Qt)
+        Qt::Internal::classes[classname] = klass unless klass.nil?
+      end
+    end
+  end
+end

data/ext/ruby/qtscript/qtscripthandlers.cpp

@@ -0,0 +1,37 @@
+/***************************************************************************
+                          qtscripthandlers.cpp  -  QtScript specific marshallers
+                             -------------------
+    begin                : 11-07-2008
+    copyright            : (C) 2008 by Richard Dale
+    email                : richard.j.dale@gmail.com
+ ***************************************************************************/
+
+/***************************************************************************
+ *                                                                         *
+ *   This program is free software; you can redistribute it and/or modify  *
+ *   it under the terms of the GNU General Public License as published by  *
+ *   the Free Software Foundation; either version 2 of the License, or     *
+ *   (at your option) any later version.                                   *
+ *                                                                         *
+ ***************************************************************************/
+
+#include <ruby.h>
+#undef read
+#undef write
+#undef connect
+#undef accept
+#undef truncate
+
+#include <qtruby.h>
+#include <smokeruby.h>
+#include <marshall_macros.h>
+
+#include <qscriptvalue.h>
+
+
+DEF_VALUELIST_MARSHALLER( QScriptValueList, QList<QScriptValue>, QScriptValue )
+
+TypeHandler QtScript_handlers[] = {
+    { "QList<QScriptValue>&", marshall_QScriptValueList },
+    { 0, 0 }
+};