--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/xmlpatterns/data/qhexbinary.cpp	Mon Jan 11 14:00:40 2010 +0000
@@ -0,0 +1,151 @@
+/****************************************************************************
+**
+** 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 <QtGlobal>
+
+#include "qbase64binary_p.h"
+#include "qbuiltintypes_p.h"
+#include "qpatternistlocale_p.h"
+#include "qvalidationerror_p.h"
+
+#include "qhexbinary_p.h"
+
+QT_BEGIN_NAMESPACE
+
+using namespace QPatternist;
+
+HexBinary::HexBinary(const QByteArray &val) : Base64Binary(val)
+{
+}
+
+qint8 HexBinary::fromHex(const QChar &c)
+{
+    if(c.unicode() > 'f')
+        return -1;
+
+    const char *const range = "0123456789ABCDEFabcdef";
+
+    const char *const in = strchr(range, c.unicode());
+
+    if(!in)
+        return -1;
+
+    /* Pointer arithmetic. */
+    int digit = in - range;
+
+    if(digit > 15)
+        digit -= 6;
+
+    return digit;
+}
+
+AtomicValue::Ptr HexBinary::fromLexical(const NamePool::Ptr &np, const QString &str)
+{
+    const QString lexical(str.trimmed());
+    const int len = lexical.length();
+
+    if(len == 0)
+        return AtomicValue::Ptr(new HexBinary(QByteArray()));
+
+    if((len & 1) != 0)
+    {
+        /* Catch a common case. */
+        return ValidationError::createError(QtXmlPatterns::tr(
+                  "A value of type %1 must contain an even number of "
+                  "digits. The value %2 does not.")
+                  .arg(formatType(np, BuiltinTypes::xsHexBinary),
+                       formatData(QString::number(len))));
+    }
+
+    QByteArray val;
+    val.resize(len / 2);
+
+    for(int i = 0; i < len / 2; ++i)
+    {
+        qint8 p1 = fromHex(lexical[i * 2]);
+        qint8 p2 = fromHex(lexical[i * 2 + 1]);
+
+        if(p1 == -1 || p2 == -1)
+        {
+            const QString hex(QString::fromLatin1("%1%2").arg(lexical[i * 2], lexical[i * 2 + 1]));
+
+            return ValidationError::createError(QtXmlPatterns::tr(
+                             "%1 is not valid as a value of type %2.")
+                             .arg(formatData(hex),
+                                  formatType(np, BuiltinTypes::xsHexBinary)));
+        }
+
+        val[i] = static_cast<char>(p1 * 16 + p2);
+    }
+    Q_ASSERT(!val.isEmpty());
+
+    return AtomicValue::Ptr(new HexBinary(val));
+}
+
+HexBinary::Ptr HexBinary::fromValue(const QByteArray &data)
+{
+    return HexBinary::Ptr(new HexBinary(data));
+}
+
+QString HexBinary::stringValue() const
+{
+    static const char s_toHex[] = "0123456789ABCDEF";
+    const int len = m_value.count();
+    QString result;
+    result.reserve(len * 2);
+
+    for(int i = 0; i < len; ++i)
+    {
+        // This cast is significant.
+        const unsigned char val = static_cast<unsigned char>(m_value.at(i));
+        result += QLatin1Char(s_toHex[val >> 4]);
+        result += QLatin1Char(s_toHex[val & 0x0F]);
+    }
+
+    return result;
+}
+
+ItemType::Ptr HexBinary::type() const
+{
+    return BuiltinTypes::xsHexBinary;
+}
+
+QT_END_NAMESPACE