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 "qforclause_p.h"
41#include "qfunctionfactory_p.h"
42#include "qrangevariablereference_p.h"
43
44#include "qdocumentfn_p.h"
45
46QT_BEGIN_NAMESPACE
47
48using namespace QPatternist;
49
50Expression::Ptr DocumentFN::typeCheck(const StaticContext::Ptr &context,
51 const SequenceType::Ptr &reqType)
52{
53 /* See the class documentation for the rewrite that we're doing here. */
54
55 /* Generate type checking code for our operands such that they match. */
56 typeCheckOperands(context);
57
58 const QSourceLocation myLocation(context->locationFor(reflection: this));
59 const FunctionFactory::Ptr functions(context->functionSignatures());
60
61 Expression::Ptr uriSource;
62
63 {
64 Expression::List distinctValuesArgs;
65 distinctValuesArgs.append(t: m_operands.first());
66
67 uriSource = functions->createFunctionCall(name: QXmlName(StandardNamespaces::fn, StandardLocalNames::distinct_values),
68 arguments: distinctValuesArgs,
69 context,
70 r: this);
71 context->addLocation(reflection: uriSource.data(), location: myLocation);
72 }
73
74 const VariableSlotID rangeSlot = context->allocateRangeSlot();
75 const Expression::Ptr uriReference(new RangeVariableReference(uriSource, rangeSlot));
76 context->addLocation(reflection: uriReference.data(), location: myLocation);
77
78 Expression::List docArgs;
79
80 if(m_operands.count() == 2)
81 {
82 Expression::List baseUriArgs;
83 baseUriArgs.append(t: uriReference);
84 baseUriArgs.append(t: m_operands.at(i: 1));
85
86 const Expression::Ptr fnBaseUri(functions->createFunctionCall(name: QXmlName(StandardNamespaces::fn, StandardLocalNames::resolve_uri),
87 arguments: baseUriArgs,
88 context,
89 r: this));
90 context->addLocation(reflection: fnBaseUri.data(), location: myLocation);
91 docArgs.append(t: fnBaseUri);
92 }
93 else
94 docArgs.append(t: uriReference);
95
96 const Expression::Ptr fnDoc(functions->createFunctionCall(name: QXmlName(StandardNamespaces::fn, StandardLocalNames::doc),
97 arguments: docArgs,
98 context,
99 r: this));
100 context->addLocation(reflection: fnDoc.data(), location: myLocation);
101
102
103 Expression::Ptr newMe(new ForClause(rangeSlot,
104 uriSource,
105 fnDoc,
106 -1 /* We have no position variable. */));
107
108 Expression::Ptr oldMe(this);
109 rewrite(old&: oldMe, New: newMe, context);
110 return newMe->typeCheck(context, reqType);
111}
112
113QT_END_NAMESPACE
114

source code of qtxmlpatterns/src/xmlpatterns/functions/qdocumentfn.cpp