?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
tdf#130857 qt weld: Support mail merge "Server Auth" dialog
[LibreOffice.git] / sfx2 / source / appl / appserv.cxx
blobad24a1ec6092b34a4a780c609d26c9f80fbe8ab9
1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
2 /*
3 * This file is part of the LibreOffice project.
4 *
5 * This Source Code Form is subject to the terms of the Mozilla Public
6 * License, v. 2.0. If a copy of the MPL was not distributed with this
7 * file, You can obtain one at http://mozilla.org/MPL/2.0/.
8 *
9 * This file incorporates work covered by the following license notice:
10 *
11 * Licensed to the Apache Software Foundation (ASF) under one or more
12 * contributor license agreements. See the NOTICE file distributed
13 * with this work for additional information regarding copyright
14 * ownership. The ASF licenses this file to you under the Apache
15 * License, Version 2.0 (the "License"); you may not use this file
16 * except in compliance with the License. You may obtain a copy of
17 * the License at http://www.apache.org/licenses/LICENSE-2.0 .
18 */
19
20 #include <config_features.h>
21 #include <config_wasm_strip.h>
22
23 #include <com/sun/star/drawing/ModuleDispatcher.hpp>
24 #include <com/sun/star/frame/Desktop.hpp>
25 #include <com/sun/star/frame/DispatchResultEvent.hpp>
26 #include <com/sun/star/frame/DispatchResultState.hpp>
27 #include <com/sun/star/frame/DispatchHelper.hpp>
28 #include <com/sun/star/frame/UnknownModuleException.hpp>
29 #include <com/sun/star/frame/XLayoutManager.hpp>
30 #include <com/sun/star/frame/XSynchronousFrameLoader.hpp>
31 #include <com/sun/star/embed/EmbedStates.hpp>
32 #include <com/sun/star/embed/XEmbeddedObject.hpp>
33 #include <com/sun/star/util/XModifiable.hpp>
34 #include <com/sun/star/sdbc/DriverManager.hpp>
35 #include <com/sun/star/text/ModuleDispatcher.hpp>
36 #include <com/sun/star/task/OfficeRestartManager.hpp>
37 #include <com/sun/star/task/XInteractionHandler.hpp>
38 #include <com/sun/star/ui/dialogs/AddressBookSourcePilot.hpp>
39 #include <com/sun/star/ui/UIElementType.hpp>
40 #include <com/sun/star/ui/XUIElement.hpp>
41 #include <com/sun/star/uno/Reference.hxx>
42 #include <com/sun/star/util/XCloseable.hpp>
43 #include <com/sun/star/util/CloseVetoException.hpp>
44 #include <org/freedesktop/PackageKit/SyncDbusSessionHelper.hpp>
45
46 #include <comphelper/dispatchcommand.hxx>
47 #include <comphelper/lok.hxx>
48 #include <comphelper/namedvaluecollection.hxx>
49 #include <comphelper/processfactory.hxx>
50 #include <comphelper/propertysequence.hxx>
51 #include <comphelper/propertyvalue.hxx>
52 #include <comphelper/sequence.hxx>
53
54 #include <svtools/addresstemplate.hxx>
55 #include <svtools/restartdialog.hxx>
56 #include <svtools/colorcfg.hxx>
57 #include <svl/visitem.hxx>
58
59 #include <unotools/configmgr.hxx>
60 #include <comphelper/diagnose_ex.hxx>
61 #include <vcl/weld.hxx>
62 #include <svl/intitem.hxx>
63 #include <svl/eitem.hxx>
64 #include <svl/stritem.hxx>
65 #include <basic/sbstar.hxx>
66 #include <basic/basrdll.hxx>
67 #include <basic/sberrors.hxx>
68 #include <vcl/help.hxx>
69 #include <sal/log.hxx>
70 #include <osl/file.hxx>
71 #include <vcl/EnumContext.hxx>
72 #include <vcl/toolbox.hxx>
73
74 #include <unotools/moduleoptions.hxx>
75 #include <unotools/securityoptions.hxx>
76 #include <rtl/bootstrap.hxx>
77
78 #include <com/sun/star/frame/ModuleManager.hpp>
79 #include <com/sun/star/beans/XPropertySet.hpp>
80
81 #include <sfx2/app.hxx>
82 #include <sfx2/request.hxx>
83 #include <sfx2/dispatch.hxx>
84 #include <sfx2/bindings.hxx>
85 #include <sfx2/minfitem.hxx>
86 #include <sfx2/msg.hxx>
87 #include <sfx2/objface.hxx>
88 #include <sfx2/objsh.hxx>
89 #include <sfx2/viewsh.hxx>
90 #include <sfx2/docfac.hxx>
91 #include <sfx2/strings.hrc>
92 #include <sfx2/sfxresid.hxx>
93 #include <appdata.hxx>
94 #include <sfx2/viewfrm.hxx>
95 #include <sfx2/sfxdlg.hxx>
96 #include <sfx2/sfxsids.hrc>
97 #include <sorgitm.hxx>
98 #include <sfx2/sfxhelp.hxx>
99 #include <sfx2/zoomitem.hxx>
100 #include <sfx2/templatedlg.hxx>
101 #include <sfx2/notebookbar/SfxNotebookBar.hxx>
102 #include <sfx2/sidebar/SidebarController.hxx>
103 #include <sfx2/safemode.hxx>
104 #include <sfx2/sfxuno.hxx>
105 #include <DevelopmentToolDockingWindow.hxx>
106
107 #include <comphelper/types.hxx>
108 #include <officecfg/Office/Common.hxx>
109 #include <officecfg/Setup.hxx>
110 #include <unotools/confignode.hxx>
111 #include <memory>
112
113 #include <openuriexternally.hxx>
114
115 #include "getbasctlfunction.hxx"
116
117 using namespace ::com::sun::star;
118 using namespace ::com::sun::star::beans;
119 using namespace ::com::sun::star::uno;
120 using namespace ::com::sun::star::frame;
121 using namespace ::com::sun::star::container;
122 using namespace ::com::sun::star::util;
123 using namespace ::com::sun::star::lang;
124 using namespace ::com::sun::star::ui;
125
126 namespace
127 {
128 OUString lcl_getAppName( vcl::EnumContext::Application eApp )
129 {
130 switch ( eApp )
131 {
132 case vcl::EnumContext::Application::Writer:
133 return u"Writer"_ustr;
134 case vcl::EnumContext::Application::Calc:
135 return u"Calc"_ustr;
136 case vcl::EnumContext::Application::Impress:
137 return u"Impress"_ustr;
138 case vcl::EnumContext::Application::Draw:
139 return u"Draw"_ustr;
140 case vcl::EnumContext::Application::Formula:
141 return u"Formula"_ustr;
142 case vcl::EnumContext::Application::Base:
143 return u"Base"_ustr;
144 default:
145 return OUString();
146 }
147 }
148
149 // lp#527938, debian#602953, fdo#33266, i#105408
150 bool lcl_isBaseAvailable()
151 {
152 try
153 {
154 // if we get css::sdbc::DriverManager, libsdbc2 is there
155 // and the bibliography is assumed to work
156 return css::sdbc::DriverManager::create(comphelper::getProcessComponentContext()).is();
157 }
158 catch (const Exception &)
159 {
160 TOOLS_INFO_EXCEPTION("sfx.appl", "assuming Base to be missing");
161 return false;
162 }
163 }
164 void lcl_tryLoadBibliography()
165 {
166 // lp#527938, debian#602953, fdo#33266, i#105408
167 // make sure we actually can instantiate services from base first
168 if(!lcl_isBaseAvailable())
169 {
170 if (officecfg::Office::Common::PackageKit::EnableBaseInstallation::get())
171 {
172 try
173 {
174 using namespace org::freedesktop::PackageKit;
175 using namespace svtools;
176 Reference< XSyncDbusSessionHelper > xSyncDbusSessionHelper(SyncDbusSessionHelper::create(comphelper::getProcessComponentContext()));
177 Sequence< OUString > vPackages { u"libreoffice-base"_ustr };
178 xSyncDbusSessionHelper->InstallPackageNames(vPackages, OUString());
179 // I'll be back (hopefully)!
180 SolarMutexGuard aGuard;
181 executeRestartDialog(comphelper::getProcessComponentContext(), nullptr, RESTART_REASON_BIBLIOGRAPHY_INSTALL);
182 }
183 catch (const Exception &)
184 {
185 TOOLS_INFO_EXCEPTION("sfx.appl", "trying to install LibreOffice Base");
186 }
187 }
188 return;
189 }
190
191 try // fdo#48775
192 {
193 SfxStringItem aURL(SID_FILE_NAME, u".component:Bibliography/View1"_ustr);
194 SfxStringItem aRef(SID_REFERER, u"private:user"_ustr);
195 SfxStringItem aTarget(SID_TARGETNAME, u"_blank"_ustr);
196 if (const SfxViewFrame* pViewFrame = SfxViewFrame::Current())
197 {
198 pViewFrame->GetDispatcher()->ExecuteList(SID_OPENDOC,
199 SfxCallMode::ASYNCHRON, { &aURL, &aRef, &aTarget });
200 }
201 }
202 catch (const Exception &)
203 {
204 TOOLS_INFO_EXCEPTION( "sfx.appl", "trying to load bibliography database");
205 }
206 }
207 void lcl_disableActiveEmbeddedObjects(SfxObjectShell* pObjSh)
208 {
209 if (!pObjSh)
210 return;
211
212 comphelper::EmbeddedObjectContainer& rContainer = pObjSh->getEmbeddedObjectContainer();
213 if (!rContainer.HasEmbeddedObjects())
214 return;
215
216 const uno::Sequence<OUString> aNames = rContainer.GetObjectNames();
217 for (const auto& rName : aNames)
218 {
219 uno::Reference<embed::XEmbeddedObject> xEmbeddedObj
220 = rContainer.GetEmbeddedObject(rName);
221 if (!xEmbeddedObj.is())
222 continue;
223
224 try
225 {
226 if (xEmbeddedObj->getCurrentState() != embed::EmbedStates::LOADED)
227 {
228 xEmbeddedObj->changeState(embed::EmbedStates::LOADED);
229 }
230 }
231 catch (const uno::Exception&)
232 {
233 }
234 }
235 }
236 }
237 /// Find the correct location of the document (CREDITS.fodt, etc.), and return
238 /// it in rURL if found.
239 static bool checkURL( const char *pName, const char *pExt, OUString &rURL )
240 {
241 using namespace osl;
242 DirectoryItem aDirItem;
243
244 #ifdef MACOSX
245 rURL = "$BRAND_BASE_DIR/Resources/" + OUString::createFromAscii( pName ) +
246 OUString::createFromAscii( pExt );
247 #else
248 rURL = "$BRAND_BASE_DIR/" + OUString::createFromAscii( pName ) +
249 OUString::createFromAscii( pExt );
250 #endif
251 rtl::Bootstrap::expandMacros( rURL );
252
253 if (!rURL.isEmpty())
254 return DirectoryItem::get( rURL, aDirItem ) == DirectoryItem::E_None;
255 else
256 return false;
257 }
258
259 /// Displays CREDITS or LICENSE in any of the available version
260 static void showDocument( const char* pBaseName )
261 {
262 try {
263 Reference < XDesktop2 > xDesktop = Desktop::create( ::comphelper::getProcessComponentContext() );
264 auto args(::comphelper::InitPropertySequence({
265 {"ViewOnly", Any(true)},
266 {"ReadOnly", Any(true)}
267 }));
268
269 OUString aURL;
270 if ( checkURL ( pBaseName, ".fodt", aURL ) ||
271 checkURL ( pBaseName, ".html", aURL ) ||
272 checkURL ( pBaseName, "", aURL ) ) {
273 xDesktop->loadComponentFromURL( aURL, u"_blank"_ustr, 0, args );
274 }
275 } catch (const css::uno::Exception &) {
276 }
277 }
278
279 namespace
280 {
281 Reference<XFrame> GetRequestFrame(const SfxRequest& rReq)
282 {
283 const SfxItemSet* pArgs = rReq.GetInternalArgs_Impl();
284 const SfxUnoFrameItem* pItem = nullptr;
285 Reference <XFrame> xFrame;
286 if (pArgs && (pItem = pArgs->GetItemIfSet(SID_FILLFRAME, false)))
287 {
288 xFrame = pItem->GetFrame();
289 }
290 return xFrame;
291 }
292
293 Reference<XFrame> GetDocFrame(const SfxRequest& rReq)
294 {
295 const SfxFrameItem* pFrameItem = rReq.GetArg<SfxFrameItem>(SID_DOCFRAME);
296 SfxFrame* pFrame = pFrameItem ? pFrameItem->GetFrame() : nullptr;
297 return pFrame ? pFrame->GetFrameInterface() : nullptr;
298 }
299
300 class LicenseDialog : public weld::GenericDialogController
301 {
302 public:
303 LicenseDialog(weld::Window* pParent)
304 : GenericDialogController(pParent, u"sfx/ui/licensedialog.ui"_ustr, u"LicenseDialog"_ustr)
305 {
306 }
307
308 virtual short run() override
309 {
310 short nRet = GenericDialogController::run();
311 if (nRet == RET_OK)
312 showDocument("LICENSE");
313 return nRet;
314 }
315 };
316
317 class SafeModeQueryDialog : public weld::MessageDialogController
318 {
319 public:
320 SafeModeQueryDialog(weld::Window* pParent)
321 : MessageDialogController(pParent, u"sfx/ui/safemodequerydialog.ui"_ustr, u"SafeModeQueryDialog"_ustr)
322 {
323 }
324
325 virtual short run() override
326 {
327 short nRet = MessageDialogController::run();
328 if (nRet == RET_OK)
329 {
330 sfx2::SafeMode::putFlag();
331 const uno::Reference< uno::XComponentContext >& xContext = comphelper::getProcessComponentContext();
332 css::task::OfficeRestartManager::get(xContext)->requestRestart(
333 css::uno::Reference< css::task::XInteractionHandler >());
334 }
335 return nRet;
336 }
337 };
338 }
339
340 weld::Window* SfxRequest::GetFrameWeld() const
341 {
342 const SfxItemSet* pIntArgs = GetInternalArgs_Impl();
343 const SfxUnoAnyItem* pItem = nullptr;
344 if (pIntArgs && (pItem = pIntArgs->GetItemIfSet(SID_DIALOG_PARENT, false)))
345 {
346 Reference<awt::XWindow> xWindow;
347 pItem->GetValue() >>= xWindow;
348 return Application::GetFrameWeld(xWindow);
349 }
350
351 Reference<XFrame> xFrame(GetRequestFrame(*this));
352 if (!xFrame)
353 xFrame = GetDocFrame(*this);
354 if (!xFrame)
355 {
356 SAL_WARN("sfx.appl", "no parent for dialogs");
357 return nullptr;
358 }
359 return Application::GetFrameWeld(xFrame->getContainerWindow());
360 }
361
362 void SfxApplication::MiscExec_Impl( SfxRequest& rReq )
363 {
364 bool bDone = false;
365 switch ( rReq.GetSlot() )
366 {
367 case SID_SETOPTIONS:
368 {
369 if( rReq.GetArgs() )
370 SetOptions( *rReq.GetArgs() );
371 break;
372 }
373
374 case SID_QUITAPP:
375 case SID_LOGOUT:
376 {
377 // protect against reentrant calls and avoid closing the same files in parallel
378 if (pImpl->bInQuit || pImpl->bClosingDocs)
379 return;
380
381 if ( rReq.GetSlot() == SID_LOGOUT )
382 {
383 for ( SfxObjectShell *pObjSh = SfxObjectShell::GetFirst();
384 pObjSh; pObjSh = SfxObjectShell::GetNext( *pObjSh ) )
385 {
386 if ( !pObjSh->IsModified() )
387 continue;
388
389 SfxViewFrame* pFrame = SfxViewFrame::GetFirst( pObjSh );
390 if ( !pFrame || !pFrame->GetWindow().IsReallyVisible() )
391 continue;
392
393 if (pObjSh->PrepareClose())
394 pObjSh->SetModified( false );
395 else
396 return;
397 }
398
399 SfxStringItem aNameItem( SID_FILE_NAME, u"vnd.sun.star.cmd:logout"_ustr );
400 SfxStringItem aReferer( SID_REFERER, u"private/user"_ustr );
401 pImpl->pAppDispat->ExecuteList(SID_OPENDOC,
402 SfxCallMode::SLOT, { &aNameItem, &aReferer });
403 return;
404 }
405
406 // try from nested requests again after 100ms
407 if( Application::GetDispatchLevel() > 1 )
408 {
409 /* Don't save the request for closing the application and try it later
410 again. This is an UI bound functionality ... and the user will try it again
411 if the dialog is closed. But we should not close the application automatically
412 if this dialog is closed by the user ...
413 So we ignore this request now and wait for a new user decision.
414 */
415 SAL_INFO("sfx.appl", "QueryExit => sal_False, DispatchLevel == " << Application::GetDispatchLevel() );
416 return;
417 }
418
419 // block reentrant calls
420 pImpl->bInQuit = true;
421 Reference < XDesktop2 > xDesktop = Desktop::create ( ::comphelper::getProcessComponentContext() );
422
423 rReq.ForgetAllArgs();
424
425 // if terminate() failed, pImpl->bInQuit will now be sal_False, allowing further calls of SID_QUITAPP
426 bool bTerminated = xDesktop->terminate();
427 if (!bTerminated)
428 // if terminate() was successful, SfxApplication is now dead!
429 pImpl->bInQuit = false;
430
431 // Set return value, terminate if possible
432 rReq.SetReturnValue( SfxBoolItem( rReq.GetSlot(), bTerminated ) );
433 return;
434 }
435
436 case SID_CONFIG:
437 case SID_TOOLBOXOPTIONS:
438 case SID_CONFIGSTATUSBAR:
439 case SID_CONFIGMENU:
440 case SID_CONFIGACCEL:
441 case SID_CONFIGEVENT:
442 {
443 SfxAbstractDialogFactory* pFact =
444 SfxAbstractDialogFactory::Create();
445
446 const SfxStringItem* pStringItem = rReq.GetArg<SfxStringItem>(SID_CONFIG);
447
448 SfxItemSetFixed<SID_CONFIG, SID_CONFIG, SID_MACROINFO, SID_MACROINFO> aSet( GetPool() );
449
450 // SID_CONFIG property will determine the default page shown
451 if ( pStringItem )
452 {
453 aSet.Put( SfxStringItem(
454 SID_CONFIG, pStringItem->GetValue() ) );
455 }
456 else if (rReq.GetSlot() == SID_CONFIGEVENT)
457 {
458 aSet.Put( SfxStringItem(
459 SID_CONFIG, u"private:resource/event/"_ustr ) );
460 }
461 else if (rReq.GetSlot() == SID_TOOLBOXOPTIONS)
462 {
463 aSet.Put( SfxStringItem(
464 SID_CONFIG, u"private:resource/toolbar/"_ustr ) );
465 }
466
467 #if HAVE_FEATURE_SCRIPTING
468 // Preselect a macro in the 'keyboard' page
469 if (auto const item = rReq.GetArg<SfxMacroInfoItem>(SID_MACROINFO)) {
470 aSet.Put(*item);
471 }
472 #endif
473
474 Reference <XFrame> xFrame(GetRequestFrame(rReq));
475 ScopedVclPtr<SfxAbstractTabDialog> pDlg(pFact->CreateCustomizeTabDialog(rReq.GetFrameWeld(),
476 &aSet, xFrame ));
477
478 const short nRet = pDlg->Execute();
479
480 if ( nRet )
481 bDone = true;
482 break;
483 }
484
485 case SID_CLOSEDOCS:
486 {
487 // protect against reentrant calls and avoid closing the same files in parallel
488 if (pImpl->bInQuit || pImpl->bClosingDocs)
489 return;
490
491 pImpl->bClosingDocs = true;
492 // closed all status for all visible frames
493 bool bClosedAll = true;
494
495 // Iterate over all documents and close them
496 for (SfxObjectShell *pObjSh = SfxObjectShell::GetFirst(); pObjSh;)
497 {
498 SfxObjectShell* pNxtObjSh = SfxObjectShell::GetNext(*pObjSh);
499 // can close immediately
500 if (!pObjSh->IsModified())
501 {
502 // don't close the last remaining frame for close dispatch
503 if (pNxtObjSh || !bClosedAll)
504 pObjSh->DoClose();
505 }
506 else
507 {
508 // skip invisible frames when asking user to close
509 SfxViewFrame* pFrame = SfxViewFrame::GetFirst(pObjSh);
510 if (pFrame && pFrame->GetWindow().IsReallyVisible())
511 {
512 // asks user to close
513 if (pObjSh->PrepareClose())
514 {
515 pObjSh->SetModified(false);
516 // get next pointer again after asking user since it can become invalid pointer from being manually closed by user
517 // don't close the last remaining frame for close dispatch
518 if ((pNxtObjSh = SfxObjectShell::GetNext(*pObjSh)) || !bClosedAll)
519 pObjSh->DoClose();
520 }
521 // user disagrees to close
522 else
523 {
524 bClosedAll = false;
525 // get next pointer again after asking user since it can become invalid pointer from being manually closed by user
526 pNxtObjSh = SfxObjectShell::GetNext(*pObjSh);
527 }
528 }
529 }
530 pObjSh = pNxtObjSh;
531 }
532
533 pImpl->bClosingDocs = false;
534
535 // close dispatch status
536 bool bDispatchOk = true;
537 // open backing window
538 if (bClosedAll)
539 {
540 // don't use pViewFrame = SfxViewFrame::Current() as dispatch won't load sometimes
541 SfxObjectShell* pObjSh = SfxObjectShell::GetFirst();
542 SfxViewFrame* pViewFrame = SfxViewFrame::GetFirst(pObjSh);
543 if (pViewFrame)
544 {
545 Reference<XFrame> xCurrentFrame = pViewFrame->GetFrame().GetFrameInterface();
546 if (xCurrentFrame.is())
547 {
548 uno::Reference<frame::XDispatchProvider> xProvider(xCurrentFrame, uno::UNO_QUERY);
549 if (xProvider.is())
550 {
551 uno::Reference<frame::XDispatchHelper> xDispatcher
552 = frame::DispatchHelper::create(::comphelper::getProcessComponentContext());
553 // use .uno:CloseDoc to be able to close windows of the same document
554 css::uno::Any aResult =
555 xDispatcher->executeDispatch(xProvider,
556 u".uno:CloseDoc"_ustr,
557 u"_self"_ustr,
558 0,
559 uno::Sequence<beans::PropertyValue>());
560 css::frame::DispatchResultEvent aEvent;
561 bDispatchOk = (aResult >>= aEvent) && (aEvent.State == frame::DispatchResultState::SUCCESS);
562 }
563 }
564 }
565 }
566 // terminate the application if the dispatch fails or
567 // if there is no visible frame left after the command is run (e.g user manually closes the document again that was already cancelled for closing)
568 if (!bDispatchOk || (!bClosedAll && !SfxObjectShell::GetFirst()))
569 {
570 SfxRequest aReq(SID_QUITAPP, SfxCallMode::SLOT, GetPool());
571 MiscExec_Impl(aReq);
572 }
573
574 rReq.SetReturnValue(SfxBoolItem(0, bDispatchOk));
575 bDone = true;
576 break;
577 }
578
579 case SID_SAVEDOCS:
580 {
581 bool bOK = true;
582 for ( SfxObjectShell *pObjSh = SfxObjectShell::GetFirst();
583 pObjSh;
584 pObjSh = SfxObjectShell::GetNext( *pObjSh ) )
585 {
586 SfxRequest aReq( SID_SAVEDOC, SfxCallMode::SLOT, pObjSh->GetPool() );
587 if ( pObjSh->IsModified() && !pObjSh->isSaveLocked() )
588 {
589 pObjSh->ExecuteSlot( aReq );
590 const SfxBoolItem* pItem(dynamic_cast<const SfxBoolItem*>(aReq.GetReturnValue().getItem()));
591 if ( !pItem || !pItem->GetValue() )
592 bOK = false;
593 }
594 }
595
596 rReq.SetReturnValue( SfxBoolItem( 0, bOK ) );
597 rReq.Done();
598 break;
599 }
600
601 case SID_SEND_FEEDBACK:
602 {
603 OUString module = SfxHelp::GetCurrentModuleIdentifier();
604 OUString sURL(officecfg::Office::Common::Menus::SendFeedbackURL::get() + //officecfg/registry/data/org/openoffice/Office/Common.xcu => https://hub.libreoffice.org/send-feedback/
605 "?LOversion=" + utl::ConfigManager::getAboutBoxProductVersion() +
606 "&LOlocale=" + utl::ConfigManager::getUILocale() +
607 "&LOmodule=" + module.subView(module.lastIndexOf('.') + 1 ) );
608 sfx2::openUriExternally(sURL, false, rReq.GetFrameWeld());
609 break;
610 }
611
612 case SID_Q_AND_A:
613 {
614 // Askbot has URL's normalized to languages, not locales
615 // Get language from locale: ll or lll or ll-CC or lll-CC
616
617 OUString sURL(officecfg::Office::Common::Menus::QA_URL::get() + //https://hub.libreoffice.org/forum/
618 "?LOlocale=" + utl::ConfigManager::getUILocale());
619 sfx2::openUriExternally(sURL, false, rReq.GetFrameWeld());
620 break;
621 }
622 case SID_DOCUMENTATION:
623 {
624 // Open documentation page based on locales
625 OUString sURL(officecfg::Office::Common::Menus::DocumentationURL::get() + //https://hub.libreoffice.org/documentation/
626 "?LOlocale=" + utl::ConfigManager::getUILocale());
627 sfx2::openUriExternally(sURL, false, rReq.GetFrameWeld());
628 break;
629 }
630 #if !ENABLE_WASM_STRIP_PINGUSER
631 case SID_GETINVOLVED:
632 {
633 // Open get involved/join us page based on locales
634 OUString sURL(officecfg::Office::Common::Menus::GetInvolvedURL::get() + //https://hub.libreoffice.org/joinus/
635 "?LOlocale=" + utl::ConfigManager::getUILocale());
636 sfx2::openUriExternally(sURL, false, rReq.GetFrameWeld());
637 break;
638 }
639 case SID_DONATION:
640 {
641 // Open donation page based on language + script (BCP47) with language as fall back.
642 OUString aLang = LanguageTag(utl::ConfigManager::getUILocale()).getLanguage();
643 OUString aBcp47 = LanguageTag(utl::ConfigManager::getUILocale()).getBcp47();
644 OUString sURL(officecfg::Office::Common::Menus::DonationURL::get() + //https://hub.libreoffice.org/donation/
645 "?BCP47=" + aBcp47 + "&LOlang=" + aLang );
646 sfx2::openUriExternally(sURL, false, rReq.GetFrameWeld());
647 break;
648 }
649 case SID_WHATSNEW:
650 {
651 // Open release notes depending on version and locale
652 OUString sURL(officecfg::Office::Common::Menus::ReleaseNotesURL::get() + //https://hub.libreoffice.org/ReleaseNotes/
653 "?LOvers=" + utl::ConfigManager::getProductVersion() +
654 "&LOlocale=" + LanguageTag(utl::ConfigManager::getUILocale()).getBcp47() );
655 sfx2::openUriExternally(sURL, false, rReq.GetFrameWeld());
656 break;
657 }
658 case SID_HYPHENATIONMISSING:
659 {
660 // Open wiki page about hyphenation
661 OUString sURL(officecfg::Office::Common::Menus::HyphenationMissingURL::get() + //https://hub.libreoffice.org/HyphenationMissing/
662 "?LOlocale=" + utl::ConfigManager::getUILocale());
663 sfx2::openUriExternally(sURL, false, rReq.GetFrameWeld());
664 break;
665 }
666 #endif
667 case SID_SHOW_LICENSE:
668 {
669 LicenseDialog aDialog(rReq.GetFrameWeld());
670 aDialog.run();
671 break;
672 }
673
674 case SID_SHOW_CREDITS:
675 {
676 showDocument( "CREDITS" );
677 break;
678 }
679
680 case FN_CHANGE_THEME:
681 {
682 const SfxStringItem* pNewThemeArg = rReq.GetArg<SfxStringItem>(FN_PARAM_NEW_THEME);
683 OUString sSchemeName
684 = pNewThemeArg ? pNewThemeArg->GetValue() : u"COLOR_SCHEME_LIBREOFFICE_AUTOMATIC"_ustr;
685 if (!pNewThemeArg)
686 {
687 // toggle between light and dark mode
688
689 // There are two separate things that can be dark mode themed: UI and document
690 // The modes can be 0 (automatic - what the OS/VCL asks for), 1 (light), or 2 (dark)
691
692 // Since only gtk/osx/win support UI theme, toggle based on document colors
693 // Automatic in this case means "whatever GetUseDarkMode() says"
694 const bool bWasInDarkMode
695 = MiscSettings::GetAppColorMode() == 2
696 || (MiscSettings::GetAppColorMode() == 0 && MiscSettings::GetUseDarkMode());
697
698 // Set the UI theme. It would be nicest to use automatic whenever possible
699 sal_Int32 nUseMode = 0; // automatic
700 if (MiscSettings::GetDarkMode() != 0)
701 MiscSettings::SetDarkMode(nUseMode);
702
703 if (MiscSettings::GetUseDarkMode() == bWasInDarkMode)
704 {
705 // automatic didn't toggle, so force the desired theme
706 nUseMode = bWasInDarkMode ? 1 : 2;
707 MiscSettings::SetDarkMode(nUseMode);
708 }
709
710 // Now set the document theme
711 // If the UI can be themed, then the document theme can always remain on automatic.
712 nUseMode = 0;
713 // NOTE: since SetDarkMode has run, GetUseDarkMode might return a different result.
714 if (MiscSettings::GetUseDarkMode() == bWasInDarkMode)
715 {
716 nUseMode = bWasInDarkMode ? 1 : 2;
717 sSchemeName = bWasInDarkMode ? u"Light" : u"Dark";
718 }
719 MiscSettings::SetAppColorMode(nUseMode);
720 }
721 svtools::EditableColorConfig aEditableConfig;
722 // kit explicitly ignores changes to the global color scheme, except for the current ViewShell,
723 // so an attempted change to the same global color scheme when the now current ViewShell ignored
724 // the last change requires re-sending the change. In which case individual shells will have to
725 // decide if this color-scheme change is a change from their perspective to avoid unnecessary
726 // invalidations.
727 if (!pNewThemeArg || comphelper::LibreOfficeKit::isActive()
728 || aEditableConfig.GetCurrentSchemeName() != sSchemeName)
729 {
730 aEditableConfig.LoadScheme(sSchemeName);
731 }
732
733 Invalidate(FN_CHANGE_THEME);
734 break;
735 }
736 case FN_INVERT_BACKGROUND:
737 {
738 const SfxStringItem* pNewThemeArg = rReq.GetArg<SfxStringItem>(FN_PARAM_NEW_THEME);
739
740 svtools::EditableColorConfig aColorConfig;
741 ::Color aDefLightColor = svtools::ColorConfig::GetDefaultColor(svtools::DOCCOLOR, 0);
742 ::Color aDefDarkColor = svtools::ColorConfig::GetDefaultColor(svtools::DOCCOLOR, 1);
743
744 OUString aNewTheme;
745 if (!pNewThemeArg) {
746 ::Color aCurrentColor = aColorConfig.GetColorValue(svtools::DOCCOLOR).nColor;
747
748 if (aCurrentColor == aDefLightColor) {
749 aNewTheme = OUString("Dark");
750 } else {
751 aNewTheme = OUString("Light");
752 }
753 } else {
754 aNewTheme = pNewThemeArg->GetValue();
755 }
756
757 svtools::ColorConfigValue aValue;
758
759 if(aNewTheme == "Dark")
760 aValue.nColor = aDefDarkColor;
761 else
762 aValue.nColor = aDefLightColor;
763
764 aColorConfig.SetColorValue(svtools::DOCCOLOR, aValue);
765 break;
766 }
767 // - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
768 case SID_HELPINDEX:
769 {
770 Help* pHelp = Application::GetHelp();
771 if ( pHelp )
772 {
773 pHelp->Start(u".uno:HelpIndex"_ustr, rReq.GetFrameWeld()); // show start page
774 bDone = true;
775 }
776 break;
777 }
778
779 // - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
780 case SID_HELPTIPS:
781 {
782 // Evaluate Parameter
783 const SfxBoolItem* pOnItem = rReq.GetArg<SfxBoolItem>(SID_HELPTIPS);
784 bool bOn = pOnItem
785 ? pOnItem->GetValue()
786 : !Help::IsQuickHelpEnabled();
787
788 if ( bOn )
789 Help::EnableQuickHelp();
790 else
791 Help::DisableQuickHelp();
792 auto xChanges = comphelper::ConfigurationChanges::create();
793 officecfg::Office::Common::Help::Tip::set(bOn, xChanges);
794 xChanges->commit();
795 Invalidate(SID_HELPTIPS);
796 bDone = true;
797
798 // Record if possible
799 if ( !rReq.IsAPI() )
800 rReq.AppendItem( SfxBoolItem( SID_HELPTIPS, bOn) );
801 break;
802 }
803 // - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
804 case SID_EXTENDEDHELP:
805 {
806 Help::StartExtHelp();
807 break;
808 }
809 case SID_HELPBALLOONS:
810 {
811 // Evaluate Parameter
812 const SfxBoolItem* pOnItem = rReq.GetArg<SfxBoolItem>(SID_HELPBALLOONS);
813 bool bOn = pOnItem
814 ? pOnItem->GetValue()
815 : !Help::IsBalloonHelpEnabled();
816
817 if ( bOn )
818 Help::EnableBalloonHelp();
819 else
820 Help::DisableBalloonHelp();
821 auto xChanges = comphelper::ConfigurationChanges::create();
822 officecfg::Office::Common::Help::ExtendedTip::set(bOn, xChanges);
823 xChanges->commit();
824 Invalidate(SID_HELPBALLOONS);
825 bDone = true;
826
827 // Record if possible
828 if ( !rReq.IsAPI() )
829 rReq.AppendItem( SfxBoolItem( SID_HELPBALLOONS, bOn) );
830 break;
831 }
832 // - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
833 #if !ENABLE_WASM_STRIP_PINGUSER
834 case SID_TIPOFTHEDAY:
835 {
836 SfxAbstractDialogFactory* pFact = SfxAbstractDialogFactory::Create();
837 ScopedVclPtr<VclAbstractDialog> pDlg(pFact->CreateTipOfTheDayDialog(rReq.GetFrameWeld()));
838 pDlg->StartExecuteAsync(nullptr);
839 bDone = true;
840 break;
841 }
842 #endif
843 // - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
844 case SID_WIDGET_TEST_DIALOG:
845 {
846 SfxAbstractDialogFactory* pFact = SfxAbstractDialogFactory::Create();
847 VclPtr<VclAbstractDialog> pDlg(pFact->CreateWidgetTestDialog(rReq.GetFrameWeld()));
848 pDlg->StartExecuteAsync([pDlg](sal_Int32 /*nResult*/){
849 pDlg->disposeOnce();
850 });
851 bDone = true;
852 break;
853 }
854
855 // - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
856 case SID_ABOUT:
857 {
858 SfxAbstractDialogFactory* pFact = SfxAbstractDialogFactory::Create();
859 ScopedVclPtr<VclAbstractDialog> pDlg(pFact->CreateAboutDialog(rReq.GetFrameWeld()));
860 pDlg->StartExecuteAsync(nullptr);
861 bDone = true;
862 break;
863 }
864
865 case SID_TEMPLATE_MANAGER:
866 {
867 SfxTemplateManagerDlg aDialog(rReq.GetFrameWeld());
868 aDialog.run();
869 bDone = true;
870 break;
871 }
872
873 case SID_TEMPLATE_ADDRESSBOOKSOURCE:
874 {
875 svt::AddressBookSourceDialog aDialog(rReq.GetFrameWeld(), ::comphelper::getProcessComponentContext());
876 aDialog.run();
877 bDone = true;
878 break;
879 }
880
881 #if HAVE_FEATURE_SCRIPTING
882 case SID_BASICSTOP:
883 StarBASIC::Stop();
884 break;
885
886 case SID_BASICBREAK :
887 BasicDLL::BasicBreak();
888 break;
889 #endif
890
891 case SID_ZOOM_50_PERCENT:
892 case SID_ZOOM_75_PERCENT:
893 case SID_ZOOM_100_PERCENT:
894 case SID_ZOOM_150_PERCENT:
895 case SID_ZOOM_200_PERCENT:
896 case SID_ZOOM_OPTIMAL:
897 case SID_ZOOM_ENTIRE_PAGE:
898 case SID_ZOOM_PAGE_WIDTH:
899 {
900 SfxObjectShell* pCurrentShell = SfxObjectShell::Current();
901 if (!pCurrentShell)
902 return;
903
904 // make sure aZoom is initialized with a proper value if SetType
905 // doesn't work
906 SvxZoomItem aZoom( SvxZoomType::PERCENT, 100 );
907
908 switch (rReq.GetSlot())
909 {
910 case SID_ZOOM_50_PERCENT:
911 aZoom.SetValue(50);
912 break;
913 case SID_ZOOM_75_PERCENT:
914 aZoom.SetValue(75);
915 break;
916 case SID_ZOOM_100_PERCENT:
917 aZoom.SetValue(100);
918 break;
919 case SID_ZOOM_150_PERCENT:
920 aZoom.SetValue(150);
921 break;
922 case SID_ZOOM_200_PERCENT:
923 aZoom.SetValue(200);
924 break;
925 case SID_ZOOM_OPTIMAL:
926 aZoom.SetType( SvxZoomType::OPTIMAL );
927 break;
928 case SID_ZOOM_ENTIRE_PAGE:
929 aZoom.SetType( SvxZoomType::WHOLEPAGE );
930 break;
931 case SID_ZOOM_PAGE_WIDTH:
932 aZoom.SetType( SvxZoomType::PAGEWIDTH );
933 break;
934 }
935
936 pCurrentShell->GetDispatcher()->ExecuteList(SID_ATTR_ZOOM, SfxCallMode::ASYNCHRON, { &aZoom });
937
938 break;
939 }
940 case SID_TOOLBAR_MODE:
941 {
942 const SfxStringItem* pModeName = rReq.GetArg<SfxStringItem>( SID_TOOLBAR_MODE );
943
944 if ( !pModeName )
945 {
946 bDone = true;
947 break;
948 }
949
950 OUString aNewName(pModeName->GetValue());
951 const uno::Reference< uno::XComponentContext >& xContext =
952 ::comphelper::getProcessComponentContext();
953
954 // Get information about current frame and module
955 Reference<XFrame> xCurrentFrame;
956 vcl::EnumContext::Application eCurrentApp = vcl::EnumContext::Application::NONE;
957 OUString aCurrentMode;
958
959 SfxViewFrame* pViewFrame = SfxViewFrame::Current();
960 if (pViewFrame)
961 {
962 xCurrentFrame = pViewFrame->GetFrame().GetFrameInterface();
963
964 const Reference<frame::XModuleManager> xModuleManager = frame::ModuleManager::create( xContext );
965 eCurrentApp = vcl::EnumContext::GetApplicationEnum( xModuleManager->identify( xCurrentFrame ) );
966
967 OUString aPath = "org.openoffice.Office.UI.ToolbarMode/Applications/" +
968 lcl_getAppName( eCurrentApp );
969
970 const utl::OConfigurationTreeRoot aAppNode(
971 xContext,
972 aPath,
973 true);
974 if ( !aAppNode.isValid() )
975 {
976 bDone = true;
977 break;
978 }
979
980 aCurrentMode = comphelper::getString( aAppNode.getNodeValue( u"Active"_ustr ) );
981
982 if ( !comphelper::LibreOfficeKit::isActive() && aCurrentMode == aNewName )
983 {
984 bDone = true;
985 break;
986 }
987
988 // Save new toolbar mode for a current module
989 aAppNode.setNodeValue( u"Active"_ustr, Any( aNewName ) );
990 aAppNode.commit();
991 }
992
993 // Apply settings for all frames
994 pViewFrame = SfxViewFrame::GetFirst();
995 while( pViewFrame )
996 {
997 // in LOK case we want to apply changes only to the current view
998 if (comphelper::LibreOfficeKit::isActive() &&
999 pViewFrame != &SfxViewShell::Current()->GetViewFrame())
1000 {
1001 pViewFrame = SfxViewFrame::GetNext( *pViewFrame );
1002 continue;
1003 }
1004
1005 Reference<XFrame> xFrame = pViewFrame->GetFrame().GetFrameInterface();
1006
1007 // We want to change mode only for a current app module, ignore other apps
1008 const Reference<frame::XModuleManager> xModuleManager = frame::ModuleManager::create( xContext );
1009 vcl::EnumContext::Application eApp = vcl::EnumContext::GetApplicationEnum( xModuleManager->identify( xFrame ) );
1010 if ( eApp != eCurrentApp )
1011 {
1012 pViewFrame = SfxViewFrame::GetNext( *pViewFrame );
1013 continue;
1014 }
1015
1016 Reference<css::beans::XPropertySet> xPropSet( xFrame, UNO_QUERY );
1017 Reference<css::frame::XLayoutManager> xLayoutManager;
1018 if ( xPropSet.is() )
1019 {
1020 try
1021 {
1022 Any aValue = xPropSet->getPropertyValue( u"LayoutManager"_ustr );
1023 aValue >>= xLayoutManager;
1024 }
1025 catch ( const css::uno::RuntimeException& )
1026 {
1027 throw;
1028 }
1029 catch ( css::uno::Exception& )
1030 {
1031 }
1032 }
1033
1034 if ( xLayoutManager.is() )
1035 {
1036 css::uno::Sequence<OUString> aMandatoryToolbars;
1037 css::uno::Sequence<OUString> aUserToolbars;
1038 std::vector<OUString> aBackupList;
1039 OUString aSidebarMode;
1040
1041 OUString aPath = "org.openoffice.Office.UI.ToolbarMode/Applications/" +
1042 lcl_getAppName( eApp ) +
1043 "/Modes";
1044
1045 // Read mode settings
1046 const utl::OConfigurationTreeRoot aModesNode(
1047 xContext,
1048 aPath,
1049 true);
1050 if ( !aModesNode.isValid() )
1051 {
1052 bDone = true;
1053 break;
1054 }
1055
1056 const Sequence<OUString> aModeNodeNames( aModesNode.getNodeNames() );
1057
1058 for ( const auto& rModeNodeName : aModeNodeNames )
1059 {
1060 const utl::OConfigurationNode aModeNode( aModesNode.openNode( rModeNodeName ) );
1061 if ( !aModeNode.isValid() )
1062 continue;
1063
1064 OUString aCommandArg = comphelper::getString( aModeNode.getNodeValue( u"CommandArg"_ustr ) );
1065
1066 if ( aCommandArg == aNewName )
1067 {
1068 aMandatoryToolbars = aModeNode.getNodeValue( u"Toolbars"_ustr ).get< uno::Sequence<OUString> >();
1069 aUserToolbars = aModeNode.getNodeValue( u"UserToolbars"_ustr ).get< uno::Sequence<OUString> >();
1070 aSidebarMode = comphelper::getString( aModeNode.getNodeValue( u"Sidebar"_ustr ) );
1071 break;
1072 }
1073 }
1074
1075 // Backup visible toolbar list and hide all toolbars
1076 const Sequence<Reference<XUIElement>> aUIElements = xLayoutManager->getElements();
1077 for ( const Reference< XUIElement >& xUIElement : aUIElements )
1078 {
1079 Reference< XPropertySet > xPropertySet( xUIElement, UNO_QUERY );
1080 if ( xPropertySet.is() && xUIElement.is() )
1081 {
1082 try
1083 {
1084 OUString aResName;
1085 sal_Int16 nType( -1 );
1086 xPropertySet->getPropertyValue( u"Type"_ustr ) >>= nType;
1087 xPropertySet->getPropertyValue( u"ResourceURL"_ustr ) >>= aResName;
1088
1089 if (( nType == css::ui::UIElementType::TOOLBAR ) &&
1090 !aResName.isEmpty() )
1091 {
1092 if ( xLayoutManager->isElementVisible( aResName ) )
1093 {
1094 aBackupList.push_back( aResName );
1095 }
1096 xLayoutManager->hideElement( aResName );
1097 }
1098 }
1099 catch ( const Exception& )
1100 {
1101 }
1102 }
1103 }
1104
1105 // Show/Hide the Notebookbar
1106 const SfxStringItem pItem(SID_NOTEBOOKBAR, aNewName);
1107 pViewFrame->GetDispatcher()->ExecuteList(SID_NOTEBOOKBAR, SfxCallMode::SYNCHRON, {&pItem});
1108 SfxPoolItemHolder aNbItem;
1109 pViewFrame->GetDispatcher()->QueryState(SID_NOTEBOOKBAR, aNbItem);
1110
1111 // Show toolbars
1112 for (const OUString& rName : aMandatoryToolbars)
1113 {
1114 xLayoutManager->createElement( rName );
1115 xLayoutManager->showElement( rName );
1116 }
1117
1118 for (const OUString& rName : aUserToolbars)
1119 {
1120 xLayoutManager->createElement( rName );
1121 xLayoutManager->showElement( rName );
1122 }
1123
1124 // Sidebar
1125 pViewFrame->ShowChildWindow( SID_SIDEBAR );
1126
1127 if (comphelper::LibreOfficeKit::isActive())
1128 aSidebarMode = "Opened";
1129
1130 sfx2::sidebar::SidebarController* pSidebar =
1131 sfx2::sidebar::SidebarController::GetSidebarControllerForFrame( xFrame );
1132 if ( pSidebar )
1133 {
1134 if ( aSidebarMode == "Arrow" )
1135 {
1136 pSidebar->FadeOut();
1137 }
1138 else if ( aSidebarMode == "Tabs" )
1139 {
1140 pSidebar->FadeIn();
1141 pSidebar->RequestOpenDeck();
1142 pSidebar->RequestCloseDeck();
1143 }
1144 else if ( aSidebarMode == "Opened" )
1145 {
1146 pSidebar->FadeIn();
1147 pSidebar->RequestOpenDeck();
1148 }
1149 }
1150
1151 // Save settings
1152 if ( pViewFrame == SfxViewFrame::Current() )
1153 {
1154 css::uno::Sequence<OUString> aBackup( comphelper::containerToSequence(aBackupList) );
1155
1156 for ( const auto& rModeNodeName : aModeNodeNames )
1157 {
1158 const utl::OConfigurationNode aModeNode( aModesNode.openNode( rModeNodeName ) );
1159 if ( !aModeNode.isValid() )
1160 continue;
1161
1162 OUString aCommandArg = comphelper::getString( aModeNode.getNodeValue( u"CommandArg"_ustr ) );
1163
1164 if ( aCommandArg == aCurrentMode )
1165 {
1166 aModeNode.setNodeValue( u"UserToolbars"_ustr, Any( aBackup ) );
1167 break;
1168 }
1169 }
1170 aModesNode.commit();
1171 }
1172 }
1173
1174 pViewFrame = SfxViewFrame::GetNext(*pViewFrame);
1175 }
1176
1177 bDone = true;
1178 break;
1179 }
1180 case SID_TOOLBAR_MODE_UI:
1181 {
1182 SfxAbstractDialogFactory* pFact = SfxAbstractDialogFactory::Create();
1183 ScopedVclPtr<VclAbstractDialog> pDlg(
1184 pFact->CreateToolbarmodeDialog(rReq.GetFrameWeld()));
1185 pDlg->Execute();
1186 bDone = true;
1187 break;
1188 }
1189 case SID_AVAILABLE_TOOLBARS:
1190 {
1191 const SfxStringItem* pToolbarName = rReq.GetArg<SfxStringItem>(SID_AVAILABLE_TOOLBARS);
1192
1193 if ( pToolbarName )
1194 {
1195 Reference < XDesktop2 > xDesktop = Desktop::create ( ::comphelper::getProcessComponentContext() );
1196 Reference< XFrame > xFrame = xDesktop->getActiveFrame();
1197
1198 Reference< css::beans::XPropertySet > xPropSet( xFrame, UNO_QUERY );
1199 Reference< css::frame::XLayoutManager > xLayoutManager;
1200 if ( xPropSet.is() )
1201 {
1202 try
1203 {
1204 Any aValue = xPropSet->getPropertyValue(u"LayoutManager"_ustr);
1205 aValue >>= xLayoutManager;
1206 }
1207 catch ( const css::uno::RuntimeException& )
1208 {
1209 throw;
1210 }
1211 catch ( css::uno::Exception& )
1212 {
1213 }
1214 }
1215
1216 if ( xLayoutManager.is() )
1217 {
1218 OUString aToolbarName = "private:resource/toolbar/" +
1219 pToolbarName->GetValue();
1220
1221 // Evaluate Parameter
1222 bool bShow( !xLayoutManager->isElementVisible( aToolbarName ));
1223
1224 if ( bShow )
1225 {
1226 xLayoutManager->createElement( aToolbarName );
1227 xLayoutManager->showElement( aToolbarName );
1228 }
1229 else
1230 xLayoutManager->hideElement( aToolbarName );
1231 }
1232 }
1233
1234 bDone = true;
1235 break;
1236 }
1237 case SID_MENUBAR:
1238 {
1239 sfx2::SfxNotebookBar::ToggleMenubar();
1240 bDone = true;
1241 break;
1242 }
1243 case SID_DEVELOPMENT_TOOLS_DOCKING_WINDOW:
1244 {
1245 SfxViewShell* pViewShell = SfxViewShell::Current();
1246 SfxViewFrame& rViewFrame = pViewShell->GetViewFrame();
1247 auto nID = rReq.GetSlot();
1248 rViewFrame.ToggleChildWindow(nID);
1249
1250 bDone = true;
1251 break;
1252 }
1253 case SID_INSPECT_SELECTED_OBJECT:
1254 {
1255 SfxViewShell* pViewShell = SfxViewShell::Current();
1256 SfxViewFrame& rViewFrame = pViewShell->GetViewFrame();
1257
1258 rViewFrame.ShowChildWindow(SID_DEVELOPMENT_TOOLS_DOCKING_WINDOW, true);
1259
1260 SfxChildWindow* pChild = rViewFrame.GetChildWindow(SID_DEVELOPMENT_TOOLS_DOCKING_WINDOW);
1261 if (!pChild)
1262 return;
1263
1264 auto pDockingWin = dynamic_cast<DevelopmentToolDockingWindow*>(pChild->GetWindow());
1265 if (pDockingWin)
1266 {
1267 pDockingWin->changeToCurrentSelection();
1268 }
1269
1270 bDone = true;
1271 break;
1272 }
1273 case SID_SAFE_MODE:
1274 {
1275 SafeModeQueryDialog aDialog(rReq.GetFrameWeld());
1276 aDialog.run();
1277 break;
1278 }
1279 case SID_TOOLBAR_LOCK:
1280 {
1281 if (SfxViewFrame* pViewFrame = SfxViewFrame::Current())
1282 {
1283 Reference<XFrame> xCurrentFrame;
1284 const uno::Reference<uno::XComponentContext>& xContext
1285 = ::comphelper::getProcessComponentContext();
1286 xCurrentFrame = pViewFrame->GetFrame().GetFrameInterface();
1287 const Reference<frame::XModuleManager> xModuleManager
1288 = frame::ModuleManager::create(xContext);
1289 const utl::OConfigurationTreeRoot aAppNode(
1290 xContext, u"org.openoffice.Office.UI.GlobalSettings/Toolbars/States"_ustr, true);
1291 if (aAppNode.isValid())
1292 {
1293 bool isLocked = comphelper::getBOOL(aAppNode.getNodeValue(u"Locked"_ustr));
1294 aAppNode.setNodeValue(u"Locked"_ustr, Any(!isLocked));
1295 aAppNode.commit();
1296 //TODO: apply immediately w/o restart needed
1297 SolarMutexGuard aGuard;
1298 svtools::executeRestartDialog(comphelper::getProcessComponentContext(), nullptr,
1299 svtools::RESTART_REASON_UI_CHANGE);
1300 }
1301 }
1302 break;
1303 }
1304 default:
1305 break;
1306 }
1307
1308 if ( bDone )
1309 rReq.Done();
1310 }
1311
1312 void SfxApplication::MiscState_Impl(SfxItemSet &rSet)
1313 {
1314 const WhichRangesContainer & pRanges = rSet.GetRanges();
1315 DBG_ASSERT(!pRanges.empty(), "Set without range");
1316 for ( auto const & pRange : pRanges )
1317 {
1318 for(sal_uInt16 nWhich = pRange.first; nWhich <= pRange.second; ++nWhich)
1319 {
1320 switch(nWhich)
1321 {
1322 case SID_TEMPLATE_ADDRESSBOOKSOURCE:
1323 if (!SvtModuleOptions().IsDataBaseInstalled())
1324 rSet.Put(SfxVisibilityItem(nWhich, false));
1325 break;
1326 case SID_QUITAPP:
1327 {
1328 if (pImpl->nDocModalMode || pImpl->bClosingDocs)
1329 rSet.DisableItem(nWhich);
1330 else
1331 rSet.Put(SfxStringItem(nWhich, SfxResId(STR_QUITAPP)));
1332 break;
1333 }
1334
1335 case SID_CONFIG:
1336 case SID_TOOLBOXOPTIONS:
1337 case SID_CONFIGSTATUSBAR:
1338 case SID_CONFIGMENU:
1339 case SID_CONFIGACCEL:
1340 case SID_CONFIGEVENT:
1341 {
1342 if( officecfg::Office::Common::Misc::DisableUICustomization::get() )
1343 rSet.DisableItem(nWhich);
1344 break;
1345 }
1346
1347 #if HAVE_FEATURE_SCRIPTING
1348 case SID_BASICSTOP:
1349 if ( !StarBASIC::IsRunning() )
1350 rSet.DisableItem(nWhich);
1351 break;
1352 #endif
1353
1354 case FN_CHANGE_THEME:
1355 {
1356 const bool bIsDarkMode
1357 = MiscSettings::GetAppColorMode() == 2
1358 || (!MiscSettings::GetAppColorMode() && MiscSettings::GetUseDarkMode());
1359 rSet.Put(SfxBoolItem(FN_CHANGE_THEME, bIsDarkMode));
1360 break;
1361 }
1362 case SID_HELPTIPS:
1363 {
1364 rSet.Put( SfxBoolItem( SID_HELPTIPS, Help::IsQuickHelpEnabled() ) );
1365 }
1366 break;
1367 case SID_HELPBALLOONS:
1368 {
1369 rSet.Put( SfxBoolItem( SID_HELPBALLOONS, Help::IsBalloonHelpEnabled() ) );
1370 }
1371 break;
1372
1373 case SID_EXTENDEDHELP:
1374 {
1375 }
1376 break;
1377
1378 case SID_CLOSEDOCS:
1379 {
1380 if ( pImpl->nDocModalMode || pImpl->bInQuit )
1381 {
1382 rSet.DisableItem(nWhich);
1383 return;
1384 }
1385 Reference < XDesktop2 > xDesktop = Desktop::create( ::comphelper::getProcessComponentContext() );
1386 Reference< XIndexAccess > xTasks = xDesktop->getFrames();
1387 if ( !xTasks.is() || !xTasks->getCount() )
1388 rSet.DisableItem(nWhich);
1389 break;
1390 }
1391
1392 case SID_SAVEDOCS:
1393 {
1394 bool bModified = false;
1395 for ( SfxObjectShell *pObjSh = SfxObjectShell::GetFirst();
1396 pObjSh;
1397 pObjSh = SfxObjectShell::GetNext( *pObjSh ) )
1398 {
1399 if ( pObjSh->IsModified() && !pObjSh->isSaveLocked() )
1400 {
1401 bModified = true;
1402 break;
1403 }
1404 }
1405
1406 if ( !bModified )
1407 rSet.DisableItem( nWhich );
1408 break;
1409 }
1410
1411 case SID_TEMPLATE_MANAGER:
1412 {
1413 if ( !officecfg::Office::Common::Misc::ExperimentalMode::get() )
1414 {
1415 rSet.DisableItem( nWhich );
1416 rSet.Put( SfxVisibilityItem( nWhich, false ) );
1417 }
1418 }
1419 break;
1420
1421 case SID_ZOOM_50_PERCENT:
1422 case SID_ZOOM_75_PERCENT:
1423 case SID_ZOOM_100_PERCENT:
1424 case SID_ZOOM_150_PERCENT:
1425 case SID_ZOOM_200_PERCENT:
1426 case SID_ZOOM_OPTIMAL:
1427 case SID_ZOOM_ENTIRE_PAGE:
1428 case SID_ZOOM_PAGE_WIDTH:
1429 {
1430 SfxObjectShell* pCurrentShell(SfxObjectShell::Current());
1431
1432 SfxPoolItemHolder aResult;
1433 const SfxItemState aState(pCurrentShell ?
1434 pCurrentShell->GetDispatcher()->QueryState(SID_ATTR_ZOOM, aResult) : SfxItemState::DISABLED);
1435 if ( aState == SfxItemState::DISABLED )
1436 rSet.DisableItem( nWhich );
1437 }
1438 break;
1439
1440 case SID_MENUBAR:
1441 {
1442 Reference < XDesktop2 > xDesktop = Desktop::create ( ::comphelper::getProcessComponentContext() );
1443 Reference< XFrame > xFrame = xDesktop->getActiveFrame();
1444
1445 Reference< css::beans::XPropertySet > xPropSet( xFrame, UNO_QUERY );
1446 Reference< css::frame::XLayoutManager > xLayoutManager;
1447 if ( xPropSet.is() )
1448 {
1449 try
1450 {
1451 Any aValue = xPropSet->getPropertyValue(u"LayoutManager"_ustr);
1452 aValue >>= xLayoutManager;
1453 }
1454 catch ( const css::uno::RuntimeException& )
1455 {
1456 throw;
1457 }
1458 catch ( css::uno::Exception& )
1459 {
1460 }
1461 }
1462
1463 if ( xLayoutManager.is() )
1464 {
1465 const bool bState
1466 = xLayoutManager->getElement(u"private:resource/menubar/menubar"_ustr).is()
1467 && xLayoutManager->isElementVisible(
1468 u"private:resource/menubar/menubar"_ustr);
1469
1470 SfxBoolItem aItem( SID_MENUBAR, bState );
1471 rSet.Put( aItem );
1472 }
1473 break;
1474 }
1475 case SID_SAFE_MODE:
1476 {
1477 // no restart in safe mode when already in safe mode
1478 if ( Application::IsSafeModeEnabled() )
1479 rSet.DisableItem( SID_SAFE_MODE );
1480 break;
1481 }
1482 case SID_DEVELOPMENT_TOOLS_DOCKING_WINDOW:
1483 {
1484 bool bSuccess = false;
1485 auto* pViewShell = SfxViewShell::Current();
1486 if (pViewShell)
1487 {
1488 auto& rViewFrame = pViewShell->GetViewFrame();
1489 if (rViewFrame.KnowsChildWindow(nWhich))
1490 {
1491 rSet.Put(SfxBoolItem(nWhich, rViewFrame.HasChildWindow(nWhich)));
1492 bSuccess = true;
1493 }
1494 }
1495
1496 if (!bSuccess)
1497 rSet.DisableItem(nWhich);
1498 }
1499 break;
1500 case SID_INSPECT_SELECTED_OBJECT:
1501 {
1502 bool bSuccess = false;
1503 auto* pViewShell = SfxViewShell::Current();
1504 if (pViewShell)
1505 {
1506 auto& rViewFrame = pViewShell->GetViewFrame();
1507 if (rViewFrame.KnowsChildWindow(SID_DEVELOPMENT_TOOLS_DOCKING_WINDOW))
1508 {
1509 bSuccess = true;
1510 }
1511 }
1512 if (!bSuccess)
1513 rSet.DisableItem(nWhich);
1514 }
1515 break;
1516 case SID_TOOLBAR_LOCK:
1517 {
1518 rSet.Put( SfxBoolItem( SID_TOOLBAR_LOCK, ToolBox::AlwaysLocked() ));
1519 }
1520 break;
1521 default:
1522 break;
1523 }
1524 }
1525 }
1526 }
1527
1528 #if HAVE_FEATURE_SCRIPTING
1529
1530 #ifndef DISABLE_DYNLOADING
1531
1532 typedef rtl_uString* (*basicide_choose_macro)(void*, void*, void*, sal_Bool);
1533
1534 #else
1535
1536 extern "C" rtl_uString* basicide_choose_macro(void*, void*, void*, sal_Bool);
1537
1538 #endif
1539
1540 static OUString ChooseMacro(weld::Window* pParent, const Reference<XModel>& rxLimitToDocument, const Reference<XFrame>& xDocFrame, bool bChooseOnly)
1541 {
1542 #ifndef DISABLE_DYNLOADING
1543 basicide_choose_macro pSymbol = reinterpret_cast<basicide_choose_macro>(sfx2::getBasctlFunction("basicide_choose_macro"));
1544 #else
1545 #define pSymbol basicide_choose_macro
1546 #endif
1547
1548 // call basicide_choose_macro in basctl
1549 rtl_uString* pScriptURL = pSymbol(pParent, rxLimitToDocument.get(), xDocFrame.get(), bChooseOnly);
1550 OUString aScriptURL( pScriptURL );
1551 rtl_uString_release( pScriptURL );
1552 return aScriptURL;
1553
1554 #ifdef DISABLE_DYNLOADING
1555 #undef pSymbol
1556 #endif
1557 }
1558
1559 #endif
1560
1561 namespace
1562 {
1563 #if HAVE_FEATURE_SCRIPTING
1564 weld::Window* lcl_getDialogParent(const Reference<XFrame>& rxFrame)
1565 {
1566 Reference<awt::XWindow> xContainerWindow;
1567 if (rxFrame.is())
1568 xContainerWindow = rxFrame->getContainerWindow();
1569 return Application::GetFrameWeld(xContainerWindow);
1570 }
1571
1572 SfxViewFrame* lcl_getBasicIDEViewFrame( SfxObjectShell const * i_pBasicIDE )
1573 {
1574 SfxViewFrame* pView = SfxViewFrame::GetFirst( i_pBasicIDE );
1575 while ( pView )
1576 {
1577 if ( pView->GetObjectShell()->GetFactory().GetDocumentServiceName() == "com.sun.star.script.BasicIDE" )
1578 break;
1579 pView = SfxViewFrame::GetNext( *pView, i_pBasicIDE );
1580 }
1581 return pView;
1582 }
1583 Reference< XFrame > lcl_findStartModuleFrame( const Reference<XComponentContext> & rxContext )
1584 {
1585 try
1586 {
1587 Reference < XDesktop2 > xDesktop = Desktop::create( rxContext );
1588 Reference < XIndexAccess > xContainer( xDesktop->getFrames(), UNO_QUERY_THROW );
1589
1590 Reference< XModuleManager2 > xCheck = ModuleManager::create(rxContext);
1591
1592 sal_Int32 nCount = xContainer->getCount();
1593 for ( sal_Int32 i=0; i<nCount; ++i )
1594 {
1595 try
1596 {
1597 Reference < XFrame > xFrame( xContainer->getByIndex(i), UNO_QUERY_THROW );
1598 OUString sModule = xCheck->identify( xFrame );
1599 if ( sModule == "com.sun.star.frame.StartModule" )
1600 return xFrame;
1601 }
1602 catch( const UnknownModuleException& )
1603 {
1604 // silence
1605 }
1606 catch(const Exception&)
1607 {
1608 // re-throw, caught below
1609 throw;
1610 }
1611 }
1612 }
1613 catch( const Exception& )
1614 {
1615 DBG_UNHANDLED_EXCEPTION("sfx.appl");
1616 }
1617 return nullptr;
1618 }
1619 #endif // HAVE_FEATURE_SCRIPTING
1620 }
1621
1622 void SfxApplication::OfaExec_Impl( SfxRequest& rReq )
1623 {
1624 switch ( rReq.GetSlot() )
1625 {
1626 case SID_OPTIONS_TREEDIALOG:
1627 {
1628 OUString sPageURL;
1629 const SfxStringItem* pURLItem = rReq.GetArg<SfxStringItem>(SID_OPTIONS_PAGEURL);
1630 if ( pURLItem )
1631 sPageURL = pURLItem->GetValue();
1632
1633 sal_uInt16 nPageID = 0;
1634 const SfxUInt16Item* pIDItem = rReq.GetArg<SfxUInt16Item>(SID_OPTIONS_PAGEID);
1635 if (pIDItem)
1636 nPageID = pIDItem->GetValue();
1637
1638 Reference <XFrame> xFrame(GetRequestFrame(rReq));
1639 SfxAbstractDialogFactory* pFact = SfxAbstractDialogFactory::Create();
1640 VclPtr<VclAbstractDialog> pDlg =
1641 pFact->CreateFrameDialog(rReq.GetFrameWeld(), xFrame, rReq.GetSlot(), nPageID, sPageURL);
1642 short nRet = pDlg->Execute();
1643 pDlg.disposeAndClear();
1644 SfxViewFrame* pView = SfxViewFrame::GetFirst();
1645 bool bDisableActiveContent
1646 = officecfg::Office::Common::Security::Scripting::DisableActiveContent::get();
1647
1648 while ( pView )
1649 {
1650 if (nRet == RET_OK)
1651 {
1652 SfxObjectShell* pObjSh = pView->GetObjectShell();
1653 if (pObjSh)
1654 {
1655 pObjSh->SetConfigOptionsChecked(false);
1656
1657 // when active content is disabled via options dialog,
1658 // disable all current active embedded objects
1659 if (bDisableActiveContent)
1660 lcl_disableActiveEmbeddedObjects(pObjSh);
1661 }
1662 }
1663 pView->GetBindings().InvalidateAll(false);
1664 pView = SfxViewFrame::GetNext( *pView );
1665 }
1666 break;
1667 }
1668
1669 case SID_OPTIONS_SECURITY:
1670 {
1671 SfxAbstractDialogFactory* pFact = SfxAbstractDialogFactory::Create();
1672 VclPtr<AbstractSecurityOptionsDialog> pDlg =
1673 pFact->CreateSvxSecurityOptionsDialog(rReq.GetFrameWeld());
1674
1675 if (pDlg->Execute() == RET_OK) {
1676 pDlg->SetSecurityOptions();
1677 }
1678
1679 pDlg.disposeAndClear();
1680 break;
1681 }
1682
1683 case SID_ADDITIONS_DIALOG:
1684 {
1685 OUString sAdditionsTag = u""_ustr;
1686
1687 const SfxStringItem* pStringArg = rReq.GetArg<SfxStringItem>(FN_PARAM_ADDITIONS_TAG);
1688 if (pStringArg)
1689 sAdditionsTag = pStringArg->GetValue();
1690
1691 VclAbstractDialogFactory* pFact = VclAbstractDialogFactory::Create();
1692 VclPtr<AbstractAdditionsDialog> pDialog(
1693 pFact->CreateAdditionsDialog(rReq.GetFrameWeld(), sAdditionsTag));
1694 pDialog->StartExecuteAsync(
1695 [pDialog] (sal_Int32 /*nResult*/)->void
1696 {
1697 pDialog->disposeOnce();
1698 }
1699 );
1700 break;
1701 }
1702
1703 case SID_MORE_DICTIONARIES:
1704 {
1705 uno::Sequence<beans::PropertyValue> aArgs{ comphelper::makePropertyValue(
1706 u"AdditionsTag"_ustr, u"Dictionary"_ustr) };
1707 comphelper::dispatchCommand(u".uno:AdditionsDialog"_ustr, aArgs);
1708 break;
1709 }
1710 #if HAVE_FEATURE_SCRIPTING
1711 case SID_BASICIDE_APPEAR:
1712 {
1713 SfxViewFrame* pView = lcl_getBasicIDEViewFrame( nullptr );
1714 if ( !pView )
1715 {
1716 SfxObjectShell* pBasicIDE = SfxObjectShell::CreateObject( u"com.sun.star.script.BasicIDE"_ustr );
1717 pBasicIDE->DoInitNew();
1718 pBasicIDE->SetModified( false );
1719 try
1720 {
1721 // load the Basic IDE via direct access to the SFX frame loader. A generic loadComponentFromURL
1722 // (which could be done via SfxViewFrame::LoadDocumentIntoFrame) is not feasible here, since the Basic IDE
1723 // does not really play nice with the framework's concept. For instance, it is a "singleton document",
1724 // which conflicts, at the latest, with the framework's concept of loading into _blank frames.
1725 // So, since we know that our frame loader can handle it, we skip the generic framework loader
1726 // mechanism, and the type detection (which doesn't know about the Basic IDE).
1727 const Reference< XComponentContext >& xContext( ::comphelper::getProcessComponentContext() );
1728 Reference< XSynchronousFrameLoader > xLoader(
1729 xContext->getServiceManager()->createInstanceWithContext(u"com.sun.star.comp.office.FrameLoader"_ustr, xContext),
1730 UNO_QUERY_THROW );
1731 ::comphelper::NamedValueCollection aLoadArgs;
1732 aLoadArgs.put( u"Model"_ustr, pBasicIDE->GetModel() );
1733 aLoadArgs.put( u"URL"_ustr, u"private:factory/sbasic"_ustr );
1734
1735 Reference< XFrame > xTargetFrame( lcl_findStartModuleFrame( xContext ) );
1736 if ( !xTargetFrame.is() )
1737 xTargetFrame = SfxFrame::CreateBlankFrame();
1738 ENSURE_OR_THROW( xTargetFrame.is(), "could not obtain a frameto load the Basic IDE into!" );
1739
1740 xLoader->load( aLoadArgs.getPropertyValues(), xTargetFrame );
1741 }
1742 catch( const Exception& )
1743 {
1744 DBG_UNHANDLED_EXCEPTION("sfx.appl");
1745 }
1746
1747 pView = lcl_getBasicIDEViewFrame( pBasicIDE );
1748 if ( pView )
1749 pView->SetName( u"BASIC:1"_ustr );
1750 }
1751
1752 if ( pView )
1753 pView->GetFrame().Appear();
1754
1755 const SfxItemSet* pArgs = rReq.GetArgs();
1756 if ( pArgs && pView )
1757 {
1758 SfxViewShell* pViewShell = pView->GetViewShell();
1759 SfxObjectShell* pObjShell = pView->GetObjectShell();
1760 if ( pViewShell && pObjShell )
1761 {
1762 SfxRequest aReq( SID_BASICIDE_SHOWWINDOW, SfxCallMode::SYNCHRON, pObjShell->GetPool() );
1763 aReq.SetArgs( *pArgs );
1764 pViewShell->ExecuteSlot( aReq );
1765 }
1766 }
1767
1768 rReq.Done();
1769 }
1770 break;
1771
1772 case SID_BASICCHOOSER:
1773 {
1774 const SfxItemSet* pArgs = rReq.GetArgs();
1775 const SfxBoolItem* pItem;
1776 bool bChooseOnly = false;
1777 Reference< XModel > xLimitToModel;
1778 if(pArgs && (pItem = pArgs->GetItemIfSet(SID_RECORDMACRO, false)) )
1779 {
1780 bool bRecord = pItem->GetValue();
1781 if ( bRecord )
1782 {
1783 // !Hack
1784 bChooseOnly = false;
1785 SfxObjectShell* pCurrentShell = SfxObjectShell::Current();
1786 OSL_ENSURE( pCurrentShell, "macro recording outside an SFX document?" );
1787 if ( pCurrentShell )
1788 xLimitToModel = pCurrentShell->GetModel();
1789 }
1790 }
1791
1792 Reference <XFrame> xFrame(GetRequestFrame(rReq));
1793 rReq.SetReturnValue(SfxStringItem(rReq.GetSlot(), ChooseMacro(rReq.GetFrameWeld(), xLimitToModel, xFrame, bChooseOnly)));
1794 rReq.Done();
1795 }
1796 break;
1797
1798 case SID_MACROORGANIZER:
1799 {
1800 SAL_INFO("sfx.appl", "handling SID_MACROORGANIZER");
1801 const SfxItemSet* pArgs = rReq.GetArgs();
1802 sal_Int16 nTabId = 0;
1803 Reference <XFrame> xFrame;
1804 if (pArgs)
1805 {
1806 if (const SfxUInt16Item* pItem = pArgs->GetItemIfSet(SID_MACROORGANIZER, false))
1807 nTabId = pItem->GetValue();
1808 if (const SfxBoolItem* pItem = rReq.GetArg<SfxBoolItem>(FN_PARAM_2))
1809 {
1810 // if set then default to showing the macros of the document associated
1811 // with this frame
1812 if (pItem->GetValue())
1813 xFrame = GetRequestFrame(rReq);
1814 }
1815 }
1816 SfxApplication::MacroOrganizer(rReq.GetFrameWeld(), xFrame, nTabId);
1817 rReq.Done();
1818 }
1819 break;
1820
1821 case SID_RUNMACRO:
1822 {
1823 SfxAbstractDialogFactory* pFact = SfxAbstractDialogFactory::Create();
1824 SAL_INFO("sfx.appl", "SfxApplication::OfaExec_Impl: case ScriptOrg");
1825
1826 Reference <XFrame> xFrame(GetRequestFrame(rReq));
1827 if ( !xFrame.is() )
1828 {
1829 if (const SfxViewFrame* pViewFrame = SfxViewFrame::Current())
1830 xFrame = pViewFrame->GetFrame().GetFrameInterface();
1831 }
1832
1833 do // artificial loop for flow control
1834 {
1835 VclPtr<AbstractScriptSelectorDialog> pDlg(pFact->CreateScriptSelectorDialog(lcl_getDialogParent(xFrame), xFrame));
1836 OSL_ENSURE( pDlg, "SfxApplication::OfaExec_Impl( SID_RUNMACRO ): no dialog!" );
1837 if ( !pDlg )
1838 break;
1839 pDlg->SetRunLabel();
1840
1841 pDlg->StartExecuteAsync([pDlg, xFrame](sal_Int32 nDialogResult) {
1842 if ( !nDialogResult )
1843 {
1844 pDlg->disposeOnce();
1845 return;
1846 }
1847
1848 Sequence< Any > args;
1849 Sequence< sal_Int16 > outIndex;
1850 Sequence< Any > outArgs;
1851 Any ret;
1852
1853 Reference< XInterface > xScriptContext;
1854
1855 Reference< XController > xController;
1856 if ( xFrame.is() )
1857 xController = xFrame->getController();
1858 if ( xController.is() )
1859 xScriptContext = xController->getModel();
1860 if ( !xScriptContext.is() )
1861 xScriptContext = xController;
1862
1863 SfxObjectShell::CallXScript( xScriptContext, pDlg->GetScriptURL(), args, ret, outIndex, outArgs );
1864 pDlg->disposeOnce();
1865 });
1866 }
1867 while ( false );
1868 rReq.Done();
1869 }
1870 break;
1871
1872 case SID_SCRIPTORGANIZER:
1873 {
1874 SfxAbstractDialogFactory* pFact = SfxAbstractDialogFactory::Create();
1875 SAL_INFO("sfx.appl", "SfxApplication::OfaExec_Impl: case ScriptOrg");
1876 const SfxItemSet* pArgs = rReq.GetArgs();
1877 const SfxScriptOrganizerItem* pItem;
1878 OUString aLanguage;
1879 if(pArgs && (pItem = pArgs->GetItemIfSet(SID_SCRIPTORGANIZER, false) ))
1880 {
1881 aLanguage = pItem->getLanguage();
1882 }
1883
1884 OUString aLang( aLanguage );
1885 SAL_INFO("sfx.appl", "SfxApplication::OfaExec_Impl: about to create dialog for: " << aLang);
1886 ScopedVclPtr<VclAbstractDialog> pDlg(pFact->CreateSvxScriptOrgDialog(rReq.GetFrameWeld(), aLanguage));
1887 if( pDlg )
1888 {
1889 pDlg->Execute();
1890 }
1891 else
1892 {
1893 SAL_WARN("sfx.appl", "no dialog!!!");
1894 }
1895 rReq.Done();
1896 }
1897 break;
1898
1899 case SID_MACROMANAGER:
1900 {
1901 SfxAbstractDialogFactory* pFact = SfxAbstractDialogFactory::Create();
1902
1903 Reference<XFrame> xFrame(GetRequestFrame(rReq));
1904 if (!xFrame.is())
1905 {
1906 if (const SfxViewFrame* pViewFrame = SfxViewFrame::Current())
1907 xFrame = pViewFrame->GetFrame().GetFrameInterface();
1908 }
1909
1910 VclPtr<AbstractMacroManagerDialog> pDlg(
1911 pFact->CreateMacroManagerDialog(lcl_getDialogParent(xFrame), xFrame));
1912 OSL_ENSURE(pDlg, "SfxApplication::OfaExec_Impl(SID_MACROMANAGER): no dialog!");
1913 if (pDlg)
1914 {
1915 pDlg->StartExecuteAsync(
1916 [pDlg, xFrame](sal_Int32 nDialogResult)
1917 {
1918 if (!nDialogResult)
1919 {
1920 pDlg->disposeOnce();
1921 return;
1922 }
1923
1924 Sequence<Any> args;
1925 Sequence<sal_Int16> outIndex;
1926 Sequence<Any> outArgs;
1927 Any ret;
1928
1929 Reference<XInterface> xScriptContext;
1930
1931 Reference<XController> xController;
1932 if (xFrame.is())
1933 xController = xFrame->getController();
1934 if (xController.is())
1935 xScriptContext = xController->getModel();
1936 if (!xScriptContext.is())
1937 xScriptContext = xController;
1938
1939 SfxObjectShell::CallXScript(xScriptContext, pDlg->GetScriptURL(), args, ret,
1940 outIndex, outArgs);
1941 pDlg->disposeOnce();
1942 });
1943 pDlg->LoadLastUsedMacro();
1944 }
1945 rReq.Done();
1946 }
1947 break;
1948 #endif // HAVE_FEATURE_SCRIPTING
1949
1950 case SID_OFFICE_CHECK_PLZ:
1951 {
1952 bool bRet = false;
1953 const SfxStringItem* pStringItem = rReq.GetArg<SfxStringItem>(rReq.GetSlot());
1954
1955 if ( pStringItem )
1956 {
1957 bRet = true /*!!!SfxIniManager::CheckPLZ( aPLZ )*/;
1958 }
1959 #if HAVE_FEATURE_SCRIPTING
1960 else
1961 SbxBase::SetError( ERRCODE_BASIC_WRONG_ARGS );
1962 #endif
1963 rReq.SetReturnValue( SfxBoolItem( rReq.GetSlot(), bRet ) );
1964 }
1965 break;
1966
1967 case SID_AUTO_CORRECT_DLG:
1968 {
1969 SfxAbstractDialogFactory* pFact = SfxAbstractDialogFactory::Create();
1970 SfxItemSetFixed<SID_AUTO_CORRECT_DLG, SID_AUTO_CORRECT_DLG> aSet(GetPool());
1971 const SfxPoolItem* pItem=nullptr;
1972 const SfxItemSet* pSet = rReq.GetArgs();
1973 if ( pSet && pSet->GetItemState( SID_AUTO_CORRECT_DLG, false, &pItem ) == SfxItemState::SET )
1974 aSet.Put( *pItem );
1975
1976 ScopedVclPtr<SfxAbstractTabDialog> pDlg(pFact->CreateAutoCorrTabDialog(rReq.GetFrameWeld(), &aSet));
1977 pDlg->Execute();
1978
1979 break;
1980 }
1981
1982 case SID_NEWSD :
1983 {
1984 if (!SvtModuleOptions().IsImpressInstalled())
1985 {
1986 std::unique_ptr<weld::MessageDialog> xBox(Application::CreateMessageDialog(rReq.GetFrameWeld(),
1987 VclMessageType::Warning, VclButtonsType::Ok,
1988 SfxResId(STR_MODULENOTINSTALLED)));
1989 xBox->run();
1990 return;
1991 }
1992
1993 const Reference< uno::XComponentContext >& xContext = ::comphelper::getProcessComponentContext();
1994 Reference< frame::XDispatchProvider > xProv = drawing::ModuleDispatcher::create( xContext );
1995
1996 OUString aCmd = GetInterface()->GetSlot( rReq.GetSlot() )->GetUnoName();
1997 Reference< frame::XDispatchHelper > xHelper( frame::DispatchHelper::create(xContext) );
1998 Sequence < beans::PropertyValue > aSeq;
1999 if ( rReq.GetArgs() )
2000 TransformItems( rReq.GetSlot(), *rReq.GetArgs(), aSeq );
2001 Any aResult = xHelper->executeDispatch( xProv, aCmd, OUString(), 0, aSeq );
2002 frame::DispatchResultEvent aEvent;
2003 bool bSuccess = (aResult >>= aEvent) &&
2004 (aEvent.State == frame::DispatchResultState::SUCCESS);
2005 rReq.SetReturnValue( SfxBoolItem( rReq.GetSlot(), bSuccess ) );
2006 }
2007 break;
2008
2009 case FN_LABEL :
2010 case FN_BUSINESS_CARD :
2011 case FN_XFORMS_INIT :
2012 {
2013 const Reference< uno::XComponentContext >& xContext = ::comphelper::getProcessComponentContext();
2014 Reference< frame::XDispatchProvider > xProv = text::ModuleDispatcher::create( xContext );
2015
2016 OUString aCmd = GetInterface()->GetSlot( rReq.GetSlot() )->GetUnoName();
2017 Reference< frame::XDispatchHelper > xHelper( frame::DispatchHelper::create(xContext) );
2018 Sequence < beans::PropertyValue > aSeq;
2019 if ( rReq.GetArgs() )
2020 TransformItems( rReq.GetSlot(), *rReq.GetArgs(), aSeq );
2021 Any aResult = xHelper->executeDispatch( xProv, aCmd, OUString(), 0, aSeq );
2022 frame::DispatchResultEvent aEvent;
2023 bool bSuccess = (aResult >>= aEvent) &&
2024 (aEvent.State == frame::DispatchResultState::SUCCESS);
2025 rReq.SetReturnValue( SfxBoolItem( rReq.GetSlot(), bSuccess ) );
2026 }
2027 break;
2028
2029 case SID_ADDRESS_DATA_SOURCE:
2030 {
2031 try
2032 {
2033 const Reference< uno::XComponentContext >& xORB = ::comphelper::getProcessComponentContext();
2034 Reference< ui::dialogs::XExecutableDialog > xDialog = ui::dialogs::AddressBookSourcePilot::createWithParent(xORB, nullptr);
2035 xDialog->execute();
2036 }
2037 catch(const css::uno::Exception&)
2038 {
2039 DBG_UNHANDLED_EXCEPTION("sfx.appl");
2040 }
2041 }
2042 break;
2043
2044 case SID_COMP_BIBLIOGRAPHY:
2045 lcl_tryLoadBibliography();
2046 break;
2047 }
2048 }
2049
2050 void SfxApplication::OfaState_Impl(SfxItemSet &rSet)
2051 {
2052 if (!SvtModuleOptions().IsWriterInstalled())
2053 {
2054 rSet.DisableItem( FN_LABEL );
2055 rSet.DisableItem( FN_BUSINESS_CARD );
2056 rSet.DisableItem( FN_XFORMS_INIT );
2057 }
2058 if ( comphelper::LibreOfficeKit::isActive() )
2059 rSet.DisableItem( SID_AUTO_CORRECT_DLG );
2060
2061 if (SvtSecurityOptions::IsMacroDisabled())
2062 {
2063 rSet.DisableItem(SID_RUNMACRO);
2064 rSet.DisableItem(SID_MACROORGANIZER);
2065 rSet.DisableItem(SID_SCRIPTORGANIZER);
2066 rSet.DisableItem(SID_BASICIDE_APPEAR);
2067 rSet.DisableItem(SID_MACROMANAGER);
2068 }
2069 }
2070
2071 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */
FREE OFFICE SUITE