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.
546 lines
16 KiB
546 lines
16 KiB
//
|
|
// KDE Shortcut config module
|
|
//
|
|
// Copyright (c) Mark Donohoe 1998
|
|
// Copyright (c) Matthias Ettrich 1998
|
|
// Converted to generic key configuration module, Duncan Haldane 1998.
|
|
// Layout fixes copyright (c) 2000 Preston Brown <pbrown@kde.org>
|
|
|
|
#include <config.h>
|
|
#include <stdlib.h>
|
|
|
|
#include <unistd.h>
|
|
|
|
#include <tqlabel.h>
|
|
#include <tqdir.h>
|
|
#include <tqlayout.h>
|
|
#include <tqwhatsthis.h>
|
|
#include <tqcheckbox.h>
|
|
#include <tqregexp.h>
|
|
|
|
#include <kdebug.h>
|
|
#include <klocale.h>
|
|
#include <kstandarddirs.h>
|
|
#include <ksimpleconfig.h>
|
|
#include <kmessagebox.h>
|
|
#include <kseparator.h>
|
|
#include <dcopclient.h>
|
|
#include <kapplication.h>
|
|
#include <kkey_x11.h> // Used in KKeyModule::init()
|
|
|
|
#include "keyconfig.h"
|
|
#include "keyconfig.moc"
|
|
|
|
#define KICKER_ALL_BINDINGS
|
|
|
|
//----------------------------------------------------------------------------
|
|
|
|
KKeyModule::KKeyModule( TQWidget *parent, bool isGlobal, bool bSeriesOnly, bool bSeriesNone, const char *name )
|
|
: TQWidget( parent, name )
|
|
{
|
|
init( isGlobal, bSeriesOnly, bSeriesNone );
|
|
}
|
|
|
|
KKeyModule::KKeyModule( TQWidget *parent, bool isGlobal, const char *name )
|
|
: TQWidget( parent, name )
|
|
{
|
|
init( isGlobal, false, false );
|
|
}
|
|
|
|
void KKeyModule::init( bool isGlobal, bool _bSeriesOnly, bool bSeriesNone )
|
|
{
|
|
TQString wtstr;
|
|
|
|
KeyType = isGlobal ? "global" : "standard";
|
|
|
|
bSeriesOnly = _bSeriesOnly;
|
|
|
|
kdDebug(125) << "KKeyModule::init() - Get default key bindings." << endl;
|
|
if ( KeyType == "global" ) {
|
|
KAccelActions* keys = &actions;
|
|
// see also KKeyModule::init() below !!!
|
|
#define NOSLOTS
|
|
#define KShortcuts KAccelShortcuts
|
|
#include "../../kwin/kwinbindings.cpp"
|
|
#include "../../kicker/kicker/core/kickerbindings.cpp"
|
|
#include "../../kicker/taskbar/taskbarbindings.cpp"
|
|
#include "../../kdesktop/kdesktopbindings.cpp"
|
|
#include "../../klipper/klipperbindings.cpp"
|
|
#include "../../kxkb/kxkbbindings.cpp"
|
|
#undef KShortcuts
|
|
KeyScheme = "Global Key Scheme";
|
|
KeySet = "Global Keys";
|
|
// Sorting Hack: I'll re-write the module once feature-adding begins again.
|
|
if( bSeriesOnly || bSeriesNone ) {
|
|
for( uint i = 0; i < actions.size(); i++ ) {
|
|
TQString sConfigKey = actions[i].m_sName;
|
|
//kdDebug(125) << "sConfigKey: " << sConfigKey << endl;
|
|
int iLastSpace = sConfigKey.findRev( ' ' );
|
|
bool bIsNum = false;
|
|
if( iLastSpace >= 0 )
|
|
sConfigKey.mid( iLastSpace+1 ).toInt( &bIsNum );
|
|
|
|
kdDebug(125) << "sConfigKey: " << sConfigKey
|
|
<< " bIsNum: " << bIsNum
|
|
<< " bSeriesOnly: " << bSeriesOnly << endl;
|
|
if( ((bSeriesOnly && !bIsNum) || (bSeriesNone && bIsNum)) && !sConfigKey.contains( ':' ) ) {
|
|
actions.removeAction( sConfigKey );
|
|
i--;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
if ( KeyType == "standard" ) {
|
|
for(uint i=0; i<KStdAccel::NB_STD_ACCELS; i++) {
|
|
KStdAccel::StdAccel id = (KStdAccel::StdAccel)i;
|
|
actions.insertAction( KStdAccel::action(id),
|
|
KStdAccel::description(id),
|
|
KStdAccel::defaultKey3(id),
|
|
KStdAccel::defaultKey4(id) );
|
|
}
|
|
|
|
KeyScheme = "Standard Key Scheme";
|
|
KeySet = "Keys";
|
|
}
|
|
|
|
//kdDebug(125) << "KKeyModule::init() - Read current key bindings from config." << endl;
|
|
//actions.readActions( KeySet );
|
|
|
|
sFileList = new TQStringList();
|
|
sList = new TQListBox( this );
|
|
|
|
//readSchemeNames();
|
|
sList->setCurrentItem( 0 );
|
|
connect( sList, TQT_SIGNAL( highlighted( int ) ),
|
|
TQT_SLOT( slotPreviewScheme( int ) ) );
|
|
|
|
TQLabel *label = new TQLabel( sList, i18n("&Key Scheme"), this );
|
|
|
|
wtstr = i18n("Here you can see a list of the existing key binding schemes with 'Current scheme'"
|
|
" referring to the settings you are using right now. Select a scheme to use, remove or"
|
|
" change it.");
|
|
TQWhatsThis::add( label, wtstr );
|
|
TQWhatsThis::add( sList, wtstr );
|
|
|
|
addBt = new TQPushButton( i18n("&Save Scheme..."), this );
|
|
connect( addBt, TQT_SIGNAL( clicked() ), TQT_SLOT( slotAdd() ) );
|
|
TQWhatsThis::add(addBt, i18n("Click here to add a new key bindings scheme. You will be prompted for a name."));
|
|
|
|
removeBt = new TQPushButton( i18n("&Remove Scheme"), this );
|
|
removeBt->setEnabled(FALSE);
|
|
connect( removeBt, TQT_SIGNAL( clicked() ), TQT_SLOT( slotRemove() ) );
|
|
TQWhatsThis::add( removeBt, i18n("Click here to remove the selected key bindings scheme. You can not"
|
|
" remove the standard system wide schemes, 'Current scheme' and 'KDE default'.") );
|
|
|
|
// Hack to get this setting only displayed once. It belongs in main.cpp instead.
|
|
// That move will take a lot of UI redesigning, though, so i'll do it once CVS
|
|
// opens up for feature commits again. -- ellis
|
|
/* Needed to remove because this depended upon non-BC changes in KeyEntry.*/
|
|
// If this is the "Global Keys" section of the KDE Control Center:
|
|
if( isGlobal && !bSeriesOnly ) {
|
|
preferMetaBt = new TQCheckBox( i18n("Prefer 4-modifier defaults"), this );
|
|
if( !KKeySequence::keyboardHasMetaKey() )
|
|
preferMetaBt->setEnabled( false );
|
|
preferMetaBt->setChecked( KKeySequence::useFourModifierKeys() );
|
|
connect( preferMetaBt, TQT_SIGNAL(clicked()), TQT_SLOT(slotPreferMeta()) );
|
|
TQWhatsThis::add( preferMetaBt, i18n("If your keyboard has a Meta key, but you would "
|
|
"like KDE to prefer the 3-modifier configuration defaults, then this option "
|
|
"should be unchecked.") );
|
|
} else
|
|
preferMetaBt = 0;
|
|
|
|
KSeparator* line = new KSeparator( KSeparator::HLine, this );
|
|
|
|
kc = new KeyChooserSpec( actions, this, isGlobal );
|
|
connect( kc, TQT_SIGNAL(keyChange()), this, TQT_SLOT(slotKeyChange()) );
|
|
|
|
readScheme();
|
|
|
|
TQGridLayout *topLayout = new TQGridLayout( this, 6, 2,
|
|
KDialog::marginHint(),
|
|
KDialog::spacingHint());
|
|
topLayout->addWidget(label, 0, 0);
|
|
topLayout->addMultiCellWidget(sList, 1, 2, 0, 0);
|
|
topLayout->addWidget(addBt, 1, 1);
|
|
topLayout->addWidget(removeBt, 2, 1);
|
|
if( preferMetaBt )
|
|
topLayout->addWidget(preferMetaBt, 3, 0);
|
|
topLayout->addMultiCellWidget(line, 4, 4, 0, 1);
|
|
topLayout->addRowSpacing(3, 15);
|
|
topLayout->addMultiCellWidget(kc, 5, 5, 0, 1);
|
|
|
|
setMinimumSize(topLayout->tqsizeHint());
|
|
}
|
|
|
|
KKeyModule::~KKeyModule (){
|
|
//kdDebug() << "KKeyModule destructor" << endl;
|
|
delete kc;
|
|
delete sFileList;
|
|
}
|
|
|
|
bool KKeyModule::writeSettings( const TQString& sGroup, KConfig* pConfig )
|
|
{
|
|
kc->commitChanges();
|
|
actions.writeActions( sGroup, pConfig, true, false );
|
|
return true;
|
|
}
|
|
|
|
bool KKeyModule::writeSettingsGlobal( const TQString& sGroup )
|
|
{
|
|
kc->commitChanges();
|
|
actions.writeActions( sGroup, 0, true, true );
|
|
return true;
|
|
}
|
|
|
|
void KKeyModule::load()
|
|
{
|
|
kc->listSync();
|
|
}
|
|
|
|
/*void KKeyModule::save()
|
|
{
|
|
if( preferMetaBt )
|
|
KKeySequence::useFourModifierKeys( preferMetaBt->isChecked() );
|
|
|
|
kc->commitChanges();
|
|
actions.writeActions( KeySet, 0, true, true );
|
|
if ( KeyType == "global" ) {
|
|
if ( !kapp->dcopClient()->isAttached() )
|
|
kapp->dcopClient()->attach();
|
|
// TODO: create a reconfigureKeys() method.
|
|
kapp->dcopClient()->send("kwin", "", "reconfigure()", "");
|
|
kapp->dcopClient()->send("kdesktop", "", "configure()", "");
|
|
kapp->dcopClient()->send("kicker", "Panel", "configure()", "");
|
|
}
|
|
}*/
|
|
|
|
void KKeyModule::defaults()
|
|
{
|
|
if( preferMetaBt )
|
|
preferMetaBt->setChecked( false );
|
|
KKeySequence::useFourModifierKeys( false );
|
|
kc->allDefault();
|
|
}
|
|
|
|
/*void KKeyModule::slotRemove()
|
|
{
|
|
TQString kksPath =
|
|
KGlobal::dirs()->saveLocation("data", "kcmkeys/" + KeyType);
|
|
|
|
TQDir d( kksPath );
|
|
if (!d.exists()) // what can we do?
|
|
return;
|
|
|
|
d.setFilter( TQDir::Files );
|
|
d.setSorting( TQDir::Name );
|
|
d.setNameFilter("*.kksrc");
|
|
|
|
uint ind = sList->currentItem();
|
|
|
|
if ( !d.remove( *sFileList->tqat( ind ) ) ) {
|
|
KMessageBox::sorry( 0,
|
|
i18n("This key scheme could not be removed.\n"
|
|
"Perhaps you do not have permission to alter the file "
|
|
"system where the key scheme is stored." ));
|
|
return;
|
|
}
|
|
|
|
sList->removeItem( ind );
|
|
sFileList->remove( sFileList->tqat(ind) );
|
|
}*/
|
|
|
|
void KKeyModule::slotKeyChange()
|
|
{
|
|
emit keyChange();
|
|
//emit keysChanged( &dict );
|
|
}
|
|
|
|
/*void KKeyModule::slotSave( )
|
|
{
|
|
KSimpleConfig config(*sFileList->tqat( sList->currentItem() ) );
|
|
// global=true is necessary in order to
|
|
// let both 'Global Shortcuts' and 'Shortcut Sequences' be
|
|
// written to the same scheme file.
|
|
kc->commitChanges();
|
|
actions.writeActions( KeyScheme, &config, KeyType == "global", KeyType == "global" );
|
|
}*/
|
|
|
|
void KKeyModule::slotPreferMeta()
|
|
{
|
|
kc->setPreferFourModifierKeys( preferMetaBt->isChecked() );
|
|
}
|
|
|
|
void KKeyModule::readScheme( int index )
|
|
{
|
|
kdDebug(125) << "readScheme( " << index << " )\n";
|
|
if( index == 1 )
|
|
kc->allDefault( false );
|
|
//else if( index == 2 )
|
|
// kc->allDefault( true );
|
|
else {
|
|
KConfigBase* config = 0;
|
|
if( index == 0 ) config = new KConfig( "kdeglobals" );
|
|
//else config = new KSimpleConfig( *sFileList->tqat( index ), true );
|
|
|
|
actions.readActions( (index == 0) ? KeySet : KeyScheme, config );
|
|
kc->listSync();
|
|
delete config;
|
|
}
|
|
}
|
|
|
|
/*void KKeyModule::slotAdd()
|
|
{
|
|
TQString sName;
|
|
|
|
if ( sList->currentItem() >= nSysSchemes )
|
|
sName = sList->currentText();
|
|
SaveScm ss( 0, "save scheme", sName );
|
|
|
|
bool nameValid;
|
|
TQString sFile;
|
|
int exists = -1;
|
|
|
|
do {
|
|
|
|
nameValid = TRUE;
|
|
|
|
if ( ss.exec() ) {
|
|
sName = ss.nameLine->text();
|
|
if ( sName.stripWhiteSpace().isEmpty() )
|
|
return;
|
|
|
|
sName = sName.simplifyWhiteSpace();
|
|
sFile = sName;
|
|
|
|
int ind = 0;
|
|
while ( ind < (int) sFile.length() ) {
|
|
|
|
// parse the string for first white space
|
|
|
|
ind = sFile.find(" ");
|
|
if (ind == -1) {
|
|
ind = sFile.length();
|
|
break;
|
|
}
|
|
|
|
// remove from string
|
|
|
|
sFile.remove( ind, 1);
|
|
|
|
// Make the next letter upper case
|
|
|
|
TQString s = sFile.mid( ind, 1 );
|
|
s = s.upper();
|
|
sFile.replace( ind, 1, s );
|
|
|
|
}
|
|
|
|
exists = -1;
|
|
for ( int i = 0; i < (int) sList->count(); i++ ) {
|
|
if ( sName.lower() == (sList->text(i)).lower() ) {
|
|
exists = i;
|
|
|
|
int result = KMessageBox::warningContinueCancel( 0,
|
|
i18n("A key scheme with the name '%1' already exists.\n"
|
|
"Do you want to overwrite it?\n").arg(sName),
|
|
i18n("Save Key Scheme"),
|
|
i18n("Overwrite"));
|
|
if (result == KMessageBox::Continue)
|
|
nameValid = true;
|
|
else
|
|
nameValid = false;
|
|
}
|
|
}
|
|
} else return;
|
|
|
|
} while ( nameValid == FALSE );
|
|
|
|
disconnect( sList, TQT_SIGNAL( highlighted( int ) ), this,
|
|
TQT_SLOT( slotPreviewScheme( int ) ) );
|
|
|
|
|
|
TQString kksPath = KGlobal::dirs()->saveLocation("data", "kcmkeys/");
|
|
|
|
TQDir d( kksPath );
|
|
if ( !d.exists() )
|
|
if ( !d.mkdir( kksPath ) ) {
|
|
qWarning("KKeyModule: Could not make directory to store user info.");
|
|
return;
|
|
}
|
|
|
|
kksPath += KeyType ;
|
|
kksPath += "/";
|
|
|
|
d.setPath( kksPath );
|
|
if ( !d.exists() )
|
|
if ( !d.mkdir( kksPath ) ) {
|
|
qWarning("KKeyModule: Could not make directory to store user info.");
|
|
return;
|
|
}
|
|
|
|
sFile.prepend( kksPath );
|
|
sFile += ".kksrc";
|
|
if (exists == -1)
|
|
{
|
|
sList->insertItem( sName );
|
|
sList->setFocus();
|
|
sList->setCurrentItem( sList->count()-1 );
|
|
sFileList->append( sFile );
|
|
}
|
|
else
|
|
{
|
|
sList->setFocus();
|
|
sList->setCurrentItem( exists );
|
|
}
|
|
|
|
KSimpleConfig *config =
|
|
new KSimpleConfig( sFile );
|
|
|
|
config->setGroup( KeyScheme );
|
|
config->writeEntry( "Name", sName );
|
|
delete config;
|
|
|
|
slotSave();
|
|
|
|
connect( sList, TQT_SIGNAL( highlighted( int ) ), this,
|
|
TQT_SLOT( slotPreviewScheme( int ) ) );
|
|
|
|
slotPreviewScheme( sList->currentItem() );
|
|
}*/
|
|
|
|
/*void KKeyModule::slotPreviewScheme( int indx )
|
|
{
|
|
readScheme( indx );
|
|
|
|
// Set various appropriate for the scheme
|
|
|
|
if ( indx < nSysSchemes ||
|
|
(*sFileList->tqat(indx)).contains( "/global-" ) ||
|
|
(*sFileList->tqat(indx)).contains( "/app-" ) ) {
|
|
removeBt->setEnabled( FALSE );
|
|
} else {
|
|
removeBt->setEnabled( TRUE );
|
|
}
|
|
}*/
|
|
|
|
/*void KKeyModule::readSchemeNames( )
|
|
{
|
|
TQStringList schemes = KGlobal::dirs()->findAllResources("data", "kcmkeys/" + KeyType + "/*.kksrc");
|
|
//TQRegExp r( "-kde[34].kksrc$" );
|
|
TQRegExp r( "-kde3.kksrc$" );
|
|
|
|
sList->clear();
|
|
sFileList->clear();
|
|
sList->insertItem( i18n("Current Scheme"), 0 );
|
|
sFileList->append( "Not a kcsrc file" );
|
|
sList->insertItem( i18n("KDE Traditional"), 1 );
|
|
sFileList->append( "Not a kcsrc file" );
|
|
//sList->insertItem( i18n("KDE Extended (With 'Win' Key)"), 2 );
|
|
//sList->insertItem( i18n("KDE Default for 4 Modifiers (Meta/Alt/Ctrl/Shift)"), 2 );
|
|
//sFileList->append( "Not a kcsrc file" );
|
|
nSysSchemes = 2;
|
|
|
|
// This for system files
|
|
for ( TQStringList::ConstIterator it = schemes.begin(); it != schemes.end(); ++it) {
|
|
// KPersonalizer relies on .kksrc files containing all the keyboard shortcut
|
|
// schemes for various setups. It also requires the KDE defaults to be in
|
|
// a .kksrc file. The KDE defaults shouldn't be listed here.
|
|
//if( r.search( *it ) != -1 )
|
|
// continue;
|
|
|
|
KSimpleConfig config( *it, true );
|
|
// TODO: Put 'Name' in "Settings" group
|
|
config.setGroup( KeyScheme );
|
|
TQString str = config.readEntry( "Name" );
|
|
|
|
sList->insertItem( str );
|
|
sFileList->append( *it );
|
|
}
|
|
}*/
|
|
|
|
/*void KKeyModule::updateKeys( const KAccelActions* map_P )
|
|
{
|
|
kc->updateKeys( map_P );
|
|
}*/
|
|
|
|
// write all the global keys to kdeglobals
|
|
// this is needed to be able to check for conflicts with global keys in app's keyconfig
|
|
// dialogs, kdeglobals is empty as long as you don't apply any change in controlcenter/keys
|
|
void KKeyModule::init()
|
|
{
|
|
kdDebug(125) << "KKeyModule::init()\n";
|
|
|
|
/*kdDebug(125) << "KKeyModule::init() - Initialize # Modifier Keys Settings\n";
|
|
KConfigGroupSaver cgs( KGlobal::config(), "Keyboard" );
|
|
TQString fourMods = KGlobal::config()->readEntry( "Use Four Modifier Keys", KAccel::keyboardHasMetaKey() ? "true" : "false" );
|
|
KAccel::useFourModifierKeys( fourMods == "true" );
|
|
bool bUseFourModifierKeys = KAccel::useFourModifierKeys();
|
|
KGlobal::config()->writeEntry( "User Four Modifier Keys", bUseFourModifierKeys ? "true" : "false", true, true );
|
|
*/
|
|
KAccelActions* keys = new KAccelActions();
|
|
|
|
kdDebug(125) << "KKeyModule::init() - Load Included Bindings\n";
|
|
// this should match the included files above
|
|
#define NOSLOTS
|
|
#define KShortcuts KAccelShortcuts
|
|
#include "../../klipper/klipperbindings.cpp"
|
|
#include "../../kwin/kwinbindings.cpp"
|
|
#include "../../kicker/kicker/core/kickerbindings.cpp"
|
|
#include "../../kicker/taskbar/taskbarbindings.cpp"
|
|
#include "../../kdesktop/kdesktopbindings.cpp"
|
|
#include "../../kxkb/kxkbbindings.cpp"
|
|
#undef KShortcuts
|
|
|
|
kdDebug(125) << "KKeyModule::init() - Read Config Bindings\n";
|
|
keys->readActions( "Global Keys" );
|
|
|
|
{
|
|
KSimpleConfig cfg( "kdeglobals" );
|
|
cfg.deleteGroup( "Global Keys" );
|
|
}
|
|
|
|
kdDebug(125) << "KKeyModule::init() - Write Config Bindings\n";
|
|
keys->writeActions( "Global Keys", 0, true, true );
|
|
}
|
|
|
|
//-----------------------------------------------------------------
|
|
// KeyChooserSpec
|
|
//-----------------------------------------------------------------
|
|
|
|
KeyChooserSpec::KeyChooserSpec( KAccelActions& actions, TQWidget* parent, bool bGlobal )
|
|
: KKeyChooser( actions, parent, bGlobal, false, true ), m_bGlobal( bGlobal )
|
|
{
|
|
//if( global )
|
|
// globalDict()->clear(); // don't check against global keys twice
|
|
}
|
|
|
|
/*void KeyChooserSpec::updateKeys( const KAccelActions* map_P )
|
|
{
|
|
if( global )
|
|
{
|
|
stdDict()->clear();
|
|
for( KAccelActions::ConstIterator gIt( map_P->begin());
|
|
gIt != map_P->end();
|
|
++gIt )
|
|
{
|
|
int* keyCode = new int;
|
|
*keyCode = ( *gIt ).aConfigKeyCode;
|
|
stdDict()->insert( gIt.key(), keyCode);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
globalDict()->clear();
|
|
for( KAccelActions::ConstIterator gIt( map_P->begin());
|
|
gIt != map_P->end();
|
|
++gIt )
|
|
{
|
|
int* keyCode = new int;
|
|
*keyCode = ( *gIt ).aConfigKeyCode;
|
|
globalDict()->insert( gIt.key(), keyCode);
|
|
}
|
|
}
|
|
}
|
|
*/
|