diff options
Diffstat (limited to 'main/dependencies/dbus-tqt/tools/dbusxml2qt3/methodgen.cpp')
| -rw-r--r-- | main/dependencies/dbus-tqt/tools/dbusxml2qt3/methodgen.cpp | 1773 |
1 files changed, 0 insertions, 1773 deletions
diff --git a/main/dependencies/dbus-tqt/tools/dbusxml2qt3/methodgen.cpp b/main/dependencies/dbus-tqt/tools/dbusxml2qt3/methodgen.cpp deleted file mode 100644 index 5741f4e54..000000000 --- a/main/dependencies/dbus-tqt/tools/dbusxml2qt3/methodgen.cpp +++ /dev/null @@ -1,1773 +0,0 @@ -/* -* Copyright (C) 2007 Kevin Krammer <kevin.krammer@gmx.at> -* -* Permission is hereby granted, free of charge, to any person obtaining a -* copy of this software and associated documentation files (the "Software"), -* to deal in the Software without restriction, including without limitation -* the rights to use, copy, modify, merge, publish, distribute, sublicense, -* and/or sell copies of the Software, and to permit persons to whom the -* Software is furnished to do so, subject to the following conditions: -* -* The above copyright notice and this permission notice shall be included -* in all copies or substantial portions of the Software. -* -* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS -* OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, -* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL -* THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR -* OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, -* ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR -* OTHER DEALINGS IN THE SOFTWARE. -*/ - -// TQt includes -#include <tqdom.h> -#include <tqtextstream.h> - -// local includes -#include "methodgen.h" - -static bool parseDBusSignature(const TQString& signature, Argument& argument) -{ - argument.dbusSignature = signature; - - if (signature.length() == 1) - { - if (signature == "b") - { - argument.signature = "bool"; - argument.accessor = "Bool"; - argument.isPrimitive = true; - } - else if (signature == "y") - { - argument.signature = "TQ_UINT8"; - argument.accessor = "Byte"; - argument.isPrimitive = true; - } - else if (signature == "n") - { - argument.signature = "TQ_INT16"; - argument.accessor = "Int16"; - argument.isPrimitive = true; - } - else if (signature == "q") - { - argument.signature = "TQ_UINT16"; - argument.accessor = "UInt16"; - argument.isPrimitive = true; - } - else if (signature == "i") - { - argument.signature = "TQ_INT32"; - argument.accessor = "Int32"; - argument.isPrimitive = true; - } - else if (signature == "u") - { - argument.signature = "TQ_UINT32"; - argument.accessor = "UInt32"; - argument.isPrimitive = true; - } - else if (signature == "x") - { - argument.signature = "TQ_INT64"; - argument.accessor = "Int64"; - argument.isPrimitive = true; - } - else if (signature == "t") - { - argument.signature = "TQ_UINT64"; - argument.accessor = "UInt64"; - argument.isPrimitive = true; - } - else if (signature == "d") - { - argument.signature = "double"; - argument.accessor = "Double"; - argument.isPrimitive = true; - } - else if (signature == "s") - { - argument.signature = "TQString"; - argument.accessor = "String"; - argument.isPrimitive = false; - - argument.forwardDeclarations.append("class TQString"); - argument.sourceIncludes["TQt"].append("<tqstring.h>"); - } - else if (signature == "o") - { - argument.signature = "TQT_DBusObjectPath"; - argument.accessor = "ObjectPath"; - argument.isPrimitive = false; - - argument.forwardDeclarations.append("class TQT_DBusObjectPath"); - argument.sourceIncludes["tqdbus"].append("<tqdbusobjectpath.h>"); - } - else if (signature == "v") - { - argument.signature = "TQT_DBusVariant"; - argument.accessor = "Variant"; - argument.isPrimitive = false; - - argument.forwardDeclarations.append("class TQT_DBusVariant"); - argument.sourceIncludes["tqdbus"].append("<tqdbusvariant.h>"); - } - else - return false; - } - else if (signature.startsWith("a")) - { - if (signature == "as") - { - argument.signature = "TQStringList"; - argument.accessor = "List"; - argument.subAccessor = "TQStringList"; - argument.isPrimitive = false; - - argument.forwardDeclarations.append("class TQStringList"); - - argument.sourceIncludes["tqdbus"].append("<tqdbusdatalist.h>"); - argument.sourceIncludes["TQt"].append("<tqstringlist.h>"); - } - else if (signature.startsWith("a{")) - { - int from = signature.tqfind("{"); - int to = signature.tqfindRev("}"); - if (from == -1 || to == -1 || (to - from - 1) < 2) return false; - - TQString dictSignature = signature.mid(from + 1, (to - from - 1)); - - Argument key; - if (!parseDBusSignature(dictSignature.left(1), key)) return false; - - Argument value; - if (parseDBusSignature(dictSignature.mid(1), value)) - { - if (!value.subAccessor.isEmpty()) - { - argument.isPrimitive = false; - argument.containerClass = "TQT_DBusDataMap<" + key.signature + ">"; - argument.signature = "TQT_DBusDataMap<" + key.signature + ">"; - argument.accessor = key.accessor + "KeyMap"; - - argument.forwardDeclarations.append("template <typename K> class TQT_DBusDataMap"); - argument.forwardDeclarations += key.forwardDeclarations; - - argument.sourceIncludes = key.sourceIncludes; - argument.sourceIncludes["tqdbus"].append("<tqdbusdata.h>"); - argument.sourceIncludes["tqdbus"].append("<tqdbusdatamap.h>"); - } - else - { - argument.isPrimitive = false; - argument.containerClass = "TQT_DBusDataMap<" + key.signature + ">"; - argument.signature = "TQMap<" + key.signature + - ", " + value.signature + ">"; - argument.accessor = key.accessor + "KeyMap"; - argument.subAccessor = value.accessor + "Map"; - - argument.forwardDeclarations.append("template <typename K, typename V> class TQMap"); - argument.forwardDeclarations += key.forwardDeclarations; - argument.forwardDeclarations += value.forwardDeclarations; - - argument.sourceIncludes = key.sourceIncludes; - argument.sourceIncludes["TQt"].append("<tqmap.h>"); - argument.sourceIncludes["tqdbus"].append("<tqdbusdata.h>"); - argument.sourceIncludes["tqdbus"].append("<tqdbusdatamap.h>"); - - TQMap<TQString, TQStringList>::const_iterator it = - value.sourceIncludes.begin(); - TQMap<TQString, TQStringList>::const_iterator endIt = - value.sourceIncludes.end(); - for (; it != endIt; ++it) - { - argument.sourceIncludes[it.key()] += it.data(); - } - } - } - else - { - argument.isPrimitive = false; - argument.containerClass = "TQT_DBusDataMap<" + key.signature + ">"; - argument.signature = "TQT_DBusDataMap<" + key.signature + ">"; - argument.accessor = key.accessor + "KeyMap"; - - argument.forwardDeclarations.append("template <typename K> class TQT_DBusDataMap"); - argument.forwardDeclarations += key.forwardDeclarations; - - argument.sourceIncludes = key.sourceIncludes; - argument.sourceIncludes["tqdbus"].append("<tqdbusdata.h>"); - argument.sourceIncludes["tqdbus"].append("<tqdbusdatamap.h>"); - } - } - else - { - TQString itemSignature = signature.mid(1); - - Argument item; - if (parseDBusSignature(itemSignature, item)) - { - argument.isPrimitive = false; - argument.signature = "TQValueList<" + item.signature + ">"; - argument.accessor = "List"; - argument.subAccessor = item.accessor + "List"; - argument.containerClass = "TQT_DBusDataList"; - - argument.forwardDeclarations.append("class TQT_DBusDataList"); - argument.forwardDeclarations.append("template <typename T> class TQValueList"); - argument.forwardDeclarations += item.forwardDeclarations; - - argument.sourceIncludes["TQt"].append("<tqvaluelist.h>"); - argument.sourceIncludes["tqdbus"].append("<tqdbusdatalist.h>"); - - TQMap<TQString, TQStringList>::const_iterator it = - item.sourceIncludes.begin(); - TQMap<TQString, TQStringList>::const_iterator endIt = - item.sourceIncludes.end(); - for (; it != endIt; ++it) - { - argument.sourceIncludes[it.key()] += it.data(); - } - } - else - { - argument.signature = "TQT_DBusDataList"; - argument.accessor = "List"; - argument.isPrimitive = false; - - argument.forwardDeclarations.append("class TQT_DBusDataList"); - - argument.sourceIncludes["tqdbus"].append("<tqdbusdatalist.h>"); - } - } - } - else - return false; - - return true; -} - -static TQMap<TQString, TQString> extractTypeAnnotations(const TQDomElement& element) -{ - const TQString annotationPrefix = "org.freedesktop.DBus.TQt3.Type."; - - TQMap<TQString, TQString> annotations; - - TQDomNode node = element.firstChild(); - for (uint count = 1; !node.isNull(); node = node.nextSibling(), ++count) - { - if (!node.isElement()) continue; - - TQDomElement element = node.toElement(); - if (element.tagName() != "annotation") continue; - - TQString name = element.attribute("name"); - if (name.isEmpty()) continue; - - TQString value = element.attribute("value").stripWhiteSpace(); - if (value.isEmpty()) continue; - - if (!name.startsWith(annotationPrefix)) continue; - - TQString arg = name.mid(annotationPrefix.length()); - - annotations.insert(arg, value); - } - - return annotations; -} - -static bool hasAnnotation(const TQDomElement& element, const TQString& annotation, TQString* value = 0) -{ - for (TQDomNode node = element.firstChild(); !node.isNull(); - node = node.nextSibling()) - { - if (!node.isElement()) continue; - - TQDomElement childElement = node.toElement(); - if (childElement.tagName() != "annotation") continue; - if (childElement.attribute("name") != annotation) continue; - - if (value != 0) *value = childElement.attribute("value"); - return true; - } - - return false; -} - -static TQValueList<Argument> extractArguments(const TQDomElement& methodElement, - Class& classData) -{ - TQMap<TQString, TQString> argAnnotations = extractTypeAnnotations(methodElement); - - TQValueList<Argument> arguments; - - bool isSignal = methodElement.tagName() == "signal"; - - uint inCount = 0; - uint outCount = 0; - for (TQDomNode node = methodElement.firstChild(); !node.isNull(); - node = node.nextSibling()) - { - if (!node.isElement()) continue; - - TQDomElement element = node.toElement(); - if (element.tagName() != "arg") continue; - if (element.attribute("type").isEmpty()) continue; - - Argument argument; - argument.name = element.attribute("name"); - if (argument.name.isEmpty()) - argument.name = TQString("arg%1").arg(inCount + outCount); - - argument.direction = Argument::In; - if (!isSignal && element.attribute("direction", "in") == "out") - argument.direction = Argument::Out; - - TQString annotation; - if (!isSignal && argument.direction == Argument::In) - { - annotation = argAnnotations[TQString("In%1").arg(inCount)]; - ++inCount; - } - else - { - annotation = argAnnotations[TQString("Out%1").arg(outCount)]; - ++outCount; - } - - if (!annotation.isEmpty()) - { - // just assume nobody uses annotations for primitives - argument.annotatedType = annotation; - argument.signature = annotation; - argument.isPrimitive = false; - argument.dbusSignature = element.attribute("type"); - - TQString includeBase = - TQString("\"%1type%2.h\"").arg(classData.name.lower()); - - argument.headerIncludes["local"].append(includeBase.arg("declarations")); - argument.sourceIncludes["local"].append(includeBase.arg("includes")); - argument.sourceIncludes["tqdbus"].append("<tqdbusdataconverter.h>"); - } - else if (!parseDBusSignature(element.attribute("type"), argument)) - { - argument.signature = "TQT_DBusData"; - argument.isPrimitive = false; - - argument.forwardDeclarations.append("class TQT_DBusData"); - argument.sourceIncludes["tqdbus"].append("<tqdbusdata.h>"); - } - - arguments.append(argument); - } - - return arguments; -} - -static void writeVariable(const Argument& argument, uint index, - const TQString& prefix, TQTextStream& stream) -{ - stream << prefix << argument.signature << " _" << argument.name; - if (argument.direction == Argument::In) - { - if (!argument.annotatedType.isEmpty()) - { - stream << ";" << endl; - - // TODO: error handling? - stream << prefix << "TQT_DBusDataConverter::convertFromTQT_DBusData<" - << argument.annotatedType - << TQString(">(message[%1], _").arg(index) - << argument.name << ")"; - } - else if (!argument.accessor.isEmpty()) - { - stream << TQString::fromUtf8(" = message[%1].to").arg(index); - stream << argument.accessor; - - if (!argument.subAccessor.isEmpty()) - { - stream << TQString("().to%1").arg(argument.subAccessor); - } - - stream << "()"; - } - else - stream << TQString::fromUtf8(" = message[%1]").arg(index); - } - - stream << ";" << endl; -} - -static void writeVariables(const TQString& prefix, const Method& method, - TQTextStream& stream) -{ - uint count = 0; - TQValueList<Argument>::const_iterator it = method.arguments.begin(); - TQValueList<Argument>::const_iterator endIt = method.arguments.end(); - for (; it != endIt; ++it) - { - writeVariable(*it, count, prefix, stream); - - if ((*it).direction == Argument::In) ++count; - } -} - -static void writeSignalEmit(const Method& signal, TQTextStream& stream) -{ - stream << " emit " << signal.name << "("; - - TQValueList<Argument>::const_iterator it = signal.arguments.begin(); - TQValueList<Argument>::const_iterator endIt = signal.arguments.end(); - for (; it != endIt;) - { - stream << "_" << (*it).name; - - ++it; - if (it != endIt) stream << ", "; - } - - stream << ");" << endl; -} - -static void writeMethodIntrospection(const Method& method, bool& firstArgument, - TQTextStream& stream) -{ - stream << " methodElement.setAttribute(\"name\", \"" - << method.name << "\");" << endl; - - TQValueList<Argument>::const_iterator it = method.arguments.begin(); - TQValueList<Argument>::const_iterator endIt = method.arguments.end(); - for (; it != endIt; ++it) - { - stream << endl; - if (firstArgument) - { - firstArgument = false; - - stream << " TQDomElement argumentElement = document.createElement(" - << "\"arg\");" << endl; - } - else - { - stream << " argumentElement = document.createElement(" - << "\"arg\");" << endl; - } - - stream << " argumentElement.setAttribute(\"name\", \"" - << (*it).name << "\");" << endl; - - stream << " argumentElement.setAttribute(\"type\", \"" - << (*it).dbusSignature << "\");" << endl; - - stream << " argumentElement.setAttribute(\"direction\", \"" - << ((*it).direction == Argument::In ? "in" : "out") << "\");" - << endl; - - stream << " methodElement.appendChild(argumentElement);" << endl; - } - stream << endl; -} - -static void writeNodeInitialization(const Class& classData, - const TQValueList<Class>& interfaces, TQTextStream& stream) -{ - stream << "bool " << classData.name - << "::registerObject(const TQT_DBusConnection& connection, " - << "const TQString& path)" << endl; - stream << "{" << endl; - stream << " if (path.isEmpty()) return false;" << endl; - stream << endl; - - stream << " if (!m_private->objectPath.isEmpty()) unregisterObject();" - << endl; - stream << endl; - - stream << " m_private->connection = connection;" << endl; - stream << " m_private->objectPath = path;" << endl; - stream << endl; - stream << " if (!m_private->connection.registerObject(path, this))" << endl; - stream << " {" << endl; - stream << " m_private->connection = TQT_DBusConnection();" << endl; - stream << " m_private->objectPath = TQString();" << endl; - stream << endl; - stream << " return false;" << endl; - stream << " }" << endl; - stream << endl; - - stream << " if (m_private->interfaces.isEmpty())" << endl; - stream << " {" << endl; - stream << " TQString name = \"org.freedesktop.DBus.Introspectable\";" - << endl; - stream << " TQT_DBusObjectBase* interface = m_private;" << endl; - stream << " m_private->interfaces.insert(name, interface);" << endl; - - TQValueList<Class>::const_iterator it = interfaces.begin(); - TQValueList<Class>::const_iterator endIt = interfaces.end(); - for (; it != endIt; ++it) - { - stream << endl; - stream << " name = \"" << (*it).dbusName << "\";" << endl; - stream << " interface = createInterface(name);" << endl; - stream << " Q_ASSERT(interface != 0);" << endl; - stream << " m_private->interfaces.insert(name, interface);" << endl; - } - - stream << " }" << endl; - stream << endl; - stream << " return true;" << endl; - stream << "}" << endl; - stream << endl; -} -static void writeNodeIntrospection(const Class& classData, - const TQValueList<Class>& interfaces, TQTextStream& stream) -{ - stream << "void " << classData.name << "::Private" - << "::cacheIntrospectionData()" << endl; - stream << "{" << endl; - - stream << " TQDomDocument doc;" << endl; - stream << " TQDomElement nodeElement = doc.createElement(\"node\");" << endl; - stream << " TQDomElement interfaceElement = doc.createElement(\"interface\");" - << endl; - stream << " org::freedesktop::DBus::Introspectable" - << "::buildIntrospectionData(interfaceElement);" << endl; - stream << " nodeElement.appendChild(interfaceElement);" << endl; - - TQValueList<Class>::const_iterator it = interfaces.begin(); - TQValueList<Class>::const_iterator endIt = interfaces.end(); - for (; it != endIt; ++it) - { - if ((*it).dbusName == "org.freedesktop.DBus.Introspectable") continue; - - stream << endl; - stream << " interfaceElement = doc.createElement(\"interface\");" - << endl; - stream << " " << (*it).namespaces.join("::") + "::" + (*it).name - << "::buildIntrospectionData(interfaceElement);" << endl; - stream << " nodeElement.appendChild(interfaceElement);" << endl; - } - - stream << endl; - stream << " doc.appendChild(nodeElement);" << endl; - stream << endl; - - stream << " introspectionData = \"<!DOCTYPE node PUBLIC \\\"" - << "-//freedesktop//DTD D-BUS Object Introspection 1.0//EN\\\"\\n" - << "\\\"http://www.freedesktop.org/standards/dbus/1.0/introspect.dtd" - << "\\\">\\n\";" << endl; - stream << " introspectionData += doc.toString();" << endl; - stream << "}" << endl; - stream << endl; -} - -bool MethodGenerator::extractMethods(const TQDomElement& interfaceElement, - Class& classData) -{ - TQMap<TQString, TQString> propertyAnnotations = - extractTypeAnnotations(interfaceElement); - - uint propertyCount = 0; - for (TQDomNode node = interfaceElement.firstChild(); !node.isNull(); - node = node.nextSibling()) - { - if (!node.isElement()) continue; - - TQDomElement element = node.toElement(); - if (element.attribute("name").isEmpty()) continue; - - if (element.tagName() == "method" || element.tagName() == "signal") - { - Method method; - method.name = element.attribute("name"); - method.arguments = extractArguments(element, classData); - method.noReply = false; - method.async = false; - - if (element.tagName() == "method") - { - method.async = hasAnnotation(element, "org.freedesktop.DBus.GLib.Async"); - classData.methods.append(method); - } - else - classData.msignals.append(method); - } - else if (element.tagName() == "property") - { - Property property; - property.name = element.attribute("name"); - property.read = element.attribute("access").tqfind("read") != -1; - property.write = element.attribute("access").tqfind("write") != -1; - - TQString annotation = - propertyAnnotations[TQString("Property%1").arg(propertyCount)]; - - if (!annotation.isEmpty()) - { - property.annotatedType = annotation; - property.signature = annotation; - property.dbusSignature = element.attribute("type"); - property.isPrimitive = false; - - TQString includeBase = - TQString("\"%1type%2.h\"").arg(classData.name.lower()); - - property.headerIncludes["local"].append(includeBase.arg("declarations")); - property.sourceIncludes["local"].append(includeBase.arg("includes")); - property.sourceIncludes["tqdbus"].append("<tqdbusdataconverter.h>"); - } - else if (!parseDBusSignature(element.attribute("type"), property)) - { - property.signature = "TQT_DBusData"; - property.isPrimitive = false; - - property.forwardDeclarations.append("class TQT_DBusData"); - property.sourceIncludes["tqdbus"].append("<tqdbusdata.h>"); - } - - classData.properties.append(property); - ++propertyCount; - } - } - - return !classData.methods.isEmpty() || !classData.msignals.isEmpty() || - !classData.properties.isEmpty(); -} - -void MethodGenerator::writeMethodDeclaration(const Method& method, bool pureVirtual, - bool withError, TQTextStream& stream) -{ - stream << method.name << "("; - - TQValueList<Argument>::const_iterator it = method.arguments.begin(); - TQValueList<Argument>::const_iterator endIt = method.arguments.end(); - for (; it != endIt;) - { - if (!(*it).isPrimitive && (*it).direction == Argument::In) - stream << "const "; - - stream << (*it).signature; - - if (!(*it).isPrimitive || (*it).direction == Argument::Out) stream << "&"; - - stream << " " << (*it).name; - - ++it; - if (it != endIt || withError) stream << ", "; - } - - if (withError) - stream << "TQT_DBusError& error)"; - else - stream << ")"; - - if (pureVirtual) - stream << " = 0;" << endl; - else - stream << ";" << endl; - - stream << endl; -} - -void MethodGenerator::writePropertyDeclaration(const Property& property, - bool pureVirtual, TQTextStream& stream) -{ - if (property.write) - { - stream << " virtual void set" << property.name << "("; - - if (!property.isPrimitive) stream << "const "; - - stream << property.signature; - - if (!property.isPrimitive) stream << "&"; - - stream << " value, TQT_DBusError& error)"; - - if (pureVirtual) - stream << " = 0;" << endl; - else - stream << ";" << endl; - } - - if (property.read) - { - stream << " virtual " << property.signature << " get" - << property.name << "(TQT_DBusError& error) const"; - - if (pureVirtual) - stream << " = 0;" << endl; - else - stream << ";" << endl; - } - - if (property.read || property.write) stream << endl; -} - -void MethodGenerator::writeMethodCallDeclaration(const Method& method, - TQTextStream& stream) -{ - if (method.async) - stream << "void call" << method.name << "Async"; - else - stream << "TQT_DBusMessage call" << method.name; - - stream << "(const TQT_DBusMessage& message);" << endl; - stream << endl; -} - -void MethodGenerator::writeMethodCall(const Class& classData, - const Method& method, TQTextStream& stream) -{ - if (method.async) - stream << "void " << classData.name << "::call" << method.name << "Async"; - else - stream << "TQT_DBusMessage " << classData.name << "::call" << method.name; - - stream << "(const TQT_DBusMessage& message)" << endl; - - stream << "{" << endl; - - if (method.async) - { - // FIXME: using writeVariables by removing asyncCallId argument - Method reducedMethod = method; - reducedMethod.arguments.pop_front(); - - writeVariables(" ", reducedMethod, stream); - } - else - { - stream << " TQT_DBusError error;" << endl; - stream << " TQT_DBusMessage reply;" << endl; - stream << endl; - - writeVariables(" ", method, stream); - } - - stream << endl; - - if (method.async) - { - stream << " int _asyncCallId = 0;" << endl; - stream << " while (m_asyncCalls.tqfind(_asyncCallId) != m_asyncCalls.end())" - << endl; - stream << " {" << endl; - stream << " ++_asyncCallId;" << endl; - stream << " }" << endl; - stream << " m_asyncCalls.insert(_asyncCallId, message);" << endl; - stream << endl; - - stream << " " << method.name << "Async("; - } - else - stream << " if (" << method.name << "("; - - TQValueList<Argument>::const_iterator it = method.arguments.begin(); - TQValueList<Argument>::const_iterator endIt = method.arguments.end(); - while (it != endIt) - { - stream << "_" << (*it).name; - - ++it; - if (it != endIt) stream << ", "; - } - - if (method.async) - { - stream << ");" << endl; - stream << endl; - - stream << " return;" << endl; - stream << "}" << endl; - stream << endl; - return; - } - - if (method.arguments.count() > 0) stream << ", "; - stream << "error))" << endl; - - stream << " {" << endl; - stream << " reply = TQT_DBusMessage::methodReply(message);" << endl; - - it = method.arguments.begin(); - for (; it != endIt; ++it) - { - if ((*it).direction == Argument::Out) - { - if (!(*it).annotatedType.isEmpty()) - { - stream << " TQT_DBusData " << (*it).name << "Data;" << endl; - stream << " TQT_DBusDataConverter::convertToTQT_DBusData<" - << (*it).annotatedType << ">(_" - << (*it).name << ", " << (*it).name << "Data);" - << endl; - stream << " reply << " << (*it).name << "Data"; - } - else if (!(*it).accessor.isEmpty()) - { - stream << " reply << TQT_DBusData::from" << (*it).accessor; - if (!(*it).subAccessor.isEmpty()) - { - stream << "(" << (*it).containerClass; - } - - stream << "(_" << (*it).name << ")"; - - if (!(*it).subAccessor.isEmpty()) - { - stream << ")"; - } - } - else - stream << " reply << _" << (*it).name; - - stream << ";" << endl; - } - } - stream << " }" << endl; - stream << " else" << endl; - stream << " {" << endl; - - stream << " if (!error.isValid())" << endl; - stream << " {" << endl; - stream << " qWarning(\"Call to implementation of "; - - TQStringList::const_iterator nsIt = classData.namespaces.begin(); - TQStringList::const_iterator nsEndIt = classData.namespaces.end(); - for (; nsIt != nsEndIt; ++nsIt) - { - stream << *nsIt << "::"; - } - - stream << classData.name << "::" << method.name; - stream << " returned 'false' but error object is not valid!\");" << endl; - stream << endl; - stream << " error = TQT_DBusError::stdFailed(\""; - - nsIt = classData.namespaces.begin(); - for (; nsIt != nsEndIt; ++nsIt) - { - stream << *nsIt << "."; - } - - stream << classData.name << "." << method.name << " execution failed\");" - << endl; - stream << " }" << endl; - stream << endl; - - stream << " reply = TQT_DBusMessage::methodError(message, error);" << endl; - - stream << " }" << endl; - stream << endl; - stream << " return reply;" << endl; - stream << "}" << endl; - stream << endl; -} - -void MethodGenerator::writeSignalEmitter(const Class& classData, - const Method& method, TQTextStream& stream) -{ - stream << "bool " << classData.name << "::emit" << method.name << "("; - - TQValueList<Argument>::const_iterator it = method.arguments.begin(); - TQValueList<Argument>::const_iterator endIt = method.arguments.end(); - for (; it != endIt;) - { - if (!(*it).isPrimitive && (*it).direction == Argument::In) - stream << "const "; - - stream << (*it).signature; - - if (!(*it).isPrimitive || (*it).direction == Argument::Out) stream << "&"; - - stream << " " << (*it).name; - - ++it; - if (it != endIt) stream << ", "; - } - - stream << ")" << endl; - - stream << "{" << endl; - - // TODO: create error or use enum for return - stream << " TQString path = objectPath();" << endl; - stream << " Q_ASSERT(!path.isEmpty());" << endl; - stream << endl; - - stream << " TQT_DBusMessage message = TQT_DBusMessage::signal(path, \""; - stream << classData.dbusName << "\", \"" << method.name << "\");" << endl; - stream << endl; - - it = method.arguments.begin(); - for (; it != endIt; ++it) - { - if ((*it).direction == Argument::In) - { - if (!(*it).annotatedType.isEmpty()) - { - // TODO: error handling - stream << " TQT_DBusData " << (*it).name << "Data;" << endl; - stream << " if (TQT_DBusDataConverter:convertToTQT_DBusData<" - << (*it).annotatedType << ">(" - << (*it).name << ", " << (*it).name << "Data" - << ") != TQT_DBusDataConverter::Success) return false;" - << endl; - stream << " message << " << (*it).name << "Data"; - } - else if (!(*it).accessor.isEmpty()) - { - stream << " message << TQT_DBusData::from" << (*it).accessor; - if (!(*it).subAccessor.isEmpty()) - { - stream << "(" << (*it).containerClass; - } - - stream << "(" << (*it).name << ")"; - - if (!(*it).subAccessor.isEmpty()) - { - stream << ")"; - } - } - else - stream << " message << " << (*it).name; - - stream << ";" << endl; - } - } - stream << endl; - - stream << " return handleSignalSend(message);" << endl; - - stream << "}" << endl; - stream << endl; -} - - -void MethodGenerator::writeInterfaceAsyncReplyHandler(const Class& classData, - const Method& method, TQTextStream& stream) -{ - stream << "void " << classData.name << "::" << method.name - << "AsyncReply("; - - TQValueList<Argument>::const_iterator it = method.arguments.begin(); - TQValueList<Argument>::const_iterator endIt = method.arguments.end(); - while (it != endIt) - { - if (!(*it).isPrimitive && (*it).direction == Argument::In) - stream << "const "; - - stream << (*it).signature; - - if (!(*it).isPrimitive || (*it).direction == Argument::Out) stream << "&"; - - stream << " " << (*it).name; - - ++it; - if (it != endIt) stream << ", "; - } - stream << ")" << endl; - stream << endl; - stream << "{" << endl; - - stream << " TQMap<int, TQT_DBusMessage>::iterator tqfindIt = m_asyncCalls.tqfind(asyncCallId);" << endl; - stream << " if (tqfindIt == m_asyncCalls.end()) return;" << endl; - stream << endl; - - stream << " TQT_DBusMessage call = tqfindIt.data();" << endl; - stream << " m_asyncCalls.erase(tqfindIt);" << endl; - stream << endl; - - stream << " TQT_DBusMessage reply = TQT_DBusMessage::methodReply(call);" - << endl; - - it = method.arguments.begin(); - for (++it; it != endIt; ++it) // skip asyncCallId at beginning - { - if (!(*it).annotatedType.isEmpty()) - { - stream << " TQT_DBusData " << (*it).name << "Data;" << endl; - - // TODO error handling - stream << " if (TQT_DBusDataConverter::convertToTQT_DBusData<" - << (*it).annotatedType << ">(" << (*it).name << ", " - << (*it).name << "Data" - << ") != TQT_DBusDataConverter::Success) return false;" - << endl; - stream << " reply << " << (*it).name << "Data;" << endl; - } - else if (!(*it).accessor.isEmpty()) - { - stream << " reply << TQT_DBusData::from" << (*it).accessor << "("; - - if ((*it).subAccessor.isEmpty()) - stream << (*it).name; - else - stream << (*it).containerClass << "(" << (*it).name << ")"; - - stream << ");" << endl; - } - else - stream << " reply << " << (*it).name << ";" << endl; - } - stream << endl; - - stream << " handleMethodReply(reply);" << endl; - - stream << "}" << endl; - stream << endl; - - stream << "void " << classData.name << "::" << method.name - << "AsyncError(int asyncCallId, const TQT_DBusError& error)"; - stream << endl; - - stream << "{" << endl; - - stream << " TQMap<int, TQT_DBusMessage>::iterator tqfindIt = m_asyncCalls.tqfind(asyncCallId);" << endl; - stream << " if (tqfindIt == m_asyncCalls.end()) return;" << endl; - stream << endl; - - stream << " TQT_DBusMessage call = tqfindIt.data();" << endl; - stream << " m_asyncCalls.erase(tqfindIt);" << endl; - stream << endl; - - stream << " TQT_DBusMessage reply = TQT_DBusMessage::methodError(call, error);" - << endl; - stream << " handleMethodReply(reply);" << endl; - - stream << "}" << endl; - stream << endl; -} - -void MethodGenerator::writeInterfaceMainMethod(const Class& classData, - TQTextStream& stream) -{ - if (classData.methods.isEmpty()) return; - - stream << "bool " << classData.name - << "::handleMethodCall(const TQT_DBusMessage& message)" << endl; - stream << "{" << endl; - - stream << " if (message.interface() != \"" << classData.dbusName - << "\") return false;" << endl; - stream << endl; - - TQValueList<Method>::const_iterator it = classData.methods.begin(); - TQValueList<Method>::const_iterator endIt = classData.methods.end(); - for (; it != endIt; ++it) - { - stream << " if (message.member() == \"" << (*it).name << "\")" << endl; - stream << " {" << endl; - - if ((*it).async) - { - stream << " call" << (*it).name << "Async(message);" << endl; - stream << endl; - } - else - { - stream << " TQT_DBusMessage reply = call" << (*it).name - << "(message);" << endl; - stream << " handleMethodReply(reply);" << endl; - stream << endl; - } - stream << " return true;" << endl; - stream << " }" << endl; - stream << endl; - } - - stream << " return false; " << endl; - stream << "}" << endl; - stream << endl; -} - -void MethodGenerator::writeSignalHandler(const Class& classData, - TQTextStream& stream) -{ - stream << "void " << classData.name - << "::slotHandleDBusSignal(const TQT_DBusMessage& message)" << endl; - stream << "{" << endl; - - TQValueList<Method>::const_iterator it = classData.msignals.begin(); - TQValueList<Method>::const_iterator endIt = classData.msignals.end(); - bool first = true; - for (; it != endIt; ++it) - { - stream << " "; - - if (!first) - stream << "else "; - else - first = false; - - stream << "if (message.member() == \"" << (*it).name << "\")" << endl; - stream << " {" << endl; - - writeVariables(" ", *it, stream); - stream << endl; - - writeSignalEmit(*it, stream); - - stream << " }" << endl; - } - - stream << "}" << endl; - stream << endl; -} - -void MethodGenerator::writeProxyBegin(const Class& classData, TQTextStream& stream) -{ - stream << classData.name << "::" << classData.name - << "(const TQString& service, const TQString& path, TQObject* tqparent, const char* name)" << endl; - stream << " : TQObject(tqparent, name)," << endl; - stream << " m_baseProxy(new TQT_DBusProxy())" << endl; - stream << "{" << endl; - stream << " m_baseProxy->setInterface(\"" - << classData.dbusName << "\");" << endl; - stream << " m_baseProxy->setPath(path);" << endl; - stream << " m_baseProxy->setService(service);" << endl; - stream << endl; - - if (!classData.msignals.isEmpty()) - { - stream << " TQObject::connect(m_baseProxy, " - << "TQT_SIGNAL(dbusSignal(const TQT_DBusMessage&))," << endl; - stream << " this, " - << " TQT_SLOT(slotHandleDBusSignal(const TQT_DBusMessage&)));" - << endl; - } - - if (!classData.asyncReplySignals.isEmpty()) - { - stream << " TQObject::connect(m_baseProxy, " - << "TQT_SIGNAL(asyncReply(int, const TQT_DBusMessage&))," << endl; - stream << " this, " - << " TQT_SLOT(slotHandleAsyncReply(int, const TQT_DBusMessage&)));" - << endl; - } - - stream << "}" << endl; - - stream << endl; - - stream << classData.name << "::~" << classData.name << "()" << endl; - stream << "{" << endl; - stream << " delete m_baseProxy;" << endl; - stream << "}" << endl; - stream << endl; - - stream << "void " << classData.name - << "::setConnection(const TQT_DBusConnection& connection)" << endl; - stream << "{" << endl; - stream << " m_baseProxy->setConnection(connection);" << endl; - stream << "}" << endl; - stream << endl; -} - -void MethodGenerator::writeProxyMethod(const TQString& className, - const Method& method, TQTextStream& stream) -{ - stream << "bool " << className << "::" << method.name - << (method.async ? "Async(" : "("); - - TQValueList<Argument>::const_iterator it = method.arguments.begin(); - TQValueList<Argument>::const_iterator endIt = method.arguments.end(); - for (; it != endIt; ++it) - { - if (!(*it).isPrimitive && (*it).direction == Argument::In) - stream << "const "; - - stream << (*it).signature; - - if (!(*it).isPrimitive || (*it).direction == Argument::Out) stream << "&"; - - stream << " " << (*it).name << ", "; - } - - stream << "TQT_DBusError& error)" << endl; - - stream << "{" << endl; - stream << " TQValueList<TQT_DBusData> parameters;" << endl; - stream << endl; - - uint outCount = 0; - - it = method.arguments.begin(); - for (; it != endIt; ++it) - { - if ((*it).direction == Argument::Out) - { - ++outCount; - continue; - } - - if (!(*it).annotatedType.isEmpty()) - { - stream << " TQT_DBusData " << (*it).name << "Data;" << endl; - - // TODO error handling - stream << " if (TQT_DBusDataConverter::convertToTQT_DBusData<" - << (*it).annotatedType << ">(" << (*it).name << ", " - << (*it).name << "Data" - << ") != TQT_DBusDataConverter::Success) return false;" - << endl; - stream << " parameters << " << (*it).name << "Data;" << endl; - } - else if (!(*it).accessor.isEmpty()) - { - stream << " parameters << TQT_DBusData::from" << (*it).accessor << "("; - - if ((*it).subAccessor.isEmpty()) - stream << (*it).name; - else - stream << (*it).containerClass << "(" << (*it).name << ")"; - - stream << ");" << endl; - } - else - stream << " parameters << " << (*it).name << ";" << endl; - } - - stream << endl; - - if (outCount == 0 && method.noReply) - { - stream << " if (!m_baseProxy->send(\"" << method.name - << "\", parameters))" << endl; - stream << " {" << endl; - stream << " error = m_baseProxy->lastError();" << endl; - stream << " return false;" << endl; - stream << " }" << endl; - stream << " return true;" << endl; - stream << "}" << endl; - stream << endl; - return; - } - - if (method.async) - { - stream << " asyncCallId = m_baseProxy->sendWithAsyncReply(\""; - stream << method.name << "\", parameters);" << endl; - stream << endl; - - stream << " if (asyncCallId != 0) m_asyncCalls[asyncCallId] = \"" - << method.name << "\";" << endl; - stream << endl; - - stream << " return (asyncCallId != 0);" << endl; - stream << "}" << endl; - stream << endl; - return; - } - - stream << " TQT_DBusMessage reply = m_baseProxy->sendWithReply(\""; - stream << method.name << "\", parameters, &error);" << endl; - stream << endl; - - stream << " if (reply.type() != TQT_DBusMessage::ReplyMessage) return false;" - << endl; - - if (outCount == 0) - { - stream << " return true;" << endl; - stream << "}" << endl; - stream << endl; - return; - } - - stream << endl; - - // TODO: create error or use enum for return - stream << " if (reply.count() != " << outCount << ") return false;" << endl; - stream << endl; - - bool firstAccessor = true; - bool firstSubAccessor = true; - - it = method.arguments.begin(); - for (; it != endIt; ++it) - { - if ((*it).direction == Argument::In) continue; - - --outCount; - - if (!(*it).annotatedType.isEmpty()) - { - // TODO error handling - stream << " if (TQT_DBusDataConverter::convertFromTQT_DBusData<" - << (*it).annotatedType << ">(reply.front(), " - << (*it).name - << ") != TQT_DBusDataConverter::Success) return false;" - << endl; - } - else if (!(*it).accessor.isEmpty()) - { - if (firstAccessor) - { - stream << " bool ok = false;" << endl; - stream << endl; - firstAccessor = false; - } - - if ((*it).subAccessor.isEmpty()) - { - stream << " " << (*it).name << " = reply.front().to" - << (*it).accessor << "(&ok);" << endl; - } - else - { - if (firstSubAccessor) - { - stream << " bool subOK = false;" << endl; - stream << endl; - firstSubAccessor = false; - } - - stream << " " << (*it).name << " = reply.front().to" - << (*it).accessor << "(&ok).to" << (*it).subAccessor - << "(&subOK);" << endl; - - // TODO: create error or use enum for return - stream << " if (!subOK) return false;" << endl; - } - - // TODO: create error or use enum for return - stream << " if (!ok) return false;" << endl; - } - else - stream << " " << (*it).name << " = reply.front();" << endl; - stream << endl; - - if (outCount > 0) - { - stream << " reply.pop_front();" << endl; - stream << endl; - } - } - - stream << " return true;" << endl; - - stream << "}" << endl; - stream << endl; -} - -void MethodGenerator::writeProxyGenericProperty(const Class& classData, - TQTextStream& stream) -{ - stream << "void " << classData.name - << "::setDBusProperty(const TQString& name, " - << "const TQT_DBusVariant& value, TQT_DBusError& error)" - << endl; - stream << "{" << endl; - - stream << " TQT_DBusConnection connection = m_baseProxy->connection();" << endl; - stream << endl; - stream << " TQT_DBusMessage message = TQT_DBusMessage::methodCall(" - << "m_baseProxy->service(), m_baseProxy->path(), " - << "\"org.freedesktop.DBus.Properties\", \"Set\");" << endl; - stream << endl; - - stream << " message << TQT_DBusData::fromString(m_baseProxy->interface());" - << endl; - stream << " message << TQT_DBusData::fromString(name);" << endl; - stream << " message << TQT_DBusData::fromVariant(value);" << endl; - stream << endl; - - stream << " connection.sendWithReply(message, &error);" << endl; - - stream << "}" << endl; - - stream << endl; - - stream << "TQT_DBusVariant " << classData.name - << "::getDBusProperty(const TQString& name, TQT_DBusError& error) const" - << endl; - stream << "{" << endl; - - stream << " TQT_DBusConnection connection = m_baseProxy->connection();" << endl; - stream << endl; - - stream << " TQT_DBusMessage message = TQT_DBusMessage::methodCall(" - << "m_baseProxy->service(), m_baseProxy->path(), " - << "\"org.freedesktop.DBus.Properties\", \"Get\");" << endl; - stream << endl; - - stream << " message << TQT_DBusData::fromString(m_baseProxy->interface());" - << endl; - stream << " message << TQT_DBusData::fromString(name);" << endl; - stream << endl; - - stream << " TQT_DBusMessage reply = connection.sendWithReply(message, &error);" - << endl; - stream << endl; - - stream << " if (reply.type() != TQT_DBusMessage::ReplyMessage)" - << " return TQT_DBusVariant();" << endl; - stream << " if (reply.count() != 1) return TQT_DBusVariant();" << endl; - - stream << endl; - - stream << " bool ok = false;" << endl; - stream << " TQT_DBusVariant value = reply.front().toVariant(&ok);" << endl; - - // TODO generate error - stream << " if (!ok) return TQT_DBusVariant();" << endl; - stream << endl; - - stream << " return value;" << endl; - - stream << "}" << endl; - - stream << endl; -} - -void MethodGenerator::writeProxyProperty(const Class& classData, - const Property& property, TQTextStream& stream) -{ - if (property.write) - { - stream << "void " << classData.name << "::set" << property.name << "("; - - if (!property.isPrimitive) stream << "const "; - - stream << property.signature; - - if (!property.isPrimitive) stream << "&"; - - stream << " value, TQT_DBusError& error)" << endl; - stream << "{" << endl; - stream << " TQT_DBusVariant variant;" << endl; - - if (!property.annotatedType.isEmpty()) - { - // TODO: error handling - stream << " TQT_DBusDataConverter::convertToTQT_DBusData<" - << property.annotatedType << ">(value, variant.value);" - << endl; - } - else if (!property.accessor.isEmpty()) - { - stream << " variant.value = TQT_DBusData::from" - << property.accessor << "("; - - if (property.subAccessor.isEmpty()) - stream << "value"; - else - stream << property.containerClass << "(value)"; - - stream << ");" << endl; - } - else - stream << " variant.value = TQT_DBusData(value);" << endl; - - stream << " variant.signature = \"" << property.dbusSignature << "\";" - << endl; - - stream << endl; - stream << " setDBusProperty(\"" << property.name - << "\", variant, error);" << endl; - - stream << "}" << endl; - stream << endl; - } - - if (property.read) - { - stream << property.signature << " " << classData.name - << "::get" << property.name << "(TQT_DBusError& error) const" << endl; - stream << "{" << endl; - - stream << " TQT_DBusVariant variant = getDBusProperty(\"" - << property.name << "\", error);" << endl; - stream << endl; - stream << " if (error.isValid()) return " - << property.signature << "();" << endl; - stream << endl; - - if (!property.annotatedType.isEmpty()) - { - stream << " " << property.signature << " result;" << endl; - - // TODO error handling - stream << " TQT_DBusDataConverter::convertFromTQT_DBusData<" - << property.annotatedType << ">(variant.value, result);" - << endl; - } - else if (!property.accessor.isEmpty()) - { - stream << " bool ok = false;" << endl; - stream << endl; - - if (property.subAccessor.isEmpty()) - { - stream << " " << property.signature << " result = "; - stream << " variant.value.to" << property.accessor - << "(&ok);" << endl; - } - else - { - stream << " bool subOK = false;" << endl; - stream << endl; - - stream << " " << property.signature << " result = "; - stream << " variant.value.to" - << property.accessor << "(&ok).to" << property.subAccessor - << "(&subOK);" << endl; - - // TODO: create error - stream << " if (!subOK) {}" << endl; - } - - // TODO: create error - stream << " if (!ok) {}" << endl; - } - else - stream << " " << property.signature << " result = variant.value;"; - stream << endl; - - stream << " return result;" << endl; - stream << "}" << endl; - stream << endl; - } -} - -void MethodGenerator::writeProxyAsyncReplyHandler(const Class& classData, - TQTextStream& stream) -{ - stream << "void " << classData.name - << "::slotHandleAsyncReply(int asyncCallId, const TQT_DBusMessage& message)" << endl; - stream << "{" << endl; - - stream << " TQMap<int, TQString>::iterator tqfindIt = " - << "m_asyncCalls.tqfind(asyncCallId);" << endl; - stream << " if (tqfindIt == m_asyncCalls.end()) return;" << endl; - stream << endl; - stream << " const TQString signalName = tqfindIt.data();" << endl; - stream << " m_asyncCalls.erase(tqfindIt);" << endl; - stream << endl; - - TQValueList<Method>::const_iterator it = classData.asyncReplySignals.begin(); - TQValueList<Method>::const_iterator endIt = classData.asyncReplySignals.end(); - bool first = true; - for (; it != endIt; ++it) - { - stream << " "; - - if (!first) - stream << "else "; - else - first = false; - - stream << "if (signalName == \"" << (*it).name << "\")" << endl; - stream << " {" << endl; - - // FIXME tricking writeVariables and writeSignalEmit into writing - // the reply emit code by manipulating arguments and name - stream << " int _asyncCallId = asyncCallId;" << endl; - - Method signal = *it; - signal.arguments.pop_front(); - - writeVariables(" ", signal, stream); - stream << endl; - - signal = *it; - signal.name += "AsyncReply"; - - writeSignalEmit(signal, stream); - - stream << " }" << endl; - } - - stream << "}" << endl; - stream << endl; -} - -void MethodGenerator::writeIntrospectionDataMethod(const Class& classData, - TQTextStream& stream) -{ - stream << "void " << classData.name - << "::buildIntrospectionData(TQDomElement& interfaceElement)" << endl; - stream << "{" << endl; - - stream << " interfaceElement.setAttribute(\"name\", \"" - << classData.dbusName << "\");" << endl; - stream << endl; - - bool firstMethod = true; - bool firstArgument = true; - - TQValueList<Method>::const_iterator it = classData.methods.begin(); - TQValueList<Method>::const_iterator endIt = classData.methods.end(); - for (; it != endIt; ++it) - { - if (firstMethod) - { - firstMethod = false; - stream << " TQDomDocument document = interfaceElement.ownerDocument();" << endl; - stream << " TQDomElement methodElement = document.createElement(" - << "\"method\");" << endl; - } - else - { - stream << endl; - stream << " methodElement = document.createElement(" - << "\"method\");" << endl; - } - - writeMethodIntrospection(*it, firstArgument, stream); - - stream << " interfaceElement.appendChild(methodElement);" << endl; - } - - it = classData.msignals.begin(); - endIt = classData.msignals.end(); - for (; it != endIt; ++it) - { - if (firstMethod) - { - firstMethod = false; - stream << " TQDomDocument document = interfaceElement.ownerDocument();" << endl; - stream << endl; - stream << " TQDomElement methodElement = document.createElement(" - << "\"signal\");" << endl; - } - else - { - stream << endl; - stream << " methodElement = document.createElement(" - << "\"signal\");" << endl; - } - - writeMethodIntrospection(*it, firstArgument, stream); - - stream << " interfaceElement.appendChild(methodElement);" << endl; - } - - stream << "}" << endl; - stream << endl; -} - -void MethodGenerator::writeNodePrivate(const Class& classData, TQTextStream& stream) -{ - stream << "class " << classData.name - << "::Private : public org::freedesktop::DBus::Introspectable" << endl; - stream << "{" << endl; - stream << "public:" << endl; - stream << " virtual ~Private();" << endl; - stream << endl; - - stream << "public:" << endl; - stream << " TQMap<TQString, TQT_DBusObjectBase*> interfaces;" << endl; - stream << " TQString introspectionData;" << endl; - stream << endl; - stream << " TQT_DBusConnection connection;" << endl; - stream << " TQString objectPath;" << endl; - stream << endl; - - stream << "protected:" << endl; - stream << " virtual bool Introspect(TQString& data, TQT_DBusError& error);" - << endl; - stream << endl; - stream << " virtual void handleMethodReply(const TQT_DBusMessage& reply);" - << endl; - - stream << "private:" << endl; - stream << " void cacheIntrospectionData();" << endl; - - stream << "};" << endl; - stream << endl; -} - -void MethodGenerator::writeNodeBegin(const Class& classData, TQTextStream& stream) -{ - stream << classData.name << "::" << classData.name - << "() : TQT_DBusObjectBase()," << endl; - stream << " m_private(new Private())" << endl; - stream << "{" << endl; - stream << "}" << endl; - stream << endl; - - stream << classData.name << "::~" << classData.name << "()" << endl; - stream << "{" << endl; - stream << " unregisterObject();" << endl; - stream << endl; - stream << " delete m_private;" << endl; - stream << "}" << endl; - stream << endl; -} - -void MethodGenerator::writeNodeMethods(const Class& classData, - const TQValueList<Class>& interfaces, TQTextStream& stream) -{ - writeNodeInitialization(classData, interfaces, stream); - - stream << "void " << classData.name << "::unregisterObject()" << endl; - stream << "{" << endl; - stream << " if (m_private->objectPath.isEmpty()) return;" << endl; - stream << endl; - stream << " m_private->connection.unregisterObject(m_private->objectPath);" << endl; - stream << endl; - stream << " m_private->connection = TQT_DBusConnection();" << endl; - stream << " m_private->objectPath = TQString();" << endl; - stream << "}" << endl; - stream << endl; - - stream << "bool " << classData.name - << "::handleMethodCall(const TQT_DBusMessage& message)" << endl; - stream << "{" << endl; - stream << " TQMap<TQString, TQT_DBusObjectBase*>::iterator tqfindIt = " - << "m_private->interfaces.tqfind(message.interface());" << endl; - stream << " if (tqfindIt == m_private->interfaces.end()) return false;" - << endl; - stream << endl; - stream << " return delegateMethodCall(message, tqfindIt.data());" << endl; - stream << "}" << endl; - stream << endl; - - stream << classData.name << "::Private::~Private()" << endl; - stream << "{" << endl; - stream << " TQMap<TQString, TQT_DBusObjectBase*>::const_iterator it = " - << "interfaces.begin();" << endl; - stream << " TQMap<TQString, TQT_DBusObjectBase*>::const_iterator endIt = " - << "interfaces.end();" << endl; - stream << " for (; it != endIt; ++it)" << endl; - stream << " {" << endl; - stream << " TQT_DBusObjectBase* interface = it.data();" << endl; - stream << " if (interface != this)" << endl; - stream << " delete interface;" << endl; - stream << " }" << endl; - stream << " interfaces.clear();" << endl; - stream << "}" << endl; - stream << endl; - - stream << "bool " << classData.name << "::Private" - << "::Introspect(TQString& data, TQT_DBusError& error)" << endl; - stream << "{" << endl; - stream << " Q_UNUSED(error);" << endl; - stream << " if (introspectionData.isEmpty()) cacheIntrospectionData();" - << endl; - stream << endl; - stream << " data = introspectionData;" << endl; - stream << endl; - stream << " return true;" << endl; - stream << "}" << endl; - stream << endl; - - stream << "void " << classData.name << "::Private" - << "::handleMethodReply(const TQT_DBusMessage& reply)" << endl; - stream << "{" << endl; - stream << " connection.send(reply);" << endl; - stream << "}" << endl; - stream << endl; - - writeNodeIntrospection(classData, interfaces, stream); -} - -// End of File |