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.
432 lines
13 KiB
432 lines
13 KiB
/*
|
|
This file is part of KOrganizer.
|
|
|
|
Copyright (c) 2001,2003 Cornelius Schumacher <schumacher@kde.org>
|
|
Copyright (C) 2003-2004 Reinhold Kainhofer <reinhold@kainhofer.com>
|
|
|
|
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 <time.h>
|
|
#include <unistd.h>
|
|
|
|
#include <tqdir.h>
|
|
#include <tqstring.h>
|
|
#include <tqfont.h>
|
|
#include <tqcolor.h>
|
|
#include <tqmap.h>
|
|
#include <tqstringlist.h>
|
|
|
|
#include <tdeglobalsettings.h>
|
|
#include <tdeglobal.h>
|
|
#include <tdeconfig.h>
|
|
#include <tdelocale.h>
|
|
#include <kdebug.h>
|
|
#include <tdeemailsettings.h>
|
|
#include <kstaticdeleter.h>
|
|
#include <kstringhandler.h>
|
|
|
|
#include <libkmime/kmime_header_parsing.h>
|
|
|
|
#include "koprefs.h"
|
|
#include <libkpimidentities/identitymanager.h>
|
|
#include <libkpimidentities/identity.h>
|
|
#include <libemailfunctions/email.h>
|
|
#include <tdeabc/stdaddressbook.h>
|
|
#include <ktimezones.h>
|
|
#include "kocore.h"
|
|
|
|
KOPrefs *KOPrefs::mInstance = 0;
|
|
static KStaticDeleter<KOPrefs> insd;
|
|
|
|
TQColor getTextColor(const TQColor &c)
|
|
{
|
|
float luminance = (c.red() * 0.299) + (c.green() * 0.587) + (c.blue() * 0.114);
|
|
return (luminance > 128.0) ? TQColor( 0, 0 ,0 ) : TQColor( 255, 255 ,255 );
|
|
}
|
|
|
|
|
|
KOPrefs::KOPrefs() :
|
|
KOPrefsBase()
|
|
{
|
|
mCategoryColors.setAutoDelete( true );
|
|
mResourceColors.setAutoDelete( true );
|
|
|
|
mDefaultCategoryColor = TQColor( 151, 235, 121 );
|
|
|
|
mDefaultResourceColor = TQColor();//Default is a color invalid
|
|
|
|
mDefaultTimeBarFont = TDEGlobalSettings::generalFont();
|
|
// make a large default time bar font, at least 16 points.
|
|
mDefaultTimeBarFont.setPointSize(
|
|
TQMAX( mDefaultTimeBarFont.pointSize() + 4, 16 ) );
|
|
|
|
mDefaultMonthViewFont = TDEGlobalSettings::generalFont();
|
|
// make it a bit smaller
|
|
mDefaultMonthViewFont.setPointSize( mDefaultMonthViewFont.pointSize() - 2 );
|
|
|
|
TDEConfigSkeleton::setCurrentGroup( "General" );
|
|
|
|
addItemPath( "Html Export File", mHtmlExportFile,
|
|
TQDir::homeDirPath() + "/" + i18n( "Default export file", "calendar.html" ) );
|
|
|
|
timeBarFontItem()->setDefaultValue( mDefaultTimeBarFont );
|
|
monthViewFontItem()->setDefaultValue( mDefaultMonthViewFont );
|
|
|
|
// Load it now, not deep within some painting code
|
|
mMyAddrBookMails = TDEABC::StdAddressBook::self()->whoAmI().emails();
|
|
}
|
|
|
|
|
|
KOPrefs::~KOPrefs()
|
|
{
|
|
kdDebug(5850) << "KOPrefs::~KOPrefs()" << endl;
|
|
}
|
|
|
|
|
|
KOPrefs *KOPrefs::instance()
|
|
{
|
|
if ( !mInstance ) {
|
|
insd.setObject( mInstance, new KOPrefs() );
|
|
mInstance->readConfig();
|
|
}
|
|
|
|
return mInstance;
|
|
}
|
|
|
|
void KOPrefs::usrSetDefaults()
|
|
{
|
|
// Default should be set a bit smarter, respecting username and locale
|
|
// settings for example.
|
|
|
|
KEMailSettings settings;
|
|
TQString tmp = settings.getSetting(KEMailSettings::RealName);
|
|
if ( !tmp.isEmpty() ) setUserName( tmp );
|
|
tmp = settings.getSetting(KEMailSettings::EmailAddress);
|
|
if ( !tmp.isEmpty() ) setUserEmail( tmp );
|
|
fillMailDefaults();
|
|
|
|
mTimeBarFont = mDefaultTimeBarFont;
|
|
mMonthViewFont = mDefaultMonthViewFont;
|
|
|
|
setTimeZoneIdDefault();
|
|
|
|
KPimPrefs::usrSetDefaults();
|
|
}
|
|
|
|
void KOPrefs::fillMailDefaults()
|
|
{
|
|
userEmailItem()->swapDefault();
|
|
TQString defEmail = userEmailItem()->value();
|
|
userEmailItem()->swapDefault();
|
|
|
|
if ( userEmail() == defEmail ) {
|
|
// No korg settings - but maybe there's a kcontrol[/kmail] setting available
|
|
KEMailSettings settings;
|
|
if ( !settings.getSetting( KEMailSettings::EmailAddress ).isEmpty() )
|
|
mEmailControlCenter = true;
|
|
}
|
|
}
|
|
|
|
void KOPrefs::setTimeZoneIdDefault()
|
|
{
|
|
TQString zone;
|
|
|
|
zone = KTimezones().local()->name();
|
|
|
|
kdDebug() << "----- time zone: " << zone << endl;
|
|
|
|
mTimeZoneId = zone;
|
|
}
|
|
|
|
void KOPrefs::setCategoryDefaults()
|
|
{
|
|
mCustomCategories.clear();
|
|
|
|
mCustomCategories << i18n("Appointment") << i18n("Business")
|
|
<< i18n("Meeting") << i18n("Phone Call") << i18n("Education")
|
|
<< i18n("Holiday") << i18n("Vacation") << i18n("Special Occasion")
|
|
<< i18n("Personal") << i18n("Travel") << i18n("Miscellaneous")
|
|
<< i18n("Birthday");
|
|
}
|
|
|
|
|
|
void KOPrefs::usrReadConfig()
|
|
{
|
|
config()->setGroup("General");
|
|
mCustomCategories = config()->readListEntry("Custom Categories");
|
|
if (mCustomCategories.isEmpty()) setCategoryDefaults();
|
|
|
|
// old category colors, ignore if they have the old default
|
|
// should be removed a few versions after 3.2...
|
|
config()->setGroup("Category Colors");
|
|
TQValueList<TQColor> oldCategoryColors;
|
|
TQStringList::Iterator it;
|
|
for (it = mCustomCategories.begin();it != mCustomCategories.end();++it ) {
|
|
TQColor c = config()->readColorEntry(*it, &mDefaultCategoryColor);
|
|
oldCategoryColors.append( (c == TQColor(196,196,196)) ?
|
|
mDefaultCategoryColor : c);
|
|
}
|
|
|
|
// new category colors
|
|
config()->setGroup("Category Colors2");
|
|
TQValueList<TQColor>::Iterator it2;
|
|
for (it = mCustomCategories.begin(), it2 = oldCategoryColors.begin();
|
|
it != mCustomCategories.end(); ++it, ++it2 ) {
|
|
TQColor c = config()->readColorEntry(*it, &*it2);
|
|
if ( c != mDefaultCategoryColor )
|
|
setCategoryColor(*it,c);
|
|
}
|
|
|
|
config()->setGroup( "Resources Colors" );
|
|
TQMap<TQString, TQString> map = config()->entryMap( "Resources Colors" );
|
|
|
|
TQMapIterator<TQString, TQString> it3;
|
|
for( it3 = map.begin(); it3 != map.end(); ++it3 ) {
|
|
// kdDebug(5850)<< "KOPrefs::usrReadConfig: key: " << it3.key() << " value: "
|
|
// << it3.data()<<endl;
|
|
setResourceColor( it3.key(), config()->readColorEntry( it3.key(),
|
|
&mDefaultResourceColor ) );
|
|
}
|
|
|
|
|
|
if (mTimeZoneId.isEmpty()) {
|
|
setTimeZoneIdDefault();
|
|
}
|
|
|
|
#if 0
|
|
config()->setGroup("FreeBusy");
|
|
if( mRememberRetrievePw )
|
|
mRetrievePassword = KStringHandler::obscure( config()->readEntry( "Retrieve Server Password" ) );
|
|
#endif
|
|
KPimPrefs::usrReadConfig();
|
|
fillMailDefaults();
|
|
}
|
|
|
|
|
|
void KOPrefs::usrWriteConfig()
|
|
{
|
|
config()->setGroup("General");
|
|
config()->writeEntry("Custom Categories",mCustomCategories);
|
|
|
|
config()->setGroup("Category Colors2");
|
|
TQDictIterator<TQColor> it(mCategoryColors);
|
|
while (it.current()) {
|
|
config()->writeEntry(it.currentKey(),*(it.current()));
|
|
++it;
|
|
}
|
|
|
|
config()->setGroup( "Resources Colors" );
|
|
TQDictIterator<TQColor> it2( mResourceColors );
|
|
while( it2.current() ) {
|
|
config()->writeEntry( it2.currentKey(), *( it2.current() ) );
|
|
++it2;
|
|
}
|
|
|
|
if( !mFreeBusyPublishSavePassword ) {
|
|
TDEConfigSkeleton::ItemPassword *i = freeBusyPublishPasswordItem();
|
|
i->setValue( "" );
|
|
i->writeConfig( config() );
|
|
}
|
|
if( !mFreeBusyRetrieveSavePassword ) {
|
|
TDEConfigSkeleton::ItemPassword *i = freeBusyRetrievePasswordItem();
|
|
i->setValue( "" );
|
|
i->writeConfig( config() );
|
|
}
|
|
|
|
#if 0
|
|
if( mRememberRetrievePw )
|
|
config()->writeEntry( "Retrieve Server Password", KStringHandler::obscure( mRetrievePassword ) );
|
|
else
|
|
config()->deleteEntry( "Retrieve Server Password" );
|
|
#endif
|
|
|
|
KPimPrefs::usrWriteConfig();
|
|
}
|
|
|
|
void KOPrefs::setCategoryColor( const TQString &cat, const TQColor & color)
|
|
{
|
|
mCategoryColors.replace( cat, new TQColor( color ) );
|
|
}
|
|
|
|
TQColor *KOPrefs::categoryColor( const TQString &cat )
|
|
{
|
|
TQColor *color = 0;
|
|
|
|
if ( !cat.isEmpty() ) color = mCategoryColors[ cat ];
|
|
|
|
if ( color ) return color;
|
|
else return &mDefaultCategoryColor;
|
|
}
|
|
|
|
|
|
bool KOPrefs::hasCategoryColor( const TQString& cat ) const
|
|
{
|
|
return mCategoryColors[ cat ];
|
|
}
|
|
|
|
void KOPrefs::setResourceColor ( const TQString &cal, const TQColor &color )
|
|
{
|
|
// kdDebug(5850)<<"KOPrefs::setResourceColor: " << cal << " color: "<<
|
|
// color.name()<<endl;
|
|
mResourceColors.replace( cal, new TQColor( color ) );
|
|
}
|
|
|
|
TQColor* KOPrefs::resourceColor( const TQString &cal )
|
|
{
|
|
TQColor *color=0;
|
|
if( !cal.isEmpty() ) color = mResourceColors[cal];
|
|
|
|
// assign default color if enabled
|
|
if ( !cal.isEmpty() && !color && assignDefaultResourceColors() ) {
|
|
TQColor defColor( 0x37, 0x7A, 0xBC );
|
|
if ( defaultResourceColorSeed() > 0 && defaultResourceColorSeed() - 1 < (int)defaultResourceColors().size() ) {
|
|
defColor = TQColor( defaultResourceColors()[defaultResourceColorSeed()-1] );
|
|
} else {
|
|
int h, s, v;
|
|
defColor.getHsv( &h, &s, &v );
|
|
h = ( defaultResourceColorSeed() % 12 ) * 30;
|
|
s -= s * ( (defaultResourceColorSeed() / 12) % 2 ) * 0.5;
|
|
defColor.setHsv( h, s, v );
|
|
}
|
|
setDefaultResourceColorSeed( defaultResourceColorSeed() + 1 );
|
|
setResourceColor( cal, defColor );
|
|
color = mResourceColors[cal];
|
|
}
|
|
|
|
if (color && color->isValid() )
|
|
return color;
|
|
else
|
|
return &mDefaultResourceColor;
|
|
}
|
|
|
|
TQString KOPrefs::fullName()
|
|
{
|
|
TQString tusername;
|
|
if ( mEmailControlCenter ) {
|
|
KEMailSettings settings;
|
|
tusername = settings.getSetting( KEMailSettings::RealName );
|
|
} else {
|
|
tusername = userName();
|
|
}
|
|
|
|
// Quote the username as it might contain commas and other quotable chars.
|
|
tusername = KPIM::quoteNameIfNecessary( tusername );
|
|
|
|
TQString tname, temail;
|
|
KPIM::getNameAndMail( tusername, tname, temail ); // ignore return value
|
|
// which is always false
|
|
return tname;
|
|
}
|
|
|
|
TQString KOPrefs::email()
|
|
{
|
|
if ( mEmailControlCenter ) {
|
|
KEMailSettings settings;
|
|
return settings.getSetting( KEMailSettings::EmailAddress );
|
|
} else {
|
|
return userEmail();
|
|
}
|
|
}
|
|
|
|
TQStringList KOPrefs::allEmails()
|
|
{
|
|
// Grab emails from the email identities
|
|
TQStringList lst = KOCore::self()->identityManager()->allEmails();
|
|
// Add emails configured in korganizer
|
|
lst += mAdditionalMails;
|
|
// Add emails from the user's kaddressbook entry
|
|
lst += mMyAddrBookMails;
|
|
// Add the email entered as the userEmail here
|
|
lst += email();
|
|
|
|
// Warning, this list could contain duplicates.
|
|
return lst;
|
|
}
|
|
|
|
TQStringList KOPrefs::fullEmails()
|
|
{
|
|
TQStringList fullEmails;
|
|
// The user name and email from the config dialog:
|
|
fullEmails << TQString("%1 <%2>").arg( fullName() ).arg( email() );
|
|
|
|
TQStringList::Iterator it;
|
|
// Grab emails from the email identities
|
|
KPIM::IdentityManager *idmanager = KOCore::self()->identityManager();
|
|
TQStringList lst = idmanager->identities();
|
|
KPIM::IdentityManager::ConstIterator it1;
|
|
for ( it1 = idmanager->begin() ; it1 != idmanager->end() ; ++it1 ) {
|
|
fullEmails << (*it1).fullEmailAddr();
|
|
}
|
|
// Add emails configured in korganizer
|
|
lst = mAdditionalMails;
|
|
for ( it = lst.begin(); it != lst.end(); ++it ) {
|
|
fullEmails << TQString("%1 <%2>").arg( fullName() ).arg( *it );
|
|
}
|
|
// Add emails from the user's kaddressbook entry
|
|
TDEABC::Addressee me = TDEABC::StdAddressBook::self()->whoAmI();
|
|
lst = me.emails();
|
|
for ( it = lst.begin(); it != lst.end(); ++it ) {
|
|
fullEmails << me.fullEmail( *it );
|
|
}
|
|
|
|
// Warning, this list could contain duplicates.
|
|
return fullEmails;
|
|
}
|
|
|
|
bool KOPrefs::thatIsMe( const TQString& _email )
|
|
{
|
|
// NOTE: this method is called for every created agenda view item, so we need to keep
|
|
// performance in mind
|
|
|
|
/* identityManager()->thatIsMe() is quite expensive since it does parsing of
|
|
_email in a way which is unnecessarily complex for what we can have here,
|
|
so we do that ourselves. This makes sense since this
|
|
|
|
if ( KOCore::self()->identityManager()->thatIsMe( _email ) )
|
|
return true;
|
|
*/
|
|
|
|
// in case email contains a full name, strip it out
|
|
// the below is the simpler but slower version of the following KMime code
|
|
// const TQString email = KPIM::getEmailAddress( _email );
|
|
const TQCString tmp = _email.utf8();
|
|
const char *cursor = tmp.data();
|
|
const char *end = tmp.data() + tmp.length();
|
|
KMime::Types::Mailbox mbox;
|
|
KMime::HeaderParsing::parseMailbox( cursor, end, mbox );
|
|
const TQString email = mbox.addrSpec.asString();
|
|
|
|
for ( KPIM::IdentityManager::ConstIterator it = KOCore::self()->identityManager()->begin();
|
|
it != KOCore::self()->identityManager()->end(); ++it ) {
|
|
if ( email == (*it).primaryEmailAddress() )
|
|
return true;
|
|
const TQStringList & aliases = (*it).emailAliases();
|
|
if ( aliases.find( email ) != aliases.end() )
|
|
return true;
|
|
}
|
|
|
|
if ( mAdditionalMails.find( email ) != mAdditionalMails.end() )
|
|
return true;
|
|
TQStringList lst = mMyAddrBookMails;
|
|
if ( lst.find( email ) != lst.end() )
|
|
return true;
|
|
return false;
|
|
}
|