diff options
Diffstat (limited to 'tdeio/tdefile/kdirselectdialog.cpp')
| -rw-r--r-- | tdeio/tdefile/kdirselectdialog.cpp | 481 |
1 files changed, 481 insertions, 0 deletions
diff --git a/tdeio/tdefile/kdirselectdialog.cpp b/tdeio/tdefile/kdirselectdialog.cpp new file mode 100644 index 000000000..6a13920fd --- /dev/null +++ b/tdeio/tdefile/kdirselectdialog.cpp @@ -0,0 +1,481 @@ +/* + Copyright (C) 2001,2002 Carsten Pfeiffer <pfeiffer@kde.org> + Copyright (C) 2001 Michael Jarrett <michaelj@corel.com> + + This library is free software; you can redistribute it and/or + modify it under the terms of the GNU Library General Public + License version 2 as published by the Free Software Foundation. + + This library 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 + Library General Public License for more details. + + You should have received a copy of the GNU Library General Public License + along with this library; see the file COPYING.LIB. If not, write to + the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, + Boston, MA 02110-1301, USA. +*/ + +#include <tqdir.h> +#include <tqlayout.h> +#include <tqpopupmenu.h> +#include <tqstringlist.h> +#include <tqvaluestack.h> + +#include <kactionclasses.h> +#include <kapplication.h> +#include <kcombobox.h> +#include <tdeconfig.h> +#include <tdefiledialog.h> +#include <tdefilespeedbar.h> +#include <kglobalsettings.h> +#include <kiconloader.h> +#include <klocale.h> +#include <kprotocolinfo.h> +#include <krecentdirs.h> +#include <kshell.h> +#include <kurl.h> +#include <kurlcompletion.h> +#include <kurlpixmapprovider.h> +#include <kinputdialog.h> +#include <tdeio/netaccess.h> +#include <tdeio/renamedlg.h> +#include <kmessagebox.h> + +#include "tdefiletreeview.h" +#include "kdirselectdialog.h" + +// ### add mutator for treeview! + +class KDirSelectDialog::KDirSelectDialogPrivate +{ +public: + KDirSelectDialogPrivate() + { + urlCombo = 0L; + branch = 0L; + comboLocked = false; + } + + KFileSpeedBar *speedBar; + KHistoryCombo *urlCombo; + KFileTreeBranch *branch; + TQString recentDirClass; + KURL startURL; + TQValueStack<KURL> dirsToList; + + bool comboLocked : 1; +}; + +static KURL rootUrl(const KURL &url) +{ + KURL root = url; + root.setPath( "/" ); + + if (!kapp->authorizeURLAction("list", KURL(), root)) + { + root = KURL::fromPathOrURL( TQDir::homeDirPath() ); + if (!kapp->authorizeURLAction("list", KURL(), root)) + { + root = url; + } + } + return root; +} + +KDirSelectDialog::KDirSelectDialog(const TQString &startDir, bool localOnly, + TQWidget *parent, const char *name, + bool modal) + : KDialogBase( parent, name, modal, i18n("Select Folder"), + Ok|Cancel|User1, Ok, false, + KGuiItem( i18n("New Folder..."), "folder_new" ) ), + m_localOnly( localOnly ) +{ + d = new KDirSelectDialogPrivate; + d->branch = 0L; + + TQFrame *page = makeMainWidget(); + TQHBoxLayout *hlay = new TQHBoxLayout( page, 0, spacingHint() ); + m_mainLayout = new TQVBoxLayout(); + d->speedBar = new KFileSpeedBar( page, "speedbar" ); + connect( d->speedBar, TQT_SIGNAL( activated( const KURL& )), + TQT_SLOT( setCurrentURL( const KURL& )) ); + hlay->addWidget( d->speedBar, 0 ); + hlay->addLayout( m_mainLayout, 1 ); + + // Create dir list + m_treeView = new KFileTreeView( page ); + m_treeView->addColumn( i18n("Folders") ); + m_treeView->setColumnWidthMode( 0, TQListView::Maximum ); + m_treeView->setResizeMode( TQListView::AllColumns ); + + d->urlCombo = new KHistoryCombo( page, "url combo" ); + d->urlCombo->setTrapReturnKey( true ); + d->urlCombo->setPixmapProvider( new KURLPixmapProvider() ); + KURLCompletion *comp = new KURLCompletion(); + comp->setMode( KURLCompletion::DirCompletion ); + d->urlCombo->setCompletionObject( comp, true ); + d->urlCombo->setAutoDeleteCompletionObject( true ); + d->urlCombo->setDuplicatesEnabled( false ); + connect( d->urlCombo, TQT_SIGNAL( textChanged( const TQString& ) ), + TQT_SLOT( slotComboTextChanged( const TQString& ) )); + + m_contextMenu = new TQPopupMenu( this ); + KAction* newFolder = new KAction( i18n("New Folder..."), "folder_new", 0, TQT_TQOBJECT(this), TQT_SLOT( slotMkdir() ), TQT_TQOBJECT(this)); + newFolder->plug(m_contextMenu); + m_contextMenu->insertSeparator(); + m_showHiddenFolders = new KToggleAction ( i18n( "Show Hidden Folders" ), 0, TQT_TQOBJECT(this), + TQT_SLOT( slotShowHiddenFoldersToggled() ), TQT_TQOBJECT(this)); + m_showHiddenFolders->plug(m_contextMenu); + + d->startURL = KFileDialog::getStartURL( startDir, d->recentDirClass ); + if ( localOnly && !d->startURL.isLocalFile() ) + { + d->startURL = KURL(); + TQString docPath = TDEGlobalSettings::documentPath(); + if (TQDir(docPath).exists()) + d->startURL.setPath( docPath ); + else + d->startURL.setPath( TQDir::homeDirPath() ); + } + + KURL root = rootUrl(d->startURL); + + m_startDir = d->startURL.url(); + + d->branch = createBranch( root ); + + readConfig( TDEGlobal::config(), "DirSelect Dialog" ); + + m_mainLayout->addWidget( m_treeView, 1 ); + m_mainLayout->addWidget( d->urlCombo, 0 ); + + connect( m_treeView, TQT_SIGNAL( currentChanged( TQListViewItem * )), + TQT_SLOT( slotCurrentChanged() )); + connect( m_treeView, TQT_SIGNAL( contextMenu( KListView *, TQListViewItem *, const TQPoint & )), + TQT_SLOT( slotContextMenu( KListView *, TQListViewItem *, const TQPoint & ))); + + connect( d->urlCombo, TQT_SIGNAL( activated( const TQString& )), + TQT_SLOT( slotURLActivated( const TQString& ))); + connect( d->urlCombo, TQT_SIGNAL( returnPressed( const TQString& )), + TQT_SLOT( slotURLActivated( const TQString& ))); + + setCurrentURL( d->startURL ); +} + + +KDirSelectDialog::~KDirSelectDialog() +{ + delete d; +} + +void KDirSelectDialog::setCurrentURL( const KURL& url ) +{ + if ( !url.isValid() ) + return; + + KURL root = rootUrl(url); + + d->startURL = url; + if ( !d->branch || + url.protocol() != d->branch->url().protocol() || + url.host() != d->branch->url().host() ) + { + if ( d->branch ) + { + // removing the root-item causes the currentChanged() signal to be + // emitted, but we don't want to update the location-combo yet. + d->comboLocked = true; + view()->removeBranch( d->branch ); + d->comboLocked = false; + } + + d->branch = createBranch( root ); + } + + d->branch->disconnect( TQT_SIGNAL( populateFinished( KFileTreeViewItem * )), + this, TQT_SLOT( slotNextDirToList( KFileTreeViewItem *))); + connect( d->branch, TQT_SIGNAL( populateFinished( KFileTreeViewItem * )), + TQT_SLOT( slotNextDirToList( KFileTreeViewItem * ) )); + + KURL dirToList = root; + d->dirsToList.clear(); + TQString path = url.path(+1); + int pos = path.length(); + + if ( path.isEmpty() ) // e.g. ftp://host.com/ -> just list the root dir + d->dirsToList.push( root ); + + else + { + while ( pos > 0 ) + { + pos = path.findRev( '/', pos -1 ); + if ( pos >= 0 ) + { + dirToList.setPath( path.left( pos +1 ) ); + d->dirsToList.push( dirToList ); +// tqDebug( "List: %s", dirToList.url().latin1()); + } + } + } + + if ( !d->dirsToList.isEmpty() ) + openNextDir( d->branch->root() ); +} + +void KDirSelectDialog::openNextDir( KFileTreeViewItem * /*parent*/ ) +{ + if ( !d->branch ) + return; + + KURL url = d->dirsToList.pop(); + + KFileTreeViewItem *item = view()->findItem( d->branch, url.path().mid(1)); + if ( item ) + { + if ( !item->isOpen() ) + item->setOpen( true ); + else // already open -> go to next one + slotNextDirToList( item ); + } +// else +// tqDebug("###### openNextDir: item not found!"); +} + +void KDirSelectDialog::slotNextDirToList( KFileTreeViewItem *item ) +{ + // scroll to make item the topmost item + view()->ensureItemVisible( item ); + TQRect r = view()->itemRect( item ); + if ( r.isValid() ) + { + int x, y; + view()->viewportToContents( view()->contentsX(), r.y(), x, y ); + view()->setContentsPos( x, y ); + } + + if ( !d->dirsToList.isEmpty() ) + openNextDir( item ); + else + { + d->branch->disconnect( TQT_SIGNAL( populateFinished( KFileTreeViewItem * )), + this, TQT_SLOT( slotNextDirToList( KFileTreeViewItem *))); + view()->setCurrentItem( item ); + item->setSelected( true ); + } +} + +void KDirSelectDialog::readConfig( TDEConfig *config, const TQString& group ) +{ + d->urlCombo->clear(); + + TDEConfigGroup conf( config, group ); + d->urlCombo->setHistoryItems( conf.readPathListEntry( "History Items" )); + + TQSize defaultSize( 400, 450 ); + resize( conf.readSizeEntry( "DirSelectDialog Size", &defaultSize )); +} + +void KDirSelectDialog::saveConfig( TDEConfig *config, const TQString& group ) +{ + TDEConfigGroup conf( config, group ); + conf.writePathEntry( "History Items", d->urlCombo->historyItems(), ',', + true, true); + conf.writeEntry( "DirSelectDialog Size", size(), true, true ); + + d->speedBar->save( config ); + + config->sync(); +} + +void KDirSelectDialog::slotUser1() +{ + slotMkdir(); +} + +void KDirSelectDialog::accept() +{ + KFileTreeViewItem *item = m_treeView->currentKFileTreeViewItem(); + if ( !item ) + return; + + if ( !d->recentDirClass.isEmpty() ) + { + KURL dir = item->url(); + if ( !item->isDir() ) + dir = dir.upURL(); + + KRecentDirs::add(d->recentDirClass, dir.url()); + } + + d->urlCombo->addToHistory( item->url().prettyURL() ); + KFileDialog::setStartDir( url() ); + + KDialogBase::accept(); + saveConfig( TDEGlobal::config(), "DirSelect Dialog" ); +} + + +KURL KDirSelectDialog::url() const +{ + return m_treeView->currentURL(); +} + +void KDirSelectDialog::slotCurrentChanged() +{ + if ( d->comboLocked ) + return; + + KFileTreeViewItem *current = view()->currentKFileTreeViewItem(); + KURL u = current ? current->url() : (d->branch ? d->branch->rootUrl() : KURL()); + + if ( u.isValid() ) + { + if ( u.isLocalFile() ) + d->urlCombo->setEditText( u.path() ); + + else // remote url + d->urlCombo->setEditText( u.prettyURL() ); + } + else + d->urlCombo->setEditText( TQString::null ); +} + +void KDirSelectDialog::slotURLActivated( const TQString& text ) +{ + if ( text.isEmpty() ) + return; + + KURL url = KURL::fromPathOrURL( text ); + d->urlCombo->addToHistory( url.prettyURL() ); + + if ( localOnly() && !url.isLocalFile() ) + return; // ### messagebox + + KURL oldURL = m_treeView->currentURL(); + if ( oldURL.isEmpty() ) + oldURL = KURL::fromPathOrURL( m_startDir ); + + setCurrentURL( url ); +} + +KFileTreeBranch * KDirSelectDialog::createBranch( const KURL& url ) +{ + TQString title = url.isLocalFile() ? url.path() : url.prettyURL(); + KFileTreeBranch *branch = view()->addBranch( url, title, m_showHiddenFolders->isChecked() ); + branch->setChildRecurse( false ); + view()->setDirOnlyMode( branch, true ); + + return branch; +} + +void KDirSelectDialog::slotComboTextChanged( const TQString& text ) +{ + if ( d->branch ) + { + KURL url = KURL::fromPathOrURL( KShell::tildeExpand( text ) ); + KFileTreeViewItem *item = d->branch->findTVIByURL( url ); + if ( item ) + { + view()->setCurrentItem( item ); + view()->setSelected( item, true ); + view()->ensureItemVisible( item ); + return; + } + } + + TQListViewItem *item = view()->currentItem(); + if ( item ) + { + item->setSelected( false ); + // 2002/12/27, deselected item is not repainted, so force it + item->repaint(); + } +} + +void KDirSelectDialog::slotContextMenu( KListView *, TQListViewItem *, const TQPoint& pos ) +{ + m_contextMenu->popup( pos ); +} + +void KDirSelectDialog::slotMkdir() +{ + bool ok; + TQString where = url().pathOrURL(); + TQString name = i18n( "New Folder" ); + if ( url().isLocalFile() && TQFileInfo( url().path(+1) + name ).exists() ) + name = TDEIO::RenameDlg::suggestName( url(), name ); + + TQString directory = TDEIO::encodeFileName( KInputDialog::getText( i18n( "New Folder" ), + i18n( "Create new folder in:\n%1" ).arg( where ), + name, &ok, this)); + if (!ok) + return; + + bool selectDirectory = true; + bool writeOk = false; + bool exists = false; + KURL folderurl( url() ); + + TQStringList dirs = TQStringList::split( TQDir::separator(), directory ); + TQStringList::ConstIterator it = dirs.begin(); + + for ( ; it != dirs.end(); ++it ) + { + folderurl.addPath( *it ); + exists = TDEIO::NetAccess::exists( folderurl, false, 0 ); + writeOk = !exists && TDEIO::NetAccess::mkdir( folderurl, topLevelWidget() ); + } + + if ( exists ) // url was already existant + { + TQString which = folderurl.isLocalFile() ? folderurl.path() : folderurl.prettyURL(); + KMessageBox::sorry(this, i18n("A file or folder named %1 already exists.").arg(which)); + selectDirectory = false; + } + else if ( !writeOk ) { + KMessageBox::sorry(this, i18n("You do not have permission to create that folder." )); + } + else if ( selectDirectory ) { + setCurrentURL( folderurl ); + } +} + +void KDirSelectDialog::slotShowHiddenFoldersToggled() +{ + KURL currentURL = url(); + + d->comboLocked = true; + view()->removeBranch( d->branch ); + d->comboLocked = false; + + KURL root = rootUrl(d->startURL); + d->branch = createBranch( root ); + + setCurrentURL( currentURL ); +} + +// static +KURL KDirSelectDialog::selectDirectory( const TQString& startDir, + bool localOnly, + TQWidget *parent, + const TQString& caption) +{ + KDirSelectDialog myDialog( startDir, localOnly, parent, + "kdirselect dialog", true ); + + if ( !caption.isNull() ) + myDialog.setCaption( caption ); + + if ( myDialog.exec() == TQDialog::Accepted ) + return TDEIO::NetAccess::mostLocalURL(myDialog.url(),parent); + else + return KURL(); +} + +void KDirSelectDialog::virtual_hook( int id, void* data ) +{ KDialogBase::virtual_hook( id, data ); } + +#include "kdirselectdialog.moc" |