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