summaryrefslogtreecommitdiffstats
path: root/kio/kfile/kfiledialog.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'kio/kfile/kfiledialog.cpp')
-rw-r--r--kio/kfile/kfiledialog.cpp2380
1 files changed, 0 insertions, 2380 deletions
diff --git a/kio/kfile/kfiledialog.cpp b/kio/kfile/kfiledialog.cpp
deleted file mode 100644
index 1538d5dbc..000000000
--- a/kio/kfile/kfiledialog.cpp
+++ /dev/null
@@ -1,2380 +0,0 @@
-// -*- c++ -*-
-/* This file is part of the KDE libraries
- Copyright (C) 1997, 1998 Richard Moore <rich@kde.org>
- 1998 Stephan Kulow <coolo@kde.org>
- 1998 Daniel Grana <grana@ie.iwi.unibe.ch>
- 1999,2000,2001,2002,2003 Carsten Pfeiffer <pfeiffer@kde.org>
- 2003 Clarence Dang <dang@kde.org>
-
- This library is free software; you can redistribute it and/or
- modify it under the terms of the GNU Library General Public
- License as published by the Free Software Foundation; either
- version 2 of the License, or (at your option) any later version.
-
- 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 "kfiledialog.h"
-
-#include <unistd.h>
-#include <stdlib.h>
-#include <stdio.h>
-
-#include <tqptrcollection.h>
-#include <tqcheckbox.h>
-#include <tqcombobox.h>
-#include <tqlabel.h>
-#include <tqlayout.h>
-#include <tqlineedit.h>
-#include <tqptrlist.h>
-#include <tqpixmap.h>
-#include <tqtextcodec.h>
-#include <tqtooltip.h>
-#include <tqtimer.h>
-#include <tqwhatsthis.h>
-#include <tqfiledialog.h>
-
-#include <kaccel.h>
-#include <kaction.h>
-#include <kapplication.h>
-#include <kcharsets.h>
-#include <kcmdlineargs.h>
-#include <kcompletionbox.h>
-#include <kconfig.h>
-#include <kdebug.h>
-#include <kglobal.h>
-#include <kglobalsettings.h>
-#include <kiconloader.h>
-#include <kimageio.h>
-#include <kio/job.h>
-#include <kio/netaccess.h>
-#include <kio/scheduler.h>
-#include <kio/kservicetypefactory.h>
-#include <klocale.h>
-#include <kmessagebox.h>
-#include <kmimetype.h>
-#include <kpopupmenu.h>
-#include <kprotocolinfo.h>
-#include <kpushbutton.h>
-#include <krecentdirs.h>
-#include <kshell.h>
-#include <kstandarddirs.h>
-#include <kstdguiitem.h>
-#include <kstaticdeleter.h>
-#include <ktoolbar.h>
-#include <ktoolbarbutton.h>
-#include <kurl.h>
-#include <kurlcombobox.h>
-#include <kurlcompletion.h>
-#include <kuser.h>
-
-#include "config-kfile.h"
-#include "kpreviewwidgetbase.h"
-
-#include <kdirselectdialog.h>
-#include <kfileview.h>
-#include <krecentdocument.h>
-#include <kfilefiltercombo.h>
-#include <kdiroperator.h>
-#include <kimagefilepreview.h>
-
-#include <kfilespeedbar.h>
-#include <kfilebookmarkhandler.h>
-
-#ifdef Q_WS_X11
-#include <X11/Xlib.h>
-#include <fixx11h.h>
-#endif
-
-enum Buttons { HOTLIST_BUTTON,
- PATH_COMBO, CONFIGURE_BUTTON };
-
-template class TQPtrList<TDEIO::StatJob>;
-
-namespace {
- static void silenceQToolBar(TQtMsgType, const char *)
- {
- }
-}
-
-struct KFileDialogPrivate
-{
- // the last selected url
- KURL url;
-
- // the selected filenames in multiselection mode -- FIXME
- TQString filenames;
-
- // the name of the filename set by setSelection
- TQString selection;
-
- // now following all kind of widgets, that I need to rebuild
- // the geometry management
- TQBoxLayout *boxLayout;
- TQWidget *mainWidget;
-
- TQLabel *locationLabel;
-
- // @deprecated remove in KDE4
- TQLabel *filterLabel;
- KURLComboBox *pathCombo;
- KPushButton *okButton, *cancelButton;
- KFileSpeedBar *urlBar;
- TQHBoxLayout *urlBarLayout;
- TQWidget *customWidget;
-
- // Automatically Select Extension stuff
- TQCheckBox *autoSelectExtCheckBox;
- bool autoSelectExtChecked; // whether or not the _user_ has checked the above box
- TQString extension; // current extension for this filter
-
- TQPtrList<TDEIO::StatJob> statJobs;
-
- KURL::List urlList; //the list of selected urls
-
- TQStringList mimetypes; //the list of possible mimetypes to save as
-
- // indicates if the location edit should be kept or cleared when changing
- // directories
- bool keepLocation :1;
-
- // the KDirOperators view is set in KFileDialog::show(), so to avoid
- // setting it again and again, we have this nice little boolean :)
- bool hasView :1;
-
- bool hasDefaultFilter :1; // necessary for the operationMode
- KFileDialog::OperationMode operationMode;
-
- // The file class used for KRecentDirs
- TQString fileClass;
-
- KFileBookmarkHandler *bookmarkHandler;
-
- // the ID of the path drop down so subclasses can place their custom widgets properly
- int m_pathComboIndex;
-};
-
-KURL *KFileDialog::lastDirectory; // to set the start path
-
-static KStaticDeleter<KURL> ldd;
-
-KFileDialog::KFileDialog(const TQString& startDir, const TQString& filter,
- TQWidget *parent, const char* name, bool modal)
- : KDialogBase( parent, name, modal, TQString::null, 0 )
-{
- init( startDir, filter, 0 );
-}
-
-KFileDialog::KFileDialog(const TQString& startDir, const TQString& filter,
- TQWidget *parent, const char* name, bool modal, TQWidget* widget)
- : KDialogBase( parent, name, modal, TQString::null, 0 )
-{
- init( startDir, filter, widget );
-}
-
-
-KFileDialog::~KFileDialog()
-{
- hide();
-
- TDEConfig *config = TDEGlobal::config();
-
- if (d->urlBar)
- d->urlBar->save( config );
-
- config->sync();
-
- delete d->bookmarkHandler; // Should be deleted before ops!
- delete ops;
- delete d;
-}
-
-void KFileDialog::setLocationLabel(const TQString& text)
-{
- d->locationLabel->setText(text);
-}
-
-void KFileDialog::setFilter(const TQString& filter)
-{
- int pos = filter.find('/');
-
- // Check for an un-escaped '/', if found
- // interpret as a MIME filter.
-
- if (pos > 0 && filter[pos - 1] != '\\') {
- TQStringList filters = TQStringList::split( " ", filter );
- setMimeFilter( filters );
- return;
- }
-
- // Strip the escape characters from
- // escaped '/' characters.
-
- TQString copy (filter);
- for (pos = 0; (pos = copy.find("\\/", pos)) != -1; ++pos)
- copy.remove(pos, 1);
-
- ops->clearFilter();
- filterWidget->setFilter(copy);
- ops->setNameFilter(filterWidget->currentFilter());
- d->hasDefaultFilter = false;
- filterWidget->setEditable( true );
-
- updateAutoSelectExtension ();
-}
-
-TQString KFileDialog::currentFilter() const
-{
- return filterWidget->currentFilter();
-}
-
-// deprecated
-void KFileDialog::setFilterMimeType(const TQString &label,
- const KMimeType::List &types,
- const KMimeType::Ptr &defaultType)
-{
- d->mimetypes.clear();
- d->filterLabel->setText(label);
-
- KMimeType::List::ConstIterator it;
- for( it = types.begin(); it != types.end(); ++it)
- d->mimetypes.append( (*it)->name() );
-
- setMimeFilter( d->mimetypes, defaultType->name() );
-}
-
-void KFileDialog::setMimeFilter( const TQStringList& mimeTypes,
- const TQString& defaultType )
-{
- d->mimetypes = mimeTypes;
- filterWidget->setMimeFilter( mimeTypes, defaultType );
-
- TQStringList types = TQStringList::split(" ", filterWidget->currentFilter());
- types.append( TQString::fromLatin1( "inode/directory" ));
- ops->clearFilter();
- ops->setMimeFilter( types );
- d->hasDefaultFilter = !defaultType.isEmpty();
- filterWidget->setEditable( !d->hasDefaultFilter ||
- d->operationMode != Saving );
-
- updateAutoSelectExtension ();
-}
-
-void KFileDialog::clearFilter()
-{
- d->mimetypes.clear();
- filterWidget->setFilter( TQString::null );
- ops->clearFilter();
- d->hasDefaultFilter = false;
- filterWidget->setEditable( true );
-
- updateAutoSelectExtension ();
-}
-
-TQString KFileDialog::currentMimeFilter() const
-{
- int i = filterWidget->currentItem();
- if (filterWidget->showsAllTypes())
- i--;
-
- if ((i >= 0) && (i < (int) d->mimetypes.count()))
- return d->mimetypes[i];
- return TQString::null; // The "all types" item has no mimetype
-}
-
-KMimeType::Ptr KFileDialog::currentFilterMimeType()
-{
- return KMimeType::mimeType( currentMimeFilter() );
-}
-
-void KFileDialog::setPreviewWidget(const TQWidget *w) {
- ops->setPreviewWidget(w);
- ops->clearHistory();
- d->hasView = true;
-}
-
-void KFileDialog::setPreviewWidget(const KPreviewWidgetBase *w) {
- ops->setPreviewWidget(w);
- ops->clearHistory();
- d->hasView = true;
-}
-
-KURL KFileDialog::getCompleteURL(const TQString &_url)
-{
- TQString url = KShell::tildeExpand(_url);
- KURL u;
-
- if ( KURL::isRelativeURL(url) ) // only a full URL isn't relative. Even /path is.
- {
- if (!url.isEmpty() && !TQDir::isRelativePath(url) ) // absolute path
- u.setPath( url );
- else
- {
- u = ops->url();
- u.addPath( url ); // works for filenames and relative paths
- u.cleanPath(); // fix "dir/.."
- }
- }
- else // complete URL
- u = url;
-
- return u;
-}
-
-// FIXME: check for "existing" flag here?
-void KFileDialog::slotOk()
-{
- kdDebug(kfile_area) << "slotOK\n";
-
- // a list of all selected files/directories (if any)
- // can only be used if the user didn't type any filenames/urls himself
- const KFileItemList *items = ops->selectedItems();
-
- if ( (mode() & KFile::Directory) != KFile::Directory ) {
- if ( locationEdit->currentText().stripWhiteSpace().isEmpty() ) {
- if ( !items || items->isEmpty() )
- {
- TQString msg;
- if ( d->operationMode == Saving )
- msg = i18n("Please specify the filename to save to.");
- else
- msg = i18n("Please select the file to open.");
- KMessageBox::information(this, msg);
- return;
- }
-
- // weird case: the location edit is empty, but there are
- // highlighted files
- else {
-
- bool multi = (mode() & KFile::Files) != 0;
- KFileItemListIterator it( *items );
- TQString endQuote = TQString::fromLatin1("\" ");
- TQString name, files;
- while ( it.current() ) {
- name = (*it)->name();
- if ( multi ) {
- name.prepend( '"' );
- name.append( endQuote );
- }
-
- files.append( name );
- ++it;
- }
- setLocationText( files );
- return;
- }
- }
- }
-
- bool dirOnly = ops->dirOnlyMode();
-
- // we can use our kfileitems, no need to parse anything
- if ( items && !locationEdit->lineEdit()->edited() &&
- !(items->isEmpty() && !dirOnly) ) {
-
- d->urlList.clear();
- d->filenames = TQString::null;
-
- if ( dirOnly ) {
- d->url = ops->url();
- }
- else {
- if ( !(mode() & KFile::Files) ) {// single selection
- d->url = items->getFirst()->url();
- }
-
- else { // multi (dirs and/or files)
- d->url = ops->url();
- KFileItemListIterator it( *items );
- while ( it.current() ) {
- d->urlList.append( (*it)->url() );
- ++it;
- }
- }
- }
-
- KURL url = TDEIO::NetAccess::mostLocalURL(d->url,topLevelWidget());
- if ( (mode() & KFile::LocalOnly) == KFile::LocalOnly &&
- !url.isLocalFile() ) {
-// ### after message freeze, add message for directories!
- KMessageBox::sorry( d->mainWidget,
- i18n("You can only select local files."),
- i18n("Remote Files Not Accepted") );
- return;
- }
-
- d->url = url;
- accept();
- return;
- }
-
-
- KURL selectedURL;
-
- if ( (mode() & KFile::Files) == KFile::Files ) {// multiselection mode
- TQString locationText = locationEdit->currentText();
- if ( locationText.contains( '/' )) {
- // relative path? -> prepend the current directory
- KURL u( ops->url(), KShell::tildeExpand(locationText));
- if ( u.isValid() )
- selectedURL = u;
- else
- selectedURL = ops->url();
- }
- else // simple filename -> just use the current URL
- selectedURL = ops->url();
- }
-
- else {
- selectedURL = getCompleteURL(locationEdit->currentText());
-
- // appendExtension() may change selectedURL
- appendExtension (selectedURL);
- }
-
- if ( !selectedURL.isValid() ) {
- KMessageBox::sorry( d->mainWidget, i18n("%1\ndoes not appear to be a valid URL.\n").arg(d->url.url()), i18n("Invalid URL") );
- return;
- }
-
- KURL url = TDEIO::NetAccess::mostLocalURL(selectedURL,topLevelWidget());
- if ( (mode() & KFile::LocalOnly) == KFile::LocalOnly &&
- !url.isLocalFile() ) {
- KMessageBox::sorry( d->mainWidget,
- i18n("You can only select local files."),
- i18n("Remote Files Not Accepted") );
- return;
- }
-
- d->url = url;
-
- // d->url is a correct URL now
-
- if ( (mode() & KFile::Directory) == KFile::Directory ) {
- kdDebug(kfile_area) << "Directory" << endl;
- bool done = true;
- if ( d->url.isLocalFile() ) {
- if ( locationEdit->currentText().stripWhiteSpace().isEmpty() ) {
- TQFileInfo info( d->url.path() );
- if ( info.isDir() ) {
- d->filenames = TQString::null;
- d->urlList.clear();
- d->urlList.append( d->url );
- accept();
- }
- else if (!info.exists() && (mode() & KFile::File) != KFile::File) {
- // directory doesn't exist, create and enter it
- if ( ops->mkdir( d->url.url(), true ))
- return;
- else
- accept();
- }
- else { // d->url is not a directory,
- // maybe we are in File(s) | Directory mode
- if ( (mode() & KFile::File) == KFile::File ||
- (mode() & KFile::Files) == KFile::Files )
- done = false;
- }
- }
- else // Directory mode, with file[s]/dir[s] selected
- {
- if ( mode() & KFile::ExistingOnly )
- {
- if ( ops->dirOnlyMode() )
- {
- KURL fullURL(d->url, locationEdit->currentText());
- if ( TQFile::exists( fullURL.path() ) )
- {
- d->url = fullURL;
- d->filenames = TQString::null;
- d->urlList.clear();
- accept();
- return;
- }
- else // doesn't exist -> reject
- return;
- }
- }
-
- d->filenames = locationEdit->currentText();
- accept(); // what can we do?
- }
-
- }
- else { // FIXME: remote directory, should we allow that?
-// tqDebug( "**** Selected remote directory: %s", d->url.url().latin1());
- d->filenames = TQString::null;
- d->urlList.clear();
- d->urlList.append( d->url );
-
- if ( mode() & KFile::ExistingOnly )
- done = false;
- else
- accept();
- }
-
- if ( done )
- return;
- }
-
- if (!kapp->authorizeURLAction("open", KURL(), d->url))
- {
- TQString msg = TDEIO::buildErrorString(TDEIO::ERR_ACCESS_DENIED, d->url.prettyURL());
- KMessageBox::error( d->mainWidget, msg);
- return;
- }
-
- TDEIO::StatJob *job = 0L;
- d->statJobs.clear();
- d->filenames = KShell::tildeExpand(locationEdit->currentText());
-
- if ( (mode() & KFile::Files) == KFile::Files &&
- !locationEdit->currentText().contains( '/' )) {
- kdDebug(kfile_area) << "Files\n";
- KURL::List list = parseSelectedURLs();
- for ( KURL::List::ConstIterator it = list.begin();
- it != list.end(); ++it )
- {
- if (!kapp->authorizeURLAction("open", KURL(), *it))
- {
- TQString msg = TDEIO::buildErrorString(TDEIO::ERR_ACCESS_DENIED, (*it).prettyURL());
- KMessageBox::error( d->mainWidget, msg);
- return;
- }
- }
- for ( KURL::List::ConstIterator it = list.begin();
- it != list.end(); ++it )
- {
- job = TDEIO::stat( *it, !(*it).isLocalFile() );
- job->setWindow (topLevelWidget());
- TDEIO::Scheduler::scheduleJob( job );
- d->statJobs.append( job );
- connect( job, TQT_SIGNAL( result(TDEIO::Job *) ),
- TQT_SLOT( slotStatResult( TDEIO::Job *) ));
- }
- return;
- }
-
- job = TDEIO::stat(d->url,!d->url.isLocalFile());
- job->setWindow (topLevelWidget());
- d->statJobs.append( job );
- connect(job, TQT_SIGNAL(result(TDEIO::Job*)), TQT_SLOT(slotStatResult(TDEIO::Job*)));
-}
-
-
-static bool isDirectory (const TDEIO::UDSEntry &t)
-{
- bool isDir = false;
-
- for (TDEIO::UDSEntry::ConstIterator it = t.begin();
- it != t.end();
- it++)
- {
- if ((*it).m_uds == TDEIO::UDS_FILE_TYPE)
- {
- isDir = S_ISDIR ((mode_t) ((*it).m_long));
- break;
- }
- }
-
- return isDir;
-}
-
-// FIXME : count all errors and show messagebox when d->statJobs.count() == 0
-// in case of an error, we cancel the whole operation (clear d->statJobs and
-// don't call accept)
-void KFileDialog::slotStatResult(TDEIO::Job* job)
-{
- kdDebug(kfile_area) << "slotStatResult" << endl;
- TDEIO::StatJob *sJob = static_cast<TDEIO::StatJob *>( job );
-
- if ( !d->statJobs.removeRef( sJob ) ) {
- return;
- }
-
- int count = d->statJobs.count();
-
- // errors mean in general, the location is no directory ;/
- // Can we be sure that it is exististant at all? (pfeiffer)
- if (sJob->error() && count == 0 && !ops->dirOnlyMode())
- {
- accept();
- return;
- }
-
- TDEIO::UDSEntry t = sJob->statResult();
- if (isDirectory (t))
- {
- if ( ops->dirOnlyMode() )
- {
- d->filenames = TQString::null;
- d->urlList.clear();
- accept();
- }
- else // in File[s] mode, directory means error -> cd into it
- {
- if ( count == 0 ) {
- locationEdit->clearEdit();
- locationEdit->lineEdit()->setEdited( false );
- setURL( sJob->url() );
- }
- }
- d->statJobs.clear();
- return;
- }
- else if ( ops->dirOnlyMode() )
- {
- return; // ### error message?
- }
-
- kdDebug(kfile_area) << "filename " << sJob->url().url() << endl;
-
- if ( count == 0 )
- accept();
-}
-
-void KFileDialog::accept()
-{
- setResult( TQDialog::Accepted ); // parseSelectedURLs() checks that
-
- *lastDirectory = ops->url();
- if (!d->fileClass.isEmpty())
- KRecentDirs::add(d->fileClass, ops->url().url());
-
- // clear the topmost item, we insert it as full path later on as item 1
- locationEdit->changeItem( TQString::null, 0 );
-
- KURL::List list = selectedURLs();
- TQValueListConstIterator<KURL> it = list.begin();
- for ( ; it != list.end(); ++it ) {
- const KURL& url = *it;
- // we strip the last slash (-1) because KURLComboBox does that as well
- // when operating in file-mode. If we wouldn't , dupe-finding wouldn't
- // work.
- TQString file = url.isLocalFile() ? url.path(-1) : url.prettyURL(-1);
-
- // remove dupes
- for ( int i = 1; i < locationEdit->count(); i++ ) {
- if ( locationEdit->text( i ) == file ) {
- locationEdit->removeItem( i-- );
- break;
- }
- }
- locationEdit->insertItem( file, 1 );
- }
-
- TDEConfig *config = TDEGlobal::config();
- config->setForceGlobal( true );
- writeConfig( config, ConfigGroup );
- config->setForceGlobal( false );
-
- saveRecentFiles( config );
- config->sync();
-
- KDialogBase::accept();
-
- addToRecentDocuments();
-
- if ( (mode() & KFile::Files) != KFile::Files ) // single selection
- emit fileSelected(d->url.url());
-
- ops->close();
- emit okClicked();
-}
-
-
-void KFileDialog::fileHighlighted(const KFileItem *i)
-{
- if (i && i->isDir())
- return;
-
-
- if ( (ops->mode() & KFile::Files) != KFile::Files ) {
- if ( !i )
- return;
-
- d->url = i->url();
-
- if ( !locationEdit->hasFocus() ) { // don't disturb while editing
- setLocationText( i->name() );
- }
- emit fileHighlighted(d->url.url());
- }
-
- else {
- multiSelectionChanged();
- emit selectionChanged();
- }
-}
-
-void KFileDialog::fileSelected(const KFileItem *i)
-{
- if (i && i->isDir())
- return;
-
- if ( (ops->mode() & KFile::Files) != KFile::Files ) {
- if ( !i )
- return;
-
- d->url = i->url();
- setLocationText( i->name() );
- }
- else {
- multiSelectionChanged();
- emit selectionChanged();
- }
- slotOk();
-}
-
-
-// I know it's slow to always iterate thru the whole filelist
-// (ops->selectedItems()), but what can we do?
-void KFileDialog::multiSelectionChanged()
-{
- if ( locationEdit->hasFocus() ) // don't disturb
- return;
-
- locationEdit->lineEdit()->setEdited( false );
- KFileItem *item;
- const KFileItemList *list = ops->selectedItems();
- if ( !list ) {
- locationEdit->clearEdit();
- return;
- }
-
- static const TQString &begin = TDEGlobal::staticQString(" \"");
- KFileItemListIterator it ( *list );
- TQString text;
- while ( (item = it.current()) ) {
- text.append( begin ).append( item->name() ).append( '\"' );
- ++it;
- }
-
- setLocationText( text.stripWhiteSpace() );
-}
-
-void KFileDialog::setLocationText( const TQString& text )
-{
- // setCurrentItem() will cause textChanged() being emitted,
- // so slotLocationChanged() will be called. Make sure we don't clear
- // the KDirOperator's view-selection in there
- disconnect( locationEdit, TQT_SIGNAL( textChanged( const TQString& ) ),
- this, TQT_SLOT( slotLocationChanged( const TQString& ) ) );
- locationEdit->setCurrentItem( 0 );
- connect( locationEdit, TQT_SIGNAL( textChanged( const TQString& ) ),
- TQT_SLOT( slotLocationChanged( const TQString& )) );
- locationEdit->setEditText( text );
-
- // don't change selection when user has clicked on an item
- if ( d->operationMode == Saving && !locationEdit->isVisible())
- setNonExtSelection();
-}
-
-static const char autocompletionWhatsThisText[] = I18N_NOOP("<p>While typing in the text area, you may be presented "
- "with possible matches. "
- "This feature can be controlled by clicking with the right mouse button "
- "and selecting a preferred mode from the <b>Text Completion</b> menu.") "</qt>";
-void KFileDialog::updateLocationWhatsThis (void)
-{
- TQString whatsThisText;
- if (d->operationMode == KFileDialog::Saving)
- {
- whatsThisText = "<qt>" + i18n("This is the name to save the file as.") +
- i18n (autocompletionWhatsThisText);
- }
- else if (ops->mode() & KFile::Files)
- {
- whatsThisText = "<qt>" + i18n("This is the list of files to open. More than "
- "one file can be specified by listing several "
- "files, separated by spaces.") +
- i18n (autocompletionWhatsThisText);
- }
- else
- {
- whatsThisText = "<qt>" + i18n("This is the name of the file to open.") +
- i18n (autocompletionWhatsThisText);
- }
-
- TQWhatsThis::add(d->locationLabel, whatsThisText);
- TQWhatsThis::add(locationEdit, whatsThisText);
-}
-
-void KFileDialog::init(const TQString& startDir, const TQString& filter, TQWidget* widget)
-{
- initStatic();
- d = new KFileDialogPrivate();
-
- d->boxLayout = 0;
- d->keepLocation = false;
- d->operationMode = Opening;
- d->bookmarkHandler = 0;
- d->hasDefaultFilter = false;
- d->hasView = false;
- d->mainWidget = new TQWidget( this, "KFileDialog::mainWidget");
- setMainWidget( d->mainWidget );
- d->okButton = new KPushButton( KStdGuiItem::ok(), d->mainWidget );
- d->okButton->setDefault( true );
- d->cancelButton = new KPushButton(KStdGuiItem::cancel(), d->mainWidget);
- connect( d->okButton, TQT_SIGNAL( clicked() ), TQT_SLOT( slotOk() ));
- connect( d->cancelButton, TQT_SIGNAL( clicked() ), TQT_SLOT( slotCancel() ));
- d->customWidget = widget;
- d->autoSelectExtCheckBox = 0; // delayed loading
- d->autoSelectExtChecked = false;
- d->urlBar = 0; // delayed loading
-
- TQtMsgHandler oldHandler = tqInstallMsgHandler( silenceQToolBar );
- toolbar = new KToolBar( d->mainWidget, "KFileDialog::toolbar", true);
- toolbar->setFlat(true);
- tqInstallMsgHandler( oldHandler );
-
- d->pathCombo = new KURLComboBox( KURLComboBox::Directories, true,
- toolbar, "path combo" );
- TQToolTip::add( d->pathCombo, i18n("Current location") );
- TQWhatsThis::add( d->pathCombo, "<qt>" + i18n("This is the currently listed location. "
- "The drop-down list also lists commonly used locations. "
- "This includes standard locations, such as your home folder, as well as "
- "locations that have been visited recently.") + i18n (autocompletionWhatsThisText));
-
- KURL u;
- u.setPath( TQDir::rootDirPath() );
- TQString text = i18n("Root Folder: %1").arg( u.path() );
- d->pathCombo->addDefaultURL( u,
- KMimeType::pixmapForURL( u, 0, KIcon::Small ),
- text );
-
- u.setPath( TQDir::homeDirPath() );
- text = i18n("Home Folder: %1").arg( u.path( +1 ) );
- d->pathCombo->addDefaultURL( u, KMimeType::pixmapForURL( u, 0, KIcon::Small ),
- text );
-
- KURL docPath;
- docPath.setPath( TDEGlobalSettings::documentPath() );
- if ( (u.path(+1) != docPath.path(+1)) &&
- TQDir(docPath.path(+1)).exists() )
- {
- text = i18n("Documents: %1").arg( docPath.path( +1 ) );
- d->pathCombo->addDefaultURL( docPath,
- KMimeType::pixmapForURL( docPath, 0, KIcon::Small ),
- text );
- }
-
- u.setPath( TDEGlobalSettings::desktopPath() );
- text = i18n("Desktop: %1").arg( u.path( +1 ) );
- d->pathCombo->addDefaultURL( u,
- KMimeType::pixmapForURL( u, 0, KIcon::Small ),
- text );
-
- d->url = getStartURL( startDir, d->fileClass );
- d->selection = d->url.url();
-
- // If local, check it exists. If not, go up until it exists.
- if ( d->url.isLocalFile() )
- {
- if ( !TQFile::exists( d->url.path() ) )
- {
- d->url = d->url.upURL();
- TQDir dir( d->url.path() );
- while ( !dir.exists() )
- {
- d->url = d->url.upURL();
- dir.setPath( d->url.path() );
- }
- }
- }
-
- ops = new KDirOperator(d->url, d->mainWidget, "KFileDialog::ops");
- ops->setOnlyDoubleClickSelectsFiles( true );
- connect(ops, TQT_SIGNAL(urlEntered(const KURL&)),
- TQT_SLOT(urlEntered(const KURL&)));
- connect(ops, TQT_SIGNAL(fileHighlighted(const KFileItem *)),
- TQT_SLOT(fileHighlighted(const KFileItem *)));
- connect(ops, TQT_SIGNAL(fileSelected(const KFileItem *)),
- TQT_SLOT(fileSelected(const KFileItem *)));
- connect(ops, TQT_SIGNAL(finishedLoading()),
- TQT_SLOT(slotLoadingFinished()));
-
- ops->setupMenu(KDirOperator::SortActions |
- KDirOperator::FileActions |
- KDirOperator::ViewActions);
- KActionCollection *coll = ops->actionCollection();
-
- // plug nav items into the toolbar
- coll->action( "up" )->plug( toolbar );
- coll->action( "up" )->setWhatsThis(i18n("<qt>Click this button to enter the parent folder.<p>"
- "For instance, if the current location is file:/home/%1 clicking this "
- "button will take you to file:/home.</qt>").arg( KUser().loginName() ));
- coll->action( "back" )->plug( toolbar );
- coll->action( "back" )->setWhatsThis(i18n("Click this button to move backwards one step in the browsing history."));
- coll->action( "forward" )->plug( toolbar );
- coll->action( "forward" )->setWhatsThis(i18n("Click this button to move forward one step in the browsing history."));
- coll->action( "reload" )->plug( toolbar );
- coll->action( "reload" )->setWhatsThis(i18n("Click this button to reload the contents of the current location."));
- coll->action( "mkdir" )->setShortcut(Key_F10);
- coll->action( "mkdir" )->plug( toolbar );
- coll->action( "mkdir" )->setWhatsThis(i18n("Click this button to create a new folder."));
-
- KToggleAction *showSidebarAction =
- new KToggleAction(i18n("Show Quick Access Navigation Panel"), Key_F9, coll,"toggleSpeedbar");
- showSidebarAction->setCheckedState(i18n("Hide Quick Access Navigation Panel"));
- connect( showSidebarAction, TQT_SIGNAL( toggled( bool ) ),
- TQT_SLOT( toggleSpeedbar( bool )) );
-
- KToggleAction *showBookmarksAction =
- new KToggleAction(i18n("Show Bookmarks"), 0, coll, "toggleBookmarks");
- showBookmarksAction->setCheckedState(i18n("Hide Bookmarks"));
- connect( showBookmarksAction, TQT_SIGNAL( toggled( bool ) ),
- TQT_SLOT( toggleBookmarks( bool )) );
-
- KActionMenu *menu = new KActionMenu( i18n("Configure"), "configure", TQT_TQOBJECT(this), "extra menu" );
- menu->setWhatsThis(i18n("<qt>This is the configuration menu for the file dialog. "
- "Various options can be accessed from this menu including: <ul>"
- "<li>how files are sorted in the list</li>"
- "<li>types of view, including icon and list</li>"
- "<li>showing of hidden files</li>"
- "<li>the Quick Access navigation panel</li>"
- "<li>file previews</li>"
- "<li>separating folders from files</li></ul></qt>"));
- menu->insert( coll->action( "sorting menu" ));
- menu->insert( coll->action( "separator" ));
- coll->action( "short view" )->setShortcut(Key_F6);
- menu->insert( coll->action( "short view" ));
- coll->action( "detailed view" )->setShortcut(Key_F7);
- menu->insert( coll->action( "detailed view" ));
- menu->insert( coll->action( "separator" ));
- coll->action( "show hidden" )->setShortcut(Key_F8);
- menu->insert( coll->action( "show hidden" ));
- menu->insert( showSidebarAction );
- menu->insert( showBookmarksAction );
- coll->action( "preview" )->setShortcut(Key_F11);
- menu->insert( coll->action( "preview" ));
- coll->action( "separate dirs" )->setShortcut(Key_F12);
- menu->insert( coll->action( "separate dirs" ));
-
- menu->setDelayed( false );
- connect( menu->popupMenu(), TQT_SIGNAL( aboutToShow() ),
- ops, TQT_SLOT( updateSelectionDependentActions() ));
- menu->plug( toolbar );
-
- //Insert a separator.
- KToolBarSeparator* spacerWidget = new KToolBarSeparator(Qt::Horizontal, false /*no line*/,
- toolbar);
- d->m_pathComboIndex = toolbar->insertWidget(-1, -1, spacerWidget);
- toolbar->insertWidget(PATH_COMBO, 0, d->pathCombo);
-
-
- toolbar->setItemAutoSized (PATH_COMBO);
- toolbar->setIconText(KToolBar::IconOnly);
- toolbar->setBarPos(KToolBar::Top);
- toolbar->setMovingEnabled(false);
- toolbar->adjustSize();
-
- KURLCompletion *pathCompletionObj = new KURLCompletion( KURLCompletion::DirCompletion );
- d->pathCombo->setCompletionObject( pathCompletionObj );
- d->pathCombo->setAutoDeleteCompletionObject( true );
-
- connect( d->pathCombo, TQT_SIGNAL( urlActivated( const KURL& )),
- this, TQT_SLOT( enterURL( const KURL& ) ));
- connect( d->pathCombo, TQT_SIGNAL( returnPressed( const TQString& )),
- this, TQT_SLOT( enterURL( const TQString& ) ));
-
- TQString whatsThisText;
-
- // the Location label/edit
- d->locationLabel = new TQLabel(i18n("&Location:"), d->mainWidget);
- locationEdit = new KURLComboBox(KURLComboBox::Files, true,
- d->mainWidget, "LocationEdit");
- locationEdit->setSizePolicy(TQSizePolicy(TQSizePolicy::Expanding, TQSizePolicy::Fixed));
- connect( locationEdit, TQT_SIGNAL( textChanged( const TQString& ) ),
- TQT_SLOT( slotLocationChanged( const TQString& )) );
-
- updateLocationWhatsThis ();
- d->locationLabel->setBuddy(locationEdit);
-
- locationEdit->setFocus();
- KURLCompletion *fileCompletionObj = new KURLCompletion( KURLCompletion::FileCompletion );
- TQString dir = d->url.url(+1);
- pathCompletionObj->setDir( dir );
- fileCompletionObj->setDir( dir );
- locationEdit->setCompletionObject( fileCompletionObj );
- locationEdit->setAutoDeleteCompletionObject( true );
- connect( fileCompletionObj, TQT_SIGNAL( match( const TQString& ) ),
- TQT_SLOT( fileCompletion( const TQString& )) );
-
- connect( locationEdit, TQT_SIGNAL( returnPressed() ),
- this, TQT_SLOT( slotOk()));
- connect(locationEdit, TQT_SIGNAL( activated( const TQString& )),
- this, TQT_SLOT( locationActivated( const TQString& ) ));
-
- // the Filter label/edit
- whatsThisText = i18n("<qt>This is the filter to apply to the file list. "
- "File names that do not match the filter will not be shown.<p>"
- "You may select from one of the preset filters in the "
- "drop down menu, or you may enter a custom filter "
- "directly into the text area.<p>"
- "Wildcards such as * and ? are allowed.</qt>");
- d->filterLabel = new TQLabel(i18n("&Filter:"), d->mainWidget);
- TQWhatsThis::add(d->filterLabel, whatsThisText);
- filterWidget = new KFileFilterCombo(d->mainWidget,
- "KFileDialog::filterwidget");
- filterWidget->setSizePolicy(TQSizePolicy(TQSizePolicy::Expanding, TQSizePolicy::Fixed));
- TQWhatsThis::add(filterWidget, whatsThisText);
- setFilter(filter);
- d->filterLabel->setBuddy(filterWidget);
- connect(filterWidget, TQT_SIGNAL(filterChanged()), TQT_SLOT(slotFilterChanged()));
-
- // the Automatically Select Extension checkbox
- // (the text, visibility etc. is set in updateAutoSelectExtension(), which is called by readConfig())
- d->autoSelectExtCheckBox = new TQCheckBox (d->mainWidget);
- connect(d->autoSelectExtCheckBox, TQT_SIGNAL(clicked()), TQT_SLOT(slotAutoSelectExtClicked()));
-
- initGUI(); // activate GM
-
- TDEConfig* config = TDEGlobal::config();
- readRecentFiles( config );
-
- adjustSize();
-
- ops->setViewConfig( config, ConfigGroup );
- readConfig( config, ConfigGroup );
- setSelection(d->selection);
-}
-
-void KFileDialog::initSpeedbar()
-{
- d->urlBar = new KFileSpeedBar( d->mainWidget, "url bar" );
- connect( d->urlBar, TQT_SIGNAL( activated( const KURL& )),
- TQT_SLOT( enterURL( const KURL& )) );
-
- // need to set the current url of the urlbar manually (not via urlEntered()
- // here, because the initial url of KDirOperator might be the same as the
- // one that will be set later (and then urlEntered() won't be emitted).
- // ### REMOVE THIS when KDirOperator's initial URL (in the c'tor) is gone.
- d->urlBar->setCurrentItem( d->url );
-
- d->urlBarLayout->insertWidget( 0, d->urlBar );
-}
-
-void KFileDialog::initGUI()
-{
- delete d->boxLayout; // deletes all sub layouts
-
- d->boxLayout = new TQVBoxLayout( d->mainWidget, 0, KDialog::spacingHint());
- d->boxLayout->addWidget(toolbar, AlignTop);
-
- d->urlBarLayout = new TQHBoxLayout( d->boxLayout ); // needed for the urlBar that may appear
- TQVBoxLayout *vbox = new TQVBoxLayout( d->urlBarLayout );
-
- vbox->addWidget(ops, 4);
- vbox->addSpacing(3);
-
- TQGridLayout* lafBox= new TQGridLayout(2, 3, KDialog::spacingHint());
-
- lafBox->addWidget(d->locationLabel, 0, 0, Qt::AlignVCenter);
- lafBox->addWidget(locationEdit, 0, 1, Qt::AlignVCenter);
- lafBox->addWidget(d->okButton, 0, 2, Qt::AlignVCenter);
-
- lafBox->addWidget(d->filterLabel, 1, 0, Qt::AlignVCenter);
- lafBox->addWidget(filterWidget, 1, 1, Qt::AlignVCenter);
- lafBox->addWidget(d->cancelButton, 1, 2, Qt::AlignVCenter);
-
- lafBox->setColStretch(1, 4);
-
- vbox->addLayout(TQT_TQLAYOUT(lafBox), 0);
- vbox->addSpacing(3);
-
- // add the Automatically Select Extension checkbox
- vbox->addWidget (d->autoSelectExtCheckBox);
- vbox->addSpacing (3);
-
- setTabOrder(ops, d->autoSelectExtCheckBox);
- setTabOrder (d->autoSelectExtCheckBox, locationEdit);
- setTabOrder(locationEdit, filterWidget);
- setTabOrder(filterWidget, d->okButton);
- setTabOrder(d->okButton, d->cancelButton);
- setTabOrder(d->cancelButton, d->pathCombo);
- setTabOrder(d->pathCombo, ops);
-
- // If a custom widget was specified...
- if ( d->customWidget != 0 )
- {
- // ...add it to the dialog, below the filter list box.
-
- // Change the parent so that this widget is a child of the main widget
- d->customWidget->reparent( d->mainWidget, TQPoint() );
-
- vbox->addWidget( d->customWidget );
- vbox->addSpacing(3);
-
- // FIXME: This should adjust the tab orders so that the custom widget
- // comes after the Cancel button. The code appears to do this, but the result
- // somehow screws up the tab order of the file path combo box. Not a major
- // problem, but ideally the tab order with a custom widget should be
- // the same as the order without one.
- setTabOrder(d->cancelButton, d->customWidget);
- setTabOrder(d->customWidget, d->pathCombo);
- }
- else
- {
- setTabOrder(d->cancelButton, d->pathCombo);
- }
-
- setTabOrder(d->pathCombo, ops);
-}
-
-void KFileDialog::slotFilterChanged()
-{
- TQString filter = filterWidget->currentFilter();
- ops->clearFilter();
-
- if ( filter.find( '/' ) > -1 ) {
- TQStringList types = TQStringList::split( " ", filter );
- types.prepend( "inode/directory" );
- ops->setMimeFilter( types );
- }
- else
- ops->setNameFilter( filter );
-
- ops->updateDir();
-
- updateAutoSelectExtension ();
-
- emit filterChanged( filter );
-}
-
-
-void KFileDialog::setURL(const KURL& url, bool clearforward)
-{
- d->selection = TQString::null;
- ops->setURL( url, clearforward);
-}
-
-// Protected
-void KFileDialog::urlEntered(const KURL& url)
-{
- TQString filename = locationEdit->currentText();
- d->selection = TQString::null;
-
- if ( d->pathCombo->count() != 0 ) { // little hack
- d->pathCombo->setURL( url );
- }
-
- if (url.protocol()=="beagle" && url.path()=="/") {
- d->pathCombo->setEditText("beagle:/<"+i18n("search term")+">");
- d->pathCombo->lineEdit()->setSelection(8,255);
- d->pathCombo->setFocus();
- }
-
- locationEdit->blockSignals( true );
- locationEdit->setCurrentItem( 0 );
- if ( d->keepLocation )
- locationEdit->setEditText( filename );
-
- locationEdit->blockSignals( false );
-
- TQString dir = url.url(+1);
- static_cast<KURLCompletion*>( d->pathCombo->completionObject() )->setDir( dir );
- static_cast<KURLCompletion*>( locationEdit->completionObject() )->setDir( dir );
-
- if ( d->urlBar )
- d->urlBar->setCurrentItem( url );
-}
-
-void KFileDialog::locationActivated( const TQString& url )
-{
- // This guard prevents any URL _typed_ by the user from being interpreted
- // twice (by returnPressed/slotOk and here, activated/locationActivated)
- // after the user presses Enter. Without this, _both_ setSelection and
- // slotOk would "u.addPath( url )" ...so instead we leave it up to just
- // slotOk....
- if (!locationEdit->lineEdit()->edited())
- setSelection( url );
-}
-
-void KFileDialog::enterURL( const KURL& url)
-{
- setURL( url );
-}
-
-void KFileDialog::enterURL( const TQString& url )
-{
- setURL( KURL::fromPathOrURL( KURLCompletion::replacedPath( url, true, true )) );
-}
-
-void KFileDialog::toolbarCallback(int) // SLOT
-{
- /*
- * yes, nothing uses this anymore.
- * it used to be used to show the configure dialog
- */
-}
-
-
-void KFileDialog::setSelection(const TQString& url)
-{
- kdDebug(kfile_area) << "setSelection " << url << endl;
-
- if (url.isEmpty()) {
- d->selection = TQString::null;
- return;
- }
-
- KURL u = getCompleteURL(url);
- if (!u.isValid()) { // if it still is
- kdWarning() << url << " is not a correct argument for setSelection!" << endl;
- return;
- }
-
- if (!KProtocolInfo::supportsListing(u)) {
- locationEdit->lineEdit()->setEdited( true );
- return;
- }
-
- /* we strip the first / from the path to avoid file://usr which means
- * / on host usr
- */
- KFileItem i(KFileItem::Unknown, KFileItem::Unknown, u, true );
- // KFileItem i(u.path());
- if ( i.isDir() && u.isLocalFile() && TQFile::exists( u.path() ) ) {
- // trust isDir() only if the file is
- // local (we cannot stat non-local urls) and if it exists!
- // (as KFileItem does not check if the file exists or not
- // -> the statbuffer is undefined -> isDir() is unreliable) (Simon)
- setURL(u, true);
- }
- else {
- TQString filename = u.url();
- int sep = filename.findRev('/');
- if (sep >= 0) { // there is a / in it
- if ( KProtocolInfo::supportsListing( u )) {
- KURL dir(u);
- dir.setQuery( TQString::null );
- dir.setFileName( TQString::null );
- setURL(dir, true );
- }
-
- // filename must be decoded, or "name with space" would become
- // "name%20with%20space", so we use KURL::fileName()
- filename = u.fileName();
- kdDebug(kfile_area) << "filename " << filename << endl;
- d->selection = filename;
- setLocationText( filename );
-
- // tell the line edit that it has been edited
- // otherwise we won't know this was set by the user
- // and it will be ignored if there has been an
- // auto completion. this caused bugs where automcompletion
- // would start, the user would pick something from the
- // history and then hit Ok only to get the autocompleted
- // selection. OOOPS.
- locationEdit->lineEdit()->setEdited( true );
- }
-
- d->url = ops->url();
- d->url.addPath(filename);
- }
-}
-
-void KFileDialog::slotLoadingFinished()
-{
- if ( !d->selection.isNull() )
- ops->setCurrentItem( d->selection );
-}
-
-// ### remove in KDE4
-void KFileDialog::pathComboChanged( const TQString& )
-{
-}
-void KFileDialog::dirCompletion( const TQString& ) // SLOT
-{
-}
-void KFileDialog::fileCompletion( const TQString& match )
-{
- if ( match.isEmpty() && ops->view() )
- ops->view()->clearSelection();
- else
- ops->setCurrentItem( match );
-}
-
-void KFileDialog::slotLocationChanged( const TQString& text )
-{
- if ( text.isEmpty() && ops->view() )
- ops->view()->clearSelection();
-
- updateFilter();
-}
-
-void KFileDialog::updateStatusLine(int /* dirs */, int /* files */)
-{
- kdWarning() << "KFileDialog::updateStatusLine is deprecated! The status line no longer exists. Do not try and use it!" << endl;
-}
-
-TQString KFileDialog::getOpenFileName(const TQString& startDir,
- const TQString& filter,
- TQWidget *parent, const TQString& caption)
-{
- KFileDialog dlg(startDir, filter, parent, "filedialog", true);
- dlg.setOperationMode( Opening );
-
- dlg.setMode( KFile::File | KFile::LocalOnly );
- dlg.setCaption(caption.isNull() ? i18n("Open") : caption);
-
- dlg.ops->clearHistory();
- dlg.exec();
-
- return dlg.selectedFile();
-}
-
-TQString KFileDialog::getOpenFileNameWId(const TQString& startDir,
- const TQString& filter,
- WId parent_id, const TQString& caption)
-{
- TQWidget* parent = TQT_TQWIDGET(TQWidget::find( parent_id ));
- KFileDialog dlg(startDir, filter, parent, "filedialog", true);
-#ifdef Q_WS_X11
- if( parent == NULL && parent_id != 0 )
- XSetTransientForHint( tqt_xdisplay(), dlg.winId(), parent_id );
-#else
- // TODO
-#endif
-
- dlg.setOperationMode( KFileDialog::Opening );
-
- dlg.setMode( KFile::File | KFile::LocalOnly );
- dlg.setCaption(caption.isNull() ? i18n("Open") : caption);
-
- dlg.ops->clearHistory();
- dlg.exec();
-
- return dlg.selectedFile();
-}
-
-TQStringList KFileDialog::getOpenFileNames(const TQString& startDir,
- const TQString& filter,
- TQWidget *parent,
- const TQString& caption)
-{
- KFileDialog dlg(startDir, filter, parent, "filedialog", true);
- dlg.setOperationMode( Opening );
-
- dlg.setCaption(caption.isNull() ? i18n("Open") : caption);
- dlg.setMode(KFile::Files | KFile::LocalOnly);
- dlg.ops->clearHistory();
- dlg.exec();
-
- return dlg.selectedFiles();
-}
-
-KURL KFileDialog::getOpenURL(const TQString& startDir, const TQString& filter,
- TQWidget *parent, const TQString& caption)
-{
- KFileDialog dlg(startDir, filter, parent, "filedialog", true);
- dlg.setOperationMode( Opening );
-
- dlg.setCaption(caption.isNull() ? i18n("Open") : caption);
- dlg.setMode( KFile::File );
- dlg.ops->clearHistory();
- dlg.exec();
-
- return dlg.selectedURL();
-}
-
-KURL::List KFileDialog::getOpenURLs(const TQString& startDir,
- const TQString& filter,
- TQWidget *parent,
- const TQString& caption)
-{
- KFileDialog dlg(startDir, filter, parent, "filedialog", true);
- dlg.setOperationMode( Opening );
-
- dlg.setCaption(caption.isNull() ? i18n("Open") : caption);
- dlg.setMode(KFile::Files);
- dlg.ops->clearHistory();
- dlg.exec();
-
- return dlg.selectedURLs();
-}
-
-KURL KFileDialog::getExistingURL(const TQString& startDir,
- TQWidget *parent,
- const TQString& caption)
-{
- return KDirSelectDialog::selectDirectory(startDir, false, parent, caption);
-}
-
-TQString KFileDialog::getExistingDirectory(const TQString& startDir,
- TQWidget *parent,
- const TQString& caption)
-{
-#ifdef Q_WS_WIN
- return TQFileDialog::getExistingDirectory(startDir, parent, "getExistingDirectory",
- caption, true, true);
-#else
- KURL url = KDirSelectDialog::selectDirectory(startDir, true, parent,
- caption);
- if ( url.isValid() )
- return url.path();
-
- return TQString::null;
-#endif
-}
-
-KURL KFileDialog::getImageOpenURL( const TQString& startDir, TQWidget *parent,
- const TQString& caption)
-{
- TQStringList mimetypes = KImageIO::mimeTypes( KImageIO::Reading );
- KFileDialog dlg(startDir,
- mimetypes.join(" "),
- parent, "filedialog", true);
- dlg.setOperationMode( Opening );
- dlg.setCaption( caption.isNull() ? i18n("Open") : caption );
- dlg.setMode( KFile::File );
-
- KImageFilePreview *ip = new KImageFilePreview( &dlg );
- dlg.setPreviewWidget( ip );
- dlg.exec();
-
- return dlg.selectedURL();
-}
-
-KURL KFileDialog::selectedURL() const
-{
- if ( result() == TQDialog::Accepted )
- return d->url;
- else
- return KURL();
-}
-
-KURL::List KFileDialog::selectedURLs() const
-{
- KURL::List list;
- if ( result() == TQDialog::Accepted ) {
- if ( (ops->mode() & KFile::Files) == KFile::Files )
- list = parseSelectedURLs();
- else
- list.append( d->url );
- }
- return list;
-}
-
-
-KURL::List& KFileDialog::parseSelectedURLs() const
-{
- if ( d->filenames.isEmpty() ) {
- return d->urlList;
- }
-
- d->urlList.clear();
- if ( d->filenames.contains( '/' )) { // assume _one_ absolute filename
- static const TQString &prot = TDEGlobal::staticQString(":/");
- KURL u;
- if ( d->filenames.find( prot ) != -1 )
- u = d->filenames;
- else
- u.setPath( d->filenames );
-
- if ( u.isValid() )
- d->urlList.append( u );
- else
- KMessageBox::error( d->mainWidget,
- i18n("The chosen filenames do not\n"
- "appear to be valid."),
- i18n("Invalid Filenames") );
- }
-
- else
- d->urlList = tokenize( d->filenames );
-
- d->filenames = TQString::null; // indicate that we parsed that one
-
- return d->urlList;
-}
-
-
-// FIXME: current implementation drawback: a filename can't contain quotes
-KURL::List KFileDialog::tokenize( const TQString& line ) const
-{
- KURL::List urls;
- KURL u( ops->url() );
- TQString name;
-
- int count = line.contains( '"' );
- if ( count == 0 ) { // no " " -> assume one single file
- u.setFileName( line );
- if ( u.isValid() )
- urls.append( u );
-
- return urls;
- }
-
- if ( (count % 2) == 1 ) { // odd number of " -> error
- TQWidget *that = const_cast<KFileDialog *>(this);
- KMessageBox::sorry(that, i18n("The requested filenames\n"
- "%1\n"
- "do not appear to be valid;\n"
- "make sure every filename is enclosed in double quotes.").arg(line),
- i18n("Filename Error"));
- return urls;
- }
-
- int start = 0;
- int index1 = -1, index2 = -1;
- while ( true ) {
- index1 = line.find( '"', start );
- index2 = line.find( '"', index1 + 1 );
-
- if ( index1 < 0 )
- break;
-
- // get everything between the " "
- name = line.mid( index1 + 1, index2 - index1 - 1 );
- u.setFileName( name );
- if ( u.isValid() )
- urls.append( u );
-
- start = index2 + 1;
- }
- return urls;
-}
-
-
-TQString KFileDialog::selectedFile() const
-{
- if ( result() == TQDialog::Accepted )
- {
- KURL url = TDEIO::NetAccess::mostLocalURL(d->url,topLevelWidget());
- if (url.isLocalFile())
- return url.path();
- else {
- KMessageBox::sorry( d->mainWidget,
- i18n("You can only select local files."),
- i18n("Remote Files Not Accepted") );
- }
- }
- return TQString::null;
-}
-
-TQStringList KFileDialog::selectedFiles() const
-{
- TQStringList list;
- KURL url;
-
- if ( result() == TQDialog::Accepted ) {
- if ( (ops->mode() & KFile::Files) == KFile::Files ) {
- KURL::List urls = parseSelectedURLs();
- TQValueListConstIterator<KURL> it = urls.begin();
- while ( it != urls.end() ) {
- url = TDEIO::NetAccess::mostLocalURL(*it,topLevelWidget());
- if ( url.isLocalFile() )
- list.append( url.path() );
- ++it;
- }
- }
-
- else { // single-selection mode
- if ( d->url.isLocalFile() )
- list.append( d->url.path() );
- }
- }
-
- return list;
-}
-
-KURL KFileDialog::baseURL() const
-{
- return ops->url();
-}
-
-TQString KFileDialog::getSaveFileName(const TQString& dir, const TQString& filter,
- TQWidget *parent,
- const TQString& caption)
-{
- bool specialDir = dir.at(0) == ':';
- KFileDialog dlg( specialDir ? dir : TQString::null, filter, parent, "filedialog", true);
- if ( !specialDir )
- dlg.setSelection( dir ); // may also be a filename
-
- dlg.setOperationMode( Saving );
- dlg.setCaption(caption.isNull() ? i18n("Save As") : caption);
-
- dlg.exec();
-
- TQString filename = dlg.selectedFile();
- if (!filename.isEmpty())
- KRecentDocument::add(filename);
-
- return filename;
-}
-
-TQString KFileDialog::getSaveFileNameWId(const TQString& dir, const TQString& filter,
- WId parent_id,
- const TQString& caption)
-{
- bool specialDir = dir.at(0) == ':';
- TQWidget* parent = TQT_TQWIDGET(TQWidget::find( parent_id ));
- KFileDialog dlg( specialDir ? dir : TQString::null, filter, parent, "filedialog", true);
-#ifdef Q_WS_X11
- if( parent == NULL && parent_id != 0 )
- XSetTransientForHint(tqt_xdisplay(), dlg.winId(), parent_id);
-#else
- // TODO
-#endif
-
- if ( !specialDir )
- dlg.setSelection( dir ); // may also be a filename
-
- dlg.setOperationMode( KFileDialog::Saving);
- dlg.setCaption(caption.isNull() ? i18n("Save As") : caption);
-
- dlg.exec();
-
- TQString filename = dlg.selectedFile();
- if (!filename.isEmpty())
- KRecentDocument::add(filename);
-
- return filename;
-}
-
-KURL KFileDialog::getSaveURL(const TQString& dir, const TQString& filter,
- TQWidget *parent, const TQString& caption)
-{
- bool specialDir = dir.at(0) == ':';
- KFileDialog dlg(specialDir ? dir : TQString::null, filter, parent, "filedialog", true);
- if ( !specialDir )
- dlg.setSelection( dir ); // may also be a filename
-
- dlg.setCaption(caption.isNull() ? i18n("Save As") : caption);
- dlg.setOperationMode( Saving );
-
- dlg.exec();
-
- KURL url = dlg.selectedURL();
- if (url.isValid())
- KRecentDocument::add( url );
-
- return url;
-}
-
-void KFileDialog::show()
-{
- if ( !d->hasView ) { // delayed view-creation
- ops->setView(KFile::Default);
- ops->clearHistory();
- d->hasView = true;
- }
-
- KDialogBase::show();
-}
-
-void KFileDialog::setMode( KFile::Mode m )
-{
- ops->setMode(m);
- if ( ops->dirOnlyMode() ) {
- filterWidget->setDefaultFilter( i18n("*|All Folders") );
- }
- else {
- filterWidget->setDefaultFilter( i18n("*|All Files") );
- }
-
- updateAutoSelectExtension ();
-}
-
-void KFileDialog::setMode( unsigned int m )
-{
- setMode(static_cast<KFile::Mode>( m ));
-}
-
-KFile::Mode KFileDialog::mode() const
-{
- return ops->mode();
-}
-
-
-void KFileDialog::readConfig( TDEConfig *kc, const TQString& group )
-{
- if ( !kc )
- return;
-
- TQString oldGroup = kc->group();
- if ( !group.isEmpty() )
- kc->setGroup( group );
-
- ops->readConfig( kc, group );
-
- KURLComboBox *combo = d->pathCombo;
- combo->setURLs( kc->readPathListEntry( RecentURLs ), KURLComboBox::RemoveTop );
- combo->setMaxItems( kc->readNumEntry( RecentURLsNumber,
- DefaultRecentURLsNumber ) );
- combo->setURL( ops->url() );
- autoDirectoryFollowing = kc->readBoolEntry( AutoDirectoryFollowing,
- DefaultDirectoryFollowing );
-
- TDEGlobalSettings::Completion cm = (TDEGlobalSettings::Completion)
- kc->readNumEntry( PathComboCompletionMode,
- TDEGlobalSettings::completionMode() );
- if ( cm != TDEGlobalSettings::completionMode() )
- combo->setCompletionMode( cm );
-
- cm = (TDEGlobalSettings::Completion)
- kc->readNumEntry( LocationComboCompletionMode,
- TDEGlobalSettings::completionMode() );
- if ( cm != TDEGlobalSettings::completionMode() )
- locationEdit->setCompletionMode( cm );
-
- // show or don't show the speedbar
- toggleSpeedbar( kc->readBoolEntry(ShowSpeedbar, true) );
-
- // show or don't show the bookmarks
- toggleBookmarks( kc->readBoolEntry(ShowBookmarks, false) );
-
- // does the user want Automatically Select Extension?
- d->autoSelectExtChecked = kc->readBoolEntry (AutoSelectExtChecked, DefaultAutoSelectExtChecked);
- updateAutoSelectExtension ();
-
- int w1 = minimumSize().width();
- int w2 = toolbar->sizeHint().width() + 10;
- if (w1 < w2)
- setMinimumWidth(w2);
-
- TQSize size = configDialogSize( group );
- resize( size );
- kc->setGroup( oldGroup );
-}
-
-void KFileDialog::writeConfig( TDEConfig *kc, const TQString& group )
-{
- if ( !kc )
- return;
-
- TQString oldGroup = kc->group();
- if ( !group.isEmpty() )
- kc->setGroup( group );
-
- kc->writePathEntry( RecentURLs, d->pathCombo->urls() );
- saveDialogSize( group, true );
- kc->writeEntry( PathComboCompletionMode, static_cast<int>(d->pathCombo->completionMode()) );
- kc->writeEntry( LocationComboCompletionMode, static_cast<int>(locationEdit->completionMode()) );
- kc->writeEntry( ShowSpeedbar, d->urlBar && !d->urlBar->isHidden() );
- kc->writeEntry( ShowBookmarks, d->bookmarkHandler != 0 );
- kc->writeEntry( AutoSelectExtChecked, d->autoSelectExtChecked );
-
- ops->writeConfig( kc, group );
- kc->setGroup( oldGroup );
-}
-
-
-void KFileDialog::readRecentFiles( TDEConfig *kc )
-{
- TQString oldGroup = kc->group();
- kc->setGroup( ConfigGroup );
-
- locationEdit->setMaxItems( kc->readNumEntry( RecentFilesNumber,
- DefaultRecentURLsNumber ) );
- locationEdit->setURLs( kc->readPathListEntry( RecentFiles ),
- KURLComboBox::RemoveBottom );
- locationEdit->insertItem( TQString::null, 0 ); // dummy item without pixmap
- locationEdit->setCurrentItem( 0 );
-
- kc->setGroup( oldGroup );
-}
-
-void KFileDialog::saveRecentFiles( TDEConfig *kc )
-{
- TQString oldGroup = kc->group();
- kc->setGroup( ConfigGroup );
-
- kc->writePathEntry( RecentFiles, locationEdit->urls() );
-
- kc->setGroup( oldGroup );
-}
-
-KPushButton * KFileDialog::okButton() const
-{
- return d->okButton;
-}
-
-KPushButton * KFileDialog::cancelButton() const
-{
- return d->cancelButton;
-}
-
-KURLBar * KFileDialog::speedBar()
-{
- return d->urlBar;
-}
-
-void KFileDialog::slotCancel()
-{
- ops->close();
- KDialogBase::slotCancel();
-
- TDEConfig *config = TDEGlobal::config();
- config->setForceGlobal( true );
- writeConfig( config, ConfigGroup );
- config->setForceGlobal( false );
-}
-
-void KFileDialog::setKeepLocation( bool keep )
-{
- d->keepLocation = keep;
-}
-
-bool KFileDialog::keepsLocation() const
-{
- return d->keepLocation;
-}
-
-void KFileDialog::setOperationMode( OperationMode mode )
-{
- d->operationMode = mode;
- d->keepLocation = (mode == Saving);
- filterWidget->setEditable( !d->hasDefaultFilter || mode != Saving );
- if ( mode == Opening )
- d->okButton->setGuiItem( KGuiItem( i18n("&Open"), "fileopen") );
- else if ( mode == Saving ) {
- d->okButton->setGuiItem( KStdGuiItem::save() );
- setNonExtSelection();
- }
- else
- d->okButton->setGuiItem( KStdGuiItem::ok() );
- updateLocationWhatsThis ();
- updateAutoSelectExtension ();
-}
-
-KFileDialog::OperationMode KFileDialog::operationMode() const
-{
- return d->operationMode;
-}
-
-void KFileDialog::slotAutoSelectExtClicked()
-{
- kdDebug (kfile_area) << "slotAutoSelectExtClicked(): "
- << d->autoSelectExtCheckBox->isChecked () << endl;
-
- // whether the _user_ wants it on/off
- d->autoSelectExtChecked = d->autoSelectExtCheckBox->isChecked ();
-
- // update the current filename's extension
- updateLocationEditExtension (d->extension /* extension hasn't changed */);
-}
-
-static TQString getExtensionFromPatternList (const TQStringList &patternList)
-{
- TQString ret;
- kdDebug (kfile_area) << "\tgetExtension " << patternList << endl;
-
- TQStringList::ConstIterator patternListEnd = patternList.end ();
- for (TQStringList::ConstIterator it = patternList.begin ();
- it != patternListEnd;
- it++)
- {
- kdDebug (kfile_area) << "\t\ttry: \'" << (*it) << "\'" << endl;
-
- // is this pattern like "*.BMP" rather than useless things like:
- //
- // README
- // *.
- // *.*
- // *.JP*G
- // *.JP?
- if ((*it).startsWith ("*.") &&
- (*it).length () > 2 &&
- (*it).find ('*', 2) < 0 && (*it).find ('?', 2) < 0)
- {
- ret = (*it).mid (1);
- break;
- }
- }
-
- return ret;
-}
-
-static TQString stripUndisplayable (const TQString &string)
-{
- TQString ret = string;
-
- ret.remove (':');
- ret.remove ('&');
-
- return ret;
-}
-
-
-TQString KFileDialog::currentFilterExtension (void)
-{
- return d->extension;
-}
-
-void KFileDialog::updateAutoSelectExtension (void)
-{
- if (!d->autoSelectExtCheckBox) return;
-
- //
- // Figure out an extension for the Automatically Select Extension thing
- // (some Windows users apparently don't know what to do when confronted
- // with a text file called "COPYING" but do know what to do with
- // COPYING.txt ...)
- //
-
- kdDebug (kfile_area) << "Figure out an extension: " << endl;
- TQString lastExtension = d->extension;
- d->extension = TQString::null;
-
- // Automatically Select Extension is only valid if the user is _saving_ a _file_
- if ((operationMode () == Saving) && (mode () & KFile::File))
- {
- //
- // Get an extension from the filter
- //
-
- TQString filter = currentFilter ();
- if (!filter.isEmpty ())
- {
- // e.g. "*.cpp"
- if (filter.find ('/') < 0)
- {
- d->extension = getExtensionFromPatternList (TQStringList::split (" ", filter)).lower ();
- kdDebug (kfile_area) << "\tsetFilter-style: pattern ext=\'"
- << d->extension << "\'" << endl;
- }
- // e.g. "text/html"
- else
- {
- KMimeType::Ptr mime = KMimeType::mimeType (filter);
-
- // first try X-TDE-NativeExtension
- TQString nativeExtension = mime->property ("X-TDE-NativeExtension").toString ();
- if (nativeExtension.at (0) == '.')
- {
- d->extension = nativeExtension.lower ();
- kdDebug (kfile_area) << "\tsetMimeFilter-style: native ext=\'"
- << d->extension << "\'" << endl;
- }
-
- // no X-TDE-NativeExtension
- if (d->extension.isEmpty ())
- {
- d->extension = getExtensionFromPatternList (mime->patterns ()).lower ();
- kdDebug (kfile_area) << "\tsetMimeFilter-style: pattern ext=\'"
- << d->extension << "\'" << endl;
- }
- }
- }
-
-
- //
- // GUI: checkbox
- //
-
- TQString whatsThisExtension;
- if (!d->extension.isEmpty ())
- {
- // remember: sync any changes to the string with below
- d->autoSelectExtCheckBox->setText (i18n ("Automatically select filename e&xtension (%1)").arg (d->extension));
- whatsThisExtension = i18n ("the extension <b>%1</b>").arg (d->extension);
-
- d->autoSelectExtCheckBox->setEnabled (true);
- d->autoSelectExtCheckBox->setChecked (d->autoSelectExtChecked);
- }
- else
- {
- // remember: sync any changes to the string with above
- d->autoSelectExtCheckBox->setText (i18n ("Automatically select filename e&xtension"));
- whatsThisExtension = i18n ("a suitable extension");
-
- d->autoSelectExtCheckBox->setChecked (false);
- d->autoSelectExtCheckBox->setEnabled (false);
- }
-
- const TQString locationLabelText = stripUndisplayable (d->locationLabel->text ());
- const TQString filterLabelText = stripUndisplayable (d->filterLabel->text ());
- TQWhatsThis::add (d->autoSelectExtCheckBox,
- "<qt>" +
- i18n (
- "This option enables some convenient features for "
- "saving files with extensions:<br>"
- "<ol>"
- "<li>Any extension specified in the <b>%1</b> text "
- "area will be updated if you change the file type "
- "to save in.<br>"
- "<br></li>"
- "<li>If no extension is specified in the <b>%2</b> "
- "text area when you click "
- "<b>Save</b>, %3 will be added to the end of the "
- "filename (if the filename does not already exist). "
- "This extension is based on the file type that you "
- "have chosen to save in.<br>"
- "<br>"
- "If you do not want TDE to supply an extension for the "
- "filename, you can either turn this option off or you "
- "can suppress it by adding a period (.) to the end of "
- "the filename (the period will be automatically "
- "removed)."
- "</li>"
- "</ol>"
- "If unsure, keep this option enabled as it makes your "
- "files more manageable."
- )
- .arg (locationLabelText)
- .arg (locationLabelText)
- .arg (whatsThisExtension)
- + "</qt>"
- );
-
- d->autoSelectExtCheckBox->show ();
-
-
- // update the current filename's extension
- updateLocationEditExtension (lastExtension);
- }
- // Automatically Select Extension not valid
- else
- {
- d->autoSelectExtCheckBox->setChecked (false);
- d->autoSelectExtCheckBox->hide ();
- }
-}
-
-// Updates the extension of the filename specified in locationEdit if the
-// Automatically Select Extension feature is enabled.
-// (this prevents you from accidently saving "file.kwd" as RTF, for example)
-void KFileDialog::updateLocationEditExtension (const TQString &lastExtension)
-{
- if (!d->autoSelectExtCheckBox->isChecked () || d->extension.isEmpty ())
- return;
-
- TQString urlStr = locationEdit->currentText ();
- if (urlStr.isEmpty ())
- return;
-
- KURL url = getCompleteURL (urlStr);
- kdDebug (kfile_area) << "updateLocationEditExtension (" << url << ")" << endl;
-
- const int fileNameOffset = urlStr.findRev ('/') + 1;
- TQString fileName = urlStr.mid (fileNameOffset);
-
- const int dot = fileName.findRev ('.');
- const int len = fileName.length ();
- if (dot > 0 && // has an extension already and it's not a hidden file
- // like ".hidden" (but we do accept ".hidden.ext")
- dot != len - 1 // and not deliberately suppressing extension
- )
- {
- // exists?
- TDEIO::UDSEntry t;
- if (TDEIO::NetAccess::stat (url, t, topLevelWidget()))
- {
- kdDebug (kfile_area) << "\tfile exists" << endl;
-
- if (isDirectory (t))
- {
- kdDebug (kfile_area) << "\tisDir - won't alter extension" << endl;
- return;
- }
-
- // --- fall through ---
- }
-
-
- //
- // try to get rid of the current extension
- //
-
- // catch "double extensions" like ".tar.gz"
- if (lastExtension.length () && fileName.endsWith (lastExtension))
- fileName.truncate (len - lastExtension.length ());
- // can only handle "single extensions"
- else
- fileName.truncate (dot);
-
- // add extension
- const TQString newText = urlStr.left (fileNameOffset) + fileName + d->extension;
- if ( newText != locationEdit->currentText() )
- {
- locationEdit->setCurrentText (urlStr.left (fileNameOffset) + fileName + d->extension);
- locationEdit->lineEdit()->setEdited (true);
- }
- }
-}
-
-// Updates the filter if the extension of the filename specified in locationEdit is changed
-// (this prevents you from accidently saving "file.kwd" as RTF, for example)
-void KFileDialog::updateFilter ()
-{
- if ((operationMode() == Saving) && (mode() & KFile::File) ) {
- const TQString urlStr = locationEdit->currentText ();
- if (urlStr.isEmpty ())
- return;
-
- KMimeType::Ptr mime = KMimeType::findByPath(urlStr, 0, true);
- if (mime && mime->name() != KMimeType::defaultMimeType()) {
- if (filterWidget->currentFilter() != mime->name() &&
- filterWidget->filters.findIndex(mime->name()) != -1) {
- filterWidget->setCurrentFilter(mime->name());
- }
- }
- }
-}
-
-// applies only to a file that doesn't already exist
-void KFileDialog::appendExtension (KURL &url)
-{
- if (!d->autoSelectExtCheckBox->isChecked () || d->extension.isEmpty ())
- return;
-
- TQString fileName = url.fileName ();
- if (fileName.isEmpty ())
- return;
-
- kdDebug (kfile_area) << "appendExtension(" << url << ")" << endl;
-
- const int len = fileName.length ();
- const int dot = fileName.findRev ('.');
-
- const bool suppressExtension = (dot == len - 1);
- const bool unspecifiedExtension = (dot <= 0);
-
- // don't TDEIO::NetAccess::Stat if unnecessary
- if (!(suppressExtension || unspecifiedExtension))
- return;
-
- // exists?
- TDEIO::UDSEntry t;
- if (TDEIO::NetAccess::stat (url, t, topLevelWidget()))
- {
- kdDebug (kfile_area) << "\tfile exists - won't append extension" << endl;
- return;
- }
-
- // suppress automatically append extension?
- if (suppressExtension)
- {
- //
- // Strip trailing dot
- // This allows lazy people to have autoSelectExtCheckBox->isChecked
- // but don't want a file extension to be appended
- // e.g. "README." will make a file called "README"
- //
- // If you really want a name like "README.", then type "README.."
- // and the trailing dot will be removed (or just stop being lazy and
- // turn off this feature so that you can type "README.")
- //
- kdDebug (kfile_area) << "\tstrip trailing dot" << endl;
- url.setFileName (fileName.left (len - 1));
- }
- // evilmatically append extension :) if the user hasn't specified one
- else if (unspecifiedExtension)
- {
- kdDebug (kfile_area) << "\tappending extension \'" << d->extension << "\'..." << endl;
- url.setFileName (fileName + d->extension);
- kdDebug (kfile_area) << "\tsaving as \'" << url << "\'" << endl;
- }
-}
-
-
-// adds the selected files/urls to 'recent documents'
-void KFileDialog::addToRecentDocuments()
-{
- int m = ops->mode();
-
- if ( m & KFile::LocalOnly ) {
- TQStringList files = selectedFiles();
- TQStringList::ConstIterator it = files.begin();
- for ( ; it != files.end(); ++it )
- KRecentDocument::add( *it );
- }
-
- else { // urls
- KURL::List urls = selectedURLs();
- KURL::List::ConstIterator it = urls.begin();
- for ( ; it != urls.end(); ++it ) {
- if ( (*it).isValid() )
- KRecentDocument::add( *it );
- }
- }
-}
-
-KActionCollection * KFileDialog::actionCollection() const
-{
- return ops->actionCollection();
-}
-
-void KFileDialog::keyPressEvent( TQKeyEvent *e )
-{
- if ( e->key() == Key_Escape )
- {
- e->accept();
- d->cancelButton->animateClick();
- }
- else
- KDialogBase::keyPressEvent( e );
-}
-
-void KFileDialog::toggleSpeedbar( bool show )
-{
- if ( show )
- {
- if ( !d->urlBar )
- initSpeedbar();
-
- d->urlBar->show();
-
- // check to see if they have a home item defined, if not show the home button
- KURLBarItem *urlItem = static_cast<KURLBarItem*>( d->urlBar->listBox()->firstItem() );
- KURL homeURL;
- homeURL.setPath( TQDir::homeDirPath() );
- while ( urlItem )
- {
- if ( homeURL.equals( urlItem->url(), true ) )
- {
- ops->actionCollection()->action( "home" )->unplug( toolbar );
- break;
- }
-
- urlItem = static_cast<KURLBarItem*>( urlItem->next() );
- }
- }
- else
- {
- if (d->urlBar)
- d->urlBar->hide();
-
- if ( !ops->actionCollection()->action( "home" )->isPlugged( toolbar ) )
- ops->actionCollection()->action( "home" )->plug( toolbar, 3 );
- }
-
- static_cast<KToggleAction *>(actionCollection()->action("toggleSpeedbar"))->setChecked( show );
-}
-
-void KFileDialog::toggleBookmarks(bool show)
-{
- if (show)
- {
- if (d->bookmarkHandler)
- {
- return;
- }
-
- d->bookmarkHandler = new KFileBookmarkHandler( this );
- connect( d->bookmarkHandler, TQT_SIGNAL( openURL( const TQString& )),
- TQT_SLOT( enterURL( const TQString& )));
-
- toolbar->insertButton(TQString::fromLatin1("bookmark"),
- (int)HOTLIST_BUTTON, true,
- i18n("Bookmarks"), 5);
- toolbar->getButton(HOTLIST_BUTTON)->setPopup(d->bookmarkHandler->menu(),
- true);
- TQWhatsThis::add(toolbar->getButton(HOTLIST_BUTTON),
- i18n("<qt>This button allows you to bookmark specific locations. "
- "Click on this button to open the bookmark menu where you may add, "
- "edit or select a bookmark.<p>"
- "These bookmarks are specific to the file dialog, but otherwise operate "
- "like bookmarks elsewhere in TDE.</qt>"));
- }
- else if (d->bookmarkHandler)
- {
- delete d->bookmarkHandler;
- d->bookmarkHandler = 0;
- toolbar->removeItem(HOTLIST_BUTTON);
- }
-
- static_cast<KToggleAction *>(actionCollection()->action("toggleBookmarks"))->setChecked( show );
-}
-
-int KFileDialog::pathComboIndex()
-{
- return d->m_pathComboIndex;
-}
-
-// static
-void KFileDialog::initStatic()
-{
- if ( lastDirectory )
- return;
-
- lastDirectory = ldd.setObject(lastDirectory, new KURL());
-}
-
-// static
-KURL KFileDialog::getStartURL( const TQString& startDir,
- TQString& recentDirClass )
-{
- initStatic();
-
- recentDirClass = TQString::null;
- KURL ret;
-
- bool useDefaultStartDir = startDir.isEmpty();
- if ( !useDefaultStartDir )
- {
- if (startDir[0] == ':')
- {
- recentDirClass = startDir;
- ret = KURL::fromPathOrURL( KRecentDirs::dir(recentDirClass) );
- }
- else
- {
- ret = TDECmdLineArgs::makeURL( TQFile::encodeName(startDir) );
- // If we won't be able to list it (e.g. http), then use default
- if ( !KProtocolInfo::supportsListing( ret ) )
- useDefaultStartDir = true;
- }
- }
-
- if ( useDefaultStartDir )
- {
- if (lastDirectory->isEmpty()) {
- lastDirectory->setPath(TDEGlobalSettings::documentPath());
- KURL home;
- home.setPath( TQDir::homeDirPath() );
- // if there is no docpath set (== home dir), we prefer the current
- // directory over it. We also prefer the homedir when our CWD is
- // different from our homedirectory or when the document dir
- // does not exist
- if ( lastDirectory->path(+1) == home.path(+1) ||
- TQDir::currentDirPath() != TQDir::homeDirPath() ||
- !TQDir(lastDirectory->path(+1)).exists() )
- lastDirectory->setPath(TQDir::currentDirPath());
- }
- ret = *lastDirectory;
- }
-
- return ret;
-}
-
-void KFileDialog::setStartDir( const KURL& directory )
-{
- initStatic();
- if ( directory.isValid() )
- *lastDirectory = directory;
-}
-
-void KFileDialog::setNonExtSelection()
-{
- // Enhanced rename: Don't highlight the file extension.
- TQString pattern, filename = locationEdit->currentText().stripWhiteSpace();
- KServiceTypeFactory::self()->findFromPattern( filename, &pattern );
-
- if ( !pattern.isEmpty() && pattern.at( 0 ) == '*' && pattern.find( '*' , 1 ) == -1 )
- locationEdit->lineEdit()->setSelection( 0, filename.length() - pattern.stripWhiteSpace().length()+1 );
- else
- {
- int lastDot = filename.findRev( '.' );
- if ( lastDot > 0 )
- locationEdit->lineEdit()->setSelection( 0, lastDot );
- }
-}
-
-void KFileDialog::virtual_hook( int id, void* data )
-{ KDialogBase::virtual_hook( id, data ); }
-
-
-#include "kfiledialog.moc"