annotate generator/dgenerator.cpp @ 294:bb37b0ed94c9 signals

some more QList
author eldar
date Fri, 13 Nov 2009 20:42:51 +0000
parents 8627891e4556
children 463563fc9e17
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1
e78566595089 initial import
mandel
parents:
diff changeset
1 /****************************************************************************
e78566595089 initial import
mandel
parents:
diff changeset
2 **
e78566595089 initial import
mandel
parents:
diff changeset
3 ** Copyright (C) 1992-2008 Nokia. All rights reserved.
e78566595089 initial import
mandel
parents:
diff changeset
4 **
e78566595089 initial import
mandel
parents:
diff changeset
5 ** This file is part of Qt Jambi.
e78566595089 initial import
mandel
parents:
diff changeset
6 **
e78566595089 initial import
mandel
parents:
diff changeset
7 ** * Commercial Usage
e78566595089 initial import
mandel
parents:
diff changeset
8 * Licensees holding valid Qt Commercial licenses may use this file in
e78566595089 initial import
mandel
parents:
diff changeset
9 * accordance with the Qt Commercial License Agreement provided with the
e78566595089 initial import
mandel
parents:
diff changeset
10 * Software or, alternatively, in accordance with the terms contained in
e78566595089 initial import
mandel
parents:
diff changeset
11 * a written agreement between you and Nokia.
e78566595089 initial import
mandel
parents:
diff changeset
12 *
e78566595089 initial import
mandel
parents:
diff changeset
13 *
e78566595089 initial import
mandel
parents:
diff changeset
14 * GNU General Public License Usage
e78566595089 initial import
mandel
parents:
diff changeset
15 * Alternatively, this file may be used under the terms of the GNU
e78566595089 initial import
mandel
parents:
diff changeset
16 * General Public License versions 2.0 or 3.0 as published by the Free
e78566595089 initial import
mandel
parents:
diff changeset
17 * Software Foundation and appearing in the file LICENSE.GPL included in
e78566595089 initial import
mandel
parents:
diff changeset
18 * the packaging of this file. Please review the following information
e78566595089 initial import
mandel
parents:
diff changeset
19 * to ensure GNU General Public Licensing requirements will be met:
e78566595089 initial import
mandel
parents:
diff changeset
20 * http://www.fsf.org/licensing/licenses/info/GPLv2.html and
e78566595089 initial import
mandel
parents:
diff changeset
21 * http://www.gnu.org/copyleft/gpl.html. In addition, as a special
e78566595089 initial import
mandel
parents:
diff changeset
22 * exception, Nokia gives you certain additional rights. These rights
e78566595089 initial import
mandel
parents:
diff changeset
23 * are described in the Nokia Qt GPL Exception version 1.2, included in
e78566595089 initial import
mandel
parents:
diff changeset
24 * the file GPL_EXCEPTION.txt in this package.
e78566595089 initial import
mandel
parents:
diff changeset
25 *
e78566595089 initial import
mandel
parents:
diff changeset
26 * Qt for Windows(R) Licensees
e78566595089 initial import
mandel
parents:
diff changeset
27 * As a special exception, Nokia, as the sole copyright holder for Qt
e78566595089 initial import
mandel
parents:
diff changeset
28 * Designer, grants users of the Qt/Eclipse Integration plug-in the
e78566595089 initial import
mandel
parents:
diff changeset
29 * right for the Qt/Eclipse Integration to link to functionality
e78566595089 initial import
mandel
parents:
diff changeset
30 * provided by Qt Designer and its related libraries.
e78566595089 initial import
mandel
parents:
diff changeset
31 *
e78566595089 initial import
mandel
parents:
diff changeset
32 *
e78566595089 initial import
mandel
parents:
diff changeset
33 * If you are unsure which license is appropriate for your use, please
e78566595089 initial import
mandel
parents:
diff changeset
34 * contact the sales department at qt-sales@nokia.com.
e78566595089 initial import
mandel
parents:
diff changeset
35
e78566595089 initial import
mandel
parents:
diff changeset
36 **
e78566595089 initial import
mandel
parents:
diff changeset
37 ** This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
e78566595089 initial import
mandel
parents:
diff changeset
38 ** WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
e78566595089 initial import
mandel
parents:
diff changeset
39 **
e78566595089 initial import
mandel
parents:
diff changeset
40 ****************************************************************************/
e78566595089 initial import
mandel
parents:
diff changeset
41
e78566595089 initial import
mandel
parents:
diff changeset
42 #include "dgenerator.h"
e78566595089 initial import
mandel
parents:
diff changeset
43 #include "reporthandler.h"
e78566595089 initial import
mandel
parents:
diff changeset
44 #include "docparser.h"
e78566595089 initial import
mandel
parents:
diff changeset
45 #include "jumptable.h"
e78566595089 initial import
mandel
parents:
diff changeset
46 #include "fileout.h"
e78566595089 initial import
mandel
parents:
diff changeset
47
e78566595089 initial import
mandel
parents:
diff changeset
48 #include <QtCore/QDir>
e78566595089 initial import
mandel
parents:
diff changeset
49 #include <QtCore/QTextStream>
e78566595089 initial import
mandel
parents:
diff changeset
50 #include <QtCore/QVariant>
e78566595089 initial import
mandel
parents:
diff changeset
51 #include <QtCore/QRegExp>
e78566595089 initial import
mandel
parents:
diff changeset
52 #include <QDebug>
e78566595089 initial import
mandel
parents:
diff changeset
53
e78566595089 initial import
mandel
parents:
diff changeset
54 #include <iostream>
e78566595089 initial import
mandel
parents:
diff changeset
55
e78566595089 initial import
mandel
parents:
diff changeset
56
e78566595089 initial import
mandel
parents:
diff changeset
57 static Indentor INDENT;
e78566595089 initial import
mandel
parents:
diff changeset
58
e78566595089 initial import
mandel
parents:
diff changeset
59 DGenerator::DGenerator()
e78566595089 initial import
mandel
parents:
diff changeset
60 : m_doc_parser(0),
e78566595089 initial import
mandel
parents:
diff changeset
61 m_docs_enabled(false),
e78566595089 initial import
mandel
parents:
diff changeset
62 m_native_jump_table(false),
e78566595089 initial import
mandel
parents:
diff changeset
63 m_recursive(0),
e78566595089 initial import
mandel
parents:
diff changeset
64 m_isRecursive(false)
e78566595089 initial import
mandel
parents:
diff changeset
65 {
288
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
66 excludedTypes << "qint64" << "bool" << "int" << "QString" << "char" << "WId"
1
e78566595089 initial import
mandel
parents:
diff changeset
67 << "unsigned char" << "uint" << "double" << "short" << "float"
e78566595089 initial import
mandel
parents:
diff changeset
68 << "signed char" << "unsigned short" << "QBool" << "unsigned int"
e78566595089 initial import
mandel
parents:
diff changeset
69 << "Qt::HANDLE" << "QChar" << "java.lang.JObjectWrapper" << "void"
e78566595089 initial import
mandel
parents:
diff changeset
70 << "QLatin1String" << "unsigned long long" << "signed int"
e78566595089 initial import
mandel
parents:
diff changeset
71 << "signed short" << "Array" << "GLuint" << "GLenum" << "GLint"
e78566595089 initial import
mandel
parents:
diff changeset
72 << "unsigned long" << "ulong" << "long" << "QByteRef"
33
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
73 << "QStringList" << "QList" << "QVector" << "QPair"
39
a5cba313c924 network and webkit are wrapped now
eldar
parents: 37
diff changeset
74 << "QSet" << "QStringRef" << "quintptr";
1
e78566595089 initial import
mandel
parents:
diff changeset
75 }
e78566595089 initial import
mandel
parents:
diff changeset
76
e78566595089 initial import
mandel
parents:
diff changeset
77 QString DGenerator::fileNameForClass(const AbstractMetaClass *d_class) const
e78566595089 initial import
mandel
parents:
diff changeset
78 {
e78566595089 initial import
mandel
parents:
diff changeset
79 return QString("%1.d").arg(d_class->name());
e78566595089 initial import
mandel
parents:
diff changeset
80 }
e78566595089 initial import
mandel
parents:
diff changeset
81
e78566595089 initial import
mandel
parents:
diff changeset
82 void DGenerator::writeFieldAccessors(QTextStream &s, const AbstractMetaField *field)
e78566595089 initial import
mandel
parents:
diff changeset
83 {
e78566595089 initial import
mandel
parents:
diff changeset
84 Q_ASSERT(field->isPublic() || field->isProtected());
e78566595089 initial import
mandel
parents:
diff changeset
85
e78566595089 initial import
mandel
parents:
diff changeset
86 const AbstractMetaClass *declaringClass = field->enclosingClass();
e78566595089 initial import
mandel
parents:
diff changeset
87
e78566595089 initial import
mandel
parents:
diff changeset
88 FieldModification mod = declaringClass->typeEntry()->fieldModification(field->name());
e78566595089 initial import
mandel
parents:
diff changeset
89
e78566595089 initial import
mandel
parents:
diff changeset
90 // Set function
e78566595089 initial import
mandel
parents:
diff changeset
91 if (mod.isWritable() && !field->type()->isConstant()) {
e78566595089 initial import
mandel
parents:
diff changeset
92 const AbstractMetaFunction *setter = field->setter();
e78566595089 initial import
mandel
parents:
diff changeset
93 if (declaringClass->hasFunction(setter)) {
e78566595089 initial import
mandel
parents:
diff changeset
94 QString warning =
e78566595089 initial import
mandel
parents:
diff changeset
95 QString("class '%1' already has setter '%2' for public field '%3'")
e78566595089 initial import
mandel
parents:
diff changeset
96 .arg(declaringClass->name()).arg(setter->name()).arg(field->name());
e78566595089 initial import
mandel
parents:
diff changeset
97 ReportHandler::warning(warning);
e78566595089 initial import
mandel
parents:
diff changeset
98 } else {
e78566595089 initial import
mandel
parents:
diff changeset
99 if (!notWrappedYet(setter)) // qtd2
e78566595089 initial import
mandel
parents:
diff changeset
100 writeFunction(s, setter);
e78566595089 initial import
mandel
parents:
diff changeset
101 }
e78566595089 initial import
mandel
parents:
diff changeset
102 }
e78566595089 initial import
mandel
parents:
diff changeset
103
e78566595089 initial import
mandel
parents:
diff changeset
104 // Get function
e78566595089 initial import
mandel
parents:
diff changeset
105 const AbstractMetaFunction *getter = field->getter();
e78566595089 initial import
mandel
parents:
diff changeset
106 if (mod.isReadable()) {
e78566595089 initial import
mandel
parents:
diff changeset
107 if (declaringClass->hasFunction(getter)) {
e78566595089 initial import
mandel
parents:
diff changeset
108 QString warning =
e78566595089 initial import
mandel
parents:
diff changeset
109 QString("class '%1' already has getter '%2' for public field '%3'")
e78566595089 initial import
mandel
parents:
diff changeset
110 .arg(declaringClass->name()).arg(getter->name()).arg(field->name());
e78566595089 initial import
mandel
parents:
diff changeset
111 ReportHandler::warning(warning);
e78566595089 initial import
mandel
parents:
diff changeset
112 } else {
e78566595089 initial import
mandel
parents:
diff changeset
113 if (!notWrappedYet(getter)) // qtd2
e78566595089 initial import
mandel
parents:
diff changeset
114 writeFunction(s, getter);
e78566595089 initial import
mandel
parents:
diff changeset
115 }
e78566595089 initial import
mandel
parents:
diff changeset
116 }
e78566595089 initial import
mandel
parents:
diff changeset
117 }
e78566595089 initial import
mandel
parents:
diff changeset
118
e78566595089 initial import
mandel
parents:
diff changeset
119 QString DGenerator::translateType(const AbstractMetaType *d_type, const AbstractMetaClass *context, Option option)
e78566595089 initial import
mandel
parents:
diff changeset
120 {
e78566595089 initial import
mandel
parents:
diff changeset
121 QString s;
e78566595089 initial import
mandel
parents:
diff changeset
122
e78566595089 initial import
mandel
parents:
diff changeset
123 if (context != 0 && d_type != 0 && context->typeEntry()->isGenericClass() && d_type->originalTemplateType() != 0)
e78566595089 initial import
mandel
parents:
diff changeset
124 d_type = d_type->originalTemplateType();
e78566595089 initial import
mandel
parents:
diff changeset
125
188
7dd099050621 initial commit for D2 support
eldar
parents: 187
diff changeset
126 QString constPrefix, constPostfix;
7dd099050621 initial commit for D2 support
eldar
parents: 187
diff changeset
127 if (d_type && d_type->isConstant() && dVersion == 2) {
7dd099050621 initial commit for D2 support
eldar
parents: 187
diff changeset
128 constPrefix = "const(";
288
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
129 constPostfix = ")";
188
7dd099050621 initial commit for D2 support
eldar
parents: 187
diff changeset
130 }
7dd099050621 initial commit for D2 support
eldar
parents: 187
diff changeset
131
1
e78566595089 initial import
mandel
parents:
diff changeset
132 if (!d_type) {
e78566595089 initial import
mandel
parents:
diff changeset
133 s = "void";
81
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
134 } else if (d_type->typeEntry()->qualifiedCppName() == "QChar") {
33
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
135 s = "wchar" + QString(d_type->actualIndirections(), '*');
81
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
136 } else if (d_type->typeEntry() && d_type->typeEntry()->qualifiedCppName() == "QString") {
1
e78566595089 initial import
mandel
parents:
diff changeset
137 s = "string";
e78566595089 initial import
mandel
parents:
diff changeset
138 } else if (d_type->isArray()) {
e78566595089 initial import
mandel
parents:
diff changeset
139 s = translateType(d_type->arrayElementType(), context) + "[]";
e78566595089 initial import
mandel
parents:
diff changeset
140 } else if (d_type->isEnum() /* qtd2 || d_type->isFlags() */) {
e78566595089 initial import
mandel
parents:
diff changeset
141 if (( d_type->isEnum() && ((EnumTypeEntry *)d_type->typeEntry())->forceInteger() )
e78566595089 initial import
mandel
parents:
diff changeset
142 || ( d_type->isFlags() && ((FlagsTypeEntry *)d_type->typeEntry())->forceInteger() ) ) {
e78566595089 initial import
mandel
parents:
diff changeset
143 if (option & BoxedPrimitive)
e78566595089 initial import
mandel
parents:
diff changeset
144 s = "java.lang.Integer";
e78566595089 initial import
mandel
parents:
diff changeset
145 else
e78566595089 initial import
mandel
parents:
diff changeset
146 s = "int";
e78566595089 initial import
mandel
parents:
diff changeset
147 } else {
e78566595089 initial import
mandel
parents:
diff changeset
148 if (option & EnumAsInts)
e78566595089 initial import
mandel
parents:
diff changeset
149 s = "int";
e78566595089 initial import
mandel
parents:
diff changeset
150 else
e78566595089 initial import
mandel
parents:
diff changeset
151 s = d_type->typeEntry()->qualifiedTargetLangName();
e78566595089 initial import
mandel
parents:
diff changeset
152 }
e78566595089 initial import
mandel
parents:
diff changeset
153 } else if (d_type->isFlags()) { // qtd2 begin
e78566595089 initial import
mandel
parents:
diff changeset
154 if (d_type->isFlags() && ((FlagsTypeEntry *)d_type->typeEntry())->forceInteger()) {
e78566595089 initial import
mandel
parents:
diff changeset
155 if (option & BoxedPrimitive)
e78566595089 initial import
mandel
parents:
diff changeset
156 s = "java.lang.Integer";
e78566595089 initial import
mandel
parents:
diff changeset
157 else
e78566595089 initial import
mandel
parents:
diff changeset
158 s = "int";
e78566595089 initial import
mandel
parents:
diff changeset
159 } else
e78566595089 initial import
mandel
parents:
diff changeset
160 s = "int";
e78566595089 initial import
mandel
parents:
diff changeset
161 } else {
e78566595089 initial import
mandel
parents:
diff changeset
162 /* qtd if (d_type->isPrimitive() && (option & BoxedPrimitive)) {
e78566595089 initial import
mandel
parents:
diff changeset
163 s = static_cast<const PrimitiveTypeEntry *>(d_type->typeEntry())->javaObjectName();
e78566595089 initial import
mandel
parents:
diff changeset
164 } else */ if (d_type->isVariant()) {
e78566595089 initial import
mandel
parents:
diff changeset
165 s = "QVariant";
e78566595089 initial import
mandel
parents:
diff changeset
166 } else if (d_type->isNativePointer()) {
e78566595089 initial import
mandel
parents:
diff changeset
167 if (d_type->typeEntry()->isValue() && !d_type->typeEntry()->isStructInD())
e78566595089 initial import
mandel
parents:
diff changeset
168 s = d_type->typeEntry()->lookupName();
e78566595089 initial import
mandel
parents:
diff changeset
169 else if (d_type->typeEntry()->isEnum())
e78566595089 initial import
mandel
parents:
diff changeset
170 s = "int" + QString(d_type->actualIndirections(), '*');
e78566595089 initial import
mandel
parents:
diff changeset
171 else
188
7dd099050621 initial commit for D2 support
eldar
parents: 187
diff changeset
172 s = constPrefix + d_type->typeEntry()->lookupName() + QString(d_type->actualIndirections(), '*') + constPostfix;
1
e78566595089 initial import
mandel
parents:
diff changeset
173 } else if (d_type->isContainer()) {
e78566595089 initial import
mandel
parents:
diff changeset
174 const ContainerTypeEntry* c_entry = static_cast<const ContainerTypeEntry*>(d_type->typeEntry());
e78566595089 initial import
mandel
parents:
diff changeset
175 Q_ASSERT(c_entry);
e78566595089 initial import
mandel
parents:
diff changeset
176
e78566595089 initial import
mandel
parents:
diff changeset
177 if ((option & SkipTemplateParameters) == 0) {
e78566595089 initial import
mandel
parents:
diff changeset
178 QList<AbstractMetaType *> args = d_type->instantiations();
e78566595089 initial import
mandel
parents:
diff changeset
179
e78566595089 initial import
mandel
parents:
diff changeset
180 if (args.size() == 1) // QVector or QList
e78566595089 initial import
mandel
parents:
diff changeset
181 s = translateType(args.at(0), context, BoxedPrimitive) + "[]";
e78566595089 initial import
mandel
parents:
diff changeset
182 else if(args.size() == 2) { // all sorts of maps
e78566595089 initial import
mandel
parents:
diff changeset
183 s = translateType(args.at(1), context, BoxedPrimitive); // value
e78566595089 initial import
mandel
parents:
diff changeset
184 bool isMultiMap = static_cast<const ContainerTypeEntry *>(d_type->typeEntry())->type() == ContainerTypeEntry::MultiMapContainer;
e78566595089 initial import
mandel
parents:
diff changeset
185 if (isMultiMap)
e78566595089 initial import
mandel
parents:
diff changeset
186 s += "[]";
e78566595089 initial import
mandel
parents:
diff changeset
187 s += "[" + translateType(args.at(0), context, BoxedPrimitive) + "]";
e78566595089 initial import
mandel
parents:
diff changeset
188 } else {
e78566595089 initial import
mandel
parents:
diff changeset
189 s = d_type->typeEntry()->qualifiedTargetLangName();
e78566595089 initial import
mandel
parents:
diff changeset
190
e78566595089 initial import
mandel
parents:
diff changeset
191 for (int i=0; i<args.size(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
192 if (i != 0)
e78566595089 initial import
mandel
parents:
diff changeset
193 s += ", ";
e78566595089 initial import
mandel
parents:
diff changeset
194 bool isMultiMap = static_cast<const ContainerTypeEntry *>(d_type->typeEntry())->type() == ContainerTypeEntry::MultiMapContainer
e78566595089 initial import
mandel
parents:
diff changeset
195 && i == 1;
e78566595089 initial import
mandel
parents:
diff changeset
196 if (isMultiMap)
e78566595089 initial import
mandel
parents:
diff changeset
197 s += "java.util.List<";
e78566595089 initial import
mandel
parents:
diff changeset
198 s += translateType(args.at(i), context, BoxedPrimitive);
e78566595089 initial import
mandel
parents:
diff changeset
199 if (isMultiMap)
e78566595089 initial import
mandel
parents:
diff changeset
200 s += ">";
e78566595089 initial import
mandel
parents:
diff changeset
201 }
e78566595089 initial import
mandel
parents:
diff changeset
202 s += '>';
e78566595089 initial import
mandel
parents:
diff changeset
203 }
e78566595089 initial import
mandel
parents:
diff changeset
204 }
e78566595089 initial import
mandel
parents:
diff changeset
205
e78566595089 initial import
mandel
parents:
diff changeset
206 } else {
e78566595089 initial import
mandel
parents:
diff changeset
207 const TypeEntry *type = d_type->typeEntry();
e78566595089 initial import
mandel
parents:
diff changeset
208 if (type->designatedInterface())
e78566595089 initial import
mandel
parents:
diff changeset
209 type = type->designatedInterface();
e78566595089 initial import
mandel
parents:
diff changeset
210 if (type->isString())
e78566595089 initial import
mandel
parents:
diff changeset
211 s = "string";
188
7dd099050621 initial commit for D2 support
eldar
parents: 187
diff changeset
212 else if (type->isObject()) {
1
e78566595089 initial import
mandel
parents:
diff changeset
213 s = type->name();
188
7dd099050621 initial commit for D2 support
eldar
parents: 187
diff changeset
214 } else if (type->isValue()){
7dd099050621 initial commit for D2 support
eldar
parents: 187
diff changeset
215 s = constPrefix + type->lookupName() + constPostfix;
1
e78566595089 initial import
mandel
parents:
diff changeset
216 } else {
e78566595089 initial import
mandel
parents:
diff changeset
217 s = type->lookupName();
e78566595089 initial import
mandel
parents:
diff changeset
218 }
e78566595089 initial import
mandel
parents:
diff changeset
219 }
e78566595089 initial import
mandel
parents:
diff changeset
220 }
e78566595089 initial import
mandel
parents:
diff changeset
221
e78566595089 initial import
mandel
parents:
diff changeset
222 return s;
e78566595089 initial import
mandel
parents:
diff changeset
223 }
e78566595089 initial import
mandel
parents:
diff changeset
224
e78566595089 initial import
mandel
parents:
diff changeset
225 QString DGenerator::argumentString(const AbstractMetaFunction *d_function,
e78566595089 initial import
mandel
parents:
diff changeset
226 const AbstractMetaArgument *d_argument,
e78566595089 initial import
mandel
parents:
diff changeset
227 uint options)
e78566595089 initial import
mandel
parents:
diff changeset
228 {
e78566595089 initial import
mandel
parents:
diff changeset
229 QString modified_type = d_function->typeReplaced(d_argument->argumentIndex() + 1);
e78566595089 initial import
mandel
parents:
diff changeset
230 QString arg;
e78566595089 initial import
mandel
parents:
diff changeset
231
e78566595089 initial import
mandel
parents:
diff changeset
232 AbstractMetaType *type = d_argument->type();
288
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
233 // qtd2 if argument is "QString &" ref attribute needed FIXME maybe we need this not only for QString, but for other Value types??
1
e78566595089 initial import
mandel
parents:
diff changeset
234 if (type->typeEntry()->isValue() && type->isNativePointer() && type->typeEntry()->name() == "QString")
e78566595089 initial import
mandel
parents:
diff changeset
235 arg = "ref ";
e78566595089 initial import
mandel
parents:
diff changeset
236
e78566595089 initial import
mandel
parents:
diff changeset
237 if (modified_type.isEmpty())
e78566595089 initial import
mandel
parents:
diff changeset
238 arg += translateType(d_argument->type(), d_function->implementingClass(), (Option) options);
e78566595089 initial import
mandel
parents:
diff changeset
239 else
e78566595089 initial import
mandel
parents:
diff changeset
240 arg += modified_type.replace('$', '.');
e78566595089 initial import
mandel
parents:
diff changeset
241
e78566595089 initial import
mandel
parents:
diff changeset
242 if ((options & SkipName) == 0) {
e78566595089 initial import
mandel
parents:
diff changeset
243 arg += " ";
e78566595089 initial import
mandel
parents:
diff changeset
244 arg += d_argument->argumentName();
e78566595089 initial import
mandel
parents:
diff changeset
245 }
e78566595089 initial import
mandel
parents:
diff changeset
246
e78566595089 initial import
mandel
parents:
diff changeset
247 if (!d_argument->defaultValueExpression().isEmpty()) // qtd
e78566595089 initial import
mandel
parents:
diff changeset
248 arg += " = " + d_argument->defaultValueExpression();
e78566595089 initial import
mandel
parents:
diff changeset
249
e78566595089 initial import
mandel
parents:
diff changeset
250 return arg;
e78566595089 initial import
mandel
parents:
diff changeset
251 }
e78566595089 initial import
mandel
parents:
diff changeset
252
e78566595089 initial import
mandel
parents:
diff changeset
253 void DGenerator::writeArgument(QTextStream &s,
e78566595089 initial import
mandel
parents:
diff changeset
254 const AbstractMetaFunction *d_function,
e78566595089 initial import
mandel
parents:
diff changeset
255 const AbstractMetaArgument *d_argument,
e78566595089 initial import
mandel
parents:
diff changeset
256 uint options)
e78566595089 initial import
mandel
parents:
diff changeset
257 {
e78566595089 initial import
mandel
parents:
diff changeset
258 s << argumentString(d_function, d_argument, options);
e78566595089 initial import
mandel
parents:
diff changeset
259 }
e78566595089 initial import
mandel
parents:
diff changeset
260
e78566595089 initial import
mandel
parents:
diff changeset
261
e78566595089 initial import
mandel
parents:
diff changeset
262 void DGenerator::writeIntegerEnum(QTextStream &s, const AbstractMetaEnum *d_enum)
e78566595089 initial import
mandel
parents:
diff changeset
263 {
e78566595089 initial import
mandel
parents:
diff changeset
264 const AbstractMetaEnumValueList &values = d_enum->values();
e78566595089 initial import
mandel
parents:
diff changeset
265
e78566595089 initial import
mandel
parents:
diff changeset
266 s << " public static class " << d_enum->name() << "{" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
267 for (int i=0; i<values.size(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
268 AbstractMetaEnumValue *value = values.at(i);
e78566595089 initial import
mandel
parents:
diff changeset
269
e78566595089 initial import
mandel
parents:
diff changeset
270 if (d_enum->typeEntry()->isEnumValueRejected(value->name()))
e78566595089 initial import
mandel
parents:
diff changeset
271 continue;
e78566595089 initial import
mandel
parents:
diff changeset
272
e78566595089 initial import
mandel
parents:
diff changeset
273 if (m_doc_parser)
e78566595089 initial import
mandel
parents:
diff changeset
274 s << m_doc_parser->documentation(value);
e78566595089 initial import
mandel
parents:
diff changeset
275
e78566595089 initial import
mandel
parents:
diff changeset
276 s << " public static final int " << value->name() << " = " << value->value();
e78566595089 initial import
mandel
parents:
diff changeset
277 s << ";";
e78566595089 initial import
mandel
parents:
diff changeset
278 s << endl;
e78566595089 initial import
mandel
parents:
diff changeset
279 }
e78566595089 initial import
mandel
parents:
diff changeset
280
e78566595089 initial import
mandel
parents:
diff changeset
281 s << " } // end of enum " << d_enum->name() << endl << endl;
e78566595089 initial import
mandel
parents:
diff changeset
282 }
e78566595089 initial import
mandel
parents:
diff changeset
283
e78566595089 initial import
mandel
parents:
diff changeset
284 void DGenerator::writeEnumAlias(QTextStream &s, const AbstractMetaEnum *d_enum)
e78566595089 initial import
mandel
parents:
diff changeset
285 {
e78566595089 initial import
mandel
parents:
diff changeset
286 // aliases for enums to be used in easier way like QFont.Bold instead of QFont.Weight.Bold
e78566595089 initial import
mandel
parents:
diff changeset
287 s << QString(" alias %1 %2;").arg(d_enum->typeEntry()->qualifiedTargetLangName()).arg(d_enum->name()) << endl << endl;
e78566595089 initial import
mandel
parents:
diff changeset
288 const AbstractMetaEnumValueList &values = d_enum->values();
e78566595089 initial import
mandel
parents:
diff changeset
289 for (int i=0; i<values.size(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
290 AbstractMetaEnumValue *enum_value = values.at(i);
e78566595089 initial import
mandel
parents:
diff changeset
291
e78566595089 initial import
mandel
parents:
diff changeset
292 if (d_enum->typeEntry()->isEnumValueRejected(enum_value->name()))
e78566595089 initial import
mandel
parents:
diff changeset
293 continue;
e78566595089 initial import
mandel
parents:
diff changeset
294
e78566595089 initial import
mandel
parents:
diff changeset
295 s << QString(" alias %1.%2 %2;").arg(d_enum->typeEntry()->qualifiedTargetLangName()).arg(enum_value->name()) << endl;
e78566595089 initial import
mandel
parents:
diff changeset
296 }
e78566595089 initial import
mandel
parents:
diff changeset
297 s << endl;
e78566595089 initial import
mandel
parents:
diff changeset
298 }
e78566595089 initial import
mandel
parents:
diff changeset
299
e78566595089 initial import
mandel
parents:
diff changeset
300 void DGenerator::writeEnum(QTextStream &s, const AbstractMetaEnum *d_enum)
e78566595089 initial import
mandel
parents:
diff changeset
301 {
e78566595089 initial import
mandel
parents:
diff changeset
302 if (m_doc_parser) {
e78566595089 initial import
mandel
parents:
diff changeset
303 s << m_doc_parser->documentation(d_enum);
e78566595089 initial import
mandel
parents:
diff changeset
304 }
e78566595089 initial import
mandel
parents:
diff changeset
305
e78566595089 initial import
mandel
parents:
diff changeset
306 /* qtd
e78566595089 initial import
mandel
parents:
diff changeset
307
e78566595089 initial import
mandel
parents:
diff changeset
308 if (d_enum->typeEntry()->forceInteger()) {
e78566595089 initial import
mandel
parents:
diff changeset
309 writeIntegerEnum(s, d_enum);
e78566595089 initial import
mandel
parents:
diff changeset
310 return;
e78566595089 initial import
mandel
parents:
diff changeset
311 }
e78566595089 initial import
mandel
parents:
diff changeset
312
e78566595089 initial import
mandel
parents:
diff changeset
313 // Check if enums in QObjects are declared in the meta object. If not
e78566595089 initial import
mandel
parents:
diff changeset
314 if ( (d_enum->enclosingClass()->isQObject() || d_enum->enclosingClass()->isQtNamespace())
e78566595089 initial import
mandel
parents:
diff changeset
315 && !d_enum->hasQEnumsDeclaration()) {
e78566595089 initial import
mandel
parents:
diff changeset
316 s << " @QtBlockedEnum" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
317 }
e78566595089 initial import
mandel
parents:
diff changeset
318 */
e78566595089 initial import
mandel
parents:
diff changeset
319 // Generates Java 1.5 type enums
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
320 s << "public enum " << d_enum->enclosingClass()->name() << "_" << d_enum->name() << " {" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
321 const AbstractMetaEnumValueList &values = d_enum->values();
e78566595089 initial import
mandel
parents:
diff changeset
322 EnumTypeEntry *entry = d_enum->typeEntry();
e78566595089 initial import
mandel
parents:
diff changeset
323
e78566595089 initial import
mandel
parents:
diff changeset
324 for (int i=0; i<values.size(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
325 AbstractMetaEnumValue *enum_value = values.at(i);
e78566595089 initial import
mandel
parents:
diff changeset
326
e78566595089 initial import
mandel
parents:
diff changeset
327 if (d_enum->typeEntry()->isEnumValueRejected(enum_value->name()))
e78566595089 initial import
mandel
parents:
diff changeset
328 continue;
e78566595089 initial import
mandel
parents:
diff changeset
329
e78566595089 initial import
mandel
parents:
diff changeset
330 if (m_doc_parser)
e78566595089 initial import
mandel
parents:
diff changeset
331 s << m_doc_parser->documentation(enum_value);
e78566595089 initial import
mandel
parents:
diff changeset
332
e78566595089 initial import
mandel
parents:
diff changeset
333 s << " " << enum_value->name() << " = " << enum_value->value();
e78566595089 initial import
mandel
parents:
diff changeset
334
e78566595089 initial import
mandel
parents:
diff changeset
335 if (i != values.size() - 1) {
e78566595089 initial import
mandel
parents:
diff changeset
336 AbstractMetaEnumValue *next_value = values.at(i+1); // qtd
e78566595089 initial import
mandel
parents:
diff changeset
337 if (!(d_enum->typeEntry()->isEnumValueRejected(next_value->name()) && i == values.size() - 2)) // qtd
e78566595089 initial import
mandel
parents:
diff changeset
338 s << "," << endl;
e78566595089 initial import
mandel
parents:
diff changeset
339 }
e78566595089 initial import
mandel
parents:
diff changeset
340 }
e78566595089 initial import
mandel
parents:
diff changeset
341 /* qtd
e78566595089 initial import
mandel
parents:
diff changeset
342 if (entry->isExtensible())
e78566595089 initial import
mandel
parents:
diff changeset
343 s << " CustomEnum = 0";
e78566595089 initial import
mandel
parents:
diff changeset
344 */
e78566595089 initial import
mandel
parents:
diff changeset
345 s << endl << INDENT << "}" << endl << endl; // qtd
e78566595089 initial import
mandel
parents:
diff changeset
346
e78566595089 initial import
mandel
parents:
diff changeset
347
e78566595089 initial import
mandel
parents:
diff changeset
348 /* qtd s << ";" << endl << endl;
e78566595089 initial import
mandel
parents:
diff changeset
349
e78566595089 initial import
mandel
parents:
diff changeset
350 s << " " << d_enum->name() << "(int value) { this.value = value; }" << endl
e78566595089 initial import
mandel
parents:
diff changeset
351 << " public int value() { return value; }" << endl
e78566595089 initial import
mandel
parents:
diff changeset
352 << endl;
e78566595089 initial import
mandel
parents:
diff changeset
353
e78566595089 initial import
mandel
parents:
diff changeset
354 // Write out the createQFlags() function if its a QFlags enum
e78566595089 initial import
mandel
parents:
diff changeset
355 if (entry->flags()) {
e78566595089 initial import
mandel
parents:
diff changeset
356 FlagsTypeEntry *flags_entry = entry->flags();
e78566595089 initial import
mandel
parents:
diff changeset
357 s << " public static " << flags_entry->targetLangName() << " createQFlags("
e78566595089 initial import
mandel
parents:
diff changeset
358 << entry->targetLangName() << " ... values) {" << endl
e78566595089 initial import
mandel
parents:
diff changeset
359 << " return new " << flags_entry->targetLangName() << "(values);" << endl
e78566595089 initial import
mandel
parents:
diff changeset
360 << " }" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
361 }
e78566595089 initial import
mandel
parents:
diff changeset
362
e78566595089 initial import
mandel
parents:
diff changeset
363 // The resolve functions. The public one that returns the right
e78566595089 initial import
mandel
parents:
diff changeset
364 // type and an internal one that has a generic signature. Makes it
e78566595089 initial import
mandel
parents:
diff changeset
365 // easier to find the right one from JNI.
e78566595089 initial import
mandel
parents:
diff changeset
366 s << " public static " << d_enum->name() << " resolve(int value) {" << endl
e78566595089 initial import
mandel
parents:
diff changeset
367 << " return (" << d_enum->name() << ") resolve_internal(value);" << endl
e78566595089 initial import
mandel
parents:
diff changeset
368 << " }" << endl
e78566595089 initial import
mandel
parents:
diff changeset
369 << " private static Object resolve_internal(int value) {" << endl
e78566595089 initial import
mandel
parents:
diff changeset
370 << " switch (value) {" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
371
e78566595089 initial import
mandel
parents:
diff changeset
372 for (int i=0; i<values.size(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
373 AbstractMetaEnumValue *e = values.at(i);
e78566595089 initial import
mandel
parents:
diff changeset
374
e78566595089 initial import
mandel
parents:
diff changeset
375 if (d_enum->typeEntry()->isEnumValueRejected(e->name()))
e78566595089 initial import
mandel
parents:
diff changeset
376 continue;
e78566595089 initial import
mandel
parents:
diff changeset
377
e78566595089 initial import
mandel
parents:
diff changeset
378 s << " case " << e->value() << ": return " << e->name() << ";" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
379 }
e78566595089 initial import
mandel
parents:
diff changeset
380
e78566595089 initial import
mandel
parents:
diff changeset
381 s << " }" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
382
e78566595089 initial import
mandel
parents:
diff changeset
383 if (entry->isExtensible()) {
e78566595089 initial import
mandel
parents:
diff changeset
384 s << " if (enumCache == null)" << endl
e78566595089 initial import
mandel
parents:
diff changeset
385 << " enumCache = new java.util.HashMap<Integer, " << d_enum->name()
e78566595089 initial import
mandel
parents:
diff changeset
386 << ">();" << endl
e78566595089 initial import
mandel
parents:
diff changeset
387 << " " << d_enum->name() << " e = enumCache.get(value);" << endl
e78566595089 initial import
mandel
parents:
diff changeset
388 << " if (e == null) {" << endl
e78566595089 initial import
mandel
parents:
diff changeset
389 << " e = (" << d_enum->name() << ") qt.GeneratorUtilities.createExtendedEnum("
e78566595089 initial import
mandel
parents:
diff changeset
390 << "value, CustomEnum.ordinal(), " << d_enum->name() << ".class, CustomEnum.name());"
e78566595089 initial import
mandel
parents:
diff changeset
391 << endl
e78566595089 initial import
mandel
parents:
diff changeset
392 << " enumCache.put(value, e);" << endl
e78566595089 initial import
mandel
parents:
diff changeset
393 << " }" << endl
e78566595089 initial import
mandel
parents:
diff changeset
394 << " return e;" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
395 } else {
e78566595089 initial import
mandel
parents:
diff changeset
396 s << " throw new qt.QNoSuchEnumValueException(value);" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
397 }
e78566595089 initial import
mandel
parents:
diff changeset
398
e78566595089 initial import
mandel
parents:
diff changeset
399
e78566595089 initial import
mandel
parents:
diff changeset
400 s << " }" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
401
e78566595089 initial import
mandel
parents:
diff changeset
402 s << " private final int value;" << endl
e78566595089 initial import
mandel
parents:
diff changeset
403 << endl;
e78566595089 initial import
mandel
parents:
diff changeset
404 if (entry->isExtensible()) {
e78566595089 initial import
mandel
parents:
diff changeset
405 s << " private static java.util.HashMap<Integer, " << d_enum->name()
e78566595089 initial import
mandel
parents:
diff changeset
406 << "> enumCache;";
e78566595089 initial import
mandel
parents:
diff changeset
407 }
e78566595089 initial import
mandel
parents:
diff changeset
408 s << " }" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
409 */
e78566595089 initial import
mandel
parents:
diff changeset
410 // Write out the QFlags if present...
e78566595089 initial import
mandel
parents:
diff changeset
411 /* FlagsTypeEntry *flags_entry = entry->flags();
e78566595089 initial import
mandel
parents:
diff changeset
412 if (flags_entry) {
e78566595089 initial import
mandel
parents:
diff changeset
413 QString flagsName = flags_entry->targetLangName();
e78566595089 initial import
mandel
parents:
diff changeset
414 s << INDENT << "alias QFlags!(" << d_enum->name() << ") " << flagsName << ";" << endl << endl;
e78566595089 initial import
mandel
parents:
diff changeset
415 }*/
e78566595089 initial import
mandel
parents:
diff changeset
416 }
e78566595089 initial import
mandel
parents:
diff changeset
417
e78566595089 initial import
mandel
parents:
diff changeset
418 void DGenerator::writePrivateNativeFunction(QTextStream &s, const AbstractMetaFunction *d_function)
e78566595089 initial import
mandel
parents:
diff changeset
419 {
e78566595089 initial import
mandel
parents:
diff changeset
420 int exclude_attributes = AbstractMetaAttributes::Public | AbstractMetaAttributes::Protected;
e78566595089 initial import
mandel
parents:
diff changeset
421 int include_attributes = 0;
e78566595089 initial import
mandel
parents:
diff changeset
422
e78566595089 initial import
mandel
parents:
diff changeset
423 if (d_function->isEmptyFunction())
e78566595089 initial import
mandel
parents:
diff changeset
424 exclude_attributes |= AbstractMetaAttributes::Native;
e78566595089 initial import
mandel
parents:
diff changeset
425 else
e78566595089 initial import
mandel
parents:
diff changeset
426 include_attributes |= AbstractMetaAttributes::Native;
e78566595089 initial import
mandel
parents:
diff changeset
427
e78566595089 initial import
mandel
parents:
diff changeset
428 // if (!d_function->isConstructor())
e78566595089 initial import
mandel
parents:
diff changeset
429 // include_attributes |= AbstractMetaAttributes::Static;
e78566595089 initial import
mandel
parents:
diff changeset
430
e78566595089 initial import
mandel
parents:
diff changeset
431 writeFunctionAttributes(s, d_function, include_attributes, exclude_attributes,
e78566595089 initial import
mandel
parents:
diff changeset
432 EnumAsInts | ExternC
e78566595089 initial import
mandel
parents:
diff changeset
433 | (d_function->isEmptyFunction()
e78566595089 initial import
mandel
parents:
diff changeset
434 || d_function->isNormal()
e78566595089 initial import
mandel
parents:
diff changeset
435 || d_function->isSignal() ? 0 : SkipReturnType));
e78566595089 initial import
mandel
parents:
diff changeset
436
e78566595089 initial import
mandel
parents:
diff changeset
437 if (d_function->isConstructor())
e78566595089 initial import
mandel
parents:
diff changeset
438 s << "void* ";
e78566595089 initial import
mandel
parents:
diff changeset
439
e78566595089 initial import
mandel
parents:
diff changeset
440
e78566595089 initial import
mandel
parents:
diff changeset
441 s << d_function->marshalledName();
e78566595089 initial import
mandel
parents:
diff changeset
442 /* qtd
e78566595089 initial import
mandel
parents:
diff changeset
443 s << "(";
e78566595089 initial import
mandel
parents:
diff changeset
444
e78566595089 initial import
mandel
parents:
diff changeset
445 AbstractMetaArgumentList arguments = d_function->arguments();
e78566595089 initial import
mandel
parents:
diff changeset
446
e78566595089 initial import
mandel
parents:
diff changeset
447 if (!d_function->isStatic() && !d_function->isConstructor())
e78566595089 initial import
mandel
parents:
diff changeset
448 s << "void *__this__nativeId";
e78566595089 initial import
mandel
parents:
diff changeset
449 for (int i=0; i<arguments.count(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
450 const AbstractMetaArgument *arg = arguments.at(i);
e78566595089 initial import
mandel
parents:
diff changeset
451
e78566595089 initial import
mandel
parents:
diff changeset
452 if (!d_function->argumentRemoved(i+1)) {
e78566595089 initial import
mandel
parents:
diff changeset
453 if (i > 0 || (!d_function->isStatic() && !d_function->isConstructor()))
e78566595089 initial import
mandel
parents:
diff changeset
454 s << ", ";
e78566595089 initial import
mandel
parents:
diff changeset
455
e78566595089 initial import
mandel
parents:
diff changeset
456 if (!arg->type()->hasNativeId())
e78566595089 initial import
mandel
parents:
diff changeset
457 writeArgument(s, d_function, arg, EnumAsInts);
e78566595089 initial import
mandel
parents:
diff changeset
458 else
e78566595089 initial import
mandel
parents:
diff changeset
459 s << "void *" << arg->argumentName();
e78566595089 initial import
mandel
parents:
diff changeset
460 }
e78566595089 initial import
mandel
parents:
diff changeset
461 }
e78566595089 initial import
mandel
parents:
diff changeset
462 s << ")";
e78566595089 initial import
mandel
parents:
diff changeset
463 */
e78566595089 initial import
mandel
parents:
diff changeset
464
e78566595089 initial import
mandel
parents:
diff changeset
465 CppImplGenerator::writeFinalFunctionArguments(s, d_function, true); // qtd
e78566595089 initial import
mandel
parents:
diff changeset
466
e78566595089 initial import
mandel
parents:
diff changeset
467 // Make sure people don't call the private functions
33
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
468 // qtd remember name QNoImplementationException
1
e78566595089 initial import
mandel
parents:
diff changeset
469 if (d_function->isEmptyFunction()) {
e78566595089 initial import
mandel
parents:
diff changeset
470 s << endl
e78566595089 initial import
mandel
parents:
diff changeset
471 << INDENT << "{" << endl
33
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
472 << INDENT << " throw new Exception(\"No Implementation Exception\");" << endl
1
e78566595089 initial import
mandel
parents:
diff changeset
473 << INDENT << "}" << endl << endl;
e78566595089 initial import
mandel
parents:
diff changeset
474 } else {
e78566595089 initial import
mandel
parents:
diff changeset
475 s << ";" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
476 }
e78566595089 initial import
mandel
parents:
diff changeset
477 }
e78566595089 initial import
mandel
parents:
diff changeset
478
e78566595089 initial import
mandel
parents:
diff changeset
479 static QString function_call_for_ownership(TypeSystem::Ownership owner)
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
480 {
1
e78566595089 initial import
mandel
parents:
diff changeset
481 if (owner == TypeSystem::CppOwnership) {
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
482 return "__setFlags(QtdObjectFlags.nativeOwnership, true)";
1
e78566595089 initial import
mandel
parents:
diff changeset
483 } else /* qtd 2 if (owner == TypeSystem::TargetLangOwnership) */ {
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
484 return "__setFlags(QtdObjectFlags.nativeOwnership, false)";
1
e78566595089 initial import
mandel
parents:
diff changeset
485 }/* else if (owner == TypeSystem::DefaultOwnership) {
e78566595089 initial import
mandel
parents:
diff changeset
486 return "__no_real_delete = false";
e78566595089 initial import
mandel
parents:
diff changeset
487
e78566595089 initial import
mandel
parents:
diff changeset
488 } else {
e78566595089 initial import
mandel
parents:
diff changeset
489 Q_ASSERT(false);
e78566595089 initial import
mandel
parents:
diff changeset
490 return "bogus()";
e78566595089 initial import
mandel
parents:
diff changeset
491 }*/
e78566595089 initial import
mandel
parents:
diff changeset
492 }
e78566595089 initial import
mandel
parents:
diff changeset
493
e78566595089 initial import
mandel
parents:
diff changeset
494 void DGenerator::writeOwnershipForContainer(QTextStream &s, TypeSystem::Ownership owner,
e78566595089 initial import
mandel
parents:
diff changeset
495 AbstractMetaType *type, const QString &arg_name)
e78566595089 initial import
mandel
parents:
diff changeset
496 {
e78566595089 initial import
mandel
parents:
diff changeset
497 Q_ASSERT(type->isContainer());
e78566595089 initial import
mandel
parents:
diff changeset
498
e78566595089 initial import
mandel
parents:
diff changeset
499 s << INDENT << "for (" << type->instantiations().at(0)->fullName() << " i : "
e78566595089 initial import
mandel
parents:
diff changeset
500 << arg_name << ")" << endl
e78566595089 initial import
mandel
parents:
diff changeset
501 << INDENT << " if (i != null) i." << function_call_for_ownership(owner) << ";" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
502
e78566595089 initial import
mandel
parents:
diff changeset
503 }
e78566595089 initial import
mandel
parents:
diff changeset
504
e78566595089 initial import
mandel
parents:
diff changeset
505 void DGenerator::writeOwnershipForContainer(QTextStream &s, TypeSystem::Ownership owner,
e78566595089 initial import
mandel
parents:
diff changeset
506 AbstractMetaArgument *arg)
e78566595089 initial import
mandel
parents:
diff changeset
507 {
e78566595089 initial import
mandel
parents:
diff changeset
508 writeOwnershipForContainer(s, owner, arg->type(), arg->argumentName());
e78566595089 initial import
mandel
parents:
diff changeset
509 }
e78566595089 initial import
mandel
parents:
diff changeset
510
e78566595089 initial import
mandel
parents:
diff changeset
511 static FunctionModificationList get_function_modifications_for_class_hierarchy(const AbstractMetaFunction *d_function)
e78566595089 initial import
mandel
parents:
diff changeset
512 {
e78566595089 initial import
mandel
parents:
diff changeset
513 FunctionModificationList mods;
e78566595089 initial import
mandel
parents:
diff changeset
514 const AbstractMetaClass *cls = d_function->implementingClass();
e78566595089 initial import
mandel
parents:
diff changeset
515 while (cls != 0) {
e78566595089 initial import
mandel
parents:
diff changeset
516 mods += d_function->modifications(cls);
e78566595089 initial import
mandel
parents:
diff changeset
517
e78566595089 initial import
mandel
parents:
diff changeset
518 if (cls == cls->baseClass())
e78566595089 initial import
mandel
parents:
diff changeset
519 break;
e78566595089 initial import
mandel
parents:
diff changeset
520 cls = cls->baseClass();
e78566595089 initial import
mandel
parents:
diff changeset
521 }
e78566595089 initial import
mandel
parents:
diff changeset
522 return mods;
e78566595089 initial import
mandel
parents:
diff changeset
523 }
e78566595089 initial import
mandel
parents:
diff changeset
524
e78566595089 initial import
mandel
parents:
diff changeset
525 void DGenerator::writeInjectedCode(QTextStream &s, const AbstractMetaFunction *d_function,
e78566595089 initial import
mandel
parents:
diff changeset
526 CodeSnip::Position position)
e78566595089 initial import
mandel
parents:
diff changeset
527 {
e78566595089 initial import
mandel
parents:
diff changeset
528 FunctionModificationList mods = get_function_modifications_for_class_hierarchy(d_function);
e78566595089 initial import
mandel
parents:
diff changeset
529 foreach (FunctionModification mod, mods) {
e78566595089 initial import
mandel
parents:
diff changeset
530 if (mod.snips.count() <= 0)
e78566595089 initial import
mandel
parents:
diff changeset
531 continue ;
e78566595089 initial import
mandel
parents:
diff changeset
532
e78566595089 initial import
mandel
parents:
diff changeset
533 foreach (CodeSnip snip, mod.snips) {
e78566595089 initial import
mandel
parents:
diff changeset
534 if (snip.position != position)
e78566595089 initial import
mandel
parents:
diff changeset
535 continue ;
e78566595089 initial import
mandel
parents:
diff changeset
536
e78566595089 initial import
mandel
parents:
diff changeset
537 if (snip.language != TypeSystem::TargetLangCode)
e78566595089 initial import
mandel
parents:
diff changeset
538 continue ;
e78566595089 initial import
mandel
parents:
diff changeset
539
e78566595089 initial import
mandel
parents:
diff changeset
540 QString code;
e78566595089 initial import
mandel
parents:
diff changeset
541 QTextStream tmpStream(&code);
e78566595089 initial import
mandel
parents:
diff changeset
542 snip.formattedCode(tmpStream, INDENT);
e78566595089 initial import
mandel
parents:
diff changeset
543 ArgumentMap map = snip.argumentMap;
e78566595089 initial import
mandel
parents:
diff changeset
544 ArgumentMap::iterator it = map.begin();
e78566595089 initial import
mandel
parents:
diff changeset
545 for (;it!=map.end();++it) {
e78566595089 initial import
mandel
parents:
diff changeset
546 int pos = it.key() - 1;
e78566595089 initial import
mandel
parents:
diff changeset
547 QString meta_name = it.value();
e78566595089 initial import
mandel
parents:
diff changeset
548
e78566595089 initial import
mandel
parents:
diff changeset
549 if (pos >= 0 && pos < d_function->arguments().count()) {
e78566595089 initial import
mandel
parents:
diff changeset
550 code = code.replace(meta_name, d_function->arguments().at(pos)->argumentName());
e78566595089 initial import
mandel
parents:
diff changeset
551 } else {
e78566595089 initial import
mandel
parents:
diff changeset
552 QString debug = QString("argument map specifies invalid argument index %1"
e78566595089 initial import
mandel
parents:
diff changeset
553 "for function '%2'")
e78566595089 initial import
mandel
parents:
diff changeset
554 .arg(pos + 1).arg(d_function->name());
e78566595089 initial import
mandel
parents:
diff changeset
555 ReportHandler::warning(debug);
e78566595089 initial import
mandel
parents:
diff changeset
556 }
e78566595089 initial import
mandel
parents:
diff changeset
557
e78566595089 initial import
mandel
parents:
diff changeset
558 }
e78566595089 initial import
mandel
parents:
diff changeset
559 s << code << endl;
e78566595089 initial import
mandel
parents:
diff changeset
560 }
e78566595089 initial import
mandel
parents:
diff changeset
561 }
e78566595089 initial import
mandel
parents:
diff changeset
562 }
e78566595089 initial import
mandel
parents:
diff changeset
563
e78566595089 initial import
mandel
parents:
diff changeset
564
e78566595089 initial import
mandel
parents:
diff changeset
565 void DGenerator::writeJavaCallThroughContents(QTextStream &s, const AbstractMetaFunction *d_function, uint attributes)
e78566595089 initial import
mandel
parents:
diff changeset
566 {
e78566595089 initial import
mandel
parents:
diff changeset
567 Q_UNUSED(attributes);
e78566595089 initial import
mandel
parents:
diff changeset
568 writeInjectedCode(s, d_function, CodeSnip::Beginning);
e78566595089 initial import
mandel
parents:
diff changeset
569 /* qtd
e78566595089 initial import
mandel
parents:
diff changeset
570 if (d_function->implementingClass()->isQObject()
e78566595089 initial import
mandel
parents:
diff changeset
571 && !d_function->isStatic()
e78566595089 initial import
mandel
parents:
diff changeset
572 && !d_function->isConstructor()
e78566595089 initial import
mandel
parents:
diff changeset
573 && d_function->name() != QLatin1String("thread")
e78566595089 initial import
mandel
parents:
diff changeset
574 && d_function->name() != QLatin1String("disposeLater")) {
e78566595089 initial import
mandel
parents:
diff changeset
575 s << INDENT << "qt.GeneratorUtilities.threadCheck(this);" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
576 }
e78566595089 initial import
mandel
parents:
diff changeset
577 */
e78566595089 initial import
mandel
parents:
diff changeset
578 AbstractMetaArgumentList arguments = d_function->arguments();
e78566595089 initial import
mandel
parents:
diff changeset
579
e78566595089 initial import
mandel
parents:
diff changeset
580 if (!d_function->isConstructor()) {
e78566595089 initial import
mandel
parents:
diff changeset
581 TypeSystem::Ownership owner = d_function->ownership(d_function->implementingClass(), TypeSystem::TargetLangCode, -1);
e78566595089 initial import
mandel
parents:
diff changeset
582 if (owner != TypeSystem::InvalidOwnership)
e78566595089 initial import
mandel
parents:
diff changeset
583 s << INDENT << "this." << function_call_for_ownership(owner) << ";" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
584 }
e78566595089 initial import
mandel
parents:
diff changeset
585
e78566595089 initial import
mandel
parents:
diff changeset
586 for (int i=0; i<arguments.count(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
587 AbstractMetaArgument *arg = arguments.at(i);
e78566595089 initial import
mandel
parents:
diff changeset
588
e78566595089 initial import
mandel
parents:
diff changeset
589 if (!d_function->argumentRemoved(i+1)) {
e78566595089 initial import
mandel
parents:
diff changeset
590 TypeSystem::Ownership owner = d_function->ownership(d_function->implementingClass(), TypeSystem::TargetLangCode, i+1);
e78566595089 initial import
mandel
parents:
diff changeset
591 if (owner != TypeSystem::InvalidOwnership) {
e78566595089 initial import
mandel
parents:
diff changeset
592 s << INDENT << "if (" << arg->argumentName() << " !is null) {" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
593 {
e78566595089 initial import
mandel
parents:
diff changeset
594 Indentation indent(INDENT);
e78566595089 initial import
mandel
parents:
diff changeset
595 if (arg->type()->isContainer())
e78566595089 initial import
mandel
parents:
diff changeset
596 ;// qtd2 writeOwnershipForContainer(s, owner, arg);
e78566595089 initial import
mandel
parents:
diff changeset
597 else
e78566595089 initial import
mandel
parents:
diff changeset
598 s << INDENT << arg->argumentName() << "." << function_call_for_ownership(owner) << ";" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
599 }
e78566595089 initial import
mandel
parents:
diff changeset
600 s << INDENT << "}" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
601 }
e78566595089 initial import
mandel
parents:
diff changeset
602 /*
e78566595089 initial import
mandel
parents:
diff changeset
603 if (type->isArray()) {
e78566595089 initial import
mandel
parents:
diff changeset
604 s << INDENT << "if (" << arg->argumentName() << ".length != " << type->arrayElementCount() << ")" << endl
e78566595089 initial import
mandel
parents:
diff changeset
605 << INDENT << " " << "throw new IllegalArgumentException(\"Wrong number of elements in array. Found: \" + "
e78566595089 initial import
mandel
parents:
diff changeset
606 << arg->argumentName() << ".length + \", expected: " << type->arrayElementCount() << "\");"
e78566595089 initial import
mandel
parents:
diff changeset
607 << endl << endl;
e78566595089 initial import
mandel
parents:
diff changeset
608 }
e78566595089 initial import
mandel
parents:
diff changeset
609
e78566595089 initial import
mandel
parents:
diff changeset
610 if (type->isEnum()) {
e78566595089 initial import
mandel
parents:
diff changeset
611 EnumTypeEntry *et = (EnumTypeEntry *) type->typeEntry();
e78566595089 initial import
mandel
parents:
diff changeset
612 if (et->forceInteger()) {
e78566595089 initial import
mandel
parents:
diff changeset
613 if (!et->lowerBound().isEmpty()) {
e78566595089 initial import
mandel
parents:
diff changeset
614 s << INDENT << "if (" << arg->argumentName() << " < " << et->lowerBound() << ")" << endl
e78566595089 initial import
mandel
parents:
diff changeset
615 << INDENT << " throw new IllegalArgumentException(\"Argument " << arg->argumentName()
e78566595089 initial import
mandel
parents:
diff changeset
616 << " is less than lowerbound " << et->lowerBound() << "\");" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
617 }
e78566595089 initial import
mandel
parents:
diff changeset
618 if (!et->upperBound().isEmpty()) {
e78566595089 initial import
mandel
parents:
diff changeset
619 s << INDENT << "if (" << arg->argumentName() << " > " << et->upperBound() << ")" << endl
e78566595089 initial import
mandel
parents:
diff changeset
620 << INDENT << " throw new IllegalArgumentException(\"Argument " << arg->argumentName()
e78566595089 initial import
mandel
parents:
diff changeset
621 << " is greated than upperbound " << et->upperBound() << "\");" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
622 }
e78566595089 initial import
mandel
parents:
diff changeset
623 }
e78566595089 initial import
mandel
parents:
diff changeset
624 }
e78566595089 initial import
mandel
parents:
diff changeset
625 */
e78566595089 initial import
mandel
parents:
diff changeset
626 }
e78566595089 initial import
mandel
parents:
diff changeset
627 }
e78566595089 initial import
mandel
parents:
diff changeset
628
e78566595089 initial import
mandel
parents:
diff changeset
629 /* qtd2
e78566595089 initial import
mandel
parents:
diff changeset
630 if (!d_function->isConstructor() && !d_function->isStatic()) {
e78566595089 initial import
mandel
parents:
diff changeset
631 s << INDENT << "if (nativeId() == 0)" << endl
e78566595089 initial import
mandel
parents:
diff changeset
632 << INDENT << " throw new QNoNativeResourcesException(\"Function call on incomplete object of type: \" +getClass().getName());" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
633 }
e78566595089 initial import
mandel
parents:
diff changeset
634 */
e78566595089 initial import
mandel
parents:
diff changeset
635 for (int i=0; i<arguments.size(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
636 if (d_function->nullPointersDisabled(d_function->implementingClass(), i + 1)) {
e78566595089 initial import
mandel
parents:
diff changeset
637 s << INDENT << "/*if (" << arguments.at(i)->argumentName() << " is null)" << endl
e78566595089 initial import
mandel
parents:
diff changeset
638 << INDENT << " throw new NullPointerException(\"Argument '" << arguments.at(i)->argumentName() << "': null not expected.\"); */" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
639 }
e78566595089 initial import
mandel
parents:
diff changeset
640 }
e78566595089 initial import
mandel
parents:
diff changeset
641
e78566595089 initial import
mandel
parents:
diff changeset
642 QList<ReferenceCount> referenceCounts;
e78566595089 initial import
mandel
parents:
diff changeset
643 for (int i=0; i<arguments.size() + 1; ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
644 referenceCounts = d_function->referenceCounts(d_function->implementingClass(),
e78566595089 initial import
mandel
parents:
diff changeset
645 i == 0 ? -1 : i);
e78566595089 initial import
mandel
parents:
diff changeset
646
e78566595089 initial import
mandel
parents:
diff changeset
647 foreach (ReferenceCount refCount, referenceCounts)
e78566595089 initial import
mandel
parents:
diff changeset
648 writeReferenceCount(s, refCount, i == 0 ? "this" : arguments.at(i-1)->argumentName());
e78566595089 initial import
mandel
parents:
diff changeset
649 }
e78566595089 initial import
mandel
parents:
diff changeset
650
e78566595089 initial import
mandel
parents:
diff changeset
651 referenceCounts = d_function->referenceCounts(d_function->implementingClass(), 0);
e78566595089 initial import
mandel
parents:
diff changeset
652 AbstractMetaType *return_type = d_function->type();
e78566595089 initial import
mandel
parents:
diff changeset
653 QString new_return_type = QString(d_function->typeReplaced(0)).replace('$', '.');
e78566595089 initial import
mandel
parents:
diff changeset
654 bool has_return_type = new_return_type != "void"
e78566595089 initial import
mandel
parents:
diff changeset
655 && (!new_return_type.isEmpty() || return_type != 0);
e78566595089 initial import
mandel
parents:
diff changeset
656 // qtd TypeSystem::Ownership owner = d_function->ownership(d_function->implementingClass(), TypeSystem::TargetLangCode, 0);
e78566595089 initial import
mandel
parents:
diff changeset
657
e78566595089 initial import
mandel
parents:
diff changeset
658 bool has_code_injections_at_the_end = false;
e78566595089 initial import
mandel
parents:
diff changeset
659 FunctionModificationList mods = get_function_modifications_for_class_hierarchy(d_function);
e78566595089 initial import
mandel
parents:
diff changeset
660 foreach (FunctionModification mod, mods) {
e78566595089 initial import
mandel
parents:
diff changeset
661 foreach (CodeSnip snip, mod.snips) {
e78566595089 initial import
mandel
parents:
diff changeset
662 if (snip.position == CodeSnip::End && snip.language == TypeSystem::TargetLangCode) {
e78566595089 initial import
mandel
parents:
diff changeset
663 has_code_injections_at_the_end = true;
e78566595089 initial import
mandel
parents:
diff changeset
664 break;
e78566595089 initial import
mandel
parents:
diff changeset
665 }
e78566595089 initial import
mandel
parents:
diff changeset
666 }
e78566595089 initial import
mandel
parents:
diff changeset
667 }
e78566595089 initial import
mandel
parents:
diff changeset
668
e78566595089 initial import
mandel
parents:
diff changeset
669 // bool needs_return_variable = has_return_type
e78566595089 initial import
mandel
parents:
diff changeset
670 // && (owner != TypeSystem::InvalidOwnership || referenceCounts.size() > 0 || has_code_injections_at_the_end);
e78566595089 initial import
mandel
parents:
diff changeset
671
33
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
672 if(return_type) { // qtd
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
673 if (return_type->isTargetLangString())
1
e78566595089 initial import
mandel
parents:
diff changeset
674 s << INDENT << "string res;" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
675
33
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
676 if(return_type->name() == "QModelIndex")
1
e78566595089 initial import
mandel
parents:
diff changeset
677 s << INDENT << "QModelIndex res;" << endl;
81
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
678 else if (return_type->typeEntry()->isStructInD())
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
679 s << INDENT << return_type->name() << " res;" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
680
33
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
681 if(return_type->isContainer())
1
e78566595089 initial import
mandel
parents:
diff changeset
682 s << INDENT << this->translateType(d_function->type(), d_function->ownerClass(), NoOption) << " res;" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
683 }
e78566595089 initial import
mandel
parents:
diff changeset
684
130
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
685 // returning string or a struct
81
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
686 bool return_in_arg = return_type && (return_type->isTargetLangString() ||
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
687 return_type->name() == "QModelIndex" ||
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
688 return_type->isContainer() ||
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
689 return_type->typeEntry()->isStructInD());
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
690
130
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
691 // bool flag showing if we return value immediately, without any conversions
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
692 // which is commpon for primitive types, initially set up to return_in_arg, because in that case
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
693 // we don't need type conversions
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
694 bool returnImmediately = return_in_arg;
81
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
695
1
e78566595089 initial import
mandel
parents:
diff changeset
696 s << INDENT;
e78566595089 initial import
mandel
parents:
diff changeset
697 if ( (has_return_type && d_function->argumentReplaced(0).isEmpty() ) || d_function->isConstructor()) { //qtd
e78566595089 initial import
mandel
parents:
diff changeset
698 if(d_function->type() && d_function->type()->isQObject()) { // qtd
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
699 s << "void *ret = ";
81
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
700 } else if(return_in_arg) // qtd
1
e78566595089 initial import
mandel
parents:
diff changeset
701 ;
81
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
702 else if (d_function->isConstructor()) { // qtd
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
703 s << "void* ret = ";
81
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
704 } else if (return_type && return_type->isValue() && !return_type->typeEntry()->isStructInD()) {
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
705 s << "void* ret = ";
33
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
706 } else if (return_type && return_type->isVariant()) {
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
707 s << "void* ret = ";
33
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
708 } else if (return_type && ( return_type->isObject() ||
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
709 (return_type->isNativePointer() && return_type->typeEntry()->isValue()) ||
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
710 return_type->typeEntry()->isInterface()) ) {
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
711 s << "void* ret = ";
33
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
712 } else if (return_type && return_type->isArray()) {
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
713 s << return_type->arrayElementType()->name() + "* ret = ";
1
e78566595089 initial import
mandel
parents:
diff changeset
714 } else {
130
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
715 returnImmediately = true;
1
e78566595089 initial import
mandel
parents:
diff changeset
716 s << "return ";
e78566595089 initial import
mandel
parents:
diff changeset
717 }
e78566595089 initial import
mandel
parents:
diff changeset
718
e78566595089 initial import
mandel
parents:
diff changeset
719 if (return_type && return_type->isTargetLangEnum()) {
e78566595089 initial import
mandel
parents:
diff changeset
720 s << "cast(" << return_type->typeEntry()->qualifiedTargetLangName() << ") ";
e78566595089 initial import
mandel
parents:
diff changeset
721 }/* qtd2 flags else if (return_type && return_type->isTargetLangFlags()) {
e78566595089 initial import
mandel
parents:
diff changeset
722 s << "new " << return_type->typeEntry()->qualifiedTargetLangName() << "(";
e78566595089 initial import
mandel
parents:
diff changeset
723 }*/
e78566595089 initial import
mandel
parents:
diff changeset
724 }
e78566595089 initial import
mandel
parents:
diff changeset
725
e78566595089 initial import
mandel
parents:
diff changeset
726 bool useJumpTable = d_function->jumpTableId() != -1;
e78566595089 initial import
mandel
parents:
diff changeset
727 if (useJumpTable) {
e78566595089 initial import
mandel
parents:
diff changeset
728 // The native function returns the correct type, we only have
e78566595089 initial import
mandel
parents:
diff changeset
729 // java.lang.Object so we may have to cast...
e78566595089 initial import
mandel
parents:
diff changeset
730 QString signature = JumpTablePreprocessor::signature(d_function);
e78566595089 initial import
mandel
parents:
diff changeset
731
e78566595089 initial import
mandel
parents:
diff changeset
732 // printf("return: %s::%s return=%p, replace-value=%s, replace-type=%s signature: %s\n",
e78566595089 initial import
mandel
parents:
diff changeset
733 // qPrintable(d_function->ownerClass()->name()),
e78566595089 initial import
mandel
parents:
diff changeset
734 // qPrintable(d_function->signature()),
e78566595089 initial import
mandel
parents:
diff changeset
735 // return_type,
e78566595089 initial import
mandel
parents:
diff changeset
736 // qPrintable(d_function->argumentReplaced(0)),
e78566595089 initial import
mandel
parents:
diff changeset
737 // qPrintable(new_return_type),
e78566595089 initial import
mandel
parents:
diff changeset
738 // qPrintable(signature));
e78566595089 initial import
mandel
parents:
diff changeset
739
e78566595089 initial import
mandel
parents:
diff changeset
740 if (has_return_type && signature.at(0) == 'L') {
e78566595089 initial import
mandel
parents:
diff changeset
741 if (new_return_type.length() > 0) {
e78566595089 initial import
mandel
parents:
diff changeset
742 // printf(" ---> replace-type: %s\n", qPrintable(new_return_type));
e78566595089 initial import
mandel
parents:
diff changeset
743 s << "(" << new_return_type << ") ";
e78566595089 initial import
mandel
parents:
diff changeset
744 } else if (d_function->argumentReplaced(0).isEmpty()) {
e78566595089 initial import
mandel
parents:
diff changeset
745 // printf(" ---> replace-value\n");
e78566595089 initial import
mandel
parents:
diff changeset
746 s << "(" << translateType(return_type, d_function->implementingClass()) << ") ";
e78566595089 initial import
mandel
parents:
diff changeset
747 }
e78566595089 initial import
mandel
parents:
diff changeset
748 }
e78566595089 initial import
mandel
parents:
diff changeset
749
e78566595089 initial import
mandel
parents:
diff changeset
750 s << "JTbl." << JumpTablePreprocessor::signature(d_function) << "("
e78566595089 initial import
mandel
parents:
diff changeset
751 << d_function->jumpTableId() << ", ";
e78566595089 initial import
mandel
parents:
diff changeset
752
e78566595089 initial import
mandel
parents:
diff changeset
753 // Constructors and static functions don't have native id, but
e78566595089 initial import
mandel
parents:
diff changeset
754 // the functions expect them anyway, hence add '0'. Normal
e78566595089 initial import
mandel
parents:
diff changeset
755 // functions get their native ids added just below...
e78566595089 initial import
mandel
parents:
diff changeset
756 if (d_function->isConstructor() || d_function->isStatic())
e78566595089 initial import
mandel
parents:
diff changeset
757 s << "0, ";
e78566595089 initial import
mandel
parents:
diff changeset
758
e78566595089 initial import
mandel
parents:
diff changeset
759 } else {
e78566595089 initial import
mandel
parents:
diff changeset
760 /* qtd if (attributes & SuperCall) {
e78566595089 initial import
mandel
parents:
diff changeset
761 s << "super.";
e78566595089 initial import
mandel
parents:
diff changeset
762 }*/
e78566595089 initial import
mandel
parents:
diff changeset
763 s << d_function->marshalledName() << "(";
e78566595089 initial import
mandel
parents:
diff changeset
764 }
e78566595089 initial import
mandel
parents:
diff changeset
765
188
7dd099050621 initial commit for D2 support
eldar
parents: 187
diff changeset
766 if (!d_function->isConstructor() && !d_function->isStatic()) {
7dd099050621 initial commit for D2 support
eldar
parents: 187
diff changeset
767 if(dVersion == 2 && d_function->isConstant())
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
768 s << "(cast(" << d_function->ownerClass()->name() << ")this).__nativeId";
188
7dd099050621 initial commit for D2 support
eldar
parents: 187
diff changeset
769 else
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
770 s << "__nativeId";
188
7dd099050621 initial commit for D2 support
eldar
parents: 187
diff changeset
771 }
1
e78566595089 initial import
mandel
parents:
diff changeset
772
e78566595089 initial import
mandel
parents:
diff changeset
773 if (d_function->isConstructor() &&
e78566595089 initial import
mandel
parents:
diff changeset
774 ( d_function->implementingClass()->hasVirtualFunctions()
e78566595089 initial import
mandel
parents:
diff changeset
775 || d_function->implementingClass()->typeEntry()->isObject() ) ) { // qtd
e78566595089 initial import
mandel
parents:
diff changeset
776 s << "cast(void*) this";
e78566595089 initial import
mandel
parents:
diff changeset
777 if (arguments.count() > 0)
e78566595089 initial import
mandel
parents:
diff changeset
778 s << ", ";
e78566595089 initial import
mandel
parents:
diff changeset
779 }
e78566595089 initial import
mandel
parents:
diff changeset
780
e78566595089 initial import
mandel
parents:
diff changeset
781 if(return_in_arg) { // qtd
e78566595089 initial import
mandel
parents:
diff changeset
782 if (!d_function->isStatic() && !d_function->isConstructor()) // qtd
e78566595089 initial import
mandel
parents:
diff changeset
783 s << ", ";
e78566595089 initial import
mandel
parents:
diff changeset
784 s << "&res";
e78566595089 initial import
mandel
parents:
diff changeset
785 }
e78566595089 initial import
mandel
parents:
diff changeset
786
e78566595089 initial import
mandel
parents:
diff changeset
787 for (int i=0; i<arguments.count(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
788 const AbstractMetaArgument *arg = arguments.at(i);
e78566595089 initial import
mandel
parents:
diff changeset
789 const AbstractMetaType *type = arg->type();
e78566595089 initial import
mandel
parents:
diff changeset
790 const TypeEntry *te = type->typeEntry();
e78566595089 initial import
mandel
parents:
diff changeset
791
e78566595089 initial import
mandel
parents:
diff changeset
792 if (!d_function->argumentRemoved(i+1)) {
e78566595089 initial import
mandel
parents:
diff changeset
793 if (i > 0 || (!d_function->isStatic() && !d_function->isConstructor()) || return_in_arg) // qtd
e78566595089 initial import
mandel
parents:
diff changeset
794 s << ", ";
e78566595089 initial import
mandel
parents:
diff changeset
795
e78566595089 initial import
mandel
parents:
diff changeset
796 // qtd
e78566595089 initial import
mandel
parents:
diff changeset
797 QString modified_type = d_function->typeReplaced(arg->argumentIndex() + 1);
e78566595089 initial import
mandel
parents:
diff changeset
798 if (!modified_type.isEmpty())
e78566595089 initial import
mandel
parents:
diff changeset
799 modified_type = modified_type.replace('$', '.');
e78566595089 initial import
mandel
parents:
diff changeset
800
e78566595089 initial import
mandel
parents:
diff changeset
801 QString arg_name = arg->argumentName();
e78566595089 initial import
mandel
parents:
diff changeset
802
e78566595089 initial import
mandel
parents:
diff changeset
803 if (type->isVariant())
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
804 s << arg_name << " is null ? null : " << arg_name << ".__nativeId";
1
e78566595089 initial import
mandel
parents:
diff changeset
805 else if (te->designatedInterface())
e78566595089 initial import
mandel
parents:
diff changeset
806 s << arg_name << " is null ? null : " << arg_name << ".__ptr_" << te->designatedInterface()->name();
e78566595089 initial import
mandel
parents:
diff changeset
807 else if (modified_type == "string" /* && type->fullName() == "char" */) {
e78566595089 initial import
mandel
parents:
diff changeset
808 s << "toStringz(" << arg_name << ")";
81
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
809 } else if (type->isArray()) {
33
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
810 s << arg_name << ".ptr";
81
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
811 } else if(type->isContainer()) {
1
e78566595089 initial import
mandel
parents:
diff changeset
812 const ContainerTypeEntry *cte =
e78566595089 initial import
mandel
parents:
diff changeset
813 static_cast<const ContainerTypeEntry *>(te);
e78566595089 initial import
mandel
parents:
diff changeset
814 if(isLinearContainer(cte))
e78566595089 initial import
mandel
parents:
diff changeset
815 s << QString("%1.ptr, %1.length").arg(arg_name);
81
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
816 } else if (type->typeEntry()->qualifiedCppName() == "QChar") {
33
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
817 s << arg_name;
81
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
818 } else if (type->isTargetLangString() || (te && te->qualifiedCppName() == "QString")) {
33
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
819 s << arg_name;
81
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
820 } else if (type->isTargetLangEnum() || type->isTargetLangFlags()) {
1
e78566595089 initial import
mandel
parents:
diff changeset
821 s << arg_name;
e78566595089 initial import
mandel
parents:
diff changeset
822 // qtd s << arg->argumentName() << ".value()";
e78566595089 initial import
mandel
parents:
diff changeset
823 } else if (!type->hasNativeId() && !(te->isValue() && type->isNativePointer())) { // qtd2 hack for QStyleOption not being a nativeId based for some reason
e78566595089 initial import
mandel
parents:
diff changeset
824 s << arg_name;
e78566595089 initial import
mandel
parents:
diff changeset
825 } else if (te->isStructInD()) {
e78566595089 initial import
mandel
parents:
diff changeset
826 s << arg_name;
e78566595089 initial import
mandel
parents:
diff changeset
827 } else {
e78566595089 initial import
mandel
parents:
diff changeset
828 bool force_abstract = te->isComplex() && (((static_cast<const ComplexTypeEntry *>(te))->typeFlags() & ComplexTypeEntry::ForceAbstract) != 0);
e78566595089 initial import
mandel
parents:
diff changeset
829 if (!force_abstract) {
e78566595089 initial import
mandel
parents:
diff changeset
830 s << arg_name << " is null ? null : ";
e78566595089 initial import
mandel
parents:
diff changeset
831 } // else if (value type is abstract) then we will get a null pointer exception, which is all right
e78566595089 initial import
mandel
parents:
diff changeset
832
188
7dd099050621 initial commit for D2 support
eldar
parents: 187
diff changeset
833 if(dVersion == 2 && type->isConstant())
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
834 s << "(cast(" << type->name() << ")" << arg_name << ").__nativeId";
188
7dd099050621 initial commit for D2 support
eldar
parents: 187
diff changeset
835 else
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
836 s << arg_name << ".__nativeId";
1
e78566595089 initial import
mandel
parents:
diff changeset
837 }
e78566595089 initial import
mandel
parents:
diff changeset
838 }
e78566595089 initial import
mandel
parents:
diff changeset
839 }
e78566595089 initial import
mandel
parents:
diff changeset
840
e78566595089 initial import
mandel
parents:
diff changeset
841 if (useJumpTable) {
e78566595089 initial import
mandel
parents:
diff changeset
842 if ((!d_function->isConstructor() && !d_function->isStatic()) || arguments.size() > 0)
e78566595089 initial import
mandel
parents:
diff changeset
843 s << ", ";
e78566595089 initial import
mandel
parents:
diff changeset
844
e78566595089 initial import
mandel
parents:
diff changeset
845 if (d_function->isStatic())
e78566595089 initial import
mandel
parents:
diff changeset
846 s << "null";
e78566595089 initial import
mandel
parents:
diff changeset
847 else
e78566595089 initial import
mandel
parents:
diff changeset
848 s << "this";
e78566595089 initial import
mandel
parents:
diff changeset
849 }
e78566595089 initial import
mandel
parents:
diff changeset
850
e78566595089 initial import
mandel
parents:
diff changeset
851 s << ")";
e78566595089 initial import
mandel
parents:
diff changeset
852
e78566595089 initial import
mandel
parents:
diff changeset
853 if ( !d_function->argumentReplaced(0).isEmpty() ) {
e78566595089 initial import
mandel
parents:
diff changeset
854 s << ";" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
855 s << INDENT << "return " << d_function->argumentReplaced(0) << ";" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
856 return;
e78566595089 initial import
mandel
parents:
diff changeset
857 }
e78566595089 initial import
mandel
parents:
diff changeset
858
e78566595089 initial import
mandel
parents:
diff changeset
859 // qtd2 if (return_type && (/* qtdreturn_type->isTargetLangEnum() ||*/ return_type->isTargetLangFlags()))
e78566595089 initial import
mandel
parents:
diff changeset
860 // s << ")";
e78566595089 initial import
mandel
parents:
diff changeset
861
e78566595089 initial import
mandel
parents:
diff changeset
862 s << ";" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
863
e78566595089 initial import
mandel
parents:
diff changeset
864 /* qtd2
e78566595089 initial import
mandel
parents:
diff changeset
865 if (needs_return_variable) {
e78566595089 initial import
mandel
parents:
diff changeset
866 if (owner != TypeSystem::InvalidOwnership) {
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
867 s << INDENT << "if (ret != null) {" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
868 if (return_type->isContainer())
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
869 writeOwnershipForContainer(s, owner, return_type, "ret");
1
e78566595089 initial import
mandel
parents:
diff changeset
870 else
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
871 s << INDENT << " ret." << function_call_for_ownership(owner) << ";" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
872 s << INDENT << "}" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
873 }
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
874 s << INDENT << "return ret;" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
875 }
e78566595089 initial import
mandel
parents:
diff changeset
876 */
e78566595089 initial import
mandel
parents:
diff changeset
877 if (d_function->isConstructor()) {
e78566595089 initial import
mandel
parents:
diff changeset
878 TypeSystem::Ownership owner = d_function->ownership(d_function->implementingClass(), TypeSystem::TargetLangCode, -1);
e78566595089 initial import
mandel
parents:
diff changeset
879 if (owner != TypeSystem::InvalidOwnership && d_function->isConstructor())
e78566595089 initial import
mandel
parents:
diff changeset
880 s << INDENT << "this." << function_call_for_ownership(owner) << ";" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
881 }
e78566595089 initial import
mandel
parents:
diff changeset
882
130
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
883 // return value marschalling
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
884 if(return_type) {
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
885 if (!returnImmediately && !d_function->storeResult()) {
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
886 s << INDENT;
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
887 QString modified_type = d_function->typeReplaced(0);
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
888 if (modified_type.isEmpty())
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
889 s << translateType(d_function->type(), d_function->implementingClass());
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
890 else
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
891 s << modified_type.replace('$', '.');
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
892 s << " __d_return_value = ";
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
893 }
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
894
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
895 if ( ( has_return_type && d_function->argumentReplaced(0).isEmpty() )) // qtd
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
896 {
130
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
897 if(return_type->isQObject())
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
898 s << return_type->name() << ".__getObject(ret);" << endl;
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
899 }
130
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
900
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
901 if (return_type->isValue() && !return_type->typeEntry()->isStructInD())
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
902 s << "new " << return_type->name() << "(ret);" << endl;
130
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
903
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
904 if (return_type->isVariant())
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
905 s << "new QVariant(ret);" << endl;
130
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
906
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
907 if (return_type->isNativePointer() && return_type->typeEntry()->isValue())
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
908 s << "new " << return_type->name() << "(ret, QtdObjectFlags.nativeOwnership);" << endl;
130
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
909
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
910 if (return_type->isObject()) {
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
911 if(d_function->storeResult())
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
912 s << INDENT << QString("__m_%1.__nativeId = ret;").arg(d_function->name()) << endl
130
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
913 << INDENT << QString("return __m_%1;").arg(d_function->name()) << endl;
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
914 else
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
915 s << "qtd_" << return_type->name() << "_from_ptr(ret);" << endl;
130
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
916 s << endl;
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
917 }
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
918
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
919 if (return_type->isArray()) {
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
920 s << "ret[0 .. " << return_type->arrayElementCount() << "];" << endl;
130
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
921 }
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
922
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
923 foreach (ReferenceCount referenceCount, referenceCounts) {
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
924 writeReferenceCount(s, referenceCount, "__d_return_value");
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
925 }
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
926
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
927 if (!returnImmediately && !d_function->storeResult())
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
928 s << INDENT << "return __d_return_value;" << endl;
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
929 }
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
930 writeInjectedCode(s, d_function, CodeSnip::End);
7ae9bc9d6935 reference counting for return values. applied to QMenu
eldar
parents: 112
diff changeset
931
1
e78566595089 initial import
mandel
parents:
diff changeset
932 if(return_in_arg) // qtd
e78566595089 initial import
mandel
parents:
diff changeset
933 s << INDENT << "return res;" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
934 }
e78566595089 initial import
mandel
parents:
diff changeset
935
e78566595089 initial import
mandel
parents:
diff changeset
936 void DGenerator::retrieveModifications(const AbstractMetaFunction *d_function,
e78566595089 initial import
mandel
parents:
diff changeset
937 const AbstractMetaClass *d_class,
e78566595089 initial import
mandel
parents:
diff changeset
938 uint *exclude_attributes,
e78566595089 initial import
mandel
parents:
diff changeset
939 uint *include_attributes) const
e78566595089 initial import
mandel
parents:
diff changeset
940 {
e78566595089 initial import
mandel
parents:
diff changeset
941 FunctionModificationList mods = d_function->modifications(d_class);
e78566595089 initial import
mandel
parents:
diff changeset
942 // printf("name: %s has %d mods\n", qPrintable(d_function->signature()), mods.size());
e78566595089 initial import
mandel
parents:
diff changeset
943 foreach (FunctionModification mod, mods) {
e78566595089 initial import
mandel
parents:
diff changeset
944 if (mod.isAccessModifier()) {
e78566595089 initial import
mandel
parents:
diff changeset
945 // printf(" -> access mod to %x\n", mod.modifiers);
e78566595089 initial import
mandel
parents:
diff changeset
946 *exclude_attributes |= AbstractMetaAttributes::Public
e78566595089 initial import
mandel
parents:
diff changeset
947 | AbstractMetaAttributes::Protected
e78566595089 initial import
mandel
parents:
diff changeset
948 | AbstractMetaAttributes::Private
e78566595089 initial import
mandel
parents:
diff changeset
949 | AbstractMetaAttributes::Friendly;
e78566595089 initial import
mandel
parents:
diff changeset
950
e78566595089 initial import
mandel
parents:
diff changeset
951 if (mod.isPublic())
e78566595089 initial import
mandel
parents:
diff changeset
952 *include_attributes |= AbstractMetaAttributes::Public;
e78566595089 initial import
mandel
parents:
diff changeset
953 else if (mod.isProtected())
e78566595089 initial import
mandel
parents:
diff changeset
954 *include_attributes |= AbstractMetaAttributes::Protected;
e78566595089 initial import
mandel
parents:
diff changeset
955 else if (mod.isPrivate())
e78566595089 initial import
mandel
parents:
diff changeset
956 *include_attributes |= AbstractMetaAttributes::Private;
e78566595089 initial import
mandel
parents:
diff changeset
957 else if (mod.isFriendly())
e78566595089 initial import
mandel
parents:
diff changeset
958 *include_attributes |= AbstractMetaAttributes::Friendly;
e78566595089 initial import
mandel
parents:
diff changeset
959 }
e78566595089 initial import
mandel
parents:
diff changeset
960
e78566595089 initial import
mandel
parents:
diff changeset
961 if (mod.isFinal()) {
e78566595089 initial import
mandel
parents:
diff changeset
962 *include_attributes |= AbstractMetaAttributes::FinalInTargetLang;
e78566595089 initial import
mandel
parents:
diff changeset
963 } else if (mod.isNonFinal()) {
e78566595089 initial import
mandel
parents:
diff changeset
964 *exclude_attributes |= AbstractMetaAttributes::FinalInTargetLang;
e78566595089 initial import
mandel
parents:
diff changeset
965 }
e78566595089 initial import
mandel
parents:
diff changeset
966 }
e78566595089 initial import
mandel
parents:
diff changeset
967
e78566595089 initial import
mandel
parents:
diff changeset
968 *exclude_attributes &= ~(*include_attributes);
e78566595089 initial import
mandel
parents:
diff changeset
969 }
e78566595089 initial import
mandel
parents:
diff changeset
970
e78566595089 initial import
mandel
parents:
diff changeset
971 QString DGenerator::functionSignature(const AbstractMetaFunction *d_function,
e78566595089 initial import
mandel
parents:
diff changeset
972 uint included_attributes, uint excluded_attributes,
e78566595089 initial import
mandel
parents:
diff changeset
973 Option option,
e78566595089 initial import
mandel
parents:
diff changeset
974 int arg_count)
e78566595089 initial import
mandel
parents:
diff changeset
975 {
e78566595089 initial import
mandel
parents:
diff changeset
976 AbstractMetaArgumentList arguments = d_function->arguments();
e78566595089 initial import
mandel
parents:
diff changeset
977 int argument_count = arg_count < 0 ? arguments.size() : arg_count;
e78566595089 initial import
mandel
parents:
diff changeset
978
e78566595089 initial import
mandel
parents:
diff changeset
979 QString result;
e78566595089 initial import
mandel
parents:
diff changeset
980 QTextStream s(&result);
e78566595089 initial import
mandel
parents:
diff changeset
981 QString functionName = d_function->isConstructor() ? "this" : d_function->name(); // qtd
e78566595089 initial import
mandel
parents:
diff changeset
982 // The actual function
e78566595089 initial import
mandel
parents:
diff changeset
983 if (!(d_function->isEmptyFunction() || d_function->isNormal() || d_function->isSignal()))
e78566595089 initial import
mandel
parents:
diff changeset
984 option = Option(option | SkipReturnType);
e78566595089 initial import
mandel
parents:
diff changeset
985 writeFunctionAttributes(s, d_function, included_attributes, excluded_attributes, option);
288
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
986
1
e78566595089 initial import
mandel
parents:
diff changeset
987 s << functionName << "(";
e78566595089 initial import
mandel
parents:
diff changeset
988 writeFunctionArguments(s, d_function, argument_count, option);
e78566595089 initial import
mandel
parents:
diff changeset
989 s << ")";
e78566595089 initial import
mandel
parents:
diff changeset
990
e78566595089 initial import
mandel
parents:
diff changeset
991 return result;
e78566595089 initial import
mandel
parents:
diff changeset
992 }
e78566595089 initial import
mandel
parents:
diff changeset
993
e78566595089 initial import
mandel
parents:
diff changeset
994 void DGenerator::setupForFunction(const AbstractMetaFunction *d_function,
e78566595089 initial import
mandel
parents:
diff changeset
995 uint *included_attributes,
e78566595089 initial import
mandel
parents:
diff changeset
996 uint *excluded_attributes) const
e78566595089 initial import
mandel
parents:
diff changeset
997 {
e78566595089 initial import
mandel
parents:
diff changeset
998 *excluded_attributes |= d_function->ownerClass()->isInterface() || d_function->isConstructor()
e78566595089 initial import
mandel
parents:
diff changeset
999 ? AbstractMetaAttributes::Native | AbstractMetaAttributes::Final
e78566595089 initial import
mandel
parents:
diff changeset
1000 : 0;
e78566595089 initial import
mandel
parents:
diff changeset
1001 if (d_function->ownerClass()->isInterface())
e78566595089 initial import
mandel
parents:
diff changeset
1002 *excluded_attributes |= AbstractMetaAttributes::Abstract;
e78566595089 initial import
mandel
parents:
diff changeset
1003 if (d_function->needsCallThrough())
e78566595089 initial import
mandel
parents:
diff changeset
1004 *excluded_attributes |= AbstractMetaAttributes::Native;
e78566595089 initial import
mandel
parents:
diff changeset
1005
e78566595089 initial import
mandel
parents:
diff changeset
1006 const AbstractMetaClass *d_class = d_function->ownerClass();
e78566595089 initial import
mandel
parents:
diff changeset
1007 retrieveModifications(d_function, d_class, excluded_attributes, included_attributes);
e78566595089 initial import
mandel
parents:
diff changeset
1008 }
e78566595089 initial import
mandel
parents:
diff changeset
1009
e78566595089 initial import
mandel
parents:
diff changeset
1010 void DGenerator::writeReferenceCount(QTextStream &s, const ReferenceCount &refCount,
e78566595089 initial import
mandel
parents:
diff changeset
1011 const QString &argumentName)
e78566595089 initial import
mandel
parents:
diff changeset
1012 {
e78566595089 initial import
mandel
parents:
diff changeset
1013 if (refCount.action == ReferenceCount::Ignore)
e78566595089 initial import
mandel
parents:
diff changeset
1014 return;
e78566595089 initial import
mandel
parents:
diff changeset
1015
e78566595089 initial import
mandel
parents:
diff changeset
1016 QString refCountVariableName = refCount.variableName;
e78566595089 initial import
mandel
parents:
diff changeset
1017 if (!refCount.declareVariable.isEmpty() && refCount.action != ReferenceCount::Set) {
e78566595089 initial import
mandel
parents:
diff changeset
1018 s << INDENT << "auto __rcTmp = " << refCountVariableName << ";" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1019 refCountVariableName = "__rcTmp";
e78566595089 initial import
mandel
parents:
diff changeset
1020 }
e78566595089 initial import
mandel
parents:
diff changeset
1021
e78566595089 initial import
mandel
parents:
diff changeset
1022 if (refCount.action != ReferenceCount::Set) {
e78566595089 initial import
mandel
parents:
diff changeset
1023 s << INDENT << "if (" << argumentName << " !is null";
e78566595089 initial import
mandel
parents:
diff changeset
1024
e78566595089 initial import
mandel
parents:
diff changeset
1025 if (!refCount.conditional.isEmpty())
e78566595089 initial import
mandel
parents:
diff changeset
1026 s << " && " << refCount.conditional;
e78566595089 initial import
mandel
parents:
diff changeset
1027
e78566595089 initial import
mandel
parents:
diff changeset
1028 s << ") {" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1029 } else {
e78566595089 initial import
mandel
parents:
diff changeset
1030 if (!refCount.conditional.isEmpty())
e78566595089 initial import
mandel
parents:
diff changeset
1031 s << INDENT << "if (" << refCount.conditional << ") ";
e78566595089 initial import
mandel
parents:
diff changeset
1032 s << INDENT << "{" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1033 }
e78566595089 initial import
mandel
parents:
diff changeset
1034
e78566595089 initial import
mandel
parents:
diff changeset
1035 {
e78566595089 initial import
mandel
parents:
diff changeset
1036 Indentation indent(INDENT);
e78566595089 initial import
mandel
parents:
diff changeset
1037 switch (refCount.action) {
e78566595089 initial import
mandel
parents:
diff changeset
1038 case ReferenceCount::Add:
33
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
1039 s << INDENT << refCountVariableName << " ~= cast(Object) " << argumentName << ";" << endl;
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
1040 break;
1
e78566595089 initial import
mandel
parents:
diff changeset
1041 case ReferenceCount::AddAll:
e78566595089 initial import
mandel
parents:
diff changeset
1042 s << INDENT << refCountVariableName << " ~= " << argumentName << ";" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1043 break;
e78566595089 initial import
mandel
parents:
diff changeset
1044 case ReferenceCount::Remove:
e78566595089 initial import
mandel
parents:
diff changeset
1045 s << INDENT << "remove(" << refCountVariableName
33
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
1046 << ", cast(Object) " << argumentName << ");" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
1047 break;
e78566595089 initial import
mandel
parents:
diff changeset
1048 case ReferenceCount::Set:
e78566595089 initial import
mandel
parents:
diff changeset
1049 {
e78566595089 initial import
mandel
parents:
diff changeset
1050 if (refCount.declareVariable.isEmpty())
e78566595089 initial import
mandel
parents:
diff changeset
1051 s << INDENT << refCount.variableName << " = cast(Object) " << argumentName << ";" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1052 else
e78566595089 initial import
mandel
parents:
diff changeset
1053 s << INDENT << refCountVariableName << " = cast(Object) " << argumentName << ";" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1054 }
e78566595089 initial import
mandel
parents:
diff changeset
1055 default:
e78566595089 initial import
mandel
parents:
diff changeset
1056 break;
e78566595089 initial import
mandel
parents:
diff changeset
1057 };
e78566595089 initial import
mandel
parents:
diff changeset
1058 }
e78566595089 initial import
mandel
parents:
diff changeset
1059 s << INDENT << "}" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1060 }
e78566595089 initial import
mandel
parents:
diff changeset
1061
e78566595089 initial import
mandel
parents:
diff changeset
1062 void DGenerator::writeFunction(QTextStream &s, const AbstractMetaFunction *d_function,
e78566595089 initial import
mandel
parents:
diff changeset
1063 uint included_attributes, uint excluded_attributes)
e78566595089 initial import
mandel
parents:
diff changeset
1064 {
e78566595089 initial import
mandel
parents:
diff changeset
1065 s << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1066
e78566595089 initial import
mandel
parents:
diff changeset
1067 if (d_function->isModifiedRemoved(TypeSystem::TargetLangCode))
e78566595089 initial import
mandel
parents:
diff changeset
1068 return ;
e78566595089 initial import
mandel
parents:
diff changeset
1069 QString functionName = d_function->name();
e78566595089 initial import
mandel
parents:
diff changeset
1070 setupForFunction(d_function, &included_attributes, &excluded_attributes);
e78566595089 initial import
mandel
parents:
diff changeset
1071
e78566595089 initial import
mandel
parents:
diff changeset
1072 if (!d_function->ownerClass()->isInterface()) {
e78566595089 initial import
mandel
parents:
diff changeset
1073 // qtd2 writeEnumOverload(s, d_function, included_attributes, excluded_attributes);
e78566595089 initial import
mandel
parents:
diff changeset
1074 // qtd writeFunctionOverloads(s, d_function, included_attributes, excluded_attributes);
e78566595089 initial import
mandel
parents:
diff changeset
1075 }
e78566595089 initial import
mandel
parents:
diff changeset
1076 /* qtd
e78566595089 initial import
mandel
parents:
diff changeset
1077 static QRegExp regExp("^(insert|set|take|add|remove|install).*");
e78566595089 initial import
mandel
parents:
diff changeset
1078
e78566595089 initial import
mandel
parents:
diff changeset
1079 if (regExp.exactMatch(d_function->name())) {
e78566595089 initial import
mandel
parents:
diff changeset
1080 AbstractMetaArgumentList arguments = d_function->arguments();
e78566595089 initial import
mandel
parents:
diff changeset
1081
e78566595089 initial import
mandel
parents:
diff changeset
1082 const AbstractMetaClass *c = d_function->implementingClass();
e78566595089 initial import
mandel
parents:
diff changeset
1083 bool hasObjectTypeArgument = false;
e78566595089 initial import
mandel
parents:
diff changeset
1084 foreach (AbstractMetaArgument *argument, arguments) {
e78566595089 initial import
mandel
parents:
diff changeset
1085 TypeSystem::Ownership d_ownership = d_function->ownership(c, TypeSystem::TargetLangCode, argument->argumentIndex()+1);
e78566595089 initial import
mandel
parents:
diff changeset
1086 TypeSystem::Ownership shell_ownership = d_function->ownership(c, TypeSystem::ShellCode, argument->argumentIndex()+1);
e78566595089 initial import
mandel
parents:
diff changeset
1087
e78566595089 initial import
mandel
parents:
diff changeset
1088 if (argument->type()->typeEntry()->isObject()
e78566595089 initial import
mandel
parents:
diff changeset
1089 && d_ownership == TypeSystem::InvalidOwnership
e78566595089 initial import
mandel
parents:
diff changeset
1090 && shell_ownership == TypeSystem::InvalidOwnership) {
e78566595089 initial import
mandel
parents:
diff changeset
1091 hasObjectTypeArgument = true;
e78566595089 initial import
mandel
parents:
diff changeset
1092 break;
e78566595089 initial import
mandel
parents:
diff changeset
1093 }
e78566595089 initial import
mandel
parents:
diff changeset
1094 }
e78566595089 initial import
mandel
parents:
diff changeset
1095
e78566595089 initial import
mandel
parents:
diff changeset
1096 if (hasObjectTypeArgument
e78566595089 initial import
mandel
parents:
diff changeset
1097 && !d_function->isAbstract()
e78566595089 initial import
mandel
parents:
diff changeset
1098 && d_function->referenceCounts(d_function->implementingClass()).size() == 0) {
e78566595089 initial import
mandel
parents:
diff changeset
1099 m_reference_count_candidate_functions.append(d_function);
e78566595089 initial import
mandel
parents:
diff changeset
1100 }
e78566595089 initial import
mandel
parents:
diff changeset
1101 }
e78566595089 initial import
mandel
parents:
diff changeset
1102
e78566595089 initial import
mandel
parents:
diff changeset
1103
e78566595089 initial import
mandel
parents:
diff changeset
1104 if (m_doc_parser) {
e78566595089 initial import
mandel
parents:
diff changeset
1105 QString signature = functionSignature(d_function,
e78566595089 initial import
mandel
parents:
diff changeset
1106 included_attributes | NoBlockedSlot,
e78566595089 initial import
mandel
parents:
diff changeset
1107 excluded_attributes);
e78566595089 initial import
mandel
parents:
diff changeset
1108 s << m_doc_parser->documentationForFunction(signature) << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1109 }
e78566595089 initial import
mandel
parents:
diff changeset
1110
e78566595089 initial import
mandel
parents:
diff changeset
1111 const QPropertySpec *spec = d_function->propertySpec();
e78566595089 initial import
mandel
parents:
diff changeset
1112 if (spec && d_function->modifiedName() == d_function->originalName()) {
e78566595089 initial import
mandel
parents:
diff changeset
1113 if (d_function->isPropertyReader()) {
e78566595089 initial import
mandel
parents:
diff changeset
1114 s << " @qt.QtPropertyReader(name=\"" << spec->name() << "\")" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1115 if (!spec->designable().isEmpty())
e78566595089 initial import
mandel
parents:
diff changeset
1116 s << " @qt.QtPropertyDesignable(\"" << spec->designable() << "\")" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1117 } else if (d_function->isPropertyWriter()) {
e78566595089 initial import
mandel
parents:
diff changeset
1118 s << " @qt.QtPropertyWriter(name=\"" << spec->name() << "\")" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1119 } else if (d_function->isPropertyResetter()) {
e78566595089 initial import
mandel
parents:
diff changeset
1120 s << " @qt.QtPropertyResetter(name=\"" << spec->name() << "\")"
e78566595089 initial import
mandel
parents:
diff changeset
1121 << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1122 }
e78566595089 initial import
mandel
parents:
diff changeset
1123 }
e78566595089 initial import
mandel
parents:
diff changeset
1124 */
e78566595089 initial import
mandel
parents:
diff changeset
1125 s << functionSignature(d_function, included_attributes, excluded_attributes);
e78566595089 initial import
mandel
parents:
diff changeset
1126
e78566595089 initial import
mandel
parents:
diff changeset
1127 if (d_function->isConstructor()) {
e78566595089 initial import
mandel
parents:
diff changeset
1128 writeConstructorContents(s, d_function);
e78566595089 initial import
mandel
parents:
diff changeset
1129 } else if (d_function->needsCallThrough() || d_function->isStatic()) { // qtd
e78566595089 initial import
mandel
parents:
diff changeset
1130 if (d_function->isAbstract()) {
e78566595089 initial import
mandel
parents:
diff changeset
1131 s << ";" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1132 } else {
e78566595089 initial import
mandel
parents:
diff changeset
1133 s << " {" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1134 {
e78566595089 initial import
mandel
parents:
diff changeset
1135 Indentation indent(INDENT);
e78566595089 initial import
mandel
parents:
diff changeset
1136 writeJavaCallThroughContents(s, d_function);
e78566595089 initial import
mandel
parents:
diff changeset
1137 }
e78566595089 initial import
mandel
parents:
diff changeset
1138 s << INDENT << "}" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1139 }
e78566595089 initial import
mandel
parents:
diff changeset
1140
e78566595089 initial import
mandel
parents:
diff changeset
1141 /* qtd
e78566595089 initial import
mandel
parents:
diff changeset
1142 if (d_function->jumpTableId() == -1) {
e78566595089 initial import
mandel
parents:
diff changeset
1143 writePrivateNativeFunction(s, d_function);
e78566595089 initial import
mandel
parents:
diff changeset
1144 }
e78566595089 initial import
mandel
parents:
diff changeset
1145 */
e78566595089 initial import
mandel
parents:
diff changeset
1146 } else {
e78566595089 initial import
mandel
parents:
diff changeset
1147 s << ";" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1148 }
e78566595089 initial import
mandel
parents:
diff changeset
1149 }
e78566595089 initial import
mandel
parents:
diff changeset
1150
e78566595089 initial import
mandel
parents:
diff changeset
1151 static void write_equals_parts(QTextStream &s, const AbstractMetaFunctionList &lst, char prefix, bool *first) {
e78566595089 initial import
mandel
parents:
diff changeset
1152 foreach (AbstractMetaFunction *f, lst) {
e78566595089 initial import
mandel
parents:
diff changeset
1153 AbstractMetaArgument *arg = f->arguments().at(0);
e78566595089 initial import
mandel
parents:
diff changeset
1154 QString type = f->typeReplaced(1);
e78566595089 initial import
mandel
parents:
diff changeset
1155 if (type.isEmpty())
e78566595089 initial import
mandel
parents:
diff changeset
1156 type = arg->type()->typeEntry()->qualifiedTargetLangName();
e78566595089 initial import
mandel
parents:
diff changeset
1157 s << INDENT << (*first ? "if" : "else if") << " (other instanceof " << type << ")" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1158 << INDENT << " return ";
e78566595089 initial import
mandel
parents:
diff changeset
1159 if (prefix != 0) s << prefix;
e78566595089 initial import
mandel
parents:
diff changeset
1160 s << f->name() << "((" << type << ") other);" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1161 *first = false;
e78566595089 initial import
mandel
parents:
diff changeset
1162 }
e78566595089 initial import
mandel
parents:
diff changeset
1163 }
e78566595089 initial import
mandel
parents:
diff changeset
1164
e78566595089 initial import
mandel
parents:
diff changeset
1165 static void write_compareto_parts(QTextStream &s, const AbstractMetaFunctionList &lst, int value, bool *first) {
e78566595089 initial import
mandel
parents:
diff changeset
1166 foreach (AbstractMetaFunction *f, lst) {
e78566595089 initial import
mandel
parents:
diff changeset
1167 AbstractMetaArgument *arg = f->arguments().at(0);
e78566595089 initial import
mandel
parents:
diff changeset
1168 QString type = f->typeReplaced(1);
e78566595089 initial import
mandel
parents:
diff changeset
1169 if (type.isEmpty())
e78566595089 initial import
mandel
parents:
diff changeset
1170 type = arg->type()->typeEntry()->qualifiedTargetLangName();
e78566595089 initial import
mandel
parents:
diff changeset
1171 s << INDENT << (*first ? "if" : "else if") << " (other instanceof " << type << ") {" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1172 << INDENT << " if (" << f->name() << "((" << type << ") other)) return " << value << ";" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1173 << INDENT << " else return " << -value << ";" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1174 << INDENT << "}" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1175 *first = false;
e78566595089 initial import
mandel
parents:
diff changeset
1176 }
e78566595089 initial import
mandel
parents:
diff changeset
1177 s << INDENT << "throw new ClassCastException();" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1178 }
e78566595089 initial import
mandel
parents:
diff changeset
1179
e78566595089 initial import
mandel
parents:
diff changeset
1180 bool DGenerator::isComparable(const AbstractMetaClass *cls) const
e78566595089 initial import
mandel
parents:
diff changeset
1181 {
e78566595089 initial import
mandel
parents:
diff changeset
1182 AbstractMetaFunctionList eq_functions = cls->equalsFunctions();
e78566595089 initial import
mandel
parents:
diff changeset
1183 AbstractMetaFunctionList neq_functions = cls->notEqualsFunctions();
e78566595089 initial import
mandel
parents:
diff changeset
1184
e78566595089 initial import
mandel
parents:
diff changeset
1185 // Write the comparable functions
e78566595089 initial import
mandel
parents:
diff changeset
1186 AbstractMetaFunctionList ge_functions = cls->greaterThanFunctions();
e78566595089 initial import
mandel
parents:
diff changeset
1187 AbstractMetaFunctionList geq_functions = cls->greaterThanEqFunctions();
e78566595089 initial import
mandel
parents:
diff changeset
1188 AbstractMetaFunctionList le_functions = cls->lessThanFunctions();
e78566595089 initial import
mandel
parents:
diff changeset
1189 AbstractMetaFunctionList leq_functions = cls->lessThanEqFunctions();
e78566595089 initial import
mandel
parents:
diff changeset
1190
e78566595089 initial import
mandel
parents:
diff changeset
1191 bool hasEquals = eq_functions.size() || neq_functions.size();
e78566595089 initial import
mandel
parents:
diff changeset
1192 bool isComparable = hasEquals
e78566595089 initial import
mandel
parents:
diff changeset
1193 ? ge_functions.size() || geq_functions.size() || le_functions.size() || leq_functions.size()
e78566595089 initial import
mandel
parents:
diff changeset
1194 : geq_functions.size() == 1 && leq_functions.size() == 1;
e78566595089 initial import
mandel
parents:
diff changeset
1195
e78566595089 initial import
mandel
parents:
diff changeset
1196 return isComparable;
e78566595089 initial import
mandel
parents:
diff changeset
1197 }
e78566595089 initial import
mandel
parents:
diff changeset
1198
e78566595089 initial import
mandel
parents:
diff changeset
1199
e78566595089 initial import
mandel
parents:
diff changeset
1200 void DGenerator::writeJavaLangObjectOverrideFunctions(QTextStream &s,
e78566595089 initial import
mandel
parents:
diff changeset
1201 const AbstractMetaClass *cls)
e78566595089 initial import
mandel
parents:
diff changeset
1202 {
e78566595089 initial import
mandel
parents:
diff changeset
1203 AbstractMetaFunctionList eq_functions = cls->equalsFunctions();
e78566595089 initial import
mandel
parents:
diff changeset
1204 AbstractMetaFunctionList neq_functions = cls->notEqualsFunctions();
e78566595089 initial import
mandel
parents:
diff changeset
1205
e78566595089 initial import
mandel
parents:
diff changeset
1206 if (eq_functions.size() || neq_functions.size()) {
e78566595089 initial import
mandel
parents:
diff changeset
1207 s << endl
e78566595089 initial import
mandel
parents:
diff changeset
1208 << INDENT << "@SuppressWarnings(\"unchecked\")" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1209 << INDENT << "@Override" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1210 << INDENT << "public boolean equals(Object other) {" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1211 bool first = true;
e78566595089 initial import
mandel
parents:
diff changeset
1212 write_equals_parts(s, eq_functions, (char) 0, &first);
e78566595089 initial import
mandel
parents:
diff changeset
1213 write_equals_parts(s, neq_functions, '!', &first);
e78566595089 initial import
mandel
parents:
diff changeset
1214 s << INDENT << " return false;" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1215 << INDENT << "}" << endl << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1216 }
e78566595089 initial import
mandel
parents:
diff changeset
1217
e78566595089 initial import
mandel
parents:
diff changeset
1218 // Write the comparable functions
e78566595089 initial import
mandel
parents:
diff changeset
1219 AbstractMetaFunctionList ge_functions = cls->greaterThanFunctions();
e78566595089 initial import
mandel
parents:
diff changeset
1220 AbstractMetaFunctionList geq_functions = cls->greaterThanEqFunctions();
e78566595089 initial import
mandel
parents:
diff changeset
1221 AbstractMetaFunctionList le_functions = cls->lessThanFunctions();
e78566595089 initial import
mandel
parents:
diff changeset
1222 AbstractMetaFunctionList leq_functions = cls->lessThanEqFunctions();
e78566595089 initial import
mandel
parents:
diff changeset
1223
e78566595089 initial import
mandel
parents:
diff changeset
1224 bool hasEquals = eq_functions.size() || neq_functions.size();
e78566595089 initial import
mandel
parents:
diff changeset
1225 bool comparable = isComparable(cls);
e78566595089 initial import
mandel
parents:
diff changeset
1226 if (comparable) {
e78566595089 initial import
mandel
parents:
diff changeset
1227 s << INDENT << "public int compareTo(Object other) {" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1228 {
e78566595089 initial import
mandel
parents:
diff changeset
1229 Indentation indent(INDENT);
e78566595089 initial import
mandel
parents:
diff changeset
1230 if (hasEquals) {
e78566595089 initial import
mandel
parents:
diff changeset
1231 s << INDENT << "if (equals(other)) return 0;" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1232 bool first = false;
e78566595089 initial import
mandel
parents:
diff changeset
1233 if (le_functions.size()) {
e78566595089 initial import
mandel
parents:
diff changeset
1234 write_compareto_parts(s, le_functions, -1, &first);
e78566595089 initial import
mandel
parents:
diff changeset
1235 } else if (ge_functions.size()) {
e78566595089 initial import
mandel
parents:
diff changeset
1236 write_compareto_parts(s, ge_functions, 1, &first);
e78566595089 initial import
mandel
parents:
diff changeset
1237 } else if (leq_functions.size()) {
e78566595089 initial import
mandel
parents:
diff changeset
1238 write_compareto_parts(s, leq_functions, -1, &first);
e78566595089 initial import
mandel
parents:
diff changeset
1239 } else if (geq_functions.size()) {
e78566595089 initial import
mandel
parents:
diff changeset
1240 write_compareto_parts(s, geq_functions, 1, &first);
e78566595089 initial import
mandel
parents:
diff changeset
1241 }
e78566595089 initial import
mandel
parents:
diff changeset
1242
e78566595089 initial import
mandel
parents:
diff changeset
1243 } else if (le_functions.size() == 1) {
e78566595089 initial import
mandel
parents:
diff changeset
1244 QString className = cls->typeEntry()->qualifiedTargetLangName();
e78566595089 initial import
mandel
parents:
diff changeset
1245 s << INDENT << "if (operator_less((" << className << ") other)) return -1;" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1246 << INDENT << "else if (((" << className << ") other).operator_less(this)) return 1;" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1247 << INDENT << "else return 0;" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1248
e78566595089 initial import
mandel
parents:
diff changeset
1249 } else if (geq_functions.size() == 1 && leq_functions.size()) {
e78566595089 initial import
mandel
parents:
diff changeset
1250 QString className = cls->typeEntry()->qualifiedTargetLangName();
e78566595089 initial import
mandel
parents:
diff changeset
1251 s << INDENT << "boolean less = operator_less_or_equal((" << className << ") other);" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1252 << INDENT << "boolean greater = operator_greater_or_equal((" << className << ") other);" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1253 << INDENT << "if (less && greater) return 0;" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1254 << INDENT << "else if (less) return -1;" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1255 << INDENT << "else return 1;" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1256 }
e78566595089 initial import
mandel
parents:
diff changeset
1257 }
e78566595089 initial import
mandel
parents:
diff changeset
1258
e78566595089 initial import
mandel
parents:
diff changeset
1259 s << INDENT << "}" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1260 }
e78566595089 initial import
mandel
parents:
diff changeset
1261
e78566595089 initial import
mandel
parents:
diff changeset
1262
e78566595089 initial import
mandel
parents:
diff changeset
1263 if (cls->hasHashFunction()) {
e78566595089 initial import
mandel
parents:
diff changeset
1264 AbstractMetaFunctionList hashcode_functions = cls->queryFunctionsByName("hashCode");
e78566595089 initial import
mandel
parents:
diff changeset
1265 bool found = false;
e78566595089 initial import
mandel
parents:
diff changeset
1266 foreach (const AbstractMetaFunction *function, hashcode_functions) {
e78566595089 initial import
mandel
parents:
diff changeset
1267 if (function->actualMinimumArgumentCount() == 0) {
e78566595089 initial import
mandel
parents:
diff changeset
1268 found = true;
e78566595089 initial import
mandel
parents:
diff changeset
1269 break;
e78566595089 initial import
mandel
parents:
diff changeset
1270 }
e78566595089 initial import
mandel
parents:
diff changeset
1271 }
e78566595089 initial import
mandel
parents:
diff changeset
1272
e78566595089 initial import
mandel
parents:
diff changeset
1273 if (!found) {
e78566595089 initial import
mandel
parents:
diff changeset
1274 s << endl
e78566595089 initial import
mandel
parents:
diff changeset
1275 << INDENT << "@Override" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1276 << INDENT << "public int hashCode() {" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1277 << INDENT << " if (nativeId() == 0)" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1278 << INDENT << " throw new QNoNativeResourcesException(\"Function call on incomplete object of type: \" +getClass().getName());" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1279 << INDENT << " return __qt_hashCode(nativeId());" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1280 << INDENT << "}" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1281 << INDENT << "native int __qt_hashCode(long __this_nativeId);" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1282 }
e78566595089 initial import
mandel
parents:
diff changeset
1283 }
e78566595089 initial import
mandel
parents:
diff changeset
1284
e78566595089 initial import
mandel
parents:
diff changeset
1285 // Qt has a standard toString() conversion in QVariant?
e78566595089 initial import
mandel
parents:
diff changeset
1286 QVariant::Type type = QVariant::nameToType(cls->qualifiedCppName().toLatin1());
e78566595089 initial import
mandel
parents:
diff changeset
1287 if (QVariant(type).canConvert(QVariant::String) && !cls->hasToStringCapability()) {
e78566595089 initial import
mandel
parents:
diff changeset
1288 AbstractMetaFunctionList tostring_functions = cls->queryFunctionsByName("toString");
e78566595089 initial import
mandel
parents:
diff changeset
1289 bool found = false;
e78566595089 initial import
mandel
parents:
diff changeset
1290 foreach (const AbstractMetaFunction *function, tostring_functions) {
e78566595089 initial import
mandel
parents:
diff changeset
1291 if (function->actualMinimumArgumentCount() == 0) {
e78566595089 initial import
mandel
parents:
diff changeset
1292 found = true;
e78566595089 initial import
mandel
parents:
diff changeset
1293 break;
e78566595089 initial import
mandel
parents:
diff changeset
1294 }
e78566595089 initial import
mandel
parents:
diff changeset
1295 }
e78566595089 initial import
mandel
parents:
diff changeset
1296
e78566595089 initial import
mandel
parents:
diff changeset
1297 if (!found) {
e78566595089 initial import
mandel
parents:
diff changeset
1298 s << endl
e78566595089 initial import
mandel
parents:
diff changeset
1299 << INDENT << "@Override" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1300 << INDENT << "public String toString() {" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1301 << INDENT << " if (nativeId() == 0)" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1302 << INDENT << " throw new QNoNativeResourcesException(\"Function call on incomplete object of type: \" +getClass().getName());" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1303 << INDENT << " return __qt_toString(nativeId());" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1304 << INDENT << "}" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1305 << INDENT << "native String __qt_toString(long __this_nativeId);" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1306 }
e78566595089 initial import
mandel
parents:
diff changeset
1307 }
e78566595089 initial import
mandel
parents:
diff changeset
1308 }
e78566595089 initial import
mandel
parents:
diff changeset
1309
e78566595089 initial import
mandel
parents:
diff changeset
1310 void DGenerator::writeEnumOverload(QTextStream &s, const AbstractMetaFunction *d_function,
e78566595089 initial import
mandel
parents:
diff changeset
1311 uint include_attributes, uint exclude_attributes)
e78566595089 initial import
mandel
parents:
diff changeset
1312 {
e78566595089 initial import
mandel
parents:
diff changeset
1313 AbstractMetaArgumentList arguments = d_function->arguments();
e78566595089 initial import
mandel
parents:
diff changeset
1314
e78566595089 initial import
mandel
parents:
diff changeset
1315 if ((d_function->implementingClass() != d_function->declaringClass())
e78566595089 initial import
mandel
parents:
diff changeset
1316 || ((!d_function->isNormal() && !d_function->isConstructor()) || d_function->isEmptyFunction() || d_function->isAbstract())) {
e78566595089 initial import
mandel
parents:
diff changeset
1317 return ;
e78566595089 initial import
mandel
parents:
diff changeset
1318 }
e78566595089 initial import
mandel
parents:
diff changeset
1319
e78566595089 initial import
mandel
parents:
diff changeset
1320
e78566595089 initial import
mandel
parents:
diff changeset
1321 int option = 0;
e78566595089 initial import
mandel
parents:
diff changeset
1322 if (d_function->isConstructor())
e78566595089 initial import
mandel
parents:
diff changeset
1323 option = Option(option | SkipReturnType);
e78566595089 initial import
mandel
parents:
diff changeset
1324 else
e78566595089 initial import
mandel
parents:
diff changeset
1325 include_attributes |= AbstractMetaAttributes::FinalInTargetLang;
e78566595089 initial import
mandel
parents:
diff changeset
1326
e78566595089 initial import
mandel
parents:
diff changeset
1327 int generate_enum_overload = -1;
e78566595089 initial import
mandel
parents:
diff changeset
1328 for (int i=0; i<arguments.size(); ++i)
e78566595089 initial import
mandel
parents:
diff changeset
1329 generate_enum_overload = arguments.at(i)->type()->isTargetLangFlags() ? i : -1;
e78566595089 initial import
mandel
parents:
diff changeset
1330
e78566595089 initial import
mandel
parents:
diff changeset
1331 if (generate_enum_overload >= 0) {
e78566595089 initial import
mandel
parents:
diff changeset
1332 if (m_doc_parser) {
e78566595089 initial import
mandel
parents:
diff changeset
1333 // steal documentation from main function
e78566595089 initial import
mandel
parents:
diff changeset
1334 QString signature = functionSignature(d_function,
e78566595089 initial import
mandel
parents:
diff changeset
1335 include_attributes | NoBlockedSlot,
e78566595089 initial import
mandel
parents:
diff changeset
1336 exclude_attributes);
e78566595089 initial import
mandel
parents:
diff changeset
1337 s << m_doc_parser->documentationForFunction(signature) << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1338 }
e78566595089 initial import
mandel
parents:
diff changeset
1339
e78566595089 initial import
mandel
parents:
diff changeset
1340 s << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1341
e78566595089 initial import
mandel
parents:
diff changeset
1342 writeFunctionAttributes(s, d_function, include_attributes, exclude_attributes, option);
e78566595089 initial import
mandel
parents:
diff changeset
1343 s << d_function->name() << "(";
e78566595089 initial import
mandel
parents:
diff changeset
1344 if (generate_enum_overload > 0) {
e78566595089 initial import
mandel
parents:
diff changeset
1345 writeFunctionArguments(s, d_function, generate_enum_overload);
e78566595089 initial import
mandel
parents:
diff changeset
1346 s << ", ";
e78566595089 initial import
mandel
parents:
diff changeset
1347 }
e78566595089 initial import
mandel
parents:
diff changeset
1348
e78566595089 initial import
mandel
parents:
diff changeset
1349 // Write the ellipsis convenience argument
e78566595089 initial import
mandel
parents:
diff changeset
1350 AbstractMetaArgument *affected_arg = arguments.at(generate_enum_overload);
e78566595089 initial import
mandel
parents:
diff changeset
1351 EnumTypeEntry *originator = ((FlagsTypeEntry *)affected_arg->type()->typeEntry())->originator();
e78566595089 initial import
mandel
parents:
diff changeset
1352
e78566595089 initial import
mandel
parents:
diff changeset
1353 s << originator->javaPackage() << "." << originator->javaQualifier() << "." << originator->targetLangName()
e78566595089 initial import
mandel
parents:
diff changeset
1354 << " ... " << affected_arg->argumentName() << ") {" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1355
e78566595089 initial import
mandel
parents:
diff changeset
1356 s << " ";
e78566595089 initial import
mandel
parents:
diff changeset
1357 QString new_return_type = d_function->typeReplaced(0);
e78566595089 initial import
mandel
parents:
diff changeset
1358 if (new_return_type != "void" && (!new_return_type.isEmpty() || d_function->type() != 0))
e78566595089 initial import
mandel
parents:
diff changeset
1359 s << "return ";
e78566595089 initial import
mandel
parents:
diff changeset
1360
e78566595089 initial import
mandel
parents:
diff changeset
1361 if (d_function->isConstructor()) {
e78566595089 initial import
mandel
parents:
diff changeset
1362 s << "this";
e78566595089 initial import
mandel
parents:
diff changeset
1363 } else {
e78566595089 initial import
mandel
parents:
diff changeset
1364 if (d_function->isStatic())
e78566595089 initial import
mandel
parents:
diff changeset
1365 s << d_function->implementingClass()->fullName() << ".";
e78566595089 initial import
mandel
parents:
diff changeset
1366 else
e78566595089 initial import
mandel
parents:
diff changeset
1367 s << "this.";
e78566595089 initial import
mandel
parents:
diff changeset
1368 s << d_function->name();
e78566595089 initial import
mandel
parents:
diff changeset
1369 }
e78566595089 initial import
mandel
parents:
diff changeset
1370
e78566595089 initial import
mandel
parents:
diff changeset
1371 s << "(";
e78566595089 initial import
mandel
parents:
diff changeset
1372 for (int i=0; i<generate_enum_overload; ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
1373 s << arguments.at(i)->argumentName() << ", ";
e78566595089 initial import
mandel
parents:
diff changeset
1374 }
e78566595089 initial import
mandel
parents:
diff changeset
1375 s << "new " << affected_arg->type()->fullName() << "(" << affected_arg->argumentName() << "));" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1376 << " }" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1377 }
e78566595089 initial import
mandel
parents:
diff changeset
1378 }
e78566595089 initial import
mandel
parents:
diff changeset
1379
e78566595089 initial import
mandel
parents:
diff changeset
1380 void DGenerator::writeInstantiatedType(QTextStream &s, const AbstractMetaType *abstractMetaType) const
e78566595089 initial import
mandel
parents:
diff changeset
1381 {
e78566595089 initial import
mandel
parents:
diff changeset
1382 Q_ASSERT(abstractMetaType != 0);
e78566595089 initial import
mandel
parents:
diff changeset
1383
e78566595089 initial import
mandel
parents:
diff changeset
1384 const TypeEntry *type = abstractMetaType->typeEntry();
e78566595089 initial import
mandel
parents:
diff changeset
1385 s << type->qualifiedTargetLangName();
e78566595089 initial import
mandel
parents:
diff changeset
1386
e78566595089 initial import
mandel
parents:
diff changeset
1387 if (abstractMetaType->hasInstantiations()) {
e78566595089 initial import
mandel
parents:
diff changeset
1388 s << "<";
e78566595089 initial import
mandel
parents:
diff changeset
1389 QList<AbstractMetaType *> instantiations = abstractMetaType->instantiations();
e78566595089 initial import
mandel
parents:
diff changeset
1390 for(int i=0; i<instantiations.size(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
1391 if (i > 0)
e78566595089 initial import
mandel
parents:
diff changeset
1392 s << ", ";
e78566595089 initial import
mandel
parents:
diff changeset
1393
e78566595089 initial import
mandel
parents:
diff changeset
1394 writeInstantiatedType(s, instantiations.at(i));
e78566595089 initial import
mandel
parents:
diff changeset
1395 }
e78566595089 initial import
mandel
parents:
diff changeset
1396 s << ">";
e78566595089 initial import
mandel
parents:
diff changeset
1397 }
e78566595089 initial import
mandel
parents:
diff changeset
1398 }
e78566595089 initial import
mandel
parents:
diff changeset
1399
e78566595089 initial import
mandel
parents:
diff changeset
1400 void DGenerator::writeFunctionOverloads(QTextStream &s, const AbstractMetaFunction *d_function,
e78566595089 initial import
mandel
parents:
diff changeset
1401 uint include_attributes, uint exclude_attributes)
e78566595089 initial import
mandel
parents:
diff changeset
1402 {
e78566595089 initial import
mandel
parents:
diff changeset
1403 AbstractMetaArgumentList arguments = d_function->arguments();
e78566595089 initial import
mandel
parents:
diff changeset
1404 int argument_count = arguments.size();
e78566595089 initial import
mandel
parents:
diff changeset
1405
e78566595089 initial import
mandel
parents:
diff changeset
1406 // We only create the overloads for the class that actually declares the function
e78566595089 initial import
mandel
parents:
diff changeset
1407 // unless this is an interface, in which case we create the overloads for all
e78566595089 initial import
mandel
parents:
diff changeset
1408 // classes that directly implement the interface.
e78566595089 initial import
mandel
parents:
diff changeset
1409 const AbstractMetaClass *decl_class = d_function->declaringClass();
e78566595089 initial import
mandel
parents:
diff changeset
1410 if (decl_class->isInterface()) {
e78566595089 initial import
mandel
parents:
diff changeset
1411 AbstractMetaClassList interfaces = d_function->implementingClass()->interfaces();
e78566595089 initial import
mandel
parents:
diff changeset
1412 foreach (AbstractMetaClass *iface, interfaces) {
e78566595089 initial import
mandel
parents:
diff changeset
1413 if (iface == decl_class) {
e78566595089 initial import
mandel
parents:
diff changeset
1414 decl_class = d_function->implementingClass();
e78566595089 initial import
mandel
parents:
diff changeset
1415 break;
e78566595089 initial import
mandel
parents:
diff changeset
1416 }
e78566595089 initial import
mandel
parents:
diff changeset
1417 }
e78566595089 initial import
mandel
parents:
diff changeset
1418 }
e78566595089 initial import
mandel
parents:
diff changeset
1419 if (decl_class != d_function->implementingClass())
e78566595089 initial import
mandel
parents:
diff changeset
1420 return;
e78566595089 initial import
mandel
parents:
diff changeset
1421
e78566595089 initial import
mandel
parents:
diff changeset
1422 // Figure out how many functions we need to write out,
e78566595089 initial import
mandel
parents:
diff changeset
1423 // One extra for each default argument.
e78566595089 initial import
mandel
parents:
diff changeset
1424 int overload_count = 0;
e78566595089 initial import
mandel
parents:
diff changeset
1425 uint excluded_attributes = AbstractMetaAttributes::Abstract
e78566595089 initial import
mandel
parents:
diff changeset
1426 | AbstractMetaAttributes::Native
e78566595089 initial import
mandel
parents:
diff changeset
1427 | exclude_attributes;
e78566595089 initial import
mandel
parents:
diff changeset
1428 uint included_attributes = (d_function->isConstructor() ? 0 : AbstractMetaAttributes::Final) | include_attributes;
e78566595089 initial import
mandel
parents:
diff changeset
1429
e78566595089 initial import
mandel
parents:
diff changeset
1430 for (int i=0; i<argument_count; ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
1431 if (!arguments.at(i)->defaultValueExpression().isEmpty() && !d_function->argumentRemoved(i+1))
e78566595089 initial import
mandel
parents:
diff changeset
1432 ++overload_count;
e78566595089 initial import
mandel
parents:
diff changeset
1433 }
e78566595089 initial import
mandel
parents:
diff changeset
1434 Q_ASSERT(overload_count <= argument_count);
e78566595089 initial import
mandel
parents:
diff changeset
1435 for (int i=0; i<overload_count; ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
1436 int used_arguments = argument_count - i - 1;
e78566595089 initial import
mandel
parents:
diff changeset
1437
e78566595089 initial import
mandel
parents:
diff changeset
1438 QString signature = functionSignature(d_function, included_attributes,
e78566595089 initial import
mandel
parents:
diff changeset
1439 excluded_attributes,
e78566595089 initial import
mandel
parents:
diff changeset
1440 d_function->isEmptyFunction()
e78566595089 initial import
mandel
parents:
diff changeset
1441 || d_function->isNormal()
e78566595089 initial import
mandel
parents:
diff changeset
1442 || d_function->isSignal() ? NoOption
e78566595089 initial import
mandel
parents:
diff changeset
1443 : SkipReturnType,
e78566595089 initial import
mandel
parents:
diff changeset
1444 used_arguments);
e78566595089 initial import
mandel
parents:
diff changeset
1445
e78566595089 initial import
mandel
parents:
diff changeset
1446 s << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1447 if (m_doc_parser) {
e78566595089 initial import
mandel
parents:
diff changeset
1448 s << m_doc_parser->documentationForFunction(signature) << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1449 }
e78566595089 initial import
mandel
parents:
diff changeset
1450
e78566595089 initial import
mandel
parents:
diff changeset
1451 s << signature << " {\n ";
e78566595089 initial import
mandel
parents:
diff changeset
1452 QString new_return_type = d_function->typeReplaced(0);
e78566595089 initial import
mandel
parents:
diff changeset
1453 if (new_return_type != "void" && (!new_return_type.isEmpty() || d_function->type()))
e78566595089 initial import
mandel
parents:
diff changeset
1454 s << "return ";
e78566595089 initial import
mandel
parents:
diff changeset
1455 if (d_function->isConstructor())
e78566595089 initial import
mandel
parents:
diff changeset
1456 s << "this";
e78566595089 initial import
mandel
parents:
diff changeset
1457 else
e78566595089 initial import
mandel
parents:
diff changeset
1458 s << d_function->name();
e78566595089 initial import
mandel
parents:
diff changeset
1459 s << "(";
e78566595089 initial import
mandel
parents:
diff changeset
1460
e78566595089 initial import
mandel
parents:
diff changeset
1461 int written_arguments = 0;
e78566595089 initial import
mandel
parents:
diff changeset
1462 for (int j=0; j<argument_count; ++j) {
e78566595089 initial import
mandel
parents:
diff changeset
1463 if (!d_function->argumentRemoved(j+1)) {
e78566595089 initial import
mandel
parents:
diff changeset
1464 if (written_arguments++ > 0)
e78566595089 initial import
mandel
parents:
diff changeset
1465 s << ", ";
e78566595089 initial import
mandel
parents:
diff changeset
1466
e78566595089 initial import
mandel
parents:
diff changeset
1467 if (j < used_arguments) {
e78566595089 initial import
mandel
parents:
diff changeset
1468 s << arguments.at(j)->argumentName();
e78566595089 initial import
mandel
parents:
diff changeset
1469 } else {
e78566595089 initial import
mandel
parents:
diff changeset
1470 AbstractMetaType *arg_type = 0;
e78566595089 initial import
mandel
parents:
diff changeset
1471 QString modified_type = d_function->typeReplaced(j+1);
e78566595089 initial import
mandel
parents:
diff changeset
1472 if (modified_type.isEmpty()) {
e78566595089 initial import
mandel
parents:
diff changeset
1473 arg_type = arguments.at(j)->type();
e78566595089 initial import
mandel
parents:
diff changeset
1474 if (arg_type->isNativePointer()) {
e78566595089 initial import
mandel
parents:
diff changeset
1475 s << "(qt.QNativePointer)";
e78566595089 initial import
mandel
parents:
diff changeset
1476 } else {
e78566595089 initial import
mandel
parents:
diff changeset
1477 const AbstractMetaType *abstractMetaType = arguments.at(j)->type();
e78566595089 initial import
mandel
parents:
diff changeset
1478 const TypeEntry *type = abstractMetaType->typeEntry();
e78566595089 initial import
mandel
parents:
diff changeset
1479 if (type->designatedInterface())
e78566595089 initial import
mandel
parents:
diff changeset
1480 type = type->designatedInterface();
e78566595089 initial import
mandel
parents:
diff changeset
1481 if (!type->isEnum() && !type->isFlags()) {
e78566595089 initial import
mandel
parents:
diff changeset
1482 s << "(";
e78566595089 initial import
mandel
parents:
diff changeset
1483 writeInstantiatedType(s, abstractMetaType);
e78566595089 initial import
mandel
parents:
diff changeset
1484 s << ")";
e78566595089 initial import
mandel
parents:
diff changeset
1485 }
e78566595089 initial import
mandel
parents:
diff changeset
1486 }
e78566595089 initial import
mandel
parents:
diff changeset
1487 } else {
e78566595089 initial import
mandel
parents:
diff changeset
1488 s << "(" << modified_type.replace('$', '.') << ")";
e78566595089 initial import
mandel
parents:
diff changeset
1489 }
e78566595089 initial import
mandel
parents:
diff changeset
1490
e78566595089 initial import
mandel
parents:
diff changeset
1491 QString defaultExpr = arguments.at(j)->defaultValueExpression();
e78566595089 initial import
mandel
parents:
diff changeset
1492
e78566595089 initial import
mandel
parents:
diff changeset
1493 int pos = defaultExpr.indexOf(".");
e78566595089 initial import
mandel
parents:
diff changeset
1494 if (pos > 0) {
e78566595089 initial import
mandel
parents:
diff changeset
1495 QString someName = defaultExpr.left(pos);
e78566595089 initial import
mandel
parents:
diff changeset
1496 ComplexTypeEntry *ctype =
e78566595089 initial import
mandel
parents:
diff changeset
1497 TypeDatabase::instance()->findComplexType(someName);
e78566595089 initial import
mandel
parents:
diff changeset
1498 QString replacement;
e78566595089 initial import
mandel
parents:
diff changeset
1499 if (ctype != 0 && ctype->isVariant())
e78566595089 initial import
mandel
parents:
diff changeset
1500 replacement = "qt.QVariant.";
e78566595089 initial import
mandel
parents:
diff changeset
1501 else if (ctype != 0)
e78566595089 initial import
mandel
parents:
diff changeset
1502 replacement = ctype->javaPackage() + "." + ctype->targetLangName() + ".";
e78566595089 initial import
mandel
parents:
diff changeset
1503 else
e78566595089 initial import
mandel
parents:
diff changeset
1504 replacement = someName + ".";
e78566595089 initial import
mandel
parents:
diff changeset
1505 defaultExpr = defaultExpr.replace(someName + ".", replacement);
e78566595089 initial import
mandel
parents:
diff changeset
1506 }
e78566595089 initial import
mandel
parents:
diff changeset
1507
e78566595089 initial import
mandel
parents:
diff changeset
1508 if (arg_type != 0 && arg_type->isFlags()) {
e78566595089 initial import
mandel
parents:
diff changeset
1509 s << "new " << arg_type->fullName() << "(" << defaultExpr << ")";
e78566595089 initial import
mandel
parents:
diff changeset
1510 } else {
e78566595089 initial import
mandel
parents:
diff changeset
1511 s << defaultExpr;
e78566595089 initial import
mandel
parents:
diff changeset
1512 }
e78566595089 initial import
mandel
parents:
diff changeset
1513 }
e78566595089 initial import
mandel
parents:
diff changeset
1514 }
e78566595089 initial import
mandel
parents:
diff changeset
1515 }
e78566595089 initial import
mandel
parents:
diff changeset
1516 s << ");\n }" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1517 }
e78566595089 initial import
mandel
parents:
diff changeset
1518 }
e78566595089 initial import
mandel
parents:
diff changeset
1519
e78566595089 initial import
mandel
parents:
diff changeset
1520 const TypeEntry* DGenerator::fixedTypeEntry(const TypeEntry *type)
e78566595089 initial import
mandel
parents:
diff changeset
1521 {
e78566595089 initial import
mandel
parents:
diff changeset
1522 if (!type)
e78566595089 initial import
mandel
parents:
diff changeset
1523 return NULL;
e78566595089 initial import
mandel
parents:
diff changeset
1524 if (type->designatedInterface())
e78566595089 initial import
mandel
parents:
diff changeset
1525 return type;
e78566595089 initial import
mandel
parents:
diff changeset
1526 else if (type->isEnum()) {
e78566595089 initial import
mandel
parents:
diff changeset
1527 const EnumTypeEntry *te = static_cast<const EnumTypeEntry *>(type);
e78566595089 initial import
mandel
parents:
diff changeset
1528 TypeEntry *ownerTe = TypeDatabase::instance()->findType(te->qualifier());
33
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
1529 if(ownerTe)
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
1530 typeEntriesEnums << ownerTe;
1
e78566595089 initial import
mandel
parents:
diff changeset
1531 return NULL;
e78566595089 initial import
mandel
parents:
diff changeset
1532 // return ownerTe;
e78566595089 initial import
mandel
parents:
diff changeset
1533 } else if (type->isFlags()) {
e78566595089 initial import
mandel
parents:
diff changeset
1534 const FlagsTypeEntry *te = static_cast<const FlagsTypeEntry *>(type);
e78566595089 initial import
mandel
parents:
diff changeset
1535 TypeEntry *ownerTe = TypeDatabase::instance()->findType(te->qualifier());
e78566595089 initial import
mandel
parents:
diff changeset
1536 return NULL;
e78566595089 initial import
mandel
parents:
diff changeset
1537 // return ownerTe;
e78566595089 initial import
mandel
parents:
diff changeset
1538 } else //if (type->isObject())
e78566595089 initial import
mandel
parents:
diff changeset
1539 return type;
e78566595089 initial import
mandel
parents:
diff changeset
1540 // else return NULL;
e78566595089 initial import
mandel
parents:
diff changeset
1541 }
e78566595089 initial import
mandel
parents:
diff changeset
1542
e78566595089 initial import
mandel
parents:
diff changeset
1543 void DGenerator::addInstantiations(const AbstractMetaType* d_type)
e78566595089 initial import
mandel
parents:
diff changeset
1544 {
e78566595089 initial import
mandel
parents:
diff changeset
1545 if (d_type->isContainer()) {
e78566595089 initial import
mandel
parents:
diff changeset
1546 QList<AbstractMetaType *> args = d_type->instantiations();
e78566595089 initial import
mandel
parents:
diff changeset
1547 for (int i=0; i<args.size(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
1548 const TypeEntry *type = fixedTypeEntry(args.at(i)->typeEntry());
e78566595089 initial import
mandel
parents:
diff changeset
1549 if (type)
e78566595089 initial import
mandel
parents:
diff changeset
1550 typeEntries.insert(type);
e78566595089 initial import
mandel
parents:
diff changeset
1551 }
e78566595089 initial import
mandel
parents:
diff changeset
1552 }
e78566595089 initial import
mandel
parents:
diff changeset
1553 }
e78566595089 initial import
mandel
parents:
diff changeset
1554
e78566595089 initial import
mandel
parents:
diff changeset
1555 void DGenerator::addTypeEntry(const AbstractMetaClass *d_class, const AbstractMetaFunction *function, QSet<const TypeEntry*> &typeEntries)
e78566595089 initial import
mandel
parents:
diff changeset
1556 {
e78566595089 initial import
mandel
parents:
diff changeset
1557 // If a method in an interface class is modified to be private, this should
e78566595089 initial import
mandel
parents:
diff changeset
1558 // not be present in the interface at all, only in the implementation.
e78566595089 initial import
mandel
parents:
diff changeset
1559 if (d_class->isInterface()) {
e78566595089 initial import
mandel
parents:
diff changeset
1560 uint includedAttributes = 0;
e78566595089 initial import
mandel
parents:
diff changeset
1561 uint excludedAttributes = 0;
e78566595089 initial import
mandel
parents:
diff changeset
1562 retrieveModifications(function, d_class, &excludedAttributes, &includedAttributes);
e78566595089 initial import
mandel
parents:
diff changeset
1563 if (includedAttributes & AbstractMetaAttributes::Private)
e78566595089 initial import
mandel
parents:
diff changeset
1564 return;
e78566595089 initial import
mandel
parents:
diff changeset
1565 }
e78566595089 initial import
mandel
parents:
diff changeset
1566
e78566595089 initial import
mandel
parents:
diff changeset
1567 if (notWrappedYet(function)) // qtd2
e78566595089 initial import
mandel
parents:
diff changeset
1568 return;
e78566595089 initial import
mandel
parents:
diff changeset
1569
e78566595089 initial import
mandel
parents:
diff changeset
1570 // return type for function
e78566595089 initial import
mandel
parents:
diff changeset
1571 if (function->type()) {
e78566595089 initial import
mandel
parents:
diff changeset
1572 addInstantiations(function->type());
e78566595089 initial import
mandel
parents:
diff changeset
1573 const TypeEntry *type = fixedTypeEntry(function->type()->typeEntry());
e78566595089 initial import
mandel
parents:
diff changeset
1574 if (type)
e78566595089 initial import
mandel
parents:
diff changeset
1575 typeEntries.insert(type);
e78566595089 initial import
mandel
parents:
diff changeset
1576 }
e78566595089 initial import
mandel
parents:
diff changeset
1577
e78566595089 initial import
mandel
parents:
diff changeset
1578 AbstractMetaArgumentList arguments = function->arguments();
e78566595089 initial import
mandel
parents:
diff changeset
1579 for (int i=0; i<arguments.count(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
1580 const AbstractMetaArgument *arg = arguments.at(i);
e78566595089 initial import
mandel
parents:
diff changeset
1581 addInstantiations(arg->type());
e78566595089 initial import
mandel
parents:
diff changeset
1582 const TypeEntry *type = fixedTypeEntry(arg->type()->typeEntry());
e78566595089 initial import
mandel
parents:
diff changeset
1583 if (type)
e78566595089 initial import
mandel
parents:
diff changeset
1584 typeEntries.insert(type);
e78566595089 initial import
mandel
parents:
diff changeset
1585 }
e78566595089 initial import
mandel
parents:
diff changeset
1586 }
e78566595089 initial import
mandel
parents:
diff changeset
1587
e78566595089 initial import
mandel
parents:
diff changeset
1588 void DGenerator::fillRequiredImports(const AbstractMetaClass *d_class)
e78566595089 initial import
mandel
parents:
diff changeset
1589 {
e78566595089 initial import
mandel
parents:
diff changeset
1590 if (m_recursive < 2) {
e78566595089 initial import
mandel
parents:
diff changeset
1591 typeEntries.clear();
e78566595089 initial import
mandel
parents:
diff changeset
1592 typeEntriesEnums.clear();
e78566595089 initial import
mandel
parents:
diff changeset
1593 }
e78566595089 initial import
mandel
parents:
diff changeset
1594
e78566595089 initial import
mandel
parents:
diff changeset
1595 // import for base class
e78566595089 initial import
mandel
parents:
diff changeset
1596 if(d_class->baseClass())
e78566595089 initial import
mandel
parents:
diff changeset
1597 typeEntries << d_class->baseClass()->typeEntry();
e78566595089 initial import
mandel
parents:
diff changeset
1598
e78566595089 initial import
mandel
parents:
diff changeset
1599 //interfaces
e78566595089 initial import
mandel
parents:
diff changeset
1600 AbstractMetaClassList interfaces = d_class->interfaces();
e78566595089 initial import
mandel
parents:
diff changeset
1601 if (!interfaces.isEmpty()) {
e78566595089 initial import
mandel
parents:
diff changeset
1602 for (int i=0; i<interfaces.size(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
1603 AbstractMetaClass *iface = interfaces.at(i);
e78566595089 initial import
mandel
parents:
diff changeset
1604 InterfaceTypeEntry *te = (InterfaceTypeEntry*) iface->typeEntry();
e78566595089 initial import
mandel
parents:
diff changeset
1605 typeEntries << te->origin();
e78566595089 initial import
mandel
parents:
diff changeset
1606 }
e78566595089 initial import
mandel
parents:
diff changeset
1607 }
e78566595089 initial import
mandel
parents:
diff changeset
1608
e78566595089 initial import
mandel
parents:
diff changeset
1609 AbstractMetaFunctionList d_funcs = d_class->functionsInTargetLang();
e78566595089 initial import
mandel
parents:
diff changeset
1610
e78566595089 initial import
mandel
parents:
diff changeset
1611 // in case of ConcreteWrapper - adding extra functions
e78566595089 initial import
mandel
parents:
diff changeset
1612 if (!d_class->isInterface() && d_class->isAbstract()) {
e78566595089 initial import
mandel
parents:
diff changeset
1613 AbstractMetaFunctionList functions_add = d_class->queryFunctions(AbstractMetaClass::NormalFunctions | AbstractMetaClass::AbstractFunctions | AbstractMetaClass::NonEmptyFunctions | AbstractMetaClass::NotRemovedFromTargetLang);
e78566595089 initial import
mandel
parents:
diff changeset
1614 d_funcs << functions_add;
e78566595089 initial import
mandel
parents:
diff changeset
1615 }
e78566595089 initial import
mandel
parents:
diff changeset
1616
e78566595089 initial import
mandel
parents:
diff changeset
1617 for (int i=0; i<d_funcs.size(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
1618 AbstractMetaFunction *function = d_funcs.at(i);
e78566595089 initial import
mandel
parents:
diff changeset
1619 addTypeEntry(d_class, function, typeEntries);
e78566595089 initial import
mandel
parents:
diff changeset
1620 }
e78566595089 initial import
mandel
parents:
diff changeset
1621
e78566595089 initial import
mandel
parents:
diff changeset
1622 // virtual dispatch
e78566595089 initial import
mandel
parents:
diff changeset
1623 AbstractMetaFunctionList virtualFunctions = d_class->virtualFunctions();
e78566595089 initial import
mandel
parents:
diff changeset
1624 for (int i=0; i<virtualFunctions.size(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
1625 AbstractMetaFunction *function = virtualFunctions.at(i);
e78566595089 initial import
mandel
parents:
diff changeset
1626 addTypeEntry(d_class, function, typeEntries);
e78566595089 initial import
mandel
parents:
diff changeset
1627 }
e78566595089 initial import
mandel
parents:
diff changeset
1628
e78566595089 initial import
mandel
parents:
diff changeset
1629 AbstractMetaFieldList fields = d_class->fields();
e78566595089 initial import
mandel
parents:
diff changeset
1630 foreach (const AbstractMetaField *field, fields) {
e78566595089 initial import
mandel
parents:
diff changeset
1631 if (field->wasPublic() || (field->wasProtected() && !d_class->isFinal())) {
e78566595089 initial import
mandel
parents:
diff changeset
1632 addTypeEntry(d_class, field->setter(), typeEntries);
e78566595089 initial import
mandel
parents:
diff changeset
1633 addTypeEntry(d_class, field->getter(), typeEntries);
e78566595089 initial import
mandel
parents:
diff changeset
1634 }
e78566595089 initial import
mandel
parents:
diff changeset
1635 }
e78566595089 initial import
mandel
parents:
diff changeset
1636
e78566595089 initial import
mandel
parents:
diff changeset
1637 // signals
e78566595089 initial import
mandel
parents:
diff changeset
1638 AbstractMetaFunctionList signal_funcs = d_class->queryFunctions(AbstractMetaClass::Signals
e78566595089 initial import
mandel
parents:
diff changeset
1639 | AbstractMetaClass::Visible
e78566595089 initial import
mandel
parents:
diff changeset
1640 | AbstractMetaClass::NotRemovedFromTargetLang);
e78566595089 initial import
mandel
parents:
diff changeset
1641 for (int i=0; i<signal_funcs.size(); ++i)
e78566595089 initial import
mandel
parents:
diff changeset
1642 addTypeEntry(d_class, signal_funcs.at(i), typeEntries);
e78566595089 initial import
mandel
parents:
diff changeset
1643
e78566595089 initial import
mandel
parents:
diff changeset
1644 if(d_class->isQObject() && d_class->name() != "QObject")
e78566595089 initial import
mandel
parents:
diff changeset
1645 typeEntries << TypeDatabase::instance()->findType("QObject");
e78566595089 initial import
mandel
parents:
diff changeset
1646
e78566595089 initial import
mandel
parents:
diff changeset
1647 if(m_recursive == 1)
e78566595089 initial import
mandel
parents:
diff changeset
1648 m_recursive++;
e78566595089 initial import
mandel
parents:
diff changeset
1649 }
e78566595089 initial import
mandel
parents:
diff changeset
1650
e78566595089 initial import
mandel
parents:
diff changeset
1651 void DGenerator::writeImportString(QTextStream &s, const TypeEntry* typeEntry)
e78566595089 initial import
mandel
parents:
diff changeset
1652 {
e78566595089 initial import
mandel
parents:
diff changeset
1653 /* QString visibility = "private";
e78566595089 initial import
mandel
parents:
diff changeset
1654 if (typeEntry->isNamespace() || typeEntry->name() == "QObject")
e78566595089 initial import
mandel
parents:
diff changeset
1655 visibility = "public";
e78566595089 initial import
mandel
parents:
diff changeset
1656 if(d_class->baseClass() && d_class->baseClass()->typeEntry() == typeEntry)
e78566595089 initial import
mandel
parents:
diff changeset
1657 visibility = "public";*/
e78566595089 initial import
mandel
parents:
diff changeset
1658 QString visibility = "public";
33
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
1659 s << QString("%1 import ").arg(visibility) << typeEntry->javaPackage() << "." << typeEntry->targetLangName() << ";" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
1660 }
e78566595089 initial import
mandel
parents:
diff changeset
1661
e78566595089 initial import
mandel
parents:
diff changeset
1662 void DGenerator::writeRequiredImports(QTextStream &s, const AbstractMetaClass *d_class)
e78566595089 initial import
mandel
parents:
diff changeset
1663 {
e78566595089 initial import
mandel
parents:
diff changeset
1664 foreach (const TypeEntry *typeEntry, typeEntriesEnums) {
e78566595089 initial import
mandel
parents:
diff changeset
1665 if (!excludedTypes.contains(typeEntry->name()) && d_class->typeEntry() != typeEntry
e78566595089 initial import
mandel
parents:
diff changeset
1666 && typeEntry->javaQualifier() != typeEntry->name()
e78566595089 initial import
mandel
parents:
diff changeset
1667 /*also*/ && !excludedTypes2.contains(typeEntry->name()))
e78566595089 initial import
mandel
parents:
diff changeset
1668 writeImportString(s, typeEntry);
e78566595089 initial import
mandel
parents:
diff changeset
1669 }
e78566595089 initial import
mandel
parents:
diff changeset
1670
e78566595089 initial import
mandel
parents:
diff changeset
1671 foreach (const TypeEntry *typeEntry, typeEntries) {
e78566595089 initial import
mandel
parents:
diff changeset
1672 if (!excludedTypes.contains(typeEntry->name()) && d_class->typeEntry() != typeEntry
e78566595089 initial import
mandel
parents:
diff changeset
1673 && typeEntry->javaQualifier() != typeEntry->name()
e78566595089 initial import
mandel
parents:
diff changeset
1674 /*also*/ && !excludedTypes2.contains(typeEntry->name()))
e78566595089 initial import
mandel
parents:
diff changeset
1675 writeImportString(s, typeEntry);
e78566595089 initial import
mandel
parents:
diff changeset
1676 }
e78566595089 initial import
mandel
parents:
diff changeset
1677 excludedTypes2.clear();
e78566595089 initial import
mandel
parents:
diff changeset
1678 }
e78566595089 initial import
mandel
parents:
diff changeset
1679
e78566595089 initial import
mandel
parents:
diff changeset
1680 void DGenerator::writeDestructor(QTextStream &s, const AbstractMetaClass *d_class)
e78566595089 initial import
mandel
parents:
diff changeset
1681 {
e78566595089 initial import
mandel
parents:
diff changeset
1682 if (!d_class->hasConstructors())
e78566595089 initial import
mandel
parents:
diff changeset
1683 return;
e78566595089 initial import
mandel
parents:
diff changeset
1684
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1685 bool isTheQObject = d_class->name() == "QObject";
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1686 if (isTheQObject || !d_class->isQObject())
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1687 {
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1688 s << INDENT << "protected override void __deleteNative() {" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
1689 {
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1690 if (isTheQObject)
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1691 s << INDENT << "qtd_delete_qobject(__nativeId);" << endl;
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1692 else if (!d_class->isQObject())
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1693 s << INDENT << "qtd_" << d_class->name() << "_destructor(__nativeId);" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
1694 }
e78566595089 initial import
mandel
parents:
diff changeset
1695 s << INDENT << "}" << endl << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1696 }
294
bb37b0ed94c9 some more QList
eldar
parents: 293
diff changeset
1697
bb37b0ed94c9 some more QList
eldar
parents: 293
diff changeset
1698 if (d_class->typeEntry()->isValue())
bb37b0ed94c9 some more QList
eldar
parents: 293
diff changeset
1699 {
bb37b0ed94c9 some more QList
eldar
parents: 293
diff changeset
1700 s << INDENT << "public static void __deleteNativeObject(void* ptr) {" << endl
bb37b0ed94c9 some more QList
eldar
parents: 293
diff changeset
1701 << INDENT << " qtd_" << d_class->name() << "_destructor(ptr);" << endl
bb37b0ed94c9 some more QList
eldar
parents: 293
diff changeset
1702 << INDENT << "}" << endl << endl;
bb37b0ed94c9 some more QList
eldar
parents: 293
diff changeset
1703 }
bb37b0ed94c9 some more QList
eldar
parents: 293
diff changeset
1704
bb37b0ed94c9 some more QList
eldar
parents: 293
diff changeset
1705 if (d_class->typeEntry()->isValue())
bb37b0ed94c9 some more QList
eldar
parents: 293
diff changeset
1706 {
bb37b0ed94c9 some more QList
eldar
parents: 293
diff changeset
1707 s << INDENT << "public static void __callNativeDestructor(void* ptr) {" << endl
bb37b0ed94c9 some more QList
eldar
parents: 293
diff changeset
1708 << INDENT << " qtd_" << d_class->name() << "_call_destructor(ptr);" << endl
bb37b0ed94c9 some more QList
eldar
parents: 293
diff changeset
1709 << INDENT << "}" << endl << endl;
bb37b0ed94c9 some more QList
eldar
parents: 293
diff changeset
1710 }
1
e78566595089 initial import
mandel
parents:
diff changeset
1711 }
e78566595089 initial import
mandel
parents:
diff changeset
1712
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1713 void DGenerator::writeFlagsSetter(QTextStream &s, const AbstractMetaClass *d_class)
1
e78566595089 initial import
mandel
parents:
diff changeset
1714 {
e78566595089 initial import
mandel
parents:
diff changeset
1715 if (d_class->isInterface() || d_class->isNamespace())
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1716 s << INDENT << "void __setFlags(QtdObjectFlags flags, bool val);";
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1717 else // COMPILER BUG:
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1718 s << INDENT << "void __setFlags(QtdObjectFlags flags, bool val) { super.__setFlags(flags, val); }";
1
e78566595089 initial import
mandel
parents:
diff changeset
1719 }
e78566595089 initial import
mandel
parents:
diff changeset
1720
e78566595089 initial import
mandel
parents:
diff changeset
1721 void DGenerator::writeSignalHandlers(QTextStream &s, const AbstractMetaClass *d_class)
e78566595089 initial import
mandel
parents:
diff changeset
1722 {
e78566595089 initial import
mandel
parents:
diff changeset
1723 AbstractMetaFunctionList signal_funcs = signalFunctions(d_class);
e78566595089 initial import
mandel
parents:
diff changeset
1724
e78566595089 initial import
mandel
parents:
diff changeset
1725 QString attr;
e78566595089 initial import
mandel
parents:
diff changeset
1726
288
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1727 // return; // #TODO Don't need handlers for now. Restore in conversion functions later
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1728
1
e78566595089 initial import
mandel
parents:
diff changeset
1729 s << "// signal handlers" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1730 foreach(AbstractMetaFunction *signal, signal_funcs) {
e78566595089 initial import
mandel
parents:
diff changeset
1731 QString sigExternName = signalExternName(d_class, signal);
e78566595089 initial import
mandel
parents:
diff changeset
1732
167
ae06da58ec25 fixed hacky conversion of arguments when emmitting a signal
eldar
parents: 152
diff changeset
1733 /*
1
e78566595089 initial import
mandel
parents:
diff changeset
1734 QString extra_args;
e78566595089 initial import
mandel
parents:
diff changeset
1735
e78566595089 initial import
mandel
parents:
diff changeset
1736 foreach (AbstractMetaArgument *argument, arguments) {
e78566595089 initial import
mandel
parents:
diff changeset
1737 if(argument->type()->isContainer()) {
e78566595089 initial import
mandel
parents:
diff changeset
1738 QString arg_name = argument->indexedName();
e78566595089 initial import
mandel
parents:
diff changeset
1739 const AbstractMetaType *arg_type = argument->type();
e78566595089 initial import
mandel
parents:
diff changeset
1740 QString type_string = translateType(argument->type(), signal->implementingClass(), BoxedPrimitive);
e78566595089 initial import
mandel
parents:
diff changeset
1741 extra_args += ", " + type_string + " " + arg_name;
e78566595089 initial import
mandel
parents:
diff changeset
1742 }
e78566595089 initial import
mandel
parents:
diff changeset
1743 }
167
ae06da58ec25 fixed hacky conversion of arguments when emmitting a signal
eldar
parents: 152
diff changeset
1744 */
ae06da58ec25 fixed hacky conversion of arguments when emmitting a signal
eldar
parents: 152
diff changeset
1745 AbstractMetaArgumentList arguments = signal->arguments();
ae06da58ec25 fixed hacky conversion of arguments when emmitting a signal
eldar
parents: 152
diff changeset
1746
293
8627891e4556 QList updates
eldar
parents: 292
diff changeset
1747 s << "/*private extern(C) void " << sigExternName << "_handle(void* d_entity, void** args) {" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
1748 {
e78566595089 initial import
mandel
parents:
diff changeset
1749 Indentation indent(INDENT);
e78566595089 initial import
mandel
parents:
diff changeset
1750 s << INDENT << "auto d_object = cast(" << d_class->name() << ") d_entity;" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1751 int sz = arguments.count();
e78566595089 initial import
mandel
parents:
diff changeset
1752
e78566595089 initial import
mandel
parents:
diff changeset
1753 for (int j=0; j<sz; ++j) {
e78566595089 initial import
mandel
parents:
diff changeset
1754 AbstractMetaArgument *argument = arguments.at(j);
e78566595089 initial import
mandel
parents:
diff changeset
1755 QString arg_name = argument->indexedName();
e78566595089 initial import
mandel
parents:
diff changeset
1756 AbstractMetaType *type = argument->type();
e78566595089 initial import
mandel
parents:
diff changeset
1757 // if has QString argument we have to pass char* and str.length to QString constructor
e78566595089 initial import
mandel
parents:
diff changeset
1758
e78566595089 initial import
mandel
parents:
diff changeset
1759 QString arg_ptr = QString("args[%1]").arg(argument->argumentIndex() + 1);
e78566595089 initial import
mandel
parents:
diff changeset
1760
167
ae06da58ec25 fixed hacky conversion of arguments when emmitting a signal
eldar
parents: 152
diff changeset
1761 if (type->isContainer()) {
ae06da58ec25 fixed hacky conversion of arguments when emmitting a signal
eldar
parents: 152
diff changeset
1762 s << INDENT << translateType(type, signal->implementingClass(), BoxedPrimitive) << " " << arg_name << ";" << endl
270
49bfc86ff583 true emit of Qt signals.
eldar
parents: 253
diff changeset
1763 << INDENT << cppContainerConversionName(d_class, type, FromCpp) << "(" << arg_ptr << ", &" << arg_name << ");" << endl;
167
ae06da58ec25 fixed hacky conversion of arguments when emmitting a signal
eldar
parents: 152
diff changeset
1764 } else if (type->isTargetLangString()) {
1
e78566595089 initial import
mandel
parents:
diff changeset
1765 s << INDENT << "auto " << arg_name << "_ptr = " << arg_ptr << ";" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1766 << INDENT << "string " << arg_name << " = QString.toNativeString(" << arg_name << "_ptr);";
167
ae06da58ec25 fixed hacky conversion of arguments when emmitting a signal
eldar
parents: 152
diff changeset
1767 } else if(type->isPrimitive() || type->isEnum() || type->isFlags() || type->typeEntry()->isStructInD()) {
1
e78566595089 initial import
mandel
parents:
diff changeset
1768 QString type_name = argument->type()->typeEntry()->qualifiedTargetLangName();
e78566595089 initial import
mandel
parents:
diff changeset
1769 if (type->isFlags())
e78566595089 initial import
mandel
parents:
diff changeset
1770 type_name = "int";
e78566595089 initial import
mandel
parents:
diff changeset
1771 s << INDENT << "auto " << arg_name << " = *(cast(" << type_name << "*)" << arg_ptr << ");";
e78566595089 initial import
mandel
parents:
diff changeset
1772 } else if(type->isObject() || type->isQObject()
e78566595089 initial import
mandel
parents:
diff changeset
1773 || (type->typeEntry()->isValue() && type->isNativePointer())
e78566595089 initial import
mandel
parents:
diff changeset
1774 || type->isValue()) {
167
ae06da58ec25 fixed hacky conversion of arguments when emmitting a signal
eldar
parents: 152
diff changeset
1775 QString type_name = type->name();
ae06da58ec25 fixed hacky conversion of arguments when emmitting a signal
eldar
parents: 152
diff changeset
1776 const ComplexTypeEntry *ctype = static_cast<const ComplexTypeEntry *>(type->typeEntry());
ae06da58ec25 fixed hacky conversion of arguments when emmitting a signal
eldar
parents: 152
diff changeset
1777 if(ctype->isAbstract())
ae06da58ec25 fixed hacky conversion of arguments when emmitting a signal
eldar
parents: 152
diff changeset
1778 type_name = type_name + "_ConcreteWrapper";
ae06da58ec25 fixed hacky conversion of arguments when emmitting a signal
eldar
parents: 152
diff changeset
1779 s << INDENT << "scope " << arg_name << " = new " << type_name
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1780 << "(cast(void*)(" << arg_ptr << "), QtdObjectFlags.nativeOwnership);" << endl;
167
ae06da58ec25 fixed hacky conversion of arguments when emmitting a signal
eldar
parents: 152
diff changeset
1781 }
1
e78566595089 initial import
mandel
parents:
diff changeset
1782 s << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1783 }
e78566595089 initial import
mandel
parents:
diff changeset
1784 // s << INDENT << "Stdout(\"" << d_class->name() << "\", \"" << signal->name() << "\").newline;" << endl;
288
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1785 s << INDENT << "//d_object." << signal->name() << "_emit(";
1
e78566595089 initial import
mandel
parents:
diff changeset
1786 for (int j = 0; j<sz; ++j) {
e78566595089 initial import
mandel
parents:
diff changeset
1787 AbstractMetaArgument *argument = arguments.at(j);
e78566595089 initial import
mandel
parents:
diff changeset
1788 QString arg_name = argument->indexedName();
e78566595089 initial import
mandel
parents:
diff changeset
1789 if (j != 0)
e78566595089 initial import
mandel
parents:
diff changeset
1790 s << ", ";
e78566595089 initial import
mandel
parents:
diff changeset
1791 s << arg_name;
e78566595089 initial import
mandel
parents:
diff changeset
1792 }
e78566595089 initial import
mandel
parents:
diff changeset
1793
e78566595089 initial import
mandel
parents:
diff changeset
1794 s << ");" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1795 }
293
8627891e4556 QList updates
eldar
parents: 292
diff changeset
1796 s << "}*/" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
1797 }
e78566595089 initial import
mandel
parents:
diff changeset
1798 }
e78566595089 initial import
mandel
parents:
diff changeset
1799
288
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1800 AbstractMetaFunctionList DGenerator::generatedClassFunctions(const AbstractMetaClass *d_class)
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1801 {
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1802 AbstractMetaFunctionList r;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1803 AbstractMetaFunctionList d_funcs = d_class->functionsInTargetLang();
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1804 for (int i=0; i<d_funcs.size(); ++i) {
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1805 AbstractMetaFunction *function = d_funcs.at(i);
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1806
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1807 // If a method in an interface class is modified to be private, this should
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1808 // not be present in the interface at all, only in the implementation.
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1809 if (d_class->isInterface()) {
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1810 uint includedAttributes = 0;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1811 uint excludedAttributes = 0;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1812 retrieveModifications(function, d_class, &excludedAttributes, &includedAttributes);
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1813 if (includedAttributes & AbstractMetaAttributes::Private)
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1814 continue;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1815 }
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1816
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1817 if (!notWrappedYet(function)) // qtd2
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1818 r += function;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1819 }
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1820 return r;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1821 }
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1822
1
e78566595089 initial import
mandel
parents:
diff changeset
1823 void DGenerator::write(QTextStream &s, const AbstractMetaClass *d_class)
e78566595089 initial import
mandel
parents:
diff changeset
1824 {
e78566595089 initial import
mandel
parents:
diff changeset
1825 ReportHandler::debugSparse("Generating class: " + d_class->fullName());
e78566595089 initial import
mandel
parents:
diff changeset
1826
e78566595089 initial import
mandel
parents:
diff changeset
1827 bool fakeClass = d_class->attributes() & AbstractMetaAttributes::Fake;
e78566595089 initial import
mandel
parents:
diff changeset
1828
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1829
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1830 QString auxModName = d_class->package() + "." + d_class->name() + "_aux";
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1831 FileOut auxFile(outputDirectory() + "/" + subDirectoryForClass(d_class) + "/" + d_class->name() + "_aux.d");
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1832 auxFile.isDone = true;
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1833 auxFile.stream << "module " << auxModName << ";" << endl << endl;
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1834
292
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
1835 bool staticInit = d_class->isQObject() || d_class->typeEntry()->isValue() || (cpp_shared && d_class->generateShellClass() && !d_class->isInterface());
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1836 if (staticInit)
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1837 {
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1838 auxFile.isDone = false;
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1839 auxFile.stream << "extern(C) void static_init_" << d_class->name() << "();" << endl;
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1840 auxFile.stream << "static this() { static_init_" << d_class->name() << "; }" << endl << endl;
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1841 }
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1842
1
e78566595089 initial import
mandel
parents:
diff changeset
1843 if (m_docs_enabled) {
e78566595089 initial import
mandel
parents:
diff changeset
1844 m_doc_parser = new DocParser(m_doc_directory + "/" + d_class->name().toLower() + ".jdoc");
e78566595089 initial import
mandel
parents:
diff changeset
1845 }
e78566595089 initial import
mandel
parents:
diff changeset
1846 if (!m_isRecursive)
e78566595089 initial import
mandel
parents:
diff changeset
1847 s << "module " << d_class->package() << "." << d_class->name() <<";" << endl << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1848
39
a5cba313c924 network and webkit are wrapped now
eldar
parents: 37
diff changeset
1849 /*
1
e78566595089 initial import
mandel
parents:
diff changeset
1850 s << "// some type info" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1851 QString hasVirtuals = d_class->hasVirtualFunctions() ? "has" : "doesn't have";
e78566595089 initial import
mandel
parents:
diff changeset
1852 QString isFinal = d_class->isFinal() ? "is" : "is not";
e78566595089 initial import
mandel
parents:
diff changeset
1853 QString isNativeId = d_class->typeEntry()->isNativeIdBased() ? "is" : "is not";
e78566595089 initial import
mandel
parents:
diff changeset
1854 s << "// " << hasVirtuals << " virtual functions" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1855 << "// " << isFinal << " final" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1856 << "// " << isNativeId << " native id based" << endl << endl
e78566595089 initial import
mandel
parents:
diff changeset
1857 << "// " << d_class->generateShellClass() << " shell class" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1858 << "// " << d_class->hasVirtualFunctions() << endl
e78566595089 initial import
mandel
parents:
diff changeset
1859 << "// " << d_class->hasProtectedFunctions() << endl
e78566595089 initial import
mandel
parents:
diff changeset
1860 << "// " << d_class->hasFieldAccessors() << endl
e78566595089 initial import
mandel
parents:
diff changeset
1861 << "// " << d_class->typeEntry()->isObject() << endl;
39
a5cba313c924 network and webkit are wrapped now
eldar
parents: 37
diff changeset
1862 */
1
e78566595089 initial import
mandel
parents:
diff changeset
1863
e78566595089 initial import
mandel
parents:
diff changeset
1864 const ComplexTypeEntry *ctype = d_class->typeEntry();
e78566595089 initial import
mandel
parents:
diff changeset
1865 if (!ctype->addedTo.isEmpty() && !m_isRecursive) {
e78566595089 initial import
mandel
parents:
diff changeset
1866 ComplexTypeEntry *ctype_parent = TypeDatabase::instance()->findComplexType(ctype->addedTo);
e78566595089 initial import
mandel
parents:
diff changeset
1867 s << "public import " << ctype_parent->javaPackage() << "." << ctype_parent->name() << ";" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1868 return;
e78566595089 initial import
mandel
parents:
diff changeset
1869 }
e78566595089 initial import
mandel
parents:
diff changeset
1870
e78566595089 initial import
mandel
parents:
diff changeset
1871 if(d_class->isInterface() && !m_isRecursive) {
e78566595089 initial import
mandel
parents:
diff changeset
1872 s << "public import " << ctype->javaPackage() << "." << ctype->qualifiedCppName() << ";" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1873 return;
e78566595089 initial import
mandel
parents:
diff changeset
1874 }
e78566595089 initial import
mandel
parents:
diff changeset
1875 AbstractMetaClassList includedClassesList;
e78566595089 initial import
mandel
parents:
diff changeset
1876
e78566595089 initial import
mandel
parents:
diff changeset
1877 /* m_recursive is increasing by 1 each time we fill the import for a class
e78566595089 initial import
mandel
parents:
diff changeset
1878 if it equals to 0 or 1 imports Set is cleared before a filling cycle - if there
e78566595089 initial import
mandel
parents:
diff changeset
1879 is only one class as usual or if there are many classes in module, but before
e78566595089 initial import
mandel
parents:
diff changeset
1880 filling for first class we need to clear Set. Wow :)
e78566595089 initial import
mandel
parents:
diff changeset
1881 */
e78566595089 initial import
mandel
parents:
diff changeset
1882 if(ctype->includedClasses.size() > 0)
e78566595089 initial import
mandel
parents:
diff changeset
1883 m_recursive = 1;
e78566595089 initial import
mandel
parents:
diff changeset
1884 else
e78566595089 initial import
mandel
parents:
diff changeset
1885 m_recursive = 0;
e78566595089 initial import
mandel
parents:
diff changeset
1886
e78566595089 initial import
mandel
parents:
diff changeset
1887 foreach(QString child, ctype->includedClasses) {
e78566595089 initial import
mandel
parents:
diff changeset
1888 ComplexTypeEntry *ctype_child = TypeDatabase::instance()->findComplexType(child);
e78566595089 initial import
mandel
parents:
diff changeset
1889 foreach (AbstractMetaClass *cls, m_classes) {
e78566595089 initial import
mandel
parents:
diff changeset
1890 if ( cls->name() == ctype_child->name() ) {
e78566595089 initial import
mandel
parents:
diff changeset
1891 includedClassesList << cls;
e78566595089 initial import
mandel
parents:
diff changeset
1892 fillRequiredImports(cls);
e78566595089 initial import
mandel
parents:
diff changeset
1893 excludedTypes2 << cls->name();
e78566595089 initial import
mandel
parents:
diff changeset
1894 }
e78566595089 initial import
mandel
parents:
diff changeset
1895 }
e78566595089 initial import
mandel
parents:
diff changeset
1896 }
e78566595089 initial import
mandel
parents:
diff changeset
1897
e78566595089 initial import
mandel
parents:
diff changeset
1898 QString interface;
e78566595089 initial import
mandel
parents:
diff changeset
1899 if(d_class->typeEntry()->designatedInterface())
e78566595089 initial import
mandel
parents:
diff changeset
1900 interface = d_class->typeEntry()->designatedInterface()->name();
e78566595089 initial import
mandel
parents:
diff changeset
1901
e78566595089 initial import
mandel
parents:
diff changeset
1902 if(d_class->typeEntry()->designatedInterface()) {
e78566595089 initial import
mandel
parents:
diff changeset
1903 foreach (AbstractMetaClass *cls, m_classes) {
e78566595089 initial import
mandel
parents:
diff changeset
1904 if ( cls->name() == interface ) {
e78566595089 initial import
mandel
parents:
diff changeset
1905 includedClassesList << cls;
e78566595089 initial import
mandel
parents:
diff changeset
1906 fillRequiredImports(cls);
e78566595089 initial import
mandel
parents:
diff changeset
1907 excludedTypes2 << cls->name();
e78566595089 initial import
mandel
parents:
diff changeset
1908 }
e78566595089 initial import
mandel
parents:
diff changeset
1909 }
e78566595089 initial import
mandel
parents:
diff changeset
1910 }
e78566595089 initial import
mandel
parents:
diff changeset
1911
e78566595089 initial import
mandel
parents:
diff changeset
1912 fillRequiredImports(d_class);
e78566595089 initial import
mandel
parents:
diff changeset
1913 excludedTypes2 << d_class->name();
e78566595089 initial import
mandel
parents:
diff changeset
1914 if(ctype->includedClasses.size() > 0)
e78566595089 initial import
mandel
parents:
diff changeset
1915 m_recursive = 0;
e78566595089 initial import
mandel
parents:
diff changeset
1916
e78566595089 initial import
mandel
parents:
diff changeset
1917 QList<Include> includes = d_class->typeEntry()->extraIncludes();
e78566595089 initial import
mandel
parents:
diff changeset
1918 foreach (const Include &inc, includes) {
e78566595089 initial import
mandel
parents:
diff changeset
1919 if (inc.type == Include::TargetLangImport) {
e78566595089 initial import
mandel
parents:
diff changeset
1920 s << inc.toString() << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1921 }
e78566595089 initial import
mandel
parents:
diff changeset
1922 }
e78566595089 initial import
mandel
parents:
diff changeset
1923
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1924 // Enums aliases outside of the class - hack
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1925 if (!d_class->enums().isEmpty()) {
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1926 auxFile.isDone = false;
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1927 foreach (AbstractMetaEnum *d_enum, d_class->enums())
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1928 writeEnum(auxFile.stream, d_enum);
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1929 }
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1930
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1931 // Auxiliary file contents should have been written at this point
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1932 if (!auxFile.isDone)
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1933 {
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1934 s << "public import " << auxModName << ";" << endl;
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1935 auxFile.done();
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1936 }
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1937
1
e78566595089 initial import
mandel
parents:
diff changeset
1938 if (!m_isRecursive) {
e78566595089 initial import
mandel
parents:
diff changeset
1939 s << "public import qt.QGlobal;" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1940 << "public import qt.core.Qt;" << endl
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1941 << "private import qt.QtdObject;" << endl
81
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
1942 << "private import qt.core.QString;" << endl
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
1943 << "private import qt.qtd.Array;" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
1944 if (d_class->isQObject()) {
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1945 s << "public import qt.Signal;" << endl
288
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
1946 << "public import qt.qtd.MOC;" << endl
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1947 << "public import qt.core.QMetaObject;" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1948 << "public import qt.qtd.Traits;" << endl;
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1949
1
e78566595089 initial import
mandel
parents:
diff changeset
1950 if (d_class->name() != "QObject")
e78566595089 initial import
mandel
parents:
diff changeset
1951 s << "public import qt.core.QObject;" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1952 }
e78566595089 initial import
mandel
parents:
diff changeset
1953
e78566595089 initial import
mandel
parents:
diff changeset
1954 // qtd2 hack!
e78566595089 initial import
mandel
parents:
diff changeset
1955 if (d_class->name() == "QCoreApplication")
e78566595089 initial import
mandel
parents:
diff changeset
1956 s << "private import qt.core.ArrayOps;" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1957 else if (d_class->name() == "QApplication")
e78566595089 initial import
mandel
parents:
diff changeset
1958 s << "private import qt.gui.ArrayOps;" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1959
187
34fe79a9915b fix forward references caused by unneeded import of ArrayOps2
eldar
parents: 185
diff changeset
1960 /*
34fe79a9915b fix forward references caused by unneeded import of ArrayOps2
eldar
parents: 185
diff changeset
1961 we don't need to import ArrayOps2 for anything else than QObjects,
34fe79a9915b fix forward references caused by unneeded import of ArrayOps2
eldar
parents: 185
diff changeset
1962 for example if it is done in the namespaces, it may cause circular
34fe79a9915b fix forward references caused by unneeded import of ArrayOps2
eldar
parents: 185
diff changeset
1963 imports forward references and shit. If ArrayOps2 is expanded later
34fe79a9915b fix forward references caused by unneeded import of ArrayOps2
eldar
parents: 185
diff changeset
1964 for other usages - then restrict it just for namespaces/interfaces
34fe79a9915b fix forward references caused by unneeded import of ArrayOps2
eldar
parents: 185
diff changeset
1965 */
34fe79a9915b fix forward references caused by unneeded import of ArrayOps2
eldar
parents: 185
diff changeset
1966 if(d_class->isQObject())
34fe79a9915b fix forward references caused by unneeded import of ArrayOps2
eldar
parents: 185
diff changeset
1967 s << "private import " << d_class->package() << ".ArrayOps2;" << endl;
167
ae06da58ec25 fixed hacky conversion of arguments when emmitting a signal
eldar
parents: 152
diff changeset
1968
1
e78566595089 initial import
mandel
parents:
diff changeset
1969 s << "// automatic imports-------------" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1970 writeRequiredImports(s, d_class);
e78566595089 initial import
mandel
parents:
diff changeset
1971 s << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1972 if (dPhobos)
e78566595089 initial import
mandel
parents:
diff changeset
1973 {
e78566595089 initial import
mandel
parents:
diff changeset
1974 s << "import std.stdio;" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1975 << "import std.string;" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1976 << "import std.utf;" << endl
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1977 << "import core.memory;" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
1978 }
e78566595089 initial import
mandel
parents:
diff changeset
1979 else
e78566595089 initial import
mandel
parents:
diff changeset
1980 {
e78566595089 initial import
mandel
parents:
diff changeset
1981 s << "import tango.io.Stdout;" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1982 << "import tango.stdc.stringz;" << endl
e78566595089 initial import
mandel
parents:
diff changeset
1983 << "import tango.text.convert.Utf;" << endl
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1984 << "import tango.core.Memory;" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
1985 }
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1986
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
1987 s << endl << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
1988 }
e78566595089 initial import
mandel
parents:
diff changeset
1989
e78566595089 initial import
mandel
parents:
diff changeset
1990 if (m_doc_parser) {
e78566595089 initial import
mandel
parents:
diff changeset
1991 s << m_doc_parser->documentation(d_class) << endl << endl;
e78566595089 initial import
mandel
parents:
diff changeset
1992 }
e78566595089 initial import
mandel
parents:
diff changeset
1993
188
7dd099050621 initial commit for D2 support
eldar
parents: 187
diff changeset
1994 /* qtd s << "@QtJambiGeneratedClass" << endl;
7dd099050621 initial commit for D2 support
eldar
parents: 187
diff changeset
1995
7dd099050621 initial commit for D2 support
eldar
parents: 187
diff changeset
1996 if ((d_class->typeEntry()->typeFlags() & ComplexTypeEntry::Deprecated) != 0) {
7dd099050621 initial commit for D2 support
eldar
parents: 187
diff changeset
1997 s << "@Deprecated" << endl;
7dd099050621 initial commit for D2 support
eldar
parents: 187
diff changeset
1998 }
7dd099050621 initial commit for D2 support
eldar
parents: 187
diff changeset
1999 */
7dd099050621 initial commit for D2 support
eldar
parents: 187
diff changeset
2000
7dd099050621 initial commit for D2 support
eldar
parents: 187
diff changeset
2001
1
e78566595089 initial import
mandel
parents:
diff changeset
2002 if (d_class->isInterface()) {
e78566595089 initial import
mandel
parents:
diff changeset
2003 s << "public interface ";
e78566595089 initial import
mandel
parents:
diff changeset
2004 } else {
e78566595089 initial import
mandel
parents:
diff changeset
2005 if (d_class->isPublic())
e78566595089 initial import
mandel
parents:
diff changeset
2006 s << "public ";
e78566595089 initial import
mandel
parents:
diff changeset
2007 // else friendly
e78566595089 initial import
mandel
parents:
diff changeset
2008
e78566595089 initial import
mandel
parents:
diff changeset
2009 bool force_abstract = (d_class->typeEntry()->typeFlags() & ComplexTypeEntry::ForceAbstract) != 0;
e78566595089 initial import
mandel
parents:
diff changeset
2010 if (d_class->isFinal() && !force_abstract)
e78566595089 initial import
mandel
parents:
diff changeset
2011 s << "final ";
e78566595089 initial import
mandel
parents:
diff changeset
2012 if ((d_class->isAbstract() && !d_class->isNamespace()) || force_abstract)
e78566595089 initial import
mandel
parents:
diff changeset
2013 s << "abstract ";
e78566595089 initial import
mandel
parents:
diff changeset
2014
e78566595089 initial import
mandel
parents:
diff changeset
2015 if (!d_class->typeEntry()->targetType().isEmpty()) {
e78566595089 initial import
mandel
parents:
diff changeset
2016 s << d_class->typeEntry()->targetType() << " ";
e78566595089 initial import
mandel
parents:
diff changeset
2017 } else if (d_class->isNamespace() && d_class->functionsInTargetLang().size() == 0) {
e78566595089 initial import
mandel
parents:
diff changeset
2018 s << "interface ";
e78566595089 initial import
mandel
parents:
diff changeset
2019 } else if (d_class->isNamespace()) {
e78566595089 initial import
mandel
parents:
diff changeset
2020 s << "class ";
e78566595089 initial import
mandel
parents:
diff changeset
2021 } else {
e78566595089 initial import
mandel
parents:
diff changeset
2022 s << "class ";
e78566595089 initial import
mandel
parents:
diff changeset
2023 }
e78566595089 initial import
mandel
parents:
diff changeset
2024
e78566595089 initial import
mandel
parents:
diff changeset
2025 }
e78566595089 initial import
mandel
parents:
diff changeset
2026
e78566595089 initial import
mandel
parents:
diff changeset
2027 const ComplexTypeEntry *type = d_class->typeEntry();
e78566595089 initial import
mandel
parents:
diff changeset
2028
e78566595089 initial import
mandel
parents:
diff changeset
2029 s << d_class->name();
e78566595089 initial import
mandel
parents:
diff changeset
2030
e78566595089 initial import
mandel
parents:
diff changeset
2031 if (type->isGenericClass()) {
e78566595089 initial import
mandel
parents:
diff changeset
2032 s << "<";
e78566595089 initial import
mandel
parents:
diff changeset
2033 QList<TypeEntry *> templateArguments = d_class->templateBaseClass()->templateArguments();
e78566595089 initial import
mandel
parents:
diff changeset
2034 for (int i=0; i<templateArguments.size(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
2035 TypeEntry *templateArgument = templateArguments.at(i);
e78566595089 initial import
mandel
parents:
diff changeset
2036 if (i > 0)
e78566595089 initial import
mandel
parents:
diff changeset
2037 s << ", ";
e78566595089 initial import
mandel
parents:
diff changeset
2038 s << templateArgument->name();
e78566595089 initial import
mandel
parents:
diff changeset
2039 }
e78566595089 initial import
mandel
parents:
diff changeset
2040 s << ">";
e78566595089 initial import
mandel
parents:
diff changeset
2041 }
e78566595089 initial import
mandel
parents:
diff changeset
2042
e78566595089 initial import
mandel
parents:
diff changeset
2043 if (!d_class->isNamespace() && !d_class->isInterface()) {
e78566595089 initial import
mandel
parents:
diff changeset
2044 if (!d_class->baseClassName().isEmpty()) {
e78566595089 initial import
mandel
parents:
diff changeset
2045 s << " : " << d_class->baseClass()->name();
e78566595089 initial import
mandel
parents:
diff changeset
2046 } else {
e78566595089 initial import
mandel
parents:
diff changeset
2047 QString sc = type->defaultSuperclass();
e78566595089 initial import
mandel
parents:
diff changeset
2048 if ((sc != d_class->name()) && !sc.isEmpty())
e78566595089 initial import
mandel
parents:
diff changeset
2049 s << " : " << sc;
e78566595089 initial import
mandel
parents:
diff changeset
2050 }
e78566595089 initial import
mandel
parents:
diff changeset
2051 }/* qtd else if (d_class->isInterface()) {
e78566595089 initial import
mandel
parents:
diff changeset
2052 s << " extends QtJambiInterface";
e78566595089 initial import
mandel
parents:
diff changeset
2053 }*/
e78566595089 initial import
mandel
parents:
diff changeset
2054
e78566595089 initial import
mandel
parents:
diff changeset
2055 // implementing interfaces...
e78566595089 initial import
mandel
parents:
diff changeset
2056 bool implements = false;
e78566595089 initial import
mandel
parents:
diff changeset
2057 AbstractMetaClassList interfaces = d_class->interfaces();
e78566595089 initial import
mandel
parents:
diff changeset
2058 if (!interfaces.isEmpty()) {
e78566595089 initial import
mandel
parents:
diff changeset
2059 if (!d_class->isInterface())
e78566595089 initial import
mandel
parents:
diff changeset
2060 s << ", ";
e78566595089 initial import
mandel
parents:
diff changeset
2061 else {
e78566595089 initial import
mandel
parents:
diff changeset
2062 implements = true;
e78566595089 initial import
mandel
parents:
diff changeset
2063 s << ": ";
e78566595089 initial import
mandel
parents:
diff changeset
2064 }
e78566595089 initial import
mandel
parents:
diff changeset
2065 for (int i=0; i<interfaces.size(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
2066 AbstractMetaClass *iface = interfaces.at(i);
e78566595089 initial import
mandel
parents:
diff changeset
2067 if (i) s << ", ";
e78566595089 initial import
mandel
parents:
diff changeset
2068 s << iface->name();
e78566595089 initial import
mandel
parents:
diff changeset
2069 }
e78566595089 initial import
mandel
parents:
diff changeset
2070 }
e78566595089 initial import
mandel
parents:
diff changeset
2071 /* qtd
e78566595089 initial import
mandel
parents:
diff changeset
2072 if (isComparable(d_class)) {
e78566595089 initial import
mandel
parents:
diff changeset
2073 if (!implements) {
e78566595089 initial import
mandel
parents:
diff changeset
2074 implements = true;
e78566595089 initial import
mandel
parents:
diff changeset
2075 s << endl << " implements ";
e78566595089 initial import
mandel
parents:
diff changeset
2076 }
e78566595089 initial import
mandel
parents:
diff changeset
2077 else
e78566595089 initial import
mandel
parents:
diff changeset
2078 s << "," << endl << " ";
e78566595089 initial import
mandel
parents:
diff changeset
2079 s << "java.lang.Comparable<Object>";
e78566595089 initial import
mandel
parents:
diff changeset
2080 }
e78566595089 initial import
mandel
parents:
diff changeset
2081
e78566595089 initial import
mandel
parents:
diff changeset
2082 if (d_class->hasCloneOperator()) {
e78566595089 initial import
mandel
parents:
diff changeset
2083 if (!implements) {
e78566595089 initial import
mandel
parents:
diff changeset
2084 implements = true;
e78566595089 initial import
mandel
parents:
diff changeset
2085 s << endl << " implements ";
e78566595089 initial import
mandel
parents:
diff changeset
2086 }
e78566595089 initial import
mandel
parents:
diff changeset
2087 else
e78566595089 initial import
mandel
parents:
diff changeset
2088 s << "," << endl << " ";
e78566595089 initial import
mandel
parents:
diff changeset
2089 s << "java.lang.Cloneable";
e78566595089 initial import
mandel
parents:
diff changeset
2090 }
e78566595089 initial import
mandel
parents:
diff changeset
2091 */
e78566595089 initial import
mandel
parents:
diff changeset
2092 s << endl << "{" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2093
e78566595089 initial import
mandel
parents:
diff changeset
2094 Indentation indent(INDENT);
e78566595089 initial import
mandel
parents:
diff changeset
2095
e78566595089 initial import
mandel
parents:
diff changeset
2096 // Define variables for reference count mechanism
e78566595089 initial import
mandel
parents:
diff changeset
2097 if (!d_class->isInterface() && !d_class->isNamespace()) {
e78566595089 initial import
mandel
parents:
diff changeset
2098 QHash<QString, int> variables;
e78566595089 initial import
mandel
parents:
diff changeset
2099 foreach (AbstractMetaFunction *function, d_class->functions()) {
e78566595089 initial import
mandel
parents:
diff changeset
2100 QList<ReferenceCount> referenceCounts = function->referenceCounts(d_class);
e78566595089 initial import
mandel
parents:
diff changeset
2101 foreach (ReferenceCount refCount, referenceCounts) {
e78566595089 initial import
mandel
parents:
diff changeset
2102 variables[refCount.variableName] |= refCount.action
e78566595089 initial import
mandel
parents:
diff changeset
2103 | refCount.access
e78566595089 initial import
mandel
parents:
diff changeset
2104 | (refCount.threadSafe ? ReferenceCount::ThreadSafe : 0)
e78566595089 initial import
mandel
parents:
diff changeset
2105 | (function->isStatic() ? ReferenceCount::Static : 0)
e78566595089 initial import
mandel
parents:
diff changeset
2106 | (refCount.declareVariable.isEmpty() ? ReferenceCount::DeclareVariable : 0);
e78566595089 initial import
mandel
parents:
diff changeset
2107 }
e78566595089 initial import
mandel
parents:
diff changeset
2108 }
e78566595089 initial import
mandel
parents:
diff changeset
2109
e78566595089 initial import
mandel
parents:
diff changeset
2110 foreach (QString variableName, variables.keys()) {
e78566595089 initial import
mandel
parents:
diff changeset
2111 int actions = variables.value(variableName) & ReferenceCount::ActionsMask;
e78566595089 initial import
mandel
parents:
diff changeset
2112 // bool threadSafe = variables.value(variableName) & ReferenceCount::ThreadSafe;
e78566595089 initial import
mandel
parents:
diff changeset
2113 bool isStatic = variables.value(variableName) & ReferenceCount::Static;
e78566595089 initial import
mandel
parents:
diff changeset
2114 bool declareVariable = variables.value(variableName) & ReferenceCount::DeclareVariable;
e78566595089 initial import
mandel
parents:
diff changeset
2115 int access = variables.value(variableName) & ReferenceCount::AccessMask;
e78566595089 initial import
mandel
parents:
diff changeset
2116
e78566595089 initial import
mandel
parents:
diff changeset
2117 if (actions == ReferenceCount::Ignore || !declareVariable)
e78566595089 initial import
mandel
parents:
diff changeset
2118 continue;
e78566595089 initial import
mandel
parents:
diff changeset
2119
e78566595089 initial import
mandel
parents:
diff changeset
2120 if (((actions & ReferenceCount::Add) == 0) != ((actions & ReferenceCount::Remove) == 0)) {
e78566595089 initial import
mandel
parents:
diff changeset
2121 QString warn = QString("either add or remove specified for reference count variable '%1' in '%2' but not both")
e78566595089 initial import
mandel
parents:
diff changeset
2122 .arg(variableName).arg(d_class->fullName());
e78566595089 initial import
mandel
parents:
diff changeset
2123 ReportHandler::warning(warn);
e78566595089 initial import
mandel
parents:
diff changeset
2124 }
e78566595089 initial import
mandel
parents:
diff changeset
2125 s << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2126 /* qtd
e78566595089 initial import
mandel
parents:
diff changeset
2127 if (TypeDatabase::instance()->includeEclipseWarnings())
e78566595089 initial import
mandel
parents:
diff changeset
2128 s << INDENT << "@SuppressWarnings(\"unused\")" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2129 */
e78566595089 initial import
mandel
parents:
diff changeset
2130 if (actions != ReferenceCount::Set && actions != ReferenceCount::Ignore) { // qtd2
e78566595089 initial import
mandel
parents:
diff changeset
2131
e78566595089 initial import
mandel
parents:
diff changeset
2132 s << INDENT;
e78566595089 initial import
mandel
parents:
diff changeset
2133 switch (access) {
e78566595089 initial import
mandel
parents:
diff changeset
2134 case ReferenceCount::Private:
e78566595089 initial import
mandel
parents:
diff changeset
2135 s << "package "; break; // qtd
e78566595089 initial import
mandel
parents:
diff changeset
2136 case ReferenceCount::Protected:
e78566595089 initial import
mandel
parents:
diff changeset
2137 s << "protected "; break;
e78566595089 initial import
mandel
parents:
diff changeset
2138 case ReferenceCount::Public:
e78566595089 initial import
mandel
parents:
diff changeset
2139 s << "public "; break;
e78566595089 initial import
mandel
parents:
diff changeset
2140 default:
e78566595089 initial import
mandel
parents:
diff changeset
2141 s << "protected"; // friendly
e78566595089 initial import
mandel
parents:
diff changeset
2142 }
e78566595089 initial import
mandel
parents:
diff changeset
2143
33
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
2144 } // qtd2
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
2145
1
e78566595089 initial import
mandel
parents:
diff changeset
2146 if (isStatic)
e78566595089 initial import
mandel
parents:
diff changeset
2147 s << "static ";
e78566595089 initial import
mandel
parents:
diff changeset
2148
e78566595089 initial import
mandel
parents:
diff changeset
2149 if (actions != ReferenceCount::Set && actions != ReferenceCount::Ignore) {
e78566595089 initial import
mandel
parents:
diff changeset
2150 s << "Object[] " << variableName << ";" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2151 /*
e78566595089 initial import
mandel
parents:
diff changeset
2152 if (threadSafe)
e78566595089 initial import
mandel
parents:
diff changeset
2153 s << "java.util.Collections.synchronizedCollection(";
e78566595089 initial import
mandel
parents:
diff changeset
2154 s << "new java.util.ArrayList<Object>()";
e78566595089 initial import
mandel
parents:
diff changeset
2155 if (threadSafe)
e78566595089 initial import
mandel
parents:
diff changeset
2156 s << ")";
e78566595089 initial import
mandel
parents:
diff changeset
2157 s << ";" << endl;*/
e78566595089 initial import
mandel
parents:
diff changeset
2158 } else if (actions != ReferenceCount::Ignore) {
e78566595089 initial import
mandel
parents:
diff changeset
2159 /* qtd2 if (threadSafe)
e78566595089 initial import
mandel
parents:
diff changeset
2160 s << "synchronized ";*/
e78566595089 initial import
mandel
parents:
diff changeset
2161 s << "Object " << variableName << " = null;" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2162 }
e78566595089 initial import
mandel
parents:
diff changeset
2163 }
e78566595089 initial import
mandel
parents:
diff changeset
2164 s << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2165 }
e78566595089 initial import
mandel
parents:
diff changeset
2166
e78566595089 initial import
mandel
parents:
diff changeset
2167 /* qtd2
e78566595089 initial import
mandel
parents:
diff changeset
2168 if (!d_class->isInterface() && (!d_class->isNamespace() || d_class->functionsInTargetLang().size() > 0)
e78566595089 initial import
mandel
parents:
diff changeset
2169 && (d_class->baseClass() == 0 || d_class->package() != d_class->baseClass()->package())) {
e78566595089 initial import
mandel
parents:
diff changeset
2170 s << endl
e78566595089 initial import
mandel
parents:
diff changeset
2171 << INDENT << "static {" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2172
e78566595089 initial import
mandel
parents:
diff changeset
2173 if (d_class->isNamespace()) {
e78566595089 initial import
mandel
parents:
diff changeset
2174 s << INDENT << " qt.QtJambi_LibraryInitializer.init();" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2175 }
e78566595089 initial import
mandel
parents:
diff changeset
2176
e78566595089 initial import
mandel
parents:
diff changeset
2177 s << INDENT << " " << d_class->package() << ".QtJambi_LibraryInitializer.init();" << endl
e78566595089 initial import
mandel
parents:
diff changeset
2178 << INDENT << "}" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2179 }
e78566595089 initial import
mandel
parents:
diff changeset
2180 */
e78566595089 initial import
mandel
parents:
diff changeset
2181
293
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2182 // Enums aliases
1
e78566595089 initial import
mandel
parents:
diff changeset
2183 foreach (AbstractMetaEnum *d_enum, d_class->enums())
e78566595089 initial import
mandel
parents:
diff changeset
2184 writeEnumAlias(s, d_enum);
e78566595089 initial import
mandel
parents:
diff changeset
2185
288
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2186 // Signals
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2187 if (d_class->isQObject())
1
e78566595089 initial import
mandel
parents:
diff changeset
2188 {
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2189 AbstractMetaFunctionList signal_funcs = signalFunctions(d_class, false);
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2190 writeSignalSignatures(s, d_class, signal_funcs);
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2191
1
e78566595089 initial import
mandel
parents:
diff changeset
2192 foreach (AbstractMetaFunction *signal, signal_funcs)
270
49bfc86ff583 true emit of Qt signals.
eldar
parents: 253
diff changeset
2193 {
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2194 writeSignal(s, signal);
270
49bfc86ff583 true emit of Qt signals.
eldar
parents: 253
diff changeset
2195 if(!signal->isPrivate())
49bfc86ff583 true emit of Qt signals.
eldar
parents: 253
diff changeset
2196 writeFunction(s, signal);
49bfc86ff583 true emit of Qt signals.
eldar
parents: 253
diff changeset
2197 }
1
e78566595089 initial import
mandel
parents:
diff changeset
2198 }
e78566595089 initial import
mandel
parents:
diff changeset
2199
e78566595089 initial import
mandel
parents:
diff changeset
2200 // Class has subclasses but also only private constructors
e78566595089 initial import
mandel
parents:
diff changeset
2201 if (!d_class->isFinalInTargetLang() && d_class->isFinalInCpp()) {
e78566595089 initial import
mandel
parents:
diff changeset
2202 s << endl << INDENT << "/**" << endl
e78566595089 initial import
mandel
parents:
diff changeset
2203 << INDENT << " * This constructor is a place holder intended to prevent" << endl
e78566595089 initial import
mandel
parents:
diff changeset
2204 << INDENT << " * users from subclassing the class. Certain classes can" << endl
e78566595089 initial import
mandel
parents:
diff changeset
2205 << INDENT << " * unfortunately only be subclasses internally. The constructor" << endl
e78566595089 initial import
mandel
parents:
diff changeset
2206 << INDENT << " * will indiscriminately throw an exception if called. If the" << endl
e78566595089 initial import
mandel
parents:
diff changeset
2207 << INDENT << " * exception is ignored, any use of the constructed object will" << endl
e78566595089 initial import
mandel
parents:
diff changeset
2208 << INDENT << " * cause an exception to occur." << endl << endl
e78566595089 initial import
mandel
parents:
diff changeset
2209 << INDENT << " * @throws QClassCannotBeSubclassedException" << endl
e78566595089 initial import
mandel
parents:
diff changeset
2210 << INDENT << " **/" << endl
e78566595089 initial import
mandel
parents:
diff changeset
2211 << INDENT << "protected " << d_class->name() << "() throws QClassCannotBeSubclassedException {" << endl
e78566595089 initial import
mandel
parents:
diff changeset
2212 << INDENT << " throw new QClassCannotBeSubclassedException(" << d_class->name() << ".class);" << endl
e78566595089 initial import
mandel
parents:
diff changeset
2213 << INDENT << "}" << endl << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2214 }
e78566595089 initial import
mandel
parents:
diff changeset
2215 s << "// Functions" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2216
e78566595089 initial import
mandel
parents:
diff changeset
2217 // Functions
e78566595089 initial import
mandel
parents:
diff changeset
2218 AbstractMetaFunctionList d_funcs = d_class->functionsInTargetLang();
288
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2219 AbstractMetaFunctionList d_funcs_gen = generatedClassFunctions(d_class);
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2220 for (int i=0; i<d_funcs_gen.size(); ++i) {
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2221 AbstractMetaFunction *function = d_funcs_gen.at(i);
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2222 // if(function->isSlot())
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2223 // writeSlot(s, function);
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2224 writeFunction(s, function);
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2225 // qtd s << function->minimalSignature() << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
2226 }
e78566595089 initial import
mandel
parents:
diff changeset
2227 if(d_class->isInterface())
e78566595089 initial import
mandel
parents:
diff changeset
2228 s << endl << INDENT << "public void* __ptr_" << d_class->name() << "();" << endl << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2229
e78566595089 initial import
mandel
parents:
diff changeset
2230
e78566595089 initial import
mandel
parents:
diff changeset
2231 s << "// Field accessors" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2232 // Field accessors
e78566595089 initial import
mandel
parents:
diff changeset
2233 AbstractMetaFieldList fields = d_class->fields();
e78566595089 initial import
mandel
parents:
diff changeset
2234 foreach (const AbstractMetaField *field, fields) {
e78566595089 initial import
mandel
parents:
diff changeset
2235 if (field->wasPublic() || (field->wasProtected() && !d_class->isFinal()))
e78566595089 initial import
mandel
parents:
diff changeset
2236 writeFieldAccessors(s, field);
e78566595089 initial import
mandel
parents:
diff changeset
2237 }
e78566595089 initial import
mandel
parents:
diff changeset
2238
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2239 if (d_class->isQObject())
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2240 writeQObjectFunctions(s, d_class);
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2241
293
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2242 if (ctype->isObject() && !ctype->isQObject()) // conversion function wrapper to be consistent with QObject
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2243 { // some code duplication, remove when there is a better mechanism for Object type conversions
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2244 QString class_name = ctype->name();
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2245 QString return_type_name = class_name;
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2246 if(ctype->designatedInterface())
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2247 return_type_name = ctype->designatedInterface()->name();
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2248 s << " static " << return_type_name << " __getObject(void* nativeId) {" << endl
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2249 << " return qtd_" << class_name << "_from_ptr(nativeId);" << endl
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2250 << " }" << endl << endl;
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2251 }
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2252
288
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2253 // flag to mark the type of class (to use in templates to convert arguments)
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2254 if (d_class->baseClassName().isEmpty())
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2255 {
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2256 if (d_class->typeEntry()->isQObject())
292
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2257 s << INDENT << "public alias void __isQObjectType;" << endl << endl;
288
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2258 else if (d_class->typeEntry()->isObject())
292
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2259 s << INDENT << "public alias void __isObjectType;" << endl << endl;
288
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2260 else if (d_class->typeEntry()->isValue())
292
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2261 s << INDENT << "public alias void __isValueType;" << endl << endl;
288
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2262 }
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2263
292
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2264 s << INDENT << "public alias void __isQtType_" << d_class->name() << ";" << endl << endl;
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2265
293
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2266 // construction of a native copy of a Value
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2267 if (d_class->typeEntry()->isValue() && d_class->hasCloneOperator())
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2268 {
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2269 AbstractMetaFunction *copyCtor = d_class->copyConstructor();
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2270 if(copyCtor)
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2271 s << INDENT << "static void* __constructNativeCopy(const void* orig) {" << endl
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2272 << INDENT << " return " << copyCtor->marshalledName() << "(cast(void*)orig);" << endl
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2273 << INDENT << "}" << endl << endl
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2274
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2275 << INDENT << "static void* __constructPlacedNativeCopy(const void* orig, void* place) {" << endl
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2276 << INDENT << " return qtd_" << d_class->name() << "_placed_copy(orig, place);" << endl
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2277 << INDENT << "}" << endl << endl;
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2278 }
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2279
1
e78566595089 initial import
mandel
parents:
diff changeset
2280 // Add dummy constructor for use when constructing subclasses
e78566595089 initial import
mandel
parents:
diff changeset
2281 if (!d_class->isNamespace() && !d_class->isInterface() && !fakeClass) {
e78566595089 initial import
mandel
parents:
diff changeset
2282 s << endl
e78566595089 initial import
mandel
parents:
diff changeset
2283 << INDENT << "public "
e78566595089 initial import
mandel
parents:
diff changeset
2284 << "this";
e78566595089 initial import
mandel
parents:
diff changeset
2285
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2286
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2287 Indentation indent(INDENT);
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2288
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2289 s << "(void* native_id, QtdObjectFlags flags = QtdObjectFlags.none) {" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2290 << INDENT << "super(native_id, flags);" << endl;
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2291
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2292 if (d_class->name() == "QObject")
1
e78566595089 initial import
mandel
parents:
diff changeset
2293 {
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2294 // To prevent GC from collecting the object, add it to the statically rooted linked list
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2295 s << INDENT << " __next = __root;" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2296 << INDENT << " __root = this;" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2297 << INDENT << " if (__next) {" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2298 << INDENT << " __next.__prev = this;" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2299 << INDENT << " }" << endl << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
2300 }
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2301
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2302 /*
223
0c7abb1e6a9d windows fix, again
eldar
parents: 218
diff changeset
2303 if (cpp_shared) {
0c7abb1e6a9d windows fix, again
eldar
parents: 218
diff changeset
2304 if (d_class->generateShellClass() && !d_class->isInterface())
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2305 s << INDENT << "if (!static_inited)" << endl
223
0c7abb1e6a9d windows fix, again
eldar
parents: 218
diff changeset
2306 << INDENT << " static_init_" << d_class->name() << "();" << endl << endl;
0c7abb1e6a9d windows fix, again
eldar
parents: 218
diff changeset
2307 }
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2308 */
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2309
1
e78566595089 initial import
mandel
parents:
diff changeset
2310 // customized store-result instances
e78566595089 initial import
mandel
parents:
diff changeset
2311 d_funcs = d_class->functionsInTargetLang();
e78566595089 initial import
mandel
parents:
diff changeset
2312 for (int i=0; i<d_funcs.size(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
2313 AbstractMetaFunction *d_function = d_funcs.at(i);
e78566595089 initial import
mandel
parents:
diff changeset
2314 uint included_attributes = 0;
e78566595089 initial import
mandel
parents:
diff changeset
2315 uint excluded_attributes = 0;
e78566595089 initial import
mandel
parents:
diff changeset
2316 setupForFunction(d_function, &included_attributes, &excluded_attributes);
e78566595089 initial import
mandel
parents:
diff changeset
2317 uint attr = d_function->attributes() & (~excluded_attributes) | included_attributes;
e78566595089 initial import
mandel
parents:
diff changeset
2318 bool isStatic = (attr & AbstractMetaAttributes::Static);
e78566595089 initial import
mandel
parents:
diff changeset
2319
e78566595089 initial import
mandel
parents:
diff changeset
2320 if (!isStatic && (attr & AbstractMetaAttributes::Abstract))
e78566595089 initial import
mandel
parents:
diff changeset
2321 continue;
e78566595089 initial import
mandel
parents:
diff changeset
2322
e78566595089 initial import
mandel
parents:
diff changeset
2323 if(d_function->storeResult()) {
e78566595089 initial import
mandel
parents:
diff changeset
2324 QString type_name = d_function->type()->name();
e78566595089 initial import
mandel
parents:
diff changeset
2325 const ComplexTypeEntry *ctype = static_cast<const ComplexTypeEntry *>(d_function->type()->typeEntry());
e78566595089 initial import
mandel
parents:
diff changeset
2326 if(ctype->isAbstract())
e78566595089 initial import
mandel
parents:
diff changeset
2327 type_name = type_name + "_ConcreteWrapper";
e78566595089 initial import
mandel
parents:
diff changeset
2328
e78566595089 initial import
mandel
parents:
diff changeset
2329 s << INDENT << " __m_" << d_function->name() << " = new "
e78566595089 initial import
mandel
parents:
diff changeset
2330 << type_name << "(cast(void*)null);" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2331 if (d_function->type()->isQObject())
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2332 s << INDENT << " __m_" << d_function->name() << ".__setFlags(QtdObjectFlags.nativeOwnership, true);" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
2333 }
e78566595089 initial import
mandel
parents:
diff changeset
2334 }
e78566595089 initial import
mandel
parents:
diff changeset
2335
e78566595089 initial import
mandel
parents:
diff changeset
2336 // pointers to native interface objects for classes that implement interfaces
e78566595089 initial import
mandel
parents:
diff changeset
2337 // initializing
e78566595089 initial import
mandel
parents:
diff changeset
2338 interfaces = d_class->interfaces();
e78566595089 initial import
mandel
parents:
diff changeset
2339 if (!interfaces.isEmpty()) {
e78566595089 initial import
mandel
parents:
diff changeset
2340 for (int i=0; i<interfaces.size(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
2341 AbstractMetaClass *iface = interfaces.at(i);
e78566595089 initial import
mandel
parents:
diff changeset
2342
e78566595089 initial import
mandel
parents:
diff changeset
2343 s << INDENT << " __m_ptr_" << iface->name() << " = qtd_" << d_class->name() << "_cast_to_" << iface->qualifiedCppName()
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2344 << "(__nativeId);" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
2345 }
e78566595089 initial import
mandel
parents:
diff changeset
2346 }
e78566595089 initial import
mandel
parents:
diff changeset
2347
e78566595089 initial import
mandel
parents:
diff changeset
2348
e78566595089 initial import
mandel
parents:
diff changeset
2349 s << INDENT << "}" << endl << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2350
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2351 /******************!!!DUPLICATE OF ABOVE!!!*********************/
1
e78566595089 initial import
mandel
parents:
diff changeset
2352 for (int i=0; i<d_funcs.size(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
2353 AbstractMetaFunction *d_function = d_funcs.at(i);
e78566595089 initial import
mandel
parents:
diff changeset
2354 uint included_attributes = 0;
e78566595089 initial import
mandel
parents:
diff changeset
2355 uint excluded_attributes = 0;
e78566595089 initial import
mandel
parents:
diff changeset
2356 setupForFunction(d_function, &included_attributes, &excluded_attributes);
e78566595089 initial import
mandel
parents:
diff changeset
2357 uint attr = d_function->attributes() & (~excluded_attributes) | included_attributes;
e78566595089 initial import
mandel
parents:
diff changeset
2358 bool isStatic = (attr & AbstractMetaAttributes::Static);
e78566595089 initial import
mandel
parents:
diff changeset
2359
e78566595089 initial import
mandel
parents:
diff changeset
2360 if (!isStatic && (attr & AbstractMetaAttributes::Abstract))
e78566595089 initial import
mandel
parents:
diff changeset
2361 continue;
e78566595089 initial import
mandel
parents:
diff changeset
2362
e78566595089 initial import
mandel
parents:
diff changeset
2363 if(d_function->storeResult()) {
e78566595089 initial import
mandel
parents:
diff changeset
2364 QString type_name = d_function->type()->name();
e78566595089 initial import
mandel
parents:
diff changeset
2365 const ComplexTypeEntry *ctype = static_cast<const ComplexTypeEntry *>(d_function->type()->typeEntry());
e78566595089 initial import
mandel
parents:
diff changeset
2366 if(ctype->isAbstract())
e78566595089 initial import
mandel
parents:
diff changeset
2367 type_name = type_name + "_ConcreteWrapper";
e78566595089 initial import
mandel
parents:
diff changeset
2368
e78566595089 initial import
mandel
parents:
diff changeset
2369 s << INDENT << type_name << " __m_" << d_function->name() << ";" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2370 }
e78566595089 initial import
mandel
parents:
diff changeset
2371 }
e78566595089 initial import
mandel
parents:
diff changeset
2372 /***************************************************************/
e78566595089 initial import
mandel
parents:
diff changeset
2373
e78566595089 initial import
mandel
parents:
diff changeset
2374 // pointers to native interface objects for classes that implement interfaces
e78566595089 initial import
mandel
parents:
diff changeset
2375 // initializing
e78566595089 initial import
mandel
parents:
diff changeset
2376 interfaces = d_class->interfaces();
e78566595089 initial import
mandel
parents:
diff changeset
2377 if (!interfaces.isEmpty()) {
e78566595089 initial import
mandel
parents:
diff changeset
2378 for (int i=0; i<interfaces.size(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
2379 AbstractMetaClass *iface = interfaces.at(i);
e78566595089 initial import
mandel
parents:
diff changeset
2380
e78566595089 initial import
mandel
parents:
diff changeset
2381 s << INDENT << "private void* __m_ptr_" << iface->name() << ";" << endl
e78566595089 initial import
mandel
parents:
diff changeset
2382 << INDENT << "public void* __ptr_" << iface->name() << "() { return __m_ptr_" << iface->name() << "; }" << endl << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2383 }
e78566595089 initial import
mandel
parents:
diff changeset
2384 }
e78566595089 initial import
mandel
parents:
diff changeset
2385
e78566595089 initial import
mandel
parents:
diff changeset
2386 writeDestructor(s, d_class);
e78566595089 initial import
mandel
parents:
diff changeset
2387 }
e78566595089 initial import
mandel
parents:
diff changeset
2388
292
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2389 if (d_class->typeEntry()->isValue())
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2390 writeValueFunctions(s, d_class);
1
e78566595089 initial import
mandel
parents:
diff changeset
2391 /* qtd
e78566595089 initial import
mandel
parents:
diff changeset
2392 // Add a function that converts an array of the value type to a QNativePointer
e78566595089 initial import
mandel
parents:
diff changeset
2393 if (d_class->typeEntry()->isValue() && !fakeClass) {
e78566595089 initial import
mandel
parents:
diff changeset
2394 s << endl
e78566595089 initial import
mandel
parents:
diff changeset
2395 << INDENT << "public static native QNativePointer nativePointerArray(" << d_class->name()
e78566595089 initial import
mandel
parents:
diff changeset
2396 << " array[]);" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2397 }
e78566595089 initial import
mandel
parents:
diff changeset
2398
e78566595089 initial import
mandel
parents:
diff changeset
2399 // write the cast to this function....
e78566595089 initial import
mandel
parents:
diff changeset
2400 if (d_class->isInterface()) {
e78566595089 initial import
mandel
parents:
diff changeset
2401 s << endl
e78566595089 initial import
mandel
parents:
diff changeset
2402 << " public long __qt_cast_to_"
e78566595089 initial import
mandel
parents:
diff changeset
2403 << static_cast<const InterfaceTypeEntry *>(type)->origin()->targetLangName()
e78566595089 initial import
mandel
parents:
diff changeset
2404 << "(long ptr);" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2405 } else {
e78566595089 initial import
mandel
parents:
diff changeset
2406 foreach (AbstractMetaClass *cls, interfaces) {
e78566595089 initial import
mandel
parents:
diff changeset
2407 s << endl
e78566595089 initial import
mandel
parents:
diff changeset
2408 << " @QtBlockedSlot public native long __qt_cast_to_"
e78566595089 initial import
mandel
parents:
diff changeset
2409 << static_cast<const InterfaceTypeEntry *>(cls->typeEntry())->origin()->targetLangName()
e78566595089 initial import
mandel
parents:
diff changeset
2410 << "(long ptr);" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2411 }
e78566595089 initial import
mandel
parents:
diff changeset
2412 }
e78566595089 initial import
mandel
parents:
diff changeset
2413 */
e78566595089 initial import
mandel
parents:
diff changeset
2414
e78566595089 initial import
mandel
parents:
diff changeset
2415 /* qtd writeJavaLangObjectOverrideFunctions(s, d_class);
e78566595089 initial import
mandel
parents:
diff changeset
2416 */
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2417 writeFlagsSetter(s, d_class);
1
e78566595089 initial import
mandel
parents:
diff changeset
2418 s << "// Injected code in class" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2419 writeExtraFunctions(s, d_class);
e78566595089 initial import
mandel
parents:
diff changeset
2420 // qtd2 writeToStringFunction(s, d_class);
e78566595089 initial import
mandel
parents:
diff changeset
2421 /* qtd
e78566595089 initial import
mandel
parents:
diff changeset
2422 if (d_class->hasCloneOperator()) {
e78566595089 initial import
mandel
parents:
diff changeset
2423 writeCloneFunction(s, d_class);
e78566595089 initial import
mandel
parents:
diff changeset
2424 }
e78566595089 initial import
mandel
parents:
diff changeset
2425 */
292
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2426 s << "}" << endl; // end of class scope
1
e78566595089 initial import
mandel
parents:
diff changeset
2427
81
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
2428 /* ---------------- injected free code ----------------*/
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
2429 const ComplexTypeEntry *class_type = d_class->typeEntry();
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
2430 Q_ASSERT(class_type);
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
2431
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
2432 CodeSnipList code_snips = class_type->codeSnips();
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
2433 foreach (const CodeSnip &snip, code_snips) {
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
2434 if (!d_class->isInterface() && snip.language == TypeSystem::TargetLangFreeCode) {
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
2435 s << endl;
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
2436 snip.formattedCode(s, INDENT);
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
2437 }
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
2438 }
105
3aa118a9ae71 each QObject now has associated child QObject for handling signals. fixes #15
eldar
parents: 104
diff changeset
2439 /* --------------------------------------------------- */
14
5015aede8edd insert() for QPolygons
eldar
parents: 1
diff changeset
2440
1
e78566595089 initial import
mandel
parents:
diff changeset
2441 interfaces = d_class->interfaces();
e78566595089 initial import
mandel
parents:
diff changeset
2442 if (!interfaces.isEmpty()) {
e78566595089 initial import
mandel
parents:
diff changeset
2443 for (int i=0; i<interfaces.size(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
2444 AbstractMetaClass *iface = interfaces.at(i);
e78566595089 initial import
mandel
parents:
diff changeset
2445
e78566595089 initial import
mandel
parents:
diff changeset
2446 s << INDENT << "private static extern (C) void*" << "qtd_" << d_class->name() << "_cast_to_" << iface->qualifiedCppName()
e78566595089 initial import
mandel
parents:
diff changeset
2447 << "(void* nativeId);" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2448 }
e78566595089 initial import
mandel
parents:
diff changeset
2449 }
e78566595089 initial import
mandel
parents:
diff changeset
2450
e78566595089 initial import
mandel
parents:
diff changeset
2451 if (!d_class->isInterface() && d_class->isAbstract()) {
e78566595089 initial import
mandel
parents:
diff changeset
2452 s << endl;
105
3aa118a9ae71 each QObject now has associated child QObject for handling signals. fixes #15
eldar
parents: 104
diff changeset
2453
1
e78566595089 initial import
mandel
parents:
diff changeset
2454 s << INDENT << "public class " << d_class->name() << "_ConcreteWrapper : " << d_class->name() << " {" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2455
e78566595089 initial import
mandel
parents:
diff changeset
2456 {
e78566595089 initial import
mandel
parents:
diff changeset
2457 Indentation indent(INDENT);
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2458 QString hasShellFlag = d_class->generateShellClass() ? " | QtdObjectFlags.hasShell" : "";
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2459 s << INDENT << "public this(void* native_id, QtdObjectFlags flags = QtdObjectFlags.nativeOwnership) {" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2460 << INDENT << " super(native_id, flags);" << endl << endl;
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2461
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2462 /******************!!!DUPLICATE!!!*********************/
1
e78566595089 initial import
mandel
parents:
diff changeset
2463 d_funcs = d_class->functionsInTargetLang();
e78566595089 initial import
mandel
parents:
diff changeset
2464 for (int i=0; i<d_funcs.size(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
2465 AbstractMetaFunction *d_function = d_funcs.at(i);
e78566595089 initial import
mandel
parents:
diff changeset
2466 uint included_attributes = 0;
e78566595089 initial import
mandel
parents:
diff changeset
2467 uint excluded_attributes = 0;
e78566595089 initial import
mandel
parents:
diff changeset
2468 setupForFunction(d_function, &included_attributes, &excluded_attributes);
e78566595089 initial import
mandel
parents:
diff changeset
2469 uint attr = d_function->attributes() & (~excluded_attributes) | included_attributes;
e78566595089 initial import
mandel
parents:
diff changeset
2470 // qtd bool isStatic = (attr & AbstractMetaAttributes::Static);
e78566595089 initial import
mandel
parents:
diff changeset
2471
e78566595089 initial import
mandel
parents:
diff changeset
2472 if(d_function->storeResult()) {
e78566595089 initial import
mandel
parents:
diff changeset
2473 QString type_name = d_function->type()->name();
e78566595089 initial import
mandel
parents:
diff changeset
2474 const ComplexTypeEntry *ctype = static_cast<const ComplexTypeEntry *>(d_function->type()->typeEntry());
e78566595089 initial import
mandel
parents:
diff changeset
2475 if(ctype->isAbstract())
e78566595089 initial import
mandel
parents:
diff changeset
2476 type_name = type_name + "_ConcreteWrapper";
e78566595089 initial import
mandel
parents:
diff changeset
2477 s << INDENT << " __m_" << d_function->name() << " = new "
e78566595089 initial import
mandel
parents:
diff changeset
2478 << type_name << "(cast(void*)null);" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2479 if (d_function->type()->isQObject())
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2480 s << INDENT << " __m_" << d_function->name() << ".__setFlags(QtdObjectFlags.nativeOwnership, true);" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
2481 }
e78566595089 initial import
mandel
parents:
diff changeset
2482 }
e78566595089 initial import
mandel
parents:
diff changeset
2483
e78566595089 initial import
mandel
parents:
diff changeset
2484 s << INDENT << "}" << endl << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2485
e78566595089 initial import
mandel
parents:
diff changeset
2486 for (int i=0; i<d_funcs.size(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
2487 AbstractMetaFunction *d_function = d_funcs.at(i);
e78566595089 initial import
mandel
parents:
diff changeset
2488 uint included_attributes = 0;
e78566595089 initial import
mandel
parents:
diff changeset
2489 uint excluded_attributes = 0;
e78566595089 initial import
mandel
parents:
diff changeset
2490 setupForFunction(d_function, &included_attributes, &excluded_attributes);
e78566595089 initial import
mandel
parents:
diff changeset
2491 uint attr = d_function->attributes() & (~excluded_attributes) | included_attributes;
e78566595089 initial import
mandel
parents:
diff changeset
2492 // qtd bool isStatic = (attr & AbstractMetaAttributes::Static);
e78566595089 initial import
mandel
parents:
diff changeset
2493
e78566595089 initial import
mandel
parents:
diff changeset
2494 if(d_function->storeResult()) {
e78566595089 initial import
mandel
parents:
diff changeset
2495 QString type_name = d_function->type()->name();
e78566595089 initial import
mandel
parents:
diff changeset
2496 const ComplexTypeEntry *ctype = static_cast<const ComplexTypeEntry *>(d_function->type()->typeEntry());
e78566595089 initial import
mandel
parents:
diff changeset
2497 if(ctype->isAbstract())
e78566595089 initial import
mandel
parents:
diff changeset
2498 type_name = type_name + "_ConcreteWrapper";
e78566595089 initial import
mandel
parents:
diff changeset
2499
e78566595089 initial import
mandel
parents:
diff changeset
2500 s << INDENT << d_function->type()->name() << " __m_" << d_function->name() << ";" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2501 }
e78566595089 initial import
mandel
parents:
diff changeset
2502 }
e78566595089 initial import
mandel
parents:
diff changeset
2503 /***************************************************************/
e78566595089 initial import
mandel
parents:
diff changeset
2504
e78566595089 initial import
mandel
parents:
diff changeset
2505
e78566595089 initial import
mandel
parents:
diff changeset
2506
e78566595089 initial import
mandel
parents:
diff changeset
2507
e78566595089 initial import
mandel
parents:
diff changeset
2508
e78566595089 initial import
mandel
parents:
diff changeset
2509
e78566595089 initial import
mandel
parents:
diff changeset
2510 uint exclude_attributes = AbstractMetaAttributes::Native | AbstractMetaAttributes::Abstract;
e78566595089 initial import
mandel
parents:
diff changeset
2511 uint include_attributes = 0;
e78566595089 initial import
mandel
parents:
diff changeset
2512 AbstractMetaFunctionList functions = d_class->queryFunctions(AbstractMetaClass::NormalFunctions | AbstractMetaClass::AbstractFunctions | AbstractMetaClass::NonEmptyFunctions | AbstractMetaClass::NotRemovedFromTargetLang);
e78566595089 initial import
mandel
parents:
diff changeset
2513 foreach (const AbstractMetaFunction *d_function, functions) {
e78566595089 initial import
mandel
parents:
diff changeset
2514 retrieveModifications(d_function, d_class, &exclude_attributes, &include_attributes);
e78566595089 initial import
mandel
parents:
diff changeset
2515 if (notWrappedYet(d_function))
e78566595089 initial import
mandel
parents:
diff changeset
2516 continue;
e78566595089 initial import
mandel
parents:
diff changeset
2517 /* qtd s << endl
e78566595089 initial import
mandel
parents:
diff changeset
2518 << INDENT << "@Override" << endl; */
e78566595089 initial import
mandel
parents:
diff changeset
2519 writeFunctionAttributes(s, d_function, include_attributes, exclude_attributes,
e78566595089 initial import
mandel
parents:
diff changeset
2520 d_function->isNormal() || d_function->isSignal() ? 0 : SkipReturnType);
e78566595089 initial import
mandel
parents:
diff changeset
2521
e78566595089 initial import
mandel
parents:
diff changeset
2522 s << d_function->name() << "(";
e78566595089 initial import
mandel
parents:
diff changeset
2523 writeFunctionArguments(s, d_function, d_function->arguments().count());
e78566595089 initial import
mandel
parents:
diff changeset
2524 s << ") {" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2525 {
e78566595089 initial import
mandel
parents:
diff changeset
2526 Indentation indent(INDENT);
e78566595089 initial import
mandel
parents:
diff changeset
2527 writeJavaCallThroughContents(s, d_function, SuperCall);
e78566595089 initial import
mandel
parents:
diff changeset
2528 }
e78566595089 initial import
mandel
parents:
diff changeset
2529 s << INDENT << "}" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2530 }
e78566595089 initial import
mandel
parents:
diff changeset
2531 }
e78566595089 initial import
mandel
parents:
diff changeset
2532 s << INDENT << "}" << endl << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2533 }
e78566595089 initial import
mandel
parents:
diff changeset
2534
e78566595089 initial import
mandel
parents:
diff changeset
2535 if (d_class->generateShellClass()) { // qtd2
e78566595089 initial import
mandel
parents:
diff changeset
2536 if (d_class->hasVirtualFunctions()
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2537 && (d_class->typeEntry()->isObject() && !d_class->typeEntry()->isQObject()) )
1
e78566595089 initial import
mandel
parents:
diff changeset
2538 s << endl << "extern (C) void *__" << d_class->name() << "_entity(void *q_ptr);" << endl << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2539 }
105
3aa118a9ae71 each QObject now has associated child QObject for handling signals. fixes #15
eldar
parents: 104
diff changeset
2540
293
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2541 if (d_class->typeEntry()->isValue() && d_class->hasCloneOperator())
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2542 {
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2543 AbstractMetaFunction *copyCtor = d_class->copyConstructor();
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2544 if(copyCtor)
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2545 s << "private extern(C) void* qtd_" << d_class->name() << "_placed_copy(const void* orig, void* place);" << endl << endl;
8627891e4556 QList updates
eldar
parents: 292
diff changeset
2546 }
110
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
2547
152
4d1c5d1d1bbf fix some inconsistencies with conversion functions
eldar
parents: 130
diff changeset
2548 // if (d_class->needsConversionFunc)
110
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
2549 writeConversionFunction(s, d_class);
1
e78566595089 initial import
mandel
parents:
diff changeset
2550
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2551 if (d_class->hasConstructors() && !d_class->isQObject())
294
bb37b0ed94c9 some more QList
eldar
parents: 293
diff changeset
2552 s << "extern (C) void qtd_" << d_class->name() << "_destructor(void *ptr);" << endl
bb37b0ed94c9 some more QList
eldar
parents: 293
diff changeset
2553 << "extern (C) void qtd_" << d_class->name() << "_call_destructor(void *ptr);" << endl << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
2554
e78566595089 initial import
mandel
parents:
diff changeset
2555 // qtd
270
49bfc86ff583 true emit of Qt signals.
eldar
parents: 253
diff changeset
2556
49bfc86ff583 true emit of Qt signals.
eldar
parents: 253
diff changeset
2557 s << endl << "// C wrappers for signal emitters" << endl;
49bfc86ff583 true emit of Qt signals.
eldar
parents: 253
diff changeset
2558
49bfc86ff583 true emit of Qt signals.
eldar
parents: 253
diff changeset
2559 if (d_class->isQObject())
49bfc86ff583 true emit of Qt signals.
eldar
parents: 253
diff changeset
2560 {
49bfc86ff583 true emit of Qt signals.
eldar
parents: 253
diff changeset
2561 AbstractMetaFunctionList signal_funcs = signalFunctions(d_class, false);
49bfc86ff583 true emit of Qt signals.
eldar
parents: 253
diff changeset
2562
49bfc86ff583 true emit of Qt signals.
eldar
parents: 253
diff changeset
2563 foreach (AbstractMetaFunction *signal, signal_funcs)
49bfc86ff583 true emit of Qt signals.
eldar
parents: 253
diff changeset
2564 if(!signal->isPrivate())
49bfc86ff583 true emit of Qt signals.
eldar
parents: 253
diff changeset
2565 writePrivateNativeFunction(s, signal);
49bfc86ff583 true emit of Qt signals.
eldar
parents: 253
diff changeset
2566 }
49bfc86ff583 true emit of Qt signals.
eldar
parents: 253
diff changeset
2567
1
e78566595089 initial import
mandel
parents:
diff changeset
2568 s << endl << "// C wrappers" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2569 d_funcs = d_class->functionsInTargetLang();
e78566595089 initial import
mandel
parents:
diff changeset
2570 if (!d_class->isInterface())
e78566595089 initial import
mandel
parents:
diff changeset
2571 for (int i=0; i<d_funcs.size(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
2572 AbstractMetaFunction *function = d_funcs.at(i);
e78566595089 initial import
mandel
parents:
diff changeset
2573
e78566595089 initial import
mandel
parents:
diff changeset
2574 if (!notWrappedYet(function)) // qtd2
e78566595089 initial import
mandel
parents:
diff changeset
2575 if (function->jumpTableId() == -1)
e78566595089 initial import
mandel
parents:
diff changeset
2576 writePrivateNativeFunction(s, function);
e78566595089 initial import
mandel
parents:
diff changeset
2577 }
e78566595089 initial import
mandel
parents:
diff changeset
2578
e78566595089 initial import
mandel
parents:
diff changeset
2579
e78566595089 initial import
mandel
parents:
diff changeset
2580 s << "// Just the private functions for abstract functions implemeneted in superclasses" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2581 // Just the private functions for abstract functions implemeneted in superclasses
e78566595089 initial import
mandel
parents:
diff changeset
2582 if (!d_class->isInterface() && d_class->isAbstract()) {
e78566595089 initial import
mandel
parents:
diff changeset
2583 d_funcs = d_class->queryFunctions(AbstractMetaClass::NormalFunctions | AbstractMetaClass::AbstractFunctions | AbstractMetaClass::NotRemovedFromTargetLang);
e78566595089 initial import
mandel
parents:
diff changeset
2584 foreach (AbstractMetaFunction *d_function, d_funcs) {
e78566595089 initial import
mandel
parents:
diff changeset
2585 if (d_function->implementingClass() != d_class) {
e78566595089 initial import
mandel
parents:
diff changeset
2586 s << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2587 writePrivateNativeFunction(s, d_function);
e78566595089 initial import
mandel
parents:
diff changeset
2588 }
e78566595089 initial import
mandel
parents:
diff changeset
2589 }
e78566595089 initial import
mandel
parents:
diff changeset
2590 }
e78566595089 initial import
mandel
parents:
diff changeset
2591
e78566595089 initial import
mandel
parents:
diff changeset
2592
e78566595089 initial import
mandel
parents:
diff changeset
2593 foreach (const AbstractMetaField *field, fields) {
e78566595089 initial import
mandel
parents:
diff changeset
2594 if (field->wasPublic() || (field->wasProtected() && !d_class->isFinal()))
e78566595089 initial import
mandel
parents:
diff changeset
2595 writeNativeField(s, field);
e78566595089 initial import
mandel
parents:
diff changeset
2596 }
e78566595089 initial import
mandel
parents:
diff changeset
2597 s << endl << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2598
e78566595089 initial import
mandel
parents:
diff changeset
2599 // qtd
e78566595089 initial import
mandel
parents:
diff changeset
2600 s << endl << "// Virtual Dispatch functions" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2601 AbstractMetaFunctionList virtualFunctions = d_class->virtualFunctions();
e78566595089 initial import
mandel
parents:
diff changeset
2602 for (int pos = 0; pos<virtualFunctions.size(); ++pos) {
e78566595089 initial import
mandel
parents:
diff changeset
2603 const AbstractMetaFunction *function = virtualFunctions.at(pos);
e78566595089 initial import
mandel
parents:
diff changeset
2604 if (!notWrappedYet(function)) // qtd2
e78566595089 initial import
mandel
parents:
diff changeset
2605 writeShellVirtualFunction(s, function, d_class, pos);
e78566595089 initial import
mandel
parents:
diff changeset
2606 }
e78566595089 initial import
mandel
parents:
diff changeset
2607
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2608 // write static constructor
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2609 if (staticInit) {
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2610 QString initArgs;
279
519befd5a5d1 Fix for windows build, thanks Rainer.
eldar
parents: 270
diff changeset
2611 if (cpp_shared && d_class->generateShellClass())
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2612 {
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2613 initArgs = "void* virtuals";
1
e78566595089 initial import
mandel
parents:
diff changeset
2614 if (d_class->isQObject())
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2615 initArgs += ", void* signals";
1
e78566595089 initial import
mandel
parents:
diff changeset
2616
e78566595089 initial import
mandel
parents:
diff changeset
2617 s << "private extern (C) void qtd_" << d_class->name()
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2618 << QString("_initCallBacks(%1);").arg(initArgs) << endl << endl;
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2619 }
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2620
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2621 s << "extern(C) void static_init_" << d_class->name() << "() {" << endl;
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2622
292
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2623 if (d_class->typeEntry()->isValue())
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2624 s << INDENT << d_class->name() << ".QTypeInfo.init();" << endl;
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2625
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2626 if (d_class->isQObject()) {
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2627 s << INDENT << "if (!" << d_class->name() << "._staticMetaObject) " << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2628 << INDENT << " " << d_class->name() << ".createStaticMetaObject;" << endl << endl;
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2629 }
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2630
279
519befd5a5d1 Fix for windows build, thanks Rainer.
eldar
parents: 270
diff changeset
2631 if (cpp_shared && d_class->generateShellClass()) {
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2632 // virtual functions
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2633 s << INDENT << "void*[" << virtualFunctions.size() << "] virt_arr;" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
2634 for (int pos = 0; pos<virtualFunctions.size(); ++pos) {
e78566595089 initial import
mandel
parents:
diff changeset
2635 const AbstractMetaFunction *function = virtualFunctions.at(pos);
e78566595089 initial import
mandel
parents:
diff changeset
2636 if (!notWrappedYet(function)) // qtd2
e78566595089 initial import
mandel
parents:
diff changeset
2637 s << INDENT << "virt_arr[" << pos << "] = &" << function->marshalledName() << "_dispatch;" <<endl;
e78566595089 initial import
mandel
parents:
diff changeset
2638 }
e78566595089 initial import
mandel
parents:
diff changeset
2639 if (virtualFunctions.size() == 0)
e78566595089 initial import
mandel
parents:
diff changeset
2640 initArgs = "null";
e78566595089 initial import
mandel
parents:
diff changeset
2641 else
e78566595089 initial import
mandel
parents:
diff changeset
2642 initArgs = "virt_arr.ptr";
e78566595089 initial import
mandel
parents:
diff changeset
2643
e78566595089 initial import
mandel
parents:
diff changeset
2644 if (d_class->isQObject()) {
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2645
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2646 // signals
1
e78566595089 initial import
mandel
parents:
diff changeset
2647 AbstractMetaFunctionList signal_funcs = signalFunctions(d_class);
e78566595089 initial import
mandel
parents:
diff changeset
2648 s << endl << INDENT << "void*[" << signal_funcs.size() << "] sign_arr;" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2649 for(int i = 0; i < signal_funcs.size(); i++) {
e78566595089 initial import
mandel
parents:
diff changeset
2650 AbstractMetaFunction *signal = signal_funcs.at(i);
218
438877e90dbe D2 windows fixes
eldar
parents: 188
diff changeset
2651 s << INDENT << "sign_arr[" << i << "] = &" << signalExternName(d_class, signal) << "_handle;" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
2652 }
e78566595089 initial import
mandel
parents:
diff changeset
2653 if(signal_funcs.size() == 0)
e78566595089 initial import
mandel
parents:
diff changeset
2654 initArgs += ", null";
e78566595089 initial import
mandel
parents:
diff changeset
2655 else
e78566595089 initial import
mandel
parents:
diff changeset
2656 initArgs += ", sign_arr.ptr";
e78566595089 initial import
mandel
parents:
diff changeset
2657 }
e78566595089 initial import
mandel
parents:
diff changeset
2658
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2659 s << INDENT << "qtd_" << d_class->name() << QString("_initCallBacks(%1);").arg(initArgs) << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
2660 }
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2661
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2662 s << "}" << endl << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
2663 }
e78566595089 initial import
mandel
parents:
diff changeset
2664
e78566595089 initial import
mandel
parents:
diff changeset
2665 writeSignalHandlers(s, d_class);
e78566595089 initial import
mandel
parents:
diff changeset
2666 s << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2667
e78566595089 initial import
mandel
parents:
diff changeset
2668 if (m_docs_enabled) {
e78566595089 initial import
mandel
parents:
diff changeset
2669 delete m_doc_parser;
e78566595089 initial import
mandel
parents:
diff changeset
2670 m_doc_parser = 0;
e78566595089 initial import
mandel
parents:
diff changeset
2671 }
e78566595089 initial import
mandel
parents:
diff changeset
2672
e78566595089 initial import
mandel
parents:
diff changeset
2673 // qtd multiple classes
e78566595089 initial import
mandel
parents:
diff changeset
2674 foreach (AbstractMetaClass *cls, includedClassesList) {
e78566595089 initial import
mandel
parents:
diff changeset
2675 m_isRecursive = true;
e78566595089 initial import
mandel
parents:
diff changeset
2676 write(s, cls);
e78566595089 initial import
mandel
parents:
diff changeset
2677 m_isRecursive = false;
e78566595089 initial import
mandel
parents:
diff changeset
2678 }
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2679
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2680
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2681 if (d_class->isQObject())
288
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2682 writeQObjectFreeFunctions(s, d_class);
292
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2683
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2684 if (d_class->typeEntry()->isValue())
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2685 writeValueFreeFunctions(s, d_class);
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2686 }
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2687
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2688 void DGenerator::writeValueFunctions(QTextStream &s, const AbstractMetaClass *d_class)
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2689 {
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2690 s << INDENT << "struct QTypeInfo {" << endl;
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2691 s << INDENT << " static __gshared bool isComplex;" << endl;
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2692 s << INDENT << " static __gshared bool isStatic;" << endl;
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2693 s << INDENT << " static __gshared bool isLarge;" << endl;
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2694 s << INDENT << " static __gshared bool isPointer;" << endl;
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2695 s << INDENT << " static __gshared bool isDummy;" << endl << endl;
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2696
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2697 s << INDENT << " static init() {" << endl;
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2698
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2699 s << QString(" isComplex = qtd_%1_QTypeInfo_isComplex();\n"
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2700 " isStatic = qtd_%1_QTypeInfo_isStatic();\n"
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2701 " isLarge = qtd_%1_QTypeInfo_isLarge();\n"
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2702 " isPointer = qtd_%1_QTypeInfo_isPointer();\n"
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2703 " isDummy = qtd_%1_QTypeInfo_isDummy();\n").arg(d_class->name())
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2704 << " }" << endl
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2705 << " }" << endl << endl;
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2706 }
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2707
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2708 void DGenerator::writeValueFreeFunctions(QTextStream &s, const AbstractMetaClass *d_class)
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2709 {
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2710 s << QString("private extern (C) bool qtd_%1_QTypeInfo_isComplex();\n").arg(d_class->name());
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2711 s << QString("private extern (C) bool qtd_%1_QTypeInfo_isStatic();\n").arg(d_class->name());
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2712 s << QString("private extern (C) bool qtd_%1_QTypeInfo_isLarge();\n").arg(d_class->name());
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2713 s << QString("private extern (C) bool qtd_%1_QTypeInfo_isPointer();\n").arg(d_class->name());
19498f420252 more QList goodness
eldar
parents: 288
diff changeset
2714 s << QString("private extern (C) bool qtd_%1_QTypeInfo_isDummy();\n").arg(d_class->name());
1
e78566595089 initial import
mandel
parents:
diff changeset
2715 }
e78566595089 initial import
mandel
parents:
diff changeset
2716
110
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
2717 void DGenerator::writeConversionFunction(QTextStream &s, const AbstractMetaClass *d_class)
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
2718 {
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
2719 const ComplexTypeEntry *ctype = d_class->typeEntry();
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2720 if(ctype->isQObject() || !ctype->isObject())
152
4d1c5d1d1bbf fix some inconsistencies with conversion functions
eldar
parents: 130
diff changeset
2721 return;
110
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
2722 QString class_name = ctype->name();
111
2a85b786fa3a same thing for Objects
eldar
parents: 110
diff changeset
2723 QString return_type_name = class_name;
2a85b786fa3a same thing for Objects
eldar
parents: 110
diff changeset
2724 if(ctype->designatedInterface())
2a85b786fa3a same thing for Objects
eldar
parents: 110
diff changeset
2725 return_type_name = ctype->designatedInterface()->name();
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2726
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2727 s << return_type_name << " qtd_" << class_name << "_from_ptr(void* ret) {" << endl;
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2728
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2729
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2730 QString type_name = class_name;
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2731 if(ctype->isAbstract())
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2732 type_name = ctype->targetLangName() + "_ConcreteWrapper";
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2733
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2734 // if class has virtual functions then it has classname_entity function so
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2735 // we can look for D Object pointer. otherwise create new wrapper
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2736 if (d_class->hasVirtualFunctions()) {
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2737 s << INDENT << "void* d_obj = __" << ctype->targetLangName() << "_entity(ret);" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2738 << INDENT << "if (d_obj !is null) {" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2739 << INDENT << " auto d_obj_ref = cast (Object) d_obj;" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2740 << INDENT << " return cast(" << return_type_name << ") d_obj_ref;" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2741 << INDENT << "} else {" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2742 << INDENT << " auto return_value = new " << type_name << "(ret, QtdObjectFlags.nativeOwnership);" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2743 << INDENT << " return return_value;" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2744 << INDENT << "}" << endl;
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2745 } else {
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2746 s << INDENT << "auto return_value = new " << type_name << "(ret, QtdObjectFlags.nativeOwnership);" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2747 << INDENT << "return return_value;" << endl;
111
2a85b786fa3a same thing for Objects
eldar
parents: 110
diff changeset
2748 }
2a85b786fa3a same thing for Objects
eldar
parents: 110
diff changeset
2749 s << "}" << endl << endl;
110
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
2750 }
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
2751
288
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2752 void DGenerator::writeQObjectFreeFunctions(QTextStream &s, const AbstractMetaClass *d_class)
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2753 {
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2754 s << "private extern(C) QMetaObjectNative* qtd_" << d_class->name() << "_staticMetaObject();" << endl << endl
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2755 << "private extern(C) void qtd_" << d_class->name() << "_createEntity(void* nativeId, void* dId);" << endl << endl;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2756
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2757 if (!d_class->isFinal())
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2758 s << "private extern(C) int qtd_" << d_class->name() << "_qt_metacall(void* __this_nativeId, QMetaObject.Call _c, int _id, void **_a);"
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2759 << "private extern(C) int qtd_" << d_class->name() << "_qt_metacall_dispatch(void *d_entity, QMetaObject.Call _c, int _id, void **_a) {"
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2760 << " auto d_object = cast(" << d_class->name() << ") d_entity;"
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2761 << " return d_object.qt_metacall(_c, _id, _a);"
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2762 << "}" << endl << endl;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2763 }
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2764
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2765 void writeMetaMethodSignatures(QTextStream &s, const QString &var_name, AbstractMetaFunctionList meta_funcs)
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2766 {
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2767 s << INDENT << "private static const string[] " << var_name << " = [";
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2768 {
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2769 Indentation indent(INDENT);
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2770 for (int i = 0; i < meta_funcs.size(); ++i)
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2771 {
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2772 if (i)
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2773 s << ", ";
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2774 int j = 0;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2775 bool hasDefault = false;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2776 do // need this to look for default arguments and generate extra signatures
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2777 {
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2778 if (i || j)
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2779 s << ", ";
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2780 s << endl << INDENT << " \"" << meta_funcs.at(i)->minimalSignature(j) << "\"";
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2781 AbstractMetaArgumentList args = meta_funcs.at(i)->arguments();
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2782 if(args.size() && j<args.size())
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2783 hasDefault = !args.at(args.size() - 1 - j)->defaultValueExpression().isEmpty();
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2784 else
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2785 hasDefault = false;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2786 j++;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2787 } while (hasDefault);
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2788 }
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2789 }
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2790 s << INDENT << "];" << endl << endl;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2791 }
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2792
105
3aa118a9ae71 each QObject now has associated child QObject for handling signals. fixes #15
eldar
parents: 104
diff changeset
2793 void DGenerator::writeQObjectFunctions(QTextStream &s, const AbstractMetaClass *d_class)
3aa118a9ae71 each QObject now has associated child QObject for handling signals. fixes #15
eldar
parents: 104
diff changeset
2794 {
288
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2795 AbstractMetaFunctionList d_funcs_gen = generatedClassFunctions(d_class);
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2796 AbstractMetaFunctionList slot_funcs;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2797 for (int i=0; i<d_funcs_gen.size(); ++i) {
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2798 AbstractMetaFunction *function = d_funcs_gen.at(i);
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2799 if(function->isSlot())
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2800 slot_funcs += function;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2801 }
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2802 writeMetaMethodSignatures(s, "__slotSignatures", slot_funcs);
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2803
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2804 QString concreteArg;
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2805 if (d_class->isAbstract())
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2806 concreteArg += ", " + d_class->name() + "_ConcreteWrapper";
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2807
288
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2808 if (!d_class->isFinal())
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2809 s << " int qt_metacall(QMetaObject.Call _c, int _id, void **_a) {" << endl
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2810 << " return qtd_" << d_class->name() << "_qt_metacall(__nativeId, _c, _id, _a);" << endl
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2811 << " }" << endl << endl;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2812
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2813 s << " private static QMetaObject _staticMetaObject;" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2814 << " protected static void createStaticMetaObject() {" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2815 << " assert(!_staticMetaObject);" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2816 << " QMetaObject base;" << endl;
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2817
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2818 if (d_class->name() != "QObject")
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2819 {
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2820 QString baseName = d_class->baseClassName();
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2821 s << " if (!" << baseName << "._staticMetaObject)" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2822 << " " << baseName << ".createStaticMetaObject;" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2823 << " base = " << baseName << "._staticMetaObject;" << endl;
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2824 }
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2825
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2826 s << " _staticMetaObject = new QMetaObject(qtd_" << d_class->name() << "_staticMetaObject, base);" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2827 << " _staticMetaObject.construct!(" << d_class->name() << concreteArg << ");" << endl
288
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2828 << " _populateMetaInfo();" << endl
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2829 << " }" << endl << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2830
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2831 << " QMetaObject metaObject() {" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2832 << " return _staticMetaObject;" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2833 << " }" << endl << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2834
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2835 << " static QMetaObject staticMetaObject() {" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2836 << " return _staticMetaObject;" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2837 << " }" << endl << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2838
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2839 << " static " << d_class->name() << " __getObject(void* nativeId) {" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2840 << " return static_cast!(" << d_class->name() << ")(_staticMetaObject.getObject(nativeId));" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2841 << " }" << endl << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2842
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2843 << " static void __createEntity(void* nativeId, void* dId) {" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2844 << " return qtd_" << d_class->name() << "_createEntity(nativeId, dId);" << endl
288
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2845 << " }" << endl << endl
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2846
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2847 << " private static void _populateMetaInfo() {" << endl
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2848 << " int index;" << endl << endl;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2849
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2850 AbstractMetaFunctionList signal_funcs = signalFunctions(d_class, false);
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2851
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2852 int staticId = 0;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2853 for (int i = 0; i < signal_funcs.size(); ++i)
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2854 {
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2855 int j = 0;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2856 bool hasDefault = false;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2857 do // need this to look for default arguments and generate extra signatures
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2858 {
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2859 AbstractMetaFunction *fn = signal_funcs.at(i);
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2860 s << " index = _staticMetaObject.indexOfMethod_Cpp(__signalSignatures[" << staticId << "]);" << endl
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2861 << " _staticMetaObject.addMethod(new QMetaSignal(signature!(\"" << fn->name() << "\"";
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2862 if(fn->arguments().size()-j > 0)
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2863 s << ", ";
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2864 writeMetaMethodArguments(s, fn, j);
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2865 s << "), index));" << endl << endl;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2866 AbstractMetaArgumentList args = fn->arguments();
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2867 if(args.size() && j<args.size())
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2868 hasDefault = !args.at(args.size() - 1 - j)->defaultValueExpression().isEmpty();
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2869 else
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2870 hasDefault = false;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2871 j++;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2872 staticId++;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2873 } while (hasDefault);
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2874 }
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2875
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2876 staticId = 0;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2877 for (int i = 0; i < slot_funcs.size(); ++i)
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2878 {
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2879 int j = 0;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2880 bool hasDefault = false;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2881 do // need this to look for default arguments and generate extra signatures
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2882 {
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2883 AbstractMetaFunction *fn = slot_funcs.at(i);
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2884 s << " index = _staticMetaObject.indexOfMethod_Cpp(__slotSignatures[" << staticId << "]);" << endl
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2885 << " _staticMetaObject.addMethod(new QMetaSlot(signature!(\"" << fn->name() << "\"";
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2886 if(fn->arguments().size()-j > 0)
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2887 s << ", ";
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2888 writeMetaMethodArguments(s, fn, j);
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2889 s << "), index));" << endl << endl;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2890 AbstractMetaArgumentList args = fn->arguments();
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2891 if(args.size() && j<args.size())
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2892 hasDefault = !args.at(args.size() - 1 - j)->defaultValueExpression().isEmpty();
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2893 else
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2894 hasDefault = false;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2895 j++;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2896 staticId++;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2897 } while (hasDefault);
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2898 }
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2899
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2900 s << " }" << endl << endl;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2901
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2902 s << INDENT << "mixin Q_OBJECT_BIND;" << endl << endl;
105
3aa118a9ae71 each QObject now has associated child QObject for handling signals. fixes #15
eldar
parents: 104
diff changeset
2903 }
3aa118a9ae71 each QObject now has associated child QObject for handling signals. fixes #15
eldar
parents: 104
diff changeset
2904
1
e78566595089 initial import
mandel
parents:
diff changeset
2905 /*
e78566595089 initial import
mandel
parents:
diff changeset
2906 void DGenerator::writeMarshallFunction(QTextStream &s, const AbstractMetaClass *d_class)
e78566595089 initial import
mandel
parents:
diff changeset
2907 {
e78566595089 initial import
mandel
parents:
diff changeset
2908
e78566595089 initial import
mandel
parents:
diff changeset
2909 }
e78566595089 initial import
mandel
parents:
diff changeset
2910 */
e78566595089 initial import
mandel
parents:
diff changeset
2911 void DGenerator::marshallFromCppToD(QTextStream &s, const ComplexTypeEntry* ctype)
e78566595089 initial import
mandel
parents:
diff changeset
2912 {
e78566595089 initial import
mandel
parents:
diff changeset
2913 if(ctype->isQObject()) {
e78566595089 initial import
mandel
parents:
diff changeset
2914 QString type_name = ctype->name();
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2915 if (ctype->isAbstract())
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2916 type_name += "_ConcreteWrapper";
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2917 s << "return " << type_name << ".__getObject(ret);" << endl;
152
4d1c5d1d1bbf fix some inconsistencies with conversion functions
eldar
parents: 130
diff changeset
2918 } else if (ctype->isValue() && !ctype->isStructInD()) {
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2919 s << INDENT << "return new " << ctype->name() << "(ret);" << endl;
152
4d1c5d1d1bbf fix some inconsistencies with conversion functions
eldar
parents: 130
diff changeset
2920 } else if (ctype->isVariant()) {
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2921 s << INDENT << "return new QVariant(ret);" << endl;
152
4d1c5d1d1bbf fix some inconsistencies with conversion functions
eldar
parents: 130
diff changeset
2922 } else if (ctype->name() == "QModelIndex" || ctype->isStructInD()) {
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2923 s << INDENT << "return ret;" << endl;
152
4d1c5d1d1bbf fix some inconsistencies with conversion functions
eldar
parents: 130
diff changeset
2924 } else if (ctype->isObject()) {
1
e78566595089 initial import
mandel
parents:
diff changeset
2925 QString type_name = ctype->name();
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2926 s << "return qtd_" << type_name << "_from_ptr(ret);" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
2927 }
e78566595089 initial import
mandel
parents:
diff changeset
2928 }
e78566595089 initial import
mandel
parents:
diff changeset
2929
e78566595089 initial import
mandel
parents:
diff changeset
2930 void DGenerator::writeNativeField(QTextStream &s, const AbstractMetaField *field)
e78566595089 initial import
mandel
parents:
diff changeset
2931 {
e78566595089 initial import
mandel
parents:
diff changeset
2932 Q_ASSERT(field->isPublic() || field->isProtected());
e78566595089 initial import
mandel
parents:
diff changeset
2933
e78566595089 initial import
mandel
parents:
diff changeset
2934 const AbstractMetaClass *declaringClass = field->enclosingClass();
e78566595089 initial import
mandel
parents:
diff changeset
2935
e78566595089 initial import
mandel
parents:
diff changeset
2936 FieldModification mod = declaringClass->typeEntry()->fieldModification(field->name());
e78566595089 initial import
mandel
parents:
diff changeset
2937
e78566595089 initial import
mandel
parents:
diff changeset
2938 // Set function
e78566595089 initial import
mandel
parents:
diff changeset
2939 if (mod.isWritable() && !field->type()->isConstant()) {
e78566595089 initial import
mandel
parents:
diff changeset
2940 const AbstractMetaFunction *setter = field->setter();
e78566595089 initial import
mandel
parents:
diff changeset
2941 if (declaringClass->hasFunction(setter)) {
e78566595089 initial import
mandel
parents:
diff changeset
2942 QString warning =
e78566595089 initial import
mandel
parents:
diff changeset
2943 QString("class '%1' already has setter '%2' for public field '%3'")
e78566595089 initial import
mandel
parents:
diff changeset
2944 .arg(declaringClass->name()).arg(setter->name()).arg(field->name());
e78566595089 initial import
mandel
parents:
diff changeset
2945 ReportHandler::warning(warning);
e78566595089 initial import
mandel
parents:
diff changeset
2946 } else {
e78566595089 initial import
mandel
parents:
diff changeset
2947 if (!notWrappedYet(setter))
e78566595089 initial import
mandel
parents:
diff changeset
2948 writePrivateNativeFunction(s, setter);
e78566595089 initial import
mandel
parents:
diff changeset
2949 }
e78566595089 initial import
mandel
parents:
diff changeset
2950 }
e78566595089 initial import
mandel
parents:
diff changeset
2951
e78566595089 initial import
mandel
parents:
diff changeset
2952 // Get function
e78566595089 initial import
mandel
parents:
diff changeset
2953 const AbstractMetaFunction *getter = field->getter();
e78566595089 initial import
mandel
parents:
diff changeset
2954 if (mod.isReadable()) {
e78566595089 initial import
mandel
parents:
diff changeset
2955 if (declaringClass->hasFunction(getter)) {
e78566595089 initial import
mandel
parents:
diff changeset
2956 QString warning =
e78566595089 initial import
mandel
parents:
diff changeset
2957 QString("class '%1' already has getter '%2' for public field '%3'")
e78566595089 initial import
mandel
parents:
diff changeset
2958 .arg(declaringClass->name()).arg(getter->name()).arg(field->name());
e78566595089 initial import
mandel
parents:
diff changeset
2959 ReportHandler::warning(warning);
e78566595089 initial import
mandel
parents:
diff changeset
2960 } else {
e78566595089 initial import
mandel
parents:
diff changeset
2961 if (!notWrappedYet(getter))
e78566595089 initial import
mandel
parents:
diff changeset
2962 writePrivateNativeFunction(s, getter);
e78566595089 initial import
mandel
parents:
diff changeset
2963 }
e78566595089 initial import
mandel
parents:
diff changeset
2964 }
e78566595089 initial import
mandel
parents:
diff changeset
2965 }
e78566595089 initial import
mandel
parents:
diff changeset
2966
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2967 void DGenerator::writeSignalSignatures(QTextStream &s, const AbstractMetaClass *d_class, AbstractMetaFunctionList signal_funcs)
1
e78566595089 initial import
mandel
parents:
diff changeset
2968 {
288
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2969 writeMetaMethodSignatures(s, "__signalSignatures", signal_funcs);
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2970
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2971 s << INDENT << "int signalSignature(int signalId, ref stringz signature) {" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
2972 {
e78566595089 initial import
mandel
parents:
diff changeset
2973 Indentation indent(INDENT);
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2974
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2975 if (d_class->name() != "QObject")
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2976 {
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2977 s << INDENT << "signalId = super.signalSignature(signalId, signature);" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2978 << INDENT << "if (signature)" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2979 << INDENT << " return signalId;" << endl;
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2980 }
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2981
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2982 s << INDENT << "if (signalId < __signalSignatures.length)" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2983 << INDENT << " signature = __signalSignatures[signalId].ptr;" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2984 << INDENT << "else" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2985 << INDENT << " signalId -= __signalSignatures.length;" << endl
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
2986 << INDENT << "return signalId;" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
2987 }
e78566595089 initial import
mandel
parents:
diff changeset
2988 s << INDENT << "}" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
2989 }
e78566595089 initial import
mandel
parents:
diff changeset
2990
288
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2991 void DGenerator::writeMetaMethodArguments(QTextStream &s, const AbstractMetaFunction *d_function, int reduce)
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2992 {
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2993 bool withDefArgs = false;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2994 if(reduce == -1) {
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2995 reduce = 0;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2996 withDefArgs = true;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2997 }
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2998
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
2999 AbstractMetaArgumentList arguments = d_function->arguments();
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
3000 int sz = arguments.count() - reduce;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
3001
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
3002 for (int i=0; i<sz; ++i) {
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
3003 if(i != 0)
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
3004 s << ",";
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
3005
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
3006 QString modifiedType = d_function->typeReplaced(i+1);
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
3007
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
3008 if (modifiedType.isEmpty())
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
3009 s << translateType(arguments.at(i)->type(), d_function->implementingClass(), BoxedPrimitive);
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
3010 else
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
3011 s << modifiedType;
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
3012
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
3013 if (!arguments.at(i)->defaultValueExpression().isEmpty() && withDefArgs) // qtd
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
3014 s << " = " + arguments.at(i)->defaultValueExpression();
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
3015 }
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
3016 }
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
3017
1
e78566595089 initial import
mandel
parents:
diff changeset
3018 void DGenerator::writeSignal(QTextStream &s, const AbstractMetaFunction *d_function)
e78566595089 initial import
mandel
parents:
diff changeset
3019 {
e78566595089 initial import
mandel
parents:
diff changeset
3020 Q_ASSERT(d_function->isSignal());
e78566595089 initial import
mandel
parents:
diff changeset
3021
288
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
3022 s << INDENT << "mixin BindQtSignal!(\"" << d_function->name() << "(";
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
3023
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
3024 writeMetaMethodArguments(s, d_function);
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
3025
f9559a957be9 new signals and slots implementation
eldar
parents: 284
diff changeset
3026 s << ")\");" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
3027 }
e78566595089 initial import
mandel
parents:
diff changeset
3028
e78566595089 initial import
mandel
parents:
diff changeset
3029 void DGenerator::writeShellVirtualFunction(QTextStream &s, const AbstractMetaFunction *d_function,
e78566595089 initial import
mandel
parents:
diff changeset
3030 const AbstractMetaClass *implementor, int id)
e78566595089 initial import
mandel
parents:
diff changeset
3031 {
e78566595089 initial import
mandel
parents:
diff changeset
3032 Q_UNUSED(id);
e78566595089 initial import
mandel
parents:
diff changeset
3033 Q_UNUSED(implementor);
e78566595089 initial import
mandel
parents:
diff changeset
3034
e78566595089 initial import
mandel
parents:
diff changeset
3035 s << "private extern(C) ";
e78566595089 initial import
mandel
parents:
diff changeset
3036 CppImplGenerator::writeVirtualDispatchFunction(s, d_function, true);
e78566595089 initial import
mandel
parents:
diff changeset
3037 s << "{" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3038
e78566595089 initial import
mandel
parents:
diff changeset
3039 const AbstractMetaClass *own_class = d_function->ownerClass();
e78566595089 initial import
mandel
parents:
diff changeset
3040
e78566595089 initial import
mandel
parents:
diff changeset
3041 s << INDENT << "auto d_object = cast(" << own_class->name() << ") d_entity;" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3042
e78566595089 initial import
mandel
parents:
diff changeset
3043 // the function arguments
e78566595089 initial import
mandel
parents:
diff changeset
3044 AbstractMetaArgumentList arguments = d_function->arguments();
e78566595089 initial import
mandel
parents:
diff changeset
3045 foreach (const AbstractMetaArgument *argument, arguments)
e78566595089 initial import
mandel
parents:
diff changeset
3046 if (!d_function->argumentRemoved(argument->argumentIndex() + 1)) {
e78566595089 initial import
mandel
parents:
diff changeset
3047 QString arg_name = argument->indexedName();
e78566595089 initial import
mandel
parents:
diff changeset
3048 AbstractMetaType *type = argument->type();
e78566595089 initial import
mandel
parents:
diff changeset
3049 // if has QString argument we have to pass char* and str.length to QString constructor
e78566595089 initial import
mandel
parents:
diff changeset
3050 {
e78566595089 initial import
mandel
parents:
diff changeset
3051 if(type->isEnum())
e78566595089 initial import
mandel
parents:
diff changeset
3052 s << INDENT << "auto " << arg_name << "_enum = cast("
e78566595089 initial import
mandel
parents:
diff changeset
3053 << type->typeEntry()->qualifiedTargetLangName() << ") " << arg_name << ";";
33
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
3054 else if (type->typeEntry()->qualifiedCppName() == "QChar")
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
3055 s << INDENT << "auto " << arg_name << "_d_ref = cast(wchar" << QString(type->actualIndirections(), '*')
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
3056 << ") " << arg_name << ";";
1
e78566595089 initial import
mandel
parents:
diff changeset
3057 else if (type->isTargetLangString())
188
7dd099050621 initial commit for D2 support
eldar
parents: 187
diff changeset
3058 s << INDENT << "string " << arg_name << "_d_ref = toUTF8("
1
e78566595089 initial import
mandel
parents:
diff changeset
3059 << arg_name << "[0.." << arg_name << "_size]);";
e78566595089 initial import
mandel
parents:
diff changeset
3060 else if (type->typeEntry()->isValue() && type->isNativePointer() && type->typeEntry()->name() == "QString") {
33
cf8a415f3f32 gui package is fully wrapped now. lots of fixes in the generator
eldar
parents: 14
diff changeset
3061 s << INDENT << "auto " << arg_name << "_d_qstr = QString(" << arg_name << ", true);" << endl
1
e78566595089 initial import
mandel
parents:
diff changeset
3062 << INDENT << "string " << arg_name << "_d_ref = " << arg_name << "_d_qstr.toNativeString();";
e78566595089 initial import
mandel
parents:
diff changeset
3063 } else if(type->isVariant())
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
3064 s << INDENT << "scope " << arg_name << "_d_ref = new QVariant(" << arg_name << ", QtdObjectFlags.nativeOwnership);";
1
e78566595089 initial import
mandel
parents:
diff changeset
3065 else if (type->typeEntry()->isStructInD())
e78566595089 initial import
mandel
parents:
diff changeset
3066 continue;
e78566595089 initial import
mandel
parents:
diff changeset
3067 else if (!type->hasNativeId() && !(type->typeEntry()->isValue() && type->isNativePointer()))
e78566595089 initial import
mandel
parents:
diff changeset
3068 continue;
e78566595089 initial import
mandel
parents:
diff changeset
3069 else if(type->isObject()
e78566595089 initial import
mandel
parents:
diff changeset
3070 || (type->typeEntry()->isValue() && type->isNativePointer())
e78566595089 initial import
mandel
parents:
diff changeset
3071 || type->isValue() || type->isVariant()) {
e78566595089 initial import
mandel
parents:
diff changeset
3072 QString type_name = type->typeEntry()->name();
e78566595089 initial import
mandel
parents:
diff changeset
3073 const ComplexTypeEntry *ctype = static_cast<const ComplexTypeEntry *>(type->typeEntry());
e78566595089 initial import
mandel
parents:
diff changeset
3074 if(ctype->isAbstract())
e78566595089 initial import
mandel
parents:
diff changeset
3075 type_name = type_name + "_ConcreteWrapper";
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
3076 s << INDENT << "scope " << arg_name << "_d_ref = new " << type_name << "(" << arg_name << ", QtdObjectFlags.nativeOwnership);";
1
e78566595089 initial import
mandel
parents:
diff changeset
3077 }
e78566595089 initial import
mandel
parents:
diff changeset
3078 else if (type->isQObject()) {
e78566595089 initial import
mandel
parents:
diff changeset
3079 QString type_name = type->name();
e78566595089 initial import
mandel
parents:
diff changeset
3080 const ComplexTypeEntry *ctype = static_cast<const ComplexTypeEntry *>(type->typeEntry());
e78566595089 initial import
mandel
parents:
diff changeset
3081 if(ctype->isAbstract())
e78566595089 initial import
mandel
parents:
diff changeset
3082 type_name = type_name + "_ConcreteWrapper";
184
7d9db724ee1d QObject is now non GC'ed, to better integrate to Qt memory management
eldar
parents: 183
diff changeset
3083
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
3084 s << INDENT << "scope " << arg_name << "_d_ref = new " << type_name << "(" << arg_name << ", QtdObjectFlags.nativeOwnership);" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
3085 }
e78566595089 initial import
mandel
parents:
diff changeset
3086 s << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3087 }
e78566595089 initial import
mandel
parents:
diff changeset
3088 }
e78566595089 initial import
mandel
parents:
diff changeset
3089
e78566595089 initial import
mandel
parents:
diff changeset
3090 s << INDENT;
e78566595089 initial import
mandel
parents:
diff changeset
3091 AbstractMetaType *return_type = d_function->type();
e78566595089 initial import
mandel
parents:
diff changeset
3092 QString new_return_type = QString(d_function->typeReplaced(0)).replace('$', '.');
e78566595089 initial import
mandel
parents:
diff changeset
3093 bool has_return_type = new_return_type != "void"
e78566595089 initial import
mandel
parents:
diff changeset
3094 && (!new_return_type.isEmpty() || return_type != 0);
e78566595089 initial import
mandel
parents:
diff changeset
3095 if(has_return_type) {
e78566595089 initial import
mandel
parents:
diff changeset
3096 AbstractMetaType *f_type = d_function->type();
e78566595089 initial import
mandel
parents:
diff changeset
3097 if(f_type && (f_type->isObject() || f_type->isQObject() || f_type->isVariant() ||
e78566595089 initial import
mandel
parents:
diff changeset
3098 (f_type->isValue() && !f_type->typeEntry()->isStructInD())))
e78566595089 initial import
mandel
parents:
diff changeset
3099 {
e78566595089 initial import
mandel
parents:
diff changeset
3100 QString f_type_name = f_type->name();
e78566595089 initial import
mandel
parents:
diff changeset
3101 if(f_type->typeEntry()->designatedInterface())
e78566595089 initial import
mandel
parents:
diff changeset
3102 f_type_name = f_type->typeEntry()->designatedInterface()->name();
e78566595089 initial import
mandel
parents:
diff changeset
3103 s << f_type_name << " ret_value = ";
e78566595089 initial import
mandel
parents:
diff changeset
3104 }
e78566595089 initial import
mandel
parents:
diff changeset
3105 else if (f_type && f_type->isTargetLangString())
e78566595089 initial import
mandel
parents:
diff changeset
3106 s << "string _d_str = ";
81
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
3107 else if (f_type && (f_type->name() == "QModelIndex" || f_type->typeEntry()->isStructInD()))
1
e78566595089 initial import
mandel
parents:
diff changeset
3108 s << "*__d_return_value = ";
e78566595089 initial import
mandel
parents:
diff changeset
3109 else
e78566595089 initial import
mandel
parents:
diff changeset
3110 s << "auto return_value = ";
e78566595089 initial import
mandel
parents:
diff changeset
3111 }
e78566595089 initial import
mandel
parents:
diff changeset
3112 s << "d_object." << d_function->name() << "(";
e78566595089 initial import
mandel
parents:
diff changeset
3113
e78566595089 initial import
mandel
parents:
diff changeset
3114 uint nativeArgCount = 0;
e78566595089 initial import
mandel
parents:
diff changeset
3115 foreach (const AbstractMetaArgument *argument, arguments)
e78566595089 initial import
mandel
parents:
diff changeset
3116 if (!d_function->argumentRemoved(argument->argumentIndex() + 1)) {
e78566595089 initial import
mandel
parents:
diff changeset
3117 QString arg_name = argument->indexedName();
e78566595089 initial import
mandel
parents:
diff changeset
3118 const AbstractMetaType *type = argument->type();
e78566595089 initial import
mandel
parents:
diff changeset
3119
e78566595089 initial import
mandel
parents:
diff changeset
3120 if (nativeArgCount > 0)
e78566595089 initial import
mandel
parents:
diff changeset
3121 s << "," << " ";
e78566595089 initial import
mandel
parents:
diff changeset
3122
e78566595089 initial import
mandel
parents:
diff changeset
3123 QString modified_type = d_function->typeReplaced(argument->argumentIndex() + 1);
e78566595089 initial import
mandel
parents:
diff changeset
3124 if (!modified_type.isEmpty())
e78566595089 initial import
mandel
parents:
diff changeset
3125 modified_type = modified_type.replace('$', '.');
e78566595089 initial import
mandel
parents:
diff changeset
3126
e78566595089 initial import
mandel
parents:
diff changeset
3127 if (modified_type == "string" /* && type->fullName() == "char" */)
e78566595089 initial import
mandel
parents:
diff changeset
3128 s << "fromStringz(" << arg_name << ")";
e78566595089 initial import
mandel
parents:
diff changeset
3129 else {
e78566595089 initial import
mandel
parents:
diff changeset
3130 if(type->isContainer()
e78566595089 initial import
mandel
parents:
diff changeset
3131 || (type->isReference() && type->typeEntry()->isStructInD()))
e78566595089 initial import
mandel
parents:
diff changeset
3132 s << "*";
e78566595089 initial import
mandel
parents:
diff changeset
3133 s << arg_name;
e78566595089 initial import
mandel
parents:
diff changeset
3134 }
e78566595089 initial import
mandel
parents:
diff changeset
3135 if (type->typeEntry()->isStructInD()) ;
e78566595089 initial import
mandel
parents:
diff changeset
3136 else if (type->isQObject() || type->isObject()
e78566595089 initial import
mandel
parents:
diff changeset
3137 || (type->typeEntry()->isValue() && type->isNativePointer())
e78566595089 initial import
mandel
parents:
diff changeset
3138 || type->isValue()
e78566595089 initial import
mandel
parents:
diff changeset
3139 || type->isTargetLangString() || type->isVariant())
e78566595089 initial import
mandel
parents:
diff changeset
3140 s << "_d_ref";
e78566595089 initial import
mandel
parents:
diff changeset
3141 else if(type->isEnum())
e78566595089 initial import
mandel
parents:
diff changeset
3142 s << "_enum";
e78566595089 initial import
mandel
parents:
diff changeset
3143
e78566595089 initial import
mandel
parents:
diff changeset
3144 nativeArgCount++;
e78566595089 initial import
mandel
parents:
diff changeset
3145 }
e78566595089 initial import
mandel
parents:
diff changeset
3146 s << ");" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3147
e78566595089 initial import
mandel
parents:
diff changeset
3148 // check for arguments that may return value
e78566595089 initial import
mandel
parents:
diff changeset
3149 foreach (const AbstractMetaArgument *argument, arguments)
e78566595089 initial import
mandel
parents:
diff changeset
3150 if (!d_function->argumentRemoved(argument->argumentIndex() + 1)) {
e78566595089 initial import
mandel
parents:
diff changeset
3151 QString arg_name = argument->indexedName();
e78566595089 initial import
mandel
parents:
diff changeset
3152 AbstractMetaType *type = argument->type();
e78566595089 initial import
mandel
parents:
diff changeset
3153
e78566595089 initial import
mandel
parents:
diff changeset
3154 if (type->typeEntry()->isValue() && type->isNativePointer() && type->typeEntry()->name() == "QString")
e78566595089 initial import
mandel
parents:
diff changeset
3155 s << INDENT << arg_name << "_d_qstr.assign(" << arg_name << "_d_ref);" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3156 }
e78566595089 initial import
mandel
parents:
diff changeset
3157
e78566595089 initial import
mandel
parents:
diff changeset
3158 if(has_return_type) {
e78566595089 initial import
mandel
parents:
diff changeset
3159 AbstractMetaType *f_type = d_function->type();
e78566595089 initial import
mandel
parents:
diff changeset
3160 if(f_type) {
e78566595089 initial import
mandel
parents:
diff changeset
3161 if(f_type->isObject() || f_type->isQObject() || f_type->isVariant() ||
e78566595089 initial import
mandel
parents:
diff changeset
3162 (f_type->isValue() && !f_type->typeEntry()->isStructInD())) {
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
3163 QString native_id = "__nativeId";
1
e78566595089 initial import
mandel
parents:
diff changeset
3164 if (f_type->typeEntry()->designatedInterface())
e78566595089 initial import
mandel
parents:
diff changeset
3165 native_id = "__ptr_" + f_type->typeEntry()->designatedInterface()->name();
e78566595089 initial import
mandel
parents:
diff changeset
3166 s << INDENT << "return ret_value is null? null : ret_value." << native_id << ";" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3167 } else if (f_type->isTargetLangString())
104
64b874c86f9b fixed bug with QSpinBox
eldar
parents: 81
diff changeset
3168 s << INDENT << "*ret_str = _d_str;" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
3169 else if (f_type->isContainer())
e78566595089 initial import
mandel
parents:
diff changeset
3170 s << INDENT << "*__d_arr_ptr = return_value.ptr;" << endl
e78566595089 initial import
mandel
parents:
diff changeset
3171 << INDENT << "*__d_arr_size = return_value.length;" << endl;
81
1750a803af74 return values as pointers
eldar
parents: 56
diff changeset
3172 else if (f_type->name() == "QModelIndex" || f_type->typeEntry()->isStructInD())
1
e78566595089 initial import
mandel
parents:
diff changeset
3173 ;
e78566595089 initial import
mandel
parents:
diff changeset
3174 else
e78566595089 initial import
mandel
parents:
diff changeset
3175 s << INDENT << "return return_value;" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3176 } else
e78566595089 initial import
mandel
parents:
diff changeset
3177 s << INDENT << "return return_value;" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3178
e78566595089 initial import
mandel
parents:
diff changeset
3179 }
e78566595089 initial import
mandel
parents:
diff changeset
3180
e78566595089 initial import
mandel
parents:
diff changeset
3181 s << "}" << endl << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3182 }
e78566595089 initial import
mandel
parents:
diff changeset
3183
e78566595089 initial import
mandel
parents:
diff changeset
3184 void DGenerator::generate()
e78566595089 initial import
mandel
parents:
diff changeset
3185 {
e78566595089 initial import
mandel
parents:
diff changeset
3186 // qtd
e78566595089 initial import
mandel
parents:
diff changeset
3187 // code for including classses in 1 module for avoiding circular imports
e78566595089 initial import
mandel
parents:
diff changeset
3188 foreach (AbstractMetaClass *cls, m_classes) {
e78566595089 initial import
mandel
parents:
diff changeset
3189 const ComplexTypeEntry *ctype = cls->typeEntry();
e78566595089 initial import
mandel
parents:
diff changeset
3190
e78566595089 initial import
mandel
parents:
diff changeset
3191 if (!cls->isInterface() && cls->isAbstract()) {
e78566595089 initial import
mandel
parents:
diff changeset
3192 ComplexTypeEntry *ctype_m = (ComplexTypeEntry *)ctype;
e78566595089 initial import
mandel
parents:
diff changeset
3193 ctype_m->setAbstract(true);
e78566595089 initial import
mandel
parents:
diff changeset
3194 }
e78566595089 initial import
mandel
parents:
diff changeset
3195
e78566595089 initial import
mandel
parents:
diff changeset
3196 foreach(QString child, ctype->includedClasses) {
e78566595089 initial import
mandel
parents:
diff changeset
3197 ComplexTypeEntry *ctype_child = TypeDatabase::instance()->findComplexType(child);
e78566595089 initial import
mandel
parents:
diff changeset
3198 ctype_child->addedTo = cls->name();
e78566595089 initial import
mandel
parents:
diff changeset
3199 }
e78566595089 initial import
mandel
parents:
diff changeset
3200
e78566595089 initial import
mandel
parents:
diff changeset
3201 foreach (AbstractMetaFunction *function, cls->functions())
e78566595089 initial import
mandel
parents:
diff changeset
3202 function->checkStoreResult();
152
4d1c5d1d1bbf fix some inconsistencies with conversion functions
eldar
parents: 130
diff changeset
3203 /* we don't need this anymore
110
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3204 // generate QObject conversion functions only those that are required
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3205 AbstractMetaFunctionList d_funcs = cls->functionsInTargetLang();
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3206 for (int i=0; i<d_funcs.size(); ++i) {
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3207 AbstractMetaType *f_type = d_funcs.at(i)->type();
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3208 if (!f_type)
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3209 continue;
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3210 if (f_type->isQObject() || f_type->isObject()) {
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3211 const ComplexTypeEntry* cte = static_cast<const ComplexTypeEntry *>(f_type->typeEntry());
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3212 AbstractMetaClass* d_class = ClassFromEntry::get(cte);
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3213 if (d_class)
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3214 d_class->needsConversionFunc = true;
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3215 }
152
4d1c5d1d1bbf fix some inconsistencies with conversion functions
eldar
parents: 130
diff changeset
3216 }*/
1
e78566595089 initial import
mandel
parents:
diff changeset
3217 }
e78566595089 initial import
mandel
parents:
diff changeset
3218
e78566595089 initial import
mandel
parents:
diff changeset
3219 Generator::generate();
e78566595089 initial import
mandel
parents:
diff changeset
3220
e78566595089 initial import
mandel
parents:
diff changeset
3221 {
e78566595089 initial import
mandel
parents:
diff changeset
3222 const AbstractMetaClass *last_class = 0;
e78566595089 initial import
mandel
parents:
diff changeset
3223 QFile file("mjb_nativepointer_api.log");
e78566595089 initial import
mandel
parents:
diff changeset
3224 if (file.open(QFile::WriteOnly)) {
e78566595089 initial import
mandel
parents:
diff changeset
3225 QTextStream s(&file);
e78566595089 initial import
mandel
parents:
diff changeset
3226
e78566595089 initial import
mandel
parents:
diff changeset
3227 AbstractMetaFunctionList nativepointer_functions;
e78566595089 initial import
mandel
parents:
diff changeset
3228 for (int i=0; i<m_nativepointer_functions.size(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
3229 AbstractMetaFunction *f = const_cast<AbstractMetaFunction *>(m_nativepointer_functions[i]);
e78566595089 initial import
mandel
parents:
diff changeset
3230 if (f->ownerClass() == f->declaringClass() || f->isFinal())
e78566595089 initial import
mandel
parents:
diff changeset
3231 nativepointer_functions.append(f);
e78566595089 initial import
mandel
parents:
diff changeset
3232 }
e78566595089 initial import
mandel
parents:
diff changeset
3233
e78566595089 initial import
mandel
parents:
diff changeset
3234 s << "Number of public or protected functions with QNativePointer API: " << nativepointer_functions.size() << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3235 foreach (const AbstractMetaFunction *f, nativepointer_functions) {
e78566595089 initial import
mandel
parents:
diff changeset
3236 if (last_class != f->ownerClass()) {
e78566595089 initial import
mandel
parents:
diff changeset
3237 last_class = f->ownerClass();
e78566595089 initial import
mandel
parents:
diff changeset
3238 s << endl << endl<< "Class " << last_class->name() << ":" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3239 s << "---------------------------------------------------------------------------------"
e78566595089 initial import
mandel
parents:
diff changeset
3240 << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3241 }
e78566595089 initial import
mandel
parents:
diff changeset
3242
e78566595089 initial import
mandel
parents:
diff changeset
3243 s << f->minimalSignature() << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3244 }
e78566595089 initial import
mandel
parents:
diff changeset
3245
e78566595089 initial import
mandel
parents:
diff changeset
3246 m_nativepointer_functions.clear(); }
e78566595089 initial import
mandel
parents:
diff changeset
3247 }
e78566595089 initial import
mandel
parents:
diff changeset
3248
e78566595089 initial import
mandel
parents:
diff changeset
3249 {
e78566595089 initial import
mandel
parents:
diff changeset
3250 const AbstractMetaClass *last_class = 0;
e78566595089 initial import
mandel
parents:
diff changeset
3251 QFile file("mjb_object_type_usage.log");
e78566595089 initial import
mandel
parents:
diff changeset
3252 if (file.open(QFile::WriteOnly)) {
e78566595089 initial import
mandel
parents:
diff changeset
3253 QTextStream s(&file);
e78566595089 initial import
mandel
parents:
diff changeset
3254
e78566595089 initial import
mandel
parents:
diff changeset
3255 AbstractMetaFunctionList resettable_object_functions;
e78566595089 initial import
mandel
parents:
diff changeset
3256 for (int i=0; i<m_resettable_object_functions.size(); ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
3257 AbstractMetaFunction *f = const_cast<AbstractMetaFunction *>(m_resettable_object_functions[i]);
e78566595089 initial import
mandel
parents:
diff changeset
3258 if (f->ownerClass() == f->declaringClass() || f->isFinal())
e78566595089 initial import
mandel
parents:
diff changeset
3259 resettable_object_functions.append(f);
e78566595089 initial import
mandel
parents:
diff changeset
3260 }
e78566595089 initial import
mandel
parents:
diff changeset
3261
e78566595089 initial import
mandel
parents:
diff changeset
3262 s << "Number of public or protected functions that return a non-QObject object type, or that are virtual and take a non-QObject object type argument: " << resettable_object_functions.size() << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3263 foreach (const AbstractMetaFunction *f, resettable_object_functions) {
e78566595089 initial import
mandel
parents:
diff changeset
3264 if (last_class != f->ownerClass()) {
e78566595089 initial import
mandel
parents:
diff changeset
3265 last_class = f->ownerClass();
e78566595089 initial import
mandel
parents:
diff changeset
3266 s << endl << endl<< "Class " << last_class->name() << ":" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3267 s << "---------------------------------------------------------------------------------"
e78566595089 initial import
mandel
parents:
diff changeset
3268 << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3269 }
e78566595089 initial import
mandel
parents:
diff changeset
3270
e78566595089 initial import
mandel
parents:
diff changeset
3271 s << f->minimalSignature() << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3272 }
e78566595089 initial import
mandel
parents:
diff changeset
3273
e78566595089 initial import
mandel
parents:
diff changeset
3274 m_resettable_object_functions.clear(); }
e78566595089 initial import
mandel
parents:
diff changeset
3275 }
e78566595089 initial import
mandel
parents:
diff changeset
3276
e78566595089 initial import
mandel
parents:
diff changeset
3277 {
e78566595089 initial import
mandel
parents:
diff changeset
3278 QFile file("mjb_reference_count_candidates.log");
e78566595089 initial import
mandel
parents:
diff changeset
3279 if (file.open(QFile::WriteOnly)) {
e78566595089 initial import
mandel
parents:
diff changeset
3280 QTextStream s(&file);
e78566595089 initial import
mandel
parents:
diff changeset
3281
e78566595089 initial import
mandel
parents:
diff changeset
3282 s << "The following functions have a signature pattern which may imply that" << endl
e78566595089 initial import
mandel
parents:
diff changeset
3283 << "they need to apply reference counting to their arguments ("
e78566595089 initial import
mandel
parents:
diff changeset
3284 << m_reference_count_candidate_functions.size() << " functions) : " << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3285
e78566595089 initial import
mandel
parents:
diff changeset
3286 foreach (const AbstractMetaFunction *f, m_reference_count_candidate_functions) {
e78566595089 initial import
mandel
parents:
diff changeset
3287 s << f->implementingClass()->fullName() << " : " << f->minimalSignature() << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3288 }
e78566595089 initial import
mandel
parents:
diff changeset
3289 }
e78566595089 initial import
mandel
parents:
diff changeset
3290 file.close();
e78566595089 initial import
mandel
parents:
diff changeset
3291 }
e78566595089 initial import
mandel
parents:
diff changeset
3292 }
e78566595089 initial import
mandel
parents:
diff changeset
3293
e78566595089 initial import
mandel
parents:
diff changeset
3294 void DGenerator::writeFunctionAttributes(QTextStream &s, const AbstractMetaFunction *d_function,
e78566595089 initial import
mandel
parents:
diff changeset
3295 uint included_attributes, uint excluded_attributes,
e78566595089 initial import
mandel
parents:
diff changeset
3296 uint options)
e78566595089 initial import
mandel
parents:
diff changeset
3297 {
e78566595089 initial import
mandel
parents:
diff changeset
3298 uint attr = d_function->attributes() & (~excluded_attributes) | included_attributes;
e78566595089 initial import
mandel
parents:
diff changeset
3299
e78566595089 initial import
mandel
parents:
diff changeset
3300 if ((attr & AbstractMetaAttributes::Public) || (attr & AbstractMetaAttributes::Protected)) {
e78566595089 initial import
mandel
parents:
diff changeset
3301
e78566595089 initial import
mandel
parents:
diff changeset
3302 // Does the function use native pointer API?
e78566595089 initial import
mandel
parents:
diff changeset
3303 bool nativePointer = d_function->type() && d_function->type()->isNativePointer()
e78566595089 initial import
mandel
parents:
diff changeset
3304 && d_function->typeReplaced(0).isEmpty();
e78566595089 initial import
mandel
parents:
diff changeset
3305
e78566595089 initial import
mandel
parents:
diff changeset
3306 // Does the function need to be considered for resetting the Java objects after use?
e78566595089 initial import
mandel
parents:
diff changeset
3307 bool resettableObject = false;
e78566595089 initial import
mandel
parents:
diff changeset
3308
e78566595089 initial import
mandel
parents:
diff changeset
3309 if (!nativePointer
e78566595089 initial import
mandel
parents:
diff changeset
3310 && d_function->type()
e78566595089 initial import
mandel
parents:
diff changeset
3311 && d_function->type()->hasInstantiations()
e78566595089 initial import
mandel
parents:
diff changeset
3312 && d_function->typeReplaced(0).isEmpty()) {
e78566595089 initial import
mandel
parents:
diff changeset
3313
e78566595089 initial import
mandel
parents:
diff changeset
3314 QList<AbstractMetaType *> instantiations = d_function->type()->instantiations();
e78566595089 initial import
mandel
parents:
diff changeset
3315
e78566595089 initial import
mandel
parents:
diff changeset
3316 foreach (const AbstractMetaType *type, instantiations) {
e78566595089 initial import
mandel
parents:
diff changeset
3317 if (type && type->isNativePointer()) {
e78566595089 initial import
mandel
parents:
diff changeset
3318 nativePointer = true;
e78566595089 initial import
mandel
parents:
diff changeset
3319 break;
e78566595089 initial import
mandel
parents:
diff changeset
3320 }
e78566595089 initial import
mandel
parents:
diff changeset
3321 }
e78566595089 initial import
mandel
parents:
diff changeset
3322
e78566595089 initial import
mandel
parents:
diff changeset
3323 }
e78566595089 initial import
mandel
parents:
diff changeset
3324
e78566595089 initial import
mandel
parents:
diff changeset
3325 AbstractMetaArgumentList arguments = d_function->arguments();
e78566595089 initial import
mandel
parents:
diff changeset
3326 if (!nativePointer || (!resettableObject && !d_function->isFinal())) {
e78566595089 initial import
mandel
parents:
diff changeset
3327 foreach (const AbstractMetaArgument *argument, arguments) {
e78566595089 initial import
mandel
parents:
diff changeset
3328 if (!d_function->argumentRemoved(argument->argumentIndex()+1)
e78566595089 initial import
mandel
parents:
diff changeset
3329 && d_function->typeReplaced(argument->argumentIndex()+1).isEmpty()) {
e78566595089 initial import
mandel
parents:
diff changeset
3330
e78566595089 initial import
mandel
parents:
diff changeset
3331 if (argument->type()->isNativePointer()) {
e78566595089 initial import
mandel
parents:
diff changeset
3332
e78566595089 initial import
mandel
parents:
diff changeset
3333 nativePointer = true;
e78566595089 initial import
mandel
parents:
diff changeset
3334 if (resettableObject) break ;
e78566595089 initial import
mandel
parents:
diff changeset
3335
e78566595089 initial import
mandel
parents:
diff changeset
3336 } else if (!d_function->isFinalInTargetLang()
e78566595089 initial import
mandel
parents:
diff changeset
3337 && argument->type()->isObject()
e78566595089 initial import
mandel
parents:
diff changeset
3338 && !argument->type()->isQObject()
e78566595089 initial import
mandel
parents:
diff changeset
3339 && !d_function->resetObjectAfterUse(argument->argumentIndex()+1)
e78566595089 initial import
mandel
parents:
diff changeset
3340 && d_function->ownership(d_function->declaringClass(), TypeSystem::ShellCode, argument->argumentIndex()+1) == TypeSystem::InvalidOwnership) {
e78566595089 initial import
mandel
parents:
diff changeset
3341
e78566595089 initial import
mandel
parents:
diff changeset
3342 resettableObject = true;
e78566595089 initial import
mandel
parents:
diff changeset
3343 if (nativePointer) break ;
e78566595089 initial import
mandel
parents:
diff changeset
3344
e78566595089 initial import
mandel
parents:
diff changeset
3345 } else if (argument->type()->hasInstantiations()) {
e78566595089 initial import
mandel
parents:
diff changeset
3346
e78566595089 initial import
mandel
parents:
diff changeset
3347 QList<AbstractMetaType *> instantiations = argument->type()->instantiations();
e78566595089 initial import
mandel
parents:
diff changeset
3348 foreach (AbstractMetaType *type, instantiations) {
e78566595089 initial import
mandel
parents:
diff changeset
3349 if (type && type->isNativePointer()) {
e78566595089 initial import
mandel
parents:
diff changeset
3350 nativePointer = true;
e78566595089 initial import
mandel
parents:
diff changeset
3351 if (resettableObject) break;
e78566595089 initial import
mandel
parents:
diff changeset
3352 } else if (!d_function->isFinal()
e78566595089 initial import
mandel
parents:
diff changeset
3353 && type
e78566595089 initial import
mandel
parents:
diff changeset
3354 && type->isObject()
e78566595089 initial import
mandel
parents:
diff changeset
3355 && !type->isQObject()
e78566595089 initial import
mandel
parents:
diff changeset
3356 && !d_function->resetObjectAfterUse(argument->argumentIndex()+1)) {
e78566595089 initial import
mandel
parents:
diff changeset
3357 resettableObject = true;
e78566595089 initial import
mandel
parents:
diff changeset
3358 if (nativePointer) break ;
e78566595089 initial import
mandel
parents:
diff changeset
3359 }
e78566595089 initial import
mandel
parents:
diff changeset
3360 }
e78566595089 initial import
mandel
parents:
diff changeset
3361
e78566595089 initial import
mandel
parents:
diff changeset
3362 if (nativePointer && resettableObject)
e78566595089 initial import
mandel
parents:
diff changeset
3363 break;
e78566595089 initial import
mandel
parents:
diff changeset
3364
e78566595089 initial import
mandel
parents:
diff changeset
3365 }
e78566595089 initial import
mandel
parents:
diff changeset
3366 }
e78566595089 initial import
mandel
parents:
diff changeset
3367 }
e78566595089 initial import
mandel
parents:
diff changeset
3368 }
e78566595089 initial import
mandel
parents:
diff changeset
3369
e78566595089 initial import
mandel
parents:
diff changeset
3370 if (nativePointer && !m_nativepointer_functions.contains(d_function))
e78566595089 initial import
mandel
parents:
diff changeset
3371 m_nativepointer_functions.append(d_function);
e78566595089 initial import
mandel
parents:
diff changeset
3372 if (resettableObject && !m_resettable_object_functions.contains(d_function))
e78566595089 initial import
mandel
parents:
diff changeset
3373 m_resettable_object_functions.append(d_function);
e78566595089 initial import
mandel
parents:
diff changeset
3374 }
e78566595089 initial import
mandel
parents:
diff changeset
3375
e78566595089 initial import
mandel
parents:
diff changeset
3376 if ((options & SkipAttributes) == 0) {
e78566595089 initial import
mandel
parents:
diff changeset
3377 if (d_function->isEmptyFunction()
e78566595089 initial import
mandel
parents:
diff changeset
3378 || d_function->isDeprecated()) s << INDENT << "deprecated ";
e78566595089 initial import
mandel
parents:
diff changeset
3379 /*
e78566595089 initial import
mandel
parents:
diff changeset
3380 bool needsSuppressUnusedWarning = TypeDatabase::instance()->includeEclipseWarnings()
e78566595089 initial import
mandel
parents:
diff changeset
3381 && d_function->isSignal()
e78566595089 initial import
mandel
parents:
diff changeset
3382 && (((excluded_attributes & AbstractMetaAttributes::Private) == 0)
e78566595089 initial import
mandel
parents:
diff changeset
3383 && (d_function->isPrivate()
e78566595089 initial import
mandel
parents:
diff changeset
3384 || ((included_attributes & AbstractMetaAttributes::Private) != 0)));
e78566595089 initial import
mandel
parents:
diff changeset
3385
e78566595089 initial import
mandel
parents:
diff changeset
3386 if (needsSuppressUnusedWarning && d_function->needsSuppressUncheckedWarning()) {
e78566595089 initial import
mandel
parents:
diff changeset
3387 s << INDENT<< "@SuppressWarnings({\"unchecked\", \"unused\"})" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3388 } else if (d_function->needsSuppressUncheckedWarning()) {
e78566595089 initial import
mandel
parents:
diff changeset
3389 s << INDENT<< "@SuppressWarnings(\"unchecked\")" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3390 } else if (needsSuppressUnusedWarning) {
e78566595089 initial import
mandel
parents:
diff changeset
3391 s << INDENT<< "@SuppressWarnings(\"unused\")" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3392 }
e78566595089 initial import
mandel
parents:
diff changeset
3393
e78566595089 initial import
mandel
parents:
diff changeset
3394 if (!(attr & NoBlockedSlot)
e78566595089 initial import
mandel
parents:
diff changeset
3395 && !d_function->isConstructor()
e78566595089 initial import
mandel
parents:
diff changeset
3396 && !d_function->isSlot()
e78566595089 initial import
mandel
parents:
diff changeset
3397 && !d_function->isSignal()
e78566595089 initial import
mandel
parents:
diff changeset
3398 && !d_function->isStatic()
e78566595089 initial import
mandel
parents:
diff changeset
3399 && !(included_attributes & AbstractMetaAttributes::Static))
e78566595089 initial import
mandel
parents:
diff changeset
3400 s << INDENT << "@QtBlockedSlot" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3401 */
e78566595089 initial import
mandel
parents:
diff changeset
3402 if (!(options & ExternC))
e78566595089 initial import
mandel
parents:
diff changeset
3403 s << INDENT;
e78566595089 initial import
mandel
parents:
diff changeset
3404
e78566595089 initial import
mandel
parents:
diff changeset
3405 if (attr & AbstractMetaAttributes::Public) s << "public ";
e78566595089 initial import
mandel
parents:
diff changeset
3406 else if (attr & AbstractMetaAttributes::Protected) s << "protected ";
e78566595089 initial import
mandel
parents:
diff changeset
3407 else if (attr & AbstractMetaAttributes::Private) s << "private ";
e78566595089 initial import
mandel
parents:
diff changeset
3408 else if (attr & AbstractMetaAttributes::Native) s << "private extern(C) ";
e78566595089 initial import
mandel
parents:
diff changeset
3409 bool isStatic = (attr & AbstractMetaAttributes::Static);
e78566595089 initial import
mandel
parents:
diff changeset
3410
e78566595089 initial import
mandel
parents:
diff changeset
3411 if (attr & AbstractMetaAttributes::Native) ;
e78566595089 initial import
mandel
parents:
diff changeset
3412 else if (!isStatic && (attr & AbstractMetaAttributes::FinalInTargetLang)) s << "final ";
e78566595089 initial import
mandel
parents:
diff changeset
3413 else if (!isStatic && (attr & AbstractMetaAttributes::Abstract)) s << "abstract ";
e78566595089 initial import
mandel
parents:
diff changeset
3414
e78566595089 initial import
mandel
parents:
diff changeset
3415 if (isStatic && !(options & ExternC)) s << "static ";
e78566595089 initial import
mandel
parents:
diff changeset
3416 }
e78566595089 initial import
mandel
parents:
diff changeset
3417
e78566595089 initial import
mandel
parents:
diff changeset
3418 if ((options & SkipReturnType) == 0) {
e78566595089 initial import
mandel
parents:
diff changeset
3419 QString modified_type = d_function->typeReplaced(0);
e78566595089 initial import
mandel
parents:
diff changeset
3420 if (options & ExternC) {
e78566595089 initial import
mandel
parents:
diff changeset
3421 uint options = 0x0004; // qtd externC
e78566595089 initial import
mandel
parents:
diff changeset
3422 s << CppImplGenerator::jniReturnName(d_function, options, true) << " ";
e78566595089 initial import
mandel
parents:
diff changeset
3423 }
e78566595089 initial import
mandel
parents:
diff changeset
3424 else if (modified_type.isEmpty())
e78566595089 initial import
mandel
parents:
diff changeset
3425 s << translateType(d_function->type(), d_function->implementingClass(), (Option) options);
e78566595089 initial import
mandel
parents:
diff changeset
3426 else
e78566595089 initial import
mandel
parents:
diff changeset
3427 s << modified_type.replace('$', '.');
e78566595089 initial import
mandel
parents:
diff changeset
3428 s << " ";
e78566595089 initial import
mandel
parents:
diff changeset
3429 }
e78566595089 initial import
mandel
parents:
diff changeset
3430
e78566595089 initial import
mandel
parents:
diff changeset
3431 }
e78566595089 initial import
mandel
parents:
diff changeset
3432
e78566595089 initial import
mandel
parents:
diff changeset
3433 void DGenerator::writeConstructorContents(QTextStream &s, const AbstractMetaFunction *d_function)
e78566595089 initial import
mandel
parents:
diff changeset
3434 {
e78566595089 initial import
mandel
parents:
diff changeset
3435 // Write constructor
e78566595089 initial import
mandel
parents:
diff changeset
3436 s << " {" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3437 {
e78566595089 initial import
mandel
parents:
diff changeset
3438 Indentation indent(INDENT);
e78566595089 initial import
mandel
parents:
diff changeset
3439 bool shellClass = d_function->ownerClass()->generateShellClass();
223
0c7abb1e6a9d windows fix, again
eldar
parents: 218
diff changeset
3440
1
e78566595089 initial import
mandel
parents:
diff changeset
3441 writeJavaCallThroughContents(s, d_function);
e78566595089 initial import
mandel
parents:
diff changeset
3442
e78566595089 initial import
mandel
parents:
diff changeset
3443 // Write out expense checks if present...
e78566595089 initial import
mandel
parents:
diff changeset
3444 const AbstractMetaClass *d_class = d_function->implementingClass();
e78566595089 initial import
mandel
parents:
diff changeset
3445 const ComplexTypeEntry *te = d_class->typeEntry();
e78566595089 initial import
mandel
parents:
diff changeset
3446 if (te->expensePolicy().isValid()) {
e78566595089 initial import
mandel
parents:
diff changeset
3447 s << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3448 const ExpensePolicy &ep = te->expensePolicy();
e78566595089 initial import
mandel
parents:
diff changeset
3449 s << INDENT << "qt.GeneratorUtilities.countExpense(" << d_class->fullName()
e78566595089 initial import
mandel
parents:
diff changeset
3450 << ".class, " << ep.cost << ", " << ep.limit << ");" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3451 }
e78566595089 initial import
mandel
parents:
diff changeset
3452
e78566595089 initial import
mandel
parents:
diff changeset
3453 foreach (CodeSnip snip, te->codeSnips()) {
e78566595089 initial import
mandel
parents:
diff changeset
3454 if (snip.language == TypeSystem::Constructors) {
e78566595089 initial import
mandel
parents:
diff changeset
3455 snip.formattedCode(s, INDENT);
e78566595089 initial import
mandel
parents:
diff changeset
3456 }
e78566595089 initial import
mandel
parents:
diff changeset
3457 }
e78566595089 initial import
mandel
parents:
diff changeset
3458
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
3459 s << INDENT << "this(ret);" << endl;
1
e78566595089 initial import
mandel
parents:
diff changeset
3460 }
e78566595089 initial import
mandel
parents:
diff changeset
3461 s << INDENT << "}" << endl << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3462
e78566595089 initial import
mandel
parents:
diff changeset
3463 /* qtd // Write native constructor
e78566595089 initial import
mandel
parents:
diff changeset
3464 if (d_function->jumpTableId() == -1)
e78566595089 initial import
mandel
parents:
diff changeset
3465 writePrivateNativeFunction(s, d_function);
e78566595089 initial import
mandel
parents:
diff changeset
3466 */
e78566595089 initial import
mandel
parents:
diff changeset
3467 }
e78566595089 initial import
mandel
parents:
diff changeset
3468
e78566595089 initial import
mandel
parents:
diff changeset
3469 void DGenerator::writeFunctionArguments(QTextStream &s, const AbstractMetaFunction *d_function,
e78566595089 initial import
mandel
parents:
diff changeset
3470 int argument_count, uint options)
e78566595089 initial import
mandel
parents:
diff changeset
3471 {
e78566595089 initial import
mandel
parents:
diff changeset
3472 AbstractMetaArgumentList arguments = d_function->arguments();
e78566595089 initial import
mandel
parents:
diff changeset
3473
e78566595089 initial import
mandel
parents:
diff changeset
3474 if (argument_count == -1)
e78566595089 initial import
mandel
parents:
diff changeset
3475 argument_count = arguments.size();
e78566595089 initial import
mandel
parents:
diff changeset
3476
e78566595089 initial import
mandel
parents:
diff changeset
3477 for (int i=0; i<argument_count; ++i) {
e78566595089 initial import
mandel
parents:
diff changeset
3478 if (!d_function->argumentRemoved(i+1)) {
e78566595089 initial import
mandel
parents:
diff changeset
3479 if (i != 0)
e78566595089 initial import
mandel
parents:
diff changeset
3480 s << ", ";
e78566595089 initial import
mandel
parents:
diff changeset
3481 writeArgument(s, d_function, arguments.at(i), options);
e78566595089 initial import
mandel
parents:
diff changeset
3482 }
e78566595089 initial import
mandel
parents:
diff changeset
3483 }
e78566595089 initial import
mandel
parents:
diff changeset
3484 }
e78566595089 initial import
mandel
parents:
diff changeset
3485
e78566595089 initial import
mandel
parents:
diff changeset
3486
e78566595089 initial import
mandel
parents:
diff changeset
3487 void DGenerator::writeExtraFunctions(QTextStream &s, const AbstractMetaClass *d_class)
e78566595089 initial import
mandel
parents:
diff changeset
3488 {
e78566595089 initial import
mandel
parents:
diff changeset
3489 const ComplexTypeEntry *class_type = d_class->typeEntry();
e78566595089 initial import
mandel
parents:
diff changeset
3490 Q_ASSERT(class_type);
e78566595089 initial import
mandel
parents:
diff changeset
3491
e78566595089 initial import
mandel
parents:
diff changeset
3492 CodeSnipList code_snips = class_type->codeSnips();
e78566595089 initial import
mandel
parents:
diff changeset
3493 foreach (const CodeSnip &snip, code_snips) {
e78566595089 initial import
mandel
parents:
diff changeset
3494 if ((!d_class->isInterface() && snip.language == TypeSystem::TargetLangCode)
e78566595089 initial import
mandel
parents:
diff changeset
3495 || (d_class->isInterface() && snip.language == TypeSystem::Interface)) {
e78566595089 initial import
mandel
parents:
diff changeset
3496 s << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3497 snip.formattedCode(s, INDENT);
e78566595089 initial import
mandel
parents:
diff changeset
3498 }
e78566595089 initial import
mandel
parents:
diff changeset
3499 }
e78566595089 initial import
mandel
parents:
diff changeset
3500 }
e78566595089 initial import
mandel
parents:
diff changeset
3501
e78566595089 initial import
mandel
parents:
diff changeset
3502
e78566595089 initial import
mandel
parents:
diff changeset
3503 void DGenerator::writeToStringFunction(QTextStream &s, const AbstractMetaClass *d_class)
e78566595089 initial import
mandel
parents:
diff changeset
3504 {
e78566595089 initial import
mandel
parents:
diff changeset
3505 bool generate = d_class->hasToStringCapability() && !d_class->hasDefaultToStringFunction();
e78566595089 initial import
mandel
parents:
diff changeset
3506 bool core = d_class->package() == QLatin1String("qt.core");
e78566595089 initial import
mandel
parents:
diff changeset
3507 bool qevent = false;
e78566595089 initial import
mandel
parents:
diff changeset
3508
e78566595089 initial import
mandel
parents:
diff changeset
3509 const AbstractMetaClass *cls = d_class;
e78566595089 initial import
mandel
parents:
diff changeset
3510 while (cls) {
e78566595089 initial import
mandel
parents:
diff changeset
3511 if (cls->name() == "QEvent") {
e78566595089 initial import
mandel
parents:
diff changeset
3512 qevent = true;
e78566595089 initial import
mandel
parents:
diff changeset
3513 break;
e78566595089 initial import
mandel
parents:
diff changeset
3514 }
e78566595089 initial import
mandel
parents:
diff changeset
3515 cls = cls->baseClass();
e78566595089 initial import
mandel
parents:
diff changeset
3516 }
e78566595089 initial import
mandel
parents:
diff changeset
3517
e78566595089 initial import
mandel
parents:
diff changeset
3518 if (generate || qevent) {
e78566595089 initial import
mandel
parents:
diff changeset
3519
e78566595089 initial import
mandel
parents:
diff changeset
3520 if (qevent && core) {
e78566595089 initial import
mandel
parents:
diff changeset
3521 s << endl
e78566595089 initial import
mandel
parents:
diff changeset
3522 << " @Override" << endl
e78566595089 initial import
mandel
parents:
diff changeset
3523 << " public String toString() {" << endl
e78566595089 initial import
mandel
parents:
diff changeset
3524 << " return getClass().getSimpleName() + \"(type=\" + type().name() + \")\";" << endl
e78566595089 initial import
mandel
parents:
diff changeset
3525 << " }" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3526 } else {
e78566595089 initial import
mandel
parents:
diff changeset
3527 s << endl
e78566595089 initial import
mandel
parents:
diff changeset
3528 << " @Override" << endl
e78566595089 initial import
mandel
parents:
diff changeset
3529 << " public String toString() {" << endl
253
073b9153ed8a Rev. 264 done right.
maxter
parents: 252
diff changeset
3530 << " if (__nativeId == 0)" << endl
1
e78566595089 initial import
mandel
parents:
diff changeset
3531 << " throw new QNoNativeResourcesException(\"Function call on incomplete object of type: \" +getClass().getName());" << endl
e78566595089 initial import
mandel
parents:
diff changeset
3532 << " return __qt_toString(nativeId());" << endl
e78566595089 initial import
mandel
parents:
diff changeset
3533 << " }" << endl
e78566595089 initial import
mandel
parents:
diff changeset
3534 << " native String __qt_toString(long __this_nativeId);" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3535 }
e78566595089 initial import
mandel
parents:
diff changeset
3536 }
e78566595089 initial import
mandel
parents:
diff changeset
3537 }
e78566595089 initial import
mandel
parents:
diff changeset
3538
e78566595089 initial import
mandel
parents:
diff changeset
3539 void DGenerator::writeCloneFunction(QTextStream &s, const AbstractMetaClass *d_class)
e78566595089 initial import
mandel
parents:
diff changeset
3540 {
e78566595089 initial import
mandel
parents:
diff changeset
3541 s << endl
e78566595089 initial import
mandel
parents:
diff changeset
3542 << " @Override" << endl
e78566595089 initial import
mandel
parents:
diff changeset
3543 << " public " << d_class->name() << " clone() {" << endl
e78566595089 initial import
mandel
parents:
diff changeset
3544 << " if (nativeId() == 0)" << endl
e78566595089 initial import
mandel
parents:
diff changeset
3545 << " throw new QNoNativeResourcesException(\"Function call on incomplete object of type: \" +getClass().getName());" << endl
e78566595089 initial import
mandel
parents:
diff changeset
3546 << " return __qt_clone(nativeId());" << endl
e78566595089 initial import
mandel
parents:
diff changeset
3547 << " }" << endl
e78566595089 initial import
mandel
parents:
diff changeset
3548 << " native " << d_class->name() << " __qt_clone(long __this_nativeId);" << endl;
e78566595089 initial import
mandel
parents:
diff changeset
3549 }
e78566595089 initial import
mandel
parents:
diff changeset
3550
e78566595089 initial import
mandel
parents:
diff changeset
3551 ClassFromEntry* ClassFromEntry::m_instance = NULL;
e78566595089 initial import
mandel
parents:
diff changeset
3552
e78566595089 initial import
mandel
parents:
diff changeset
3553 ClassFromEntry::ClassFromEntry()
e78566595089 initial import
mandel
parents:
diff changeset
3554 {
110
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3555 }
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3556
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3557 AbstractMetaClass* ClassFromEntry::get(const TypeEntry *ctype)
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3558 {
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3559 if(!m_instance)
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3560 return NULL;
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3561
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3562 return m_instance->classFromEntry[ctype];
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3563 }
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3564
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3565 void ClassFromEntry::construct(const AbstractMetaClassList &classes)
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3566 {
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3567 if(!m_instance) {
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3568 m_instance = new ClassFromEntry;
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3569 m_instance->setClasses(classes);
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3570 m_instance->buildHash();
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3571 }
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3572 }
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3573
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3574 void ClassFromEntry::buildHash()
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3575 {
1
e78566595089 initial import
mandel
parents:
diff changeset
3576 foreach (AbstractMetaClass *cls, m_classes) {
e78566595089 initial import
mandel
parents:
diff changeset
3577 const ComplexTypeEntry *ctype = cls->typeEntry();
e78566595089 initial import
mandel
parents:
diff changeset
3578 classFromEntry[ctype] = cls;
e78566595089 initial import
mandel
parents:
diff changeset
3579 }
e78566595089 initial import
mandel
parents:
diff changeset
3580 }
e78566595089 initial import
mandel
parents:
diff changeset
3581
110
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3582 void ClassFromEntry::print(QTextStream &s)
1
e78566595089 initial import
mandel
parents:
diff changeset
3583 {
110
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3584 s << "_fuck_" << m_instance->m_classes.size();
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3585 foreach (AbstractMetaClass *cls, m_instance->m_classes) {
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3586 s << cls->name() << endl;
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3587 }
1
e78566595089 initial import
mandel
parents:
diff changeset
3588 }
110
136c9ee83ee5 put conversion code in separate functions
eldar
parents: 105
diff changeset
3589