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.
tdepim/kmail/headerstyle.cpp

1122 lines
41 KiB

/* -*- c++ -*-
headerstyle.cpp
This file is part of KMail, the KDE mail client.
Copyright (c) 2003 Marc Mutz <mutz@kde.org>
KMail is free software; you can redistribute it and/or modify it
under the terms of the GNU General Public License, version 2, as
published by the Free Software Foundation.
KMail 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
In addition, as a special exception, the copyright holders give
permission to link the code of this program with any edition of
the TQt library by Trolltech AS, Norway (or with modified versions
of TQt that use the same license as TQt), and distribute linked
combinations including the two. You must obey the GNU General
Public License in all respects for all of the code used other than
TQt. If you modify this file, you may extend this exception to
your version of the file, but you are not obligated to do so. If
you do not wish to do so, delete this exception statement from
your version.
*/
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif
#include "headerstyle.h"
#include "headerstrategy.h"
#include "kmkernel.h"
#include "linklocator.h"
#include "kmmessage.h"
#include "spamheaderanalyzer.h"
#include "globalsettings.h"
#include <libemailfunctions/email.h>
#include <libtdepim/kxface.h>
using namespace KPIM;
#include <mimelib/string.h>
#include <mimelib/field.h>
#include <mimelib/headers.h>
#include <kdebug.h>
#include <klocale.h>
#include <kglobal.h>
#include <kimproxy.h>
#include <kabc/stdaddressbook.h>
#include <kabc/addresseelist.h>
#include <kmdcodec.h>
#include <tqdatetime.h>
#include <tqbuffer.h>
#include <tqbitmap.h>
#include <tqimage.h>
#include <tqapplication.h>
#include <tqregexp.h>
#include <kstandarddirs.h>
namespace KMail {
//
// Convenience functions:
//
static inline TQString directionOf( const TQString & str ) {
return str.isRightToLeft() ? "rtl" : "ltr" ;
}
#if 0
// Converts to html. Changes URLs into href's, escapes HTML special
// chars and inserts the result into an <div> or <span> tag with
// "dir" set to "rtl" or "ltr" depending on the direction of @p str.
static TQString convertToHtmlBlock( const TQString & str, bool useSpan=false ) {
TQString dir = directionOf( str );
TQString format = "<%1 dir=\"%3\">%4</%2>";
return format.arg( useSpan ? "span" : "div" )
.arg( useSpan ? "span" : "div" )
.arg( dir )
.arg( LinkLocator::convertToHtml( str ) );
}
#endif
// ### tmp wrapper to make kmreaderwin code working:
static TQString strToHtml( const TQString & str,
int flags = LinkLocator::PreserveSpaces ) {
return LinkLocator::convertToHtml( str, flags );
}
//
// BriefHeaderStyle
// Show everything in a single line, don't show header field names.
//
class BriefHeaderStyle : public HeaderStyle {
friend class ::KMail::HeaderStyle;
protected:
BriefHeaderStyle() : HeaderStyle() {}
virtual ~BriefHeaderStyle() {}
public:
const char * name() const { return "brief"; }
const HeaderStyle * next() const { return plain(); }
const HeaderStyle * prev() const { return fancy(); }
TQString format( const KMMessage * message, const HeaderStrategy * strategy,
const TQString & vCardName, bool printing, bool topLevel ) const;
};
TQString BriefHeaderStyle::format( const KMMessage * message,
const HeaderStrategy * strategy,
const TQString & vCardName, bool printing, bool topLevel ) const {
Q_UNUSED( topLevel );
if ( !message ) return TQString();
if ( !strategy )
strategy = HeaderStrategy::brief();
// The direction of the header is determined according to the direction
// of the application layout.
TQString dir = TQApplication::reverseLayout() ? "rtl" : "ltr" ;
// However, the direction of the message subject within the header is
// determined according to the contents of the subject itself. Since
// the "Re:" and "Fwd:" prefixes would always cause the subject to be
// considered left-to-right, they are ignored when determining its
// direction.
TQString subjectDir;
if (!message->subject().isEmpty())
subjectDir = directionOf( message->cleanSubject() );
else
subjectDir = directionOf( i18n("No Subject") );
// Prepare the date string (when printing always use the localized date)
TQString dateString;
if( printing ) {
TQDateTime dateTime;
KLocale * locale = KGlobal::locale();
dateTime.setTime_t( message->date() );
dateString = locale->formatDateTime( dateTime );
} else {
dateString = message->dateStr();
}
TQString headerStr = "<div class=\"header\" dir=\"" + dir + "\">\n";
if ( strategy->showHeader( "subject" ) )
headerStr += "<div dir=\"" + subjectDir + "\">\n"
"<b style=\"font-size:130%\">" +
strToHtml( message->subject() ) +
"</b></div>\n";
TQStringList headerParts;
if ( strategy->showHeader( "from" ) ) {
TQString fromStr = message->from();
if ( fromStr.isEmpty() ) // no valid email in from, maybe just a name
fromStr = message->fromStrip(); // let's use that
TQString fromPart = KMMessage::emailAddrAsAnchor( fromStr, true );
if ( !vCardName.isEmpty() )
fromPart += "&nbsp;&nbsp;<a href=\"" + vCardName + "\">" + i18n("[vCard]") + "</a>";
headerParts << fromPart;
}
if ( strategy->showHeader( "cc" ) && !message->cc().isEmpty() )
headerParts << i18n("CC: ") + KMMessage::emailAddrAsAnchor( message->cc(), true );
if ( strategy->showHeader( "bcc" ) && !message->bcc().isEmpty() )
headerParts << i18n("BCC: ") + KMMessage::emailAddrAsAnchor( message->bcc(), true );
if ( strategy->showHeader( "date" ) )
headerParts << strToHtml(message->dateShortStr());
// remove all empty (modulo whitespace) entries and joins them via ", \n"
headerStr += " (" + headerParts.grep( TQRegExp( "\\S" ) ).join( ",\n" ) + ')';
headerStr += "</div>\n";
// ### iterate over the rest of strategy->headerToDisplay() (or
// ### all headers if DefaultPolicy == Display) (elsewhere, too)
return headerStr;
}
//
// PlainHeaderStyle:
// show every header field on a line by itself,
// show subject larger
//
class PlainHeaderStyle : public HeaderStyle {
friend class ::KMail::HeaderStyle;
protected:
PlainHeaderStyle() : HeaderStyle() {}
virtual ~PlainHeaderStyle() {}
public:
const char * name() const { return "plain"; }
const HeaderStyle * next() const { return fancy(); }
const HeaderStyle * prev() const { return brief(); }
TQString format( const KMMessage * message, const HeaderStrategy * strategy,
const TQString & vCardName, bool printing, bool topLevel ) const;
private:
TQString formatAllMessageHeaders( const KMMessage * message ) const;
};
TQString PlainHeaderStyle::format( const KMMessage * message,
const HeaderStrategy * strategy,
const TQString & vCardName, bool printing, bool topLevel ) const {
Q_UNUSED( topLevel );
if ( !message ) return TQString();
if ( !strategy )
strategy = HeaderStrategy::rich();
// The direction of the header is determined according to the direction
// of the application layout.
TQString dir = ( TQApplication::reverseLayout() ? "rtl" : "ltr" );
// However, the direction of the message subject within the header is
// determined according to the contents of the subject itself. Since
// the "Re:" and "Fwd:" prefixes would always cause the subject to be
// considered left-to-right, they are ignored when determining its
// direction.
TQString subjectDir;
if (!message->subject().isEmpty())
subjectDir = directionOf( message->cleanSubject() );
else
subjectDir = directionOf( i18n("No Subject") );
// Prepare the date string (when printing always use the localized date)
TQString dateString;
if( printing ) {
TQDateTime dateTime;
KLocale* locale = KGlobal::locale();
dateTime.setTime_t( message->date() );
dateString = locale->formatDateTime( dateTime );
}
else {
dateString = message->dateStr();
}
TQString headerStr;
if ( strategy->headersToDisplay().isEmpty()
&& strategy->defaultPolicy() == HeaderStrategy::Display ) {
// crude way to emulate "all" headers - Note: no strings have
// i18n(), so direction should always be ltr.
headerStr= TQString("<div class=\"header\" dir=\"ltr\">");
headerStr += formatAllMessageHeaders( message );
return headerStr + "</div>";
}
headerStr = TQString("<div class=\"header\" dir=\"%1\">").arg(dir);
//case HdrLong:
if ( strategy->showHeader( "subject" ) )
headerStr += TQString("<div dir=\"%1\"><b style=\"font-size:130%\">" +
strToHtml(message->subject()) + "</b></div>\n")
.arg(subjectDir);
if ( strategy->showHeader( "date" ) )
headerStr.append(i18n("Date: ") + strToHtml(dateString)+"<br>\n");
#if 0
// Get Instant Messaging presence
TQString presence;
TQString kabcUid;
if ( strategy->showHeader( "status" ) )
{
KABC::AddressBook *addressBook = KABC::StdAddressBook::self( true );
KABC::AddresseeList addresses = addressBook->findByEmail( KPIM::getFirstEmailAddress( message->from() ) );
::KIMProxy *imProxy = KMKernel::self()->imProxy();
kabcUid = addresses[0].uid();
presence = imProxy->presenceString( kabcUid );
}
#endif
if ( strategy->showHeader( "from" ) ) {
TQString fromStr = message->from();
if ( fromStr.isEmpty() ) // no valid email in from, maybe just a name
fromStr = message->fromStrip(); // let's use that
headerStr.append(i18n("From: ") +
KMMessage::emailAddrAsAnchor( fromStr, false, "", true ) );
if ( !vCardName.isEmpty() )
headerStr.append("&nbsp;&nbsp;<a href=\"" + vCardName +
"\">" + i18n("[vCard]") + "</a>" );
#if 0
if ( !presence.isEmpty() && strategy->showHeader( "status" ) )
headerStr.append("&nbsp;&nbsp;(<span name=\"presence-" + kabcUid + "\">" + presence + "</span>)" );
#endif
if ( strategy->showHeader( "organization" )
&& !message->headerField("Organization").isEmpty())
headerStr.append("&nbsp;&nbsp;(" +
strToHtml(message->headerField("Organization")) + ")");
headerStr.append("<br>\n");
}
if ( strategy->showHeader( "to" ) )
headerStr.append(i18n("To: ")+
KMMessage::emailAddrAsAnchor(message->to(),false) + "<br>\n");
if ( strategy->showHeader( "cc" ) && !message->cc().isEmpty() )
headerStr.append(i18n("CC: ")+
KMMessage::emailAddrAsAnchor(message->cc(),false) + "<br>\n");
if ( strategy->showHeader( "bcc" ) && !message->bcc().isEmpty() )
headerStr.append(i18n("BCC: ")+
KMMessage::emailAddrAsAnchor(message->bcc(),false) + "<br>\n");
if ( strategy->showHeader( "reply-to" ) && !message->replyTo().isEmpty())
headerStr.append(i18n("Reply to: ")+
KMMessage::emailAddrAsAnchor(message->replyTo(),false) + "<br>\n");
headerStr += "</div>\n";
return headerStr;
}
TQString PlainHeaderStyle::formatAllMessageHeaders( const KMMessage * message ) const {
const DwHeaders & headers = message->headers();
TQString result;
for ( const DwField * field = headers.FirstField() ; field ; field = field->Next() ) {
result += ( field->FieldNameStr() + ": " ).c_str();
result += strToHtml( field->FieldBodyStr().c_str() );
result += "<br>\n";
}
return result;
}
//
// FancyHeaderStyle:
// Like PlainHeaderStyle, but with slick frames and background colours.
//
class FancyHeaderStyle : public HeaderStyle {
friend class ::KMail::HeaderStyle;
protected:
FancyHeaderStyle() : HeaderStyle() {}
virtual ~FancyHeaderStyle() {}
public:
const char * name() const { return "fancy"; }
const HeaderStyle * next() const { return enterprise(); }
const HeaderStyle * prev() const { return plain(); }
TQString format( const KMMessage * message, const HeaderStrategy * strategy,
const TQString & vCardName, bool printing, bool topLevel ) const;
static TQString imgToDataUrl( const TQImage & image,
const char *fmt = "PNG" );
private:
static TQString drawSpamMeter( double percent, const TQString & filterHeader );
};
TQString FancyHeaderStyle::drawSpamMeter( double percent,
const TQString & filterHeader )
{
TQImage meterBar( 20, 1, 8, 24 );
const unsigned short gradient[20][3] = {
{ 0, 255, 0 },
{ 27, 254, 0 },
{ 54, 252, 0 },
{ 80, 250, 0 },
{ 107, 249, 0 },
{ 135, 247, 0 },
{ 161, 246, 0 },
{ 187, 244, 0 },
{ 214, 242, 0 },
{ 241, 241, 0 },
{ 255, 228, 0 },
{ 255, 202, 0 },
{ 255, 177, 0 },
{ 255, 151, 0 },
{ 255, 126, 0 },
{ 255, 101, 0 },
{ 255, 76, 0 },
{ 255, 51, 0 },
{ 255, 25, 0 },
{ 255, 0, 0 }
};
meterBar.setColor( 21, tqRgb( 255, 255, 255 ) );
meterBar.setColor( 22, tqRgb( 170, 170, 170 ) );
if ( percent < 0 ) // grey is for errors
meterBar.fill( 22 );
else {
meterBar.fill( 21 );
int max = TQMIN( 20, static_cast<int>( percent ) / 5 );
for ( int i = 0; i < max; ++i ) {
meterBar.setColor( i+1, tqRgb( gradient[i][0], gradient[i][1],
gradient[i][2] ) );
meterBar.setPixel( i, 0, i+1 );
}
}
TQString titleText = i18n("%1% probability of being spam.\n\nFull report:\n%2")
.arg( TQString::number( percent ), filterHeader );
return TQString("<img src=\"%1\" width=\"%2\" height=\"%3\" style=\"border: 1px solid black;\" title=\"%4\"> &nbsp;")
.arg( imgToDataUrl( meterBar, "PPM" ), TQString::number( 20 ),
TQString::number( 5 ), titleText );
}
TQString FancyHeaderStyle::format( const KMMessage * message,
const HeaderStrategy * strategy,
const TQString & vCardName, bool printing, bool topLevel ) const {
Q_UNUSED( topLevel );
if ( !message ) return TQString();
if ( !strategy )
strategy = HeaderStrategy::rich();
KConfigGroup configReader( KMKernel::config(), "Reader" );
// ### from kmreaderwin begin
// The direction of the header is determined according to the direction
// of the application layout.
TQString dir = ( TQApplication::reverseLayout() ? "rtl" : "ltr" );
TQString headerStr = TQString("<div class=\"fancy header\" dir=\"%1\">\n").arg(dir);
// However, the direction of the message subject within the header is
// determined according to the contents of the subject itself. Since
// the "Re:" and "Fwd:" prefixes would always cause the subject to be
// considered left-to-right, they are ignored when determining its
// direction.
TQString subjectDir;
if ( !message->subject().isEmpty() )
subjectDir = directionOf( message->cleanSubject() );
else
subjectDir = directionOf( i18n("No Subject") );
// Prepare the date string (when printing always use the localized date)
TQString dateString;
if( printing ) {
TQDateTime dateTime;
KLocale* locale = KGlobal::locale();
dateTime.setTime_t( message->date() );
dateString = locale->formatDateTime( dateTime );
}
else {
dateString = message->dateStr();
}
// Spam header display.
// If the spamSpamStatus config value is true then we look for headers
// from a few spam filters and try to create visually meaningful graphics
// out of the spam scores.
TQString spamHTML;
if ( configReader.readBoolEntry( "showSpamStatus", true ) ) {
SpamScores scores = SpamHeaderAnalyzer::getSpamScores( message );
for ( SpamScoresIterator it = scores.begin(); it != scores.end(); ++it )
spamHTML += (*it).agent() + " " +
drawSpamMeter( (*it).score(), (*it).spamHeader() );
}
TQString userHTML;
TQString presence;
// IM presence and kabc photo
::KIMProxy *imProxy = KMKernel::self()->imProxy();
TQString kabcUid;
KABC::AddressBook *addressBook = KABC::StdAddressBook::self( true );
KABC::AddresseeList addresses = addressBook->findByEmail( KPIM::getFirstEmailAddress( message->from() ) );
TQString photoURL;
int photoWidth = 60;
int photoHeight = 60;
if( addresses.count() == 1 )
{
// kabcUid is embedded in im: URIs to indicate which IM contact to message
kabcUid = addresses[0].uid();
if ( imProxy->initialize() ) {
// im status
presence = imProxy->presenceString( kabcUid );
if ( !presence.isEmpty() )
{
TQString presenceIcon = TQString::fromLatin1( " <img src=\"%1\"/>" )
.arg( imgToDataUrl( imProxy->presenceIcon( kabcUid ).convertToImage() ) );
presence += presenceIcon;
}
}
// picture
if ( addresses[0].photo().isIntern() )
{
// get photo data and convert to data: url
//kdDebug( 5006 ) << "INTERNAL photo found" << endl;
TQImage photo = addresses[0].photo().data();
if ( !photo.isNull() )
{
photoWidth = photo.width();
photoHeight = photo.height();
// scale below 60, otherwise it can get way too large
if ( photoHeight > 60 ) {
double ratio = ( double )photoHeight / ( double )photoWidth;
photoHeight = 60;
photoWidth = (int)( 60 / ratio );
photo = photo.smoothScale( photoWidth, photoHeight );
}
photoURL = imgToDataUrl( photo );
}
}
else
{
//kdDebug( 5006 ) << "URL found" << endl;
photoURL = addresses[0].photo().url();
if ( photoURL.startsWith("/") )
photoURL.prepend( "file:" );
}
}
else // TODO: find a usable one
{
kdDebug( 5006 ) << "Multiple / No addressees matched email address; Count is " << addresses.count() << endl;
userHTML = "&nbsp;";
}
if( photoURL.isEmpty() ) {
// no photo, look for a Face header
TQString faceheader = message->headerField( "Face" );
if ( !faceheader.isEmpty() ) {
TQImage faceimage;
kdDebug( 5006 ) << "Found Face: header" << endl;
TQCString facestring = faceheader.utf8();
// Spec says header should be less than 998 bytes
// Face: is 5 characters
if ( facestring.length() < 993 ) {
TQByteArray facearray;
KCodecs::base64Decode(facestring, facearray);
TQImage faceimage;
if ( faceimage.loadFromData( facearray, "png" ) ) {
// Spec says image must be 48x48 pixels
if ( (48 == faceimage.width()) && (48 == faceimage.height()) ) {
photoURL = imgToDataUrl( faceimage );
photoWidth = 48;
photoHeight = 48;
} else {
kdDebug( 5006 ) << "Face: header image is" << faceimage.width() << "by" << faceimage.height() <<"not 48x48 Pixels" << endl;
}
} else {
kdDebug( 5006 ) << "Failed to load decoded png from Face: header" << endl;
}
} else {
kdDebug( 5006 ) << "Face: header too long at " << facestring.length() << endl;
}
}
}
if( photoURL.isEmpty() )
{
// no photo, look for a X-Face header
TQString xfaceURL;
TQString xfhead = message->headerField( "X-Face" );
if ( !xfhead.isEmpty() )
{
KXFace xf;
photoURL = imgToDataUrl( xf.toImage( xfhead ) );
photoWidth = 48;
photoHeight = 48;
}
}
if( !photoURL.isEmpty() )
{
//kdDebug( 5006 ) << "Got a photo: " << photoURL << endl;
userHTML = TQString("<img src=\"%1\" width=\"%2\" height=\"%3\">")
.arg( photoURL ).arg( photoWidth ).arg( photoHeight );
if ( presence.isEmpty() ) {
userHTML = TQString("<div class=\"senderpic\">") + userHTML + "</div>";
} else {
userHTML = TQString( "<div class=\"senderpic\">"
"<a href=\"im:%1\">%2<div class=\"senderstatus\">"
"<span name=\"presence-%3\">%4</span></div></a>"
"</div>" ).arg( kabcUid )
.arg( userHTML )
.arg( kabcUid )
.arg( presence );
}
} else {
// we don't have a photo, just show presence, if we have it
if ( !presence.isEmpty() )
userHTML = TQString( "<a href=\"im:%1\"><div class=\"senderstatus\">"
"<span name=\"presence-%2\">%3</span></div></a>" )
.arg( kabcUid )
.arg( kabcUid )
.arg( presence );
}
#if 0
// Disabled 'Launch IM' link in headers - Will
if ( imProxy->imAppsAvailable() )
presence = "<a name=\"launchim\" href=\"kmail:startIMApp\">" + i18n("Launch IM") + "</a></span>";
// do nothing - no im apps available, leave presence empty
//presence = i18n( "DCOP/InstantMessenger not installed" );
kdDebug( 5006 ) << "final presence: '" << presence << "'" << endl;
#endif
TQString timeHTML;
if ( GlobalSettings::self()->showCurrentTime() && strategy->showHeader( "date" ) ) {
DwHeaders& header = message->headers();
if ( header.HasDate() ) {
DwDateTime& origDate = header.Date();
int zone = origDate.Zone();
// kdDebug() << "FancyHeaderStyle::format() zone offset (in minutes): " << zone << endl;
// copyed fro mimelib -- code to determine local timezone
time_t t_now = time((time_t*) 0);
#if defined(HAVE_GMTIME_R)
struct tm utc;
gmtime_r(&t_now, &utc);
struct tm local;
localtime_r(&t_now, &local);
#else
struct tm utc = *gmtime(&t_now);
struct tm local = *localtime(&t_now);
#endif
DwUint32 t_local = 0;
t_local = 24 * t_local + local.tm_hour;
t_local = 60 * t_local + local.tm_min;
t_local = 60 * t_local + local.tm_sec;
DwUint32 t_utc = 0;
t_utc = 24 * t_utc + utc.tm_hour;
t_utc = 60 * t_utc + utc.tm_min;
t_utc = 60 * t_utc + utc.tm_sec;
int lzone = (int) (t_local - t_utc) / 60;
// kdDebug() << "FancyHeaderStyle::format() local zone offset (in minutes): " << lzone << endl;
TQTime currTime = TQTime::currentTime( Qt::UTC );
// kdDebug() << "FancyHeaderStyle::format() current time: " << currTime << endl;
// now currTime contain message sender local time
currTime = currTime.addSecs( zone * 60 );
TQString timeofday;
TQString color;
TQString bg_color;
TQString bg_image;
if ( currTime > TQTime( 0, 0, 0 ) && currTime <= TQTime( 6, 0, 0 ) ) {
timeofday = i18n( "Night" );
color = "white";
bg_color = "#000B6B";
bg_image = "url(data:image/png;base64,"
"iVBORw0KGgoAAAANSUhEUgAAAAEAAAAyCAIAAAASmSbdAAAAS0lEQVQI11WOsRGAQAzDOG/LHoz9"
"kikIcF+kSBxbPs7LoNGVapAI0Zn+O+8NUwldozn6io7G7kdS/5zi7i+BvUM/5uSXlIfzMHx/bmWR"
"k++yj9rZAAAAAElFTkSuQmCC)";
}
else if ( currTime > TQTime( 6, 0, 0 ) && currTime <= TQTime( 12, 0, 0 ) ) {
timeofday = i18n( "Morning" );
color = "white";
bg_color = "#00A6FF";
bg_image = "url(data:image/png;base64,"
"iVBORw0KGgoAAAANSUhEUgAAAAEAAAAyCAYAAACd+7GKAAAAWklEQVQI122OQQ7DMAzDaP3/dfuO"
"pWSHJgva7iZIBk3m/Ew5hexCHVCilewzFHKEbFZqgxJQWyzKhWKl9unqddJj8+L9sl0oR2gUim+o"
"zu4uSh7kn67/DNv+C4tsZOtjAWEHAAAAAElFTkSuQmCC)";
}
else if ( currTime > TQTime( 12, 0, 0 ) && currTime <= TQTime( 18, 0, 0 ) ) {
timeofday = i18n( "Afternoon" );
color = "black";
bg_color = "#00A6FF";
bg_image = "url(data:image/png;base64,"
"iVBORw0KGgoAAAANSUhEUgAAAAEAAAAyCAYAAACd+7GKAAAAPUlEQVQI132OwQ0AIAwCSfcfw91c"
"QsCfRm399HFwoWjdDhMICQhxHSWMQPhkTCoqWRZU2h5i9tr4GZfmV5t3wWUI3h+NugAAAABJRU5E"
"rkJggg==)";
}
else {
timeofday = i18n( "Evening" );
color = "white";
bg_color = "#0014CC";
bg_image = "url(data:image/png;base64,"
"iVBORw0KGgoAAAANSUhEUgAAAAEAAAAyCAYAAACd+7GKAAAAWklEQVQI11WOyRHAMAgDNQuUlBrS"
"fyFpAfKwje0PwyEt0vN+hVsJpzS6QML2ziWcFI6mZBZNSVDXYehyUgI1XsLI9eimHDH6kW0ddVIO"
"xx7JjrtshlbXlLDSD+WhJ+hwqWo8AAAAAElFTkSuQmCC)";
}
TQString tformat;
if ( KGlobal::locale()->use12Clock() ) {
tformat = "h:mm AP";
}
else {
tformat = "h:mm";
}
// kdDebug() << "FancyHeaderStyle::format() current time: " << currTime << " (" << timeofday << ")" << endl;
timeHTML.append( TQString(
"<div style=\""
"border:1px solid %1;"
"color:%2;"
"background-image:%3;"
"background-position:center left;"
"background-repeat:repeat-x;"
"text-align:center;"
"font-size:12px;"
"padding:2px;"
"width:50px;"
"heigth:50px;"
"margin: 0px 0px 3px 0px;"
"\" class=\"curtime\">%4<br />%5<br />%6</div>"
)
.arg( bg_color )
.arg( color )
.arg( bg_image )
.arg( i18n( "Now:" ) )
.arg( currTime.toString( tformat ) )
.arg( timeofday )
);
}
else {
// kdDebug() << "FancyHeaderStyle::format() no date header to display" << endl;
}
}
//case HdrFancy:
// the subject line and box below for details
if ( strategy->showHeader( "subject" ) ) {
const int flags = LinkLocator::PreserveSpaces |
( GlobalSettings::self()->showEmoticons() ?
LinkLocator::ReplaceSmileys : 0 );
headerStr += TQString("<div dir=\"%1\">%2</div>\n")
.arg(subjectDir)
.arg(message->subject().isEmpty()?
i18n("No Subject") :
strToHtml( message->subject(), flags ));
}
headerStr += "<table class=\"outer\"><tr><td width=\"100%\"><table>\n";
//headerStr += "<table>\n";
// from line
// the mailto: URLs can contain %3 etc., therefore usage of multiple
// TQString::arg is not possible
if ( strategy->showHeader( "from" ) ) {
TQString fromStr = message->from();
if ( fromStr.isEmpty() ) // no valid email in from, maybe just a name
fromStr = message->fromStrip(); // let's use that
headerStr += TQString("<tr><th>%1</th>\n"
"<td>")
.arg(i18n("From: "))
+ KMMessage::emailAddrAsAnchor( fromStr, false )
+ ( !message->headerField( "Resent-From" ).isEmpty() ? "&nbsp;"
+ i18n("(resent from %1)")
.arg( KMMessage::emailAddrAsAnchor(
message->headerField( "Resent-From" ),false) )
: TQString("") )
+ ( !vCardName.isEmpty() ? "&nbsp;&nbsp;<a href=\"" + vCardName + "\">"
+ i18n("[vCard]") + "</a>"
: TQString("") )
#if 0
+ ( ( !presence.isEmpty() )
? "&nbsp;&nbsp;(<span name=\"presence-" + kabcUid + "\">" + presence + "</span>)"
: TQString("") )
#endif
+ ( message->headerField("Organization").isEmpty()
? TQString("")
: "&nbsp;&nbsp;("
+ strToHtml(message->headerField("Organization"))
+ ")")
+ "</td></tr>\n";
}
// to line
if ( strategy->showHeader( "to" ) )
headerStr.append(TQString("<tr><th>%1</th>\n"
"<td>%2</td></tr>\n")
.arg(i18n("To: "))
.arg(KMMessage::emailAddrAsAnchor(message->to(),false)));
// cc line, if any
if ( strategy->showHeader( "cc" ) && !message->cc().isEmpty())
headerStr.append(TQString("<tr><th>%1</th>\n"
"<td>%2</td></tr>\n")
.arg(i18n("CC: "))
.arg(KMMessage::emailAddrAsAnchor(message->cc(),false)));
// Bcc line, if any
if ( strategy->showHeader( "bcc" ) && !message->bcc().isEmpty())
headerStr.append(TQString("<tr><th>%1</th>\n"
"<td>%2</td></tr>\n")
.arg(i18n("BCC: "))
.arg(KMMessage::emailAddrAsAnchor(message->bcc(),false)));
if ( strategy->showHeader( "date" ) )
headerStr.append(TQString("<tr><th>%1</th>\n"
"<td dir=\"%2\">%3</td></tr>\n")
.arg(i18n("Date: "))
.arg( directionOf( message->dateStr() ) )
.arg(strToHtml(dateString)));
if ( GlobalSettings::self()->showUserAgent() ) {
if ( strategy->showHeader( "user-agent" ) ) {
if ( !message->headerField("User-Agent").isEmpty() ) {
headerStr.append(TQString("<tr><th>%1</th>\n"
"<td>%2</td></tr>\n")
.arg(i18n("User-Agent: "))
.arg( strToHtml( message->headerField("User-Agent") ) ) );
}
}
if ( strategy->showHeader( "x-mailer" ) ) {
if ( !message->headerField("X-Mailer").isEmpty() ) {
headerStr.append(TQString("<tr><th>%1</th>\n"
"<td>%2</td></tr>\n")
.arg(i18n("X-Mailer: "))
.arg( strToHtml( message->headerField("X-Mailer") ) ) );
}
}
}
// FIXME: Show status in synthetic header style field. Decide whether this or current in brackets style is best and remove one.
/* if( strategy->showHeader( "status" ) )
headerStr.append( TQString( "<tr><th>%1</th>\n"
"<td dir=\"%2\">%3</td></tr>\n")
.arg(i18n("Sender status: "))
.arg( directionOf( onlineStatus ) )
.arg(onlineStatus));
*/
headerStr.append( TQString("<tr><td colspan=\"2\"><div id=\"attachmentInjectionPoint\"></div></td></tr>" ) );
headerStr.append(
TQString( "</table></td><td align=\"center\" valign=\"top\">%1%2</td></tr></table>\n" )
.arg(timeHTML)
.arg(userHTML) );
if ( !spamHTML.isEmpty() )
headerStr.append( TQString( "<div class=\"spamheader\" dir=\"%1\"><b>%2</b>&nbsp;<span style=\"padding-left: 20px;\">%3</span></div>\n")
.arg( subjectDir, i18n("Spam Status:"), spamHTML ) );
headerStr += "</div>\n\n";
return headerStr;
}
TQString FancyHeaderStyle::imgToDataUrl( const TQImage &image, const char* fmt )
{
TQByteArray ba;
TQBuffer buffer( ba );
buffer.open( IO_WriteOnly );
image.save( &buffer, fmt );
return TQString::fromLatin1("data:image/%1;base64,%2")
.arg( fmt, KCodecs::base64Encode( ba ).data() );
}
// #####################
class EnterpriseHeaderStyle : public HeaderStyle {
friend class ::KMail::HeaderStyle;
protected:
EnterpriseHeaderStyle() : HeaderStyle() {}
virtual ~EnterpriseHeaderStyle() {}
public:
const char * name() const { return "enterprise"; }
const HeaderStyle * next() const { return brief(); }
const HeaderStyle * prev() const { return fancy(); }
TQString format( const KMMessage * message, const HeaderStrategy * strategy,
const TQString & vCardName, bool printing, bool topLevel ) const;
};
TQString EnterpriseHeaderStyle::format( const KMMessage * message,
const HeaderStrategy * strategy,
const TQString & vCardName, bool printing, bool topLevel ) const {
if ( !message ) return TQString();
if ( !strategy )
strategy = HeaderStrategy::brief();
// The direction of the header is determined according to the direction
// of the application layout.
TQString dir = TQApplication::reverseLayout() ? "rtl" : "ltr" ;
// However, the direction of the message subject within the header is
// determined according to the contents of the subject itself. Since
// the "Re:" and "Fwd:" prefixes would always cause the subject to be
// considered left-to-right, they are ignored when determining its
// direction.
TQString subjectDir;
if (!message->subject().isEmpty())
subjectDir = directionOf( message->cleanSubject() );
else
subjectDir = directionOf( i18n("No Subject") );
// colors depend on if its encapsulated or not
TQColor fontColor(TQt::white);
TQString linkColor = "class =\"white\"";
const TQColor activeColor = tqApp->palette().active().highlight();
TQColor activeColorDark = activeColor.dark(130);
// reverse colors for encapsulated
if( !topLevel ){
activeColorDark = activeColor.dark(50);
fontColor = TQColor(TQt::black);
linkColor = "class =\"black\"";
}
// Prepare the date string (when printing always use the localized date)
TQString dateString;
if( printing ) {
TQDateTime dateTime;
KLocale * locale = KGlobal::locale();
dateTime.setTime_t( message->date() );
dateString = locale->formatDateTime( dateTime );
} else {
dateString = message->dateStr();
}
TQString imgpath(locate("data","kmail/pics/"));
imgpath.append("enterprise_");
const TQString borderSettings(" padding-top: 0px; padding-bottom: 0px; border-width: 0px ");
TQString headerStr ("");
// 3D borders
if(topLevel)
headerStr +=
"<div style=\"position: fixed; top: 0px; left: 0px; background-color: #606060; "
"width: 10px; min-height: 100%;\">&nbsp;</div>"
"<div style=\"position: fixed; top: 0px; right: 0px; background-color: #606060; "
"width: 10px; min-height: 100%;\">&nbsp;</div>";
headerStr += ""
"<div style=\"margin-left: 10px; top: 0px;\"><span style=\"font-size: 10px; font-weight: bold;\">"+dateString+"</span></div>"
// #0057ae
"<table style=\"background: "+activeColorDark.name()+"; border-collapse:collapse; top: 14px; min-width: 200px; \" cellpadding=0> \n"
" <tr> \n"
" <td style=\"min-width: 6px; background-image: url("+imgpath+"top_left.png); \"></td> \n"
" <td style=\"height: 6px; width: 100%; background: url("+imgpath+"top.png); \"></td> \n"
" <td style=\"min-width: 6px; background: url("+imgpath+"top_right.png); \"></td> </tr> \n"
" <tr> \n"
" <td style=\"min-width: 6px; max-width: 6px; background: url("+imgpath+"left.png); \"></td> \n"
" <td style=\"\"> \n";
headerStr +=
" <div class=\"noprint\" style=\"z-index: 1; float:right; position: relative; top: -35px; right: 20px ;\">\n"
" <img src=\""+imgpath+"icon.png\">\n"
" </div>\n";
headerStr +=
" <table style=\"color: "+fontColor.name()+" ! important; margin: 1px; border-spacing: 0px;\" cellpadding=0> \n";
// subject
//strToHtml( message->subject() )
if ( strategy->showHeader( "subject" ) ){
headerStr +=
" <tr> \n"
" <td style=\"font-size: 6px; text-align: right; padding-left: 5px; padding-right: 24px; "+borderSettings+"\"></td> \n"
" <td style=\"font-weight: bolder; font-size: 120%; padding-right: 91px; "+borderSettings+"\">"+message->subject()+"</td> \n"
" </tr> \n";
}
// from
if ( strategy->showHeader( "from" ) ){
TQString fromStr = message->from();
if ( fromStr.isEmpty() ) // no valid email in from, maybe just a name
fromStr = message->fromStrip(); // let's use that
// TODO vcard
TQString fromPart = KMMessage::emailAddrAsAnchor( fromStr, true, linkColor );
if ( !vCardName.isEmpty() )
fromPart += "&nbsp;&nbsp;<a href=\"" + vCardName + "\" "+linkColor+">" + i18n("[vCard]") + "</a>";
//TODO strategy date
//if ( strategy->showHeader( "date" ) )
headerStr +=
" <tr> \n"
" <td style=\"font-size: 6px; padding-left: 5px; padding-right: 24px; text-align: right; "+borderSettings+"\">"+i18n("From: ")+"</td> \n"
" <td style=\""+borderSettings+"\">"+ fromPart +"</td> "
" </tr> ";
}
// to line
if( strategy->showHeader( "to" ) )
headerStr +=
" <tr> "
" <td style=\"font-size: 6px; text-align: right; padding-left: 5px; padding-right: 24px; " + borderSettings + "\">" + i18n("To: ") + "</td> "
" <td style=\"" + borderSettings + "\">" +
KMMessage::emailAddrAsAnchor( message->to(), false, linkColor ) +
" </td> "
" </tr>\n";
// cc line, if any
if ( strategy->showHeader( "cc" ) && !message->cc().isEmpty() )
headerStr +=
" <tr> "
" <td style=\"font-size: 6px; text-align: right; padding-left: 5px; padding-right: 24px; " + borderSettings + "\">" + i18n("CC: ") + "</td> "
" <td style=\"" + borderSettings + "\">" +
KMMessage::emailAddrAsAnchor( message->cc(), false, linkColor ) +
" </td> "
" </tr>\n";
// bcc line, if any
if ( strategy->showHeader( "bcc" ) && !message->bcc().isEmpty() )
headerStr +=
" <tr> "
" <td style=\"font-size: 6px; text-align: right; padding-left: 5px; padding-right: 24px; " + borderSettings + "\">" + i18n("BCC: ") + "</td> "
" <td style=\"" + borderSettings + "\">" +
KMMessage::emailAddrAsAnchor( message->bcc(), false, linkColor ) +
" </td> "
" </tr>\n";
// header-bottom
headerStr +=
" </table> \n"
" </td> \n"
" <td style=\"min-width: 6px; max-height: 15px; background: url("+imgpath+"right.png); \"></td> \n"
" </tr> \n"
" <tr> \n"
" <td style=\"min-width: 6px; background: url("+imgpath+"s_left.png); \"></td> \n"
" <td style=\"height: 35px; width: 80%; background: url("+imgpath+"sbar.png);\"> \n"
" <img src=\""+imgpath+"sw.png\" style=\"margin: 0px; height: 30px; overflow:hidden; \"> \n"
" <img src=\""+imgpath+"sp_right.png\" style=\"float: right; \"> </td> \n"
" <td style=\"min-width: 6px; background: url("+imgpath+"s_right.png); \"></td> \n"
" </tr> \n"
" </table> \n";
// kmail icon
if(topLevel) {
// attachments
headerStr +=
"<div class=\"noprint\" style=\"position: absolute; top: 60px; right: 20px; width: 91px; height: 200px;\">"
"<div id=\"attachmentInjectionPoint\"></div>"
"</div>\n";
}
if ( printing ) {
//provide a bit more left padding when printing
//kolab/issue3254 (printed mail cut at the left side)
headerStr += "<div style=\"padding: 6px; padding-left: 10px;\">";
} else {
headerStr += "<div style=\"padding: 6px;\">";
}
// TODO
// spam status
// ### iterate over the rest of strategy->headerToDisplay() (or
// ### all headers if DefaultPolicy == Display) (elsewhere, too)
return headerStr;
}
// #####################
//
// HeaderStyle abstract base:
//
HeaderStyle::HeaderStyle() {
}
HeaderStyle::~HeaderStyle() {
}
const HeaderStyle * HeaderStyle::create( Type type ) {
switch ( type ) {
case Brief: return brief();
case Plain: return plain();
case Fancy: return fancy();
case Enterprise: return enterprise();
}
kdFatal( 5006 ) << "HeaderStyle::create(): Unknown header style ( type == "
<< (int)type << " ) requested!" << endl;
return 0; // make compiler happy
}
const HeaderStyle * HeaderStyle::create( const TQString & type ) {
TQString lowerType = type.lower();
if ( lowerType == "brief" ) return brief();
if ( lowerType == "plain" ) return plain();
if ( lowerType == "enterprise" ) return enterprise();
//if ( lowerType == "fancy" ) return fancy(); // not needed, see below
// don't kdFatal here, b/c the strings are user-provided
// (KConfig), so fail gracefully to the default:
return fancy();
}
static const HeaderStyle * briefStyle = 0;
static const HeaderStyle * plainStyle = 0;
static const HeaderStyle * fancyStyle = 0;
static const HeaderStyle * enterpriseStyle = 0;
const HeaderStyle * HeaderStyle::brief() {
if ( !briefStyle )
briefStyle = new BriefHeaderStyle();
return briefStyle;
}
const HeaderStyle * HeaderStyle::plain() {
if ( !plainStyle )
plainStyle = new PlainHeaderStyle();
return plainStyle;
}
const HeaderStyle * HeaderStyle::fancy() {
if ( !fancyStyle )
fancyStyle = new FancyHeaderStyle();
return fancyStyle;
}
const HeaderStyle * HeaderStyle::enterprise() {
if ( !enterpriseStyle )
enterpriseStyle = new EnterpriseHeaderStyle();
return enterpriseStyle;
}
} // namespace KMail