WinRT: Added networkinterface and hostinfo

While QHostInfo and QNetworkInterface are implemented,
socket implementation is just a stub for now. Having
stub implementation is preferable over not having them
at all is because most applications will not build, if
sockets are not available. Even though they do not
do anything useful yet, applications can be compiled
and run to get an idea how network will work on WinRT.

Change-Id: I78ea88901a30280d4098b75ef7398c2628dd19c8
Reviewed-by: Andrew Knight <andrew.knight@digia.com>
Reviewed-by: Maurice Kalinowski <maurice.kalinowski@digia.com>

1 files changed, 144 insertions, 0 deletions

diff --git a/src/network/kernel/qdnslookup_winrt.cpp b/src/network/kernel/qdnslookup_winrt.cpp
new file mode 100644
index 0000000000..a5d16e4b63
--- /dev/null
+++ b/src/network/kernel/qdnslookup_winrt.cpp
@@ -0,0 +1,144 @@
+/****************************************************************************
+**
+** Copyright (C) 2013 Digia Plc and/or its subsidiary(-ies).
+** Contact: http://www.qt-project.org/legal
+**
+** This file is part of the QtNetwork module of the Qt Toolkit.
+**
+** $QT_BEGIN_LICENSE:LGPL$
+** Commercial License Usage
+** Licensees holding valid commercial Qt licenses may use this file in
+** accordance with the commercial license agreement provided with the
+** Software or, alternatively, in accordance with the terms contained in
+** a written agreement between you and Digia.  For licensing terms and
+** conditions see http://qt.digia.com/licensing.  For further information
+** use the contact form at http://qt.digia.com/contact-us.
+**
+** 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, Digia gives you certain additional
+** rights.  These rights are described in the Digia Qt LGPL Exception
+** version 1.1, included in the file LGPL_EXCEPTION.txt in this package.
+**
+** GNU General Public License Usage
+** Alternatively, this file may be used under the terms of the GNU
+** General Public License version 3.0 as published by the Free Software
+** Foundation and appearing in the file LICENSE.GPL included in the
+** packaging of this file.  Please review the following information to
+** ensure the GNU General Public License version 3.0 requirements will be
+** met: http://www.gnu.org/copyleft/gpl.html.
+**
+**
+** $QT_END_LICENSE$
+**
+****************************************************************************/
+
+#include "qdnslookup_p.h"
+
+#include <qurl.h>
+
+#include <wrl.h>
+#include <windows.foundation.h>
+#include <windows.foundation.collections.h>
+#include <windows.networking.h>
+#include <windows.networking.sockets.h>
+
+using namespace Microsoft::WRL;
+using namespace Microsoft::WRL::Wrappers;
+using namespace ABI::Windows::Foundation;
+using namespace ABI::Windows::Foundation::Collections;
+using namespace ABI::Windows::Networking;
+using namespace ABI::Windows::Networking::Connectivity;
+using namespace ABI::Windows::Networking::Sockets;
+
+QT_BEGIN_NAMESPACE
+
+void QDnsLookupRunnable::query(const int requestType, const QByteArray &requestName, QDnsLookupReply *reply)
+{
+    // TODO: is there any way to do "proper" dns lookup?
+    if (requestType != QDnsLookup::A && requestType != QDnsLookup::AAAA
+            && requestType != QDnsLookup::ANY) {
+        reply->error = QDnsLookup::InvalidRequestError;
+        reply->errorString = QLatin1String("WinRT only supports IPv4 and IPv6 requests");
+        return;
+    }
+
+    QString aceHostname = QUrl::fromAce(requestName);
+    if (aceHostname.isEmpty()) {
+        reply->error = QDnsLookup::InvalidRequestError;
+        reply->errorString = requestName.isEmpty() ? tr("No hostname given") : tr("Invalid hostname");
+        return;
+    }
+
+    IHostNameFactory *hostnameFactory;
+
+    HStringReference classId(RuntimeClass_Windows_Networking_HostName);
+    if (FAILED(GetActivationFactory(classId.Get(), &hostnameFactory))) {
+        reply->error = QDnsLookup::ResolverError;
+        reply->errorString = QLatin1String("Could not obtain hostname factory");
+        return;
+    }
+    IHostName *host;
+    HStringReference hostNameRef((const wchar_t*)aceHostname.utf16());
+    hostnameFactory->CreateHostName(hostNameRef.Get(), &host);
+    hostnameFactory->Release();
+
+    IDatagramSocketStatics *datagramSocketStatics;
+    GetActivationFactory(HString::MakeReference(RuntimeClass_Windows_Networking_Sockets_DatagramSocket).Get(), &datagramSocketStatics);
+
+    IAsyncOperation<IVectorView<EndpointPair*> *> *op;
+    HSTRING proto;
+    WindowsCreateString(L"0", 1, &proto);
+    datagramSocketStatics->GetEndpointPairsAsync(host, proto, &op);
+    datagramSocketStatics->Release();
+    host->Release();
+
+    IVectorView<EndpointPair*> *endpointPairs = 0;
+    HRESULT hr = op->GetResults(&endpointPairs);
+    int waitCount = 0;
+    while (hr == E_ILLEGAL_METHOD_CALL) {
+        WaitForSingleObjectEx(GetCurrentThread(), 50, FALSE);
+        hr = op->GetResults(&endpointPairs);
+        if (++waitCount > 1200) // Wait for 1 minute max
+            return;
+    }
+    op->Release();
+
+    if (!endpointPairs)
+        return;
+
+    unsigned int size;
+    endpointPairs->get_Size(&size);
+    for (unsigned int i = 0; i < size; ++i) {
+        IEndpointPair *endpointpair;
+        endpointPairs->GetAt(i, &endpointpair);
+        IHostName *remoteHost;
+        endpointpair->get_RemoteHostName(&remoteHost);
+        endpointpair->Release();
+        HostNameType type;
+        remoteHost->get_Type(&type);
+        if (type == HostNameType_Bluetooth || type == HostNameType_DomainName
+                || (requestType != QDnsLookup::ANY
+                && ((type == HostNameType_Ipv4 && requestType == QDnsLookup::AAAA)
+                || (type == HostNameType_Ipv6 && requestType == QDnsLookup::A))))
+            continue;
+
+        HSTRING name;
+        remoteHost->get_CanonicalName(&name);
+        remoteHost->Release();
+        UINT32 length;
+        PCWSTR rawString = WindowsGetStringRawBuffer(name, &length);
+        QDnsHostAddressRecord record;
+        record.d->name = aceHostname;
+        record.d->value = QHostAddress(QString::fromWCharArray(rawString, length));
+        reply->hostAddressRecords.append(record);
+    }
+}
+
+QT_END_NAMESPACE