/****************************************************************************+
−
**+
−
** Copyright (C) 2010 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 "qabstractfloat_p.h"+
−
#include "qanyuri_p.h"+
−
#include "qboolean_p.h"+
−
#include "qbuiltintypes_p.h"+
−
#include "qcommonnamespaces_p.h"+
−
#include "qcommonvalues_p.h"+
−
#include "qliteral_p.h"+
−
#include "qatomicstring_p.h"+
−
+
−
#include "qnodefns_p.h"+
−
+
−
QT_BEGIN_NAMESPACE+
−
+
−
using namespace QPatternist;+
−
+
−
Item NameFN::evaluateSingleton(const DynamicContext::Ptr &context) const+
−
{+
−
    const Item node(m_operands.first()->evaluateSingleton(context));+
−
+
−
    if(node)+
−
    {+
−
        const QXmlName name(node.asNode().name());+
−
+
−
        if(name.isNull())+
−
            return CommonValues::EmptyString;+
−
        else+
−
            return AtomicString::fromValue(context->namePool()->toLexical(name));+
−
    }+
−
    else+
−
        return CommonValues::EmptyString;+
−
}+
−
+
−
Item LocalNameFN::evaluateSingleton(const DynamicContext::Ptr &context) const+
−
{+
−
    const Item node(m_operands.first()->evaluateSingleton(context));+
−
+
−
    if(node)+
−
    {+
−
        const QXmlName name(node.asNode().name());+
−
+
−
        if(name.isNull())+
−
            return CommonValues::EmptyString;+
−
        else+
−
            return AtomicString::fromValue(context->namePool()->stringForLocalName(name.localName()));+
−
    }+
−
    else+
−
        return CommonValues::EmptyString;+
−
}+
−
+
−
Item NamespaceURIFN::evaluateSingleton(const DynamicContext::Ptr &context) const+
−
{+
−
    const Item node(m_operands.first()->evaluateSingleton(context));+
−
+
−
    if(node)+
−
    {+
−
        const QXmlName name(node.asNode().name());+
−
+
−
        if(name.isNull())+
−
            return CommonValues::EmptyAnyURI;+
−
        else+
−
            return toItem(AnyURI::fromValue(context->namePool()->stringForNamespace(name.namespaceURI())));+
−
    }+
−
    else+
−
        return CommonValues::EmptyAnyURI;+
−
}+
−
+
−
Item NumberFN::evaluateSingleton(const DynamicContext::Ptr &context) const+
−
{+
−
    const Item item(m_operands.first()->evaluateSingleton(context));+
−
+
−
    if(!item)+
−
        return CommonValues::DoubleNaN;+
−
+
−
    const Item val(cast(item, context));+
−
    Q_ASSERT(val);+
−
+
−
    if(val.as<AtomicValue>()->hasError())+
−
        return CommonValues::DoubleNaN;+
−
    else+
−
        return val;+
−
}+
−
+
−
Expression::Ptr NumberFN::typeCheck(const StaticContext::Ptr &context,+
−
                                    const SequenceType::Ptr &reqType)+
−
{+
−
    const Expression::Ptr me(FunctionCall::typeCheck(context, reqType));+
−
    const ItemType::Ptr sourceType(m_operands.first()->staticType()->itemType());+
−
+
−
    if(BuiltinTypes::xsDouble->xdtTypeMatches(sourceType))+
−
    {+
−
        /* The operand is already xs:double, no need for fn:number(). */+
−
        return m_operands.first()->typeCheck(context, reqType);+
−
    }+
−
    else if(prepareCasting(context, sourceType))+
−
        return me;+
−
    else+
−
    {+
−
        /* Casting to xs:double will never succeed and we would always return NaN.*/+
−
        return wrapLiteral(CommonValues::DoubleNaN, context, this)->typeCheck(context, reqType);+
−
    }+
−
}+
−
+
−
bool LangFN::isLangMatch(const QString &candidate, const QString &toMatch)+
−
{+
−
    if(QString::compare(candidate, toMatch, Qt::CaseInsensitive) == 0)+
−
        return true;+
−
+
−
    return candidate.startsWith(toMatch, Qt::CaseInsensitive)+
−
           && candidate.length() > toMatch.length()+
−
           && candidate.at(toMatch.length()) == QLatin1Char('-');+
−
}+
−
+
−
Item LangFN::evaluateSingleton(const DynamicContext::Ptr &context) const+
−
{+
−
    const Item langArg(m_operands.first()->evaluateSingleton(context));+
−
    const QString lang(langArg ? langArg.stringValue() : QString());+
−
+
−
    const QXmlName xmlLang(StandardNamespaces::xml, StandardLocalNames::lang, StandardPrefixes::xml);+
−
    const QXmlNodeModelIndex langNode(m_operands.at(1)->evaluateSingleton(context).asNode());+
−
+
−
    const QXmlNodeModelIndex::Iterator::Ptr ancestors(langNode.iterate(QXmlNodeModelIndex::AxisAncestorOrSelf));+
−
    QXmlNodeModelIndex ancestor(ancestors->next());+
−
+
−
    while(!ancestor.isNull())+
−
    {+
−
        const QXmlNodeModelIndex::Iterator::Ptr attributes(ancestor.iterate(QXmlNodeModelIndex::AxisAttribute));+
−
        QXmlNodeModelIndex attribute(attributes->next());+
−
+
−
        while(!attribute.isNull())+
−
        {+
−
            Q_ASSERT(attribute.kind() == QXmlNodeModelIndex::Attribute);+
−
+
−
            if(attribute.name() == xmlLang)+
−
            {+
−
                if(isLangMatch(attribute.stringValue(), lang))+
−
                    return CommonValues::BooleanTrue;+
−
                else+
−
                    return CommonValues::BooleanFalse;+
−
            }+
−
+
−
            attribute = attributes->next();+
−
        }+
−
+
−
        ancestor = ancestors->next();+
−
    }+
−
+
−
    return CommonValues::BooleanFalse;+
−
}+
−
+
−
Item RootFN::evaluateSingleton(const DynamicContext::Ptr &context) const+
−
{+
−
    const Item arg(m_operands.first()->evaluateSingleton(context));+
−
+
−
    if(arg)+
−
        return arg.asNode().root();+
−
    else+
−
        return Item();+
−
}+
−
+
−
SequenceType::Ptr RootFN::staticType() const+
−
{+
−
    if(m_operands.isEmpty())+
−
        return makeGenericSequenceType(BuiltinTypes::node, Cardinality::exactlyOne());+
−
    else+
−
        return makeGenericSequenceType(BuiltinTypes::node, m_operands.first()->staticType()->cardinality().toWithoutMany());+
−
}+
−
+
−
QT_END_NAMESPACE+
−