Line data Source code
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 "dbfindex.hxx"
21 : #include <comphelper/processfactory.hxx>
22 : #include <tools/config.hxx>
23 : #include <sfx2/app.hxx>
24 : #include "moduledbu.hxx"
25 : #include "dbu_dlg.hrc"
26 : #include <osl/diagnose.h>
27 : #include <unotools/localfilehelper.hxx>
28 : #include <tools/urlobj.hxx>
29 : #include <unotools/pathoptions.hxx>
30 : #include <ucbhelper/content.hxx>
31 : #include <svl/filenotation.hxx>
32 : #include <rtl/strbuf.hxx>
33 :
34 : namespace dbaui
35 : {
36 : using namespace ::com::sun::star::uno;
37 : using namespace ::com::sun::star::ucb;
38 : using namespace ::svt;
39 :
40 12 : const OString aGroupIdent("dBase III");
41 :
42 :
43 0 : ODbaseIndexDialog::ODbaseIndexDialog(vcl::Window * pParent, const OUString& aDataSrcName)
44 : : ModalDialog(pParent, "DBaseIndexDialog", "dbaccess/ui/dbaseindexdialog.ui")
45 : , m_aDSN(aDataSrcName)
46 0 : , m_bCaseSensitiv(true)
47 : {
48 0 : get(m_pPB_OK, "ok");
49 0 : get(m_pCB_Tables, "table");
50 0 : get(m_pIndexes, "frame");
51 0 : get(m_pLB_TableIndexes, "tableindex");
52 0 : get(m_pLB_FreeIndexes, "freeindex");
53 0 : Size aSize(LogicToPixel(Size(76, 98), MAP_APPFONT));
54 0 : m_pLB_TableIndexes->set_height_request(aSize.Height());
55 0 : m_pLB_TableIndexes->set_width_request(aSize.Width());
56 0 : m_pLB_FreeIndexes->set_height_request(aSize.Height());
57 0 : m_pLB_FreeIndexes->set_width_request(aSize.Width());
58 0 : get(m_pAdd, "add");
59 0 : get(m_pAddAll, "addall");
60 0 : get(m_pRemove, "remove");
61 0 : get(m_pRemoveAll, "removeall");
62 :
63 :
64 0 : m_pCB_Tables->SetSelectHdl( LINK(this, ODbaseIndexDialog, TableSelectHdl) );
65 0 : m_pAdd->SetClickHdl( LINK(this, ODbaseIndexDialog, AddClickHdl) );
66 0 : m_pRemove->SetClickHdl( LINK(this, ODbaseIndexDialog, RemoveClickHdl) );
67 0 : m_pAddAll->SetClickHdl( LINK(this, ODbaseIndexDialog, AddAllClickHdl) );
68 0 : m_pRemoveAll->SetClickHdl( LINK(this, ODbaseIndexDialog, RemoveAllClickHdl) );
69 0 : m_pPB_OK->SetClickHdl( LINK(this, ODbaseIndexDialog, OKClickHdl) );
70 :
71 0 : m_pLB_FreeIndexes->SetSelectHdl( LINK(this, ODbaseIndexDialog, OnListEntrySelected) );
72 0 : m_pLB_TableIndexes->SetSelectHdl( LINK(this, ODbaseIndexDialog, OnListEntrySelected) );
73 :
74 0 : m_pCB_Tables->SetDropDownLineCount(8);
75 0 : Init();
76 0 : SetCtrls();
77 0 : }
78 :
79 0 : ODbaseIndexDialog::~ODbaseIndexDialog()
80 : {
81 0 : disposeOnce();
82 0 : }
83 :
84 0 : void ODbaseIndexDialog::dispose()
85 : {
86 0 : m_pPB_OK.clear();
87 0 : m_pCB_Tables.clear();
88 0 : m_pIndexes.clear();
89 0 : m_pLB_TableIndexes.clear();
90 0 : m_pLB_FreeIndexes.clear();
91 0 : m_pAdd.clear();
92 0 : m_pRemove.clear();
93 0 : m_pAddAll.clear();
94 0 : m_pRemoveAll.clear();
95 0 : ModalDialog::dispose();
96 0 : }
97 :
98 0 : bool ODbaseIndexDialog::GetTable(const OUString& _rName, TableInfoList::iterator& _rPosition)
99 : {
100 0 : for ( _rPosition = m_aTableInfoList.begin();
101 0 : _rPosition != m_aTableInfoList.end();
102 : ++_rPosition
103 : )
104 : {
105 0 : if (m_bCaseSensitiv)
106 : {
107 0 : if (_rPosition->aTableName == _rName)
108 0 : return true;
109 : }
110 : else
111 : {
112 0 : if (_rPosition->aTableName.equalsIgnoreAsciiCase(_rName))
113 0 : return true;
114 : }
115 : }
116 0 : return false;
117 : }
118 :
119 0 : void ODbaseIndexDialog::checkButtons()
120 : {
121 0 : m_pAdd->Enable(0 != m_pLB_FreeIndexes->GetSelectEntryCount());
122 0 : m_pAddAll->Enable(0 != m_pLB_FreeIndexes->GetEntryCount());
123 :
124 0 : m_pRemove->Enable(0 != m_pLB_TableIndexes->GetSelectEntryCount());
125 0 : m_pRemoveAll->Enable(0 != m_pLB_TableIndexes->GetEntryCount());
126 0 : }
127 :
128 0 : OTableIndex ODbaseIndexDialog::implRemoveIndex(const OUString& _rName, TableIndexList& _rList, ListBox& _rDisplay, bool _bMustExist)
129 : {
130 0 : OTableIndex aReturn;
131 :
132 0 : sal_Int32 nPos = 0;
133 :
134 0 : TableIndexList::iterator aSearch;
135 0 : for ( aSearch = _rList.begin();
136 0 : aSearch != _rList.end();
137 : ++aSearch, ++nPos
138 : )
139 : {
140 0 : if ( m_bCaseSensitiv ? aSearch->GetIndexFileName() == _rName : aSearch->GetIndexFileName().equalsIgnoreAsciiCase(_rName) )
141 : {
142 0 : aReturn = *aSearch;
143 :
144 0 : _rList.erase(aSearch);
145 0 : _rDisplay.RemoveEntry( _rName );
146 :
147 : // adjust selection if necessary
148 0 : if ((sal_uInt32)nPos == _rList.size())
149 0 : _rDisplay.SelectEntryPos((sal_uInt16)nPos-1);
150 : else
151 0 : _rDisplay.SelectEntryPos((sal_uInt16)nPos);
152 :
153 0 : break;
154 : }
155 : }
156 :
157 : (void)_bMustExist;
158 : OSL_ENSURE(!_bMustExist || (aSearch != _rList.end()), "ODbaseIndexDialog::implRemoveIndex : did not find the index!");
159 0 : return aReturn;
160 : }
161 :
162 0 : void ODbaseIndexDialog::implInsertIndex(const OTableIndex& _rIndex, TableIndexList& _rList, ListBox& _rDisplay)
163 : {
164 0 : _rList.push_front( _rIndex );
165 0 : _rDisplay.InsertEntry( _rIndex.GetIndexFileName() );
166 0 : _rDisplay.SelectEntryPos(0);
167 0 : }
168 :
169 0 : OTableIndex ODbaseIndexDialog::RemoveTableIndex( const OUString& _rTableName, const OUString& _rIndexName, bool _bMustExist )
170 : {
171 0 : OTableIndex aReturn;
172 :
173 : // does the table exist ?
174 0 : TableInfoList::iterator aTablePos;
175 0 : if (!GetTable(_rTableName, aTablePos))
176 0 : return aReturn;
177 :
178 0 : return implRemoveIndex(_rIndexName, aTablePos->aIndexList, *m_pLB_TableIndexes, _bMustExist);
179 : }
180 :
181 0 : void ODbaseIndexDialog::InsertTableIndex( const OUString& _rTableName, const OTableIndex& _rIndex)
182 : {
183 0 : TableInfoList::iterator aTablePos;
184 0 : if (!GetTable(_rTableName, aTablePos))
185 0 : return;
186 :
187 0 : implInsertIndex(_rIndex, aTablePos->aIndexList, *m_pLB_TableIndexes);
188 : }
189 :
190 0 : IMPL_LINK( ODbaseIndexDialog, OKClickHdl, PushButton*, /*pButton*/ )
191 : {
192 : // let all tables write their INF file
193 :
194 0 : for ( TableInfoList::const_iterator aLoop = m_aTableInfoList.begin();
195 0 : aLoop != m_aTableInfoList.end();
196 : ++aLoop
197 : )
198 0 : aLoop->WriteInfFile(m_aDSN);
199 :
200 0 : EndDialog();
201 0 : return 0;
202 : }
203 :
204 0 : IMPL_LINK( ODbaseIndexDialog, AddClickHdl, PushButton*, /*pButton*/ )
205 : {
206 0 : OUString aSelection = m_pLB_FreeIndexes->GetSelectEntry();
207 0 : OUString aTableName = m_pCB_Tables->GetText();
208 0 : OTableIndex aIndex = RemoveFreeIndex( aSelection, true );
209 0 : InsertTableIndex( aTableName, aIndex );
210 :
211 0 : checkButtons();
212 0 : return 0;
213 : }
214 :
215 0 : IMPL_LINK( ODbaseIndexDialog, RemoveClickHdl, PushButton*, /*pButton*/ )
216 : {
217 0 : OUString aSelection = m_pLB_TableIndexes->GetSelectEntry();
218 0 : OUString aTableName = m_pCB_Tables->GetText();
219 0 : OTableIndex aIndex = RemoveTableIndex( aTableName, aSelection, true );
220 0 : InsertFreeIndex( aIndex );
221 :
222 0 : checkButtons();
223 0 : return 0;
224 : }
225 :
226 0 : IMPL_LINK( ODbaseIndexDialog, AddAllClickHdl, PushButton*, /*pButton*/ )
227 : {
228 0 : sal_uInt16 nCnt = m_pLB_FreeIndexes->GetEntryCount();
229 0 : OUString aTableName = m_pCB_Tables->GetText();
230 :
231 0 : for( sal_uInt16 nPos = 0; nPos < nCnt; ++nPos )
232 0 : InsertTableIndex( aTableName, RemoveFreeIndex( m_pLB_FreeIndexes->GetEntry(0), true ) );
233 :
234 0 : checkButtons();
235 0 : return 0;
236 : }
237 :
238 0 : IMPL_LINK( ODbaseIndexDialog, RemoveAllClickHdl, PushButton*, /*pButton*/ )
239 : {
240 0 : sal_uInt16 nCnt = m_pLB_TableIndexes->GetEntryCount();
241 0 : OUString aTableName = m_pCB_Tables->GetText();
242 :
243 0 : for( sal_uInt16 nPos = 0; nPos < nCnt; ++nPos )
244 0 : InsertFreeIndex( RemoveTableIndex( aTableName, m_pLB_TableIndexes->GetEntry(0), true ) );
245 :
246 0 : checkButtons();
247 0 : return 0;
248 : }
249 :
250 0 : IMPL_LINK( ODbaseIndexDialog, OnListEntrySelected, ListBox*, /*NOTINTERESTEDIN*/ )
251 : {
252 0 : checkButtons();
253 0 : return 0;
254 : }
255 :
256 0 : IMPL_LINK( ODbaseIndexDialog, TableSelectHdl, ComboBox*, pComboBox )
257 : {
258 : // search the table
259 0 : TableInfoList::iterator aTablePos;
260 0 : if (!GetTable(pComboBox->GetText(), aTablePos))
261 0 : return 0L;
262 :
263 : // fill the listbox for the indexes
264 0 : m_pLB_TableIndexes->Clear();
265 0 : for ( TableIndexList::const_iterator aLoop = aTablePos->aIndexList.begin();
266 0 : aLoop != aTablePos->aIndexList.end();
267 : ++aLoop
268 : )
269 0 : m_pLB_TableIndexes->InsertEntry( aLoop->GetIndexFileName() );
270 :
271 0 : if ( aTablePos->aIndexList.size() )
272 0 : m_pLB_TableIndexes->SelectEntryPos(0);
273 :
274 0 : checkButtons();
275 0 : return 0;
276 : }
277 :
278 0 : void ODbaseIndexDialog::Init()
279 : {
280 0 : m_pPB_OK->Disable();
281 0 : m_pIndexes->Disable();
282 :
283 : // All indices are first added to a list of free indices.
284 : // Afterwards, check the index of each table in the Inf-file.
285 : // These indices are removed from the list of free indices and
286 : // entered in the indexlist of the table.
287 :
288 : // if the string does not contain a path, cut the string
289 0 : INetURLObject aURL;
290 0 : aURL.SetSmartProtocol(INetProtocol::File);
291 : {
292 0 : SvtPathOptions aPathOptions;
293 0 : m_aDSN = aPathOptions.SubstituteVariable(m_aDSN);
294 : }
295 0 : aURL.SetSmartURL(m_aDSN);
296 :
297 : // String aFileName = aURL.PathToFileName();
298 0 : m_aDSN = aURL.GetMainURL(INetURLObject::NO_DECODE);
299 0 : ::ucbhelper::Content aFile;
300 0 : bool bFolder=true;
301 : try
302 : {
303 0 : aFile = ::ucbhelper::Content(m_aDSN,Reference< ::com::sun::star::ucb::XCommandEnvironment >(), comphelper::getProcessComponentContext());
304 0 : bFolder = aFile.isFolder();
305 : }
306 0 : catch(Exception&)
307 : {
308 0 : return;
309 : }
310 :
311 : // first assume for all indexes they're free
312 :
313 0 : Sequence< OUString> aFolderContent( ::utl::LocalFileHelper::GetFolderContents(m_aDSN,bFolder));
314 :
315 0 : OUString aIndexExt("ndx");
316 0 : OUString aTableExt("dbf");
317 :
318 0 : ::std::vector< OUString > aUsedIndexes;
319 :
320 0 : const OUString *pBegin = aFolderContent.getConstArray();
321 0 : const OUString *pEnd = pBegin + aFolderContent.getLength();
322 0 : aURL.SetSmartProtocol(INetProtocol::File);
323 0 : for(;pBegin != pEnd;++pBegin)
324 : {
325 0 : OUString aName;
326 0 : ::utl::LocalFileHelper::ConvertURLToPhysicalName(pBegin->getStr(),aName);
327 0 : aURL.SetSmartURL(aName);
328 0 : OUString aExt = aURL.getExtension();
329 0 : if (aExt == aIndexExt)
330 : {
331 0 : m_aFreeIndexList.push_back( OTableIndex(aURL.getName()) );
332 : }
333 0 : else if (aExt == aTableExt)
334 : {
335 0 : m_aTableInfoList.push_back( OTableInfo(aURL.getName()) );
336 0 : OTableInfo& rTabInfo = m_aTableInfoList.back();
337 :
338 : // open the INF file
339 0 : aURL.setExtension("inf");
340 0 : OFileNotation aTransformer(aURL.GetURLNoPass(), OFileNotation::N_URL);
341 0 : Config aInfFile( aTransformer.get(OFileNotation::N_SYSTEM) );
342 0 : aInfFile.SetGroup( aGroupIdent );
343 :
344 : // fill the indexes list
345 0 : OString aNDX;
346 0 : sal_uInt16 nKeyCnt = aInfFile.GetKeyCount();
347 0 : OString aKeyName;
348 0 : OUString aEntry;
349 :
350 0 : for( sal_uInt16 nKey = 0; nKey < nKeyCnt; nKey++ )
351 : {
352 : // does the key point to an index file ?
353 0 : aKeyName = aInfFile.GetKeyName( nKey );
354 0 : aNDX = aKeyName.copy(0,3);
355 :
356 : // yes -> add to the tables index list
357 0 : if (aNDX == "NDX")
358 : {
359 0 : aEntry = OStringToOUString(aInfFile.ReadKey(aKeyName), osl_getThreadTextEncoding());
360 0 : rTabInfo.aIndexList.push_back( OTableIndex( aEntry ) );
361 :
362 : // and remove it from the free index list
363 0 : aUsedIndexes.push_back(aEntry);
364 : // do this later below. We may not have encountered the index file, yet, thus we may not
365 : // know the index as being free, yet
366 : }
367 0 : }
368 : }
369 0 : }
370 :
371 0 : for ( ::std::vector< OUString >::const_iterator aUsedIndex = aUsedIndexes.begin();
372 0 : aUsedIndex != aUsedIndexes.end();
373 : ++aUsedIndex
374 : )
375 0 : RemoveFreeIndex( *aUsedIndex, false );
376 :
377 0 : if (m_aTableInfoList.size())
378 : {
379 0 : m_pPB_OK->Enable();
380 0 : m_pIndexes->Enable();
381 : }
382 :
383 0 : checkButtons();
384 : }
385 :
386 0 : void ODbaseIndexDialog::SetCtrls()
387 : {
388 : // ComboBox tables
389 0 : for ( TableInfoList::const_iterator aLoop = m_aTableInfoList.begin();
390 0 : aLoop != m_aTableInfoList.end();
391 : ++aLoop
392 : )
393 0 : m_pCB_Tables->InsertEntry( aLoop->aTableName );
394 :
395 : // put the first dataset into Edit
396 0 : if( m_aTableInfoList.size() )
397 : {
398 0 : const OTableInfo& rTabInfo = m_aTableInfoList.front();
399 0 : m_pCB_Tables->SetText( rTabInfo.aTableName );
400 :
401 : // build ListBox of the table indices
402 0 : for ( TableIndexList::const_iterator aIndex = rTabInfo.aIndexList.begin();
403 0 : aIndex != rTabInfo.aIndexList.end();
404 : ++aIndex
405 : )
406 0 : m_pLB_TableIndexes->InsertEntry( aIndex->GetIndexFileName() );
407 :
408 0 : if( rTabInfo.aIndexList.size() )
409 0 : m_pLB_TableIndexes->SelectEntryPos( 0 );
410 : }
411 :
412 : // ListBox of the free indices
413 0 : for ( TableIndexList::const_iterator aFree = m_aFreeIndexList.begin();
414 0 : aFree != m_aFreeIndexList.end();
415 : ++aFree
416 : )
417 0 : m_pLB_FreeIndexes->InsertEntry( aFree->GetIndexFileName() );
418 :
419 0 : if( m_aFreeIndexList.size() )
420 0 : m_pLB_FreeIndexes->SelectEntryPos( 0 );
421 :
422 0 : TableSelectHdl(m_pCB_Tables);
423 0 : checkButtons();
424 0 : }
425 :
426 0 : void OTableInfo::WriteInfFile( const OUString& rDSN ) const
427 : {
428 : // open INF file
429 0 : INetURLObject aURL;
430 0 : aURL.SetSmartProtocol(INetProtocol::File);
431 0 : OUString aDsn = rDSN;
432 : {
433 0 : SvtPathOptions aPathOptions;
434 0 : aDsn = aPathOptions.SubstituteVariable(aDsn);
435 : }
436 0 : aURL.SetSmartURL(aDsn);
437 0 : aURL.Append(aTableName);
438 0 : aURL.setExtension("inf");
439 :
440 0 : OFileNotation aTransformer(aURL.GetURLNoPass(), OFileNotation::N_URL);
441 0 : Config aInfFile( aTransformer.get(OFileNotation::N_SYSTEM) );
442 0 : aInfFile.SetGroup( aGroupIdent );
443 :
444 : // first, delete all table indices
445 0 : OString aNDX;
446 0 : sal_uInt16 nKeyCnt = aInfFile.GetKeyCount();
447 0 : sal_uInt16 nKey = 0;
448 :
449 0 : while( nKey < nKeyCnt )
450 : {
451 : // Does the key point to an index file?...
452 0 : OString aKeyName = aInfFile.GetKeyName( nKey );
453 0 : aNDX = aKeyName.copy(0,3);
454 :
455 : //...if yes, delete index file, nKey is at subsequent key
456 0 : if (aNDX == "NDX")
457 : {
458 0 : aInfFile.DeleteKey(aKeyName);
459 0 : nKeyCnt--;
460 : }
461 : else
462 0 : nKey++;
463 :
464 0 : }
465 :
466 : // now add all saved indices
467 0 : sal_uInt16 nPos = 0;
468 0 : for ( TableIndexList::const_iterator aIndex = aIndexList.begin();
469 0 : aIndex != aIndexList.end();
470 : ++aIndex, ++nPos
471 : )
472 : {
473 0 : OStringBuffer aKeyName("NDX");
474 0 : if( nPos > 0 ) // first index contains no number
475 0 : aKeyName.append(static_cast<sal_Int32>(nPos));
476 : aInfFile.WriteKey(
477 : aKeyName.makeStringAndClear(),
478 : OUStringToOString(aIndex->GetIndexFileName(),
479 0 : osl_getThreadTextEncoding()));
480 0 : }
481 :
482 0 : aInfFile.Flush();
483 :
484 : // if only [dbase] is left in INF-file, delete file
485 0 : if(!nPos)
486 : {
487 : try
488 : {
489 0 : ::ucbhelper::Content aContent(aURL.GetURLNoPass(),Reference<XCommandEnvironment>(), comphelper::getProcessComponentContext());
490 0 : aContent.executeCommand( OUString("delete"), makeAny( true ) );
491 : }
492 0 : catch (const Exception& e )
493 : {
494 : (void)e; // make compiler happy
495 : // simply silent this. The strange algorithm here does a lot of
496 : // things even if no files at all were created or accessed, so it's
497 : // possible that the file we're trying to delete does not even
498 : // exist, and this is a valid condition.
499 : }
500 0 : }
501 0 : }
502 :
503 36 : } // namespace
504 :
505 : /* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|
