From 5159cd2beb2e87806a5b54e9991b7895285c9d3e Mon Sep 17 00:00:00 2001 From: Timothy Pearson Date: Sun, 27 Jan 2013 01:04:16 -0600 Subject: Rename a number of libraries and executables to avoid conflicts with KDE4 --- tdeio/tdefile/tdefiledialog.cpp | 2380 +++++++++++++++++++++++++++++++++++++++ 1 file changed, 2380 insertions(+) create mode 100644 tdeio/tdefile/tdefiledialog.cpp (limited to 'tdeio/tdefile/tdefiledialog.cpp') diff --git a/tdeio/tdefile/tdefiledialog.cpp b/tdeio/tdefile/tdefiledialog.cpp new file mode 100644 index 000000000..4fb399716 --- /dev/null +++ b/tdeio/tdefile/tdefiledialog.cpp @@ -0,0 +1,2380 @@ +// -*- c++ -*- +/* This file is part of the KDE libraries + Copyright (C) 1997, 1998 Richard Moore + 1998 Stephan Kulow + 1998 Daniel Grana + 1999,2000,2001,2002,2003 Carsten Pfeiffer + 2003 Clarence Dang + + 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 "tdefiledialog.h" + +#include +#include +#include + +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include + +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include + +#include "config-tdefile.h" +#include "kpreviewwidgetbase.h" + +#include +#include +#include +#include +#include +#include + +#include +#include + +#ifdef Q_WS_X11 +#include +#include +#endif + +enum Buttons { HOTLIST_BUTTON, + PATH_COMBO, CONFIGURE_BUTTON }; + +template class TQPtrList; + +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 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 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(tdefile_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 tdefileitems, 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(tdefile_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(tdefile_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(tdefile_area) << "slotStatResult" << endl; + TDEIO::StatJob *sJob = static_cast( 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(tdefile_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 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("

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 Text Completion menu.") ""; +void KFileDialog::updateLocationWhatsThis (void) +{ + TQString whatsThisText; + if (d->operationMode == KFileDialog::Saving) + { + whatsThisText = "" + i18n("This is the name to save the file as.") + + i18n (autocompletionWhatsThisText); + } + else if (ops->mode() & KFile::Files) + { + whatsThisText = "" + 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 = "" + 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, "" + 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("Click this button to enter the parent folder.

" + "For instance, if the current location is file:/home/%1 clicking this " + "button will take you to file:/home.").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("This is the configuration menu for the file dialog. " + "Various options can be accessed from this menu including:

    " + "
  • how files are sorted in the list
    • " + "
  • types of view, including icon and list
    • " + "
  • showing of hidden files
    • " + "
  • the Quick Access navigation panel
    • " + "
  • file previews
    • " + "
  • separating folders from files
")); + 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("This is the filter to apply to the file list. " + "File names that do not match the filter will not be shown.

" + "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.

" + "Wildcards such as * and ? are allowed."); + 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( d->pathCombo->completionObject() )->setDir( dir ); + static_cast( 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(tdefile_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(tdefile_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(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 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( 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(d->pathCombo->completionMode()) ); + kc->writeEntry( LocationComboCompletionMode, static_cast(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 (tdefile_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 (tdefile_area) << "\tgetExtension " << patternList << endl; + + TQStringList::ConstIterator patternListEnd = patternList.end (); + for (TQStringList::ConstIterator it = patternList.begin (); + it != patternListEnd; + it++) + { + kdDebug (tdefile_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 (tdefile_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 (tdefile_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 (tdefile_area) << "\tsetMimeFilter-style: native ext=\'" + << d->extension << "\'" << endl; + } + + // no X-TDE-NativeExtension + if (d->extension.isEmpty ()) + { + d->extension = getExtensionFromPatternList (mime->patterns ()).lower (); + kdDebug (tdefile_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 %1").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, + "" + + i18n ( + "This option enables some convenient features for " + "saving files with extensions:
" + "

    " + "
  1. Any extension specified in the %1 text " + "area will be updated if you change the file type " + "to save in.
    " + "
    2. " + "
  2. If no extension is specified in the %2 " + "text area when you click " + "Save, %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.
    " + "
    " + "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)." + "
    3. " + "
" + "If unsure, keep this option enabled as it makes your " + "files more manageable." + ) + .arg (locationLabelText) + .arg (locationLabelText) + .arg (whatsThisExtension) + + "" + ); + + 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 (tdefile_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 (tdefile_area) << "\tfile exists" << endl; + + if (isDirectory (t)) + { + kdDebug (tdefile_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 (tdefile_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 (tdefile_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 (tdefile_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 (tdefile_area) << "\tappending extension \'" << d->extension << "\'..." << endl; + url.setFileName (fileName + d->extension); + kdDebug (tdefile_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( 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( 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(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("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.

" + "These bookmarks are specific to the file dialog, but otherwise operate " + "like bookmarks elsewhere in TDE.")); + } + else if (d->bookmarkHandler) + { + delete d->bookmarkHandler; + d->bookmarkHandler = 0; + toolbar->removeItem(HOTLIST_BUTTON); + } + + static_cast(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 "tdefiledialog.moc" -- cgit v1.2.1