| 1 | /**************************************************************************** | 
|---|
| 2 | ** | 
|---|
| 3 | ** Copyright (C) 2009 Nokia Corporation and/or its subsidiary(-ies). | 
|---|
| 4 | ** Contact: Qt Software Information (qt-info@nokia.com) | 
|---|
| 5 | ** | 
|---|
| 6 | ** This file is part of the QtXmlPatterns module of the Qt Toolkit. | 
|---|
| 7 | ** | 
|---|
| 8 | ** $QT_BEGIN_LICENSE:LGPL$ | 
|---|
| 9 | ** Commercial Usage | 
|---|
| 10 | ** Licensees holding valid Qt Commercial licenses may use this file in | 
|---|
| 11 | ** accordance with the Qt Commercial License Agreement provided with the | 
|---|
| 12 | ** Software or, alternatively, in accordance with the terms contained in | 
|---|
| 13 | ** a written agreement between you and Nokia. | 
|---|
| 14 | ** | 
|---|
| 15 | ** GNU Lesser General Public License Usage | 
|---|
| 16 | ** Alternatively, this file may be used under the terms of the GNU Lesser | 
|---|
| 17 | ** General Public License version 2.1 as published by the Free Software | 
|---|
| 18 | ** Foundation and appearing in the file LICENSE.LGPL included in the | 
|---|
| 19 | ** packaging of this file.  Please review the following information to | 
|---|
| 20 | ** ensure the GNU Lesser General Public License version 2.1 requirements | 
|---|
| 21 | ** will be met: http://www.gnu.org/licenses/old-licenses/lgpl-2.1.html. | 
|---|
| 22 | ** | 
|---|
| 23 | ** In addition, as a special exception, Nokia gives you certain | 
|---|
| 24 | ** additional rights. These rights are described in the Nokia Qt LGPL | 
|---|
| 25 | ** Exception version 1.0, included in the file LGPL_EXCEPTION.txt in this | 
|---|
| 26 | ** package. | 
|---|
| 27 | ** | 
|---|
| 28 | ** GNU General Public License Usage | 
|---|
| 29 | ** Alternatively, this file may be used under the terms of the GNU | 
|---|
| 30 | ** General Public License version 3.0 as published by the Free Software | 
|---|
| 31 | ** Foundation and appearing in the file LICENSE.GPL included in the | 
|---|
| 32 | ** packaging of this file.  Please review the following information to | 
|---|
| 33 | ** ensure the GNU General Public License version 3.0 requirements will be | 
|---|
| 34 | ** met: http://www.gnu.org/copyleft/gpl.html. | 
|---|
| 35 | ** | 
|---|
| 36 | ** If you are unsure which license is appropriate for your use, please | 
|---|
| 37 | ** contact the sales department at qt-sales@nokia.com. | 
|---|
| 38 | ** $QT_END_LICENSE$ | 
|---|
| 39 | ** | 
|---|
| 40 | ****************************************************************************/ | 
|---|
| 41 |  | 
|---|
| 42 | #include "qcommonsequencetypes_p.h" | 
|---|
| 43 | #include "qcommonvalues_p.h" | 
|---|
| 44 | #include "qitemmappingiterator_p.h" | 
|---|
| 45 | #include "qpatternistlocale_p.h" | 
|---|
| 46 |  | 
|---|
| 47 | #include "qtracefn_p.h" | 
|---|
| 48 |  | 
|---|
| 49 | QT_BEGIN_NAMESPACE | 
|---|
| 50 |  | 
|---|
| 51 | using namespace QPatternist; | 
|---|
| 52 |  | 
|---|
| 53 | namespace QPatternist | 
|---|
| 54 | { | 
|---|
| 55 | /** | 
|---|
| 56 | * @short TraceCallback is a MappingCallback and takes care of | 
|---|
| 57 | * the tracing of each individual item. | 
|---|
| 58 | * | 
|---|
| 59 | * Because Patternist must be thread safe, TraceFN creates a TraceCallback | 
|---|
| 60 | * each time the function is evaluated. In other words, TraceFN, which is | 
|---|
| 61 | * an Expression sub class, can't modify its members, but MappingCallback | 
|---|
| 62 | * does not have this limitation since it's created on a per evaluation basis. | 
|---|
| 63 | * | 
|---|
| 64 | * @author Frans Englich <fenglich@trolltech.com> | 
|---|
| 65 | */ | 
|---|
| 66 | class TraceCallback : public QSharedData | 
|---|
| 67 | { | 
|---|
| 68 | public: | 
|---|
| 69 | typedef QExplicitlySharedDataPointer<TraceCallback> Ptr; | 
|---|
| 70 |  | 
|---|
| 71 | inline TraceCallback(const QString &msg) : m_position(0), | 
|---|
| 72 | m_msg(msg) | 
|---|
| 73 | { | 
|---|
| 74 | } | 
|---|
| 75 |  | 
|---|
| 76 | /** | 
|---|
| 77 | * Performs the actual tracing. | 
|---|
| 78 | */ | 
|---|
| 79 | Item mapToItem(const Item &item, | 
|---|
| 80 | const DynamicContext::Ptr &context) | 
|---|
| 81 | { | 
|---|
| 82 | QTextStream out(stderr); | 
|---|
| 83 | ++m_position; | 
|---|
| 84 | if(m_position == 1) | 
|---|
| 85 | { | 
|---|
| 86 | if(item) | 
|---|
| 87 | { | 
|---|
| 88 | out << qPrintable(m_msg) | 
|---|
| 89 | << " : " | 
|---|
| 90 | << qPrintable(item.stringValue()); | 
|---|
| 91 | } | 
|---|
| 92 | else | 
|---|
| 93 | { | 
|---|
| 94 | out << qPrintable(m_msg) | 
|---|
| 95 | << " : (" | 
|---|
| 96 | << qPrintable(formatType(context->namePool(), CommonSequenceTypes::Empty)) | 
|---|
| 97 | << ")\n"; | 
|---|
| 98 | return Item(); | 
|---|
| 99 | } | 
|---|
| 100 | } | 
|---|
| 101 | else | 
|---|
| 102 | { | 
|---|
| 103 | out << qPrintable(item.stringValue()) | 
|---|
| 104 | << '[' | 
|---|
| 105 | << m_position | 
|---|
| 106 | << "]\n"; | 
|---|
| 107 | } | 
|---|
| 108 |  | 
|---|
| 109 | return item; | 
|---|
| 110 | } | 
|---|
| 111 |  | 
|---|
| 112 | private: | 
|---|
| 113 | xsInteger m_position; | 
|---|
| 114 | const QString m_msg; | 
|---|
| 115 | }; | 
|---|
| 116 | } | 
|---|
| 117 |  | 
|---|
| 118 | Item::Iterator::Ptr TraceFN::evaluateSequence(const DynamicContext::Ptr &context) const | 
|---|
| 119 | { | 
|---|
| 120 | const QString msg(m_operands.last()->evaluateSingleton(context).stringValue()); | 
|---|
| 121 |  | 
|---|
| 122 | return makeItemMappingIterator<Item>(TraceCallback::Ptr(new TraceCallback(msg)), | 
|---|
| 123 | m_operands.first()->evaluateSequence(context), | 
|---|
| 124 | context); | 
|---|
| 125 | } | 
|---|
| 126 |  | 
|---|
| 127 | Item TraceFN::evaluateSingleton(const DynamicContext::Ptr &context) const | 
|---|
| 128 | { | 
|---|
| 129 | const QString msg(m_operands.last()->evaluateSingleton(context).stringValue()); | 
|---|
| 130 | const Item item(m_operands.first()->evaluateSingleton(context)); | 
|---|
| 131 |  | 
|---|
| 132 | return TraceCallback::Ptr(new TraceCallback(msg))->mapToItem(item, context); | 
|---|
| 133 | } | 
|---|
| 134 |  | 
|---|
| 135 | SequenceType::Ptr TraceFN::staticType() const | 
|---|
| 136 | { | 
|---|
| 137 | return m_operands.first()->staticType(); | 
|---|
| 138 | } | 
|---|
| 139 |  | 
|---|
| 140 | QT_END_NAMESPACE | 
|---|