?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
update dev300-m58
[ooovba.git] / svx / source / cui / dbregister.cxx
blob0a38f57481ebfc884d565f56fcc36471724eade7
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: dbregister.cxx,v $
10 * $Revision: 1.16 $
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_svx.hxx"
33
34 #ifdef SVX_DLLIMPLEMENTATION
35 #undef SVX_DLLIMPLEMENTATION
36 #endif
37
38 #include "dbregister.hxx"
39 #include "dbregister.hrc"
40 #include "dbregistersettings.hxx"
41 #include "connpooloptions.hxx"
42 #ifndef SVTOOLS_FILENOTATION_HXX_
43 #include <svtools/filenotation.hxx>
44 #endif
45 #include <svx/dialogs.hrc>
46 #include <svx/svxids.hrc>
47 #include "helpid.hrc"
48 #include <svtools/editbrowsebox.hxx>
49 #include <svx/dialogs.hrc>
50 #include <vcl/field.hxx>
51 #include <svtools/eitem.hxx>
52 #include <comphelper/processfactory.hxx>
53 #include <com/sun/star/uno/Exception.hpp>
54 #include <com/sun/star/lang/XMultiServiceFactory.hpp>
55 #include <com/sun/star/ui/dialogs/XFilePicker.hpp>
56 #include <com/sun/star/ui/dialogs/XFilterManager.hpp>
57 #include <com/sun/star/ui/dialogs/ExecutableDialogResults.hpp>
58 #include <vcl/msgbox.hxx>
59 #include <svtools/svtabbx.hxx>
60
61 #include <svtools/itemset.hxx>
62 #include "doclinkdialog.hxx"
63 #include <tools/urlobj.hxx>
64 #include <unotools/localfilehelper.hxx>
65 #include "optHeaderTabListbox.hxx"
66 #include <sfx2/docfilt.hxx>
67 #include <svx/dialmgr.hxx>
68 #include "dbregisterednamesconfig.hxx"
69
70 #define TAB_WIDTH1 80
71 #define TAB_WIDTH_MIN 10
72 #define TAB_WIDTH2 1000
73 #define ITEMID_TYPE 1
74 #define ITEMID_PATH 2
75 //........................................................................
76 namespace svx
77 {
78 //........................................................................
79
80 using namespace ::com::sun::star::lang;
81 using namespace ::com::sun::star::ui::dialogs;
82 using namespace ::com::sun::star::uno;
83 using namespace ::svt;
84
85 // class RegistrationItemSetHolder -------------------------------------------------
86
87 RegistrationItemSetHolder::RegistrationItemSetHolder( const SfxItemSet& _rMasterSet )
88 :m_aRegistrationItems( _rMasterSet )
89 {
90 DbRegisteredNamesConfig::GetOptions( m_aRegistrationItems );
91 }
92
93 RegistrationItemSetHolder::~RegistrationItemSetHolder()
94 {
95 }
96
97 // class DatabaseRegistrationDialog ------------------------------------------------
98
99 DatabaseRegistrationDialog::DatabaseRegistrationDialog( Window* pParent, const SfxItemSet& rInAttrs )
100 :RegistrationItemSetHolder( rInAttrs )
101 ,SfxSingleTabDialog( pParent, getRegistrationItems(), RID_SFXPAGE_DBREGISTER )
102 {
103 SfxTabPage* page = DbRegistrationOptionsPage::Create( this, getRegistrationItems() );
104
105 SetTabPage( page );
106 SetText( page->GetText() );
107 }
108
109 DatabaseRegistrationDialog::~DatabaseRegistrationDialog()
110 {
111 }
112
113 short DatabaseRegistrationDialog::Execute()
114 {
115 short result = SfxSingleTabDialog::Execute();
116 if ( result == RET_OK )
117 {
118 DBG_ASSERT( GetOutputItemSet(), "DatabaseRegistrationDialog::Execute: no output items!" );
119 if ( GetOutputItemSet() )
120 DbRegisteredNamesConfig::SetOptions( *GetOutputItemSet() );
121 }
122 return result;
123 }
124
125 // class DbRegistrationOptionsPage --------------------------------------------------
126
127 DbRegistrationOptionsPage::DbRegistrationOptionsPage( Window* pParent, const SfxItemSet& rSet ) :
128
129 SfxTabPage( pParent, SVX_RES( RID_SFXPAGE_DBREGISTER), rSet ),
130
131 aTypeText ( this, SVX_RES( FT_TYPE ) ),
132 aPathText ( this, SVX_RES( FT_PATH ) ),
133 aPathCtrl ( this, SVX_RES( LB_PATH ) ),
134 m_aNew ( this, SVX_RES( BTN_NEW ) ),
135 m_aEdit ( this, SVX_RES( BTN_EDIT ) ),
136 m_aDelete ( this, SVX_RES( BTN_DELETE ) ),
137 aStdBox ( this, SVX_RES( GB_STD ) ),
138 pHeaderBar ( NULL ),
139 pPathBox ( NULL ),
140 m_pCurEntry ( NULL ),
141 m_nOldCount ( 0 ),
142 m_bModified ( FALSE )
143 {
144 m_aNew.SetClickHdl( LINK( this, DbRegistrationOptionsPage, NewHdl ) );
145 m_aEdit.SetClickHdl( LINK( this, DbRegistrationOptionsPage, EditHdl ) );
146 m_aDelete.SetClickHdl( LINK( this, DbRegistrationOptionsPage, DeleteHdl ) );
147
148 Size aBoxSize = aPathCtrl.GetOutputSizePixel();
149
150
151 WinBits nBits = WB_SORT | WB_HSCROLL | WB_CLIPCHILDREN | WB_TABSTOP;
152 pPathBox = new ::svx::OptHeaderTabListBox( &aPathCtrl, nBits );
153
154 pHeaderBar = new HeaderBar( &aPathCtrl, WB_BUTTONSTYLE | WB_BOTTOMBORDER );
155 pHeaderBar->SetPosSizePixel( Point( 0, 0 ), Size( aBoxSize.Width(), 16 ) );
156 pHeaderBar->SetSelectHdl( LINK( this, DbRegistrationOptionsPage, HeaderSelect_Impl ) );
157 pHeaderBar->SetEndDragHdl( LINK( this, DbRegistrationOptionsPage, HeaderEndDrag_Impl ) );
158 Size aSz;
159 aSz.Width() = TAB_WIDTH1;
160 pHeaderBar->InsertItem( ITEMID_TYPE, aTypeText.GetText(),
161 LogicToPixel( aSz, MapMode( MAP_APPFONT ) ).Width(),
162 HIB_LEFT | HIB_VCENTER | HIB_CLICKABLE | HIB_UPARROW );
163 aSz.Width() = TAB_WIDTH2;
164 pHeaderBar->InsertItem( ITEMID_PATH, aPathText.GetText(),
165 LogicToPixel( aSz, MapMode( MAP_APPFONT ) ).Width(),
166 HIB_LEFT | HIB_VCENTER );
167
168 static long nTabs[] = {3, 0, TAB_WIDTH1, TAB_WIDTH1 + TAB_WIDTH2 };
169 Size aHeadSize = pHeaderBar->GetSizePixel();
170
171 aPathCtrl.SetFocusControl( pPathBox );
172 pPathBox->SetWindowBits( nBits );
173 pPathBox->SetDoubleClickHdl( LINK( this, DbRegistrationOptionsPage, EditHdl ) );
174 pPathBox->SetSelectHdl( LINK( this, DbRegistrationOptionsPage, PathSelect_Impl ) );
175 pPathBox->SetSelectionMode( SINGLE_SELECTION );
176 pPathBox->SetPosSizePixel( Point( 0, aHeadSize.Height() ),
177 Size( aBoxSize.Width(), aBoxSize.Height() - aHeadSize.Height() ) );
178 pPathBox->SetTabs( &nTabs[0], MAP_APPFONT );
179 pPathBox->InitHeaderBar( pHeaderBar );
180 pPathBox->SetHighlightRange();
181
182 pPathBox->SetHelpId( HID_DBPATH_CTL_PATH );
183 pHeaderBar->SetHelpId( HID_DBPATH_HEADERBAR );
184
185 pPathBox->Show();
186 pHeaderBar->Show();
187
188 FreeResource();
189 }
190
191 // -----------------------------------------------------------------------
192
193 DbRegistrationOptionsPage::~DbRegistrationOptionsPage()
194 {
195 // #110603# do not grab focus to a destroyed window !!!
196 aPathCtrl.SetFocusControl( NULL );
197
198 pHeaderBar->Hide();
199 for ( USHORT i = 0; i < pPathBox->GetEntryCount(); ++i )
200 delete static_cast<String*>(pPathBox->GetEntry(i)->GetUserData());
201 delete pPathBox;
202 delete pHeaderBar;
203 }
204
205 // -----------------------------------------------------------------------
206
207 SfxTabPage* DbRegistrationOptionsPage::Create( Window* pParent,
208 const SfxItemSet& rAttrSet )
209 {
210 return ( new DbRegistrationOptionsPage( pParent, rAttrSet ) );
211 }
212
213 // -----------------------------------------------------------------------
214
215 BOOL DbRegistrationOptionsPage::FillItemSet( SfxItemSet& rCoreSet )
216 {
217 // the settings for the single drivers
218 sal_Bool bModified = sal_False;
219 TNameLocationMap aMap;
220 ULONG nCount = pPathBox->GetEntryCount();
221 for ( ULONG i = 0; i < nCount; ++i )
222 {
223 SvLBoxEntry* pEntry = pPathBox->GetEntry(i);
224 String* pPath = static_cast<String*>(pEntry->GetUserData());
225 if ( pPath && pPath->Len() )
226 {
227 OFileNotation aTransformer(*pPath);
228 aMap.insert(TNameLocationMap::value_type(::rtl::OUString(pPathBox->GetEntryText(pEntry,0)),aTransformer.get(OFileNotation::N_URL)));
229 }
230 }
231 if ( m_nOldCount != aMap.size() || m_bModified )
232 {
233 rCoreSet.Put(DatabaseMapItem(SID_SB_DB_REGISTER, aMap), SID_SB_DB_REGISTER);
234 bModified = sal_True;
235 }
236
237 return bModified;
238 }
239
240 // -----------------------------------------------------------------------
241
242 void DbRegistrationOptionsPage::Reset( const SfxItemSet& rSet )
243 {
244 // the settings for the single drivers
245 SFX_ITEMSET_GET( rSet, pSettings, DatabaseMapItem, SID_SB_DB_REGISTER, sal_True );
246
247 if ( pSettings )
248 {
249 // TabListBox f"ullen
250 pPathBox->Clear();
251
252 const TNameLocationMap& rMap = pSettings->getSettings();
253 m_nOldCount = rMap.size();
254 TNameLocationMap::const_iterator aIter = rMap.begin();
255 TNameLocationMap::const_iterator aEnd = rMap.end();
256 for (; aIter != aEnd; ++aIter)
257 {
258 OFileNotation aTransformer(aIter->second);
259 insertNewEntry(aIter->first,aTransformer.get(OFileNotation::N_SYSTEM));
260 }
261
262 String aUserData = GetUserData();
263
264 if ( aUserData.Len() )
265 {
266 // Spaltenbreite restaurieren
267 pHeaderBar->SetItemSize( ITEMID_TYPE, aUserData.GetToken(0).ToInt32() );
268 HeaderEndDrag_Impl( NULL );
269 // Sortierrichtung restaurieren
270 BOOL bUp = (BOOL)(USHORT)aUserData.GetToken(1).ToInt32();
271 HeaderBarItemBits nBits = pHeaderBar->GetItemBits(ITEMID_TYPE);
272
273 if ( bUp )
274 {
275 nBits &= ~HIB_UPARROW;
276 nBits |= HIB_DOWNARROW;
277 }
278 else
279 {
280 nBits &= ~HIB_DOWNARROW;
281 nBits |= HIB_UPARROW;
282 }
283 pHeaderBar->SetItemBits( ITEMID_TYPE, nBits );
284 HeaderSelect_Impl( NULL );
285 }
286 }
287 }
288
289 // -----------------------------------------------------------------------
290
291 void DbRegistrationOptionsPage::FillUserData()
292 {
293 String aUserData = String::CreateFromInt32( pHeaderBar->GetItemSize( ITEMID_TYPE ) );
294 aUserData += ';';
295 HeaderBarItemBits nBits = pHeaderBar->GetItemBits( ITEMID_TYPE );
296 BOOL bUp = ( ( nBits & HIB_UPARROW ) == HIB_UPARROW );
297 aUserData += bUp ? '1' : '0';
298 SetUserData( aUserData );
299 }
300 // -----------------------------------------------------------------------
301
302 IMPL_LINK( DbRegistrationOptionsPage, DeleteHdl, void *, EMPTYARG )
303 {
304 SvLBoxEntry* pEntry = pPathBox->FirstSelected();
305 if ( pEntry )
306 {
307 QueryBox aQuery(this,SVX_RES(QUERY_DELETE_CONFIRM));
308 if ( aQuery.Execute() == RET_YES )
309 pPathBox->GetModel()->Remove(pEntry);
310 }
311 return 0;
312 }
313 // -----------------------------------------------------------------------
314 IMPL_LINK( DbRegistrationOptionsPage, NewHdl, void *, EMPTYARG )
315 {
316 String sNewName,sNewLocation;
317 openLinkDialog(sNewName,sNewLocation);
318 return 0;
319 }
320
321 // -----------------------------------------------------------------------
322
323 IMPL_LINK( DbRegistrationOptionsPage, EditHdl, void *, EMPTYARG )
324 {
325 SvLBoxEntry* pEntry = pPathBox->GetCurEntry();
326 if ( pEntry )
327 {
328 String* pOldLocation = static_cast<String*>(pEntry->GetUserData());
329 String sOldName = pPathBox->GetEntryText(pEntry,0);
330 m_pCurEntry = pEntry;
331 openLinkDialog(sOldName,*pOldLocation,pEntry);
332 m_pCurEntry = NULL;
333 }
334
335 return 0;
336 }
337
338 // -----------------------------------------------------------------------
339
340 IMPL_LINK( DbRegistrationOptionsPage, HeaderSelect_Impl, HeaderBar*, pBar )
341 {
342 if ( pBar && pBar->GetCurItemId() != ITEMID_TYPE )
343 return 0;
344
345 HeaderBarItemBits nBits = pHeaderBar->GetItemBits(ITEMID_TYPE);
346 BOOL bUp = ( ( nBits & HIB_UPARROW ) == HIB_UPARROW );
347 SvSortMode eMode = SortAscending;
348
349 if ( bUp )
350 {
351 nBits &= ~HIB_UPARROW;
352 nBits |= HIB_DOWNARROW;
353 eMode = SortDescending;
354 }
355 else
356 {
357 nBits &= ~HIB_DOWNARROW;
358 nBits |= HIB_UPARROW;
359 }
360 pHeaderBar->SetItemBits( ITEMID_TYPE, nBits );
361 SvTreeList* pModel = pPathBox->GetModel();
362 pModel->SetSortMode( eMode );
363 pModel->Resort();
364 return 1;
365 }
366
367 // -----------------------------------------------------------------------
368
369 IMPL_LINK( DbRegistrationOptionsPage, HeaderEndDrag_Impl, HeaderBar*, pBar )
370 {
371 if ( pBar && !pBar->GetCurItemId() )
372 return 0;
373
374 if ( !pHeaderBar->IsItemMode() )
375 {
376 Size aSz;
377 USHORT nTabs = pHeaderBar->GetItemCount();
378 long nTmpSz = 0;
379 long nWidth = pHeaderBar->GetItemSize(ITEMID_TYPE);
380 long nBarWidth = pHeaderBar->GetSizePixel().Width();
381
382 if(nWidth < TAB_WIDTH_MIN)
383 pHeaderBar->SetItemSize( ITEMID_TYPE, TAB_WIDTH_MIN);
384 else if ( ( nBarWidth - nWidth ) < TAB_WIDTH_MIN )
385 pHeaderBar->SetItemSize( ITEMID_TYPE, nBarWidth - TAB_WIDTH_MIN );
386
387 for ( USHORT i = 1; i <= nTabs; ++i )
388 {
389 long _nWidth = pHeaderBar->GetItemSize(i);
390 aSz.Width() = _nWidth + nTmpSz;
391 nTmpSz += _nWidth;
392 pPathBox->SetTab( i, PixelToLogic( aSz, MapMode(MAP_APPFONT) ).Width(), MAP_APPFONT );
393 }
394 }
395 return 1;
396 }
397 // -----------------------------------------------------------------------
398
399 IMPL_LINK( DbRegistrationOptionsPage, PathSelect_Impl, SvTabListBox *, EMPTYARG )
400
401 /* [Beschreibung]
402
403 */
404
405 {
406 SvLBoxEntry* pEntry = pPathBox->FirstSelected();
407
408 m_aEdit.Enable( pEntry != NULL);
409 m_aDelete.Enable( pEntry != NULL);
410 return 0;
411 }
412 // -----------------------------------------------------------------------------
413 void DbRegistrationOptionsPage::insertNewEntry(const ::rtl::OUString& _sName,const ::rtl::OUString& _sLocation)
414 {
415 String aStr( _sName );
416 aStr += '\t';
417 aStr += String(_sLocation);
418 SvLBoxEntry* pEntry = pPathBox->InsertEntry( aStr );
419 String* pLocation = new String( _sLocation );
420 pEntry->SetUserData( pLocation );
421 }
422 // -----------------------------------------------------------------------------
423 String DbRegistrationOptionsPage::getFileLocation(const String& _sLocation)
424 {
425 try
426 {
427 rtl::OUString aService( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.ui.dialogs.FilePicker" ) );
428 Reference < XMultiServiceFactory > xFactory( ::comphelper::getProcessServiceFactory() );
429 Reference < XFilePicker > xFilePicker( xFactory->createInstance( aService ), UNO_QUERY );
430 OSL_ENSURE(xFilePicker.is() ,"Could create file picker service!");
431 Reference < XFilterManager> xFilterManager(xFilePicker,UNO_QUERY);
432 static const String s_sDatabaseType = String::CreateFromAscii("StarOffice XML (Base)");
433 const SfxFilter* pFilter = SfxFilter::GetFilterByName( s_sDatabaseType);
434 if ( pFilter )
435 {
436 xFilterManager->appendFilter( pFilter->GetUIName(),pFilter->GetDefaultExtension());
437 xFilterManager->setCurrentFilter(pFilter->GetUIName());
438 }
439
440 INetURLObject aURL( _sLocation, INET_PROT_FILE );
441 xFilePicker->setMultiSelectionMode(sal_False);
442 xFilePicker->setDisplayDirectory( aURL.GetMainURL( INetURLObject::NO_DECODE ) );
443 short nRet = xFilePicker->execute();
444
445 if ( ExecutableDialogResults::OK == nRet )
446 {
447
448 // old path is an URL?
449 INetURLObject aObj( _sLocation );
450 FASTBOOL bURL = ( aObj.GetProtocol() != INET_PROT_NOT_VALID );
451 Sequence< ::rtl::OUString > aFiles = xFilePicker->getFiles();
452 INetURLObject aNewObj( aFiles[0] );
453 aNewObj.removeFinalSlash();
454
455 // then the new path also an URL else system path
456 String sNewLocation = bURL ? rtl::OUString(aFiles[0]) : aNewObj.getFSysPath( INetURLObject::FSYS_DETECT );
457
458 if (
459 #ifdef UNX
460 // Unix is case sensitive
461 ( sNewLocation != _sLocation )
462 #else
463 ( sNewLocation.CompareIgnoreCaseToAscii( _sLocation ) != COMPARE_EQUAL )
464 #endif
465 )
466 return sNewLocation;
467 }
468 }
469 catch( Exception& )
470 {
471 DBG_ERRORFILE( "DbRegistrationOptionsPage::EditLocationHdl: exception from folder picker" );
472 }
473
474 return String();
475 }
476 // -----------------------------------------------------------------------------
477 void DbRegistrationOptionsPage::openLinkDialog(const String& _sOldName,const String& _sOldLocation,SvLBoxEntry* _pEntry)
478 {
479 ODocumentLinkDialog aDlg(this,_pEntry == NULL);
480
481 aDlg.set(_sOldName,_sOldLocation);
482 aDlg.setNameValidator(LINK( this, DbRegistrationOptionsPage, NameValidator ) );
483
484 if ( aDlg.Execute() == RET_OK )
485 {
486 String sNewName,sNewLocation;
487 aDlg.get(sNewName,sNewLocation);
488 if ( _pEntry == NULL || sNewName != _sOldName || sNewLocation != _sOldLocation )
489 {
490 if ( _pEntry )
491 {
492 delete static_cast<String*>(_pEntry->GetUserData());
493 pPathBox->GetModel()->Remove(_pEntry);
494 }
495 insertNewEntry(sNewName,sNewLocation);
496 m_bModified = sal_True;
497 }
498 }
499 }
500 // -----------------------------------------------------------------------------
501 IMPL_LINK( DbRegistrationOptionsPage, NameValidator, String*, _pName )
502 {
503 if ( _pName )
504 {
505 ULONG nCount = pPathBox->GetEntryCount();
506 for ( ULONG i = 0; i < nCount; ++i )
507 {
508 SvLBoxEntry* pEntry = pPathBox->GetEntry(i);
509 if ( (!m_pCurEntry || m_pCurEntry != pEntry) && pPathBox->GetEntryText(pEntry,0) == *_pName )
510 return 0L;
511 }
512 }
513 return 1L;
514 }
515 //........................................................................
516 } // namespace svx
517 //........................................................................
518
519
vba interoperability for OOo