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