?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
merge the formfield patch from ooo-build
[ooovba.git] / extensions / source / bibliography / framectr.cxx
blob53de2478d7724335993ad35935ea8490865c4baf
1 /*************************************************************************
2 *
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * Copyright 2008 by Sun Microsystems, Inc.
6 *
7 * OpenOffice.org - a multi-platform office productivity suite
8 *
9 * $RCSfile: framectr.cxx,v $
10 * $Revision: 1.36 $
11 *
12 * This file is part of OpenOffice.org.
13 *
14 * OpenOffice.org is free software: you can redistribute it and/or modify
15 * it under the terms of the GNU Lesser General Public License version 3
16 * only, as published by the Free Software Foundation.
17 *
18 * OpenOffice.org is distributed in the hope that it will be useful,
19 * but WITHOUT ANY WARRANTY; without even the implied warranty of
20 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21 * GNU Lesser General Public License version 3 for more details
22 * (a copy is included in the LICENSE file that accompanied this code).
23 *
24 * You should have received a copy of the GNU Lesser General Public License
25 * version 3 along with OpenOffice.org. If not, see
26 * <http://www.openoffice.org/license.html>
27 * for a copy of the LGPLv3 License.
28 *
29 ************************************************************************/
30
31 // MARKER(update_precomp.py): autogen include statement, do not remove
32 #include "precompiled_extensions.hxx"
33 #include <vcl/waitobj.hxx>
34 #include <cppuhelper/interfacecontainer.hxx>
35 #include <com/sun/star/util/URL.hpp>
36 #include <osl/mutex.hxx>
37 #include <vcl/msgbox.hxx>
38 #include <tools/debug.hxx>
39 #include <vcl/stdtext.hxx>
40 #include <comphelper/types.hxx>
41 #include <comphelper/sequence.hxx>
42 #include "framectr.hxx"
43 #include "datman.hxx"
44 #include "bibresid.hxx"
45 #ifndef BIB_HRC
46 #include "bib.hrc"
47 #endif
48 #ifndef _TOOLKIT_UNOHLP_HXX
49 #include <toolkit/helper/vclunohelper.hxx>
50 #endif
51 #include "bibconfig.hxx"
52 #include <cppuhelper/implbase1.hxx> // helper for implementations
53 #include <vcl/svapp.hxx>
54 #ifndef EXTENSIONS_INC_EXTENSIO_HRC
55 #include <extensio.hrc>
56 #endif
57 #include <comphelper/processfactory.hxx>
58 #include <com/sun/star/form/XConfirmDeleteListener.hpp>
59 #include <com/sun/star/form/XFormController.hpp>
60 #include <com/sun/star/beans/PropertyState.hpp>
61 #include <com/sun/star/beans/PropertyValue.hpp>
62 #include <com/sun/star/ui/dialogs/XExecutableDialog.hpp>
63 #include <com/sun/star/sdbcx/Privilege.hpp>
64 #include <com/sun/star/sdbc/XResultSetUpdate.hpp>
65 #include <com/sun/star/sdb/RowChangeAction.hpp>
66 #include <com/sun/star/frame/CommandGroup.hpp>
67 #include <com/sun/star/datatransfer/clipboard/XClipboard.hpp>
68 #include <sot/exchange.hxx>
69 #include <sot/formats.hxx>
70 #include <vcl/edit.hxx>
71 #include <vos/mutex.hxx>
72
73 #include <hash_map>
74
75 using namespace osl;
76 using namespace cppu;
77 using namespace rtl;
78 using namespace com::sun::star::sdbc;
79 using namespace com::sun::star::frame;
80 using namespace com::sun::star::uno;
81 using namespace com::sun::star;
82
83 #define C2U(cChar) OUString::createFromAscii(cChar)
84
85 struct DispatchInfo
86 {
87 const char* pCommand;
88 sal_Int16 nGroupId;
89 sal_Bool bActiveConnection;
90 };
91
92 struct CacheDispatchInfo
93 {
94 sal_Int16 nGroupId;
95 sal_Bool bActiveConnection;
96 };
97
98 // Attention: commands must be sorted by command groups. Implementation is dependent
99 // on this!!
100 static DispatchInfo SupportedCommandsArray[] =
101 {
102 { ".uno:Undo" , frame::CommandGroup::EDIT , sal_False },
103 { ".uno:Cut" , frame::CommandGroup::EDIT , sal_False },
104 { ".uno:Copy" , frame::CommandGroup::EDIT , sal_False },
105 { ".uno:Paste" , frame::CommandGroup::EDIT , sal_False },
106 { ".uno:SelectAll" , frame::CommandGroup::EDIT , sal_False },
107 { ".uno:CloseDoc" , frame::CommandGroup::DOCUMENT , sal_False },
108 { ".uno:StatusBarVisible" , frame::CommandGroup::VIEW , sal_False },
109 { ".uno:AvailableToolbars" , frame::CommandGroup::VIEW , sal_False },
110 { ".uno:Bib/standardFilter" , frame::CommandGroup::DATA , sal_True },
111 { ".uno:Bib/DeleteRecord" , frame::CommandGroup::DATA , sal_True },
112 { ".uno:Bib/InsertRecord" , frame::CommandGroup::DATA , sal_True },
113 { ".uno:Bib/query" , frame::CommandGroup::DATA , sal_True },
114 { ".uno:Bib/autoFilter" , frame::CommandGroup::DATA , sal_True },
115 { ".uno:Bib/source" , frame::CommandGroup::DATA , sal_True },
116 { ".uno:Bib/removeFilter" , frame::CommandGroup::DATA , sal_True },
117 { ".uno:Bib/sdbsource" , frame::CommandGroup::DATA , sal_True },
118 { ".uno:Bib/Mapping" , frame::CommandGroup::DATA , sal_True },
119 { 0 , 0 , sal_False }
120 };
121
122 typedef ::std::hash_map< ::rtl::OUString, CacheDispatchInfo, rtl::OUStringHash, ::std::equal_to< ::rtl::OUString > > CmdToInfoCache;
123
124 SV_IMPL_PTRARR( BibStatusDispatchArr, BibStatusDispatchPtr );
125
126 const CmdToInfoCache& GetCommandToInfoCache()
127 {
128 static sal_Bool bCacheInitialized = sal_False;
129 static CmdToInfoCache aCmdToInfoCache;
130
131 if ( !bCacheInitialized )
132 {
133 ::osl::MutexGuard aGuard( ::osl::Mutex::getGlobalMutex() );
134 if ( !bCacheInitialized )
135 {
136 sal_Int32 i( 0 );
137 while ( SupportedCommandsArray[i].pCommand != 0 )
138 {
139 rtl::OUString aCommand( rtl::OUString::createFromAscii( SupportedCommandsArray[i].pCommand ));
140
141 CacheDispatchInfo aDispatchInfo;
142 aDispatchInfo.nGroupId = SupportedCommandsArray[i].nGroupId;
143 aDispatchInfo.bActiveConnection = SupportedCommandsArray[i].bActiveConnection;
144 aCmdToInfoCache.insert( CmdToInfoCache::value_type( aCommand, aDispatchInfo ));
145 ++i;
146 }
147 bCacheInitialized = sal_True;
148 }
149 }
150
151 return aCmdToInfoCache;
152 }
153
154
155 class BibFrameCtrl_Impl : public cppu::WeakImplHelper1 < XFrameActionListener >
156 {
157 public:
158 Mutex aMutex;
159 OMultiTypeInterfaceContainerHelper aLC;
160
161 BibFrameController_Impl* pController;
162
163 BibFrameCtrl_Impl()
164 : aLC( aMutex )
165 , pController(0)
166 {}
167
168 ~BibFrameCtrl_Impl();
169
170 virtual void SAL_CALL frameAction(const FrameActionEvent& aEvent) throw( RuntimeException );
171 virtual void SAL_CALL disposing( const lang::EventObject& Source ) throw (::com::sun::star::uno::RuntimeException);
172 };
173
174
175 BibFrameCtrl_Impl::~BibFrameCtrl_Impl()
176 {
177 }
178
179 void BibFrameCtrl_Impl::frameAction(const FrameActionEvent& aEvent) throw( uno::RuntimeException )
180 {
181 if ( pController && aEvent.Frame == pController->getFrame())
182 {
183 if(aEvent.Action == FrameAction_FRAME_ACTIVATED)
184 {
185 pController->activate();
186 }
187 else if(aEvent.Action == FrameAction_FRAME_DEACTIVATING)
188 {
189 pController->deactivate();
190 }
191 }
192 }
193
194 void BibFrameCtrl_Impl::disposing( const lang::EventObject& /*Source*/ )
195 throw (::com::sun::star::uno::RuntimeException)
196 {
197 vos::OGuard aGuard(Application::GetSolarMutex());
198 if ( pController )
199 pController->getFrame()->removeFrameActionListener( this );
200 }
201
202 BibFrameController_Impl::BibFrameController_Impl( const uno::Reference< awt::XWindow > & xComponent,
203 BibDataManager* pDataManager)
204 :xWindow( xComponent )
205 ,m_xDatMan( pDataManager )
206 ,pDatMan( pDataManager )
207 ,pBibMod(NULL)
208 {
209 Window* pParent = VCLUnoHelper::GetWindow( xWindow );
210 pParent->SetUniqueId(UID_BIB_FRAME_WINDOW);
211 bDisposing=sal_False;
212 bHierarchical=sal_True;
213 pImp = new BibFrameCtrl_Impl;
214 pImp->pController = this;
215 pImp->acquire();
216 }
217
218 BibFrameController_Impl::~BibFrameController_Impl()
219 {
220 pImp->pController = NULL;
221 pImp->release();
222 delete pDatMan;
223 if(pBibMod)
224 CloseBibModul(pBibMod);
225 }
226
227 ::rtl::OUString SAL_CALL BibFrameController_Impl::getImplementationName() throw (::com::sun::star::uno::RuntimeException)
228 {
229 return ::rtl::OUString::createFromAscii("com.sun.star.comp.extensions.Bibliography");
230 }
231
232 sal_Bool SAL_CALL BibFrameController_Impl::supportsService( const ::rtl::OUString& sServiceName ) throw (::com::sun::star::uno::RuntimeException)
233 {
234 return (
235 sServiceName.equalsAscii("com.sun.star.frame.Bibliography") ||
236 sServiceName.equalsAscii("com.sun.star.frame.Controller")
237 );
238 }
239
240 ::com::sun::star::uno::Sequence< ::rtl::OUString > SAL_CALL BibFrameController_Impl::getSupportedServiceNames() throw (::com::sun::star::uno::RuntimeException)
241 {
242 // return only top level services ...
243 // base services are included there and should be asked by uno-rtti.
244 ::com::sun::star::uno::Sequence< ::rtl::OUString > lNames(1);
245 lNames[0] = ::rtl::OUString::createFromAscii("com.sun.star.frame.Bibliography");
246 return lNames;
247 }
248
249 void BibFrameController_Impl::attachFrame( const uno::Reference< XFrame > & xArg ) throw (::com::sun::star::uno::RuntimeException)
250 {
251 xFrame = xArg;
252 xFrame->addFrameActionListener( pImp );
253 }
254
255 sal_Bool BibFrameController_Impl::attachModel( const uno::Reference< XModel > & /*xModel*/ ) throw (::com::sun::star::uno::RuntimeException)
256 {
257 return sal_False;
258 }
259
260 sal_Bool BibFrameController_Impl::suspend( sal_Bool bSuspend ) throw (::com::sun::star::uno::RuntimeException)
261 {
262 if ( bSuspend )
263 getFrame()->removeFrameActionListener( pImp );
264 else
265 getFrame()->addFrameActionListener( pImp );
266 return sal_True;
267 }
268
269 uno::Any BibFrameController_Impl::getViewData() throw (::com::sun::star::uno::RuntimeException)
270 {
271 return uno::Any();
272 }
273
274 void BibFrameController_Impl::restoreViewData( const uno::Any& /*Value*/ ) throw (::com::sun::star::uno::RuntimeException)
275 {
276 }
277
278 uno::Reference< XFrame > BibFrameController_Impl::getFrame() throw (::com::sun::star::uno::RuntimeException)
279 {
280 return xFrame;
281 }
282
283 uno::Reference< XModel > BibFrameController_Impl::getModel() throw (::com::sun::star::uno::RuntimeException)
284 {
285 return uno::Reference< XModel > ();
286 }
287
288 void BibFrameController_Impl::dispose() throw (::com::sun::star::uno::RuntimeException)
289 {
290 bDisposing = sal_True;
291 lang::EventObject aObject;
292 aObject.Source = (XController*)this;
293 pImp->aLC.disposeAndClear(aObject);
294 m_xDatMan = 0;
295 pDatMan = 0;
296 aStatusListeners.DeleteAndDestroy( 0, aStatusListeners.Count() );
297 }
298
299 void BibFrameController_Impl::addEventListener( const uno::Reference< lang::XEventListener > & aListener ) throw (::com::sun::star::uno::RuntimeException)
300 {
301 pImp->aLC.addInterface( ::getCppuType((const Reference< lang::XEventListener >*)0), aListener );
302 }
303
304 void BibFrameController_Impl::removeEventListener( const uno::Reference< lang::XEventListener > & aListener ) throw (::com::sun::star::uno::RuntimeException)
305 {
306 pImp->aLC.removeInterface( ::getCppuType((const Reference< lang::XEventListener >*)0), aListener );
307 }
308
309 uno::Reference< frame::XDispatch > BibFrameController_Impl::queryDispatch( const util::URL& aURL, const rtl::OUString& /*aTarget*/, sal_Int32 /*nSearchFlags*/ ) throw (::com::sun::star::uno::RuntimeException)
310 {
311 if ( !bDisposing )
312 {
313 const CmdToInfoCache& rCmdCache = GetCommandToInfoCache();
314 CmdToInfoCache::const_iterator pIter = rCmdCache.find( aURL.Complete );
315 if ( pIter != rCmdCache.end() )
316 {
317 if (( pDatMan->HasActiveConnection() ) ||
318 ( !pIter->second.bActiveConnection ))
319 return (frame::XDispatch*) this;
320 }
321 }
322
323 return uno::Reference< frame::XDispatch > ();
324 }
325
326 uno::Sequence<uno::Reference< XDispatch > > BibFrameController_Impl::queryDispatches( const uno::Sequence<DispatchDescriptor>& aDescripts ) throw (::com::sun::star::uno::RuntimeException)
327 {
328 uno::Sequence< uno::Reference< XDispatch > > aDispatches( aDescripts.getLength() );
329 for ( sal_Int32 i=0; i<aDescripts.getLength(); ++i )
330 aDispatches[i] = queryDispatch( aDescripts[i].FeatureURL, aDescripts[i].FrameName, aDescripts[i].SearchFlags );
331 return aDispatches;
332 }
333
334 uno::Sequence< ::sal_Int16 > SAL_CALL BibFrameController_Impl::getSupportedCommandGroups()
335 throw (::com::sun::star::uno::RuntimeException)
336 {
337 uno::Sequence< ::sal_Int16 > aDispatchInfo( 4 );
338
339 aDispatchInfo[0] = frame::CommandGroup::EDIT;
340 aDispatchInfo[1] = frame::CommandGroup::DOCUMENT;
341 aDispatchInfo[2] = frame::CommandGroup::DATA;
342 aDispatchInfo[3] = frame::CommandGroup::VIEW;
343
344 return aDispatchInfo;
345 }
346
347 uno::Sequence< frame::DispatchInformation > SAL_CALL BibFrameController_Impl::getConfigurableDispatchInformation( ::sal_Int16 nCommandGroup )
348 throw (::com::sun::star::uno::RuntimeException)
349 {
350 const CmdToInfoCache& rCmdCache = GetCommandToInfoCache();
351
352 sal_Bool bGroupFound( sal_False );
353 frame::DispatchInformation aDispatchInfo;
354 std::list< frame::DispatchInformation > aDispatchInfoList;
355
356 if (( nCommandGroup == frame::CommandGroup::EDIT ) ||
357 ( nCommandGroup == frame::CommandGroup::DOCUMENT ) ||
358 ( nCommandGroup == frame::CommandGroup::DATA ) ||
359 ( nCommandGroup == frame::CommandGroup::VIEW ))
360 {
361 CmdToInfoCache::const_iterator pIter = rCmdCache.begin();
362 while ( pIter != rCmdCache.end() )
363 {
364 if ( pIter->second.nGroupId == nCommandGroup )
365 {
366 bGroupFound = sal_True;
367 aDispatchInfo.Command = pIter->first;
368 aDispatchInfo.GroupId = pIter->second.nGroupId;
369 aDispatchInfoList.push_back( aDispatchInfo );
370 }
371 else if ( bGroupFound )
372 break;
373
374 ++pIter;
375 }
376 }
377
378 ::com::sun::star::uno::Sequence< ::com::sun::star::frame::DispatchInformation > aSeq =
379 comphelper::containerToSequence< ::com::sun::star::frame::DispatchInformation, std::list< ::com::sun::star::frame::DispatchInformation > >( aDispatchInfoList );
380
381 return aSeq;
382 }
383
384 sal_Bool canInsertRecords(const Reference< beans::XPropertySet>& _rxCursorSet)
385 {
386 sal_Int32 nPriv = 0;
387 _rxCursorSet->getPropertyValue(C2U("Privileges")) >>= nPriv;
388 return ((_rxCursorSet.is() && (nPriv & sdbcx::Privilege::INSERT) != 0));
389 }
390 /* -----------------------------08.05.2002 08:58------------------------------
391
392 ---------------------------------------------------------------------------*/
393 sal_Bool BibFrameController_Impl::SaveModified(const Reference< form::XFormController>& xController)
394 {
395 if (!xController.is())
396 return sal_False;
397 sal_Bool bInserted = sal_False;
398
399 Reference< XResultSetUpdate> _xCursor = Reference< XResultSetUpdate>(xController->getModel(), UNO_QUERY);
400
401 if (!_xCursor.is())
402 return sal_False;
403
404 Reference< beans::XPropertySet> _xSet = Reference< beans::XPropertySet>(_xCursor, UNO_QUERY);
405 if (!_xSet.is())
406 return sal_False;
407
408 // muß gespeichert werden ?
409 sal_Bool bIsNew = ::comphelper::getBOOL(_xSet->getPropertyValue(C2U("IsNew")));
410 sal_Bool bIsModified = ::comphelper::getBOOL(_xSet->getPropertyValue(C2U("IsModified")));
411 sal_Bool bResult = !bIsModified;
412 if (bIsModified)
413 {
414 try
415 {
416 if (bIsNew)
417 _xCursor->insertRow();
418 else
419 _xCursor->updateRow();
420 bResult = sal_True;
421 }
422 catch(Exception&)
423 {
424 DBG_ERROR("SaveModified: Exception occured!");
425 }
426
427 bInserted = bIsNew && bResult;
428 }
429 return bResult;
430 }
431
432 Window* lcl_GetFocusChild( Window* pParent )
433 {
434 USHORT nChildren = pParent->GetChildCount();
435 for( USHORT nChild = 0; nChild < nChildren; ++nChild)
436 {
437 Window* pChild = pParent->GetChild( nChild );
438 if(pChild->HasFocus())
439 return pChild;
440 Window* pSubChild = lcl_GetFocusChild( pChild );
441 if(pSubChild)
442 return pSubChild;
443 }
444 return 0;
445 }
446
447 //class XDispatch
448 void BibFrameController_Impl::dispatch(const util::URL& _rURL, const uno::Sequence< beans::PropertyValue >& aArgs) throw (::com::sun::star::uno::RuntimeException)
449 {
450 if ( !bDisposing )
451 {
452 vos::OGuard aGuard(Application::GetSolarMutex());
453 Window* pParent = VCLUnoHelper::GetWindow( xWindow );
454 WaitObject aWaitObject( pParent );
455
456 String aCommand( _rURL.Path);
457 if(aCommand.EqualsAscii("Bib/Mapping"))
458 {
459 pDatMan->CreateMappingDialog(pParent);
460 }
461 else if(aCommand.EqualsAscii("Bib/source"))
462 {
463 ChangeDataSource(aArgs);
464 }
465 else if(aCommand.EqualsAscii("Bib/sdbsource"))
466 {
467 rtl::OUString aURL = pDatMan->CreateDBChangeDialog(pParent);
468 if(aURL.getLength())
469 {
470 try
471 {
472 uno::Sequence< beans::PropertyValue > aNewDataSource(2);
473 beans::PropertyValue* pProps = aNewDataSource.getArray();
474 pProps[0].Value <<= rtl::OUString();
475 pProps[1].Value <<= aURL;
476 ChangeDataSource(aNewDataSource);
477 }
478 catch(const Exception&)
479 {
480 DBG_ERROR("Exception catched while changing the data source");
481 }
482 }
483 }
484 else if(aCommand.EqualsAscii("Bib/autoFilter"))
485 {
486 sal_uInt16 nCount = aStatusListeners.Count();
487 for ( sal_uInt16 n=0; n<nCount; n++ )
488 {
489 BibStatusDispatch *pObj = aStatusListeners[n];
490 if ( pObj->aURL.Path == C2U("Bib/removeFilter") )
491 {
492 FeatureStateEvent aEvent;
493 aEvent.FeatureURL = pObj->aURL;
494 aEvent.IsEnabled = sal_True;
495 aEvent.Requery = sal_False;
496 aEvent.Source = (XDispatch *) this;
497 pObj->xListener->statusChanged( aEvent );
498 //break; because there are more than one
499 }
500 }
501
502 const beans::PropertyValue* pPropertyValue = aArgs.getConstArray();
503 uno::Any aValue=pPropertyValue[0].Value;
504 rtl::OUString aQuery;
505 aValue >>= aQuery;
506
507 aValue=pPropertyValue[1].Value;
508 rtl::OUString aQueryField;
509 aValue >>= aQueryField;
510 BibConfig* pConfig = BibModul::GetConfig();
511 pConfig->setQueryField(aQueryField);
512 pDatMan->startQueryWith(aQuery);
513 }
514 else if(aCommand.EqualsAscii("Bib/standardFilter"))
515 {
516 try
517 {
518 uno::Reference< lang::XMultiServiceFactory > xORB = ::comphelper::getProcessServiceFactory();
519
520 // build the arguments for the filter dialog to be created
521 Sequence< Any > aDialogCreationArgs( 3 );
522 Any* pDialogCreationArgs = aDialogCreationArgs.getArray();
523 // the query composer
524 *pDialogCreationArgs++ <<= beans::PropertyValue( ::rtl::OUString::createFromAscii( "QueryComposer" ),
525 -1,
526 makeAny( pDatMan->getParser() ),
527 beans::PropertyState_DIRECT_VALUE
528 );
529
530 // the rowset
531 *pDialogCreationArgs++ <<= beans::PropertyValue( ::rtl::OUString::createFromAscii( "RowSet" ),
532 -1,
533 makeAny( pDatMan->getForm() ),
534 beans::PropertyState_DIRECT_VALUE
535 );
536 // the parent window for the dialog
537 *pDialogCreationArgs++ <<= beans::PropertyValue( ::rtl::OUString::createFromAscii( "ParentWindow" ),
538 -1,
539 makeAny( xWindow ),
540 beans::PropertyState_DIRECT_VALUE
541 );
542
543 // create the dialog object
544 const ::rtl::OUString sDialogServiceName = ::rtl::OUString::createFromAscii( "com.sun.star.sdb.FilterDialog" );
545 uno::Reference< uno::XInterface > xDialog = xORB->createInstanceWithArguments(
546 sDialogServiceName,
547 aDialogCreationArgs
548 );
549 if ( !xDialog.is() )
550 {
551 ShowServiceNotAvailableError( VCLUnoHelper::GetWindow( xWindow ), sDialogServiceName, sal_True );
552 }
553 else
554 {
555 // execute it
556 uno::Reference< ui::dialogs::XExecutableDialog > xExec( xDialog, UNO_QUERY );
557 DBG_ASSERT( xExec.is(), "BibFrameController_Impl::dispatch: missing an interface on the dialog!" );
558 if ( xExec.is() )
559 if ( xExec->execute( ) )
560 {
561 // the dialog has been executed successfully, and the filter on the query composer
562 // has been changed
563 ::rtl::OUString sNewFilter = pDatMan->getParser()->getFilter();
564 pDatMan->setFilter( sNewFilter );
565 }
566 }
567 }
568 catch( const uno::Exception& )
569 {
570 DBG_ERROR( "BibFrameController_Impl::dispatch: caught an exception!" );
571 }
572
573 sal_uInt16 nCount = aStatusListeners.Count();
574 for ( sal_uInt16 n=0; n<nCount; n++ )
575 {
576 BibStatusDispatch *pObj = aStatusListeners[n];
577 if ( pObj->aURL.Path == C2U("Bib/removeFilter") && pDatMan->getParser().is())
578 {
579 FeatureStateEvent aEvent;
580 aEvent.FeatureURL = pObj->aURL;
581 aEvent.IsEnabled = 0 != pDatMan->getParser()->getFilter().getLength();
582 aEvent.Requery = sal_False;
583 aEvent.Source = (XDispatch *) this;
584 pObj->xListener->statusChanged( aEvent );
585 }
586 }
587 }
588 else if(aCommand.EqualsAscii("Bib/removeFilter"))
589 {
590 RemoveFilter();
591 }
592 else if(_rURL.Complete.equalsAsciiL(RTL_CONSTASCII_STRINGPARAM("slot:5503")) ||
593 aCommand.EqualsAscii("CloseDoc"))
594 {
595 Application::PostUserEvent( STATIC_LINK( this, BibFrameController_Impl,
596 DisposeHdl ), 0 );
597
598 }
599 else if(aCommand.EqualsAscii("Bib/InsertRecord"))
600 {
601 Reference<form::XFormController > xFormCtrl = pDatMan->GetFormController();
602 if(SaveModified(xFormCtrl))
603 {
604 try
605 {
606 Reference< sdbc::XResultSet > xCursor( pDatMan->getForm(), UNO_QUERY );
607 xCursor->last();
608
609 Reference< XResultSetUpdate > xUpdateCursor( pDatMan->getForm(), UNO_QUERY );
610 xUpdateCursor->moveToInsertRow();
611 }
612 catch(Exception&)
613 {
614 DBG_ERROR("Exception in last() or moveToInsertRow()");
615 }
616 }
617 }
618 else if(aCommand.EqualsAscii("Bib/DeleteRecord"))
619 {
620 Reference< ::com::sun::star::sdbc::XResultSet > xCursor(pDatMan->getForm(), UNO_QUERY);
621 Reference< XResultSetUpdate > xUpdateCursor(xCursor, UNO_QUERY);
622 Reference< beans::XPropertySet > xSet(pDatMan->getForm(), UNO_QUERY);
623 sal_Bool bIsNew = ::comphelper::getBOOL(xSet->getPropertyValue(C2U("IsNew")));
624 if(!bIsNew)
625 {
626 sal_uInt32 nCount = 0;
627 xSet->getPropertyValue(C2U("RowCount")) >>= nCount;
628 // naechste position festellen
629 sal_Bool bSuccess = sal_False;
630 sal_Bool bLeft = sal_False;
631 sal_Bool bRight = sal_False;
632 try
633 {
634 bLeft = xCursor->isLast() && nCount > 1;
635 bRight= !xCursor->isLast();
636 // ask for confirmation
637 Reference< frame::XController > xCtrl = pImp->pController;
638 Reference< form::XConfirmDeleteListener > xConfirm(pDatMan->GetFormController(),UNO_QUERY);
639 if (xConfirm.is())
640 {
641 sdb::RowChangeEvent aEvent;
642 aEvent.Source = Reference< XInterface > (xCursor, UNO_QUERY);
643 aEvent.Action = sdb::RowChangeAction::DELETE;
644 aEvent.Rows = 1;
645 bSuccess = xConfirm->confirmDelete(aEvent);
646 }
647
648 // das Ding loeschen
649 if (bSuccess)
650 xUpdateCursor->deleteRow();
651 }
652 catch(Exception&)
653 {
654 bSuccess = sal_False;
655 }
656 if (bSuccess)
657 {
658 if (bLeft || bRight)
659 xCursor->relative(bRight ? 1 : -1);
660 else
661 {
662 sal_Bool bCanInsert = canInsertRecords(xSet);
663 // kann noch ein Datensatz eingefuegt weden
664 try
665 {
666 if (bCanInsert)
667 xUpdateCursor->moveToInsertRow();
668 else
669 // Datensatz bewegen um Stati neu zu setzen
670 xCursor->first();
671 }
672 catch(Exception&)
673 {
674 DBG_ERROR("DeleteRecord : exception caught !");
675 }
676 }
677 }
678 }
679 }
680 else if(aCommand.EqualsAscii("Cut"))
681 {
682 Window* pChild = lcl_GetFocusChild( VCLUnoHelper::GetWindow( xWindow ) );
683 if(pChild)
684 {
685 KeyEvent aEvent( 0, KEYFUNC_CUT );
686 pChild->KeyInput( aEvent );
687 }
688 }
689 else if(aCommand.EqualsAscii("Copy"))
690 {
691 Window* pChild = lcl_GetFocusChild( VCLUnoHelper::GetWindow( xWindow ) );
692 if(pChild)
693 {
694 KeyEvent aEvent( 0, KEYFUNC_COPY );
695 pChild->KeyInput( aEvent );
696 }
697 }
698 else if(aCommand.EqualsAscii("Paste"))
699 {
700 Window* pChild = lcl_GetFocusChild( VCLUnoHelper::GetWindow( xWindow ) );
701 if(pChild)
702 {
703 KeyEvent aEvent( 0, KEYFUNC_PASTE );
704 pChild->KeyInput( aEvent );
705 }
706 }
707 }
708 }
709 IMPL_STATIC_LINK( BibFrameController_Impl, DisposeHdl, void*, EMPTYARG )
710 {
711 pThis->xFrame->dispose();
712 return 0;
713 };
714
715 //-----------------------------------------------------------------------------
716 void BibFrameController_Impl::addStatusListener(
717 const uno::Reference< frame::XStatusListener > & aListener,
718 const util::URL& aURL)
719 throw (::com::sun::star::uno::RuntimeException)
720 {
721 BibConfig* pConfig = BibModul::GetConfig();
722 // create a new Reference and insert into listener array
723 aStatusListeners.Insert( new BibStatusDispatch( aURL, aListener ), aStatusListeners.Count() );
724
725 // den ersten Status synchron zusenden
726 FeatureStateEvent aEvent;
727 aEvent.FeatureURL = aURL;
728 aEvent.Requery = sal_False;
729 aEvent.Source = (XDispatch *) this;
730 if ( aURL.Path == C2U("StatusBarVisible") )
731 {
732 aEvent.IsEnabled = sal_False;
733 aEvent.State <<= sal_Bool( sal_False );
734 }
735 else if ( aURL.Path == C2U("Bib/hierarchical") )
736 {
737 aEvent.IsEnabled = sal_True;
738 const char* pHier = bHierarchical? "" : "*" ;
739 aEvent.State <<= rtl::OUString::createFromAscii(pHier);
740 }
741 else if(aURL.Path == C2U("Bib/MenuFilter"))
742 {
743 aEvent.IsEnabled = sal_True;
744 aEvent.FeatureDescriptor=pDatMan->getQueryField();
745
746 uno::Sequence<rtl::OUString> aStringSeq=pDatMan->getQueryFields();
747 aEvent.State.setValue(&aStringSeq,::getCppuType((uno::Sequence<rtl::OUString>*)0));
748
749 }
750 else if ( aURL.Path == C2U("Bib/source"))
751 {
752 aEvent.IsEnabled = sal_True;
753 aEvent.FeatureDescriptor=pDatMan->getActiveDataTable();
754
755 uno::Sequence<rtl::OUString> aStringSeq=pDatMan->getDataSources();
756 aEvent.State.setValue(&aStringSeq,::getCppuType((uno::Sequence<rtl::OUString>*)0));
757 }
758 else if(aURL.Path == C2U("Bib/sdbsource") ||
759 aURL.Path == C2U("Bib/Mapping") ||
760 aURL.Path == C2U("Bib/autoFilter") ||
761 aURL.Path.equalsAscii("Bib/standardFilter"))
762 {
763 aEvent.IsEnabled = sal_True;
764 }
765 else if(aURL.Path == C2U("Bib/query"))
766 {
767 aEvent.IsEnabled = sal_True;
768 aEvent.State <<= pConfig->getQueryText();
769 }
770 else if (aURL.Path == C2U("Bib/removeFilter") )
771 {
772 rtl::OUString aFilterStr=pDatMan->getFilter();
773 aEvent.IsEnabled = (aFilterStr.getLength() > 0);
774 }
775 else if(aURL.Path == C2U("Cut"))
776 {
777 Window* pChild = lcl_GetFocusChild( VCLUnoHelper::GetWindow( xWindow ) );
778 Edit* pEdit = dynamic_cast<Edit*>( pChild );
779 if( pEdit )
780 aEvent.IsEnabled = !pEdit->IsReadOnly() && pEdit->GetSelection().Len();
781 }
782 if(aURL.Path == C2U("Copy"))
783 {
784 Window* pChild = lcl_GetFocusChild( VCLUnoHelper::GetWindow( xWindow ) );
785 Edit* pEdit = dynamic_cast<Edit*>( pChild );
786 if( pEdit )
787 aEvent.IsEnabled = pEdit->GetSelection().Len() > 0;
788 }
789 else if(aURL.Path == C2U("Paste") )
790 {
791 aEvent.IsEnabled = sal_False;
792 Window* pChild = lcl_GetFocusChild( VCLUnoHelper::GetWindow( xWindow ) );
793 if(pChild)
794 {
795 uno::Reference< datatransfer::clipboard::XClipboard > xClip = pChild->GetClipboard();
796 if(xClip.is())
797 {
798 uno::Reference< datatransfer::XTransferable > xDataObj;
799 const sal_uInt32 nRef = Application::ReleaseSolarMutex();
800 try
801 {
802 xDataObj = xClip->getContents();
803 }
804 catch( const uno::Exception& )
805 {
806 }
807 Application::AcquireSolarMutex( nRef );
808
809 if ( xDataObj.is() )
810 {
811 datatransfer::DataFlavor aFlavor;
812 SotExchange::GetFormatDataFlavor( SOT_FORMAT_STRING, aFlavor );
813 try
814 {
815 uno::Any aData = xDataObj->getTransferData( aFlavor );
816 ::rtl::OUString aText;
817 aData >>= aText;
818 aEvent.IsEnabled = aText.getLength() > 0;
819 }
820 catch( const uno::Exception& )
821 {
822 }
823 }
824 }
825 uno::Reference< datatransfer::XTransferable > xContents = xClip->getContents( );
826 }
827 }
828 else if(aURL.Path == C2U("Bib/DeleteRecord"))
829 {
830 Reference< ::com::sun::star::sdbc::XResultSet > xCursor(pDatMan->getForm(), UNO_QUERY);
831 Reference< XResultSetUpdate > xUpdateCursor(xCursor, UNO_QUERY);
832 Reference< beans::XPropertySet > xSet(pDatMan->getForm(), UNO_QUERY);
833 sal_Bool bIsNew = ::comphelper::getBOOL(xSet->getPropertyValue(C2U("IsNew")));
834 if(!bIsNew)
835 {
836 sal_uInt32 nCount = 0;
837 xSet->getPropertyValue(C2U("RowCount")) >>= nCount;
838 aEvent.IsEnabled = nCount > 0;
839 }
840 }
841 else if (aURL.Path == C2U("Bib/InsertRecord"))
842 {
843 Reference< beans::XPropertySet > xSet(pDatMan->getForm(), UNO_QUERY);
844 aEvent.IsEnabled = canInsertRecords(xSet);
845 }
846 aListener->statusChanged( aEvent );
847 }
848 //-----------------------------------------------------------------------------
849 void BibFrameController_Impl::removeStatusListener(
850 const uno::Reference< frame::XStatusListener > & aObject, const util::URL& aURL)
851 throw (::com::sun::star::uno::RuntimeException)
852 {
853 // search listener array for given listener
854 // for checking equality always "cast" to XInterface
855 if ( !bDisposing )
856 {
857 sal_uInt16 nCount = aStatusListeners.Count();
858 for ( sal_uInt16 n=0; n<nCount; n++ )
859 {
860 BibStatusDispatch *pObj = aStatusListeners[n];
861 sal_Bool bFlag=pObj->xListener.is();
862 if (!bFlag || (pObj->xListener == aObject &&
863 ( !aURL.Complete.getLength() || pObj->aURL.Path == aURL.Path )))
864 {
865 aStatusListeners.DeleteAndDestroy( n );
866 break;
867 }
868 }
869 }
870 }
871 //-----------------------------------------------------------------------------
872 void BibFrameController_Impl::RemoveFilter()
873 {
874 rtl::OUString aQuery;
875 pDatMan->startQueryWith(aQuery);
876
877 sal_uInt16 nCount = aStatusListeners.Count();
878
879 sal_Bool bRemoveFilter=sal_False;
880 sal_Bool bQueryText=sal_False;
881
882 for ( sal_uInt16 n=0; n<nCount; n++ )
883 {
884 BibStatusDispatch *pObj = aStatusListeners[n];
885 if ( pObj->aURL.Path == C2U("Bib/removeFilter") )
886 {
887 FeatureStateEvent aEvent;
888 aEvent.FeatureURL = pObj->aURL;
889 aEvent.IsEnabled = sal_False;
890 aEvent.Requery = sal_False;
891 aEvent.Source = (XDispatch *) this;
892 pObj->xListener->statusChanged( aEvent );
893 bRemoveFilter=sal_True;
894 }
895 else if(pObj->aURL.Path == C2U("Bib/query"))
896 {
897 FeatureStateEvent aEvent;
898 aEvent.FeatureURL = pObj->aURL;
899 aEvent.IsEnabled = sal_True;
900 aEvent.Requery = sal_False;
901 aEvent.Source = (XDispatch *) this;
902 aEvent.State <<= aQuery;
903 pObj->xListener->statusChanged( aEvent );
904 bQueryText=sal_True;
905 }
906
907 if(bRemoveFilter && bQueryText)
908 break;
909
910 }
911 }
912 //-----------------------------------------------------------------------------
913 void BibFrameController_Impl::ChangeDataSource(const uno::Sequence< beans::PropertyValue >& aArgs)
914 {
915 const beans::PropertyValue* pPropertyValue = aArgs.getConstArray();
916 uno::Any aValue=pPropertyValue[0].Value;
917 rtl::OUString aDBTableName;
918 aValue >>= aDBTableName;
919
920
921 if(aArgs.getLength() > 1)
922 {
923 uno::Any aDB = pPropertyValue[1].Value;
924 rtl::OUString aURL;
925 aDB >>= aURL;
926 pDatMan->setActiveDataSource(aURL);
927 aDBTableName = pDatMan->getActiveDataTable();
928 }
929 else
930 {
931 m_xDatMan->unload();
932 pDatMan->setActiveDataTable(aDBTableName);
933 pDatMan->updateGridModel();
934 m_xDatMan->load();
935 }
936
937
938 sal_uInt16 nCount = aStatusListeners.Count();
939
940 sal_Bool bMenuFilter=sal_False;
941 sal_Bool bQueryText=sal_False;
942 for ( sal_uInt16 n=0; n<nCount; n++ )
943 {
944 BibStatusDispatch *pObj = aStatusListeners[n];
945 if(COMPARE_EQUAL == pObj->aURL.Path.compareToAscii("Bib/MenuFilter"))
946 {
947 FeatureStateEvent aEvent;
948 aEvent.FeatureURL = pObj->aURL;
949 aEvent.IsEnabled = sal_True;
950 aEvent.Requery = sal_False;
951 aEvent.Source = (XDispatch *) this;
952 aEvent.FeatureDescriptor=pDatMan->getQueryField();
953
954 uno::Sequence<rtl::OUString> aStringSeq=pDatMan->getQueryFields();
955 aEvent.State = makeAny( aStringSeq );
956
957 pObj->xListener->statusChanged( aEvent );
958 bMenuFilter=sal_True;
959 }
960 else if(COMPARE_EQUAL == pObj->aURL.Path.compareToAscii("Bib/query"))
961 {
962 FeatureStateEvent aEvent;
963 aEvent.FeatureURL = pObj->aURL;
964 aEvent.IsEnabled = sal_True;
965 aEvent.Requery = sal_False;
966 aEvent.Source = (XDispatch *) this;
967 BibConfig* pConfig = BibModul::GetConfig();
968 aEvent.State <<= pConfig->getQueryText();
969 pObj->xListener->statusChanged( aEvent );
970 bQueryText=sal_True;
971 }
972
973 if (bMenuFilter && bQueryText)
974 break;
975
976 }
977 }
978
979 void BibFrameController_Impl::activate()
980 {
981 }
982 void BibFrameController_Impl::deactivate()
983 {
984 }
985
986
vba interoperability for OOo