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 "qcallsite_p.h"
41
42#include "qcalltargetdescription_p.h"
43
44QT_BEGIN_NAMESPACE
45
46using namespace QPatternist;
47
48CallTargetDescription::CallTargetDescription(const QXmlName &name) : m_name(name)
49{
50 Q_ASSERT(!m_name.isNull());
51}
52
53QXmlName CallTargetDescription::name() const
54{
55 return m_name;
56}
57
58void CallTargetDescription::checkArgumentsCircularity(CallTargetDescription::List &signList,
59 const Expression::Ptr callsite)
60{
61 /* Check the arguments. */
62 const Expression::List ops(callsite->operands());
63 const Expression::List::const_iterator end(ops.constEnd());
64 Expression::List::const_iterator it(ops.constBegin());
65
66 for(; it != end; ++it)
67 checkCallsiteCircularity(signList, expr: *it);
68}
69
70void CallTargetDescription::checkCallsiteCircularity(CallTargetDescription::List &signList,
71 const Expression::Ptr expr)
72{
73 Q_ASSERT(expr);
74
75 if(expr->is(i: Expression::IDUserFunctionCallsite))
76 {
77 CallTargetDescription::List::const_iterator it(signList.constBegin());
78 const CallTargetDescription::List::const_iterator end(signList.constEnd());
79 CallSite *const callsite = static_cast<CallSite *>(expr.data());
80
81 for(; it != end; ++it)
82 {
83 if(callsite->configureRecursion(sign: *it))
84 {
85 /* A callsite inside the function body to the function. This user function
86 * is recursive if it's to the same function, in other words. Which it was
87 * if configureRecursion() returned true. */
88
89 /* Now we continue and check the arguments of the callsite. That is, the arguments.
90 * This catches for instance local:foo(local:foo(3)). */
91 checkArgumentsCircularity(signList, callsite: expr);
92 return;
93 }
94 }
95 /* Check the body of the function so this callsite isn't "indirectly" a
96 * recursive call to the function we're checking. XQTS test case
97 * default_namespace-011 is an example of this. */
98 signList.append(t: callsite->callTargetDescription());
99 checkCallsiteCircularity(signList, expr: callsite->body());
100 }
101
102 checkArgumentsCircularity(signList, callsite: expr); /* We're done in this case. */
103}
104
105QT_END_NAMESPACE
106

source code of qtxmlpatterns/src/xmlpatterns/expr/qcalltargetdescription.cpp