--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/xmlpatterns/functions/qabstractfunctionfactory.cpp	Mon Jan 11 14:00:40 2010 +0000
@@ -0,0 +1,103 @@
+/****************************************************************************
+**
+** Copyright (C) 2009 Nokia Corporation and/or its subsidiary(-ies).
+** All rights reserved.
+** Contact: Nokia Corporation (qt-info@nokia.com)
+**
+** This file is part of the QtXmlPatterns module of the Qt Toolkit.
+**
+** $QT_BEGIN_LICENSE:LGPL$
+** No Commercial Usage
+** This file contains pre-release code and may not be distributed.
+** You may use this file in accordance with the terms and conditions
+** contained in the Technology Preview License Agreement accompanying
+** this package.
+**
+** GNU Lesser General Public License Usage
+** Alternatively, this file may be used under the terms of the GNU Lesser
+** General Public License version 2.1 as published by the Free Software
+** Foundation and appearing in the file LICENSE.LGPL included in the
+** packaging of this file.  Please review the following information to
+** ensure the GNU Lesser General Public License version 2.1 requirements
+** will be met: http://www.gnu.org/licenses/old-licenses/lgpl-2.1.html.
+**
+** In addition, as a special exception, Nokia gives you certain additional
+** rights.  These rights are described in the Nokia Qt LGPL Exception
+** version 1.1, included in the file LGPL_EXCEPTION.txt in this package.
+**
+** If you have questions regarding the use of this file, please contact
+** Nokia at qt-info@nokia.com.
+**
+**
+**
+**
+**
+**
+**
+**
+** $QT_END_LICENSE$
+**
+****************************************************************************/
+
+#include "qpatternistlocale_p.h"
+
+#include "qabstractfunctionfactory_p.h"
+
+QT_BEGIN_NAMESPACE
+
+using namespace QPatternist;
+
+Expression::Ptr AbstractFunctionFactory::createFunctionCall(const QXmlName name,
+                                                            const Expression::List &args,
+                                                            const StaticContext::Ptr &context,
+                                                            const SourceLocationReflection *const r)
+{
+    const FunctionSignature::Ptr sign(retrieveFunctionSignature(context->namePool(), name));
+
+    if(!sign) /* The function doesn't exist(at least not in this factory). */
+        return Expression::Ptr();
+
+    /* May throw. */
+    verifyArity(sign, context, args.count(), r);
+
+    /* Ok, the function does exist and the arity is correct. */
+    return retrieveExpression(name, args, sign);
+}
+
+void AbstractFunctionFactory::verifyArity(const FunctionSignature::Ptr &s,
+                                          const StaticContext::Ptr &context,
+                                          const xsInteger arity,
+                                          const SourceLocationReflection *const r) const
+{
+    /* Same code in both branches, but more specific error messages in order
+     * to improve usability. */
+    if(s->maximumArguments() != FunctionSignature::UnlimitedArity &&
+       arity > s->maximumArguments())
+    {
+        context->error(QtXmlPatterns::tr("%1 takes at most %n argument(s). "
+                                         "%2 is therefore invalid.", 0, s->maximumArguments())
+                          .arg(formatFunction(context->namePool(), s))
+                          .arg(arity),
+                       ReportContext::XPST0017,
+                       r);
+        return;
+    }
+
+    if(arity < s->minimumArguments())
+    {
+        context->error(QtXmlPatterns::tr("%1 requires at least %n argument(s). "
+                                         "%2 is therefore invalid.", 0, s->minimumArguments())
+                          .arg(formatFunction(context->namePool(), s))
+                          .arg(arity),
+                       ReportContext::XPST0017,
+                       r);
+        return;
+    }
+}
+
+FunctionSignature::Hash AbstractFunctionFactory::functionSignatures() const
+{
+    return m_signatures;
+}
+
+QT_END_NAMESPACE