Adding upstream version 1:7.0.4.upstream/1%7.0.4upstream

Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>

1 files changed, 308 insertions, 0 deletions

diff --git a/shell/source/backends/kf5be/kf5access.cxx b/shell/source/backends/kf5be/kf5access.cxx
new file mode 100644
index 000000000..00db5c544
--- /dev/null
+++ b/shell/source/backends/kf5be/kf5access.cxx
@@ -0,0 +1,308 @@
+/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
+/*
+ * This file is part of the LibreOffice project.
+ *
+ * This Source Code Form is subject to the terms of the Mozilla Public
+ * License, v. 2.0. If a copy of the MPL was not distributed with this
+ * file, You can obtain one at http://mozilla.org/MPL/2.0/.
+ *
+ * This file incorporates work covered by the following license notice:
+ *
+ *   Licensed to the Apache Software Foundation (ASF) under one or more
+ *   contributor license agreements. See the NOTICE file distributed
+ *   with this work for additional information regarding copyright
+ *   ownership. The ASF licenses this file to you under the Apache
+ *   License, Version 2.0 (the "License"); you may not use this file
+ *   except in compliance with the License. You may obtain a copy of
+ *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
+ */
+
+#include <sal/config.h>
+
+#include "kf5access.hxx"
+
+#include <QtGui/QFont>
+#include <QtCore/QString>
+#include <QtGui/QFontDatabase>
+#include <QtCore/QStandardPaths>
+#include <QtCore/QDir>
+#include <QtCore/QUrl>
+
+#include <kprotocolmanager.h>
+
+#include <kemailsettings.h>
+// #include <kglobalsettings.h>
+
+#include <com/sun/star/uno/Any.hxx>
+#include <cppu/unotype.hxx>
+#include <osl/diagnose.h>
+#include <osl/file.h>
+#include <rtl/string.h>
+#include <rtl/ustring.hxx>
+
+namespace kf5access
+{
+namespace
+{
+namespace uno = css::uno;
+}
+
+css::beans::Optional<css::uno::Any> getValue(OUString const& id)
+{
+    if (id == "ExternalMailer")
+    {
+        KEMailSettings aEmailSettings;
+        QString aClientProgram;
+        OUString sClientProgram;
+
+        aClientProgram = aEmailSettings.getSetting(KEMailSettings::ClientProgram);
+        if (aClientProgram.isEmpty())
+            aClientProgram = QStringLiteral("kmail");
+        else
+            aClientProgram = aClientProgram.section(QLatin1Char(' '), 0, 0);
+        sClientProgram = reinterpret_cast<const sal_Unicode*>(aClientProgram.utf16());
+        return css::beans::Optional<css::uno::Any>(true, uno::makeAny(sClientProgram));
+    }
+    else if (id == "SourceViewFontHeight")
+    {
+        const QFont aFixedFont = QFontDatabase::systemFont(QFontDatabase::FixedFont);
+        const short nFontHeight = aFixedFont.pointSize();
+        return css::beans::Optional<css::uno::Any>(true, uno::makeAny(nFontHeight));
+    }
+    else if (id == "SourceViewFontName")
+    {
+        const QFont aFixedFont = QFontDatabase::systemFont(QFontDatabase::FixedFont);
+        const QString aFontName = aFixedFont.family();
+        const OUString sFontName = reinterpret_cast<const sal_Unicode*>(aFontName.utf16());
+        return css::beans::Optional<css::uno::Any>(true, uno::makeAny(sFontName));
+    }
+    else if (id == "EnableATToolSupport")
+    {
+        /* does not make much sense without an accessibility bridge */
+        bool ATToolSupport = false;
+        return css::beans::Optional<css::uno::Any>(true,
+                                                   uno::makeAny(OUString::boolean(ATToolSupport)));
+    }
+    else if (id == "WorkPathVariable")
+    {
+        QString aDocumentsDir(QStandardPaths::writableLocation(QStandardPaths::DocumentsLocation));
+        if (aDocumentsDir.isEmpty())
+            aDocumentsDir = QDir::homePath();
+        OUString sDocumentsDir;
+        OUString sDocumentsURL;
+        if (aDocumentsDir.endsWith(QLatin1Char('/')))
+            aDocumentsDir.truncate(aDocumentsDir.length() - 1);
+        sDocumentsDir = reinterpret_cast<const sal_Unicode*>(aDocumentsDir.utf16());
+        osl_getFileURLFromSystemPath(sDocumentsDir.pData, &sDocumentsURL.pData);
+        return css::beans::Optional<css::uno::Any>(true, uno::makeAny(sDocumentsURL));
+    }
+    else if (id == "ooInetFTPProxyName")
+    {
+        QString aFTPProxy;
+        switch (KProtocolManager::proxyType())
+        {
+            case KProtocolManager::ManualProxy: // Proxies are manually configured
+                aFTPProxy = KProtocolManager::proxyFor(QStringLiteral("FTP"));
+                break;
+            case KProtocolManager::PACProxy: // A proxy configuration URL has been given
+            case KProtocolManager::WPADProxy: // A proxy should be automatically discovered
+            case KProtocolManager::EnvVarProxy: // Proxy values set through environment variables
+                // In such cases, the proxy address is not stored in KDE, but determined dynamically.
+                // The proxy address may depend on the requested address, on the time of the day, on the speed of the wind...
+                // The best we can do here is to ask the current value for a given address.
+                aFTPProxy = KProtocolManager::proxyForUrl(
+                    QUrl(QStringLiteral("ftp://ftp.libreoffice.org")));
+                break;
+            default: // No proxy is used
+                break;
+        }
+        if (!aFTPProxy.isEmpty())
+        {
+            QUrl aProxy(aFTPProxy);
+            OUString sProxy = reinterpret_cast<const sal_Unicode*>(aProxy.host().utf16());
+            return css::beans::Optional<css::uno::Any>(true, uno::makeAny(sProxy));
+        }
+    }
+    else if (id == "ooInetFTPProxyPort")
+    {
+        QString aFTPProxy;
+        switch (KProtocolManager::proxyType())
+        {
+            case KProtocolManager::ManualProxy: // Proxies are manually configured
+                aFTPProxy = KProtocolManager::proxyFor(QStringLiteral("FTP"));
+                break;
+            case KProtocolManager::PACProxy: // A proxy configuration URL has been given
+            case KProtocolManager::WPADProxy: // A proxy should be automatically discovered
+            case KProtocolManager::EnvVarProxy: // Proxy values set through environment variables
+                // In such cases, the proxy address is not stored in KDE, but determined dynamically.
+                // The proxy address may depend on the requested address, on the time of the day, on the speed of the wind...
+                // The best we can do here is to ask the current value for a given address.
+                aFTPProxy = KProtocolManager::proxyForUrl(
+                    QUrl(QStringLiteral("ftp://ftp.libreoffice.org")));
+                break;
+            default: // No proxy is used
+                break;
+        }
+        if (!aFTPProxy.isEmpty())
+        {
+            QUrl aProxy(aFTPProxy);
+            sal_Int32 nPort = aProxy.port();
+            return css::beans::Optional<css::uno::Any>(true, uno::makeAny(nPort));
+        }
+    }
+    else if (id == "ooInetHTTPProxyName")
+    {
+        QString aHTTPProxy;
+        switch (KProtocolManager::proxyType())
+        {
+            case KProtocolManager::ManualProxy: // Proxies are manually configured
+                aHTTPProxy = KProtocolManager::proxyFor(QStringLiteral("HTTP"));
+                break;
+            case KProtocolManager::PACProxy: // A proxy configuration URL has been given
+            case KProtocolManager::WPADProxy: // A proxy should be automatically discovered
+            case KProtocolManager::EnvVarProxy: // Proxy values set through environment variables
+                // In such cases, the proxy address is not stored in KDE, but determined dynamically.
+                // The proxy address may depend on the requested address, on the time of the day, on the speed of the wind...
+                // The best we can do here is to ask the current value for a given address.
+                aHTTPProxy = KProtocolManager::proxyForUrl(
+                    QUrl(QStringLiteral("http://www.libreoffice.org")));
+                break;
+            default: // No proxy is used
+                break;
+        }
+        if (!aHTTPProxy.isEmpty())
+        {
+            QUrl aProxy(aHTTPProxy);
+            OUString sProxy = reinterpret_cast<const sal_Unicode*>(aProxy.host().utf16());
+            return css::beans::Optional<css::uno::Any>(true, uno::makeAny(sProxy));
+        }
+    }
+    else if (id == "ooInetHTTPProxyPort")
+    {
+        QString aHTTPProxy;
+        switch (KProtocolManager::proxyType())
+        {
+            case KProtocolManager::ManualProxy: // Proxies are manually configured
+                aHTTPProxy = KProtocolManager::proxyFor(QStringLiteral("HTTP"));
+                break;
+            case KProtocolManager::PACProxy: // A proxy configuration URL has been given
+            case KProtocolManager::WPADProxy: // A proxy should be automatically discovered
+            case KProtocolManager::EnvVarProxy: // Proxy values set through environment variables
+                // In such cases, the proxy address is not stored in KDE, but determined dynamically.
+                // The proxy address may depend on the requested address, on the time of the day, on the speed of the wind...
+                // The best we can do here is to ask the current value for a given address.
+                aHTTPProxy = KProtocolManager::proxyForUrl(
+                    QUrl(QStringLiteral("http://www.libreoffice.org")));
+                break;
+            default: // No proxy is used
+                break;
+        }
+        if (!aHTTPProxy.isEmpty())
+        {
+            QUrl aProxy(aHTTPProxy);
+            sal_Int32 nPort = aProxy.port();
+            return css::beans::Optional<css::uno::Any>(true, uno::makeAny(nPort));
+        }
+    }
+    else if (id == "ooInetHTTPSProxyName")
+    {
+        QString aHTTPSProxy;
+        switch (KProtocolManager::proxyType())
+        {
+            case KProtocolManager::ManualProxy: // Proxies are manually configured
+                aHTTPSProxy = KProtocolManager::proxyFor(QStringLiteral("HTTPS"));
+                break;
+            case KProtocolManager::PACProxy: // A proxy configuration URL has been given
+            case KProtocolManager::WPADProxy: // A proxy should be automatically discovered
+            case KProtocolManager::EnvVarProxy: // Proxy values set through environment variables
+                // In such cases, the proxy address is not stored in KDE, but determined dynamically.
+                // The proxy address may depend on the requested address, on the time of the day, on the speed of the wind...
+                // The best we can do here is to ask the current value for a given address.
+                aHTTPSProxy = KProtocolManager::proxyForUrl(
+                    QUrl(QStringLiteral("https://www.libreoffice.org")));
+                break;
+            default: // No proxy is used
+                break;
+        }
+        if (!aHTTPSProxy.isEmpty())
+        {
+            QUrl aProxy(aHTTPSProxy);
+            OUString sProxy = reinterpret_cast<const sal_Unicode*>(aProxy.host().utf16());
+            return css::beans::Optional<css::uno::Any>(true, uno::makeAny(sProxy));
+        }
+    }
+    else if (id == "ooInetHTTPSProxyPort")
+    {
+        QString aHTTPSProxy;
+        switch (KProtocolManager::proxyType())
+        {
+            case KProtocolManager::ManualProxy: // Proxies are manually configured
+                aHTTPSProxy = KProtocolManager::proxyFor(QStringLiteral("HTTPS"));
+                break;
+            case KProtocolManager::PACProxy: // A proxy configuration URL has been given
+            case KProtocolManager::WPADProxy: // A proxy should be automatically discovered
+            case KProtocolManager::EnvVarProxy: // Proxy values set through environment variables
+                // In such cases, the proxy address is not stored in KDE, but determined dynamically.
+                // The proxy address may depend on the requested address, on the time of the day, on the speed of the wind...
+                // The best we can do here is to ask the current value for a given address.
+                aHTTPSProxy = KProtocolManager::proxyForUrl(
+                    QUrl(QStringLiteral("https://www.libreoffice.org")));
+                break;
+            default: // No proxy is used
+                break;
+        }
+        if (!aHTTPSProxy.isEmpty())
+        {
+            QUrl aProxy(aHTTPSProxy);
+            sal_Int32 nPort = aProxy.port();
+            return css::beans::Optional<css::uno::Any>(true, uno::makeAny(nPort));
+        }
+    }
+    else if (id == "ooInetNoProxy")
+    {
+        QString aNoProxyFor;
+        switch (KProtocolManager::proxyType())
+        {
+            case KProtocolManager::ManualProxy: // Proxies are manually configured
+            case KProtocolManager::PACProxy: // A proxy configuration URL has been given
+            case KProtocolManager::WPADProxy: // A proxy should be automatically discovered
+            case KProtocolManager::EnvVarProxy: // Proxy values set through environment variables
+                aNoProxyFor = KProtocolManager::noProxyFor();
+                break;
+            default: // No proxy is used
+                break;
+        }
+        if (!aNoProxyFor.isEmpty())
+        {
+            OUString sNoProxyFor;
+
+            aNoProxyFor = aNoProxyFor.replace(QLatin1Char(','), QLatin1Char(';'));
+            sNoProxyFor = reinterpret_cast<const sal_Unicode*>(aNoProxyFor.utf16());
+            return css::beans::Optional<css::uno::Any>(true, uno::makeAny(sNoProxyFor));
+        }
+    }
+    else if (id == "ooInetProxyType")
+    {
+        sal_Int32 nProxyType;
+        switch (KProtocolManager::proxyType())
+        {
+            case KProtocolManager::ManualProxy: // Proxies are manually configured
+            case KProtocolManager::PACProxy: // A proxy configuration URL has been given
+            case KProtocolManager::WPADProxy: // A proxy should be automatically discovered
+            case KProtocolManager::EnvVarProxy: // Proxy values set through environment variables
+                nProxyType = 1;
+                break;
+            default: // No proxy is used
+                nProxyType = 0;
+        }
+        return css::beans::Optional<css::uno::Any>(true, uno::makeAny(nProxyType));
+    }
+    else
+    {
+        OSL_ASSERT(false); // this cannot happen
+    }
+    return css::beans::Optional<css::uno::Any>();
+}
+}
+
+/* vim:set shiftwidth=4 softtabstop=4 expandtab: */