--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/src/xmlpatterns/functions/qstringvaluefns.cpp Mon Jan 11 14:00:40 2010 +0000
@@ -0,0 +1,373 @@
+/****************************************************************************
+**
+** 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 "qabstractfloat_p.h"
+#include "qatomicstring_p.h"
+#include "qcommonsequencetypes_p.h"
+#include "qcommonvalues_p.h"
+#include "qinteger_p.h"
+#include "qliteral_p.h"
+#include "qpatternistlocale_p.h"
+#include "qschemanumeric_p.h"
+
+#include "qstringvaluefns_p.h"
+
+QT_BEGIN_NAMESPACE
+
+using namespace QPatternist;
+
+Item ConcatFN::evaluateSingleton(const DynamicContext::Ptr &context) const
+{
+ const Expression::List::const_iterator end(m_operands.constEnd());
+ Expression::List::const_iterator it(m_operands.constBegin());
+ QString result;
+
+ for(; it != end; ++it)
+ {
+ Item item((*it)->evaluateSingleton(context));
+
+ if(item)
+ result += item.stringValue();
+ }
+
+ return AtomicString::fromValue(result);
+}
+
+Item StringJoinFN::evaluateSingleton(const DynamicContext::Ptr &context) const
+{
+ Item::Iterator::Ptr it(m_operands.first()->evaluateSequence(context));
+ Q_ASSERT(it);
+ Item current(it->next());
+
+ if(!current) /* Exit early, don't evaluate the separator. */
+ return CommonValues::EmptyString;
+
+ QString result;
+ QString separator;
+ const Item isep(m_operands.at(1)->evaluateSingleton(context));
+
+ if(isep)
+ separator = isep.stringValue();
+
+ while(true)
+ {
+ result += current.stringValue();
+ current = it->next();
+
+ if(!current)
+ break;
+
+ result += separator;
+ }
+
+ return result.isEmpty()
+ ? toItem(CommonValues::EmptyString)
+ : toItem(AtomicString::fromValue(result));
+}
+
+Expression::Ptr StringJoinFN::compress(const StaticContext::Ptr &context)
+{
+ if(m_operands.first()->staticType()->cardinality().allowsMany())
+ return FunctionCall::compress(context);
+ else
+ {
+ if(m_operands.first()->is(IDEmptySequence))
+ return wrapLiteral(CommonValues::EmptyString, context, this);
+ else
+ return m_operands.first()->compress(context);
+ }
+}
+
+Item SubstringFN::evaluateSingleton(const DynamicContext::Ptr &context) const
+{
+ Item item(m_operands.first()->evaluateSingleton(context));
+
+ if(!item)
+ return CommonValues::EmptyString;
+
+ const QString str(item.stringValue());
+
+ const xsDouble dblStart = m_operands.at(1)->evaluateSingleton(context).as<Numeric>()
+ ->round()->toDouble();
+ if(qIsNaN(dblStart))
+ return CommonValues::EmptyString;
+
+ /* XPath starts from 1, but C++ starts from 0. */
+ xsInteger startingLoc = Double::fromValue(dblStart)->round()->toInteger() - 1;
+
+ xsInteger length = 0;
+ if(m_operands.count() == 2)
+ length = str.length() - startingLoc;
+ else
+ {
+ const xsDouble dblLen = m_operands.at(2)->evaluateSingleton(context).as<Numeric>()
+ ->round()->toDouble();
+
+ if(qIsNaN(dblLen))
+ return CommonValues::EmptyString;
+
+ length = Double::fromValue(dblLen)->round()->toInteger();
+ if(startingLoc > startingLoc + length)
+ return CommonValues::EmptyString;
+ }
+
+ if(startingLoc < 0)
+ {
+ length = length + startingLoc;
+ startingLoc = 0;
+ }
+
+ return AtomicString::fromValue(str.mid(startingLoc, length));
+}
+
+Item StringLengthFN::evaluateSingleton(const DynamicContext::Ptr &context) const
+{
+ const Item item(m_operands.first()->evaluateSingleton(context));
+
+ /* fn:string() is re-implemented "inline" here. */
+ if(item)
+ return Integer::fromValue(item.stringValue().length());
+ else
+ return CommonValues::IntegerZero;
+}
+
+NormalizeUnicodeFN::NormalizeUnicodeFN() : m_normForm(QString::NormalizationForm_C)
+{
+}
+
+Item NormalizeSpaceFN::evaluateSingleton(const DynamicContext::Ptr &context) const
+{
+ const Item arg(m_operands.first()->evaluateSingleton(context));
+
+ if(!arg)
+ return CommonValues::EmptyString;
+
+ return toItem(AtomicString::fromValue(arg.stringValue().simplified()));
+}
+
+Item NormalizeUnicodeFN::evaluateSingleton(const DynamicContext::Ptr &context) const
+{
+ const Item arg(m_operands.first()->evaluateSingleton(context));
+
+ if(!arg)
+ return CommonValues::EmptyString;
+
+ int normForm;
+
+ /* The second argument has been removed, if we've already determined the form. */
+ if(m_operands.count() == 1)
+ normForm = m_normForm;
+ else
+ {
+ normForm = determineNormalizationForm(context);
+ if(normForm == -1)
+ return toItem(AtomicString::fromValue(arg.stringValue()));
+ }
+
+ return AtomicString::fromValue(arg.stringValue().normalized(
+ static_cast<QString::NormalizationForm>(normForm)));
+}
+
+Expression::Ptr NormalizeUnicodeFN::compress(const StaticContext::Ptr &context)
+{
+ const Expression::Ptr me(FunctionCall::compress(context));
+ if(me != this)
+ return me;
+
+ Q_ASSERT(m_operands.count() == 1 || m_operands.count() == 2);
+
+ if(m_operands.count() == 1)
+ m_normForm = QString::NormalizationForm_C;
+ else if(m_operands.last()->is(IDStringValue))
+ {
+ m_normForm = static_cast<QString::NormalizationForm>(
+ determineNormalizationForm(context->dynamicContext()));
+
+ if(m_normForm == -1)
+ return m_operands.first();
+
+ /* Remove the operand since we don't need it anymore. */
+ m_operands.removeLast();
+ }
+
+ return me;
+}
+
+int NormalizeUnicodeFN::determineNormalizationForm(const DynamicContext::Ptr &context) const
+{
+ const QString strRepr(m_operands.last()->evaluateSingleton(context).stringValue().trimmed().toUpper());
+
+ /* TODO. Put these values in a QHash for faster lookup. Keep thread safety in mind. */
+ if(strRepr.isEmpty())
+ return -1;
+ else if(strRepr == QLatin1String("NFC"))
+ return QString::NormalizationForm_C;
+ else if(strRepr == QLatin1String("NFD"))
+ return QString::NormalizationForm_D;
+ else if(strRepr == QLatin1String("NFKC"))
+ return QString::NormalizationForm_KC;
+ else if(strRepr == QLatin1String("NFKD"))
+ return QString::NormalizationForm_KD;
+ else
+ {
+ /* What form is FULLY_NORMALIZED? Is a code path available for that somewhere? */
+ context->error(QtXmlPatterns::tr("The normalization form %1 is "
+ "unsupported. The supported forms are "
+ "%2, %3, %4, and %5, and none, i.e. "
+ "the empty string (no normalization).")
+ .arg(formatKeyword(strRepr))
+ .arg(formatKeyword("NFC"))
+ .arg(formatKeyword("NFD"))
+ .arg(formatKeyword("NFKC"))
+ .arg(formatKeyword("NFKD")),
+ ReportContext::FOCH0003,
+ this);
+ return QString::NormalizationForm_C; /* Silence compiler warning. */
+ }
+}
+
+Item UpperCaseFN::evaluateSingleton(const DynamicContext::Ptr &context) const
+{
+ const Item item(m_operands.first()->evaluateSingleton(context));
+
+ if(!item)
+ return CommonValues::EmptyString;
+
+ return AtomicString::fromValue(item.stringValue().toUpper());
+}
+
+Item LowerCaseFN::evaluateSingleton(const DynamicContext::Ptr &context) const
+{
+ const Item item(m_operands.first()->evaluateSingleton(context));
+
+ if(!item)
+ return CommonValues::EmptyString;
+
+ return AtomicString::fromValue(item.stringValue().toLower());
+}
+
+Item TranslateFN::evaluateSingleton(const DynamicContext::Ptr &context) const
+{
+ const Item item(m_operands.first()->evaluateSingleton(context));
+
+ if(!item)
+ return CommonValues::EmptyString;
+
+ const QString mapString(m_operands.at(1)->evaluateSingleton(context).stringValue());
+ const QString arg(item.stringValue());
+
+ if(mapString.isEmpty())
+ return AtomicString::fromValue(arg);
+
+ const QString transString(m_operands.at(2)->evaluateSingleton(context).stringValue());
+ const int transLen = transString.length();
+ const int argLen = arg.length();
+
+ QString result;
+ result.reserve(argLen);
+ int outI = 0;
+
+ for(int i = 0; i < argLen; ++i)
+ {
+ const QChar argCh(arg.at(i));
+ const int mapPos = mapString.indexOf(argCh);
+
+ if(mapPos == -1)
+ {
+ result[outI] = argCh;
+ ++outI;
+ continue;
+ }
+ else if(mapPos >= transLen)
+ continue;
+
+ const QChar transCh(transString.at(mapPos));
+
+ if(transCh.isNull())
+ continue;
+
+ result[outI] = transCh;
+ ++outI;
+ }
+
+ result.truncate(outI);
+ return AtomicString::fromValue(result);
+}
+
+EncodeString::EncodeString(const QByteArray &excludeChars,
+ const QByteArray &includeChars) : m_excludeChars(excludeChars),
+ m_includeChars(includeChars)
+{
+}
+
+Item EncodeString::evaluateSingleton(const DynamicContext::Ptr &context) const
+{
+ const Item item(m_operands.first()->evaluateSingleton(context));
+
+ if(!item)
+ return CommonValues::EmptyString;
+
+ return AtomicString::fromValue(QString::fromAscii(QUrl::toPercentEncoding(item.stringValue(),
+ m_excludeChars,
+ m_includeChars).constData()));
+}
+
+const char *const EncodeForURIFN::include = "#!*'()";
+
+EncodeForURIFN::EncodeForURIFN() : EncodeString(QByteArray(), QByteArray::fromRawData(include, 6))
+{
+}
+
+const char *const IriToURIFN::exclude = "#-_!~*'();?@&=+$,[]/:%";
+
+IriToURIFN::IriToURIFN() : EncodeString(QByteArray::fromRawData(exclude, 22), QByteArray())
+{
+}
+
+const char *const EscapeHtmlURIFN::include = "?&[]%";
+const char *const EscapeHtmlURIFN::exclude = " :;=@!./+*()-,#$'";
+
+EscapeHtmlURIFN::EscapeHtmlURIFN() : EncodeString(QByteArray::fromRawData(exclude, 17),
+ QByteArray::fromRawData(include, 6))
+{
+}
+
+QT_END_NAMESPACE