]> git.saurik.com Git - wxWidgets.git/blame - src/generic/dirctrlg.cpp
Fixed the drawing of the HRules so they don't try to iterate over all
[wxWidgets.git] / src / generic / dirctrlg.cpp
CommitLineData
51a58d8b
JS
1/////////////////////////////////////////////////////////////////////////////
2// Name: dirctrlg.cpp
3// Purpose: wxGenericDirCtrl
4// Author: Harm van der Heijden, Robert Roebling, Julian Smart
5// Modified by:
6// Created: 12/12/98
7// RCS-ID: $Id$
8// Copyright: (c) Harm van der Heijden, Robert Roebling and Julian Smart
9// Licence: wxWindows licence
10/////////////////////////////////////////////////////////////////////////////
11
12#ifdef __GNUG__
3fa4bd0e 13#pragma implementation "dirctrlg.h"
51a58d8b
JS
14#endif
15
16// For compilers that support precompilation, includes "wx.h".
17#include "wx/wxprec.h"
18
19#ifdef __BORLANDC__
20#pragma hdrstop
21#endif
22
1e6feb95 23#if wxUSE_DIRDLG
51a58d8b
JS
24
25#include "wx/utils.h"
26#include "wx/dialog.h"
27#include "wx/button.h"
28#include "wx/layout.h"
29#include "wx/msgdlg.h"
30#include "wx/textdlg.h"
31#include "wx/filefn.h"
32#include "wx/cmndata.h"
33#include "wx/gdicmn.h"
34#include "wx/intl.h"
35#include "wx/imaglist.h"
36#include "wx/icon.h"
37#include "wx/log.h"
38#include "wx/sizer.h"
39#include "wx/tokenzr.h"
40#include "wx/dir.h"
3fa4bd0e 41#include "wx/settings.h"
51a58d8b
JS
42
43#if wxUSE_STATLINE
44 #include "wx/statline.h"
45#endif
46
47#include "wx/generic/dirctrlg.h"
48
49#ifdef __WXMSW__
2736b3ce 50#include <windows.h>
7328394a
JS
51
52#ifndef __GNUWIN32__
51a58d8b
JS
53#include <direct.h>
54#include <stdlib.h>
55#include <ctype.h>
56#endif
57
7328394a
JS
58#endif
59
ec1b28a3
DW
60#ifdef __WXPM__
61
62#define INCL_BASE
63#include <os2.h>
64#include <direct.h>
65#include <stdlib.h>
66#include <ctype.h>
67
68#endif // __WXPM__
69
a694a0c6 70#if defined(__WXMAC__) && !defined(__UNIX__)
bedaf53e
SC
71#include "moreextr.h"
72#endif
73
267a7108
JS
74#ifdef __BORLANDC__
75#include "dos.h"
76#endif
77
51a58d8b
JS
78// If compiled under Windows, this macro can cause problems
79#ifdef GetFirstChild
80#undef GetFirstChild
81#endif
82
51a58d8b
JS
83/* Closed folder */
84static char * icon1_xpm[] = {
85/* width height ncolors chars_per_pixel */
86"16 16 6 1",
87/* colors */
88" s None c None",
89". c #000000",
90"+ c #c0c0c0",
91"@ c #808080",
92"# c #ffff00",
93"$ c #ffffff",
94/* pixels */
95" ",
96" @@@@@ ",
97" @#+#+#@ ",
98" @#+#+#+#@@@@@@ ",
99" @$$$$$$$$$$$$@.",
100" @$#+#+#+#+#+#@.",
101" @$+#+#+#+#+#+@.",
102" @$#+#+#+#+#+#@.",
103" @$+#+#+#+#+#+@.",
104" @$#+#+#+#+#+#@.",
105" @$+#+#+#+#+#+@.",
106" @$#+#+#+#+#+#@.",
107" @@@@@@@@@@@@@@.",
108" ..............",
109" ",
110" "};
111
112/* Open folder */
113static char * icon2_xpm[] = {
114/* width height ncolors chars_per_pixel */
115"16 16 6 1",
116/* colors */
117" s None c None",
118". c #000000",
119"+ c #c0c0c0",
120"@ c #808080",
121"# c #ffff00",
122"$ c #ffffff",
123/* pixels */
124" ",
125" @@@@@ ",
126" @$$$$$@ ",
127" @$#+#+#$@@@@@@ ",
128" @$+#+#+$$$$$$@.",
129" @$#+#+#+#+#+#@.",
130"@@@@@@@@@@@@@#@.",
131"@$$$$$$$$$$@@+@.",
132"@$#+#+#+#+##.@@.",
133" @$#+#+#+#+#+.@.",
134" @$+#+#+#+#+#.@.",
135" @$+#+#+#+##@..",
136" @@@@@@@@@@@@@.",
137" .............",
138" ",
139" "};
140
141/* File */
142static char * icon3_xpm[] = {
143/* width height ncolors chars_per_pixel */
144"16 16 3 1",
145/* colors */
33fed835
MB
146" s None c None",
147". c #000000",
148"+ c #ffffff",
51a58d8b
JS
149/* pixels */
150" ",
151" ........ ",
152" .++++++.. ",
153" .+.+.++.+. ",
154" .++++++.... ",
155" .+.+.+++++. ",
156" .+++++++++. ",
157" .+.+.+.+.+. ",
158" .+++++++++. ",
159" .+.+.+.+.+. ",
160" .+++++++++. ",
161" .+.+.+.+.+. ",
162" .+++++++++. ",
163" ........... ",
164" ",
165" "};
166
167/* Computer */
168static char * icon4_xpm[] = {
169"16 16 7 1",
33fed835
MB
170" s None c None",
171". c #808080",
172"X c #c0c0c0",
173"o c Black",
174"O c Gray100",
175"+ c #008080",
176"@ c Blue",
51a58d8b
JS
177" ........... ",
178" .XXXXXXXXXX.o",
179" .OOOOOOOOO..o",
180" .OoooooooX..o",
181" .Oo+...@+X..o",
182" .Oo+XXX.+X..o",
183" .Oo+....+X..o",
184" .Oo++++++X..o",
185" .OXXXXXXXX.oo",
186" ..........o.o",
187" ...........Xo",
188" .XXXXXXXXXX.o",
189" .o.o.o.o.o...o",
190" .oXoXoXoXoXo.o ",
191".XOXXXXXXXXX.o ",
192"............o "};
193
194/* Drive */
195static char * icon5_xpm[] = {
196"16 16 7 1",
33fed835
MB
197" s None c None",
198". c #808080",
199"X c #c0c0c0",
200"o c Black",
201"O c Gray100",
202"+ c Green",
203"@ c #008000",
51a58d8b
JS
204" ",
205" ",
206" ",
207" ",
208" ............. ",
209" .XXXXXXXXXXXX.o",
210".OOOOOOOOOOOO..o",
211".XXXXXXXXX+@X..o",
212".XXXXXXXXXXXX..o",
213".X..........X..o",
214".XOOOOOOOOOOX..o",
215"..............o ",
216" ooooooooooooo ",
217" ",
218" ",
219" "};
220
221/* CD-ROM */
222static char *icon6_xpm[] = {
223"16 16 10 1",
33fed835
MB
224" s None c None",
225". c #808080",
226"X c #c0c0c0",
227"o c Yellow",
228"O c Blue",
229"+ c Black",
230"@ c Gray100",
231"# c #008080",
232"$ c Green",
233"% c #008000",
51a58d8b
JS
234" ... ",
235" ..XoX.. ",
236" .O.XoXXX+ ",
237" ...O.oXXXX+ ",
238" .O..X.XXXX+ ",
239" ....X.+..XXX+",
240" .XXX.+@+.XXX+",
241" .X@XX.+.X@@X+",
242" .....X...#XX@+ ",
243".@@@...XXo.O@X+ ",
244".@XXX..XXoXOO+ ",
245".@++++..XoX+++ ",
246".@$%@@XX+++X.+ ",
247".............+ ",
248" ++++++++++++ ",
249" "};
250
251/* Floppy */
252static char * icon7_xpm[] = {
253"16 16 7 1",
33fed835
MB
254" s None c None",
255". c #808080",
256"X c Gray100",
257"o c #c0c0c0",
258"O c Black",
259"+ c Cyan",
260"@ c Red",
51a58d8b
JS
261" ......X",
262" .ooooooO",
263" .+++++OO",
264" .++++++O",
265" .++++++O",
266" .ooooooO",
267" .......o....oO",
268" .oooooo.o.O.XoO",
269".XXXXXXXXOOOOOO ",
270".ooooooooo@o..O ",
271".ooo....oooo..O ",
272".o..OOOO...o..O ",
273".oooXXXXoooo..O ",
274".............O ",
275" OOOOOOOOOOOO ",
276" "};
277
278/* Removeable */
279static char * icon8_xpm[] = {
280"16 16 7 1",
33fed835
MB
281" s None c None",
282". c #808080",
283"X c #c0c0c0",
284"o c Black",
285"O c Gray100",
286"+ c Red",
287"@ c #800000",
51a58d8b
JS
288" ",
289" ",
290" ",
291" ............. ",
292" .XXXXXXXXXXXX.o",
293".OOOOOOOOOOOO..o",
294".OXXXXXXXXXXX..o",
295".O+@.oooooo.X..o",
296".OXXOooooooOX..o",
297".OXXXOOOOOOXX..o",
298".OXXXXXXXXXXX..o",
299".O............o ",
300" ooooooooooooo ",
301" ",
302" ",
303" "};
51a58d8b
JS
304
305static const int ID_DIRCTRL = 1000;
306static const int ID_TEXTCTRL = 1001;
307static const int ID_OK = 1002;
308static const int ID_CANCEL = 1003;
309static const int ID_NEW = 1004;
310//static const int ID_CHECK = 1005;
311
ec1b28a3 312#if defined(__WXMSW__) || defined(__WXPM__)
33ac7e6f
KB
313int setdrive(int drive)
314{
e987a489 315 wxChar newdrive[3];
33ac7e6f
KB
316
317 if (drive < 1 || drive > 31)
318 return -1;
e987a489
VS
319 newdrive[0] = (wxChar)(wxT('A') + drive - 1);
320 newdrive[1] = wxT(':');
321 newdrive[2] = wxT('\0');
50c76ce1 322#if defined(__WXMSW__)
788722ac
JS
323#ifdef __WIN16__
324 if (wxSetWorkingDirectory(newdrive))
325#else
e987a489 326 if (::SetCurrentDirectory(newdrive))
788722ac 327#endif
50c76ce1
DW
328#else
329 // VA doesn't know what LPSTR is and has its own set
330 if (DosSetCurrentDir((PSZ)newdrive))
331#endif
33ac7e6f
KB
332 return 0;
333 else
334 return -1;
335}
336
ad9cd15c
JS
337static bool wxIsDriveAvailable(const wxString dirName)
338{
339#ifdef __WIN32__
33fed835 340 UINT errorMode = SetErrorMode(SEM_FAILCRITICALERRORS | SEM_NOOPENFILEERRORBOX);
ad9cd15c 341#endif
33fed835 342 bool success = TRUE;
ad9cd15c
JS
343
344 // Check if this is a root directory and if so,
345 // whether the drive is avaiable.
33fed835 346 if (dirName.Len() == 3 && dirName[(size_t)1] == wxT(':'))
ad9cd15c 347 {
33fed835 348 wxString dirNameLower(dirName.Lower());
7328394a
JS
349#if defined(__GNUWIN32__)
350 success = wxPathExists(dirNameLower);
351#else
ad9cd15c 352 int currentDrive = _getdrive();
33fed835 353 int thisDrive = (int) (dirNameLower[(size_t)0] - 'a' + 1) ;
33ac7e6f
KB
354 int err = setdrive( thisDrive ) ;
355 setdrive( currentDrive );
ad9cd15c
JS
356
357 if (err == -1)
358 {
359 success = FALSE;
360 }
7328394a 361#endif
ad9cd15c
JS
362 }
363#ifdef __WIN32__
33fed835 364 (void) SetErrorMode(errorMode);
ad9cd15c
JS
365#endif
366
33fed835 367 return success;
ad9cd15c
JS
368}
369#endif
370
57e26a09
JS
371// Function which is called by quick sort. We want to override the default wxArrayString behaviour,
372// and sort regardless of case.
373static int LINKAGEMODE wxDirCtrlStringCompareFunction(const void *first, const void *second)
374{
375 wxString *strFirst = (wxString *)first;
376 wxString *strSecond = (wxString *)second;
377
378 return strFirst->CmpNoCase(*strSecond);
379}
380
51a58d8b
JS
381//-----------------------------------------------------------------------------
382// wxDirItemDataEx
383//-----------------------------------------------------------------------------
384
385wxDirItemDataEx::wxDirItemDataEx(const wxString& path, const wxString& name,
386 bool isDir)
387{
388 m_path = path;
389 m_name = name;
390 /* Insert logic to detect hidden files here
391 * In UnixLand we just check whether the first char is a dot
392 * For FileNameFromPath read LastDirNameInThisPath ;-) */
393 // m_isHidden = (bool)(wxFileNameFromPath(*m_path)[0] == '.');
394 m_isHidden = FALSE;
e63fdcd6
JS
395 // m_hasSubDirs is no longer needed
396 m_hasSubDirs = TRUE; // HasSubDirs();
51a58d8b
JS
397 m_isExpanded = FALSE;
398 m_isDir = isDir;
399}
400
401wxDirItemDataEx::~wxDirItemDataEx()
402{
403}
404
405void wxDirItemDataEx::SetNewDirName( wxString path )
406{
407 m_path = path;
408 m_name = wxFileNameFromPath( path );
409}
410
51a58d8b
JS
411//-----------------------------------------------------------------------------
412// wxGenericDirCtrl
413//-----------------------------------------------------------------------------
414
415IMPLEMENT_DYNAMIC_CLASS(wxGenericDirCtrl, wxControl)
416
417BEGIN_EVENT_TABLE(wxGenericDirCtrl, wxControl)
418 EVT_TREE_ITEM_EXPANDING (-1, wxGenericDirCtrl::OnExpandItem)
419 EVT_TREE_ITEM_COLLAPSED (-1, wxGenericDirCtrl::OnCollapseItem)
420 EVT_TREE_BEGIN_LABEL_EDIT (-1, wxGenericDirCtrl::OnBeginEditItem)
421 EVT_TREE_END_LABEL_EDIT (-1, wxGenericDirCtrl::OnEndEditItem)
422 EVT_SIZE (wxGenericDirCtrl::OnSize)
423END_EVENT_TABLE()
424
425wxGenericDirCtrl::wxGenericDirCtrl(void)
426{
427 Init();
428}
429
430bool wxGenericDirCtrl::Create(wxWindow *parent,
431 const wxWindowID id,
432 const wxString& dir,
433 const wxPoint& pos,
434 const wxSize& size,
435 long style,
436 const wxString& filter,
437 int defaultFilter,
438 const wxString& name )
439{
440 if (!wxControl::Create(parent, id, pos, size, style, wxDefaultValidator, name))
441 return FALSE;
442
443 SetBackgroundColour(wxSystemSettings::GetSystemColour(wxSYS_COLOUR_3DFACE));
444
445 Init();
446
3438012b 447 long treeStyle = wxTR_HAS_BUTTONS ; // | wxTR_EDIT_LABELS;
51a58d8b
JS
448 if ((style & wxDIRCTRL_3D_INTERNAL) == 0)
449 treeStyle |= wxNO_BORDER;
450
451 long filterStyle = 0;
452 if ((style & wxDIRCTRL_3D_INTERNAL) == 0)
453 filterStyle |= wxNO_BORDER;
454
455 m_treeCtrl = new wxTreeCtrl(this, wxID_TREECTRL, pos, size, treeStyle);
456
457 if (!filter.IsEmpty() && (style & wxDIRCTRL_SHOW_FILTERS))
458 m_filterListCtrl = new wxDirFilterListCtrl(this, wxID_FILTERLISTCTRL, wxDefaultPosition, wxDefaultSize, filterStyle);
459
460 m_defaultPath = dir;
461 m_filter = filter;
462
463 SetFilterIndex(defaultFilter);
464
465 if (m_filterListCtrl)
466 m_filterListCtrl->FillFilterList(filter, defaultFilter);
467
468 m_imageList = new wxImageList(16, 16, TRUE);
51a58d8b
JS
469 m_imageList->Add(wxIcon(icon1_xpm));
470 m_imageList->Add(wxIcon(icon2_xpm));
471 m_imageList->Add(wxIcon(icon3_xpm));
472 m_imageList->Add(wxIcon(icon4_xpm));
473 m_imageList->Add(wxIcon(icon5_xpm));
474 m_imageList->Add(wxIcon(icon6_xpm));
475 m_imageList->Add(wxIcon(icon7_xpm));
476 m_imageList->Add(wxIcon(icon8_xpm));
51a58d8b
JS
477 m_treeCtrl->SetImageList(m_imageList);
478
479 m_showHidden = FALSE;
480 wxDirItemDataEx* rootData = new wxDirItemDataEx(wxT(""), wxT(""), TRUE);
481
482 wxString rootName;
483
ec1b28a3 484#if defined(__WXMSW__) || defined(__WXPM__)
51a58d8b
JS
485 rootName = _("Computer");
486#else
487 rootName = _("Sections");
488#endif
489
490 m_rootId = m_treeCtrl->AddRoot( rootName, 3, -1, rootData);
491 m_treeCtrl->SetItemHasChildren(m_rootId);
492 m_treeCtrl->Expand(m_rootId); // automatically expand first level
493
494 // Expand and select the default path
495 if (!m_defaultPath.IsEmpty())
496 ExpandPath(m_defaultPath);
497
498 DoResize();
499
500 return TRUE;
501}
502
503wxGenericDirCtrl::~wxGenericDirCtrl()
504{
505 m_treeCtrl->SetImageList(NULL);
506 delete m_imageList;
507}
508
509void wxGenericDirCtrl::Init()
510{
511 m_showHidden = FALSE;
512 m_imageList = NULL;
51a58d8b
JS
513 m_currentFilter = 0;
514 m_currentFilterStr = wxEmptyString; // Default: any file
515 m_treeCtrl = NULL;
516 m_filterListCtrl = NULL;
517}
518
519void wxGenericDirCtrl::AddSection(const wxString& path, const wxString& name, int imageId)
520{
521 wxDirItemDataEx *dir_item = new wxDirItemDataEx(path,name,TRUE);
522
ec1b28a3
DW
523#if defined(__WXMSW__) || defined(__WXPM__)
524 // Windows and OS/2: sections are displayed as drives
51a58d8b
JS
525 wxTreeItemId id = m_treeCtrl->AppendItem( m_rootId, name, imageId, -1, dir_item);
526#else
527 // Unix: sections are displayed as folders
528 wxTreeItemId id = m_treeCtrl->AppendItem( m_rootId, name, 0, -1, dir_item);
3fa4bd0e 529 m_treeCtrl->SetItemImage( id, 1, wxTreeItemIcon_Expanded );
51a58d8b
JS
530#endif
531 // TODO: other operating systems.
532
533 m_treeCtrl->SetItemHasChildren(id);
534}
535
536void wxGenericDirCtrl::SetupSections()
537{
ec1b28a3 538#if defined(__WXMSW__) || defined(__WXPM__)
51a58d8b
JS
539
540#ifdef __WIN32__
541 wxChar driveBuffer[256];
542 size_t n = (size_t) GetLogicalDriveStrings(255, driveBuffer);
543 size_t i = 0;
544 while (i < n)
545 {
546 wxString path, name;
547 path.Printf(wxT("%c:\\"), driveBuffer[i]);
548 name.Printf(wxT("(%c:)"), driveBuffer[i]);
549
550 int imageId = 4;
551 int driveType = ::GetDriveType(path);
552 switch (driveType)
553 {
554 case DRIVE_REMOVABLE:
555 if (path == wxT("a:\\") || path == wxT("b:\\"))
556 imageId = 6; // Floppy
557 else
558 imageId = 7;
559 break;
560 case DRIVE_FIXED:
561 imageId = 4;
562 break;
563 case DRIVE_REMOTE:
564 imageId = 4;
565 break;
566 case DRIVE_CDROM:
567 imageId = 5;
568 break;
569 default:
570 imageId = 4;
571 break;
572 }
573
574 AddSection(path, name, imageId);
575
576 while (driveBuffer[i] != wxT('\0'))
577 i ++;
578 i ++;
579 if (driveBuffer[i] == wxT('\0'))
580 break;
581 }
582#else
583 int drive;
584 int currentDrive;
585
51a58d8b
JS
586 /* If we can switch to the drive, it exists. */
587 for( drive = 1; drive <= 26; drive++ )
588 {
589 wxString path, name;
590 path.Printf(wxT("%c:\\"), (char) (drive + 'a' - 1));
591 name.Printf(wxT("(%c:)"), (char) (drive + 'a' - 1));
592
33fed835 593 if (wxIsDriveAvailable(path))
51a58d8b 594 {
ec1b28a3 595
51a58d8b
JS
596 AddSection(path, name);
597 }
598 }
51a58d8b 599#endif
a694a0c6 600#elif defined(__WXMAC__) && !defined(__UNIX__)
bedaf53e
SC
601 FSSpec volume ;
602 short index = 1 ;
603 while(1) {
604 short actualCount = 0 ;
605 if ( OnLine( &volume , 1 , &actualCount , &index ) != noErr || actualCount == 0 )
606 break ;
607
608 wxString name = wxMacFSSpec2MacFilename( &volume ) ;
609 AddSection(name+":", name, 0);
610 }
51a58d8b 611#else
3fa4bd0e
VS
612 AddSection(wxT("/"), _("The Computer"), 0);
613 AddSection(wxGetHomeDir(), _("My Home"), 0 );
614 AddSection(wxT("/mnt"), _("Mounted Devices"), 0 );
615 AddSection(wxT("/usr/local"), _("User Local"), 0 );
616 AddSection(wxT("/usr"), _("User"), 0 );
617 AddSection(wxT("/var"), _("Variables"), 0 );
618 AddSection(wxT("/etc"), _("Etcetera"), 0 );
619 AddSection(wxT("/tmp"), _("Temporary"), 0 );
51a58d8b
JS
620#endif
621}
622
623void wxGenericDirCtrl::OnBeginEditItem(wxTreeEvent &event)
624{
625 // don't rename the main entry "Sections"
626 if (event.GetItem() == m_rootId)
627 {
628 event.Veto();
629 return;
630 }
631
632 // don't rename the individual sections
633 if (m_treeCtrl->GetParent( event.GetItem() ) == m_rootId)
634 {
635 event.Veto();
636 return;
637 }
638}
639
640void wxGenericDirCtrl::OnEndEditItem(wxTreeEvent &event)
641{
642 if ((event.GetLabel().IsEmpty()) ||
643 (event.GetLabel() == _(".")) ||
644 (event.GetLabel() == _("..")) ||
645 (event.GetLabel().First( wxT("/") ) != wxNOT_FOUND))
646 {
647 wxMessageDialog dialog(this, _("Illegal directory name."), _("Error"), wxOK | wxICON_ERROR );
648 dialog.ShowModal();
649 event.Veto();
650 return;
651 }
652
653 wxTreeItemId id = event.GetItem();
654 wxDirItemDataEx *data = (wxDirItemDataEx*)m_treeCtrl->GetItemData( id );
655 wxASSERT( data );
656
657 wxString new_name( wxPathOnly( data->m_path ) );
ad9cd15c 658 new_name += wxString(wxFILE_SEP_PATH);
51a58d8b
JS
659 new_name += event.GetLabel();
660
661 wxLogNull log;
662
663 if (wxFileExists(new_name))
664 {
665 wxMessageDialog dialog(this, _("File name exists already."), _("Error"), wxOK | wxICON_ERROR );
666 dialog.ShowModal();
667 event.Veto();
668 }
669
670 if (wxRenameFile(data->m_path,new_name))
671 {
672 data->SetNewDirName( new_name );
673 }
674 else
675 {
676 wxMessageDialog dialog(this, _("Operation not permitted."), _("Error"), wxOK | wxICON_ERROR );
677 dialog.ShowModal();
678 event.Veto();
679 }
680}
681
682void wxGenericDirCtrl::OnExpandItem(wxTreeEvent &event)
683{
684 wxTreeItemId parentId = event.GetItem();
685
686 ExpandDir(parentId);
687}
688
689void wxGenericDirCtrl::OnCollapseItem(wxTreeEvent &event )
690{
691 wxTreeItemId child, parent = event.GetItem();
692
693 wxDirItemDataEx *data = (wxDirItemDataEx *) m_treeCtrl->GetItemData(event.GetItem());
694 if (!data->m_isExpanded)
695 return;
696
697 data->m_isExpanded = FALSE;
698 long cookie;
699 /* Workaround because DeleteChildren has disapeared (why?) and
700 * CollapseAndReset doesn't work as advertised (deletes parent too) */
701 child = m_treeCtrl->GetFirstChild(parent, cookie);
702 while (child.IsOk())
703 {
704 m_treeCtrl->Delete(child);
705 /* Not GetNextChild below, because the cookie mechanism can't
706 * handle disappearing children! */
707 child = m_treeCtrl->GetFirstChild(parent, cookie);
708 }
709}
710
711void wxGenericDirCtrl::ExpandDir(wxTreeItemId parentId)
712{
713 wxDirItemDataEx *data = (wxDirItemDataEx *) m_treeCtrl->GetItemData(parentId);
714
715 if (data->m_isExpanded)
716 return;
717
718 data->m_isExpanded = TRUE;
719
720 if (parentId == m_rootId)
721 {
722 SetupSections();
723 return;
724 }
725
726 wxASSERT(data);
727
728 wxString search,path,filename;
729
730 wxString dirName(data->m_path);
731
ec1b28a3 732#if defined(__WXMSW__) || defined(__WXPM__)
51a58d8b
JS
733 // Check if this is a root directory and if so,
734 // whether the drive is avaiable.
33fed835
MB
735 if (!wxIsDriveAvailable(dirName))
736 {
ad9cd15c 737 data->m_isExpanded = FALSE;
7328394a
JS
738 //wxMessageBox(wxT("Sorry, this drive is not available."));
739 return;
33fed835 740 }
51a58d8b
JS
741#endif
742
743 // This may take a longish time. Go to busy cursor
744 wxBusyCursor busy;
745
ec1b28a3 746#if defined(__WXMSW__) || defined(__WXPM__)
51a58d8b
JS
747 if (dirName.Last() == ':')
748 dirName += wxString(wxFILE_SEP_PATH);
749#endif
750
751 wxArrayString dirs;
752 wxArrayString filenames;
753
754 wxDir d;
755 wxString eachFilename;
756
f9c165b1 757 wxLogNull log;
51a58d8b
JS
758 d.Open(dirName);
759
760 if (d.IsOpened())
761 {
762 if (d.GetFirst(& eachFilename, wxEmptyString, wxDIR_DIRS))
763 {
764 do
765 {
766 if ((eachFilename != wxT(".")) && (eachFilename != wxT("..")))
767 {
768 dirs.Add(eachFilename);
769 }
770 }
771 while (d.GetNext(& eachFilename)) ;
772 }
773 }
57e26a09 774 dirs.Sort((wxArrayString::CompareFunction) wxDirCtrlStringCompareFunction);
51a58d8b
JS
775
776 // Now do the filenames -- but only if we're allowed to
777 if ((GetWindowStyle() & wxDIRCTRL_DIR_ONLY) == 0)
778 {
f9c165b1
JS
779 wxLogNull log;
780
51a58d8b 781 d.Open(dirName);
ec1b28a3 782
51a58d8b
JS
783 if (d.IsOpened())
784 {
785 if (d.GetFirst(& eachFilename, m_currentFilterStr, wxDIR_FILES))
786 {
787 do
788 {
789 if ((eachFilename != wxT(".")) && (eachFilename != wxT("..")))
790 {
791 filenames.Add(eachFilename);
792 }
793 }
794 while (d.GetNext(& eachFilename)) ;
795 }
796 }
57e26a09 797 filenames.Sort((wxArrayString::CompareFunction) wxDirCtrlStringCompareFunction);
51a58d8b
JS
798 }
799
800 // Add the sorted dirs
801 size_t i;
802 for (i = 0; i < dirs.Count(); i++)
803 {
804 wxString eachFilename(dirs[i]);
805 path = dirName;
806 if (path.Last() != wxFILE_SEP_PATH)
807 path += wxString(wxFILE_SEP_PATH);
808 path += eachFilename;
809
810 wxDirItemDataEx *dir_item = new wxDirItemDataEx(path,eachFilename,TRUE);
811 wxTreeItemId id = m_treeCtrl->AppendItem( parentId, eachFilename, 0, -1, dir_item);
812 m_treeCtrl->SetItemImage( id, 1, wxTreeItemIcon_Expanded );
ec1b28a3 813
51a58d8b
JS
814 // Has this got any children? If so, make it expandable.
815 int options = wxDIR_DEFAULT;
816 if (GetWindowStyle() & wxDIRCTRL_DIR_ONLY) // If only showing dirs, then we specify dirs only here
817 {
818 options = wxDIR_DIRS;
819 }
820
f9c165b1
JS
821 wxLogNull log;
822 wxDir dir2;
823 if (dir2.Open(path))
51a58d8b 824 {
f9c165b1
JS
825 wxString str;
826 // Have to test for wxDIR_DIRS separately in case m_currentFilterStr is non-empty and
827 // and filters out any directories
828 if (dir2.GetFirst(& str, m_currentFilterStr, options) || dir2.GetFirst(& str, wxEmptyString, wxDIR_DIRS))
829 {
830 m_treeCtrl->SetItemHasChildren(id);
831 }
33fed835 832 }
51a58d8b
JS
833 }
834
835 // Add the sorted filenames
836 if ((GetWindowStyle() & wxDIRCTRL_DIR_ONLY) == 0)
837 {
838 for (i = 0; i < filenames.Count(); i++)
839 {
840 wxString eachFilename(filenames[i]);
841 path = dirName;
842 if (path.Last() != wxFILE_SEP_PATH)
843 path += wxString(wxFILE_SEP_PATH);
844 path += eachFilename;
845 //path = dirName + wxString(wxT("/")) + eachFilename;
846 wxDirItemDataEx *dir_item = new wxDirItemDataEx(path,eachFilename,FALSE);
3fa4bd0e 847 (void)m_treeCtrl->AppendItem( parentId, eachFilename, 2, -1, dir_item);
51a58d8b
JS
848 }
849 }
850}
851
852// Find the child that matches the first part of 'path'.
853// E.g. if a child path is "/usr" and 'path' is "/usr/include"
854// then the child for /usr is returned.
855wxTreeItemId wxGenericDirCtrl::FindChild(wxTreeItemId parentId, const wxString& path, bool& done)
856{
857 wxString path2(path);
ec1b28a3 858
51a58d8b
JS
859 // Make sure all separators are as per the current platform
860 path2.Replace(wxT("\\"), wxString(wxFILE_SEP_PATH));
861 path2.Replace(wxT("/"), wxString(wxFILE_SEP_PATH));
ec1b28a3 862
51a58d8b
JS
863 // Append a separator to foil bogus substring matching
864 path2 += wxString(wxFILE_SEP_PATH);
ec1b28a3
DW
865
866 // In MSW or PM, case is not significant
867#if defined(__WXMSW__) || defined(__WXPM__)
51a58d8b
JS
868 path2.MakeLower();
869#endif
ec1b28a3 870
51a58d8b
JS
871 long cookie;
872 wxTreeItemId childId = m_treeCtrl->GetFirstChild(parentId, cookie);
53ccf1c0 873 while (childId.IsOk())
51a58d8b
JS
874 {
875 wxDirItemDataEx* data = (wxDirItemDataEx*) m_treeCtrl->GetItemData(childId);
ec1b28a3 876
51a58d8b
JS
877 if (data && data->m_path != "")
878 {
879 wxString childPath(data->m_path);
880 if (childPath.Last() != wxFILE_SEP_PATH)
881 childPath += wxString(wxFILE_SEP_PATH);
ec1b28a3
DW
882
883 // In MSW and PM, case is not significant
884#if defined(__WXMSW__) || defined(__WXPM__)
51a58d8b
JS
885 childPath.MakeLower();
886#endif
ec1b28a3 887
51a58d8b
JS
888 if (childPath.Len() <= path2.Len())
889 {
890 wxString path3 = path2.Mid(0, childPath.Len());
891 if (childPath == path3)
892 {
893 if (path3.Len() == path2.Len())
894 done = TRUE;
895 else
896 done = FALSE;
897 return childId;
898 }
899 }
900 }
ec1b28a3 901
51a58d8b
JS
902 childId = m_treeCtrl->GetNextChild(childId, cookie);
903 }
3fa4bd0e
VS
904 wxTreeItemId invalid;
905 return invalid;
51a58d8b
JS
906}
907
908// Try to expand as much of the given path as possible,
909// and select the given tree item.
910bool wxGenericDirCtrl::ExpandPath(const wxString& path)
911{
912 bool done = FALSE;
913 wxTreeItemId id = FindChild(m_rootId, path, done);
914 wxTreeItemId lastId = id; // The last non-zero id
237387ad 915 while (id.IsOk() && !done)
51a58d8b
JS
916 {
917 ExpandDir(id);
918
919 id = FindChild(id, path, done);
53ccf1c0 920 if (id.IsOk())
51a58d8b
JS
921 lastId = id;
922 }
53ccf1c0 923 if (lastId.IsOk())
51a58d8b
JS
924 {
925 wxDirItemDataEx *data = (wxDirItemDataEx *) m_treeCtrl->GetItemData(lastId);
926 if (data->m_isDir)
927 {
928 m_treeCtrl->Expand(lastId);
929 }
930 if ((GetWindowStyle() & wxDIRCTRL_SELECT_FIRST) && data->m_isDir)
931 {
932 // Find the first file in this directory
933 long cookie;
934 wxTreeItemId childId = m_treeCtrl->GetFirstChild(lastId, cookie);
935 bool selectedChild = FALSE;
53ccf1c0 936 while (childId.IsOk())
51a58d8b
JS
937 {
938 wxDirItemDataEx* data = (wxDirItemDataEx*) m_treeCtrl->GetItemData(childId);
ec1b28a3 939
51a58d8b
JS
940 if (data && data->m_path != "" && !data->m_isDir)
941 {
942 m_treeCtrl->SelectItem(childId);
943 m_treeCtrl->EnsureVisible(childId);
944 selectedChild = TRUE;
945 break;
946 }
947 childId = m_treeCtrl->GetNextChild(lastId, cookie);
948 }
949 if (!selectedChild)
950 {
951 m_treeCtrl->SelectItem(lastId);
952 m_treeCtrl->EnsureVisible(lastId);
953 }
954 }
955 else
956 {
957 m_treeCtrl->SelectItem(lastId);
958 m_treeCtrl->EnsureVisible(lastId);
959 }
960
961 return TRUE;
962 }
963 else
964 return FALSE;
965}
966
967wxString wxGenericDirCtrl::GetPath() const
968{
969 wxTreeItemId id = m_treeCtrl->GetSelection();
970 if (id)
971 {
972 wxDirItemDataEx* data = (wxDirItemDataEx*) m_treeCtrl->GetItemData(id);
973 return data->m_path;
974 }
975 else
976 return wxEmptyString;
977}
978
979wxString wxGenericDirCtrl::GetFilePath() const
980{
981 wxTreeItemId id = m_treeCtrl->GetSelection();
982 if (id)
983 {
984 wxDirItemDataEx* data = (wxDirItemDataEx*) m_treeCtrl->GetItemData(id);
985 if (data->m_isDir)
986 return wxEmptyString;
987 else
988 return data->m_path;
989 }
990 else
991 return wxEmptyString;
992}
993
994void wxGenericDirCtrl::SetPath(const wxString& path)
995{
996 m_defaultPath = path;
997 if (m_rootId)
998 ExpandPath(path);
999}
1000
1001// Not used
1002#if 0
1003void wxGenericDirCtrl::FindChildFiles(wxTreeItemId id, int dirFlags, wxArrayString& filenames)
1004{
1005 wxDirItemDataEx *data = (wxDirItemDataEx *) m_treeCtrl->GetItemData(id);
1006
1007 // This may take a longish time. Go to busy cursor
1008 wxBusyCursor busy;
1009
1010 wxASSERT(data);
1011
1012 wxString search,path,filename;
1013
1014 wxString dirName(data->m_path);
1015
ec1b28a3 1016#if defined(__WXMSW__) || defined(__WXPM__)
51a58d8b
JS
1017 if (dirName.Last() == ':')
1018 dirName += wxString(wxFILE_SEP_PATH);
1019#endif
1020
1021 wxDir d;
1022 wxString eachFilename;
1023
f9c165b1 1024 wxLogNull log;
51a58d8b
JS
1025 d.Open(dirName);
1026
1027 if (d.IsOpened())
1028 {
1029 if (d.GetFirst(& eachFilename, m_currentFilterStr, dirFlags))
1030 {
1031 do
1032 {
1033 if ((eachFilename != wxT(".")) && (eachFilename != wxT("..")))
1034 {
1035 filenames.Add(eachFilename);
1036 }
1037 }
1038 while (d.GetNext(& eachFilename)) ;
1039 }
1040 }
1041}
1042#endif
1043
1044void wxGenericDirCtrl::SetFilterIndex(int n)
1045{
1046 m_currentFilter = n;
1047
1048 wxString f, d;
1049 if (ExtractWildcard(m_filter, n, f, d))
1050 m_currentFilterStr = f;
1051 else
1052 m_currentFilterStr = wxT("*.*");
1053}
1054
1055void wxGenericDirCtrl::SetFilter(const wxString& filter)
1056{
1057 m_filter = filter;
1058
1059 wxString f, d;
1060 if (ExtractWildcard(m_filter, m_currentFilter, f, d))
1061 m_currentFilterStr = f;
1062 else
1063 m_currentFilterStr = wxT("*.*");
1064}
1065
1066// Extract description and actual filter from overall filter string
1067bool wxGenericDirCtrl::ExtractWildcard(const wxString& filterStr, int n, wxString& filter, wxString& description)
1068{
1069 wxArrayString filters, descriptions;
1070 int count = ParseFilter(filterStr, filters, descriptions);
1071 if (count > 0 && n < count)
1072 {
1073 filter = filters[n];
1074 description = descriptions[n];
1075 return TRUE;
1076 }
1077 else
1078 return FALSE;
1079}
1080
1081// Parses the global filter, returning the number of filters.
1082// Returns 0 if none or if there's a problem.
1083// filterStr is in the form:
1084//
1085// "All files (*.*)|*.*|JPEG Files (*.jpeg)|*.jpg"
1086
1087int wxGenericDirCtrl::ParseFilter(const wxString& filterStr, wxArrayString& filters, wxArrayString& descriptions)
1088{
1089 wxString str(filterStr);
1090
1091 wxString description, filter;
1092 int pos;
1093 bool finished = FALSE;
1094 do
1095 {
1096 pos = str.Find(wxT('|'));
1097 if (pos == -1)
1098 return 0; // Problem
1099 description = str.Left(pos);
1100 str = str.Mid(pos+1);
1101 pos = str.Find(wxT('|'));
1102 if (pos == -1)
1103 {
1104 filter = str;
1105 finished = TRUE;
1106 }
1107 else
1108 {
1109 filter = str.Left(pos);
1110 str = str.Mid(pos+1);
1111 }
1112 descriptions.Add(description);
1113 filters.Add(filter);
1114 }
1115 while (!finished) ;
1116
1117 return filters.Count();
1118}
1119
1120void wxGenericDirCtrl::DoResize()
1121{
1122 wxSize sz = GetClientSize();
1123 int verticalSpacing = 3;
1124 if (m_treeCtrl)
1125 {
1126 wxSize filterSz ;
1127 if (m_filterListCtrl)
1128 {
1129 filterSz = m_filterListCtrl->GetSize();
1130 sz.y -= (filterSz.y + verticalSpacing);
1131 }
1132 m_treeCtrl->SetSize(0, 0, sz.x, sz.y);
1133 if (m_filterListCtrl)
1134 {
1135 m_filterListCtrl->SetSize(0, sz.y + verticalSpacing, sz.x, filterSz.y);
1136 // Don't know why, but this needs refreshing after a resize (wxMSW)
1137 m_filterListCtrl->Refresh();
1138 }
1139 }
1140}
1141
1142
33ac7e6f 1143void wxGenericDirCtrl::OnSize(wxSizeEvent& WXUNUSED(event))
51a58d8b
JS
1144{
1145 DoResize();
1146}
1147
1148//-----------------------------------------------------------------------------
1149// wxDirFilterListCtrl
1150//-----------------------------------------------------------------------------
1151
1152IMPLEMENT_CLASS(wxDirFilterListCtrl, wxChoice)
1153
1154BEGIN_EVENT_TABLE(wxDirFilterListCtrl, wxChoice)
1155 EVT_CHOICE(-1, wxDirFilterListCtrl::OnSelFilter)
1156END_EVENT_TABLE()
1157
1158bool wxDirFilterListCtrl::Create(wxGenericDirCtrl* parent, const wxWindowID id,
1159 const wxPoint& pos,
1160 const wxSize& size,
1161 long style)
1162{
1163 m_dirCtrl = parent;
1164 return wxChoice::Create(parent, id, pos, size, 0, NULL, style);
1165}
1166
1167void wxDirFilterListCtrl::Init()
1168{
1169 m_dirCtrl = NULL;
1170}
1171
33ac7e6f 1172void wxDirFilterListCtrl::OnSelFilter(wxCommandEvent& WXUNUSED(event))
51a58d8b
JS
1173{
1174 int sel = GetSelection();
1175
1176 wxString currentPath = m_dirCtrl->GetPath();
ec1b28a3 1177
51a58d8b
JS
1178 m_dirCtrl->SetFilterIndex(sel);
1179
1180 // If the filter has changed, the view is out of date, so
1181 // collapse the tree.
1182 m_dirCtrl->GetTreeCtrl()->Collapse(m_dirCtrl->GetRootId());
1183 m_dirCtrl->GetTreeCtrl()->Expand(m_dirCtrl->GetRootId());
1184
1185 // Try to restore the selection, or at least the directory
1186 m_dirCtrl->ExpandPath(currentPath);
1187}
1188
1189void wxDirFilterListCtrl::FillFilterList(const wxString& filter, int defaultFilter)
1190{
1191 Clear();
1192 wxArrayString descriptions, filters;
1193 size_t n = (size_t) m_dirCtrl->ParseFilter(filter, filters, descriptions);
1194
1195 if (n > 0 && defaultFilter < (int) n)
1196 {
1197 size_t i = 0;
1198 for (i = 0; i < n; i++)
1199 Append(descriptions[i]);
1200 SetSelection(defaultFilter);
1201 }
1202}
1203
1204// wxGenericDirDialog implementation
1205// This should be moved into dirdlgg.cpp eventually
1206
1207BEGIN_EVENT_TABLE(wxGenericDirDialog, wxDialog)
1208 EVT_BUTTON(wxID_OK, wxGenericDirDialog::OnOK)
3438012b 1209 EVT_BUTTON(wxID_NEW, wxGenericDirDialog::OnNew)
e63fdcd6 1210 EVT_BUTTON (wxID_NEW, wxGenericDirDialog::OnNew)
51a58d8b 1211 EVT_CLOSE(wxGenericDirDialog::OnCloseWindow)
08793a6d
JS
1212 EVT_TREE_KEY_DOWN (-1, wxGenericDirDialog::OnTreeKeyDown)
1213 EVT_TREE_SEL_CHANGED (-1, wxGenericDirDialog::OnTreeSelected)
e63fdcd6 1214 EVT_TEXT_ENTER (ID_TEXTCTRL, wxGenericDirDialog::OnOK)
51a58d8b
JS
1215END_EVENT_TABLE()
1216
1217wxGenericDirDialog::wxGenericDirDialog(wxWindow* parent, const wxString& title,
1218 const wxString& defaultPath, long style, const wxPoint& pos, const wxSize& sz, const wxString& name):
1219 wxDialog(parent, ID_DIRCTRL, title, pos, sz, style, name)
1220{
08793a6d
JS
1221 m_dirCtrl = NULL;
1222 m_path = defaultPath;
1223
51a58d8b
JS
1224 wxBusyCursor cursor;
1225
1226 wxBoxSizer *topsizer = new wxBoxSizer( wxVERTICAL );
1227
1228 // 1) dir ctrl
1229 m_dirCtrl = new wxGenericDirCtrl(this, ID_DIRCTRL,
1230 defaultPath, wxPoint(5, 5),
f9c165b1 1231 wxSize(300, 200), wxDIRCTRL_DIR_ONLY|wxSUNKEN_BORDER);
51a58d8b
JS
1232
1233 topsizer->Add( m_dirCtrl, 1, wxTOP|wxLEFT|wxRIGHT | wxEXPAND, 10 );
1234
e63fdcd6 1235 // 2) text ctrl
08793a6d 1236 m_input = new wxTextCtrl( this, ID_TEXTCTRL, m_path, wxDefaultPosition );
e63fdcd6 1237 topsizer->Add( m_input, 0, wxTOP|wxLEFT|wxRIGHT | wxEXPAND, 10 );
51a58d8b
JS
1238
1239#if wxUSE_STATLINE
1240 // 3) Static line
1241 topsizer->Add( new wxStaticLine( this, -1 ), 0, wxEXPAND | wxLEFT|wxRIGHT|wxTOP, 10 );
1242#endif
1243
1244 // 4) Buttons
1245 wxSizer* buttonsizer = new wxBoxSizer( wxHORIZONTAL );
1246 wxButton* okButton = new wxButton(this, wxID_OK, _("OK"));
1247 buttonsizer->Add( okButton, 0, wxLEFT|wxRIGHT, 10 );
1248 wxButton* cancelButton = new wxButton(this, wxID_CANCEL, _("Cancel"));
1249 buttonsizer->Add( cancelButton, 0, wxLEFT|wxRIGHT, 10 );
1250
3438012b
JS
1251 // I'm not convinced we need a New button, and we tend to get annoying
1252 // accidental-editing with label editing enabled.
1253#if 0
1254 wxButton* newButton = new wxButton( this, wxID_NEW, _("New...") );
51a58d8b 1255 buttonsizer->Add( newButton, 0, wxLEFT|wxRIGHT, 10 );
3438012b
JS
1256#endif
1257
51a58d8b
JS
1258 topsizer->Add( buttonsizer, 0, wxALL | wxCENTER, 10 );
1259
1260 okButton->SetDefault();
1261 m_dirCtrl->SetFocus();
1262
1263 SetAutoLayout( TRUE );
1264 SetSizer( topsizer );
1265
1266 topsizer->SetSizeHints( this );
1267 topsizer->Fit( this );
1268
1269 Centre( wxBOTH );
1270}
1271
33ac7e6f 1272void wxGenericDirDialog::OnCloseWindow(wxCloseEvent& WXUNUSED(event))
51a58d8b
JS
1273{
1274 EndModal(wxID_CANCEL);
1275}
1276
33ac7e6f 1277void wxGenericDirDialog::OnOK(wxCommandEvent& WXUNUSED(event))
51a58d8b 1278{
e63fdcd6
JS
1279 m_path = m_input->GetValue();
1280 // Does the path exist? (User may have typed anything in m_input)
1281 if (wxPathExists(m_path)) {
1282 // OK, path exists, we're done.
1283 EndModal(wxID_OK);
1284 return;
1285 }
1286 // Interact with user, find out if the dir is a typo or to be created
1287 wxString msg( _("The directory ") );
1288 msg = msg + m_path;
1289 msg = msg + _("\ndoes not exist\nCreate it now?") ;
1290 wxMessageDialog dialog(this, msg, _("Directory does not exist"), wxYES_NO | wxICON_WARNING );
1291 if ( dialog.ShowModal() == wxID_YES ) {
1292 // Okay, let's make it
1293 wxLogNull log;
1294 if (wxMkdir(m_path)) {
1295 // The new dir was created okay.
1296 EndModal(wxID_OK);
1297 return;
1298 }
1299 else {
1300 // Trouble...
1301 msg = _("Failed to create directory ")+m_path+
1302 _("\n(Do you have the required permissions?)");
1303 wxMessageDialog errmsg(this, msg, _("Error creating directory"), wxOK | wxICON_ERROR);
1304 errmsg.ShowModal();
1305 // We still don't have a valid dir. Back to the main dialog.
1306 }
1307 }
1308 // User has answered NO to create dir.
51a58d8b
JS
1309}
1310
1311void wxGenericDirDialog::SetPath(const wxString& path)
1312{
1313 m_dirCtrl->SetPath(path);
08793a6d 1314 m_path = path;
51a58d8b
JS
1315}
1316
1317wxString wxGenericDirDialog::GetPath(void) const
1318{
08793a6d 1319 return m_path;
51a58d8b 1320}
e63fdcd6
JS
1321
1322int wxGenericDirDialog::ShowModal()
1323{
08793a6d 1324 //m_input->SetValue( m_path );
e63fdcd6
JS
1325 return wxDialog::ShowModal();
1326}
1327
1328void wxGenericDirDialog::OnTreeSelected( wxTreeEvent &event )
1329{
08793a6d
JS
1330 if (!m_dirCtrl)
1331 return;
1332
e63fdcd6
JS
1333 wxDirItemDataEx *data = (wxDirItemDataEx*)m_dirCtrl->GetTreeCtrl()->GetItemData(event.GetItem());
1334 if (data)
1335 m_input->SetValue( data->m_path );
1336};
1337
1338void wxGenericDirDialog::OnTreeKeyDown( wxTreeEvent &WXUNUSED(event) )
1339{
08793a6d
JS
1340 if (!m_dirCtrl)
1341 return;
1342
e63fdcd6
JS
1343 wxDirItemDataEx *data = (wxDirItemDataEx*)m_dirCtrl->GetTreeCtrl()->GetItemData(m_dirCtrl->GetTreeCtrl()->GetSelection());
1344 if (data)
1345 m_input->SetValue( data->m_path );
1346};
1347
1348void wxGenericDirDialog::OnNew( wxCommandEvent& WXUNUSED(event) )
1349{
3438012b
JS
1350 wxTreeItemId id = m_dirCtrl->GetTreeCtrl()->GetSelection();
1351 if ((id == m_dirCtrl->GetTreeCtrl()->GetRootItem()) ||
1352 (m_dirCtrl->GetTreeCtrl()->GetParent(id) == m_dirCtrl->GetTreeCtrl()->GetRootItem()))
e63fdcd6
JS
1353 {
1354 wxMessageDialog msg(this, _("You cannot add a new directory to this section."),
1355 _("Create directory"), wxOK | wxICON_INFORMATION );
1356 msg.ShowModal();
1357 return;
1358 }
1359
3438012b
JS
1360 wxTreeItemId parent = id ; // m_dirCtrl->GetTreeCtrl()->GetParent( id );
1361 wxDirItemDataEx *data = (wxDirItemDataEx*)m_dirCtrl->GetTreeCtrl()->GetItemData( parent );
e63fdcd6
JS
1362 wxASSERT( data );
1363
1364 wxString new_name( wxT("NewName") );
1365 wxString path( data->m_path );
3438012b
JS
1366 if (path.Last() != wxFILE_SEP_PATH)
1367 path += wxFILE_SEP_PATH;
e63fdcd6
JS
1368 path += new_name;
1369 if (wxFileExists(path))
1370 {
1371 // try NewName0, NewName1 etc.
1372 int i = 0;
1373 do {
1374 new_name = wxT("NewName");
1375 wxString num;
1376 num.Printf( wxT("%d"), i );
1377 new_name += num;
1378
1379 path = data->m_path;
3438012b
JS
1380 if (path.Last() != wxFILE_SEP_PATH)
1381 path += wxFILE_SEP_PATH;
e63fdcd6
JS
1382 path += new_name;
1383 i++;
1384 } while (wxFileExists(path));
1385 }
1386
1387 wxLogNull log;
1388 if (!wxMkdir(path))
1389 {
1390 wxMessageDialog dialog(this, _("Operation not permitted."), _("Error"), wxOK | wxICON_ERROR );
1391 dialog.ShowModal();
1392 return;
1393 }
1394
3438012b
JS
1395 wxDirItemDataEx *new_data = new wxDirItemDataEx( path, new_name, TRUE );
1396
1397 // TODO: THIS CODE DOESN'T WORK YET. We need to avoid duplication of the first child
1398 // of the parent.
1399 wxTreeItemId new_id = m_dirCtrl->GetTreeCtrl()->AppendItem( parent, new_name, 0, 0, new_data );
1400 m_dirCtrl->GetTreeCtrl()->EnsureVisible( new_id );
1401 m_dirCtrl->GetTreeCtrl()->EditLabel( new_id );
e63fdcd6 1402}
1e6feb95
VZ
1403
1404#endif // wxUSE_DIRDLG