Signed-off-by: Mavridis Philippe <mavridisf@gmail.com>pull/6/head
Mavridis Philippe
5 months ago
parent
c7b0c7b88c
commit
87769ed51d
@ -1,5 +1,19 @@
|
|||||||
<!DOCTYPE node PUBLIC "-//freedesktop//DTD D-BUS Object Introspection 1.0//EN" "http://www.freedesktop.org/standards/dbus/1.0/introspect.dtd">
|
<!DOCTYPE node PUBLIC "-//freedesktop//DTD D-BUS Object Introspection 1.0//EN" "http://www.freedesktop.org/standards/dbus/1.0/introspect.dtd">
|
||||||
<node name="/org/freedesktop/portal/desktop">
|
<node name="/org/freedesktop/portal/desktop">
|
||||||
|
<!-- Email -->
|
||||||
|
<interface name="org.freedesktop.impl.portal.Email">
|
||||||
|
<method name="ComposeEmail">+
|
||||||
|
<arg type="o" name="handle" direction="in"/>
|
||||||
|
<arg type="s" name="app_id" direction="in"/>
|
||||||
|
<arg type="s" name="parent_window" direction="in"/>
|
||||||
|
<arg type="a{sv}" name="options" direction="in"/>
|
||||||
|
<arg type="u" name="response" direction="out"/>
|
||||||
|
<arg type="a{sv}" name="results" direction="out"/>
|
||||||
|
</method>
|
||||||
|
<property name="version" type="u" access="read"/>
|
||||||
|
</interface>
|
||||||
|
|
||||||
|
<!-- FileChooser -->
|
||||||
<interface name="org.freedesktop.impl.portal.FileChooser">
|
<interface name="org.freedesktop.impl.portal.FileChooser">
|
||||||
<method name="OpenFile">
|
<method name="OpenFile">
|
||||||
<arg name="handle" type="o" direction="in" />
|
<arg name="handle" type="o" direction="in" />
|
||||||
@ -0,0 +1,86 @@
|
|||||||
|
/*******************************************************************************
|
||||||
|
XDG desktop portal implementation for TDE
|
||||||
|
Copyright © 2024 Mavridis Philippe <mavridisf@gmail.com>
|
||||||
|
|
||||||
|
This program or library is free software; you can redistribute it and/or
|
||||||
|
modify it under the terms of the GNU Lesser General Public License as
|
||||||
|
published by the Free Software Foundation; either version 2.1 of the License,
|
||||||
|
or (at your option) any later version.
|
||||||
|
|
||||||
|
This library is distributed in the hope that it will be useful, but WITHOUT
|
||||||
|
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
|
||||||
|
FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more
|
||||||
|
details.
|
||||||
|
|
||||||
|
You should have received a copy of the GNU Lesser General Public License
|
||||||
|
along with this library; if not, write to the Free Software Foundation, Inc.,
|
||||||
|
51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
||||||
|
|
||||||
|
Improvements and feedback are welcome!
|
||||||
|
*******************************************************************************/
|
||||||
|
|
||||||
|
// TDE
|
||||||
|
#include <tdeapplication.h>
|
||||||
|
|
||||||
|
// Portal
|
||||||
|
#include "email_portal.h"
|
||||||
|
#include "email_portal.moc"
|
||||||
|
|
||||||
|
TDEEmailPortal::TDEEmailPortal(TQT_DBusConnection &connection)
|
||||||
|
: m_connection(connection)
|
||||||
|
{
|
||||||
|
}
|
||||||
|
|
||||||
|
TDEEmailPortal::~TDEEmailPortal()
|
||||||
|
{
|
||||||
|
}
|
||||||
|
|
||||||
|
void TDEEmailPortal::handleMethodReply(const TQT_DBusMessage &reply)
|
||||||
|
{
|
||||||
|
m_connection.send(reply);
|
||||||
|
}
|
||||||
|
|
||||||
|
bool TDEEmailPortal::handleSignalSend(const TQT_DBusMessage& reply) {
|
||||||
|
handleMethodReply(reply);
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool TDEEmailPortal::ComposeEmail(const TQT_DBusObjectPath& handle,
|
||||||
|
const TQString& app_id,
|
||||||
|
const TQString& parent_window,
|
||||||
|
const TQT_DBusVariantMap& options,
|
||||||
|
TQ_UINT32& response,
|
||||||
|
TQT_DBusVariantMap &results,
|
||||||
|
TQT_DBusError& error)
|
||||||
|
{
|
||||||
|
// void invokeMailer (const TQString &to, const TQString &cc, const TQString &bcc, const TQString &subject, const TQString &body, const TQString &messageFile=TQString::null, const TQStringList &attachURLs=TQStringList())
|
||||||
|
EmailOpts opts;
|
||||||
|
if (OPTION_VALID("address", "s"))
|
||||||
|
opts.rcpt << options["address"].value.toString();
|
||||||
|
|
||||||
|
if (OPTION_VALID("addresses", "as"))
|
||||||
|
opts.rcpt += options["addresses"].value.toList().toTQStringList();
|
||||||
|
|
||||||
|
if (OPTION_VALID("cc", "as"))
|
||||||
|
opts.cc += options["cc"].value.toList().toTQStringList();
|
||||||
|
|
||||||
|
if (OPTION_VALID("bcc", "as"))
|
||||||
|
opts.bcc += options["bcc"].value.toList().toTQStringList();
|
||||||
|
|
||||||
|
if (OPTION_VALID("subject", "s"))
|
||||||
|
opts.subj = options["subject"].value.toString();
|
||||||
|
|
||||||
|
if (OPTION_VALID("body", "s"))
|
||||||
|
opts.body = options["body"].value.toString();
|
||||||
|
|
||||||
|
if (OPTION_VALID("attachments", "as"))
|
||||||
|
{
|
||||||
|
opts.attach += options["attachments"].value.toList().toTQStringList();
|
||||||
|
}
|
||||||
|
|
||||||
|
kapp->invokeMailer(opts.rcpt.join(";"), opts.cc.join(";"), opts.bcc.join(";"),
|
||||||
|
opts.subj, opts.body, TQString::null, opts.attach);
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
|
||||||
|
// kate: replace-tabs true; tab-width 4; indent-width 4;
|
||||||
@ -0,0 +1,65 @@
|
|||||||
|
/*******************************************************************************
|
||||||
|
XDG desktop portal implementation for TDE
|
||||||
|
Copyright © 2024 Mavridis Philippe <mavridisf@gmail.com>
|
||||||
|
|
||||||
|
This program or library is free software; you can redistribute it and/or
|
||||||
|
modify it under the terms of the GNU Lesser General Public License as
|
||||||
|
published by the Free Software Foundation; either version 2.1 of the License,
|
||||||
|
or (at your option) any later version.
|
||||||
|
|
||||||
|
This library is distributed in the hope that it will be useful, but WITHOUT
|
||||||
|
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
|
||||||
|
FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more
|
||||||
|
details.
|
||||||
|
|
||||||
|
You should have received a copy of the GNU Lesser General Public License
|
||||||
|
along with this library; if not, write to the Free Software Foundation, Inc.,
|
||||||
|
51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
||||||
|
|
||||||
|
Improvements and feedback are welcome!
|
||||||
|
*******************************************************************************/
|
||||||
|
|
||||||
|
#ifndef __EMAIL_PORTAL_H
|
||||||
|
#define __EMAIL_PORTAL_H
|
||||||
|
|
||||||
|
// Portal
|
||||||
|
#include "interfaces/emailInterface.h"
|
||||||
|
#include "interface.h"
|
||||||
|
|
||||||
|
struct EmailOpts
|
||||||
|
{
|
||||||
|
TQStringList rcpt;
|
||||||
|
TQStringList cc;
|
||||||
|
TQStringList bcc;
|
||||||
|
TQString subj;
|
||||||
|
TQString body;
|
||||||
|
TQStringList attach;
|
||||||
|
};
|
||||||
|
|
||||||
|
class TDEEmailPortal : public TQObject,
|
||||||
|
public org::freedesktop::impl::portal::EmailInterface
|
||||||
|
{
|
||||||
|
public:
|
||||||
|
INTERFACE("org.freedesktop.impl.portal.Email")
|
||||||
|
|
||||||
|
TDEEmailPortal(TQT_DBusConnection &connection);
|
||||||
|
virtual ~TDEEmailPortal();
|
||||||
|
|
||||||
|
protected:
|
||||||
|
virtual void handleMethodReply(const TQT_DBusMessage& reply);
|
||||||
|
virtual bool handleSignalSend(const TQT_DBusMessage& reply);
|
||||||
|
|
||||||
|
virtual bool ComposeEmail(const TQT_DBusObjectPath& handle,
|
||||||
|
const TQString& app_id,
|
||||||
|
const TQString& parent_window,
|
||||||
|
const TQT_DBusVariantMap& options,
|
||||||
|
TQ_UINT32& response,
|
||||||
|
TQT_DBusVariantMap &results,
|
||||||
|
TQT_DBusError& error);
|
||||||
|
private:
|
||||||
|
TQT_DBusConnection m_connection;
|
||||||
|
};
|
||||||
|
|
||||||
|
#endif // __EMAIL_PORTAL_H
|
||||||
|
|
||||||
|
// kate: replace-tabs true; tab-width 4; indent-width 4;
|
||||||
@ -0,0 +1,46 @@
|
|||||||
|
/*******************************************************************************
|
||||||
|
XDG desktop portal implementation for TDE
|
||||||
|
Copyright © 2024 Mavridis Philippe <mavridisf@gmail.com>
|
||||||
|
|
||||||
|
This program or library is free software; you can redistribute it and/or
|
||||||
|
modify it under the terms of the GNU Lesser General Public License as
|
||||||
|
published by the Free Software Foundation; either version 2.1 of the License,
|
||||||
|
or (at your option) any later version.
|
||||||
|
|
||||||
|
This library is distributed in the hope that it will be useful, but WITHOUT
|
||||||
|
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
|
||||||
|
FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more
|
||||||
|
details.
|
||||||
|
|
||||||
|
You should have received a copy of the GNU Lesser General Public License
|
||||||
|
along with this library; if not, write to the Free Software Foundation, Inc.,
|
||||||
|
51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
||||||
|
|
||||||
|
Improvements and feedback are welcome!
|
||||||
|
*******************************************************************************/
|
||||||
|
|
||||||
|
/* Common definitions and includes for portal interfaces */
|
||||||
|
#ifndef __INTERFACE_H_
|
||||||
|
#define __INTERFACE_H_
|
||||||
|
|
||||||
|
// TQt
|
||||||
|
#include <tqdbusconnection.h>
|
||||||
|
#include <tqdbusmessage.h>
|
||||||
|
#include <tqdbusvariant.h>
|
||||||
|
#include <tqdbusdatalist.h>
|
||||||
|
#include <tqdbusdata.h>
|
||||||
|
#include <tqdbuserror.h>
|
||||||
|
#include <tqobject.h>
|
||||||
|
|
||||||
|
// Portal
|
||||||
|
#include "util.h"
|
||||||
|
|
||||||
|
#define INTERFACE(x) \
|
||||||
|
public: \
|
||||||
|
static const TQCString interface() { return x; }
|
||||||
|
|
||||||
|
|
||||||
|
#define OPTION_VALID(opt, sig) \
|
||||||
|
options.keys().contains(opt) && check_variant(options[opt], sig)
|
||||||
|
|
||||||
|
#endif // __INTERFACE_H_
|
||||||
@ -0,0 +1,117 @@
|
|||||||
|
/*******************************************************************************
|
||||||
|
XDG desktop portal implementation for TDE
|
||||||
|
Copyright © 2024 Mavridis Philippe <mavridisf@gmail.com>
|
||||||
|
|
||||||
|
This program or library is free software; you can redistribute it and/or
|
||||||
|
modify it under the terms of the GNU Lesser General Public License as
|
||||||
|
published by the Free Software Foundation; either version 2.1 of the License,
|
||||||
|
or (at your option) any later version.
|
||||||
|
|
||||||
|
This library is distributed in the hope that it will be useful, but WITHOUT
|
||||||
|
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
|
||||||
|
FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more
|
||||||
|
details.
|
||||||
|
|
||||||
|
You should have received a copy of the GNU Lesser General Public License
|
||||||
|
along with this library; if not, write to the Free Software Foundation, Inc.,
|
||||||
|
51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
||||||
|
|
||||||
|
Improvements and feedback are welcome!
|
||||||
|
*******************************************************************************/
|
||||||
|
|
||||||
|
// TDE
|
||||||
|
#include <kdebug.h>
|
||||||
|
|
||||||
|
// Portal
|
||||||
|
#include "util.h"
|
||||||
|
|
||||||
|
bool check_variant(TQT_DBusVariant variant, TQString signature)
|
||||||
|
{
|
||||||
|
return !variant.signature.isNull() && variant.signature == signature;
|
||||||
|
}
|
||||||
|
|
||||||
|
TQString bytelist_to_string(TQT_DBusDataList list)
|
||||||
|
{
|
||||||
|
if (list.type() != TQT_DBusData::Byte) return TQString::null;
|
||||||
|
TQCString bytes;
|
||||||
|
TQValueList<TQ_UINT8> vl = list.toByteList();
|
||||||
|
TQValueList<TQ_UINT8>::iterator vlit;
|
||||||
|
for (vlit = vl.begin(); vlit != vl.end(); ++vlit)
|
||||||
|
{
|
||||||
|
bytes += (*vlit);
|
||||||
|
}
|
||||||
|
return TQString::fromLocal8Bit(bytes.data(), bytes.size());
|
||||||
|
}
|
||||||
|
|
||||||
|
TQT_DBusDataList string_to_bytelist(TQString str)
|
||||||
|
{
|
||||||
|
TQCString bytes = str.latin1();
|
||||||
|
TQValueList<TQ_UINT8> vl;
|
||||||
|
char *bit;
|
||||||
|
for (bit = bytes.begin(); bit != bytes.end(); ++bit)
|
||||||
|
{
|
||||||
|
vl << (TQ_UINT8)(*bit);
|
||||||
|
}
|
||||||
|
return TQT_DBusDataList(vl);
|
||||||
|
}
|
||||||
|
|
||||||
|
TQT_DBusDataList kurl_list_to_datalist(KURL::List urls)
|
||||||
|
{
|
||||||
|
return TQT_DBusDataList(urls.toStringList());
|
||||||
|
}
|
||||||
|
|
||||||
|
bool make_variant(TQVariant variant, TQT_DBusVariant &other)
|
||||||
|
{
|
||||||
|
TQString signature;
|
||||||
|
switch (variant.type()) {
|
||||||
|
case TQVariant::String:
|
||||||
|
case TQVariant::Color:
|
||||||
|
case TQVariant::Font:
|
||||||
|
case TQVariant::Date:
|
||||||
|
case TQVariant::DateTime:
|
||||||
|
case TQVariant::Time:
|
||||||
|
case TQVariant::KeySequence:
|
||||||
|
other.signature = "s";
|
||||||
|
other.value = TQT_DBusData::fromString(variant.toString());
|
||||||
|
break;
|
||||||
|
|
||||||
|
case TQVariant::Int:
|
||||||
|
other.signature = "i";
|
||||||
|
other.value = TQT_DBusData::fromInt32(variant.toInt());
|
||||||
|
break;
|
||||||
|
|
||||||
|
case TQVariant::UInt:
|
||||||
|
other.signature = "u";
|
||||||
|
other.value = TQT_DBusData::fromUInt32(variant.toUInt());
|
||||||
|
break;
|
||||||
|
|
||||||
|
case TQVariant::Double:
|
||||||
|
case TQVariant::LongLong:
|
||||||
|
case TQVariant::ULongLong:
|
||||||
|
other.signature = "d";
|
||||||
|
other.value = TQT_DBusData::fromDouble(variant.toDouble());
|
||||||
|
break;
|
||||||
|
|
||||||
|
case TQVariant::Bool:
|
||||||
|
other.signature = "b";
|
||||||
|
other.value = TQT_DBusData::fromBool(variant.toBool());
|
||||||
|
break;
|
||||||
|
|
||||||
|
case TQVariant::StringList:
|
||||||
|
other.signature = "as";
|
||||||
|
other.value = TQT_DBusData::fromList(TQT_DBusDataList(variant.toStringList()));
|
||||||
|
break;
|
||||||
|
|
||||||
|
default:
|
||||||
|
if (variant.canCast(TQVariant::String)) {
|
||||||
|
other.signature = "s";
|
||||||
|
other.value = TQT_DBusData::fromString(variant.toString());
|
||||||
|
}
|
||||||
|
else {
|
||||||
|
kdDebug() << "Cannot cast TQVariant of type " << variant.type()
|
||||||
|
<< "to TQT_DBusVariant!" << endl;
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return true;
|
||||||
|
}
|
||||||
Loading…
Reference in new issue