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.
181 lines
5.9 KiB
181 lines
5.9 KiB
/* This file is part of the KDE project
|
|
Copyright (C) 2001 Holger Freyther <freyther@yahoo.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; version 2
|
|
of the License.
|
|
|
|
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; see the file COPYING. If not, write to
|
|
the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
|
|
Boston, MA 02110-1301, USA.
|
|
*/
|
|
|
|
#include <kiconloader.h>
|
|
#include <tdeimproxy.h>
|
|
#include <kapplication.h>
|
|
#include <klocale.h>
|
|
#include <tdeconfig.h>
|
|
#include <tdefiledialog.h>
|
|
#include <kurl.h>
|
|
#include <konq_popupmenu.h>
|
|
|
|
#include <tqpixmap.h>
|
|
#include <tqdir.h>
|
|
#include <tqiconset.h>
|
|
#include <tqstringlist.h>
|
|
|
|
#include "kmetamenu.h"
|
|
#include "kdirmenu.h"
|
|
#include "kimcontactmenu.h"
|
|
#include "kmetamenu.moc"
|
|
|
|
KMetaMenu::KMetaMenu( TQWidget *parent, const KURL &url,
|
|
const TQString &text, const TQString &key, KIMProxy *imProxy )
|
|
: TQPopupMenu( parent),
|
|
m_root( 0 ), m_home( 0 ), m_etc( 0 ), m_current( 0 ), m_browse( 0 ) {
|
|
int recent_no;
|
|
group = key;
|
|
actions.setAutoDelete( TRUE );
|
|
|
|
TQStringList dirList;
|
|
|
|
KURL u;
|
|
|
|
u.setPath(TQDir::homeDirPath());
|
|
if ( kapp->authorizeURLAction("list", u, u) )
|
|
{
|
|
m_home = new KDirMenu( parent, url, u.path() , text );
|
|
insertItem( SmallIcon( "kfm_home" ), i18n("&Home Folder"), m_home);
|
|
dirList << u.path();
|
|
|
|
connect(m_home, TQT_SIGNAL(fileChosen(const TQString &)),
|
|
TQT_SLOT(slotFileChosen(const TQString &) ) );
|
|
}
|
|
|
|
u.setPath(TQDir::rootDirPath());
|
|
if ( kapp->authorizeURLAction("list", u, u) )
|
|
{
|
|
m_root = new KDirMenu( parent, url, u.path() , text );
|
|
insertItem( SmallIcon( "folder_red" ), i18n("&Root Folder"), m_root);
|
|
dirList << u.path();
|
|
|
|
connect(m_root, TQT_SIGNAL(fileChosen(const TQString &)),
|
|
TQT_SLOT(slotFileChosen(const TQString &) ) );
|
|
}
|
|
|
|
TQString confDir = TQDir::rootDirPath()+ "etc";
|
|
u.setPath(confDir);
|
|
if ( TQFileInfo( confDir ).isWritable() &&
|
|
kapp->authorizeURLAction("list", u, u) )
|
|
{
|
|
m_etc = new KDirMenu( parent, url, confDir, text );
|
|
insertItem( SmallIcon( "folder_yellow" ) ,
|
|
i18n("&System Configuration"), m_etc);
|
|
dirList << confDir;
|
|
|
|
connect(m_etc , TQT_SIGNAL(fileChosen(const TQString &)),
|
|
TQT_SLOT(slotFileChosen(const TQString &) ) );
|
|
}
|
|
|
|
if ( url.isLocalFile()
|
|
&& dirList.find( url.path() ) == dirList.end()
|
|
&& TQFileInfo( url.path() ).isWritable()
|
|
&& TQFileInfo( url.path() ).isDir()
|
|
&& kapp->authorizeURLAction("list", url, url) )
|
|
//Need to check whether a directory so we don't crash trying to access it
|
|
//(#60192)
|
|
{
|
|
// Also add current working directory
|
|
m_current = new KDirMenu( parent, url, url.path(), text );
|
|
insertItem( SmallIcon( "folder" ), i18n( "&Current Folder" ),
|
|
m_current );
|
|
|
|
connect(m_current, TQT_SIGNAL(fileChosen(const TQString &)),
|
|
TQT_SLOT(slotFileChosen(const TQString &) ) );
|
|
}
|
|
|
|
if ( imProxy )
|
|
{
|
|
m_contacts = new KIMContactMenu( parent, imProxy );
|
|
int item = insertItem( SmallIconSet( "personal" ), i18n( "C&ontact" ), m_contacts );
|
|
connect ( m_contacts, TQT_SIGNAL( contactChosen( const TQString &) ), TQT_SIGNAL( contactChosen( const TQString & ) ) );
|
|
if ( !imProxy->initialize() || imProxy->fileTransferContacts().isEmpty() )
|
|
setItemEnabled( item, false );
|
|
}
|
|
|
|
|
|
m_browse = new KAction(i18n("&Browse..."), 0, TQT_TQOBJECT(this), TQT_SLOT(slotBrowse()), TQT_TQOBJECT(this) );
|
|
m_browse->plug(this);
|
|
// read the last chosen dirs
|
|
// first set the group according to our parameter
|
|
conf = kapp->config( );
|
|
conf->setGroup(key );
|
|
recent_no = conf->readNumEntry("ShowRecent", 5);
|
|
list = conf->readPathListEntry("Paths");
|
|
if ( list.count() > 0 )
|
|
insertSeparator();
|
|
int i=1;
|
|
TQStringList::Iterator it = list.begin();
|
|
while( it != list.end() ) {
|
|
if( i == (recent_no + 1) )
|
|
break;
|
|
TQDir dir( *it );
|
|
u.setPath( *it );
|
|
if ( !dir.exists() || !kapp->authorizeURLAction("list", u, u) ) {
|
|
it = list.remove( it );
|
|
continue;
|
|
}
|
|
TQString escapedDir = *it;
|
|
KAction *action = new KAction(escapedDir.replace("&", "&&"), 0, TQT_TQOBJECT(this), TQT_SLOT(slotFastPath()), TQT_TQOBJECT(this));
|
|
action->plug(this );
|
|
actions.append( action );
|
|
++it;
|
|
i++;
|
|
}
|
|
}
|
|
|
|
KMetaMenu::KMetaMenu( ){
|
|
|
|
}
|
|
KMetaMenu::~KMetaMenu(){
|
|
delete m_root;
|
|
delete m_home;
|
|
delete m_etc;
|
|
delete m_current;
|
|
delete m_browse;
|
|
actions.clear();
|
|
}
|
|
void KMetaMenu::slotFileChosen(const TQString &path ){
|
|
writeConfig(path );
|
|
emit fileChosen(path );
|
|
}
|
|
|
|
void KMetaMenu::slotFastPath( ) {
|
|
KAction *action;
|
|
action = (KAction*) sender();
|
|
TQString text = action->plainText( );
|
|
slotFileChosen( text );
|
|
}
|
|
void KMetaMenu::writeConfig( const TQString &path){
|
|
list.remove(path );
|
|
list.prepend(path );
|
|
conf->setGroup( group );
|
|
int c = conf->readNumEntry( "ShowRecent", 5 );
|
|
while ( list.count() > c && !list.isEmpty() )
|
|
list.remove(list.last());
|
|
conf->writePathEntry("Paths", list);
|
|
conf->sync( );
|
|
}
|
|
void KMetaMenu::slotBrowse() {
|
|
KURL dest = KFileDialog::getExistingURL();
|
|
if( dest.isEmpty() ) return;
|
|
slotFileChosen( dest.isLocalFile() ? dest.path() : dest.url() );
|
|
}
|