317 lines
14 KiB
C++
317 lines
14 KiB
C++
|
/* -*- 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 "kde5access.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 kde5access
|
||
|
|
{
|
||
|
|
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: // Use the 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: // Use the 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: // Use the 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("ftp://ftp.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: // Use the 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("ftp://ftp.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: // Use the 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("ftp://ftp.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: // Use the 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("ftp://ftp.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: // Use the 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")
|
||
|
|
{
|
||
|
|
int 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: // Use the 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((sal_Int32)nProxyType));
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
OSL_ASSERT(false); // this cannot happen
|
||
|
|
}
|
||
|
|
return css::beans::Optional<css::uno::Any>();
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|