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.
526 lines
14 KiB
526 lines
14 KiB
/*
|
|
kopeteaway.cpp - Kopete Away
|
|
|
|
Copyright (c) 2002 by Hendrik vom Lehn <hvl@linux-4-ever.de>
|
|
Copyright (c) 2003 Olivier Goffart <ogoffart @ kde.org>
|
|
|
|
Kopete (c) 2002-2003 by the Kopete developers <kopete-devel@kde.org>
|
|
|
|
*************************************************************************
|
|
* *
|
|
* This 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 of the License, or (at your option) any later version. *
|
|
* *
|
|
*************************************************************************
|
|
*/
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
#include <config.h>
|
|
#endif
|
|
|
|
#include "kopeteaway.h"
|
|
|
|
#include "kopeteaccountmanager.h"
|
|
#include "kopeteaccount.h"
|
|
#include "kopeteonlinestatus.h"
|
|
#include "kopeteonlinestatusmanager.h"
|
|
#include "kopetecontact.h"
|
|
#include "kopeteprefs.h"
|
|
|
|
#include <kconfig.h>
|
|
#include <tqtimer.h>
|
|
#include <kapplication.h>
|
|
#include <dcopref.h>
|
|
|
|
#include <klocale.h>
|
|
#include <kglobal.h>
|
|
#include <kdebug.h>
|
|
#include <ksettings/dispatcher.h>
|
|
|
|
#ifdef TQ_WS_X11
|
|
#include <X11/Xlib.h>
|
|
#include <X11/Xatom.h>
|
|
#include <X11/Xresource.h>
|
|
// The following include is to make --enable-final work
|
|
#include <X11/Xutil.h>
|
|
|
|
#ifdef HAVE_XSCREENSAVER
|
|
#define HasScreenSaver
|
|
#include <X11/extensions/scrnsaver.h>
|
|
#endif
|
|
#endif // TQ_WS_X11
|
|
|
|
// As this is an untested X extension we better leave it off
|
|
#undef HAVE_XIDLE
|
|
#undef HasXidle
|
|
|
|
|
|
struct KopeteAwayPrivate
|
|
{
|
|
TQString awayMessage;
|
|
TQString autoAwayMessage;
|
|
bool useAutoAwayMessage;
|
|
bool globalAway;
|
|
TQStringList awayMessageList;
|
|
TQTime idleTime;
|
|
TQTimer *timer;
|
|
bool autoaway;
|
|
bool goAvailable;
|
|
int awayTimeout;
|
|
bool useAutoAway;
|
|
TQPtrList<Kopete::Account> autoAwayAccounts;
|
|
|
|
int mouse_x;
|
|
int mouse_y;
|
|
unsigned int mouse_mask;
|
|
#ifdef TQ_WS_X11
|
|
Window root; /* root window the pointer is on */
|
|
Screen* screen; /* screen the pointer is on */
|
|
|
|
Time xIdleTime;
|
|
#endif
|
|
bool useXidle;
|
|
bool useMit;
|
|
};
|
|
|
|
Kopete::Away *Kopete::Away::instance = 0L;
|
|
|
|
Kopete::Away::Away() : TQObject( kapp , "Kopete::Away")
|
|
{
|
|
int dummy = 0;
|
|
dummy = dummy; // shut up
|
|
|
|
d = new KopeteAwayPrivate;
|
|
|
|
// Set up the away messages
|
|
d->awayMessage = TQString();
|
|
d->autoAwayMessage = TQString();
|
|
d->useAutoAwayMessage = false;
|
|
d->globalAway = false;
|
|
d->autoaway = false;
|
|
d->useAutoAway = true;
|
|
|
|
// Empty the list
|
|
d->awayMessageList.clear();
|
|
|
|
// set the XAutoLock info
|
|
#ifdef TQ_WS_X11
|
|
Display *dsp = tqt_xdisplay();
|
|
#endif
|
|
d->mouse_x = d->mouse_y=0;
|
|
d->mouse_mask = 0;
|
|
#ifdef TQ_WS_X11
|
|
d->root = DefaultRootWindow (dsp);
|
|
d->screen = ScreenOfDisplay (dsp, DefaultScreen (dsp));
|
|
#endif
|
|
d->useXidle = false;
|
|
d->useMit = false;
|
|
#ifdef HasXidle
|
|
d->useXidle = XidleQueryExtension(tqt_xdisplay(), &dummy, &dummy);
|
|
#endif
|
|
#ifdef HasScreenSaver
|
|
if(!d->useXidle)
|
|
d->useMit = XScreenSaverQueryExtension(tqt_xdisplay(), &dummy, &dummy);
|
|
#endif
|
|
#ifdef TQ_WS_X11
|
|
d->xIdleTime = 0;
|
|
#endif
|
|
kdDebug(14010) << k_funcinfo << "Idle detection methods:" << endl;
|
|
kdDebug(14010) << k_funcinfo << "\tKScreensaverIface::isBlanked()" << endl;
|
|
#ifdef TQ_WS_X11
|
|
kdDebug(14010) << k_funcinfo << "\tX11 XQueryPointer()" << endl;
|
|
#endif
|
|
if (d->useXidle)
|
|
{
|
|
kdDebug(14010) << k_funcinfo << "\tX11 Xidle extension" << endl;
|
|
}
|
|
if (d->useMit)
|
|
{
|
|
kdDebug(14010) << k_funcinfo << "\tX11 MIT Screensaver extension" << endl;
|
|
}
|
|
|
|
|
|
load();
|
|
KSettings::Dispatcher::self()->registerInstance( KGlobal::instance(), this, TQT_SLOT( load() ) );
|
|
// Set up the config object
|
|
KConfig *config = KGlobal::config();
|
|
/* Load the saved away messages */
|
|
config->setGroup("Away Messages");
|
|
|
|
// Away Messages
|
|
if(config->hasKey("Messages"))
|
|
{
|
|
d->awayMessageList = config->readListEntry("Messages");
|
|
}
|
|
else if(config->hasKey("Titles")) // Old config format
|
|
{
|
|
TQStringList titles = config->readListEntry("Titles"); // Get the titles
|
|
for(TQStringList::iterator i = titles.begin(); i != titles.end(); ++i)
|
|
{
|
|
d->awayMessageList.append( config->readEntry(*i) ); // And add it to the list
|
|
}
|
|
|
|
/* Save this list to disk */
|
|
save();
|
|
}
|
|
else
|
|
{
|
|
d->awayMessageList.append( i18n( "Sorry, I am busy right now" ) );
|
|
d->awayMessageList.append( i18n( "I am gone right now, but I will be back later" ) );
|
|
|
|
/* Save this list to disk */
|
|
save();
|
|
}
|
|
|
|
// Auto away message
|
|
if(config->hasKey("AutoAwayMessage"))
|
|
{
|
|
d->autoAwayMessage = config->readEntry("AutoAwayMessage");
|
|
}
|
|
else
|
|
{
|
|
d->autoAwayMessage = i18n( "I am gone right now, but I will be back later" );
|
|
|
|
// Save the default auto away message to disk
|
|
save();
|
|
}
|
|
|
|
// init the timer
|
|
d->timer = new TQTimer(this, "AwayTimer");
|
|
connect(d->timer, TQT_SIGNAL(timeout()), this, TQT_SLOT(slotTimerTimeout()));
|
|
d->timer->start(4000);
|
|
|
|
//init the time and other
|
|
setActive();
|
|
}
|
|
|
|
Kopete::Away::~Away()
|
|
{
|
|
if(this == instance)
|
|
instance = 0L;
|
|
delete d;
|
|
}
|
|
|
|
TQString Kopete::Away::message()
|
|
{
|
|
return getInstance()->d->awayMessage;
|
|
}
|
|
|
|
TQString Kopete::Away::autoAwayMessage()
|
|
{
|
|
return getInstance()->d->autoAwayMessage;
|
|
}
|
|
|
|
void Kopete::Away::setGlobalAwayMessage(const TQString &message)
|
|
{
|
|
if( !message.isEmpty() )
|
|
{
|
|
kdDebug(14010) << k_funcinfo <<
|
|
"Setting global away message: " << message << endl;
|
|
d->awayMessage = message;
|
|
}
|
|
}
|
|
|
|
void Kopete::Away::setAutoAwayMessage(const TQString &message)
|
|
{
|
|
if( !message.isEmpty() )
|
|
{
|
|
kdDebug(14010) << k_funcinfo <<
|
|
"Setting auto away message: " << message << endl;
|
|
d->autoAwayMessage = message;
|
|
|
|
// Save the new auto away message to disk
|
|
save();
|
|
}
|
|
}
|
|
|
|
Kopete::Away *Kopete::Away::getInstance()
|
|
{
|
|
if (!instance)
|
|
instance = new Kopete::Away;
|
|
return instance;
|
|
}
|
|
|
|
bool Kopete::Away::globalAway()
|
|
{
|
|
return getInstance()->d->globalAway;
|
|
}
|
|
|
|
void Kopete::Away::setGlobalAway(bool status)
|
|
{
|
|
getInstance()->d->globalAway = status;
|
|
}
|
|
|
|
void Kopete::Away::save()
|
|
{
|
|
KConfig *config = KGlobal::config();
|
|
/* Set the away message settings in the Away Messages config group */
|
|
config->setGroup("Away Messages");
|
|
config->writeEntry("Messages", d->awayMessageList);
|
|
config->writeEntry("AutoAwayMessage", d->autoAwayMessage);
|
|
config->sync();
|
|
|
|
emit( messagesChanged() );
|
|
}
|
|
|
|
void Kopete::Away::load()
|
|
{
|
|
KConfig *config = KGlobal::config();
|
|
config->setGroup("AutoAway");
|
|
d->awayTimeout=config->readNumEntry("Timeout", 600);
|
|
d->goAvailable=config->readBoolEntry("GoAvailable", true);
|
|
d->useAutoAway=config->readBoolEntry("UseAutoAway", true);
|
|
d->useAutoAwayMessage=config->readBoolEntry("UseAutoAwayMessage", false);
|
|
}
|
|
|
|
TQStringList Kopete::Away::getMessages()
|
|
{
|
|
return d->awayMessageList;
|
|
}
|
|
|
|
TQString Kopete::Away::getMessage( uint messageNumber )
|
|
{
|
|
TQStringList::iterator it = d->awayMessageList.at( messageNumber );
|
|
if( it != d->awayMessageList.end() )
|
|
{
|
|
TQString str = *it;
|
|
d->awayMessageList.prepend( str );
|
|
d->awayMessageList.remove( it );
|
|
save();
|
|
return str;
|
|
}
|
|
else
|
|
{
|
|
return TQString();
|
|
}
|
|
}
|
|
|
|
void Kopete::Away::addMessage(const TQString &message)
|
|
{
|
|
d->awayMessageList.prepend( message );
|
|
if( (int)d->awayMessageList.count() > KopetePrefs::prefs()->rememberedMessages() )
|
|
d->awayMessageList.pop_back();
|
|
save();
|
|
}
|
|
|
|
long int Kopete::Away::idleTime()
|
|
{
|
|
//FIXME: the time is reset to zero if more than 24 hours are elapsed
|
|
// we can imagine someone who leave his PC for several weeks
|
|
return (d->idleTime.elapsed() / 1000);
|
|
}
|
|
|
|
void Kopete::Away::slotTimerTimeout()
|
|
{
|
|
// Time to check whether we're active or autoaway. We basically have two
|
|
// bits of info to go on - KDE's screensaver status
|
|
// (KScreenSaverIface::isBlanked()) and the X11 activity detection.
|
|
//
|
|
// Note that isBlanked() is a slight of a misnomer. It returns true if we're:
|
|
// - using a non-locking screensaver, which is running, or
|
|
// - using a locking screensaver which is still locked, regardless of
|
|
// whether the user is trying to unlock it right now
|
|
// Either way, it's only worth checking for activity if the screensaver
|
|
// isn't blanked/locked, because activity while blanked is impossible and
|
|
// activity while locked never matters (if there is any, it's probably just
|
|
// the cleaner wiping the keyboard :).
|
|
|
|
|
|
/* we should be able to respond to KDesktop queries to avoid a deadlock, so we allow the event loop to be called */
|
|
static bool rentrency_protection=false;
|
|
if(rentrency_protection)
|
|
return;
|
|
rentrency_protection=true;
|
|
DCOPRef screenSaver("kdesktop", "KScreensaverIface");
|
|
DCOPReply isBlanked = screenSaver.callExt("isBlanked" , DCOPRef::UseEventLoop, 10);
|
|
rentrency_protection=false;
|
|
if(!instance) //this may have been deleted in the event loop
|
|
return;
|
|
if (!(isBlanked.isValid() && isBlanked.type == "bool" && ((bool)isBlanked)))
|
|
{
|
|
// DCOP failed, or returned something odd, or the screensaver is
|
|
// inactive, so check for activity the X11 way. It's only worth
|
|
// checking for autoaway if there's no activity, and because
|
|
// Screensaver blanking/locking implies autoAway activation (see
|
|
// KopeteIface::KopeteIface()), only worth checking autoAway when the
|
|
// screensaver isn't running.
|
|
if (isActivity())
|
|
{
|
|
setActive();
|
|
}
|
|
else if (!d->autoaway && d->useAutoAway && idleTime() > d->awayTimeout)
|
|
{
|
|
setAutoAway();
|
|
}
|
|
}
|
|
}
|
|
|
|
bool Kopete::Away::isActivity()
|
|
{
|
|
// Copyright (c) 1999 Martin R. Jones <mjones@kde.org>
|
|
//
|
|
// KDE screensaver engine
|
|
//
|
|
// This module is a heavily modified xautolock.
|
|
// In fact as of KDE 2.0 this code is practically unrecognisable as xautolock.
|
|
|
|
bool activity = false;
|
|
|
|
#ifdef TQ_WS_X11
|
|
Display *dsp = tqt_xdisplay();
|
|
Window dummy_w;
|
|
int dummy_c;
|
|
unsigned int mask; /* modifier mask */
|
|
int root_x;
|
|
int root_y;
|
|
|
|
/*
|
|
* Find out whether the pointer has moved. Using XQueryPointer for this
|
|
* is gross, but it also is the only way never to mess up propagation
|
|
* of pointer events.
|
|
*
|
|
* Remark : Unlike XNextEvent(), XPending () doesn't notice if the
|
|
* connection to the server is lost. For this reason, earlier
|
|
* versions of xautolock periodically called XNoOp (). But
|
|
* why not let XQueryPointer () do the job for us, since
|
|
* we now call that periodically anyway?
|
|
*/
|
|
if (!XQueryPointer (dsp, d->root, &(d->root), &dummy_w, &root_x, &root_y,
|
|
&dummy_c, &dummy_c, &mask))
|
|
{
|
|
/*
|
|
* Pointer has moved to another screen, so let's find out which one.
|
|
*/
|
|
for (int i = 0; i < ScreenCount(dsp); i++)
|
|
{
|
|
if (d->root == RootWindow(dsp, i))
|
|
{
|
|
d->screen = ScreenOfDisplay (dsp, i);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
// =================================================================================
|
|
|
|
Time xIdleTime = 0; // millisecs since last input event
|
|
|
|
#ifdef HasXidle
|
|
if (d->useXidle)
|
|
{
|
|
XGetIdleTime(dsp, &xIdleTime);
|
|
}
|
|
else
|
|
#endif /* HasXIdle */
|
|
|
|
{
|
|
#ifdef HasScreenSaver
|
|
if(d->useMit)
|
|
{
|
|
static XScreenSaverInfo* mitInfo = 0;
|
|
if (!mitInfo) mitInfo = XScreenSaverAllocInfo();
|
|
XScreenSaverQueryInfo (dsp, d->root, mitInfo);
|
|
xIdleTime = mitInfo->idle;
|
|
}
|
|
#endif /* HasScreenSaver */
|
|
}
|
|
|
|
// =================================================================================
|
|
|
|
// Only check idle time if we have some way of measuring it, otherwise if
|
|
// we've neither Mit nor Xidle it'll still be zero and we'll always appear active.
|
|
// FIXME: what problem does the 2000ms fudge solve?
|
|
if (root_x != d->mouse_x || root_y != d->mouse_y || mask != d->mouse_mask
|
|
|| ((d->useXidle || d->useMit) && xIdleTime < d->xIdleTime + 2000))
|
|
{
|
|
// -1 => just gone autoaway, ignore apparent activity this time round
|
|
// anything else => genuine activity
|
|
// See setAutoAway().
|
|
if (d->mouse_x != -1)
|
|
{
|
|
activity = true;
|
|
}
|
|
d->mouse_x = root_x;
|
|
d->mouse_y = root_y;
|
|
d->mouse_mask = mask;
|
|
d->xIdleTime = xIdleTime;
|
|
}
|
|
#endif // TQ_WS_X11
|
|
// =================================================================================
|
|
|
|
return activity;
|
|
}
|
|
|
|
void Kopete::Away::setActive()
|
|
{
|
|
// kdDebug(14010) << k_funcinfo << "Found activity on desktop, resetting away timer" << endl;
|
|
d->idleTime.start();
|
|
|
|
if(d->autoaway)
|
|
{
|
|
d->autoaway = false;
|
|
emit activity();
|
|
if (d->goAvailable)
|
|
{
|
|
d->autoAwayAccounts.setAutoDelete(false);
|
|
for(Kopete::Account *i=d->autoAwayAccounts.first() ; i; i=d->autoAwayAccounts.current() )
|
|
{
|
|
if(i->isConnected() && i->isAway())
|
|
{
|
|
i->setOnlineStatus( Kopete::OnlineStatusManager::self()->onlineStatus( i->protocol() ,
|
|
Kopete::OnlineStatusManager::Online ) );
|
|
}
|
|
|
|
// remove() makes the next entry in the list the current one,
|
|
// that's why we use current() above
|
|
d->autoAwayAccounts.remove();
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
void Kopete::Away::setAutoAway()
|
|
{
|
|
// A value of -1 in mouse_x indicates to checkActivity() that next time it
|
|
// fires it should ignore any apparent idle/mouse/keyboard changes.
|
|
// I think the point of this is that if you manually start the screensaver
|
|
// then there'll unavoidably be some residual mouse/keyboard activity
|
|
// that should be ignored.
|
|
d->mouse_x = -1;
|
|
|
|
// kdDebug(14010) << k_funcinfo << "Going AutoAway!" << endl;
|
|
d->autoaway = true;
|
|
|
|
// Set all accounts that are not away already to away.
|
|
// We remember them so later we only set the accounts to
|
|
// available that we set to away (and not the user).
|
|
TQPtrList<Kopete::Account> accounts = Kopete::AccountManager::self()->accounts();
|
|
for(Kopete::Account *i=accounts.first() ; i; i=accounts.next() )
|
|
{
|
|
if(i->myself()->onlineStatus().status() == Kopete::OnlineStatus::Online)
|
|
{
|
|
d->autoAwayAccounts.append(i);
|
|
|
|
if(d->useAutoAwayMessage)
|
|
{
|
|
// Display a specific away message
|
|
i->setOnlineStatus( Kopete::OnlineStatusManager::self()->onlineStatus( i->protocol() ,
|
|
Kopete::OnlineStatusManager::Idle ) ,
|
|
getInstance()->d->autoAwayMessage);
|
|
}
|
|
else
|
|
{
|
|
// Display the last away message used
|
|
i->setOnlineStatus( Kopete::OnlineStatusManager::self()->onlineStatus( i->protocol() ,
|
|
Kopete::OnlineStatusManager::Idle ) ,
|
|
getInstance()->d->awayMessage);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
#include "kopeteaway.moc"
|
|
// vim: set et ts=4 sts=4 sw=4:
|