You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
365 lines
12 KiB
365 lines
12 KiB
/*
|
|
This file is part of KOrganizer.
|
|
Copyright (c) 1998 Barry D Benowitz
|
|
Copyright (c) 2001 Cornelius Schumacher <schumacher@kde.org>
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; either version 2 of the License, or
|
|
(at your option) any later version.
|
|
|
|
This program 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 General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program; if not, write to the Free Software
|
|
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
|
|
|
|
As a special exception, permission is given to link this program
|
|
with any edition of TQt, and distribute the resulting executable,
|
|
without including the source code for TQt in the source distribution.
|
|
*/
|
|
|
|
#include <unistd.h>
|
|
#include <stdio.h>
|
|
|
|
#include <klocale.h>
|
|
#include <kstandarddirs.h>
|
|
#include <kdebug.h>
|
|
#include <kmessagebox.h>
|
|
#include <kurl.h>
|
|
#include <kapplication.h>
|
|
#include <dcopclient.h>
|
|
#include <kprocess.h>
|
|
|
|
#include <libemailfunctions/email.h>
|
|
|
|
#include <libkpimidentities/identity.h>
|
|
#include <libkpimidentities/identitymanager.h>
|
|
|
|
#include <libkcal/event.h>
|
|
#include <libkcal/todo.h>
|
|
#include <libkcal/incidenceformatter.h>
|
|
|
|
#include "version.h"
|
|
#include "koprefs.h"
|
|
#include "kocore.h"
|
|
|
|
#include "komailclient.h"
|
|
|
|
KOMailClient::KOMailClient()
|
|
{
|
|
}
|
|
|
|
KOMailClient::~KOMailClient()
|
|
{
|
|
}
|
|
|
|
bool KOMailClient::mailAttendees(IncidenceBase *incidence,const TQString &attachment)
|
|
{
|
|
Attendee::List attendees = incidence->attendees();
|
|
if ( attendees.count() == 0 ) {
|
|
return false;
|
|
}
|
|
|
|
const TQString from = incidence->organizer().fullName();
|
|
const TQString organizerEmail = incidence->organizer().email();
|
|
|
|
TQStringList toList;
|
|
TQStringList ccList;
|
|
for ( uint i=0; i<attendees.count(); ++i ) {
|
|
Attendee *a = (*attendees.at(i));
|
|
|
|
const TQString email = a->email();
|
|
if ( email.isEmpty() ) {
|
|
continue;
|
|
}
|
|
|
|
// In case we (as one of our identities) are the organizer we are sending
|
|
// this mail. We could also have added ourselves as an attendee, in which
|
|
// case we don't want to send ourselves a notification mail.
|
|
if ( organizerEmail == email ) {
|
|
continue;
|
|
}
|
|
|
|
// Build a nice address for this attendee including the CN.
|
|
TQString tname, temail;
|
|
const TQString username = KPIM::quoteNameIfNecessary( a->name() );
|
|
KPIM::getNameAndMail( username, tname, temail ); // ignore return value
|
|
// which is always false
|
|
tname += " <" + email + '>';
|
|
|
|
|
|
// Optional Participants and Non-Participants are copied on the email
|
|
if ( a->role() == Attendee::OptParticipant ||
|
|
a->role() == Attendee::NonParticipant ) {
|
|
ccList << tname;
|
|
} else {
|
|
toList << tname;
|
|
}
|
|
}
|
|
|
|
if( toList.count() == 0 && ccList.count() == 0 ) {
|
|
// Not really to be called a groupware meeting, eh
|
|
return false;
|
|
}
|
|
TQString to;
|
|
if ( toList.count() > 0 ) {
|
|
to = toList.join( ", " );
|
|
}
|
|
TQString cc;
|
|
if ( ccList.count() > 0 ) {
|
|
cc = ccList.join( ", " );
|
|
}
|
|
|
|
TQString subject;
|
|
if(incidence->type()!="FreeBusy") {
|
|
Incidence *inc = static_cast<Incidence *>(incidence);
|
|
subject = inc->summary();
|
|
} else {
|
|
subject = "Free Busy Object";
|
|
}
|
|
|
|
TQString body = IncidenceFormatter::mailBodyString(incidence);
|
|
|
|
bool bcc = KOPrefs::instance()->mBcc;
|
|
|
|
return send(from,to,cc,subject,body,bcc,attachment);
|
|
}
|
|
|
|
bool KOMailClient::mailOrganizer(IncidenceBase *incidence,const TQString &attachment, const TQString &sub)
|
|
{
|
|
TQString to = incidence->organizer().fullName();
|
|
|
|
TQString from = KOPrefs::instance()->email();
|
|
|
|
TQString subject = sub;
|
|
if(incidence->type()!="FreeBusy") {
|
|
Incidence *inc = static_cast<Incidence *>(incidence);
|
|
if ( subject.isEmpty() )
|
|
subject = inc->summary();
|
|
} else {
|
|
subject = "Free Busy Message";
|
|
}
|
|
|
|
TQString body = IncidenceFormatter::mailBodyString(incidence);
|
|
|
|
bool bcc = KOPrefs::instance()->mBcc;
|
|
|
|
return send(from,to,TQString(),subject,body,bcc,attachment);
|
|
}
|
|
|
|
bool KOMailClient::mailTo(IncidenceBase *incidence,const TQString &recipients,
|
|
const TQString &attachment)
|
|
{
|
|
TQString from = KOPrefs::instance()->email();
|
|
TQString subject;
|
|
if(incidence->type()!="FreeBusy") {
|
|
Incidence *inc = static_cast<Incidence *>(incidence);
|
|
subject = inc->summary();
|
|
} else {
|
|
subject = "Free Busy Message";
|
|
}
|
|
TQString body = IncidenceFormatter::mailBodyString(incidence);
|
|
bool bcc = KOPrefs::instance()->mBcc;
|
|
kdDebug () << "KOMailClient::mailTo " << recipients << endl;
|
|
return send(from,recipients,TQString(),subject,body,bcc,attachment);
|
|
}
|
|
|
|
bool KOMailClient::send(const TQString &from,const TQString &_to,const TQString &cc,
|
|
const TQString &subject,const TQString &body,bool bcc,
|
|
const TQString &attachment)
|
|
{
|
|
// We must have a recipients list for most MUAs. Thus, if the 'to' list
|
|
// is empty simply use the 'from' address as the recipient.
|
|
TQString to = _to;
|
|
if ( to.isEmpty() ) {
|
|
to = from;
|
|
}
|
|
|
|
kdDebug(5850) << "KOMailClient::sendMail():\nFrom: " << from
|
|
<< "\nTo: " << to
|
|
<< "\nCC: " << cc
|
|
<< "\nSubject: " << subject << "\nBody: \n" << body
|
|
<< "\nAttachment:\n" << attachment << endl;
|
|
|
|
if (KOPrefs::instance()->mMailClient == KOPrefs::MailClientSendmail) {
|
|
bool needHeaders = true;
|
|
|
|
TQString command = KStandardDirs::findExe(TQString::tqfromLatin1("sendmail"),
|
|
TQString::tqfromLatin1("/sbin:/usr/sbin:/usr/lib"));
|
|
if (!command.isNull()) command += TQString::tqfromLatin1(" -oi -t");
|
|
else {
|
|
command = KStandardDirs::findExe(TQString::tqfromLatin1("mail"));
|
|
if (command.isNull()) return false; // give up
|
|
|
|
command.append(TQString::tqfromLatin1(" -s "));
|
|
command.append(KProcess::quote(subject));
|
|
|
|
if (bcc) {
|
|
command.append(TQString::tqfromLatin1(" -b "));
|
|
command.append(KProcess::quote(from));
|
|
}
|
|
|
|
if ( !cc.isEmpty() ) {
|
|
command.append(" -c ");
|
|
command.append(KProcess::quote(cc));
|
|
}
|
|
|
|
command.append(" ");
|
|
command.append(KProcess::quote(to));
|
|
|
|
needHeaders = false;
|
|
}
|
|
|
|
FILE * fd = popen(command.local8Bit(),"w");
|
|
if (!fd)
|
|
{
|
|
kdError() << "Unable to open a pipe to " << command << endl;
|
|
return false;
|
|
}
|
|
|
|
TQString textComplete;
|
|
if (needHeaders)
|
|
{
|
|
textComplete += TQString::tqfromLatin1("From: ") + from + '\n';
|
|
textComplete += TQString::tqfromLatin1("To: ") + to + '\n';
|
|
if ( !cc.isEmpty() ) {
|
|
textComplete += TQString::tqfromLatin1("Cc: " ) + cc + '\n';
|
|
}
|
|
if (bcc) textComplete += TQString::tqfromLatin1("Bcc: ") + from + '\n';
|
|
textComplete += TQString::tqfromLatin1("Subject: ") + subject + '\n';
|
|
textComplete += TQString::tqfromLatin1("X-Mailer: KOrganizer") + korgVersion + '\n';
|
|
}
|
|
textComplete += '\n'; // end of headers
|
|
textComplete += body;
|
|
textComplete += '\n';
|
|
textComplete += attachment;
|
|
|
|
fwrite(textComplete.local8Bit(),textComplete.length(),1,fd);
|
|
|
|
pclose(fd);
|
|
} else {
|
|
if (!kapp->dcopClient()->isApplicationRegistered("kmail")) {
|
|
if (KApplication::startServiceByDesktopName("kmail")) {
|
|
KMessageBox::error(0,i18n("No running instance of KMail found."));
|
|
return false;
|
|
}
|
|
}
|
|
|
|
if (attachment.isEmpty()) {
|
|
if (!kMailOpenComposer(to,cc,bcc ? from : "",subject,body,0,KURL())) return false;
|
|
} else {
|
|
TQString meth;
|
|
int idx = attachment.tqfind("METHOD");
|
|
if (idx>=0) {
|
|
idx = attachment.tqfind(':',idx)+1;
|
|
const int newline = attachment.tqfind('\n',idx);
|
|
meth = attachment.mid(idx, newline - idx - 1);
|
|
meth = meth.lower().stripWhiteSpace();
|
|
} else {
|
|
meth = "publish";
|
|
}
|
|
if (!kMailOpenComposer(to,cc,bcc ? from : "",subject,body,0,"cal.ics","7bit",
|
|
attachment.utf8(),"text","calendar","method",meth,
|
|
"attachment","utf-8",
|
|
KOCore::self()->identityManager()->identityForAddress( from ).uoid())) {
|
|
return false;
|
|
}
|
|
}
|
|
}
|
|
return true;
|
|
}
|
|
|
|
int KOMailClient::kMailOpenComposer(const TQString& arg0,const TQString& arg1,
|
|
const TQString& arg2,const TQString& arg3,const TQString& arg4,int arg5,
|
|
const KURL& arg6)
|
|
{
|
|
//kdDebug(5850) << "KOMailClient::kMailOpenComposer( "
|
|
// << arg0 << " , " << arg1 << arg2 << " , " << arg3
|
|
// << arg4 << " , " << arg5 << " , " << arg6 << " )" << endl;
|
|
int result = 0;
|
|
|
|
TQByteArray data, replyData;
|
|
TQCString replyType;
|
|
TQDataStream arg( data, IO_WriteOnly );
|
|
arg << arg0;
|
|
arg << arg1;
|
|
arg << arg2;
|
|
arg << arg3;
|
|
arg << arg4;
|
|
arg << arg5;
|
|
arg << arg6;
|
|
#if KDE_IS_VERSION( 3, 2, 90 )
|
|
kapp->updateRemoteUserTimestamp( "kmail" );
|
|
#endif
|
|
if (kapp->dcopClient()->call("kmail","KMailIface","openComposer(TQString,TQString,TQString,TQString,TQString,int,KURL)", data, replyType, replyData ) ) {
|
|
if ( replyType == "int" ) {
|
|
TQDataStream _reply_stream( replyData, IO_ReadOnly );
|
|
_reply_stream >> result;
|
|
} else {
|
|
kdDebug(5850) << "kMailOpenComposer() call failed." << endl;
|
|
}
|
|
} else {
|
|
kdDebug(5850) << "kMailOpenComposer() call failed." << endl;
|
|
}
|
|
return result;
|
|
}
|
|
|
|
int KOMailClient::kMailOpenComposer( const TQString& arg0, const TQString& arg1,
|
|
const TQString& arg2, const TQString& arg3,
|
|
const TQString& arg4, int arg5, const TQString& arg6,
|
|
const TQCString& arg7, const TQCString& arg8,
|
|
const TQCString& arg9, const TQCString& arg10,
|
|
const TQCString& arg11, const TQString& arg12,
|
|
const TQCString& arg13, const TQCString& arg14, uint identity )
|
|
{
|
|
//kdDebug(5850) << "KOMailClient::kMailOpenComposer( "
|
|
// << arg0 << " , " << arg1 << arg2 << " , " << arg3
|
|
// << arg4 << " , " << arg5 << " , " << arg6
|
|
// << arg7 << " , " << arg8 << " , " << arg9
|
|
// << arg10<< " , " << arg11<< " , " << arg12
|
|
// << arg13<< " , " << arg14<< " )" << endl;
|
|
|
|
int result = 0;
|
|
|
|
TQByteArray data, replyData;
|
|
TQCString replyType;
|
|
TQDataStream arg( data, IO_WriteOnly );
|
|
arg << arg0;
|
|
arg << arg1;
|
|
arg << arg2;
|
|
arg << arg3;
|
|
arg << arg4;
|
|
arg << arg5;
|
|
arg << arg6;
|
|
arg << arg7;
|
|
arg << arg8;
|
|
arg << arg9;
|
|
arg << arg10;
|
|
arg << arg11;
|
|
arg << arg12;
|
|
arg << arg13;
|
|
arg << arg14;
|
|
arg << identity;
|
|
#if KDE_IS_VERSION( 3, 2, 90 )
|
|
kapp->updateRemoteUserTimestamp("kmail");
|
|
#endif
|
|
if ( kapp->dcopClient()->call("kmail","KMailIface",
|
|
"openComposer(TQString,TQString,TQString,TQString,TQString,int,TQString,TQCString,TQCString,TQCString,TQCString,TQCString,TQString,TQCString,TQCString,uint)", data, replyType, replyData ) ) {
|
|
if ( replyType == "int" ) {
|
|
TQDataStream _reply_stream( replyData, IO_ReadOnly );
|
|
_reply_stream >> result;
|
|
} else {
|
|
kdDebug(5850) << "kMailOpenComposer() call failed." << endl;
|
|
}
|
|
} else {
|
|
kdDebug(5850) << "kMailOpenComposer() call failed." << endl;
|
|
}
|
|
return result;
|
|
}
|
|
|
|
|