1 /* This file is part of the KDE project
2 Copyright (c) 2007 David Faure <faure@kde.org>
4 This library is free software; you can redistribute it and/or
5 modify it under the terms of the GNU Library General Public
6 License as published by the Free Software Foundation; either
7 version 2 of the License, or (at your option) any later version.
9 This library is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 Library General Public License for more details.
14 You should have received a copy of the GNU Library General Public License
15 along with this library; see the file COPYING.LIB. If not, write to
16 the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
17 Boston, MA 02110-1301, USA.
20 #include "dolphinpart.h"
21 #include "dolphinviewactionhandler.h"
22 #include "dolphinsortfilterproxymodel.h"
23 #include "dolphinview.h"
24 #include "dolphinmodel.h"
26 #include <konq_operations.h>
28 #include <kaboutdata.h>
29 #include <kactioncollection.h>
30 #include <kconfiggroup.h>
32 #include <kdirlister.h>
33 #include <kglobalsettings.h>
34 #include <kiconloader.h>
36 #include <kmessagebox.h>
37 #include <kpluginfactory.h>
38 #include <kpropertiesdialog.h>
39 #include <ktoggleaction.h>
41 #include <QActionGroup>
42 #include <QApplication>
45 K_PLUGIN_FACTORY(DolphinPartFactory
, registerPlugin
<DolphinPart
>();)
46 // The componentdata name must be dolphinpart so that dolphinpart.rc is found
47 // Alternatively we would have to install it as dolphin/dolphinpart.rc
48 K_EXPORT_PLUGIN(DolphinPartFactory("dolphinpart"))
50 DolphinPart::DolphinPart(QWidget
* parentWidget
, QObject
* parent
, const QVariantList
& args
)
51 : KParts::ReadOnlyPart(parent
)
54 setComponentData(DolphinPartFactory::componentData(), false);
55 m_extension
= new DolphinPartBrowserExtension(this);
57 // make sure that other apps using this part find Dolphin's view-file-columns icons
58 KIconLoader::global()->addAppDir("dolphin");
60 m_dirLister
= new KDirLister
;
61 m_dirLister
->setAutoUpdate(true);
62 m_dirLister
->setMainWindow(parentWidget
->window());
63 m_dirLister
->setDelayedMimeTypes(true);
65 //connect(m_dirLister, SIGNAL(started(KUrl)), this, SLOT(slotStarted()));
66 connect(m_dirLister
, SIGNAL(completed(KUrl
)), this, SLOT(slotCompleted(KUrl
)));
67 connect(m_dirLister
, SIGNAL(canceled(KUrl
)), this, SLOT(slotCanceled(KUrl
)));
69 m_dolphinModel
= new DolphinModel(this);
70 m_dolphinModel
->setDirLister(m_dirLister
);
72 m_proxyModel
= new DolphinSortFilterProxyModel(this);
73 m_proxyModel
->setSourceModel(m_dolphinModel
);
75 m_view
= new DolphinView(parentWidget
,
80 m_view
->setTabsForFilesEnabled(true);
83 setXMLFile("dolphinpart.rc");
85 connect(m_view
, SIGNAL(infoMessage(QString
)),
86 this, SLOT(slotInfoMessage(QString
)));
87 connect(m_view
, SIGNAL(errorMessage(QString
)),
88 this, SLOT(slotErrorMessage(QString
)));
89 connect(m_view
, SIGNAL(itemTriggered(KFileItem
)),
90 this, SLOT(slotItemTriggered(KFileItem
)));
91 connect(m_view
, SIGNAL(tabRequested(KUrl
)),
92 this, SLOT(createNewWindow(KUrl
)));
93 connect(m_view
, SIGNAL(requestContextMenu(KFileItem
,KUrl
)),
94 this, SLOT(slotOpenContextMenu(KFileItem
,KUrl
)));
95 connect(m_view
, SIGNAL(selectionChanged(KFileItemList
)),
96 m_extension
, SIGNAL(selectionInfo(KFileItemList
)));
97 connect(m_view
, SIGNAL(selectionChanged(KFileItemList
)),
98 this, SLOT(slotSelectionChanged(KFileItemList
)));
99 connect(m_view
, SIGNAL(requestItemInfo(KFileItem
)),
100 this, SLOT(slotRequestItemInfo(KFileItem
)));
101 connect(m_view
, SIGNAL(urlChanged(KUrl
)),
102 this, SLOT(slotUrlChanged(KUrl
)));
103 connect(m_view
, SIGNAL(modeChanged()),
104 this, SIGNAL(viewModeChanged())); // relay signal
106 m_actionHandler
= new DolphinViewActionHandler(actionCollection(), this);
107 m_actionHandler
->setCurrentView(m_view
);
109 QClipboard
* clipboard
= QApplication::clipboard();
110 connect(clipboard
, SIGNAL(dataChanged()),
111 this, SLOT(updatePasteAction()));
114 m_actionHandler
->updateViewActions();
115 slotSelectionChanged(KFileItemList()); // initially disable selection-dependent actions
117 // TODO sort_by_* actions
119 // TODO there was a "always open a new window" (when clicking on a directory) setting in konqueror
120 // (sort of spacial navigation)
122 loadPlugins(this, this, componentData());
125 DolphinPart::~DolphinPart()
130 void DolphinPart::createActions()
132 KAction
*editMimeTypeAction
= actionCollection()->addAction( "editMimeType" );
133 editMimeTypeAction
->setText( i18nc("@action:inmenu Edit", "&Edit File Type..." ) );
134 connect(editMimeTypeAction
, SIGNAL(triggered()), SLOT(slotEditMimeType()));
136 KAction
*propertiesAction
= actionCollection()->addAction( "properties" );
137 propertiesAction
->setText( i18nc("@action:inmenu Edit", "Properties") );
138 propertiesAction
->setShortcut(Qt::ALT
+Qt::Key_Return
);
139 connect(propertiesAction
, SIGNAL(triggered()), SLOT(slotProperties()));
141 // View menu: all done by DolphinViewActionHandler
145 QActionGroup
* goActionGroup
= new QActionGroup(this);
146 connect(goActionGroup
, SIGNAL(triggered(QAction
*)),
147 this, SLOT(slotGoTriggered(QAction
*)));
149 createGoAction("go_applications", "start-here-kde",
150 i18nc("@action:inmenu Go", "App&lications"), QString("programs:/"),
152 createGoAction("go_network_folders", "folder-remote",
153 i18nc("@action:inmenu Go", "&Network Folders"), QString("remote:/"),
155 createGoAction("go_settings", "preferences-system",
156 i18nc("@action:inmenu Go", "Sett&ings"), QString("settings:/"),
158 createGoAction("go_trash", "user-trash",
159 i18nc("@action:inmenu Go", "Trash"), QString("trash:/"),
161 createGoAction("go_autostart", "",
162 i18nc("@action:inmenu Go", "Autostart"), KGlobalSettings::autostartPath(),
166 void DolphinPart::createGoAction(const char* name
, const char* iconName
,
167 const QString
& text
, const QString
& url
,
168 QActionGroup
* actionGroup
)
170 KAction
* action
= actionCollection()->addAction(name
);
171 action
->setIcon(KIcon(iconName
));
172 action
->setText(text
);
173 action
->setData(url
);
174 action
->setActionGroup(actionGroup
);
177 void DolphinPart::slotGoTriggered(QAction
* action
)
179 const QString url
= action
->data().toString();
180 emit m_extension
->openUrlRequest(KUrl(url
));
183 void DolphinPart::slotSelectionChanged(const KFileItemList
& selection
)
185 const bool hasSelection
= !selection
.isEmpty();
187 stateChanged("has_no_selection");
189 stateChanged("has_selection");
193 actions
<< "rename" << "move_to_trash" << "delete" << "editMimeType" << "properties";
194 foreach(const QString
& actionName
, actions
) {
195 QAction
* action
= actionCollection()->action(actionName
);
198 action
->setEnabled(hasSelection
);
202 emit m_extension
->enableAction("cut", hasSelection
);
203 emit m_extension
->enableAction("copy", hasSelection
);
206 void DolphinPart::updatePasteAction()
208 QPair
<bool, QString
> pasteInfo
= m_view
->pasteInfo();
209 emit m_extension
->enableAction( "paste", pasteInfo
.first
);
210 emit m_extension
->setActionText( "paste", pasteInfo
.second
);
213 KAboutData
* DolphinPart::createAboutData()
215 return new KAboutData("dolphinpart", "dolphin", ki18nc("@title", "Dolphin Part"), "0.1");
218 bool DolphinPart::openUrl(const KUrl
& url
)
220 bool reload
= arguments().reload();
221 // A bit of a workaround so that changing the namefilter works: force reload.
222 // Otherwise DolphinView wouldn't relist the URL, so nothing would happen.
223 if (m_nameFilter
!= m_dirLister
->nameFilter())
225 if (m_view
->url() == url
&& !reload
) { // DolphinView won't do anything in that case, so don't emit started
228 setUrl(url
); // remember it at the KParts level
229 KUrl
visibleUrl(url
);
230 if (!m_nameFilter
.isEmpty()) {
231 visibleUrl
.addPath(m_nameFilter
);
233 QString prettyUrl
= visibleUrl
.pathOrUrl();
234 emit
setWindowCaption(prettyUrl
);
235 emit m_extension
->setLocationBarUrl(prettyUrl
);
236 emit
started(0); // get the wheel to spin
237 m_dirLister
->setNameFilter(m_nameFilter
);
239 emit
aboutToOpenURL();
245 void DolphinPart::slotCompleted(const KUrl
& url
)
251 void DolphinPart::slotCanceled(const KUrl
& url
)
256 void DolphinPart::slotInfoMessage(const QString
& msg
)
258 emit
setStatusBarText(msg
);
261 void DolphinPart::slotErrorMessage(const QString
& msg
)
263 KMessageBox::error(m_view
, msg
);
266 void DolphinPart::slotRequestItemInfo(const KFileItem
& item
)
268 emit m_extension
->mouseOverInfo(item
);
271 void DolphinPart::slotItemTriggered(const KFileItem
& item
)
273 KParts::OpenUrlArguments args
;
274 args
.setMimeType(item
.mimetype());
276 // Ideally, konqueror should be changed to not require trustedSource for directory views,
277 // since the idea was not to need BrowserArguments for non-browser stuff...
278 KParts::BrowserArguments browserArgs
;
279 browserArgs
.trustedSource
= true;
280 emit m_extension
->openUrlRequest(item
.targetUrl(), args
, browserArgs
);
283 void DolphinPart::createNewWindow(const KUrl
& url
)
285 // TODO: Check issue N176832 for the missing QAIV signal; task 177399 - maybe this code
286 // should be moved into DolphinPart::slotItemTriggered()
287 KFileItem
item(S_IFDIR
, (mode_t
)-1, url
);
288 KParts::OpenUrlArguments args
;
289 args
.setMimeType(item
.mimetype());
290 emit m_extension
->createNewWindow(url
, args
);
293 void DolphinPart::slotOpenContextMenu(const KFileItem
& _item
, const KUrl
&)
295 KParts::BrowserExtension::PopupFlags popupFlags
= KParts::BrowserExtension::DefaultPopupItems
296 | KParts::BrowserExtension::ShowProperties
297 | KParts::BrowserExtension::ShowUrlOperations
;
298 // TODO KonqKfmIconView had if ( !rootItem->isWritable() )
299 // popupFlags |= KParts::BrowserExtension::NoDeletion;
301 KFileItem
item(_item
);
303 if (item
.isNull()) { // viewport context menu
304 popupFlags
|= KParts::BrowserExtension::ShowNavigationItems
| KParts::BrowserExtension::ShowUp
;
305 // TODO get m_dirLister->rootItem if possible. or via kdirmodel?
306 // and use this as fallback:
307 item
= KFileItem( S_IFDIR
, (mode_t
)-1, url() );
310 KParts::BrowserExtension::ActionGroupMap actionGroups
;
311 QList
<QAction
*> editActions
;
313 if (!_item
.isNull()) { // only for context menu on one or more items
314 // TODO if ( sMoving )
315 editActions
.append(actionCollection()->action("rename"));
317 bool addTrash
= false;
320 bool isIntoTrash
= _item
.url().protocol() == "trash";
322 if ( /*TODO sMoving &&*/ !isIntoTrash
)
325 /* TODO if ( sDeleting ) */ {
326 if ( !item
.isLocalFile() )
328 else if (QApplication::keyboardModifiers() & Qt::ShiftModifier
) {
333 KConfigGroup
configGroup( KGlobal::config(), "KDE" );
334 if ( configGroup
.readEntry( "ShowDeleteCommand", false) )
340 editActions
.append(actionCollection()->action("move_to_trash"));
342 editActions
.append(actionCollection()->action("delete"));
343 actionGroups
.insert("editactions", editActions
);
346 // TODO: We should change the signature of the slots (and signals) for being able
347 // to tell for which items we want a popup.
348 KFileItemList items
= (m_view
->selectedItems().count() ? m_view
->selectedItems()
349 : KFileItemList() << item
);
350 emit m_extension
->popupMenu(QCursor::pos(),
352 KParts::OpenUrlArguments(),
353 KParts::BrowserArguments(),
358 void DolphinPart::slotUrlChanged(const KUrl
& url
)
360 if (m_view
->url() != url
) {
361 // If the view URL is not equal to 'url', then an inner URL change has
362 // been done (e. g. by activating an existing column in the column view).
364 emit m_extension
->openUrlNotify();
370 void DolphinPartBrowserExtension::cut()
372 m_part
->view()->cutSelectedItems();
375 void DolphinPartBrowserExtension::copy()
377 m_part
->view()->copySelectedItems();
380 void DolphinPartBrowserExtension::paste()
382 m_part
->view()->paste();
385 void DolphinPartBrowserExtension::reparseConfiguration()
387 m_part
->view()->refresh();
392 void DolphinPart::slotEditMimeType()
394 const KFileItemList items
= m_view
->selectedItems();
395 if (!items
.isEmpty()) {
396 KonqOperations::editMimeType(items
.first().mimetype(), m_view
);
400 void DolphinPart::slotProperties()
402 const KFileItemList items
= m_view
->selectedItems();
403 if (!items
.isEmpty()) {
404 KPropertiesDialog
dialog(items
.first().url(), m_view
);
409 void DolphinPart::setCurrentViewMode(const QString
& viewModeName
)
411 QAction
* action
= actionCollection()->action(viewModeName
);
416 QString
DolphinPart::currentViewMode() const
418 return m_actionHandler
->currentViewModeActionName();
421 void DolphinPart::setNameFilter(const QString
& nameFilter
)
423 // This is the "/home/dfaure/*.diff" kind of name filter (KDirLister::setNameFilter)
424 // which is unrelated to DolphinView::setNameFilter which is substring filtering in a proxy.
425 m_nameFilter
= nameFilter
;
426 // TODO save/restore name filter in saveState/restoreState like KonqDirPart did in kde3?
429 #include "dolphinpart.moc"