diff options
Diffstat (limited to 'kio/kfile/kfiledialog.cpp')
| -rw-r--r-- | kio/kfile/kfiledialog.cpp | 2380 |
1 files changed, 0 insertions, 2380 deletions
diff --git a/kio/kfile/kfiledialog.cpp b/kio/kfile/kfiledialog.cpp deleted file mode 100644 index 1d364e9b7..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 <[email protected]> - 1998 Stephan Kulow <[email protected]> - 1998 Daniel Grana <[email protected]> - 1999,2000,2001,2002,2003 Carsten Pfeiffer <[email protected]> - 2003 Clarence Dang <[email protected]> - - 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<KIO::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<KIO::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(); - - KConfig *config = KGlobal::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 = KIO::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 = KIO::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 = KIO::buildErrorString(KIO::ERR_ACCESS_DENIED, d->url.prettyURL()); - KMessageBox::error( d->mainWidget, msg); - return; - } - - KIO::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 = KIO::buildErrorString(KIO::ERR_ACCESS_DENIED, (*it).prettyURL()); - KMessageBox::error( d->mainWidget, msg); - return; - } - } - for ( KURL::List::ConstIterator it = list.begin(); - it != list.end(); ++it ) - { - job = KIO::stat( *it, !(*it).isLocalFile() ); - job->setWindow (topLevelWidget()); - KIO::Scheduler::scheduleJob( job ); - d->statJobs.append( job ); - connect( job, TQT_SIGNAL( result(KIO::Job *) ), - TQT_SLOT( slotStatResult( KIO::Job *) )); - } - return; - } - - job = KIO::stat(d->url,!d->url.isLocalFile()); - job->setWindow (topLevelWidget()); - d->statJobs.append( job ); - connect(job, TQT_SIGNAL(result(KIO::Job*)), TQT_SLOT(slotStatResult(KIO::Job*))); -} - - -static bool isDirectory (const KIO::UDSEntry &t) -{ - bool isDir = false; - - for (KIO::UDSEntry::ConstIterator it = t.begin(); - it != t.end(); - it++) - { - if ((*it).m_uds == KIO::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(KIO::Job* job) -{ - kdDebug(kfile_area) << "slotStatResult" << endl; - KIO::StatJob *sJob = static_cast<KIO::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; - } - - KIO::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 ); - } - - KConfig *config = KGlobal::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 = KGlobal::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( KGlobalSettings::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( KGlobalSettings::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 - - KConfig* config = KGlobal::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 = KGlobal::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 = KIO::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 = KIO::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( KConfig *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 ); - - KGlobalSettings::Completion cm = (KGlobalSettings::Completion) - kc->readNumEntry( PathComboCompletionMode, - KGlobalSettings::completionMode() ); - if ( cm != KGlobalSettings::completionMode() ) - combo->setCompletionMode( cm ); - - cm = (KGlobalSettings::Completion) - kc->readNumEntry( LocationComboCompletionMode, - KGlobalSettings::completionMode() ); - if ( cm != KGlobalSettings::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( KConfig *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( KConfig *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( KConfig *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(); - - KConfig *config = KGlobal::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? - KIO::UDSEntry t; - if (KIO::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 KIO::NetAccess::Stat if unnecessary - if (!(suppressExtension || unspecifiedExtension)) - return; - - // exists? - KIO::UDSEntry t; - if (KIO::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 = KCmdLineArgs::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(KGlobalSettings::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" |