File: | home/maarten/src/libreoffice/core/include/rtl/ref.hxx |
Warning: | line 192, column 9 Use of memory after it is freed |
Press '?' to see keyboard shortcuts
Keyboard shortcuts:
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 <memory> | ||||||||
21 | #include <iderid.hxx> | ||||||||
22 | #include <strings.hrc> | ||||||||
23 | #include <helpids.h> | ||||||||
24 | |||||||||
25 | #include "baside2.hxx" | ||||||||
26 | #include <baside3.hxx> | ||||||||
27 | #include <basidesh.hxx> | ||||||||
28 | #include <basobj.hxx> | ||||||||
29 | #include <docsignature.hxx> | ||||||||
30 | #include <iderdll.hxx> | ||||||||
31 | #include "iderdll2.hxx" | ||||||||
32 | #include <localizationmgr.hxx> | ||||||||
33 | #include <managelang.hxx> | ||||||||
34 | |||||||||
35 | #include <basic/basmgr.hxx> | ||||||||
36 | #include <com/sun/star/script/ModuleType.hpp> | ||||||||
37 | #include <com/sun/star/script/XLibraryContainerPassword.hpp> | ||||||||
38 | #include <com/sun/star/script/XLibraryContainer2.hpp> | ||||||||
39 | #include <com/sun/star/frame/XLayoutManager.hpp> | ||||||||
40 | #include <svl/srchdefs.hxx> | ||||||||
41 | #include <sal/log.hxx> | ||||||||
42 | #include <osl/diagnose.h> | ||||||||
43 | #include <sfx2/app.hxx> | ||||||||
44 | #include <sfx2/bindings.hxx> | ||||||||
45 | #include <sfx2/childwin.hxx> | ||||||||
46 | #include <sfx2/dinfdlg.hxx> | ||||||||
47 | #include <sfx2/minfitem.hxx> | ||||||||
48 | #include <sfx2/request.hxx> | ||||||||
49 | #include <sfx2/viewfrm.hxx> | ||||||||
50 | #include <svx/svxids.hrc> | ||||||||
51 | #include <svl/eitem.hxx> | ||||||||
52 | #include <svl/intitem.hxx> | ||||||||
53 | #include <svl/visitem.hxx> | ||||||||
54 | #include <svl/whiter.hxx> | ||||||||
55 | #include <vcl/texteng.hxx> | ||||||||
56 | #include <vcl/textview.hxx> | ||||||||
57 | #include <vcl/svapp.hxx> | ||||||||
58 | #include <vcl/weld.hxx> | ||||||||
59 | |||||||||
60 | constexpr sal_Int32 TAB_HEIGHT_MARGIN = 10; | ||||||||
61 | |||||||||
62 | namespace basctl | ||||||||
63 | { | ||||||||
64 | |||||||||
65 | using namespace ::com::sun::star; | ||||||||
66 | using namespace ::com::sun::star::uno; | ||||||||
67 | using namespace ::com::sun::star::frame; | ||||||||
68 | |||||||||
69 | void Shell::ExecuteSearch( SfxRequest& rReq ) | ||||||||
70 | { | ||||||||
71 | if ( !pCurWin ) | ||||||||
72 | return; | ||||||||
73 | |||||||||
74 | const SfxItemSet* pArgs = rReq.GetArgs(); | ||||||||
75 | sal_uInt16 nSlot = rReq.GetSlot(); | ||||||||
76 | |||||||||
77 | // if searching has not been done before this time | ||||||||
78 | if (nSlot == SID_BASICIDE_REPEAT_SEARCH((10000 + 500) + 3) && !mpSearchItem) | ||||||||
79 | { | ||||||||
80 | rReq.SetReturnValue(SfxBoolItem(nSlot, false)); | ||||||||
81 | nSlot = 0; | ||||||||
82 | } | ||||||||
83 | |||||||||
84 | switch ( nSlot ) | ||||||||
85 | { | ||||||||
86 | case SID_SEARCH_OPTIONS(10000 + 281): | ||||||||
87 | break; | ||||||||
88 | case SID_SEARCH_ITEMTypedWhichId<SvxSearchItem>(10000 + 291): | ||||||||
89 | mpSearchItem.reset(pArgs->Get(SID_SEARCH_ITEMTypedWhichId<SvxSearchItem>(10000 + 291)).Clone()); | ||||||||
90 | break; | ||||||||
91 | case FID_SEARCH_ON((10000 + 500) + 0): | ||||||||
92 | mbJustOpened = true; | ||||||||
93 | GetViewFrame()->GetBindings().Invalidate(SID_SEARCH_ITEMTypedWhichId<SvxSearchItem>(10000 + 291)); | ||||||||
94 | break; | ||||||||
95 | case SID_BASICIDE_REPEAT_SEARCH((10000 + 500) + 3): | ||||||||
96 | case FID_SEARCH_NOW((10000 + 500) + 2): | ||||||||
97 | { | ||||||||
98 | if (!pCurWin->HasActiveEditor()) | ||||||||
99 | break; | ||||||||
100 | |||||||||
101 | // If it is a repeat searching | ||||||||
102 | if ( nSlot == SID_BASICIDE_REPEAT_SEARCH((10000 + 500) + 3) ) | ||||||||
103 | { | ||||||||
104 | if( !mpSearchItem ) | ||||||||
105 | mpSearchItem.reset( new SvxSearchItem( SID_SEARCH_ITEMTypedWhichId<SvxSearchItem>(10000 + 291) )); | ||||||||
106 | } | ||||||||
107 | else | ||||||||
108 | { | ||||||||
109 | // Get SearchItem from request if it is the first searching | ||||||||
110 | if ( pArgs ) | ||||||||
111 | { | ||||||||
112 | mpSearchItem.reset(pArgs->Get(SID_SEARCH_ITEMTypedWhichId<SvxSearchItem>(10000 + 291)).Clone()); | ||||||||
113 | } | ||||||||
114 | } | ||||||||
115 | |||||||||
116 | sal_Int32 nFound = 0; | ||||||||
117 | |||||||||
118 | if ( mpSearchItem->GetCommand() == SvxSearchCmd::REPLACE_ALL ) | ||||||||
119 | { | ||||||||
120 | sal_uInt16 nActModWindows = 0; | ||||||||
121 | for (auto const& window : aWindowTable) | ||||||||
122 | { | ||||||||
123 | BaseWindow* pWin = window.second; | ||||||||
124 | if (pWin->HasActiveEditor()) | ||||||||
125 | nActModWindows++; | ||||||||
126 | } | ||||||||
127 | |||||||||
128 | bool bAllModules = nActModWindows <= 1; | ||||||||
129 | if (!bAllModules) | ||||||||
130 | { | ||||||||
131 | std::unique_ptr<weld::MessageDialog> xQueryBox(Application::CreateMessageDialog(pCurWin ? pCurWin->GetFrameWeld() : nullptr, | ||||||||
132 | VclMessageType::Question, VclButtonsType::YesNo, | ||||||||
133 | IDEResId(RID_STR_SEARCHALLMODULESreinterpret_cast<char const *>("RID_STR_SEARCHALLMODULES" "\004" u8"Do you want to replace the text in all active modules?" )))); | ||||||||
134 | xQueryBox->set_default_response(RET_YES); | ||||||||
135 | bAllModules = xQueryBox->run() == RET_YES; | ||||||||
136 | } | ||||||||
137 | |||||||||
138 | if (bAllModules) | ||||||||
139 | { | ||||||||
140 | for (auto const& window : aWindowTable) | ||||||||
141 | { | ||||||||
142 | BaseWindow* pWin = window.second; | ||||||||
143 | nFound += pWin->StartSearchAndReplace( *mpSearchItem ); | ||||||||
144 | } | ||||||||
145 | } | ||||||||
146 | else | ||||||||
147 | nFound = pCurWin->StartSearchAndReplace( *mpSearchItem ); | ||||||||
148 | |||||||||
149 | OUString aReplStr(IDEResId(RID_STR_SEARCHREPLACESreinterpret_cast<char const *>("RID_STR_SEARCHREPLACES" "\004" u8"Search key replaced XX times"))); | ||||||||
150 | aReplStr = aReplStr.replaceAll("XX", OUString::number(nFound)); | ||||||||
151 | |||||||||
152 | std::unique_ptr<weld::MessageDialog> xInfoBox(Application::CreateMessageDialog(pCurWin->GetFrameWeld(), | ||||||||
153 | VclMessageType::Info, VclButtonsType::Ok, | ||||||||
154 | aReplStr)); | ||||||||
155 | xInfoBox->run(); | ||||||||
156 | } | ||||||||
157 | else | ||||||||
158 | { | ||||||||
159 | bool bCanceled = false; | ||||||||
160 | nFound = pCurWin->StartSearchAndReplace( *mpSearchItem ); | ||||||||
161 | if ( !nFound && !mpSearchItem->GetSelection() ) | ||||||||
162 | { | ||||||||
163 | // search other modules... | ||||||||
164 | bool bChangeCurWindow = false; | ||||||||
165 | auto it = std::find_if(aWindowTable.cbegin(), aWindowTable.cend(), | ||||||||
166 | [this](const WindowTable::value_type& item) { return item.second == pCurWin; }); | ||||||||
167 | if (it != aWindowTable.cend()) | ||||||||
168 | ++it; | ||||||||
169 | BaseWindow* pWin = it != aWindowTable.cend() ? it->second.get() : nullptr; | ||||||||
170 | |||||||||
171 | bool bSearchedFromStart = false; | ||||||||
172 | while ( !nFound && !bCanceled && ( pWin || !bSearchedFromStart ) ) | ||||||||
173 | { | ||||||||
174 | if ( !pWin ) | ||||||||
175 | { | ||||||||
176 | SfxViewFrame* pViewFrame = GetViewFrame(); | ||||||||
177 | SfxChildWindow* pChildWin = pViewFrame ? pViewFrame->GetChildWindow( SID_SEARCH_DLG(5000 + 961) ) : nullptr; | ||||||||
178 | auto xParent = pChildWin ? pChildWin->GetController() : nullptr; | ||||||||
179 | |||||||||
180 | std::unique_ptr<weld::MessageDialog> xQueryBox(Application::CreateMessageDialog(xParent ? xParent->getDialog() : nullptr, | ||||||||
181 | VclMessageType::Question, VclButtonsType::YesNo, | ||||||||
182 | IDEResId(RID_STR_SEARCHFROMSTARTreinterpret_cast<char const *>("RID_STR_SEARCHFROMSTART" "\004" u8"Search to last module complete. Continue at first module?" )))); | ||||||||
183 | xQueryBox->set_default_response(RET_YES); | ||||||||
184 | if (xQueryBox->run() == RET_YES) | ||||||||
185 | { | ||||||||
186 | it = aWindowTable.cbegin(); | ||||||||
187 | if ( it != aWindowTable.cend() ) | ||||||||
188 | pWin = it->second; | ||||||||
189 | bSearchedFromStart = true; | ||||||||
190 | } | ||||||||
191 | else | ||||||||
192 | bCanceled = true; | ||||||||
193 | } | ||||||||
194 | |||||||||
195 | if (pWin && pWin->HasActiveEditor()) | ||||||||
196 | { | ||||||||
197 | if ( pWin != pCurWin ) | ||||||||
198 | { | ||||||||
199 | if ( pCurWin ) | ||||||||
200 | pWin->SetSizePixel( pCurWin->GetSizePixel() ); | ||||||||
201 | nFound = pWin->StartSearchAndReplace( *mpSearchItem, true ); | ||||||||
202 | } | ||||||||
203 | if ( nFound ) | ||||||||
204 | { | ||||||||
205 | bChangeCurWindow = true; | ||||||||
206 | break; | ||||||||
207 | } | ||||||||
208 | } | ||||||||
209 | if ( pWin && ( pWin != pCurWin ) ) | ||||||||
210 | { | ||||||||
211 | if ( it != aWindowTable.cend() ) | ||||||||
212 | ++it; | ||||||||
213 | pWin = it != aWindowTable.cend() ? it->second.get() : nullptr; | ||||||||
214 | } | ||||||||
215 | else | ||||||||
216 | pWin = nullptr; | ||||||||
217 | } | ||||||||
218 | if ( !nFound && bSearchedFromStart ) | ||||||||
219 | nFound = pCurWin->StartSearchAndReplace( *mpSearchItem, true ); | ||||||||
220 | if ( bChangeCurWindow ) | ||||||||
221 | SetCurWindow( pWin, true ); | ||||||||
222 | } | ||||||||
223 | if ( !nFound && !bCanceled ) | ||||||||
224 | { | ||||||||
225 | std::unique_ptr<weld::MessageDialog> xInfoBox(Application::CreateMessageDialog(pCurWin->GetFrameWeld(), | ||||||||
226 | VclMessageType::Info, VclButtonsType::Ok, | ||||||||
227 | IDEResId(RID_STR_SEARCHNOTFOUNDreinterpret_cast<char const *>("RID_STR_SEARCHNOTFOUND" "\004" u8"Search key not found")))); | ||||||||
228 | xInfoBox->run(); | ||||||||
229 | } | ||||||||
230 | } | ||||||||
231 | |||||||||
232 | rReq.Done(); | ||||||||
233 | break; | ||||||||
234 | } | ||||||||
235 | default: | ||||||||
236 | pCurWin->ExecuteCommand( rReq ); | ||||||||
237 | } | ||||||||
238 | } | ||||||||
239 | |||||||||
240 | void Shell::ExecuteCurrent( SfxRequest& rReq ) | ||||||||
241 | { | ||||||||
242 | if ( !pCurWin ) | ||||||||
243 | return; | ||||||||
244 | |||||||||
245 | switch ( rReq.GetSlot() ) | ||||||||
246 | { | ||||||||
247 | case SID_BASICIDE_HIDECURPAGE( (30000 + 768) + 10 ): | ||||||||
248 | { | ||||||||
249 | pCurWin->StoreData(); | ||||||||
250 | RemoveWindow( pCurWin, false ); | ||||||||
251 | } | ||||||||
252 | break; | ||||||||
253 | case SID_BASICIDE_RENAMECURRENT( (30000 + 768) + 23 ): | ||||||||
254 | { | ||||||||
255 | pTabBar->StartEditMode( pTabBar->GetCurPageId() ); | ||||||||
256 | } | ||||||||
257 | break; | ||||||||
258 | case SID_UNDO(5000 + 701): | ||||||||
259 | case SID_REDO(5000 + 700): | ||||||||
260 | if ( GetUndoManager() && pCurWin->AllowUndo() ) | ||||||||
261 | GetViewFrame()->ExecuteSlot( rReq ); | ||||||||
262 | break; | ||||||||
263 | default: | ||||||||
264 | pCurWin->ExecuteCommand( rReq ); | ||||||||
265 | } | ||||||||
266 | } | ||||||||
267 | |||||||||
268 | // no matter who's at the top, influence on the shell: | ||||||||
269 | void Shell::ExecuteGlobal( SfxRequest& rReq ) | ||||||||
270 | { | ||||||||
271 | sal_uInt16 nSlot = rReq.GetSlot(); | ||||||||
272 | switch ( nSlot ) | ||||||||
| |||||||||
273 | { | ||||||||
274 | case SID_NEWDOCDIRECT(5000 + 537): | ||||||||
275 | { | ||||||||
276 | // we do not have a new document factory, | ||||||||
277 | // so just forward to a fallback method. | ||||||||
278 | SfxGetpApp()->ExecuteSlot(rReq); | ||||||||
279 | } | ||||||||
280 | break; | ||||||||
281 | |||||||||
282 | case SID_BASICSTOP(5000 + 958): | ||||||||
283 | { | ||||||||
284 | // maybe do not simply stop if on breakpoint! | ||||||||
285 | if (ModulWindow* pMCurWin = dynamic_cast<ModulWindow*>(pCurWin.get())) | ||||||||
286 | pMCurWin->BasicStop(); | ||||||||
287 | StopBasic(); | ||||||||
288 | } | ||||||||
289 | break; | ||||||||
290 | |||||||||
291 | case SID_SAVEDOC(5000 + 505): | ||||||||
292 | { | ||||||||
293 | if ( pCurWin ) | ||||||||
294 | { | ||||||||
295 | // rewrite date into the BASIC | ||||||||
296 | StoreAllWindowData(); | ||||||||
297 | |||||||||
298 | // document basic | ||||||||
299 | ScriptDocument aDocument( pCurWin->GetDocument() ); | ||||||||
300 | if ( aDocument.isDocument() ) | ||||||||
301 | { | ||||||||
302 | uno::Reference< task::XStatusIndicator > xStatusIndicator; | ||||||||
303 | |||||||||
304 | const SfxUnoAnyItem* pStatusIndicatorItem = rReq.GetArg<SfxUnoAnyItem>(SID_PROGRESS_STATUSBAR_CONTROL(5000 + 1597)); | ||||||||
305 | if ( pStatusIndicatorItem ) | ||||||||
306 | OSL_VERIFY( pStatusIndicatorItem->GetValue() >>= xStatusIndicator )do { if (!(pStatusIndicatorItem->GetValue() >>= xStatusIndicator )) do { if (true && (!(0))) { sal_detail_logFormat((SAL_DETAIL_LOG_LEVEL_WARN ), ("legacy.osl"), ("/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" ":" "306" ": "), "OSL_ASSERT: %s", "0"); } } while (false); } while (0); | ||||||||
307 | else | ||||||||
308 | { | ||||||||
309 | // get statusindicator | ||||||||
310 | SfxViewFrame *pFrame_ = GetFrame(); | ||||||||
311 | if ( pFrame_ ) | ||||||||
312 | { | ||||||||
313 | uno::Reference< task::XStatusIndicatorFactory > xStatFactory( | ||||||||
314 | pFrame_->GetFrame().GetFrameInterface(), | ||||||||
315 | uno::UNO_QUERY ); | ||||||||
316 | if( xStatFactory.is() ) | ||||||||
317 | xStatusIndicator = xStatFactory->createStatusIndicator(); | ||||||||
318 | } | ||||||||
319 | |||||||||
320 | if ( xStatusIndicator.is() ) | ||||||||
321 | rReq.AppendItem( SfxUnoAnyItem( SID_PROGRESS_STATUSBAR_CONTROL(5000 + 1597), uno::Any( xStatusIndicator ) ) ); | ||||||||
322 | } | ||||||||
323 | |||||||||
324 | aDocument.saveDocument( xStatusIndicator ); | ||||||||
325 | } | ||||||||
326 | |||||||||
327 | if (SfxBindings* pBindings = GetBindingsPtr()) | ||||||||
328 | { | ||||||||
329 | pBindings->Invalidate( SID_DOC_MODIFIED(5000 + 584) ); | ||||||||
330 | pBindings->Invalidate( SID_SAVEDOC(5000 + 505) ); | ||||||||
331 | pBindings->Invalidate( SID_SIGNATURE(5000 + 1643) ); | ||||||||
332 | } | ||||||||
333 | } | ||||||||
334 | } | ||||||||
335 | break; | ||||||||
336 | case SID_BASICIDE_MODULEDLG( (30000 + 768) + 5 ): | ||||||||
337 | { | ||||||||
338 | if ( rReq.GetArgs() ) | ||||||||
339 | { | ||||||||
340 | const SfxUInt16Item &rTabId = rReq.GetArgs()->Get(SID_BASICIDE_ARG_TABIDTypedWhichId<SfxUInt16Item>( (30000 + 768) + 30 ) ); | ||||||||
341 | Organize(rReq.GetFrameWeld(), rTabId.GetValue()); | ||||||||
342 | } | ||||||||
343 | else | ||||||||
344 | Organize(rReq.GetFrameWeld(), 0); | ||||||||
345 | } | ||||||||
346 | break; | ||||||||
347 | case SID_BASICIDE_CHOOSEMACRO( (30000 + 768) + 2 ): | ||||||||
348 | { | ||||||||
349 | ChooseMacro(rReq.GetFrameWeld(), nullptr); | ||||||||
350 | } | ||||||||
351 | break; | ||||||||
352 | case SID_BASICIDE_CREATEMACRO( (30000 + 768) + 4 ): | ||||||||
353 | case SID_BASICIDE_EDITMACRO( (30000 + 768) + 3 ): | ||||||||
354 | { | ||||||||
355 | DBG_ASSERT( rReq.GetArgs(), "arguments expected" )do { if (true && (!(rReq.GetArgs()))) { sal_detail_logFormat ((SAL_DETAIL_LOG_LEVEL_WARN), ("legacy.tools"), ("/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" ":" "355" ": "), "%s", "arguments expected"); } } while (false ); | ||||||||
356 | const SfxMacroInfoItem& rInfo = rReq.GetArgs()->Get(SID_BASICIDE_ARG_MACROINFOTypedWhichId<SfxMacroInfoItem>( (30000 + 768) + 32 ) ); | ||||||||
357 | BasicManager* pBasMgr = const_cast<BasicManager*>(rInfo.GetBasicManager()); | ||||||||
358 | DBG_ASSERT( pBasMgr, "Nothing selected in basic tree?" )do { if (true && (!(pBasMgr))) { sal_detail_logFormat ((SAL_DETAIL_LOG_LEVEL_WARN), ("legacy.tools"), ("/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" ":" "358" ": "), "%s", "Nothing selected in basic tree?"); } } while (false); | ||||||||
359 | |||||||||
360 | ScriptDocument aDocument( ScriptDocument::getDocumentForBasicManager( pBasMgr ) ); | ||||||||
361 | |||||||||
362 | StartListening(*pBasMgr, DuplicateHandling::Prevent /* log on only once */); | ||||||||
363 | OUString aLibName( rInfo.GetLib() ); | ||||||||
364 | if ( aLibName.isEmpty() ) | ||||||||
365 | aLibName = "Standard" ; | ||||||||
366 | StarBASIC* pBasic = pBasMgr->GetLib( aLibName ); | ||||||||
367 | if ( !pBasic ) | ||||||||
368 | { | ||||||||
369 | // load module and dialog library (if not loaded) | ||||||||
370 | aDocument.loadLibraryIfExists( E_SCRIPTS, aLibName ); | ||||||||
371 | aDocument.loadLibraryIfExists( E_DIALOGS, aLibName ); | ||||||||
372 | |||||||||
373 | // get Basic | ||||||||
374 | pBasic = pBasMgr->GetLib( aLibName ); | ||||||||
375 | } | ||||||||
376 | DBG_ASSERT( pBasic, "No Basic!" )do { if (true && (!(pBasic))) { sal_detail_logFormat( (SAL_DETAIL_LOG_LEVEL_WARN), ("legacy.tools"), ("/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" ":" "376" ": "), "%s", "No Basic!"); } } while (false); | ||||||||
377 | |||||||||
378 | SetCurLib( aDocument, aLibName ); | ||||||||
379 | |||||||||
380 | if ( pBasic && rReq.GetSlot() == SID_BASICIDE_CREATEMACRO( (30000 + 768) + 4 ) ) | ||||||||
381 | { | ||||||||
382 | SbModule* pModule = pBasic->FindModule( rInfo.GetModule() ); | ||||||||
383 | if ( !pModule ) | ||||||||
384 | { | ||||||||
385 | if ( !rInfo.GetModule().isEmpty() || pBasic->GetModules().empty() ) | ||||||||
386 | { | ||||||||
387 | const OUString& aModName = rInfo.GetModule(); | ||||||||
388 | |||||||||
389 | OUString sModuleCode; | ||||||||
390 | if ( aDocument.createModule( aLibName, aModName, false, sModuleCode ) ) | ||||||||
391 | pModule = pBasic->FindModule( aModName ); | ||||||||
392 | } | ||||||||
393 | else | ||||||||
394 | pModule = pBasic->GetModules().front().get(); | ||||||||
395 | } | ||||||||
396 | DBG_ASSERT( pModule, "No Module!" )do { if (true && (!(pModule))) { sal_detail_logFormat ((SAL_DETAIL_LOG_LEVEL_WARN), ("legacy.tools"), ("/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" ":" "396" ": "), "%s", "No Module!"); } } while (false); | ||||||||
397 | if ( pModule && !pModule->GetMethods()->Find( rInfo.GetMethod(), SbxClassType::Method ) ) | ||||||||
398 | CreateMacro( pModule, rInfo.GetMethod() ); | ||||||||
399 | } | ||||||||
400 | SfxViewFrame* pViewFrame = GetViewFrame(); | ||||||||
401 | if ( pViewFrame ) | ||||||||
402 | pViewFrame->ToTop(); | ||||||||
403 | VclPtr<ModulWindow> pWin = FindBasWin( aDocument, aLibName, rInfo.GetModule(), true ); | ||||||||
404 | DBG_ASSERT( pWin, "Edit/Create Macro: Window was not created/found!" )do { if (true && (!(pWin))) { sal_detail_logFormat((SAL_DETAIL_LOG_LEVEL_WARN ), ("legacy.tools"), ("/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" ":" "404" ": "), "%s", "Edit/Create Macro: Window was not created/found!" ); } } while (false); | ||||||||
405 | SetCurWindow( pWin, true ); | ||||||||
406 | pWin->EditMacro( rInfo.GetMethod() ); | ||||||||
407 | } | ||||||||
408 | break; | ||||||||
409 | |||||||||
410 | case SID_BASICIDE_OBJCAT( (30000 + 768) + 6 ): | ||||||||
411 | // toggling object catalog | ||||||||
412 | aObjectCatalog->Show(!aObjectCatalog->IsVisible()); | ||||||||
413 | if (pLayout) | ||||||||
414 | pLayout->ArrangeWindows(); | ||||||||
415 | // refresh the button state | ||||||||
416 | if (SfxBindings* pBindings = GetBindingsPtr()) | ||||||||
417 | pBindings->Invalidate(SID_BASICIDE_OBJCAT( (30000 + 768) + 6 )); | ||||||||
418 | break; | ||||||||
419 | |||||||||
420 | case SID_BASICIDE_NAMECHANGEDONTAB( (30000 + 768) + 11 ): | ||||||||
421 | { | ||||||||
422 | DBG_ASSERT( rReq.GetArgs(), "arguments expected" )do { if (true && (!(rReq.GetArgs()))) { sal_detail_logFormat ((SAL_DETAIL_LOG_LEVEL_WARN), ("legacy.tools"), ("/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" ":" "422" ": "), "%s", "arguments expected"); } } while (false ); | ||||||||
423 | const SfxUInt16Item &rTabId = rReq.GetArgs()->Get(SID_BASICIDE_ARG_TABIDTypedWhichId<SfxUInt16Item>( (30000 + 768) + 30 ) ); | ||||||||
424 | const SfxStringItem &rModName = rReq.GetArgs()->Get(SID_BASICIDE_ARG_MODULENAMETypedWhichId<SfxStringItem>( (30000 + 768) + 35 ) ); | ||||||||
425 | if ( aWindowTable.find( rTabId.GetValue() ) != aWindowTable.end() ) | ||||||||
426 | { | ||||||||
427 | VclPtr<BaseWindow> pWin = aWindowTable[ rTabId.GetValue() ]; | ||||||||
428 | const OUString& aNewName( rModName.GetValue() ); | ||||||||
429 | OUString aOldName( pWin->GetName() ); | ||||||||
430 | if ( aNewName != aOldName ) | ||||||||
431 | { | ||||||||
432 | bool bRenameOk = false; | ||||||||
433 | if (ModulWindow* pModWin
| ||||||||
434 | { | ||||||||
435 | const OUString& aLibName = pModWin->GetLibName(); | ||||||||
436 | ScriptDocument aDocument( pWin->GetDocument() ); | ||||||||
437 | |||||||||
438 | if (RenameModule(pModWin->GetFrameWeld(), aDocument, aLibName, aOldName, aNewName)) | ||||||||
439 | { | ||||||||
440 | bRenameOk = true; | ||||||||
441 | // Because we listen for container events for script | ||||||||
442 | // modules, rename will delete the 'old' window | ||||||||
443 | // pWin has been invalidated, restore now | ||||||||
444 | pWin = FindBasWin( aDocument, aLibName, aNewName, true ); | ||||||||
445 | } | ||||||||
446 | |||||||||
447 | } | ||||||||
448 | else if (DialogWindow* pDlgWin = dynamic_cast<DialogWindow*>(pWin.get())) | ||||||||
449 | { | ||||||||
450 | bRenameOk = pDlgWin->RenameDialog( aNewName ); | ||||||||
451 | } | ||||||||
452 | if ( bRenameOk
| ||||||||
453 | { | ||||||||
454 | MarkDocumentModified( pWin->GetDocument() ); | ||||||||
455 | } | ||||||||
456 | else | ||||||||
457 | { | ||||||||
458 | // set old name in TabWriter | ||||||||
459 | sal_uInt16 nId = GetWindowId( pWin ); | ||||||||
460 | DBG_ASSERT( nId, "No entry in Tabbar!" )do { if (true && (!(nId))) { sal_detail_logFormat((SAL_DETAIL_LOG_LEVEL_WARN ), ("legacy.tools"), ("/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" ":" "460" ": "), "%s", "No entry in Tabbar!"); } } while (false ); | ||||||||
461 | if ( nId ) | ||||||||
462 | pTabBar->SetPageText( nId, aOldName ); | ||||||||
463 | } | ||||||||
464 | } | ||||||||
465 | |||||||||
466 | // set focus to current window | ||||||||
467 | pWin->GrabFocus(); | ||||||||
468 | } | ||||||||
469 | } | ||||||||
470 | break; | ||||||||
471 | case SID_BASICIDE_STOREMODULESOURCE( (30000 + 768) + 13 ): | ||||||||
472 | case SID_BASICIDE_UPDATEMODULESOURCE( (30000 + 768) + 12 ): | ||||||||
473 | { | ||||||||
474 | DBG_ASSERT( rReq.GetArgs(), "arguments expected" )do { if (true && (!(rReq.GetArgs()))) { sal_detail_logFormat ((SAL_DETAIL_LOG_LEVEL_WARN), ("legacy.tools"), ("/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" ":" "474" ": "), "%s", "arguments expected"); } } while (false ); | ||||||||
475 | const SfxMacroInfoItem& rInfo = rReq.GetArgs()->Get(SID_BASICIDE_ARG_MACROINFOTypedWhichId<SfxMacroInfoItem>( (30000 + 768) + 32 ) ); | ||||||||
476 | BasicManager* pBasMgr = const_cast<BasicManager*>(rInfo.GetBasicManager()); | ||||||||
477 | DBG_ASSERT( pBasMgr, "Store source: No BasMgr?" )do { if (true && (!(pBasMgr))) { sal_detail_logFormat ((SAL_DETAIL_LOG_LEVEL_WARN), ("legacy.tools"), ("/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" ":" "477" ": "), "%s", "Store source: No BasMgr?"); } } while (false); | ||||||||
478 | ScriptDocument aDocument( ScriptDocument::getDocumentForBasicManager( pBasMgr ) ); | ||||||||
479 | VclPtr<ModulWindow> pWin = FindBasWin( aDocument, rInfo.GetLib(), rInfo.GetModule(), false, true ); | ||||||||
480 | if ( pWin ) | ||||||||
481 | { | ||||||||
482 | if ( rReq.GetSlot() == SID_BASICIDE_STOREMODULESOURCE( (30000 + 768) + 13 ) ) | ||||||||
483 | pWin->StoreData(); | ||||||||
484 | else | ||||||||
485 | pWin->UpdateData(); | ||||||||
486 | } | ||||||||
487 | } | ||||||||
488 | break; | ||||||||
489 | case SID_BASICIDE_STOREALLMODULESOURCES( (30000 + 768) + 16 ): | ||||||||
490 | case SID_BASICIDE_UPDATEALLMODULESOURCES( (30000 + 768) + 17 ): | ||||||||
491 | { | ||||||||
492 | for (auto const& window : aWindowTable) | ||||||||
493 | { | ||||||||
494 | BaseWindow* pWin = window.second; | ||||||||
495 | if (!pWin->IsSuspended() && dynamic_cast<ModulWindow*>(pWin)) | ||||||||
496 | { | ||||||||
497 | if ( rReq.GetSlot() == SID_BASICIDE_STOREALLMODULESOURCES( (30000 + 768) + 16 ) ) | ||||||||
498 | pWin->StoreData(); | ||||||||
499 | else | ||||||||
500 | pWin->UpdateData(); | ||||||||
501 | } | ||||||||
502 | } | ||||||||
503 | } | ||||||||
504 | break; | ||||||||
505 | case SID_BASICIDE_LIBSELECTED( (30000 + 768) + 18 ): | ||||||||
506 | case SID_BASICIDE_LIBREMOVED( (30000 + 768) + 28 ): | ||||||||
507 | case SID_BASICIDE_LIBLOADED( (30000 + 768) + 27 ): | ||||||||
508 | { | ||||||||
509 | DBG_ASSERT( rReq.GetArgs(), "arguments expected" )do { if (true && (!(rReq.GetArgs()))) { sal_detail_logFormat ((SAL_DETAIL_LOG_LEVEL_WARN), ("legacy.tools"), ("/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" ":" "509" ": "), "%s", "arguments expected"); } } while (false ); | ||||||||
510 | const SfxUnoAnyItem& rShellItem = rReq.GetArgs()->Get( SID_BASICIDE_ARG_DOCUMENT_MODELTypedWhichId<SfxUnoAnyItem>( (30000 + 768) + 51 ) ); | ||||||||
511 | uno::Reference< frame::XModel > xModel( rShellItem.GetValue(), UNO_QUERY ); | ||||||||
512 | ScriptDocument aDocument( xModel.is() ? ScriptDocument( xModel ) : ScriptDocument::getApplicationScriptDocument() ); | ||||||||
513 | const SfxStringItem& rLibNameItem = rReq.GetArgs()->Get( SID_BASICIDE_ARG_LIBNAMETypedWhichId<SfxStringItem>( (30000 + 768) + 34 ) ); | ||||||||
514 | const OUString& aLibName( rLibNameItem.GetValue() ); | ||||||||
515 | |||||||||
516 | if ( nSlot == SID_BASICIDE_LIBSELECTED( (30000 + 768) + 18 ) ) | ||||||||
517 | { | ||||||||
518 | // load module and dialog library (if not loaded) | ||||||||
519 | aDocument.loadLibraryIfExists( E_SCRIPTS, aLibName ); | ||||||||
520 | aDocument.loadLibraryIfExists( E_DIALOGS, aLibName ); | ||||||||
521 | |||||||||
522 | // check password, if library is password protected and not verified | ||||||||
523 | bool bOK = true; | ||||||||
524 | Reference< script::XLibraryContainer > xModLibContainer( aDocument.getLibraryContainer( E_SCRIPTS ) ); | ||||||||
525 | if ( xModLibContainer.is() && xModLibContainer->hasByName( aLibName ) ) | ||||||||
526 | { | ||||||||
527 | Reference< script::XLibraryContainerPassword > xPasswd( xModLibContainer, UNO_QUERY ); | ||||||||
528 | if ( xPasswd.is() && xPasswd->isLibraryPasswordProtected( aLibName ) && !xPasswd->isLibraryPasswordVerified( aLibName ) ) | ||||||||
529 | { | ||||||||
530 | OUString aPassword; | ||||||||
531 | bOK = QueryPassword(rReq.GetFrameWeld(), xModLibContainer, aLibName, aPassword); | ||||||||
532 | } | ||||||||
533 | } | ||||||||
534 | |||||||||
535 | if ( bOK ) | ||||||||
536 | { | ||||||||
537 | SetCurLib( aDocument, aLibName, true, false ); | ||||||||
538 | } | ||||||||
539 | else | ||||||||
540 | { | ||||||||
541 | // adjust old value... | ||||||||
542 | if (SfxBindings* pBindings = GetBindingsPtr()) | ||||||||
543 | pBindings->Invalidate(SID_BASICIDE_LIBSELECTOR( (30000 + 768) + 19 ), true); | ||||||||
544 | } | ||||||||
545 | } | ||||||||
546 | else if ( nSlot == SID_BASICIDE_LIBREMOVED( (30000 + 768) + 28 ) ) | ||||||||
547 | { | ||||||||
548 | if ( m_aCurLibName.isEmpty() || ( aDocument == m_aCurDocument && aLibName == m_aCurLibName ) ) | ||||||||
549 | { | ||||||||
550 | RemoveWindows( aDocument, aLibName ); | ||||||||
551 | if ( aDocument == m_aCurDocument && aLibName == m_aCurLibName ) | ||||||||
552 | { | ||||||||
553 | m_aCurDocument = ScriptDocument::getApplicationScriptDocument(); | ||||||||
554 | m_aCurLibName.clear(); | ||||||||
555 | // no UpdateWindows! | ||||||||
556 | if (SfxBindings* pBindings = GetBindingsPtr()) | ||||||||
557 | pBindings->Invalidate( SID_BASICIDE_LIBSELECTOR( (30000 + 768) + 19 ) ); | ||||||||
558 | } | ||||||||
559 | } | ||||||||
560 | } | ||||||||
561 | else // Loaded... | ||||||||
562 | UpdateWindows(); | ||||||||
563 | } | ||||||||
564 | break; | ||||||||
565 | case SID_BASICIDE_NEWMODULE( (30000 + 768) + 21 ): | ||||||||
566 | { | ||||||||
567 | VclPtr<ModulWindow> pWin = CreateBasWin( m_aCurDocument, m_aCurLibName, OUString() ); | ||||||||
568 | DBG_ASSERT( pWin, "New Module: Could not create window!" )do { if (true && (!(pWin))) { sal_detail_logFormat((SAL_DETAIL_LOG_LEVEL_WARN ), ("legacy.tools"), ("/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" ":" "568" ": "), "%s", "New Module: Could not create window!" ); } } while (false); | ||||||||
569 | SetCurWindow( pWin, true ); | ||||||||
570 | } | ||||||||
571 | break; | ||||||||
572 | case SID_BASICIDE_NEWDIALOG( (30000 + 768) + 20 ): | ||||||||
573 | { | ||||||||
574 | VclPtr<DialogWindow> pWin = CreateDlgWin( m_aCurDocument, m_aCurLibName, OUString() ); | ||||||||
575 | DBG_ASSERT( pWin, "New Module: Could not create window!" )do { if (true && (!(pWin))) { sal_detail_logFormat((SAL_DETAIL_LOG_LEVEL_WARN ), ("legacy.tools"), ("/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" ":" "575" ": "), "%s", "New Module: Could not create window!" ); } } while (false); | ||||||||
576 | SetCurWindow( pWin, true ); | ||||||||
577 | } | ||||||||
578 | break; | ||||||||
579 | case SID_BASICIDE_SBXRENAMED( (30000 + 768) + 26 ): | ||||||||
580 | { | ||||||||
581 | DBG_ASSERT( rReq.GetArgs(), "arguments expected" )do { if (true && (!(rReq.GetArgs()))) { sal_detail_logFormat ((SAL_DETAIL_LOG_LEVEL_WARN), ("legacy.tools"), ("/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" ":" "581" ": "), "%s", "arguments expected"); } } while (false ); | ||||||||
582 | } | ||||||||
583 | break; | ||||||||
584 | case SID_BASICIDE_SBXINSERTED( (30000 + 768) + 25 ): | ||||||||
585 | { | ||||||||
586 | DBG_ASSERT( rReq.GetArgs(), "arguments expected" )do { if (true && (!(rReq.GetArgs()))) { sal_detail_logFormat ((SAL_DETAIL_LOG_LEVEL_WARN), ("legacy.tools"), ("/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" ":" "586" ": "), "%s", "arguments expected"); } } while (false ); | ||||||||
587 | const SbxItem& rSbxItem = rReq.GetArgs()->Get(SID_BASICIDE_ARG_SBXTypedWhichId<SbxItem>( (30000 + 768) + 31 ) ); | ||||||||
588 | const ScriptDocument& aDocument( rSbxItem.GetDocument() ); | ||||||||
589 | const OUString& aLibName( rSbxItem.GetLibName() ); | ||||||||
590 | const OUString& aName( rSbxItem.GetName() ); | ||||||||
591 | if ( m_aCurLibName.isEmpty() || ( aDocument == m_aCurDocument && aLibName == m_aCurLibName ) ) | ||||||||
592 | { | ||||||||
593 | if ( rSbxItem.GetType() == TYPE_MODULE ) | ||||||||
594 | FindBasWin( aDocument, aLibName, aName, true ); | ||||||||
595 | else if ( rSbxItem.GetType() == TYPE_DIALOG ) | ||||||||
596 | FindDlgWin( aDocument, aLibName, aName, true ); | ||||||||
597 | } | ||||||||
598 | } | ||||||||
599 | break; | ||||||||
600 | case SID_BASICIDE_SBXDELETED( (30000 + 768) + 24 ): | ||||||||
601 | { | ||||||||
602 | DBG_ASSERT( rReq.GetArgs(), "arguments expected" )do { if (true && (!(rReq.GetArgs()))) { sal_detail_logFormat ((SAL_DETAIL_LOG_LEVEL_WARN), ("legacy.tools"), ("/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" ":" "602" ": "), "%s", "arguments expected"); } } while (false ); | ||||||||
603 | const SbxItem& rSbxItem = rReq.GetArgs()->Get(SID_BASICIDE_ARG_SBXTypedWhichId<SbxItem>( (30000 + 768) + 31 ) ); | ||||||||
604 | const ScriptDocument& aDocument( rSbxItem.GetDocument() ); | ||||||||
605 | VclPtr<BaseWindow> pWin = FindWindow( aDocument, rSbxItem.GetLibName(), rSbxItem.GetName(), rSbxItem.GetType(), true ); | ||||||||
606 | if ( pWin ) | ||||||||
607 | RemoveWindow( pWin, true ); | ||||||||
608 | } | ||||||||
609 | break; | ||||||||
610 | case SID_BASICIDE_SHOWSBX( (30000 + 768) + 9 ): | ||||||||
611 | { | ||||||||
612 | DBG_ASSERT( rReq.GetArgs(), "arguments expected" )do { if (true && (!(rReq.GetArgs()))) { sal_detail_logFormat ((SAL_DETAIL_LOG_LEVEL_WARN), ("legacy.tools"), ("/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" ":" "612" ": "), "%s", "arguments expected"); } } while (false ); | ||||||||
613 | const SbxItem& rSbxItem = rReq.GetArgs()->Get(SID_BASICIDE_ARG_SBXTypedWhichId<SbxItem>( (30000 + 768) + 31 ) ); | ||||||||
614 | const ScriptDocument& aDocument( rSbxItem.GetDocument() ); | ||||||||
615 | const OUString& aLibName( rSbxItem.GetLibName() ); | ||||||||
616 | const OUString& aName( rSbxItem.GetName() ); | ||||||||
617 | SetCurLib( aDocument, aLibName ); | ||||||||
618 | BaseWindow* pWin = nullptr; | ||||||||
619 | if ( rSbxItem.GetType() == TYPE_DIALOG ) | ||||||||
620 | { | ||||||||
621 | pWin = FindDlgWin( aDocument, aLibName, aName, true ); | ||||||||
622 | } | ||||||||
623 | else if ( rSbxItem.GetType() == TYPE_MODULE ) | ||||||||
624 | { | ||||||||
625 | pWin = FindBasWin( aDocument, aLibName, aName, true ); | ||||||||
626 | } | ||||||||
627 | else if ( rSbxItem.GetType() == TYPE_METHOD ) | ||||||||
628 | { | ||||||||
629 | pWin = FindBasWin( aDocument, aLibName, aName, true ); | ||||||||
630 | static_cast<ModulWindow*>(pWin)->EditMacro( rSbxItem.GetMethodName() ); | ||||||||
631 | } | ||||||||
632 | DBG_ASSERT( pWin, "Window was not created!" )do { if (true && (!(pWin))) { sal_detail_logFormat((SAL_DETAIL_LOG_LEVEL_WARN ), ("legacy.tools"), ("/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" ":" "632" ": "), "%s", "Window was not created!"); } } while (false); | ||||||||
633 | SetCurWindow( pWin, true ); | ||||||||
634 | pTabBar->MakeVisible( pTabBar->GetCurPageId() ); | ||||||||
635 | } | ||||||||
636 | break; | ||||||||
637 | case SID_BASICIDE_SHOWWINDOW( (30000 + 768) + 44 ): | ||||||||
638 | { | ||||||||
639 | std::unique_ptr< ScriptDocument > pDocument; | ||||||||
640 | |||||||||
641 | const SfxStringItem* pDocumentItem = rReq.GetArg<SfxStringItem>(SID_BASICIDE_ARG_DOCUMENTTypedWhichId<SfxUnoAnyItem>( (30000 + 768) + 45 )); | ||||||||
642 | if ( pDocumentItem ) | ||||||||
643 | { | ||||||||
644 | const OUString& sDocumentCaption = pDocumentItem->GetValue(); | ||||||||
645 | if ( !sDocumentCaption.isEmpty() ) | ||||||||
646 | pDocument.reset( new ScriptDocument( ScriptDocument::getDocumentWithURLOrCaption( sDocumentCaption ) ) ); | ||||||||
647 | } | ||||||||
648 | |||||||||
649 | const SfxUnoAnyItem* pDocModelItem = rReq.GetArg<SfxUnoAnyItem>(SID_BASICIDE_ARG_DOCUMENT_MODELTypedWhichId<SfxUnoAnyItem>( (30000 + 768) + 51 )); | ||||||||
650 | if (!pDocument && pDocModelItem) | ||||||||
651 | { | ||||||||
652 | uno::Reference< frame::XModel > xModel( pDocModelItem->GetValue(), UNO_QUERY ); | ||||||||
653 | if ( xModel.is() ) | ||||||||
654 | pDocument.reset( new ScriptDocument( xModel ) ); | ||||||||
655 | } | ||||||||
656 | |||||||||
657 | if (!pDocument) | ||||||||
658 | break; | ||||||||
659 | |||||||||
660 | const SfxStringItem* pLibNameItem = rReq.GetArg<SfxStringItem>(SID_BASICIDE_ARG_LIBNAMETypedWhichId<SfxStringItem>( (30000 + 768) + 34 )); | ||||||||
661 | if ( !pLibNameItem ) | ||||||||
662 | break; | ||||||||
663 | |||||||||
664 | OUString aLibName( pLibNameItem->GetValue() ); | ||||||||
665 | pDocument->loadLibraryIfExists( E_SCRIPTS, aLibName ); | ||||||||
666 | SetCurLib( *pDocument, aLibName ); | ||||||||
667 | const SfxStringItem* pNameItem = rReq.GetArg<SfxStringItem>(SID_BASICIDE_ARG_NAME( (30000 + 768) + 46 )); | ||||||||
668 | if ( pNameItem ) | ||||||||
669 | { | ||||||||
670 | const OUString& aName( pNameItem->GetValue() ); | ||||||||
671 | OUString aModType( "Module" ); | ||||||||
672 | OUString aType( aModType ); | ||||||||
673 | const SfxStringItem* pTypeItem = rReq.GetArg<SfxStringItem>(SID_BASICIDE_ARG_TYPE( (30000 + 768) + 47 )); | ||||||||
674 | if ( pTypeItem ) | ||||||||
675 | aType = pTypeItem->GetValue(); | ||||||||
676 | |||||||||
677 | BaseWindow* pWin = nullptr; | ||||||||
678 | if ( aType == aModType ) | ||||||||
679 | pWin = FindBasWin( *pDocument, aLibName, aName ); | ||||||||
680 | else if ( aType == "Dialog" ) | ||||||||
681 | pWin = FindDlgWin( *pDocument, aLibName, aName ); | ||||||||
682 | |||||||||
683 | if ( pWin ) | ||||||||
684 | { | ||||||||
685 | SetCurWindow( pWin, true ); | ||||||||
686 | if ( pTabBar ) | ||||||||
687 | pTabBar->MakeVisible( pTabBar->GetCurPageId() ); | ||||||||
688 | |||||||||
689 | if (ModulWindow* pModWin = dynamic_cast<ModulWindow*>(pWin)) | ||||||||
690 | { | ||||||||
691 | const SfxUInt32Item* pLineItem = rReq.GetArg<SfxUInt32Item>(SID_BASICIDE_ARG_LINE( (30000 + 768) + 48 )); | ||||||||
692 | if ( pLineItem ) | ||||||||
693 | { | ||||||||
694 | pModWin->AssertValidEditEngine(); | ||||||||
695 | TextView* pTextView = pModWin->GetEditView(); | ||||||||
696 | if ( pTextView ) | ||||||||
697 | { | ||||||||
698 | TextEngine* pTextEngine = pTextView->GetTextEngine(); | ||||||||
699 | if ( pTextEngine ) | ||||||||
700 | { | ||||||||
701 | sal_uInt32 nLine = pLineItem->GetValue(); | ||||||||
702 | sal_uInt32 nLineCount = 0; | ||||||||
703 | for ( sal_uInt32 i = 0, nCount = pTextEngine->GetParagraphCount(); i < nCount; ++i ) | ||||||||
704 | nLineCount += pTextEngine->GetLineCount( i ); | ||||||||
705 | if ( nLine > nLineCount ) | ||||||||
706 | nLine = nLineCount; | ||||||||
707 | if ( nLine > 0 ) | ||||||||
708 | --nLine; | ||||||||
709 | |||||||||
710 | // scroll window and set selection | ||||||||
711 | long nVisHeight = pModWin->GetOutputSizePixel().Height(); | ||||||||
712 | long nTextHeight = pTextEngine->GetTextHeight(); | ||||||||
713 | if ( nTextHeight > nVisHeight ) | ||||||||
714 | { | ||||||||
715 | long nMaxY = nTextHeight - nVisHeight; | ||||||||
716 | long nOldY = pTextView->GetStartDocPos().Y(); | ||||||||
717 | long nNewY = nLine * pTextEngine->GetCharHeight() - nVisHeight / 2; | ||||||||
718 | nNewY = std::min( nNewY, nMaxY ); | ||||||||
719 | pTextView->Scroll( 0, -( nNewY - nOldY ) ); | ||||||||
720 | pTextView->ShowCursor( false ); | ||||||||
721 | pModWin->GetEditVScrollBar().SetThumbPos( pTextView->GetStartDocPos().Y() ); | ||||||||
722 | } | ||||||||
723 | sal_uInt16 nCol1 = 0, nCol2 = 0; | ||||||||
724 | const SfxUInt16Item* pCol1Item = rReq.GetArg<SfxUInt16Item>(SID_BASICIDE_ARG_COLUMN1( (30000 + 768) + 49 )); | ||||||||
725 | if ( pCol1Item ) | ||||||||
726 | { | ||||||||
727 | nCol1 = pCol1Item->GetValue(); | ||||||||
728 | if ( nCol1 > 0 ) | ||||||||
729 | --nCol1; | ||||||||
730 | nCol2 = nCol1; | ||||||||
731 | } | ||||||||
732 | const SfxUInt16Item* pCol2Item = rReq.GetArg<SfxUInt16Item>(SID_BASICIDE_ARG_COLUMN2( (30000 + 768) + 50 )); | ||||||||
733 | if ( pCol2Item ) | ||||||||
734 | { | ||||||||
735 | nCol2 = pCol2Item->GetValue(); | ||||||||
736 | if ( nCol2 > 0 ) | ||||||||
737 | --nCol2; | ||||||||
738 | } | ||||||||
739 | TextSelection aSel( TextPaM( nLine, nCol1 ), TextPaM( nLine, nCol2 ) ); | ||||||||
740 | pTextView->SetSelection( aSel ); | ||||||||
741 | pTextView->ShowCursor(); | ||||||||
742 | vcl::Window* pWindow_ = pTextView->GetWindow(); | ||||||||
743 | if ( pWindow_ ) | ||||||||
744 | pWindow_->GrabFocus(); | ||||||||
745 | } | ||||||||
746 | } | ||||||||
747 | } | ||||||||
748 | } | ||||||||
749 | } | ||||||||
750 | } | ||||||||
751 | rReq.Done(); | ||||||||
752 | } | ||||||||
753 | break; | ||||||||
754 | |||||||||
755 | case SID_BASICIDE_MANAGE_LANG( (30000 + 768) + 52 ): | ||||||||
756 | { | ||||||||
757 | auto pRequest = std::make_shared<SfxRequest>(rReq); | ||||||||
758 | rReq.Ignore(); // the 'old' request is not relevant any more | ||||||||
759 | auto xDlg = std::make_shared<ManageLanguageDialog>(pCurWin ? pCurWin->GetFrameWeld() : nullptr, m_pCurLocalizationMgr); | ||||||||
760 | weld::DialogController::runAsync(xDlg, [=](sal_Int32 /*nResult*/){ | ||||||||
761 | pRequest->Done(); | ||||||||
762 | }); | ||||||||
763 | } | ||||||||
764 | break; | ||||||||
765 | |||||||||
766 | default: | ||||||||
767 | if (pLayout) | ||||||||
768 | pLayout->ExecuteGlobal(rReq); | ||||||||
769 | if (pCurWin) | ||||||||
770 | pCurWin->ExecuteGlobal(rReq); | ||||||||
771 | break; | ||||||||
772 | } | ||||||||
773 | } | ||||||||
774 | |||||||||
775 | void Shell::GetState(SfxItemSet &rSet) | ||||||||
776 | { | ||||||||
777 | SfxWhichIter aIter(rSet); | ||||||||
778 | for ( sal_uInt16 nWh = aIter.FirstWhich(); nWh != 0; nWh = aIter.NextWhich() ) | ||||||||
779 | { | ||||||||
780 | switch ( nWh ) | ||||||||
781 | { | ||||||||
782 | case SID_NEWDOCDIRECT(5000 + 537): | ||||||||
783 | { | ||||||||
784 | // we do not have a new document factory, | ||||||||
785 | // so just forward to a fallback method. | ||||||||
786 | SfxGetpApp()->GetSlotState(nWh, nullptr, &rSet); | ||||||||
787 | } | ||||||||
788 | break; | ||||||||
789 | case SID_DOCINFOTypedWhichId<SfxDocumentInfoItem>(5000 + 535): | ||||||||
790 | { | ||||||||
791 | rSet.DisableItem( nWh ); | ||||||||
792 | } | ||||||||
793 | break; | ||||||||
794 | case SID_SAVEDOC(5000 + 505): | ||||||||
795 | { | ||||||||
796 | bool bDisable = false; | ||||||||
797 | |||||||||
798 | if ( pCurWin ) | ||||||||
799 | { | ||||||||
800 | if ( !pCurWin->IsModified() ) | ||||||||
801 | { | ||||||||
802 | ScriptDocument aDocument( pCurWin->GetDocument() ); | ||||||||
803 | bDisable = ( !aDocument.isAlive() ) | ||||||||
804 | || ( aDocument.isDocument() ? !aDocument.isDocumentModified() : !IsAppBasicModified() ); | ||||||||
805 | } | ||||||||
806 | } | ||||||||
807 | else | ||||||||
808 | { | ||||||||
809 | bDisable = true; | ||||||||
810 | } | ||||||||
811 | |||||||||
812 | if ( bDisable ) | ||||||||
813 | rSet.DisableItem( nWh ); | ||||||||
814 | } | ||||||||
815 | break; | ||||||||
816 | case SID_NEWWINDOW(5000 + 620): | ||||||||
817 | case SID_SAVEASDOC(5000 + 502): | ||||||||
818 | { | ||||||||
819 | rSet.DisableItem( nWh ); | ||||||||
820 | } | ||||||||
821 | break; | ||||||||
822 | case SID_SIGNATURE(5000 + 1643): | ||||||||
823 | { | ||||||||
824 | SignatureState nState = SignatureState::NOSIGNATURES; | ||||||||
825 | if ( pCurWin ) | ||||||||
826 | { | ||||||||
827 | DocumentSignature aSignature( pCurWin->GetDocument() ); | ||||||||
828 | nState = aSignature.getScriptingSignatureState(); | ||||||||
829 | } | ||||||||
830 | rSet.Put( SfxUInt16Item( SID_SIGNATURE(5000 + 1643), static_cast<sal_uInt16>(nState) ) ); | ||||||||
831 | } | ||||||||
832 | break; | ||||||||
833 | case SID_BASICIDE_MODULEDLG( (30000 + 768) + 5 ): | ||||||||
834 | { | ||||||||
835 | if ( StarBASIC::IsRunning() ) | ||||||||
836 | rSet.DisableItem( nWh ); | ||||||||
837 | } | ||||||||
838 | break; | ||||||||
839 | case SID_BASICIDE_OBJCAT( (30000 + 768) + 6 ): | ||||||||
840 | if (pLayout) | ||||||||
841 | rSet.Put(SfxBoolItem(nWh, aObjectCatalog->IsVisible())); | ||||||||
842 | else | ||||||||
843 | rSet.Put(SfxVisibilityItem(nWh, false)); | ||||||||
844 | break; | ||||||||
845 | case SID_BASICIDE_SHOWSBX( (30000 + 768) + 9 ): | ||||||||
846 | case SID_BASICIDE_CREATEMACRO( (30000 + 768) + 4 ): | ||||||||
847 | case SID_BASICIDE_EDITMACRO( (30000 + 768) + 3 ): | ||||||||
848 | case SID_BASICIDE_NAMECHANGEDONTAB( (30000 + 768) + 11 ): | ||||||||
849 | { | ||||||||
850 | ; | ||||||||
851 | } | ||||||||
852 | break; | ||||||||
853 | |||||||||
854 | case SID_BASICIDE_ADDWATCH( (30000 + 768) + 1 ): | ||||||||
855 | case SID_BASICIDE_REMOVEWATCH( (30000 + 768) + 7 ): | ||||||||
856 | case SID_BASICLOAD(5000 + 951): | ||||||||
857 | case SID_BASICSAVEAS(5000 + 953): | ||||||||
858 | case SID_BASICIDE_MATCHGROUP( (30000 + 768) + 14 ): | ||||||||
859 | { | ||||||||
860 | if (!dynamic_cast<ModulWindow*>(pCurWin.get())) | ||||||||
861 | rSet.DisableItem( nWh ); | ||||||||
862 | else if ( ( nWh == SID_BASICLOAD(5000 + 951) ) && ( StarBASIC::IsRunning() || ( pCurWin && pCurWin->IsReadOnly() ) ) ) | ||||||||
863 | rSet.DisableItem( nWh ); | ||||||||
864 | } | ||||||||
865 | break; | ||||||||
866 | case SID_BASICRUN(5000 + 955): | ||||||||
867 | case SID_BASICSTEPINTO(5000 + 956): | ||||||||
868 | case SID_BASICSTEPOVER(5000 + 957): | ||||||||
869 | case SID_BASICSTEPOUT(5000 + 963): | ||||||||
870 | case SID_BASICIDE_TOGGLEBRKPNT( (30000 + 768) + 0 ): | ||||||||
871 | case SID_BASICIDE_MANAGEBRKPNTS( (30000 + 768) + 42 ): | ||||||||
872 | { | ||||||||
873 | if (ModulWindow* pMCurWin = dynamic_cast<ModulWindow*>(pCurWin.get())) | ||||||||
874 | { | ||||||||
875 | if (StarBASIC::IsRunning() && !pMCurWin->GetBasicStatus().bIsInReschedule) | ||||||||
876 | rSet.DisableItem(nWh); | ||||||||
877 | } | ||||||||
878 | else | ||||||||
879 | rSet.DisableItem( nWh ); | ||||||||
880 | } | ||||||||
881 | break; | ||||||||
882 | case SID_BASICCOMPILE(5000 + 954): | ||||||||
883 | { | ||||||||
884 | if (StarBASIC::IsRunning() || !dynamic_cast<ModulWindow*>(pCurWin.get())) | ||||||||
885 | rSet.DisableItem( nWh ); | ||||||||
886 | } | ||||||||
887 | break; | ||||||||
888 | case SID_BASICSTOP(5000 + 958): | ||||||||
889 | { | ||||||||
890 | // stop is always possible when some Basic is running... | ||||||||
891 | if (!StarBASIC::IsRunning()) | ||||||||
892 | rSet.DisableItem( nWh ); | ||||||||
893 | } | ||||||||
894 | break; | ||||||||
895 | case SID_CHOOSE_CONTROLS( 10000 + 144 ): | ||||||||
896 | case SID_DIALOG_TESTMODE( 10000 + 200 ): | ||||||||
897 | case SID_INSERT_SELECT( 10000 + 199 ): | ||||||||
898 | case SID_INSERT_PUSHBUTTON( 10000 + 146 ): | ||||||||
899 | case SID_INSERT_RADIOBUTTON( 10000 + 147 ): | ||||||||
900 | case SID_INSERT_CHECKBOX( 10000 + 148 ): | ||||||||
901 | case SID_INSERT_LISTBOX( 10000 + 192 ): | ||||||||
902 | case SID_INSERT_COMBOBOX( 10000 + 193 ): | ||||||||
903 | case SID_INSERT_GROUPBOX( 10000 + 190 ): | ||||||||
904 | case SID_INSERT_EDIT( 10000 + 191 ): | ||||||||
905 | case SID_INSERT_FIXEDTEXT( 10000 + 189 ): | ||||||||
906 | case SID_INSERT_IMAGECONTROL( 10000 + 926 ): | ||||||||
907 | case SID_INSERT_PROGRESSBAR( 10000 + 927 ): | ||||||||
908 | case SID_INSERT_HSCROLLBAR( 10000 + 195 ): | ||||||||
909 | case SID_INSERT_VSCROLLBAR( 10000 + 196 ): | ||||||||
910 | case SID_INSERT_HFIXEDLINE( 10000 + 928 ): | ||||||||
911 | case SID_INSERT_VFIXEDLINE( 10000 + 929 ): | ||||||||
912 | case SID_INSERT_DATEFIELD( 10000 + 936 ): | ||||||||
913 | case SID_INSERT_TIMEFIELD( 10000 + 937 ): | ||||||||
914 | case SID_INSERT_NUMERICFIELD( 10000 + 938 ): | ||||||||
915 | case SID_INSERT_CURRENCYFIELD( 10000 + 939 ): | ||||||||
916 | case SID_INSERT_FORMATTEDFIELD( 10000 + 940 ): | ||||||||
917 | case SID_INSERT_PATTERNFIELD( 10000 + 941 ): | ||||||||
918 | case SID_INSERT_FILECONTROL( 10000 + 942 ): | ||||||||
919 | case SID_INSERT_SPINBUTTON( 10000 + 194 ): | ||||||||
920 | case SID_INSERT_GRIDCONTROL( 10000 + 753 ): | ||||||||
921 | case SID_INSERT_HYPERLINKCONTROL( 10000 + 1037 ): | ||||||||
922 | case SID_INSERT_TREECONTROL( 10000 + 1063 ): | ||||||||
923 | case SID_INSERT_FORM_RADIO( 10000 + 1106 ): | ||||||||
924 | case SID_INSERT_FORM_CHECK( 10000 + 1107 ): | ||||||||
925 | case SID_INSERT_FORM_LIST( 10000 + 1108 ): | ||||||||
926 | case SID_INSERT_FORM_COMBO( 10000 + 1109 ): | ||||||||
927 | case SID_INSERT_FORM_VSCROLL( 10000 + 1111 ): | ||||||||
928 | case SID_INSERT_FORM_HSCROLL( 10000 + 1112 ): | ||||||||
929 | case SID_INSERT_FORM_SPIN( 10000 + 1110 ): | ||||||||
930 | { | ||||||||
931 | if (!dynamic_cast<DialogWindow*>(pCurWin.get())) | ||||||||
932 | rSet.DisableItem( nWh ); | ||||||||
933 | } | ||||||||
934 | break; | ||||||||
935 | case SID_SEARCH_OPTIONS(10000 + 281): | ||||||||
936 | { | ||||||||
937 | SearchOptionFlags nOptions = SearchOptionFlags::NONE; | ||||||||
938 | if( pCurWin ) | ||||||||
939 | nOptions = pCurWin->GetSearchOptions(); | ||||||||
940 | rSet.Put( SfxUInt16Item( SID_SEARCH_OPTIONS(10000 + 281), static_cast<sal_uInt16>(nOptions) ) ); | ||||||||
941 | } | ||||||||
942 | break; | ||||||||
943 | case SID_BASICIDE_LIBSELECTOR( (30000 + 768) + 19 ): | ||||||||
944 | { | ||||||||
945 | OUString aName; | ||||||||
946 | if ( !m_aCurLibName.isEmpty() ) | ||||||||
947 | { | ||||||||
948 | LibraryLocation eLocation = m_aCurDocument.getLibraryLocation( m_aCurLibName ); | ||||||||
949 | aName = CreateMgrAndLibStr( m_aCurDocument.getTitle( eLocation ), m_aCurLibName ); | ||||||||
950 | } | ||||||||
951 | SfxStringItem aItem( SID_BASICIDE_LIBSELECTOR( (30000 + 768) + 19 ), aName ); | ||||||||
952 | rSet.Put( aItem ); | ||||||||
953 | } | ||||||||
954 | break; | ||||||||
955 | case SID_SEARCH_ITEMTypedWhichId<SvxSearchItem>(10000 + 291): | ||||||||
956 | { | ||||||||
957 | if ( !mpSearchItem ) | ||||||||
958 | { | ||||||||
959 | mpSearchItem.reset( new SvxSearchItem( SID_SEARCH_ITEMTypedWhichId<SvxSearchItem>(10000 + 291) )); | ||||||||
960 | mpSearchItem->SetSearchString( GetSelectionText( true )); | ||||||||
961 | } | ||||||||
962 | |||||||||
963 | if ( mbJustOpened && HasSelection() ) | ||||||||
964 | { | ||||||||
965 | OUString aText = GetSelectionText( true ); | ||||||||
966 | |||||||||
967 | if ( !aText.isEmpty() ) | ||||||||
968 | { | ||||||||
969 | mpSearchItem->SetSearchString( aText ); | ||||||||
970 | mpSearchItem->SetSelection( false ); | ||||||||
971 | } | ||||||||
972 | else | ||||||||
973 | mpSearchItem->SetSelection( true ); | ||||||||
974 | } | ||||||||
975 | |||||||||
976 | mbJustOpened = false; | ||||||||
977 | rSet.Put( *mpSearchItem ); | ||||||||
978 | } | ||||||||
979 | break; | ||||||||
980 | case SID_BASICIDE_STAT_DATE( (30000 + 768) + 39 ): | ||||||||
981 | { | ||||||||
982 | SfxStringItem aItem( SID_BASICIDE_STAT_DATE( (30000 + 768) + 39 ), "Datum?!" ); | ||||||||
983 | rSet.Put( aItem ); | ||||||||
984 | } | ||||||||
985 | break; | ||||||||
986 | case SID_DOC_MODIFIED(5000 + 584): | ||||||||
987 | { | ||||||||
988 | bool bModified = false; | ||||||||
989 | |||||||||
990 | if ( pCurWin ) | ||||||||
991 | { | ||||||||
992 | if ( pCurWin->IsModified() ) | ||||||||
993 | bModified = true; | ||||||||
994 | else | ||||||||
995 | { | ||||||||
996 | ScriptDocument aDocument( pCurWin->GetDocument() ); | ||||||||
997 | bModified = aDocument.isDocument() ? aDocument.isDocumentModified() : IsAppBasicModified(); | ||||||||
998 | } | ||||||||
999 | } | ||||||||
1000 | |||||||||
1001 | SfxBoolItem aItem(SID_DOC_MODIFIED(5000 + 584), bModified); | ||||||||
1002 | rSet.Put( aItem ); | ||||||||
1003 | } | ||||||||
1004 | break; | ||||||||
1005 | case SID_BASICIDE_STAT_TITLE( (30000 + 768) + 40 ): | ||||||||
1006 | { | ||||||||
1007 | if ( pCurWin ) | ||||||||
1008 | { | ||||||||
1009 | OUString aTitle = pCurWin->CreateQualifiedName(); | ||||||||
1010 | SfxStringItem aItem( SID_BASICIDE_STAT_TITLE( (30000 + 768) + 40 ), aTitle ); | ||||||||
1011 | rSet.Put( aItem ); | ||||||||
1012 | } | ||||||||
1013 | } | ||||||||
1014 | break; | ||||||||
1015 | // are interpreted by the controller: | ||||||||
1016 | case SID_ATTR_SIZETypedWhichId<SvxSizeItem>( 10000 + 224 ): | ||||||||
1017 | case SID_ATTR_INSERTTypedWhichId<SfxBoolItem>( 10000 + 221 ): | ||||||||
1018 | break; | ||||||||
1019 | case SID_UNDO(5000 + 701): | ||||||||
1020 | case SID_REDO(5000 + 700): | ||||||||
1021 | { | ||||||||
1022 | if( GetUndoManager() ) // recursive GetState else | ||||||||
1023 | GetViewFrame()->GetSlotState( nWh, nullptr, &rSet ); | ||||||||
1024 | } | ||||||||
1025 | break; | ||||||||
1026 | case SID_BASICIDE_CURRENT_LANG( (30000 + 768) + 53 ): | ||||||||
1027 | { | ||||||||
1028 | if( (pCurWin && pCurWin->IsReadOnly()) || GetCurLibName().isEmpty() ) | ||||||||
1029 | rSet.DisableItem( nWh ); | ||||||||
1030 | else | ||||||||
1031 | { | ||||||||
1032 | OUString aItemStr; | ||||||||
1033 | std::shared_ptr<LocalizationMgr> pCurMgr(GetCurLocalizationMgr()); | ||||||||
1034 | if ( pCurMgr->isLibraryLocalized() ) | ||||||||
1035 | { | ||||||||
1036 | Sequence< lang::Locale > aLocaleSeq = pCurMgr->getStringResourceManager()->getLocales(); | ||||||||
1037 | const lang::Locale* pLocale = aLocaleSeq.getConstArray(); | ||||||||
1038 | sal_Int32 i, nCount = aLocaleSeq.getLength(); | ||||||||
1039 | |||||||||
1040 | // Force different results for any combination of locales and default locale | ||||||||
1041 | OUString aLangStr; | ||||||||
1042 | for ( i = 0; i <= nCount; ++i ) | ||||||||
1043 | { | ||||||||
1044 | lang::Locale aLocale; | ||||||||
1045 | if( i < nCount ) | ||||||||
1046 | aLocale = pLocale[i]; | ||||||||
1047 | else | ||||||||
1048 | aLocale = pCurMgr->getStringResourceManager()->getDefaultLocale(); | ||||||||
1049 | |||||||||
1050 | aLangStr += aLocale.Language + aLocale.Country + aLocale.Variant; | ||||||||
1051 | } | ||||||||
1052 | aItemStr = aLangStr; | ||||||||
1053 | } | ||||||||
1054 | rSet.Put( SfxStringItem( nWh, aItemStr ) ); | ||||||||
1055 | } | ||||||||
1056 | } | ||||||||
1057 | break; | ||||||||
1058 | |||||||||
1059 | case SID_BASICIDE_MANAGE_LANG( (30000 + 768) + 52 ): | ||||||||
1060 | { | ||||||||
1061 | if( (pCurWin && pCurWin->IsReadOnly()) || GetCurLibName().isEmpty() ) | ||||||||
1062 | rSet.DisableItem( nWh ); | ||||||||
1063 | } | ||||||||
1064 | break; | ||||||||
1065 | case SID_GOTOLINE(5000 + 1724): | ||||||||
1066 | { | ||||||||
1067 | // if this is not a module window hide the | ||||||||
1068 | // setting, doesn't make sense for example if the | ||||||||
1069 | // dialog editor is open | ||||||||
1070 | if (pCurWin && !dynamic_cast<ModulWindow*>(pCurWin.get())) | ||||||||
1071 | { | ||||||||
1072 | rSet.DisableItem( nWh ); | ||||||||
1073 | rSet.Put(SfxVisibilityItem(nWh, false)); | ||||||||
1074 | } | ||||||||
1075 | break; | ||||||||
1076 | } | ||||||||
1077 | case SID_BASICIDE_HIDECURPAGE( (30000 + 768) + 10 ): | ||||||||
1078 | { | ||||||||
1079 | if (pTabBar->GetPageCount() == 0) | ||||||||
1080 | rSet.DisableItem(nWh); | ||||||||
1081 | } | ||||||||
1082 | break; | ||||||||
1083 | case SID_BASICIDE_DELETECURRENT( (30000 + 768) + 22 ): | ||||||||
1084 | case SID_BASICIDE_RENAMECURRENT( (30000 + 768) + 23 ): | ||||||||
1085 | { | ||||||||
1086 | if (pTabBar->GetPageCount() == 0 || StarBASIC::IsRunning()) | ||||||||
1087 | rSet.DisableItem(nWh); | ||||||||
1088 | else if (m_aCurDocument.isInVBAMode()) | ||||||||
1089 | { | ||||||||
1090 | // disable to delete or rename object modules in IDE | ||||||||
1091 | BasicManager* pBasMgr = m_aCurDocument.getBasicManager(); | ||||||||
1092 | StarBASIC* pBasic = pBasMgr ? pBasMgr->GetLib(m_aCurLibName) : nullptr; | ||||||||
1093 | if (pBasic && dynamic_cast<ModulWindow*>(pCurWin.get())) | ||||||||
1094 | { | ||||||||
1095 | SbModule* pActiveModule = pBasic->FindModule( pCurWin->GetName() ); | ||||||||
1096 | if ( pActiveModule && ( pActiveModule->GetModuleType() == script::ModuleType::DOCUMENT ) ) | ||||||||
1097 | rSet.DisableItem(nWh); | ||||||||
1098 | } | ||||||||
1099 | } | ||||||||
1100 | } | ||||||||
1101 | [[fallthrough]]; | ||||||||
1102 | |||||||||
1103 | case SID_BASICIDE_NEWMODULE( (30000 + 768) + 21 ): | ||||||||
1104 | case SID_BASICIDE_NEWDIALOG( (30000 + 768) + 20 ): | ||||||||
1105 | { | ||||||||
1106 | Reference< script::XLibraryContainer2 > xModLibContainer( m_aCurDocument.getLibraryContainer( E_SCRIPTS ), UNO_QUERY ); | ||||||||
1107 | Reference< script::XLibraryContainer2 > xDlgLibContainer( m_aCurDocument.getLibraryContainer( E_DIALOGS ), UNO_QUERY ); | ||||||||
1108 | if ( ( xModLibContainer.is() && xModLibContainer->hasByName( m_aCurLibName ) && xModLibContainer->isLibraryReadOnly( m_aCurLibName ) ) || | ||||||||
1109 | ( xDlgLibContainer.is() && xDlgLibContainer->hasByName( m_aCurLibName ) && xDlgLibContainer->isLibraryReadOnly( m_aCurLibName ) ) ) | ||||||||
1110 | rSet.DisableItem(nWh); | ||||||||
1111 | } | ||||||||
1112 | break; | ||||||||
1113 | default: | ||||||||
1114 | if (pLayout) | ||||||||
1115 | pLayout->GetState(rSet, nWh); | ||||||||
1116 | } | ||||||||
1117 | } | ||||||||
1118 | if ( pCurWin ) | ||||||||
1119 | pCurWin->GetState( rSet ); | ||||||||
1120 | } | ||||||||
1121 | |||||||||
1122 | bool Shell::HasUIFeature(SfxShellFeature nFeature) const | ||||||||
1123 | { | ||||||||
1124 | assert((nFeature & ~SfxShellFeature::BasicMask) == SfxShellFeature::NONE)(static_cast <bool> ((nFeature & ~SfxShellFeature:: BasicMask) == SfxShellFeature::NONE) ? void (0) : __assert_fail ("(nFeature & ~SfxShellFeature::BasicMask) == SfxShellFeature::NONE" , "/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" , 1124, __extension__ __PRETTY_FUNCTION__)); | ||||||||
1125 | bool bResult = false; | ||||||||
1126 | |||||||||
1127 | if (nFeature & SfxShellFeature::BasicShowBrowser) | ||||||||
1128 | { | ||||||||
1129 | // fade out (in) property browser in module (dialog) windows | ||||||||
1130 | if (dynamic_cast<DialogWindow*>(pCurWin.get()) && !pCurWin->IsReadOnly()) | ||||||||
1131 | bResult = true; | ||||||||
1132 | } | ||||||||
1133 | |||||||||
1134 | return bResult; | ||||||||
1135 | } | ||||||||
1136 | |||||||||
1137 | void Shell::SetCurWindow( BaseWindow* pNewWin, bool bUpdateTabBar, bool bRememberAsCurrent ) | ||||||||
1138 | { | ||||||||
1139 | if ( pNewWin == pCurWin ) | ||||||||
1140 | return; | ||||||||
1141 | |||||||||
1142 | pCurWin = pNewWin; | ||||||||
1143 | if (pLayout) | ||||||||
1144 | pLayout->Deactivating(); | ||||||||
1145 | if (pCurWin) | ||||||||
1146 | { | ||||||||
1147 | if (pCurWin->GetType() == TYPE_MODULE) | ||||||||
1148 | pLayout = pModulLayout.get(); | ||||||||
1149 | else | ||||||||
1150 | pLayout = pDialogLayout.get(); | ||||||||
1151 | AdjustPosSizePixel(Point(0, 0), GetViewFrame()->GetWindow().GetOutputSizePixel()); | ||||||||
1152 | pLayout->Activating(*pCurWin); | ||||||||
1153 | GetViewFrame()->GetWindow().SetHelpId(pCurWin->GetHid()); | ||||||||
1154 | if (bRememberAsCurrent) | ||||||||
1155 | pCurWin->InsertLibInfo(); | ||||||||
1156 | if (GetViewFrame()->GetWindow().IsVisible()) // SFX will do it later otherwise | ||||||||
1157 | pCurWin->Show(); | ||||||||
1158 | pCurWin->Init(); | ||||||||
1159 | if (!GetExtraData()->ShellInCriticalSection()) | ||||||||
1160 | { | ||||||||
1161 | vcl::Window* pFrameWindow = &GetViewFrame()->GetWindow(); | ||||||||
1162 | vcl::Window* pFocusWindow = Application::GetFocusWindow(); | ||||||||
1163 | while ( pFocusWindow && ( pFocusWindow != pFrameWindow ) ) | ||||||||
1164 | pFocusWindow = pFocusWindow->GetParent(); | ||||||||
1165 | if ( pFocusWindow ) // Focus in BasicIDE | ||||||||
1166 | pCurWin->GrabFocus(); | ||||||||
1167 | } | ||||||||
1168 | } | ||||||||
1169 | else | ||||||||
1170 | { | ||||||||
1171 | SetWindow(pLayout); | ||||||||
1172 | pLayout = nullptr; | ||||||||
1173 | } | ||||||||
1174 | if ( bUpdateTabBar ) | ||||||||
1175 | { | ||||||||
1176 | sal_uInt16 nKey = GetWindowId( pCurWin ); | ||||||||
1177 | if ( pCurWin && ( pTabBar->GetPagePos( nKey ) == TabBar::PAGE_NOT_FOUND ) ) | ||||||||
1178 | pTabBar->InsertPage( nKey, pCurWin->GetTitle() ); // has just been faded in | ||||||||
1179 | pTabBar->SetCurPageId( nKey ); | ||||||||
1180 | } | ||||||||
1181 | if ( pCurWin && pCurWin->IsSuspended() ) // if the window is shown in the case of an error... | ||||||||
1182 | pCurWin->SetStatus( pCurWin->GetStatus() & ~BASWIN_SUSPENDED ); | ||||||||
1183 | if ( pCurWin ) | ||||||||
1184 | { | ||||||||
1185 | SetWindow( pCurWin ); | ||||||||
1186 | if ( pCurWin->GetDocument().isDocument() ) | ||||||||
1187 | SfxObjectShell::SetCurrentComponent( pCurWin->GetDocument().getDocument() ); | ||||||||
1188 | } | ||||||||
1189 | else if (pLayout) | ||||||||
1190 | { | ||||||||
1191 | SetWindow(pLayout); | ||||||||
1192 | GetViewFrame()->GetWindow().SetHelpId( HID_BASICIDE_MODULWINDOW"BASCTL_HID_BASICIDE_MODULWINDOW" ); | ||||||||
1193 | SfxObjectShell::SetCurrentComponent(nullptr); | ||||||||
1194 | } | ||||||||
1195 | aObjectCatalog->SetCurrentEntry(pCurWin); | ||||||||
1196 | SetUndoManager( pCurWin ? pCurWin->GetUndoManager() : nullptr ); | ||||||||
1197 | InvalidateBasicIDESlots(); | ||||||||
1198 | InvalidateControlSlots(); | ||||||||
1199 | EnableScrollbars(pCurWin != nullptr); | ||||||||
1200 | |||||||||
1201 | if ( m_pCurLocalizationMgr ) | ||||||||
1202 | m_pCurLocalizationMgr->handleTranslationbar(); | ||||||||
1203 | |||||||||
1204 | ManageToolbars(); | ||||||||
1205 | |||||||||
1206 | // fade out (in) property browser in module (dialog) windows | ||||||||
1207 | UIFeatureChanged(); | ||||||||
1208 | } | ||||||||
1209 | |||||||||
1210 | void Shell::ManageToolbars() | ||||||||
1211 | { | ||||||||
1212 | static const char aMacroBarResName[] = "private:resource/toolbar/macrobar"; | ||||||||
1213 | static const char aDialogBarResName[] = "private:resource/toolbar/dialogbar"; | ||||||||
1214 | static const char aInsertControlsBarResName[] = "private:resource/toolbar/insertcontrolsbar"; | ||||||||
1215 | static const char aFormControlsBarResName[] = "private:resource/toolbar/formcontrolsbar"; | ||||||||
1216 | |||||||||
1217 | if( !pCurWin ) | ||||||||
1218 | return; | ||||||||
1219 | |||||||||
1220 | Reference< beans::XPropertySet > xFrameProps | ||||||||
1221 | ( GetViewFrame()->GetFrame().GetFrameInterface(), uno::UNO_QUERY ); | ||||||||
1222 | if ( !xFrameProps.is() ) | ||||||||
1223 | return; | ||||||||
1224 | |||||||||
1225 | Reference< css::frame::XLayoutManager > xLayoutManager; | ||||||||
1226 | uno::Any a = xFrameProps->getPropertyValue( "LayoutManager" ); | ||||||||
1227 | a >>= xLayoutManager; | ||||||||
1228 | if ( !xLayoutManager.is() ) | ||||||||
1229 | return; | ||||||||
1230 | |||||||||
1231 | xLayoutManager->lock(); | ||||||||
1232 | if (dynamic_cast<DialogWindow*>(pCurWin.get())) | ||||||||
1233 | { | ||||||||
1234 | xLayoutManager->destroyElement( aMacroBarResName ); | ||||||||
1235 | |||||||||
1236 | xLayoutManager->requestElement( aDialogBarResName ); | ||||||||
1237 | xLayoutManager->requestElement( aInsertControlsBarResName ); | ||||||||
1238 | xLayoutManager->requestElement( aFormControlsBarResName ); | ||||||||
1239 | } | ||||||||
1240 | else | ||||||||
1241 | { | ||||||||
1242 | xLayoutManager->destroyElement( aDialogBarResName ); | ||||||||
1243 | xLayoutManager->destroyElement( aInsertControlsBarResName ); | ||||||||
1244 | xLayoutManager->destroyElement( aFormControlsBarResName ); | ||||||||
1245 | |||||||||
1246 | xLayoutManager->requestElement( aMacroBarResName ); | ||||||||
1247 | } | ||||||||
1248 | xLayoutManager->unlock(); | ||||||||
1249 | } | ||||||||
1250 | |||||||||
1251 | VclPtr<BaseWindow> Shell::FindApplicationWindow() | ||||||||
1252 | { | ||||||||
1253 | return FindWindow( ScriptDocument::getApplicationScriptDocument(), "", "", TYPE_UNKNOWN ); | ||||||||
1254 | } | ||||||||
1255 | |||||||||
1256 | VclPtr<BaseWindow> Shell::FindWindow( | ||||||||
1257 | ScriptDocument const& rDocument, | ||||||||
1258 | OUString const& rLibName, OUString const& rName, | ||||||||
1259 | ItemType eType, bool bFindSuspended | ||||||||
1260 | ) | ||||||||
1261 | { | ||||||||
1262 | for (auto const& window : aWindowTable) | ||||||||
1263 | { | ||||||||
1264 | BaseWindow* const pWin = window.second; | ||||||||
1265 | if (pWin->Is(rDocument, rLibName, rName, eType, bFindSuspended)) | ||||||||
1266 | return pWin; | ||||||||
1267 | } | ||||||||
1268 | return nullptr; | ||||||||
1269 | } | ||||||||
1270 | |||||||||
1271 | bool Shell::CallBasicErrorHdl( StarBASIC const * pBasic ) | ||||||||
1272 | { | ||||||||
1273 | VclPtr<ModulWindow> pModWin = ShowActiveModuleWindow( pBasic ); | ||||||||
1274 | if ( pModWin ) | ||||||||
1275 | pModWin->BasicErrorHdl( pBasic ); | ||||||||
1276 | return false; | ||||||||
1277 | } | ||||||||
1278 | |||||||||
1279 | BasicDebugFlags Shell::CallBasicBreakHdl( StarBASIC const * pBasic ) | ||||||||
1280 | { | ||||||||
1281 | BasicDebugFlags nRet = BasicDebugFlags::NONE; | ||||||||
1282 | VclPtr<ModulWindow> pModWin = ShowActiveModuleWindow( pBasic ); | ||||||||
1283 | if ( pModWin ) | ||||||||
1284 | { | ||||||||
1285 | bool bAppWindowDisabled, bDispatcherLocked; | ||||||||
1286 | sal_uInt16 nWaitCount; | ||||||||
1287 | SfxUInt16Item *pSWActionCount, *pSWLockViewCount; | ||||||||
1288 | BasicStopped( &bAppWindowDisabled, &bDispatcherLocked, | ||||||||
1289 | &nWaitCount, &pSWActionCount, &pSWLockViewCount ); | ||||||||
1290 | |||||||||
1291 | nRet = pModWin->BasicBreakHdl(); | ||||||||
1292 | |||||||||
1293 | if ( StarBASIC::IsRunning() ) // if cancelled... | ||||||||
1294 | { | ||||||||
1295 | if ( bAppWindowDisabled ) | ||||||||
1296 | Application::GetDefDialogParent()->Enable(false); | ||||||||
1297 | |||||||||
1298 | if ( nWaitCount ) | ||||||||
1299 | { | ||||||||
1300 | Shell* pShell = GetShell(); | ||||||||
1301 | for ( sal_uInt16 n = 0; n < nWaitCount; n++ ) | ||||||||
1302 | pShell->GetViewFrame()->GetWindow().EnterWait(); | ||||||||
1303 | } | ||||||||
1304 | } | ||||||||
1305 | } | ||||||||
1306 | return nRet; | ||||||||
1307 | } | ||||||||
1308 | |||||||||
1309 | VclPtr<ModulWindow> Shell::ShowActiveModuleWindow( StarBASIC const * pBasic ) | ||||||||
1310 | { | ||||||||
1311 | SetCurLib( ScriptDocument::getApplicationScriptDocument(), OUString(), false ); | ||||||||
1312 | |||||||||
1313 | SbModule* pActiveModule = StarBASIC::GetActiveModule(); | ||||||||
1314 | if (SbClassModuleObject* pCMO = dynamic_cast<SbClassModuleObject*>(pActiveModule)) | ||||||||
1315 | pActiveModule = pCMO->getClassModule(); | ||||||||
1316 | |||||||||
1317 | DBG_ASSERT( pActiveModule, "No active module in ErrorHdl!?" )do { if (true && (!(pActiveModule))) { sal_detail_logFormat ((SAL_DETAIL_LOG_LEVEL_WARN), ("legacy.tools"), ("/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" ":" "1317" ": "), "%s", "No active module in ErrorHdl!?"); } } while (false); | ||||||||
1318 | if ( pActiveModule ) | ||||||||
1319 | { | ||||||||
1320 | VclPtr<ModulWindow> pWin; | ||||||||
1321 | SbxObject* pParent = pActiveModule->GetParent(); | ||||||||
1322 | if (StarBASIC* pLib = dynamic_cast<StarBASIC*>(pParent)) | ||||||||
1323 | { | ||||||||
1324 | if (BasicManager* pBasMgr = FindBasicManager(pLib)) | ||||||||
1325 | { | ||||||||
1326 | ScriptDocument aDocument( ScriptDocument::getDocumentForBasicManager( pBasMgr ) ); | ||||||||
1327 | const OUString& aLibName = pLib->GetName(); | ||||||||
1328 | pWin = FindBasWin( aDocument, aLibName, pActiveModule->GetName(), true ); | ||||||||
1329 | DBG_ASSERT( pWin, "Error/Step-Hdl: Window was not created/found!" )do { if (true && (!(pWin))) { sal_detail_logFormat((SAL_DETAIL_LOG_LEVEL_WARN ), ("legacy.tools"), ("/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" ":" "1329" ": "), "%s", "Error/Step-Hdl: Window was not created/found!" ); } } while (false); | ||||||||
1330 | SetCurLib( aDocument, aLibName ); | ||||||||
1331 | SetCurWindow( pWin, true ); | ||||||||
1332 | } | ||||||||
1333 | } | ||||||||
1334 | else | ||||||||
1335 | SAL_WARN( "basctl.basicide", "No BASIC!")do { if (true) { switch (sal_detail_log_report(::SAL_DETAIL_LOG_LEVEL_WARN , "basctl.basicide")) { case SAL_DETAIL_LOG_ACTION_IGNORE: break ; case SAL_DETAIL_LOG_ACTION_LOG: if (sizeof ::sal::detail::getResult ( ::sal::detail::StreamStart() << "No BASIC!") == 1) { :: sal_detail_log( (::SAL_DETAIL_LOG_LEVEL_WARN), ("basctl.basicide" ), ("/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" ":" "1335" ": "), ::sal::detail::unwrapStream( ::sal::detail ::StreamStart() << "No BASIC!"), 0); } else { ::std::ostringstream sal_detail_stream; sal_detail_stream << "No BASIC!"; :: sal::detail::log( (::SAL_DETAIL_LOG_LEVEL_WARN), ("basctl.basicide" ), ("/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" ":" "1335" ": "), sal_detail_stream, 0); }; break; case SAL_DETAIL_LOG_ACTION_FATAL : if (sizeof ::sal::detail::getResult( ::sal::detail::StreamStart () << "No BASIC!") == 1) { ::sal_detail_log( (::SAL_DETAIL_LOG_LEVEL_WARN ), ("basctl.basicide"), ("/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" ":" "1335" ": "), ::sal::detail::unwrapStream( ::sal::detail ::StreamStart() << "No BASIC!"), 0); } else { ::std::ostringstream sal_detail_stream; sal_detail_stream << "No BASIC!"; :: sal::detail::log( (::SAL_DETAIL_LOG_LEVEL_WARN), ("basctl.basicide" ), ("/home/maarten/src/libreoffice/core/basctl/source/basicide/basides1.cxx" ":" "1335" ": "), sal_detail_stream, 0); }; std::abort(); break ; } } } while (false); | ||||||||
1336 | if (BasicManager* pBasicMgr = FindBasicManager(pBasic)) | ||||||||
1337 | StartListening(*pBasicMgr, DuplicateHandling::Prevent /* log on only once */); | ||||||||
1338 | return pWin; | ||||||||
1339 | } | ||||||||
1340 | return nullptr; | ||||||||
1341 | } | ||||||||
1342 | |||||||||
1343 | void Shell::AdjustPosSizePixel( const Point &rPos, const Size &rSize ) | ||||||||
1344 | { | ||||||||
1345 | // not if iconified because the whole text would be displaced then at restore | ||||||||
1346 | if ( GetViewFrame()->GetWindow().GetOutputSizePixel().Height() == 0 ) | ||||||||
1347 | return; | ||||||||
1348 | |||||||||
1349 | Size aTabBarSize; | ||||||||
1350 | aTabBarSize.setHeight( GetViewFrame()->GetWindow().GetFont().GetFontHeight() + TAB_HEIGHT_MARGIN ); | ||||||||
1351 | aTabBarSize.setWidth( rSize.Width() ); | ||||||||
1352 | |||||||||
1353 | Size aSz( rSize ); | ||||||||
1354 | Size aScrollBarBoxSz( aScrollBarBox->GetSizePixel() ); | ||||||||
1355 | aSz.AdjustHeight( -(aScrollBarBoxSz.Height()) ); | ||||||||
1356 | aSz.AdjustHeight( -(aTabBarSize.Height()) ); | ||||||||
1357 | |||||||||
1358 | Size aOutSz( aSz ); | ||||||||
1359 | aSz.AdjustWidth( -(aScrollBarBoxSz.Width()) ); | ||||||||
1360 | aScrollBarBox->SetPosPixel( Point( rSize.Width() - aScrollBarBoxSz.Width(), rSize.Height() - aScrollBarBoxSz.Height() ) ); | ||||||||
1361 | aVScrollBar->SetPosSizePixel( Point( rPos.X()+aSz.Width(), rPos.Y() ), Size( aScrollBarBoxSz.Width(), aSz.Height() ) ); | ||||||||
1362 | aHScrollBar->SetPosSizePixel( Point( rPos.X(), rPos.Y()+aSz.Height() ), Size( aSz.Width(), aScrollBarBoxSz.Height() ) ); | ||||||||
1363 | pTabBar->SetPosSizePixel( Point( rPos.X(), rPos.Y()+aScrollBarBoxSz.Height()+aSz.Height()), aTabBarSize ); | ||||||||
1364 | |||||||||
1365 | if (pLayout) | ||||||||
1366 | pLayout->SetPosSizePixel(rPos, dynamic_cast<DialogWindow*>(pCurWin.get()) ? aSz : aOutSz); | ||||||||
1367 | } | ||||||||
1368 | |||||||||
1369 | Reference< XModel > Shell::GetCurrentDocument() const | ||||||||
1370 | { | ||||||||
1371 | Reference< XModel > xDocument; | ||||||||
1372 | if ( pCurWin && pCurWin->GetDocument().isDocument() ) | ||||||||
1373 | xDocument = pCurWin->GetDocument().getDocument(); | ||||||||
1374 | return xDocument; | ||||||||
1375 | } | ||||||||
1376 | |||||||||
1377 | void Shell::Activate( bool bMDI ) | ||||||||
1378 | { | ||||||||
1379 | SfxViewShell::Activate( bMDI ); | ||||||||
1380 | |||||||||
1381 | if ( bMDI ) | ||||||||
1382 | { | ||||||||
1383 | if (DialogWindow* pDCurWin = dynamic_cast<DialogWindow*>(pCurWin.get())) | ||||||||
1384 | pDCurWin->UpdateBrowser(); | ||||||||
1385 | } | ||||||||
1386 | } | ||||||||
1387 | |||||||||
1388 | void Shell::Deactivate( bool bMDI ) | ||||||||
1389 | { | ||||||||
1390 | // bMDI == true means that another MDI has been activated; in case of a | ||||||||
1391 | // deactivate due to a MessageBox bMDI is false | ||||||||
1392 | if ( bMDI ) | ||||||||
1393 | { | ||||||||
1394 | if (DialogWindow* pXDlgWin = dynamic_cast<DialogWindow*>(pCurWin.get())) | ||||||||
1395 | { | ||||||||
1396 | pXDlgWin->DisableBrowser(); | ||||||||
1397 | if( pXDlgWin->IsModified() ) | ||||||||
1398 | MarkDocumentModified( pXDlgWin->GetDocument() ); | ||||||||
1399 | } | ||||||||
1400 | } | ||||||||
1401 | } | ||||||||
1402 | |||||||||
1403 | } // namespace basctl | ||||||||
1404 | |||||||||
1405 | /* vim:set shiftwidth=4 softtabstop=4 expandtab: */ |
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 | #ifndef INCLUDED_VCL_PTR_HXX |
21 | #define INCLUDED_VCL_PTR_HXX |
22 | |
23 | #include <sal/config.h> |
24 | |
25 | #include <rtl/ref.hxx> |
26 | |
27 | #include <utility> |
28 | #include <type_traits> |
29 | |
30 | #ifdef DBG_UTIL |
31 | #ifndef _WIN32 |
32 | #include <vcl/vclmain.hxx> |
33 | #endif |
34 | #endif |
35 | |
36 | class VclReferenceBase; |
37 | |
38 | namespace vcl::detail { |
39 | |
40 | template<typename> |
41 | constexpr bool isIncompleteOrDerivedFromVclReferenceBase(...) { return true; } |
42 | |
43 | template<typename T> constexpr bool isIncompleteOrDerivedFromVclReferenceBase( |
44 | int (*)[sizeof(T)]) |
45 | { return std::is_base_of<VclReferenceBase, T>::value; } |
46 | |
47 | } // namespace vcl::detail |
48 | |
49 | /** |
50 | * A thin wrapper around rtl::Reference to implement the acquire and dispose semantics we want for references to vcl::Window subclasses. |
51 | * |
52 | * For more details on the design please see vcl/README.lifecycle |
53 | * |
54 | * @param reference_type must be a subclass of vcl::Window |
55 | */ |
56 | template <class reference_type> |
57 | class VclPtr |
58 | { |
59 | static_assert( |
60 | vcl::detail::isIncompleteOrDerivedFromVclReferenceBase<reference_type>( |
61 | nullptr), |
62 | "template argument type must be derived from VclReferenceBase"); |
63 | |
64 | ::rtl::Reference<reference_type> m_rInnerRef; |
65 | |
66 | public: |
67 | /** Constructor... |
68 | */ |
69 | VclPtr() |
70 | : m_rInnerRef() |
71 | {} |
72 | |
73 | /** Constructor... |
74 | */ |
75 | VclPtr (reference_type * pBody) |
76 | : m_rInnerRef(pBody) |
77 | {} |
78 | |
79 | /** Constructor... that doesn't take a ref. |
80 | */ |
81 | VclPtr (reference_type * pBody, __sal_NoAcquire) |
82 | : m_rInnerRef(pBody, SAL_NO_ACQUIRE) |
83 | {} |
84 | |
85 | /** Up-casting conversion constructor: Copies interface reference. |
86 | |
87 | Does not work for up-casts to ambiguous bases. For the special case of |
88 | up-casting to Reference< XInterface >, see the corresponding conversion |
89 | operator. |
90 | |
91 | @param rRef another reference |
92 | */ |
93 | template< class derived_type > |
94 | VclPtr( |
95 | const VclPtr< derived_type > & rRef, |
96 | typename std::enable_if< |
97 | std::is_base_of<reference_type, derived_type>::value, int>::type |
98 | = 0 ) |
99 | : m_rInnerRef( static_cast<reference_type*>(rRef) ) |
100 | { |
101 | } |
102 | |
103 | #if defined(DBG_UTIL) && !defined(_WIN32) |
104 | virtual ~VclPtr() |
105 | { |
106 | assert(m_rInnerRef.get() == nullptr || vclmain::isAlive())(static_cast <bool> (m_rInnerRef.get() == nullptr || vclmain ::isAlive()) ? void (0) : __assert_fail ("m_rInnerRef.get() == nullptr || vclmain::isAlive()" , "/home/maarten/src/libreoffice/core/include/vcl/vclptr.hxx" , 106, __extension__ __PRETTY_FUNCTION__)); |
107 | // We can be one of the intermediate counts, but if we are the last |
108 | // VclPtr keeping this object alive, then something forgot to call dispose(). |
109 | assert((!m_rInnerRef.get() || m_rInnerRef->isDisposed() || m_rInnerRef->getRefCount() > 1)(static_cast <bool> ((!m_rInnerRef.get() || m_rInnerRef ->isDisposed() || m_rInnerRef->getRefCount() > 1) && "someone forgot to call dispose()") ? void (0) : __assert_fail ("(!m_rInnerRef.get() || m_rInnerRef->isDisposed() || m_rInnerRef->getRefCount() > 1) && \"someone forgot to call dispose()\"" , "/home/maarten/src/libreoffice/core/include/vcl/vclptr.hxx" , 110, __extension__ __PRETTY_FUNCTION__)) |
110 | && "someone forgot to call dispose()")(static_cast <bool> ((!m_rInnerRef.get() || m_rInnerRef ->isDisposed() || m_rInnerRef->getRefCount() > 1) && "someone forgot to call dispose()") ? void (0) : __assert_fail ("(!m_rInnerRef.get() || m_rInnerRef->isDisposed() || m_rInnerRef->getRefCount() > 1) && \"someone forgot to call dispose()\"" , "/home/maarten/src/libreoffice/core/include/vcl/vclptr.hxx" , 110, __extension__ __PRETTY_FUNCTION__)); |
111 | } |
112 | VclPtr(VclPtr const &) = default; |
113 | VclPtr(VclPtr &&) = default; |
114 | VclPtr & operator =(VclPtr const &) = default; |
115 | VclPtr & operator =(VclPtr &&) = default; |
116 | #endif |
117 | |
118 | /** |
119 | * A construction helper for VclPtr. Since VclPtr types are created |
120 | * with a reference-count of one - to help fit into the existing |
121 | * code-flow; this helps us to construct them easily. |
122 | * |
123 | * For more details on the design please see vcl/README.lifecycle |
124 | * |
125 | * @tparam reference_type must be a subclass of vcl::Window |
126 | */ |
127 | template<typename... Arg> [[nodiscard]] static VclPtr< reference_type > Create(Arg &&... arg) |
128 | { |
129 | return VclPtr< reference_type >( new reference_type(std::forward<Arg>(arg)...), SAL_NO_ACQUIRE ); |
130 | } |
131 | |
132 | /** Probably most common used: handle->someBodyOp(). |
133 | */ |
134 | reference_type * operator->() const |
135 | { |
136 | return m_rInnerRef.get(); |
137 | } |
138 | |
139 | /** Get the body. Can be used instead of operator->(). |
140 | I.e. handle->someBodyOp() and handle.get()->someBodyOp() |
141 | are the same. |
142 | */ |
143 | reference_type * get() const |
144 | { |
145 | return m_rInnerRef.get(); |
146 | } |
147 | |
148 | void set(reference_type *pBody) |
149 | { |
150 | m_rInnerRef.set(pBody); |
151 | } |
152 | |
153 | void reset(reference_type *pBody) |
154 | { |
155 | m_rInnerRef.set(pBody); |
156 | } |
157 | |
158 | /** Up-casting copy assignment operator. |
159 | |
160 | Does not work for up-casts to ambiguous bases. |
161 | |
162 | @param rRef another reference |
163 | */ |
164 | template<typename derived_type> |
165 | typename std::enable_if< |
166 | std::is_base_of<reference_type, derived_type>::value, |
167 | VclPtr &>::type |
168 | operator =(VclPtr<derived_type> const & rRef) |
169 | { |
170 | m_rInnerRef.set(rRef.get()); |
171 | return *this; |
172 | } |
173 | |
174 | VclPtr & operator =(reference_type * pBody) |
175 | { |
176 | m_rInnerRef.set(pBody); |
177 | return *this; |
178 | } |
179 | |
180 | operator reference_type * () const |
181 | { |
182 | return m_rInnerRef.get(); |
183 | } |
184 | |
185 | explicit operator bool () const |
186 | { |
187 | return m_rInnerRef.get() != nullptr; |
188 | } |
189 | |
190 | void clear() |
191 | { |
192 | m_rInnerRef.clear(); |
193 | } |
194 | |
195 | void reset() |
196 | { |
197 | m_rInnerRef.clear(); |
198 | } |
199 | |
200 | void disposeAndClear() |
201 | { |
202 | // hold it alive for the lifetime of this method |
203 | ::rtl::Reference<reference_type> aTmp(m_rInnerRef); |
204 | m_rInnerRef.clear(); // we should use some 'swap' method ideally ;-) |
205 | if (aTmp.get()) { |
206 | aTmp->disposeOnce(); |
207 | } |
208 | } |
209 | |
210 | /** Needed to place VclPtr's into STL collection. |
211 | */ |
212 | bool operator< (const VclPtr<reference_type> & handle) const |
213 | { |
214 | return (m_rInnerRef < handle.m_rInnerRef); |
215 | } |
216 | }; // class VclPtr |
217 | |
218 | template<typename T1, typename T2> |
219 | inline bool operator ==(VclPtr<T1> const & p1, VclPtr<T2> const & p2) { |
220 | return p1.get() == p2.get(); |
221 | } |
222 | |
223 | template<typename T> inline bool operator ==(VclPtr<T> const & p1, T const * p2) |
224 | { |
225 | return p1.get() == p2; |
226 | } |
227 | |
228 | template<typename T> inline bool operator ==(VclPtr<T> const & p1, T * p2) { |
229 | return p1.get() == p2; |
230 | } |
231 | |
232 | template<typename T> inline bool operator ==(T const * p1, VclPtr<T> const & p2) |
233 | { |
234 | return p1 == p2.get(); |
235 | } |
236 | |
237 | template<typename T> inline bool operator ==(T * p1, VclPtr<T> const & p2) { |
238 | return p1 == p2.get(); |
239 | } |
240 | |
241 | template<typename T1, typename T2> |
242 | inline bool operator !=(VclPtr<T1> const & p1, VclPtr<T2> const & p2) { |
243 | return !(p1 == p2); |
244 | } |
245 | |
246 | template<typename T> inline bool operator !=(VclPtr<T> const & p1, T const * p2) |
247 | { |
248 | return !(p1 == p2); |
249 | } |
250 | |
251 | template<typename T> inline bool operator !=(VclPtr<T> const & p1, T * p2) { |
252 | return !(p1 == p2); |
253 | } |
254 | |
255 | template<typename T> inline bool operator !=(T const * p1, VclPtr<T> const & p2) |
256 | { |
257 | return !(p1 == p2); |
258 | } |
259 | |
260 | template<typename T> inline bool operator !=(T * p1, VclPtr<T> const & p2) { |
261 | return !(p1 == p2); |
262 | } |
263 | |
264 | /** |
265 | * A construction helper for a temporary VclPtr. Since VclPtr types |
266 | * are created with a reference-count of one - to help fit into |
267 | * the existing code-flow; this helps us to construct them easily. |
268 | * see also VclPtr::Create and ScopedVclPtr |
269 | * |
270 | * For more details on the design please see vcl/README.lifecycle |
271 | * |
272 | * @param reference_type must be a subclass of vcl::Window |
273 | */ |
274 | template <class reference_type> |
275 | class SAL_WARN_UNUSED__attribute__((warn_unused)) VclPtrInstance final : public VclPtr<reference_type> |
276 | { |
277 | public: |
278 | template<typename... Arg> VclPtrInstance(Arg &&... arg) |
279 | : VclPtr<reference_type>( new reference_type(std::forward<Arg>(arg)...), SAL_NO_ACQUIRE ) |
280 | { |
281 | } |
282 | |
283 | /** |
284 | * Override and disallow this, to prevent people accidentally calling it and actually |
285 | * getting VclPtr::Create and getting a naked VclPtr<> instance |
286 | */ |
287 | template<typename... Arg> static VclPtrInstance< reference_type > Create(Arg &&... ) = delete; |
288 | }; |
289 | |
290 | template <class reference_type> |
291 | class ScopedVclPtr : public VclPtr<reference_type> |
292 | { |
293 | public: |
294 | /** Constructor... |
295 | */ |
296 | ScopedVclPtr() |
297 | : VclPtr<reference_type>() |
298 | {} |
299 | |
300 | /** Constructor |
301 | */ |
302 | ScopedVclPtr (reference_type * pBody) |
303 | : VclPtr<reference_type>(pBody) |
304 | {} |
305 | |
306 | /** Copy constructor... |
307 | */ |
308 | ScopedVclPtr (const VclPtr<reference_type> & handle) |
309 | : VclPtr<reference_type>(handle) |
310 | {} |
311 | |
312 | /** |
313 | Assignment that releases the last reference. |
314 | */ |
315 | void disposeAndReset(reference_type *pBody) |
316 | { |
317 | if (pBody != this->get()) { |
318 | VclPtr<reference_type>::disposeAndClear(); |
319 | VclPtr<reference_type>::set(pBody); |
320 | } |
321 | } |
322 | |
323 | /** |
324 | Assignment that releases the last reference. |
325 | */ |
326 | ScopedVclPtr<reference_type>& operator = (reference_type * pBody) |
327 | { |
328 | disposeAndReset(pBody); |
329 | return *this; |
330 | } |
331 | |
332 | /** Up-casting conversion constructor: Copies interface reference. |
333 | |
334 | Does not work for up-casts to ambiguous bases. For the special case of |
335 | up-casting to Reference< XInterface >, see the corresponding conversion |
336 | operator. |
337 | |
338 | @param rRef another reference |
339 | */ |
340 | template< class derived_type > |
341 | ScopedVclPtr( |
342 | const VclPtr< derived_type > & rRef, |
343 | typename std::enable_if< |
344 | std::is_base_of<reference_type, derived_type>::value, int>::type |
345 | = 0 ) |
346 | : VclPtr<reference_type>( rRef ) |
347 | { |
348 | } |
349 | |
350 | /** Up-casting assignment operator. |
351 | |
352 | Does not work for up-casts to ambiguous bases. |
353 | |
354 | @param rRef another VclPtr |
355 | */ |
356 | template<typename derived_type> |
357 | typename std::enable_if< |
358 | std::is_base_of<reference_type, derived_type>::value, |
359 | ScopedVclPtr &>::type |
360 | operator =(VclPtr<derived_type> const & rRef) |
361 | { |
362 | disposeAndReset(rRef.get()); |
363 | return *this; |
364 | } |
365 | |
366 | /** |
367 | * Override and disallow this, to prevent people accidentally calling it and actually |
368 | * getting VclPtr::Create and getting a naked VclPtr<> instance |
369 | */ |
370 | template<typename... Arg> static ScopedVclPtr< reference_type > Create(Arg &&... ) = delete; |
371 | |
372 | ~ScopedVclPtr() |
373 | { |
374 | VclPtr<reference_type>::disposeAndClear(); |
375 | assert(VclPtr<reference_type>::get() == nullptr)(static_cast <bool> (VclPtr<reference_type>::get( ) == nullptr) ? void (0) : __assert_fail ("VclPtr<reference_type>::get() == nullptr" , "/home/maarten/src/libreoffice/core/include/vcl/vclptr.hxx" , 375, __extension__ __PRETTY_FUNCTION__)); // make sure there are no lingering references |
376 | } |
377 | |
378 | private: |
379 | // Most likely we don't want this default copy-constructor. |
380 | ScopedVclPtr (const ScopedVclPtr<reference_type> &) = delete; |
381 | // And certainly we don't want a default assignment operator. |
382 | ScopedVclPtr<reference_type>& operator = (const ScopedVclPtr<reference_type> &) = delete; |
383 | // And disallow reset as that doesn't call disposeAndClear on the original reference |
384 | void reset() = delete; |
385 | void reset(reference_type *pBody) = delete; |
386 | |
387 | protected: |
388 | ScopedVclPtr (reference_type * pBody, __sal_NoAcquire) |
389 | : VclPtr<reference_type>(pBody, SAL_NO_ACQUIRE) |
390 | {} |
391 | }; |
392 | |
393 | /** |
394 | * A construction helper for ScopedVclPtr. Since VclPtr types are created |
395 | * with a reference-count of one - to help fit into the existing |
396 | * code-flow; this helps us to construct them easily. |
397 | * |
398 | * For more details on the design please see vcl/README.lifecycle |
399 | * |
400 | * @param reference_type must be a subclass of vcl::Window |
401 | */ |
402 | #if defined _MSC_VER |
403 | #pragma warning(push) |
404 | #pragma warning(disable: 4521) // " multiple copy constructors specified" |
405 | #endif |
406 | template <class reference_type> |
407 | class SAL_WARN_UNUSED__attribute__((warn_unused)) ScopedVclPtrInstance final : public ScopedVclPtr<reference_type> |
408 | { |
409 | public: |
410 | template<typename... Arg> ScopedVclPtrInstance(Arg &&... arg) |
411 | : ScopedVclPtr<reference_type>( new reference_type(std::forward<Arg>(arg)...), SAL_NO_ACQUIRE ) |
412 | { |
413 | } |
414 | |
415 | /** |
416 | * Override and disallow this, to prevent people accidentally calling it and actually |
417 | * getting VclPtr::Create and getting a naked VclPtr<> instance |
418 | */ |
419 | template<typename... Arg> static ScopedVclPtrInstance< reference_type > Create(Arg &&...) = delete; |
420 | |
421 | private: |
422 | // Prevent the above perfect forwarding ctor from hijacking (accidental) |
423 | // attempts at ScopedVclPtrInstance copy construction (where the hijacking |
424 | // would typically lead to somewhat obscure error messages); both non-const |
425 | // and const variants are needed here, as the ScopedVclPtr base class has a |
426 | // const--variant copy ctor, so the implicitly declared copy ctor for |
427 | // ScopedVclPtrInstance would also be the const variant, so non-const copy |
428 | // construction attempts would be hijacked by the perfect forwarding ctor; |
429 | // but if we only declared a non-const variant here, the const variant would |
430 | // no longer be implicitly declared (as there would already be an explicitly |
431 | // declared copy ctor), so const copy construction attempts would then be |
432 | // hijacked by the perfect forwarding ctor: |
433 | ScopedVclPtrInstance(ScopedVclPtrInstance &) = delete; |
434 | ScopedVclPtrInstance(ScopedVclPtrInstance const &) = delete; |
435 | }; |
436 | #if defined _MSC_VER |
437 | #pragma warning(pop) |
438 | #endif |
439 | |
440 | #endif // INCLUDED_VCL_PTR_HXX |
441 | |
442 | /* vim:set shiftwidth=4 softtabstop=4 expandtab: */ |
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 | #ifndef INCLUDED_RTL_REF_HXX | ||||||||
21 | #define INCLUDED_RTL_REF_HXX | ||||||||
22 | |||||||||
23 | #include "sal/config.h" | ||||||||
24 | |||||||||
25 | #include <cassert> | ||||||||
26 | #include <cstddef> | ||||||||
27 | #include <functional> | ||||||||
28 | #ifdef LIBO_INTERNAL_ONLY1 | ||||||||
29 | #include <type_traits> | ||||||||
30 | #endif | ||||||||
31 | |||||||||
32 | #include "sal/types.h" | ||||||||
33 | |||||||||
34 | namespace rtl | ||||||||
35 | { | ||||||||
36 | |||||||||
37 | /** Template reference class for reference type. | ||||||||
38 | */ | ||||||||
39 | template <class reference_type> | ||||||||
40 | class Reference | ||||||||
41 | { | ||||||||
42 | /** The <b>reference_type</b> body pointer. | ||||||||
43 | */ | ||||||||
44 | reference_type * m_pBody; | ||||||||
45 | |||||||||
46 | |||||||||
47 | public: | ||||||||
48 | /** Constructor... | ||||||||
49 | */ | ||||||||
50 | Reference() | ||||||||
51 | : m_pBody (NULL__null) | ||||||||
52 | {} | ||||||||
53 | |||||||||
54 | |||||||||
55 | /** Constructor... | ||||||||
56 | */ | ||||||||
57 | Reference (reference_type * pBody, __sal_NoAcquire) | ||||||||
58 | : m_pBody (pBody) | ||||||||
59 | { | ||||||||
60 | } | ||||||||
61 | |||||||||
62 | /** Constructor... | ||||||||
63 | */ | ||||||||
64 | Reference (reference_type * pBody) | ||||||||
65 | : m_pBody (pBody) | ||||||||
66 | { | ||||||||
67 | if (m_pBody) | ||||||||
68 | m_pBody->acquire(); | ||||||||
69 | } | ||||||||
70 | |||||||||
71 | /** Copy constructor... | ||||||||
72 | */ | ||||||||
73 | Reference (const Reference<reference_type> & handle) | ||||||||
74 | : m_pBody (handle.m_pBody) | ||||||||
75 | { | ||||||||
76 | if (m_pBody) | ||||||||
77 | m_pBody->acquire(); | ||||||||
78 | } | ||||||||
79 | |||||||||
80 | #ifdef LIBO_INTERNAL_ONLY1 | ||||||||
81 | /** Move constructor... | ||||||||
82 | */ | ||||||||
83 | Reference (Reference<reference_type> && handle) noexcept | ||||||||
84 | : m_pBody (handle.m_pBody) | ||||||||
85 | { | ||||||||
86 | handle.m_pBody = nullptr; | ||||||||
87 | } | ||||||||
88 | #endif | ||||||||
89 | |||||||||
90 | #if defined LIBO_INTERNAL_ONLY1 | ||||||||
91 | /** Up-casting conversion constructor: Copies interface reference. | ||||||||
92 | |||||||||
93 | Does not work for up-casts to ambiguous bases. | ||||||||
94 | |||||||||
95 | @param rRef another reference | ||||||||
96 | */ | ||||||||
97 | template< class derived_type > | ||||||||
98 | inline Reference( | ||||||||
99 | const Reference< derived_type > & rRef, | ||||||||
100 | std::enable_if_t<std::is_base_of_v<reference_type, derived_type>, int> = 0 ) | ||||||||
101 | : m_pBody (rRef.get()) | ||||||||
102 | { | ||||||||
103 | if (m_pBody) | ||||||||
104 | m_pBody->acquire(); | ||||||||
105 | } | ||||||||
106 | #endif | ||||||||
107 | |||||||||
108 | /** Destructor... | ||||||||
109 | */ | ||||||||
110 | ~Reference() COVERITY_NOEXCEPT_FALSE | ||||||||
111 | { | ||||||||
112 | if (m_pBody
| ||||||||
113 | m_pBody->release(); | ||||||||
114 | } | ||||||||
115 | |||||||||
116 | /** Set... | ||||||||
117 | Similar to assignment. | ||||||||
118 | */ | ||||||||
119 | Reference<reference_type> & | ||||||||
120 | SAL_CALL set (reference_type * pBody) | ||||||||
121 | { | ||||||||
122 | if (pBody) | ||||||||
123 | pBody->acquire(); | ||||||||
124 | reference_type * const pOld = m_pBody; | ||||||||
125 | m_pBody = pBody; | ||||||||
126 | if (pOld
| ||||||||
127 | pOld->release(); | ||||||||
128 | return *this; | ||||||||
129 | } | ||||||||
130 | |||||||||
131 | /** Assignment. | ||||||||
132 | Unbinds this instance from its body (if bound) and | ||||||||
133 | bind it to the body represented by the handle. | ||||||||
134 | */ | ||||||||
135 | Reference<reference_type> & | ||||||||
136 | SAL_CALL operator= (const Reference<reference_type> & handle) | ||||||||
137 | { | ||||||||
138 | return set( handle.m_pBody ); | ||||||||
139 | } | ||||||||
140 | |||||||||
141 | #ifdef LIBO_INTERNAL_ONLY1 | ||||||||
142 | /** Assignment. | ||||||||
143 | * Unbinds this instance from its body (if bound), | ||||||||
144 | * bind it to the body represented by the handle, and | ||||||||
145 | * set the body represented by the handle to nullptr. | ||||||||
146 | */ | ||||||||
147 | Reference<reference_type> & | ||||||||
148 | operator= (Reference<reference_type> && handle) | ||||||||
149 | { | ||||||||
150 | // self-movement guts ourself | ||||||||
151 | if (m_pBody) | ||||||||
152 | m_pBody->release(); | ||||||||
153 | m_pBody = handle.m_pBody; | ||||||||
154 | handle.m_pBody = nullptr; | ||||||||
155 | return *this; | ||||||||
156 | } | ||||||||
157 | #endif | ||||||||
158 | |||||||||
159 | /** Assignment... | ||||||||
160 | */ | ||||||||
161 | Reference<reference_type> & | ||||||||
162 | SAL_CALL operator= (reference_type * pBody) | ||||||||
163 | { | ||||||||
164 | return set( pBody ); | ||||||||
165 | } | ||||||||
166 | |||||||||
167 | /** Unbind the body from this handle. | ||||||||
168 | Note that for a handle representing a large body, | ||||||||
169 | "handle.clear().set(new body());" _might_ | ||||||||
170 | perform a little bit better than "handle.set(new body());", | ||||||||
171 | since in the second case two large objects exist in memory | ||||||||
172 | (the old body and the new body). | ||||||||
173 | */ | ||||||||
174 | Reference<reference_type> & SAL_CALL clear() | ||||||||
175 | { | ||||||||
176 | if (m_pBody) | ||||||||
177 | { | ||||||||
178 | reference_type * const pOld = m_pBody; | ||||||||
179 | m_pBody = NULL__null; | ||||||||
180 | pOld->release(); | ||||||||
181 | } | ||||||||
182 | return *this; | ||||||||
183 | } | ||||||||
184 | |||||||||
185 | |||||||||
186 | /** Get the body. Can be used instead of operator->(). | ||||||||
187 | I.e. handle->someBodyOp() and handle.get()->someBodyOp() | ||||||||
188 | are the same. | ||||||||
189 | */ | ||||||||
190 | reference_type * SAL_CALL get() const | ||||||||
191 | { | ||||||||
192 | return m_pBody; | ||||||||
| |||||||||
193 | } | ||||||||
194 | |||||||||
195 | |||||||||
196 | /** Probably most common used: handle->someBodyOp(). | ||||||||
197 | */ | ||||||||
198 | reference_type * SAL_CALL operator->() const | ||||||||
199 | { | ||||||||
200 | assert(m_pBody != NULL)(static_cast <bool> (m_pBody != __null) ? void (0) : __assert_fail ("m_pBody != NULL", "/home/maarten/src/libreoffice/core/include/rtl/ref.hxx" , 200, __extension__ __PRETTY_FUNCTION__)); | ||||||||
201 | return m_pBody; | ||||||||
202 | } | ||||||||
203 | |||||||||
204 | |||||||||
205 | /** Allows (*handle).someBodyOp(). | ||||||||
206 | */ | ||||||||
207 | reference_type & SAL_CALL operator*() const | ||||||||
208 | { | ||||||||
209 | assert(m_pBody != NULL)(static_cast <bool> (m_pBody != __null) ? void (0) : __assert_fail ("m_pBody != NULL", "/home/maarten/src/libreoffice/core/include/rtl/ref.hxx" , 209, __extension__ __PRETTY_FUNCTION__)); | ||||||||
210 | return *m_pBody; | ||||||||
211 | } | ||||||||
212 | |||||||||
213 | |||||||||
214 | /** Returns True if the handle does point to a valid body. | ||||||||
215 | */ | ||||||||
216 | bool SAL_CALL is() const | ||||||||
217 | { | ||||||||
218 | return (m_pBody != NULL__null); | ||||||||
219 | } | ||||||||
220 | |||||||||
221 | #if defined LIBO_INTERNAL_ONLY1 | ||||||||
222 | /** Returns True if the handle does point to a valid body. | ||||||||
223 | */ | ||||||||
224 | explicit operator bool() const | ||||||||
225 | { | ||||||||
226 | return is(); | ||||||||
227 | } | ||||||||
228 | #endif | ||||||||
229 | |||||||||
230 | /** Returns True if this points to pBody. | ||||||||
231 | */ | ||||||||
232 | bool SAL_CALL operator== (const reference_type * pBody) const | ||||||||
233 | { | ||||||||
234 | return (m_pBody == pBody); | ||||||||
235 | } | ||||||||
236 | |||||||||
237 | |||||||||
238 | /** Returns True if handle points to the same body. | ||||||||
239 | */ | ||||||||
240 | bool | ||||||||
241 | SAL_CALL operator== (const Reference<reference_type> & handle) const | ||||||||
242 | { | ||||||||
243 | return (m_pBody == handle.m_pBody); | ||||||||
244 | } | ||||||||
245 | |||||||||
246 | |||||||||
247 | /** Needed to place References into STL collection. | ||||||||
248 | */ | ||||||||
249 | bool | ||||||||
250 | SAL_CALL operator!= (const Reference<reference_type> & handle) const | ||||||||
251 | { | ||||||||
252 | return (m_pBody != handle.m_pBody); | ||||||||
253 | } | ||||||||
254 | |||||||||
255 | |||||||||
256 | /** Needed to place References into STL collection. | ||||||||
257 | */ | ||||||||
258 | bool | ||||||||
259 | SAL_CALL operator< (const Reference<reference_type> & handle) const | ||||||||
260 | { | ||||||||
261 | return (m_pBody < handle.m_pBody); | ||||||||
262 | } | ||||||||
263 | |||||||||
264 | |||||||||
265 | /** Needed to place References into STL collection. | ||||||||
266 | */ | ||||||||
267 | bool | ||||||||
268 | SAL_CALL operator> (const Reference<reference_type> & handle) const | ||||||||
269 | { | ||||||||
270 | return (m_pBody > handle.m_pBody); | ||||||||
271 | } | ||||||||
272 | }; | ||||||||
273 | |||||||||
274 | } // namespace rtl | ||||||||
275 | |||||||||
276 | #if defined LIBO_INTERNAL_ONLY1 | ||||||||
277 | namespace std | ||||||||
278 | { | ||||||||
279 | |||||||||
280 | /// @cond INTERNAL | ||||||||
281 | /** | ||||||||
282 | Make rtl::Reference hashable by default for use in STL containers. | ||||||||
283 | |||||||||
284 | @since LibreOffice 6.3 | ||||||||
285 | */ | ||||||||
286 | template<typename T> | ||||||||
287 | struct hash<::rtl::Reference<T>> | ||||||||
288 | { | ||||||||
289 | std::size_t operator()(::rtl::Reference<T> const & s) const | ||||||||
290 | { return std::size_t(s.get()); } | ||||||||
291 | }; | ||||||||
292 | /// @endcond | ||||||||
293 | |||||||||
294 | } | ||||||||
295 | |||||||||
296 | #endif | ||||||||
297 | |||||||||
298 | #endif /* ! INCLUDED_RTL_REF_HXX */ | ||||||||
299 | |||||||||
300 | /* vim:set shiftwidth=4 softtabstop=4 expandtab: */ |
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 | #ifndef INCLUDED_VCL_Reference_HXX |
20 | #define INCLUDED_VCL_Reference_HXX |
21 | |
22 | #include <vcl/dllapi.h> |
23 | #include <osl/interlck.h> |
24 | |
25 | class VCL_DLLPUBLIC__attribute__ ((visibility("default"))) VclReferenceBase |
26 | { |
27 | mutable oslInterlockedCount mnRefCnt; |
28 | |
29 | template<typename T> friend class VclPtr; |
30 | |
31 | public: |
32 | void acquire() const |
33 | { |
34 | osl_atomic_increment(&mnRefCnt)__sync_add_and_fetch((&mnRefCnt), 1); |
35 | } |
36 | |
37 | void release() const |
38 | { |
39 | if (osl_atomic_decrement(&mnRefCnt)__sync_sub_and_fetch((&mnRefCnt), 1) == 0) |
40 | delete this; |
41 | } |
42 | #ifdef DBG_UTIL |
43 | #ifndef _WIN32 |
44 | sal_Int32 getRefCount() const { return mnRefCnt; } |
45 | #endif |
46 | #endif |
47 | |
48 | |
49 | private: |
50 | VclReferenceBase(const VclReferenceBase&) = delete; |
51 | VclReferenceBase& operator=(const VclReferenceBase&) = delete; |
52 | |
53 | bool mbDisposed : 1; |
54 | |
55 | protected: |
56 | VclReferenceBase(); |
57 | protected: |
58 | virtual ~VclReferenceBase(); |
59 | |
60 | protected: |
61 | virtual void dispose(); |
62 | |
63 | public: |
64 | void disposeOnce(); |
65 | bool isDisposed() const { return mbDisposed; } |
66 | |
67 | }; |
68 | #endif |