1 /////////////////////////////////////////////////////////////////////////////
3 // Purpose: wxGenericDirCtrl
4 // Author: Harm van der Heijden, Robert Roebling, Julian Smart
8 // Copyright: (c) Harm van der Heijden, Robert Roebling and Julian Smart
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
12 #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
13 #pragma implementation "dirctrlg.h"
16 // For compilers that support precompilation, includes "wx.h".
17 #include "wx/wxprec.h"
23 #if wxUSE_DIRDLG || wxUSE_FILEDLG
25 #include "wx/generic/dirctrlg.h"
26 #include "wx/module.h"
28 #include "wx/button.h"
29 #include "wx/layout.h"
30 #include "wx/msgdlg.h"
31 #include "wx/textctrl.h"
32 #include "wx/textdlg.h"
33 #include "wx/filefn.h"
34 #include "wx/cmndata.h"
35 #include "wx/gdicmn.h"
37 #include "wx/imaglist.h"
41 #include "wx/tokenzr.h"
43 #include "wx/settings.h"
44 #include "wx/artprov.h"
46 #include "wx/mimetype.h"
48 #include "wx/choice.h"
51 #include "wx/statline.h"
54 #if defined(__WXMAC__)
55 #include "wx/mac/private.h" // includes mac headers
61 // FIXME - Mingw32 1.0 has both _getdrive() and _chdrive(). For now, let's assume
62 // older releases don't, but it should be verified and the checks modified
64 #if !defined(__GNUWIN32__) || (defined(__MINGW32_MAJOR_VERSION) && __MINGW32_MAJOR_VERSION >= 1)
65 #if !defined(__WXWINCE__)
74 #if defined(__OS2__) || defined(__DOS__)
84 extern bool wxIsDriveAvailable(const wxString
& dirName
);
87 #if defined(__WXMAC__)
89 # include "MoreFilesX.h"
91 # include "MoreFilesExtras.h"
99 // If compiled under Windows, this macro can cause problems
104 // ----------------------------------------------------------------------------
105 // wxGetAvailableDrives, for WINDOWS, DOS, OS2, MAC, UNIX (returns "/")
106 // ----------------------------------------------------------------------------
108 size_t wxGetAvailableDrives(wxArrayString
&paths
, wxArrayString
&names
, wxArrayInt
&icon_ids
)
110 #if defined(__WINDOWS__) || defined(__DOS__) || defined(__OS2__)
113 // No logical drives; return "\"
114 paths
.Add(wxT("\\"));
115 names
.Add(wxT("\\"));
117 #elif defined(__WIN32__)
118 wxChar driveBuffer
[256];
119 size_t n
= (size_t) GetLogicalDriveStrings(255, driveBuffer
);
124 path
.Printf(wxT("%c:\\"), driveBuffer
[i
]);
125 name
.Printf(wxT("%c:"), driveBuffer
[i
]);
128 int driveType
= ::GetDriveType(path
);
131 case DRIVE_REMOVABLE
:
132 if (path
== wxT("a:\\") || path
== wxT("b:\\"))
133 imageId
= wxFileIconsTable
::floppy
;
135 imageId
= wxFileIconsTable
::removeable
;
138 imageId
= wxFileIconsTable
::cdrom
;
143 imageId
= wxFileIconsTable
::drive
;
149 icon_ids
.Add(imageId
);
151 while (driveBuffer
[i
] != wxT('\0'))
154 if (driveBuffer
[i
] == wxT('\0'))
157 #elif defined(__OS2__)
159 ULONG ulDriveNum
= 0;
160 ULONG ulDriveMap
= 0;
161 rc
= ::DosQueryCurrentDisk(&ulDriveNum
, &ulDriveMap
);
167 if (ulDriveMap
& ( 1 << i
))
170 path
.Printf(wxT("%c:\\"), 'A' + i
);
171 name
.Printf(wxT("%c:"), 'A' + i
);
174 if (path
== wxT("A:\\") || path
== wxT("B:\\"))
175 imageId
= wxFileIconsTable
::floppy
;
177 imageId
= wxFileIconsTable
::drive
;
180 icon_ids
.Add(imageId
);
185 #else // !__WIN32__, !__OS2__
188 /* If we can switch to the drive, it exists. */
189 for( drive
= 1; drive
<= 26; drive
++ )
192 path
.Printf(wxT("%c:\\"), (char) (drive
+ 'a' - 1));
193 name
.Printf(wxT("%c:"), (char) (drive
+ 'A' - 1));
195 if (wxIsDriveAvailable(path
))
199 icon_ids
.Add((drive
<= 2) ? wxFileIconsTable
::floppy
: wxFileIconsTable
::drive
);
202 #endif // __WIN32__/!__WIN32__
204 #elif defined(__WXMAC__)
207 ItemCount theVolCount
;
208 char thePath
[FILENAME_MAX
];
210 if (FSGetMountedVolumes(&theVolRefs
, &theVolCount
) == noErr
) {
212 ::HLock( (Handle
)theVolRefs
) ;
213 for (index
= 0; index
< theVolCount
; ++index
) {
214 // get the POSIX path associated with the FSRef
215 if ( FSRefMakePath(&((*theVolRefs
)[index
]),
216 (UInt8
*)thePath
, sizeof(thePath
)) != noErr
) {
219 // add path separator at end if necessary
220 wxString
path( thePath
, wxConvLocal
) ;
221 if (path
.Last() != wxFILE_SEP_PATH
) {
222 path
+= wxFILE_SEP_PATH
;
224 // get Mac volume name for display
225 FSVolumeRefNum vRefNum
;
226 HFSUniStr255 volumeName
;
228 if ( FSGetVRefNum(&((*theVolRefs
)[index
]), &vRefNum
) != noErr
) {
231 if ( FSGetVInfo(vRefNum
, &volumeName
, NULL
, NULL
) != noErr
) {
234 // get C string from Unicode HFS name
235 // see: http://developer.apple.com/carbon/tipsandtricks.html
236 CFStringRef cfstr
= CFStringCreateWithCharacters( kCFAllocatorDefault
,
239 // Do something with str
240 char *cstr
= NewPtr(CFStringGetLength(cfstr
) + 1);
241 if (( cstr
== NULL
) ||
242 !CFStringGetCString(cfstr
, cstr
, CFStringGetLength(cfstr
) + 1,
243 kCFStringEncodingMacRoman
))
248 wxString
name( cstr
, wxConvLocal
);
252 GetVolParmsInfoBuffer volParmsInfo
;
254 if ( FSGetVolParms(vRefNum
, sizeof(volParmsInfo
), &volParmsInfo
, &actualSize
) != noErr
) {
261 if ( VolIsEjectable(&volParmsInfo
) )
262 icon_ids
.Add(wxFileIconsTable
::cdrom
);
264 icon_ids
.Add(wxFileIconsTable
::drive
);
266 ::HUnlock( (Handle
)theVolRefs
);
267 ::DisposeHandle( (Handle
)theVolRefs
);
274 short actualCount
= 0 ;
275 if (OnLine(&volume
, 1, &actualCount
, &index
) != noErr
|| actualCount
==0)
280 wxString name
= wxMacFSSpec2MacFilename( &volume
);
281 paths
.Add(name
+ wxFILE_SEP_PATH
);
283 icon_ids
.Add(wxFileIconsTable
::drive
);
287 #elif defined(__UNIX__)
290 icon_ids
.Add(wxFileIconsTable
::computer
);
292 #error "Unsupported platform in wxGenericDirCtrl!"
294 return paths
.GetCount();
297 // ----------------------------------------------------------------------------
298 // wxIsDriveAvailable
299 // ----------------------------------------------------------------------------
303 bool wxIsDriveAvailable(const wxString
& dirName
)
305 // FIXME_MGL - this method leads to hang up under Watcom for some reason
307 if ( dirName
.Len() == 3 && dirName
[1u] == wxT(':') )
309 wxString
dirNameLower(dirName
.Lower());
310 // VS: always return true for removable media, since Win95 doesn't
311 // like it when MS-DOS app accesses empty floppy drive
312 return (dirNameLower
[0u] == wxT('a') ||
313 dirNameLower
[0u] == wxT('b') ||
314 wxPathExists(dirNameLower
));
321 #elif defined(__WINDOWS__) || defined(__OS2__)
323 int setdrive(int drive
)
327 #elif defined(__GNUWIN32__) && \
328 (defined(__MINGW32_MAJOR_VERSION) && __MINGW32_MAJOR_VERSION >= 1)
329 return _chdrive(drive
);
333 if (drive
< 1 || drive
> 31)
335 newdrive
[0] = (wxChar
)(wxT('A') + drive
- 1);
336 newdrive
[1] = wxT(':');
338 newdrive
[2] = wxT('\\');
339 newdrive
[3] = wxT('\0');
341 newdrive
[2] = wxT('\0');
343 #if defined(__WXMSW__)
344 if (::SetCurrentDirectory(newdrive
))
346 // VA doesn't know what LPSTR is and has its own set
347 if (!DosSetCurrentDir((PSZ
)newdrive
))
355 bool wxIsDriveAvailable(const wxString
& dirName
)
361 UINT errorMode
= SetErrorMode(SEM_FAILCRITICALERRORS
| SEM_NOOPENFILEERRORBOX
);
365 // Check if this is a root directory and if so,
366 // whether the drive is available.
367 if (dirName
.Len() == 3 && dirName
[(size_t)1] == wxT(':'))
369 wxString
dirNameLower(dirName
.Lower());
370 #if defined(__GNUWIN32__) && !(defined(__MINGW32_MAJOR_VERSION) && __MINGW32_MAJOR_VERSION >= 1)
371 success
= wxPathExists(dirNameLower
);
374 // Avoid changing to drive since no media may be inserted.
375 if (dirNameLower
[(size_t)0] == 'a' || dirNameLower
[(size_t)0] == 'b')
378 int currentDrive
= _getdrive();
379 int thisDrive
= (int) (dirNameLower
[(size_t)0] - 'a' + 1) ;
380 int err
= setdrive( thisDrive
) ;
381 setdrive( currentDrive
);
390 (void) SetErrorMode(errorMode
);
396 #endif // __WINDOWS__ || __OS2__
398 #endif // wxUSE_DIRDLG || wxUSE_FILEDLG
404 // Function which is called by quick sort. We want to override the default wxArrayString behaviour,
405 // and sort regardless of case.
406 static int wxCMPFUNC_CONV
wxDirCtrlStringCompareFunction(wxString
* strFirst
, wxString
* strSecond
)
408 return strFirst
->CmpNoCase(*strSecond
);
411 //-----------------------------------------------------------------------------
413 //-----------------------------------------------------------------------------
415 wxDirItemData
::wxDirItemData(const wxString
& path
, const wxString
& name
,
420 /* Insert logic to detect hidden files here
421 * In UnixLand we just check whether the first char is a dot
422 * For FileNameFromPath read LastDirNameInThisPath ;-) */
423 // m_isHidden = (bool)(wxFileNameFromPath(*m_path)[0] == '.');
425 m_isExpanded
= false;
429 wxDirItemData
::~wxDirItemData()
433 void wxDirItemData
::SetNewDirName(const wxString
& path
)
436 m_name
= wxFileNameFromPath(path
);
439 bool wxDirItemData
::HasSubDirs() const
441 if (m_path
.IsEmpty())
447 if ( !dir
.Open(m_path
) )
451 return dir
.HasSubDirs();
454 bool wxDirItemData
::HasFiles(const wxString
& WXUNUSED(spec
)) const
456 if (m_path
.IsEmpty())
462 if ( !dir
.Open(m_path
) )
466 return dir
.HasFiles();
469 //-----------------------------------------------------------------------------
471 //-----------------------------------------------------------------------------
474 #if wxUSE_EXTENDED_RTTI
475 WX_DEFINE_FLAGS( wxGenericDirCtrlStyle
)
477 wxBEGIN_FLAGS( wxGenericDirCtrlStyle
)
478 // new style border flags, we put them first to
479 // use them for streaming out
480 wxFLAGS_MEMBER(wxBORDER_SIMPLE
)
481 wxFLAGS_MEMBER(wxBORDER_SUNKEN
)
482 wxFLAGS_MEMBER(wxBORDER_DOUBLE
)
483 wxFLAGS_MEMBER(wxBORDER_RAISED
)
484 wxFLAGS_MEMBER(wxBORDER_STATIC
)
485 wxFLAGS_MEMBER(wxBORDER_NONE
)
487 // old style border flags
488 wxFLAGS_MEMBER(wxSIMPLE_BORDER
)
489 wxFLAGS_MEMBER(wxSUNKEN_BORDER
)
490 wxFLAGS_MEMBER(wxDOUBLE_BORDER
)
491 wxFLAGS_MEMBER(wxRAISED_BORDER
)
492 wxFLAGS_MEMBER(wxSTATIC_BORDER
)
493 wxFLAGS_MEMBER(wxBORDER
)
495 // standard window styles
496 wxFLAGS_MEMBER(wxTAB_TRAVERSAL
)
497 wxFLAGS_MEMBER(wxCLIP_CHILDREN
)
498 wxFLAGS_MEMBER(wxTRANSPARENT_WINDOW
)
499 wxFLAGS_MEMBER(wxWANTS_CHARS
)
500 wxFLAGS_MEMBER(wxFULL_REPAINT_ON_RESIZE
)
501 wxFLAGS_MEMBER(wxALWAYS_SHOW_SB
)
502 wxFLAGS_MEMBER(wxVSCROLL
)
503 wxFLAGS_MEMBER(wxHSCROLL
)
505 wxFLAGS_MEMBER(wxDIRCTRL_DIR_ONLY
)
506 wxFLAGS_MEMBER(wxDIRCTRL_3D_INTERNAL
)
507 wxFLAGS_MEMBER(wxDIRCTRL_SELECT_FIRST
)
508 wxFLAGS_MEMBER(wxDIRCTRL_SHOW_FILTERS
)
510 wxEND_FLAGS( wxGenericDirCtrlStyle
)
512 IMPLEMENT_DYNAMIC_CLASS_XTI(wxGenericDirCtrl
, wxControl
,"wx/dirctrl.h")
514 wxBEGIN_PROPERTIES_TABLE(wxGenericDirCtrl
)
515 wxHIDE_PROPERTY( Children
)
516 wxPROPERTY( DefaultPath
, wxString
, SetDefaultPath
, GetDefaultPath
, EMPTY_MACROVALUE
, 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
517 wxPROPERTY( Filter
, wxString
, SetFilter
, GetFilter
, EMPTY_MACROVALUE
, 0 /*flags*/ , wxT("Helpstring") , wxT("group") )
518 wxPROPERTY( DefaultFilter
, int , SetFilterIndex
, GetFilterIndex
, EMPTY_MACROVALUE
, 0 /*flags*/ , wxT("Helpstring") , wxT("group") )
519 wxPROPERTY_FLAGS( WindowStyle
, wxGenericDirCtrlStyle
, long, SetWindowStyleFlag
, GetWindowStyleFlag
, EMPTY_MACROVALUE
, 0, wxT("Helpstring"), wxT("group") )
520 wxEND_PROPERTIES_TABLE()
522 wxBEGIN_HANDLERS_TABLE(wxGenericDirCtrl
)
523 wxEND_HANDLERS_TABLE()
525 wxCONSTRUCTOR_8( wxGenericDirCtrl
, wxWindow
* , Parent
, wxWindowID
, Id
, wxString
, DefaultPath
,
526 wxPoint
, Position
, wxSize
, Size
, long , WindowStyle
, wxString
, Filter
, int , DefaultFilter
)
528 IMPLEMENT_DYNAMIC_CLASS(wxGenericDirCtrl
, wxControl
)
531 BEGIN_EVENT_TABLE(wxGenericDirCtrl
, wxControl
)
532 EVT_TREE_ITEM_EXPANDING (wxID_TREECTRL
, wxGenericDirCtrl
::OnExpandItem
)
533 EVT_TREE_ITEM_COLLAPSED (wxID_TREECTRL
, wxGenericDirCtrl
::OnCollapseItem
)
534 EVT_TREE_BEGIN_LABEL_EDIT (wxID_TREECTRL
, wxGenericDirCtrl
::OnBeginEditItem
)
535 EVT_TREE_END_LABEL_EDIT (wxID_TREECTRL
, wxGenericDirCtrl
::OnEndEditItem
)
536 EVT_SIZE (wxGenericDirCtrl
::OnSize
)
539 wxGenericDirCtrl
::wxGenericDirCtrl(void)
544 bool wxGenericDirCtrl
::Create(wxWindow
*parent
,
550 const wxString
& filter
,
552 const wxString
& name
)
554 if (!wxControl
::Create(parent
, id
, pos
, size
, style
, wxDefaultValidator
, name
))
557 SetBackgroundColour(wxSystemSettings
::GetColour(wxSYS_COLOUR_3DFACE
));
561 long treeStyle
= wxTR_HAS_BUTTONS
| wxTR_HIDE_ROOT
;
563 if (style
& wxDIRCTRL_EDIT_LABELS
)
564 treeStyle
|= wxTR_EDIT_LABELS
;
566 if ((style
& wxDIRCTRL_3D_INTERNAL
) == 0)
567 treeStyle
|= wxNO_BORDER
;
569 treeStyle
|= wxBORDER_SUNKEN
;
571 long filterStyle
= 0;
572 if ((style
& wxDIRCTRL_3D_INTERNAL
) == 0)
573 filterStyle
|= wxNO_BORDER
;
575 filterStyle
|= wxBORDER_SUNKEN
;
577 m_treeCtrl
= new wxTreeCtrl(this, wxID_TREECTRL
, pos
, size
, treeStyle
);
579 if (!filter
.IsEmpty() && (style
& wxDIRCTRL_SHOW_FILTERS
))
580 m_filterListCtrl
= new wxDirFilterListCtrl(this, wxID_FILTERLISTCTRL
, wxDefaultPosition
, wxDefaultSize
, filterStyle
);
585 SetFilterIndex(defaultFilter
);
587 if (m_filterListCtrl
)
588 m_filterListCtrl
->FillFilterList(filter
, defaultFilter
);
590 m_treeCtrl
->SetImageList(wxTheFileIconsTable
->GetSmallImageList());
592 m_showHidden
= false;
593 wxDirItemData
* rootData
= new wxDirItemData(wxEmptyString
, wxEmptyString
, true);
597 #if defined(__WINDOWS__) || defined(__OS2__) || defined(__DOS__)
598 rootName
= _("Computer");
600 rootName
= _("Sections");
603 m_rootId
= m_treeCtrl
->AddRoot( rootName
, 3, -1, rootData
);
604 m_treeCtrl
->SetItemHasChildren(m_rootId
);
605 ExpandDir(m_rootId
); // automatically expand first level
607 // Expand and select the default path
608 if (!m_defaultPath
.IsEmpty())
609 ExpandPath(m_defaultPath
);
617 wxGenericDirCtrl
::~wxGenericDirCtrl()
621 void wxGenericDirCtrl
::Init()
623 m_showHidden
= false;
625 m_currentFilterStr
= wxEmptyString
; // Default: any file
627 m_filterListCtrl
= NULL
;
630 void wxGenericDirCtrl
::ShowHidden( bool show
)
634 wxString path
= GetPath();
640 wxGenericDirCtrl
::AddSection(const wxString
& path
, const wxString
& name
, int imageId
)
642 wxDirItemData
*dir_item
= new wxDirItemData(path
,name
,true);
644 wxTreeItemId id
= AppendItem( m_rootId
, name
, imageId
, -1, dir_item
);
646 m_treeCtrl
->SetItemHasChildren(id
);
651 void wxGenericDirCtrl
::SetupSections()
653 wxArrayString paths
, names
;
656 size_t n
, count
= wxGetAvailableDrives(paths
, names
, icons
);
658 for (n
= 0; n
< count
; n
++)
660 AddSection(paths
[n
], names
[n
], icons
[n
]);
664 void wxGenericDirCtrl
::OnBeginEditItem(wxTreeEvent
&event
)
666 // don't rename the main entry "Sections"
667 if (event
.GetItem() == m_rootId
)
673 // don't rename the individual sections
674 if (m_treeCtrl
->GetItemParent( event
.GetItem() ) == m_rootId
)
681 void wxGenericDirCtrl
::OnEndEditItem(wxTreeEvent
&event
)
683 if ((event
.GetLabel().IsEmpty()) ||
684 (event
.GetLabel() == _(".")) ||
685 (event
.GetLabel() == _("..")) ||
686 (event
.GetLabel().Find(wxT('/')) != wxNOT_FOUND
) ||
687 (event
.GetLabel().Find(wxT('\\')) != wxNOT_FOUND
) ||
688 (event
.GetLabel().Find(wxT('|')) != wxNOT_FOUND
))
690 wxMessageDialog
dialog(this, _("Illegal directory name."), _("Error"), wxOK
| wxICON_ERROR
);
696 wxTreeItemId id
= event
.GetItem();
697 wxDirItemData
*data
= (wxDirItemData
*)m_treeCtrl
->GetItemData( id
);
700 wxString
new_name( wxPathOnly( data
->m_path
) );
701 new_name
+= wxString(wxFILE_SEP_PATH
);
702 new_name
+= event
.GetLabel();
706 if (wxFileExists(new_name
))
708 wxMessageDialog
dialog(this, _("File name exists already."), _("Error"), wxOK
| wxICON_ERROR
);
713 if (wxRenameFile(data
->m_path
,new_name
))
715 data
->SetNewDirName( new_name
);
719 wxMessageDialog
dialog(this, _("Operation not permitted."), _("Error"), wxOK
| wxICON_ERROR
);
725 void wxGenericDirCtrl
::OnExpandItem(wxTreeEvent
&event
)
727 wxTreeItemId parentId
= event
.GetItem();
729 // VS: this is needed because the event handler is called from wxTreeCtrl
730 // ctor when wxTR_HIDE_ROOT was specified
732 if (!m_rootId
.IsOk())
734 m_rootId
= m_treeCtrl
->GetRootItem();
739 void wxGenericDirCtrl
::OnCollapseItem(wxTreeEvent
&event
)
741 CollapseDir(event
.GetItem());
744 void wxGenericDirCtrl
::CollapseDir(wxTreeItemId parentId
)
748 wxDirItemData
*data
= (wxDirItemData
*) m_treeCtrl
->GetItemData(parentId
);
749 if (!data
->m_isExpanded
)
752 data
->m_isExpanded
= false;
753 wxTreeItemIdValue cookie
;
754 /* Workaround because DeleteChildren has disapeared (why?) and
755 * CollapseAndReset doesn't work as advertised (deletes parent too) */
756 child
= m_treeCtrl
->GetFirstChild(parentId
, cookie
);
759 m_treeCtrl
->Delete(child
);
760 /* Not GetNextChild below, because the cookie mechanism can't
761 * handle disappearing children! */
762 child
= m_treeCtrl
->GetFirstChild(parentId
, cookie
);
766 void wxGenericDirCtrl
::ExpandDir(wxTreeItemId parentId
)
768 wxDirItemData
*data
= (wxDirItemData
*) m_treeCtrl
->GetItemData(parentId
);
770 if (data
->m_isExpanded
)
773 data
->m_isExpanded
= true;
775 if (parentId
== m_treeCtrl
->GetRootItem())
783 wxString search
,path
,filename
;
785 wxString
dirName(data
->m_path
);
787 #if defined(__WINDOWS__) || defined(__DOS__) || defined(__OS2__)
788 // Check if this is a root directory and if so,
789 // whether the drive is avaiable.
790 if (!wxIsDriveAvailable(dirName
))
792 data
->m_isExpanded
= false;
793 //wxMessageBox(wxT("Sorry, this drive is not available."));
798 // This may take a longish time. Go to busy cursor
801 #if defined(__WINDOWS__) || defined(__DOS__) || defined(__OS2__)
802 if (dirName
.Last() == ':')
803 dirName
+= wxString(wxFILE_SEP_PATH
);
807 wxArrayString filenames
;
810 wxString eachFilename
;
817 int style
= wxDIR_DIRS
;
818 if (m_showHidden
) style
|= wxDIR_HIDDEN
;
819 if (d
.GetFirst(& eachFilename
, wxEmptyString
, style
))
823 if ((eachFilename
!= wxT(".")) && (eachFilename
!= wxT("..")))
825 dirs
.Add(eachFilename
);
828 while (d
.GetNext(&eachFilename
));
831 dirs
.Sort(wxDirCtrlStringCompareFunction
);
833 // Now do the filenames -- but only if we're allowed to
834 if ((GetWindowStyle() & wxDIRCTRL_DIR_ONLY
) == 0)
842 int style
= wxDIR_FILES
;
843 if (m_showHidden
) style
|= wxDIR_HIDDEN
;
844 // Process each filter (ex: "JPEG Files (*.jpg;*.jpeg)|*.jpg;*.jpeg")
845 wxStringTokenizer strTok
;
847 strTok
.SetString(m_currentFilterStr
,wxT(";"));
848 while(strTok
.HasMoreTokens())
850 curFilter
= strTok
.GetNextToken();
851 if (d
.GetFirst(& eachFilename
, m_currentFilterStr
, style
))
855 if ((eachFilename
!= wxT(".")) && (eachFilename
!= wxT("..")))
857 filenames
.Add(eachFilename
);
860 while (d
.GetNext(& eachFilename
));
864 filenames
.Sort(wxDirCtrlStringCompareFunction
);
867 // Add the sorted dirs
869 for (i
= 0; i
< dirs
.Count(); i
++)
871 wxString
eachFilename(dirs
[i
]);
873 if (!wxEndsWithPathSeparator(path
))
874 path
+= wxString(wxFILE_SEP_PATH
);
875 path
+= eachFilename
;
877 wxDirItemData
*dir_item
= new wxDirItemData(path
,eachFilename
,true);
878 wxTreeItemId id
= AppendItem( parentId
, eachFilename
,
879 wxFileIconsTable
::folder
, -1, dir_item
);
880 m_treeCtrl
->SetItemImage( id
, wxFileIconsTable
::folder_open
,
881 wxTreeItemIcon_Expanded
);
883 // Has this got any children? If so, make it expandable.
884 // (There are two situations when a dir has children: either it
885 // has subdirectories or it contains files that weren't filtered
886 // out. The latter only applies to dirctrl with files.)
887 if ( dir_item
->HasSubDirs() ||
888 (((GetWindowStyle() & wxDIRCTRL_DIR_ONLY
) == 0) &&
889 dir_item
->HasFiles(m_currentFilterStr
)) )
891 m_treeCtrl
->SetItemHasChildren(id
);
895 // Add the sorted filenames
896 if ((GetWindowStyle() & wxDIRCTRL_DIR_ONLY
) == 0)
898 for (i
= 0; i
< filenames
.Count(); i
++)
900 wxString
eachFilename(filenames
[i
]);
902 if (!wxEndsWithPathSeparator(path
))
903 path
+= wxString(wxFILE_SEP_PATH
);
904 path
+= eachFilename
;
905 //path = dirName + wxString(wxT("/")) + eachFilename;
906 wxDirItemData
*dir_item
= new wxDirItemData(path
,eachFilename
,false);
907 int image_id
= wxFileIconsTable
::file
;
908 if (eachFilename
.Find(wxT('.')) != wxNOT_FOUND
)
909 image_id
= wxTheFileIconsTable
->GetIconID(eachFilename
.AfterLast(wxT('.')));
910 (void) AppendItem( parentId
, eachFilename
, image_id
, -1, dir_item
);
915 void wxGenericDirCtrl
::ReCreateTree()
917 CollapseDir(m_treeCtrl
->GetRootItem());
918 ExpandDir(m_treeCtrl
->GetRootItem());
921 // Find the child that matches the first part of 'path'.
922 // E.g. if a child path is "/usr" and 'path' is "/usr/include"
923 // then the child for /usr is returned.
924 wxTreeItemId wxGenericDirCtrl
::FindChild(wxTreeItemId parentId
, const wxString
& path
, bool& done
)
926 wxString
path2(path
);
928 // Make sure all separators are as per the current platform
929 path2
.Replace(wxT("\\"), wxString(wxFILE_SEP_PATH
));
930 path2
.Replace(wxT("/"), wxString(wxFILE_SEP_PATH
));
932 // Append a separator to foil bogus substring matching
933 path2
+= wxString(wxFILE_SEP_PATH
);
935 // In MSW or PM, case is not significant
936 #if defined(__WINDOWS__) || defined(__DOS__) || defined(__OS2__)
940 wxTreeItemIdValue cookie
;
941 wxTreeItemId childId
= m_treeCtrl
->GetFirstChild(parentId
, cookie
);
942 while (childId
.IsOk())
944 wxDirItemData
* data
= (wxDirItemData
*) m_treeCtrl
->GetItemData(childId
);
946 if (data
&& !data
->m_path
.IsEmpty())
948 wxString
childPath(data
->m_path
);
949 if (!wxEndsWithPathSeparator(childPath
))
950 childPath
+= wxString(wxFILE_SEP_PATH
);
952 // In MSW and PM, case is not significant
953 #if defined(__WINDOWS__) || defined(__DOS__) || defined(__OS2__)
954 childPath
.MakeLower();
957 if (childPath
.Len() <= path2
.Len())
959 wxString path3
= path2
.Mid(0, childPath
.Len());
960 if (childPath
== path3
)
962 if (path3
.Len() == path2
.Len())
971 childId
= m_treeCtrl
->GetNextChild(parentId
, cookie
);
973 wxTreeItemId invalid
;
977 // Try to expand as much of the given path as possible,
978 // and select the given tree item.
979 bool wxGenericDirCtrl
::ExpandPath(const wxString
& path
)
982 wxTreeItemId id
= FindChild(m_rootId
, path
, done
);
983 wxTreeItemId lastId
= id
; // The last non-zero id
984 while (id
.IsOk() && !done
)
988 id
= FindChild(id
, path
, done
);
994 wxDirItemData
*data
= (wxDirItemData
*) m_treeCtrl
->GetItemData(lastId
);
997 m_treeCtrl
->Expand(lastId
);
999 if ((GetWindowStyle() & wxDIRCTRL_SELECT_FIRST
) && data
->m_isDir
)
1001 // Find the first file in this directory
1002 wxTreeItemIdValue cookie
;
1003 wxTreeItemId childId
= m_treeCtrl
->GetFirstChild(lastId
, cookie
);
1004 bool selectedChild
= false;
1005 while (childId
.IsOk())
1007 wxDirItemData
* data
= (wxDirItemData
*) m_treeCtrl
->GetItemData(childId
);
1009 if (data
&& data
->m_path
!= wxEmptyString
&& !data
->m_isDir
)
1011 m_treeCtrl
->SelectItem(childId
);
1012 m_treeCtrl
->EnsureVisible(childId
);
1013 selectedChild
= true;
1016 childId
= m_treeCtrl
->GetNextChild(lastId
, cookie
);
1020 m_treeCtrl
->SelectItem(lastId
);
1021 m_treeCtrl
->EnsureVisible(lastId
);
1026 m_treeCtrl
->SelectItem(lastId
);
1027 m_treeCtrl
->EnsureVisible(lastId
);
1036 wxString wxGenericDirCtrl
::GetPath() const
1038 wxTreeItemId id
= m_treeCtrl
->GetSelection();
1041 wxDirItemData
* data
= (wxDirItemData
*) m_treeCtrl
->GetItemData(id
);
1042 return data
->m_path
;
1045 return wxEmptyString
;
1048 wxString wxGenericDirCtrl
::GetFilePath() const
1050 wxTreeItemId id
= m_treeCtrl
->GetSelection();
1053 wxDirItemData
* data
= (wxDirItemData
*) m_treeCtrl
->GetItemData(id
);
1055 return wxEmptyString
;
1057 return data
->m_path
;
1060 return wxEmptyString
;
1063 void wxGenericDirCtrl
::SetPath(const wxString
& path
)
1065 m_defaultPath
= path
;
1072 void wxGenericDirCtrl
::FindChildFiles(wxTreeItemId id
, int dirFlags
, wxArrayString
& filenames
)
1074 wxDirItemData
*data
= (wxDirItemData
*) m_treeCtrl
->GetItemData(id
);
1076 // This may take a longish time. Go to busy cursor
1081 wxString search
,path
,filename
;
1083 wxString
dirName(data
->m_path
);
1085 #if defined(__WXMSW__) || defined(__OS2__)
1086 if (dirName
.Last() == ':')
1087 dirName
+= wxString(wxFILE_SEP_PATH
);
1091 wxString eachFilename
;
1098 if (d
.GetFirst(& eachFilename
, m_currentFilterStr
, dirFlags
))
1102 if ((eachFilename
!= wxT(".")) && (eachFilename
!= wxT("..")))
1104 filenames
.Add(eachFilename
);
1107 while (d
.GetNext(& eachFilename
)) ;
1113 void wxGenericDirCtrl
::SetFilterIndex(int n
)
1115 m_currentFilter
= n
;
1118 if (ExtractWildcard(m_filter
, n
, f
, d
))
1119 m_currentFilterStr
= f
;
1121 m_currentFilterStr
= wxT("*.*");
1124 void wxGenericDirCtrl
::SetFilter(const wxString
& filter
)
1129 if (ExtractWildcard(m_filter
, m_currentFilter
, f
, d
))
1130 m_currentFilterStr
= f
;
1132 m_currentFilterStr
= wxT("*.*");
1135 // Extract description and actual filter from overall filter string
1136 bool wxGenericDirCtrl
::ExtractWildcard(const wxString
& filterStr
, int n
, wxString
& filter
, wxString
& description
)
1138 wxArrayString filters
, descriptions
;
1139 int count
= wxParseWildcard(filterStr
, filters
, descriptions
);
1140 if (count
> 0 && n
< count
)
1142 filter
= filters
[n
];
1143 description
= descriptions
[n
];
1150 #if WXWIN_COMPATIBILITY_2_4
1151 // Parses the global filter, returning the number of filters.
1152 // Returns 0 if none or if there's a problem.
1153 // filterStr is in the form: "All files (*.*)|*.*|JPEG Files (*.jpeg)|*.jpg"
1154 int wxGenericDirCtrl
::ParseFilter(const wxString
& filterStr
, wxArrayString
& filters
, wxArrayString
& descriptions
)
1156 return wxParseWildcard(filterStr
, descriptions
, filters
);
1158 #endif // WXWIN_COMPATIBILITY_2_4
1160 void wxGenericDirCtrl
::DoResize()
1162 wxSize sz
= GetClientSize();
1163 int verticalSpacing
= 3;
1167 if (m_filterListCtrl
)
1170 // For some reason, this is required in order for the
1171 // correct control height to always be returned, rather
1172 // than the drop-down list height which is sometimes returned.
1173 wxSize oldSize
= m_filterListCtrl
->GetSize();
1174 m_filterListCtrl
->SetSize(wxDefaultPosition
.x
,
1175 wxDefaultPosition
.y
,
1178 wxSIZE_USE_EXISTING
);
1179 m_filterListCtrl
->SetSize(wxDefaultPosition
.x
,
1180 wxDefaultPosition
.y
,
1183 wxSIZE_USE_EXISTING
);
1185 filterSz
= m_filterListCtrl
->GetSize();
1186 sz
.y
-= (filterSz
.y
+ verticalSpacing
);
1188 m_treeCtrl
->SetSize(0, 0, sz
.x
, sz
.y
);
1189 if (m_filterListCtrl
)
1191 m_filterListCtrl
->SetSize(0, sz
.y
+ verticalSpacing
, sz
.x
, filterSz
.y
);
1192 // Don't know why, but this needs refreshing after a resize (wxMSW)
1193 m_filterListCtrl
->Refresh();
1199 void wxGenericDirCtrl
::OnSize(wxSizeEvent
& WXUNUSED(event
))
1204 wxTreeItemId wxGenericDirCtrl
::AppendItem (const wxTreeItemId
& parent
,
1205 const wxString
& text
,
1206 int image
, int selectedImage
,
1207 wxTreeItemData
* data
)
1209 wxTreeCtrl
*treeCtrl
= GetTreeCtrl ();
1211 wxASSERT (treeCtrl
);
1215 return treeCtrl
->AppendItem (parent
, text
, image
, selectedImage
, data
);
1219 return wxTreeItemId();
1224 //-----------------------------------------------------------------------------
1225 // wxDirFilterListCtrl
1226 //-----------------------------------------------------------------------------
1228 IMPLEMENT_CLASS(wxDirFilterListCtrl
, wxChoice
)
1230 BEGIN_EVENT_TABLE(wxDirFilterListCtrl
, wxChoice
)
1231 EVT_CHOICE(wxID_ANY
, wxDirFilterListCtrl
::OnSelFilter
)
1234 bool wxDirFilterListCtrl
::Create(wxGenericDirCtrl
* parent
, const wxWindowID id
,
1240 return wxChoice
::Create(parent
, id
, pos
, size
, 0, NULL
, style
);
1243 void wxDirFilterListCtrl
::Init()
1248 void wxDirFilterListCtrl
::OnSelFilter(wxCommandEvent
& WXUNUSED(event
))
1250 int sel
= GetSelection();
1252 wxString currentPath
= m_dirCtrl
->GetPath();
1254 m_dirCtrl
->SetFilterIndex(sel
);
1256 // If the filter has changed, the view is out of date, so
1257 // collapse the tree.
1258 m_dirCtrl
->ReCreateTree();
1260 // Try to restore the selection, or at least the directory
1261 m_dirCtrl
->ExpandPath(currentPath
);
1264 void wxDirFilterListCtrl
::FillFilterList(const wxString
& filter
, int defaultFilter
)
1267 wxArrayString descriptions
, filters
;
1268 size_t n
= (size_t) wxParseWildcard(filter
, filters
, descriptions
);
1270 if (n
> 0 && defaultFilter
< (int) n
)
1272 for (size_t i
= 0; i
< n
; i
++)
1273 Append(descriptions
[i
]);
1274 SetSelection(defaultFilter
);
1277 #endif // wxUSE_DIRDLG
1279 #if wxUSE_DIRDLG || wxUSE_FILEDLG
1281 // ----------------------------------------------------------------------------
1282 // wxFileIconsTable icons
1283 // ----------------------------------------------------------------------------
1286 static const char * file_icons_tbl_folder_open_xpm
[] = {
1287 /* width height ncolors chars_per_pixel */
1315 static const char * file_icons_tbl_computer_xpm
[] = {
1342 static const char * file_icons_tbl_drive_xpm
[] = {
1369 static const char *file_icons_tbl_cdrom_xpm
[] = {
1399 static const char * file_icons_tbl_floppy_xpm
[] = {
1426 static const char * file_icons_tbl_removeable_xpm
[] = {
1452 // ----------------------------------------------------------------------------
1453 // wxFileIconsTable & friends
1454 // ----------------------------------------------------------------------------
1456 // global instance of a wxFileIconsTable
1457 wxFileIconsTable
* wxTheFileIconsTable
= (wxFileIconsTable
*)NULL
;
1459 // A module to allow icons table cleanup
1461 class wxFileIconsTableModule
: public wxModule
1463 DECLARE_DYNAMIC_CLASS(wxFileIconsTableModule
)
1465 wxFileIconsTableModule() {}
1466 bool OnInit() { wxTheFileIconsTable
= new wxFileIconsTable
; return true; }
1469 if (wxTheFileIconsTable
)
1471 delete wxTheFileIconsTable
;
1472 wxTheFileIconsTable
= NULL
;
1477 IMPLEMENT_DYNAMIC_CLASS(wxFileIconsTableModule
, wxModule
)
1479 class wxFileIconEntry
: public wxObject
1482 wxFileIconEntry(int i
) { id
= i
; }
1487 wxFileIconsTable
::wxFileIconsTable()
1490 m_smallImageList
= NULL
;
1493 wxFileIconsTable
::~wxFileIconsTable()
1497 WX_CLEAR_HASH_TABLE(*m_HashTable
);
1500 if (m_smallImageList
) delete m_smallImageList
;
1503 // delayed initialization - wait until first use (wxArtProv not created yet)
1504 void wxFileIconsTable
::Create()
1506 wxCHECK_RET(!m_smallImageList
&& !m_HashTable
, wxT("creating icons twice"));
1507 m_HashTable
= new wxHashTable(wxKEY_STRING
);
1508 m_smallImageList
= new wxImageList(16, 16);
1511 m_smallImageList
->Add(wxArtProvider
::GetBitmap(wxART_FOLDER
, wxART_CMN_DIALOG
));
1513 m_smallImageList
->Add(wxIcon(file_icons_tbl_folder_open_xpm
));
1515 m_smallImageList
->Add(wxIcon(file_icons_tbl_computer_xpm
));
1517 m_smallImageList
->Add(wxIcon(file_icons_tbl_drive_xpm
));
1519 m_smallImageList
->Add(wxIcon(file_icons_tbl_cdrom_xpm
));
1521 m_smallImageList
->Add(wxIcon(file_icons_tbl_floppy_xpm
));
1523 m_smallImageList
->Add(wxIcon(file_icons_tbl_removeable_xpm
));
1525 m_smallImageList
->Add(wxArtProvider
::GetBitmap(wxART_NORMAL_FILE
, wxART_CMN_DIALOG
));
1527 if (GetIconID(wxEmptyString
, _T("application/x-executable")) == file
)
1529 m_smallImageList
->Add(wxArtProvider
::GetBitmap(wxART_EXECUTABLE_FILE
, wxART_CMN_DIALOG
));
1530 delete m_HashTable
->Get(_T("exe"));
1531 m_HashTable
->Delete(_T("exe"));
1532 m_HashTable
->Put(_T("exe"), new wxFileIconEntry(executable
));
1534 /* else put into list by GetIconID
1535 (KDE defines application/x-executable for *.exe and has nice icon)
1539 wxImageList
*wxFileIconsTable
::GetSmallImageList()
1541 if (!m_smallImageList
)
1544 return m_smallImageList
;
1547 #if wxUSE_MIMETYPE && wxUSE_IMAGE
1548 // VS: we don't need this function w/o wxMimeTypesManager because we'll only have
1549 // one icon and we won't resize it
1551 static wxBitmap
CreateAntialiasedBitmap(const wxImage
& img
)
1553 const unsigned int size
= 16;
1555 wxImage
smallimg (size
, size
);
1556 unsigned char *p1
, *p2
, *ps
;
1557 unsigned char mr
= img
.GetMaskRed(),
1558 mg
= img
.GetMaskGreen(),
1559 mb
= img
.GetMaskBlue();
1562 unsigned sr
, sg
, sb
, smask
;
1564 p1
= img
.GetData(), p2
= img
.GetData() + 3 * size
*2, ps
= smallimg
.GetData();
1565 smallimg
.SetMaskColour(mr
, mr
, mr
);
1567 for (y
= 0; y
< size
; y
++)
1569 for (x
= 0; x
< size
; x
++)
1571 sr
= sg
= sb
= smask
= 0;
1572 if (p1
[0] != mr
|| p1
[1] != mg
|| p1
[2] != mb
)
1573 sr
+= p1
[0], sg
+= p1
[1], sb
+= p1
[2];
1576 if (p1
[0] != mr
|| p1
[1] != mg
|| p1
[2] != mb
)
1577 sr
+= p1
[0], sg
+= p1
[1], sb
+= p1
[2];
1580 if (p2
[0] != mr
|| p2
[1] != mg
|| p2
[2] != mb
)
1581 sr
+= p2
[0], sg
+= p2
[1], sb
+= p2
[2];
1584 if (p2
[0] != mr
|| p2
[1] != mg
|| p2
[2] != mb
)
1585 sr
+= p2
[0], sg
+= p2
[1], sb
+= p2
[2];
1590 ps
[0] = ps
[1] = ps
[2] = mr
;
1592 ps
[0] = sr
>> 2, ps
[1] = sg
>> 2, ps
[2] = sb
>> 2;
1595 p1
+= size
*2 * 3, p2
+= size
*2 * 3;
1598 return wxBitmap(smallimg
);
1601 // This function is currently not unused anymore
1603 // finds empty borders and return non-empty area of image:
1604 static wxImage
CutEmptyBorders(const wxImage
& img
)
1606 unsigned char mr
= img
.GetMaskRed(),
1607 mg
= img
.GetMaskGreen(),
1608 mb
= img
.GetMaskBlue();
1609 unsigned char *dt
= img
.GetData(), *dttmp
;
1610 unsigned w
= img
.GetWidth(), h
= img
.GetHeight();
1612 unsigned top
, bottom
, left
, right
, i
;
1615 #define MK_DTTMP(x,y) dttmp = dt + ((x + y * w) * 3)
1616 #define NOEMPTY_PIX(empt) if (dttmp[0] != mr || dttmp[1] != mg || dttmp[2] != mb) {empt = false; break;}
1618 for (empt
= true, top
= 0; empt
&& top
< h
; top
++)
1621 for (i
= 0; i
< w
; i
++, dttmp
+=3)
1624 for (empt
= true, bottom
= h
-1; empt
&& bottom
> top
; bottom
--)
1626 MK_DTTMP(0, bottom
);
1627 for (i
= 0; i
< w
; i
++, dttmp
+=3)
1630 for (empt
= true, left
= 0; empt
&& left
< w
; left
++)
1633 for (i
= 0; i
< h
; i
++, dttmp
+=3*w
)
1636 for (empt
= true, right
= w
-1; empt
&& right
> left
; right
--)
1639 for (i
= 0; i
< h
; i
++, dttmp
+=3*w
)
1642 top
--, left
--, bottom
++, right
++;
1644 return img
.GetSubImage(wxRect(left
, top
, right
- left
+ 1, bottom
- top
+ 1));
1648 #endif // wxUSE_MIMETYPE
1650 int wxFileIconsTable
::GetIconID(const wxString
& extension
, const wxString
& mime
)
1652 if (!m_smallImageList
)
1656 if (!extension
.IsEmpty())
1658 wxFileIconEntry
*entry
= (wxFileIconEntry
*) m_HashTable
->Get(extension
);
1659 if (entry
) return (entry
-> id
);
1662 wxFileType
*ft
= (mime
.IsEmpty()) ?
1663 wxTheMimeTypesManager
-> GetFileTypeFromExtension(extension
) :
1664 wxTheMimeTypesManager
-> GetFileTypeFromMimeType(mime
);
1666 wxIconLocation iconLoc
;
1671 if ( ft
&& ft
->GetIcon(&iconLoc
) )
1673 ic
= wxIcon( iconLoc
.GetFileName() );
1682 m_HashTable
->Put(extension
, new wxFileIconEntry(newid
));
1687 bmp
.CopyFromIcon(ic
);
1692 m_HashTable
->Put(extension
, new wxFileIconEntry(newid
));
1696 const unsigned int size
= 16;
1698 int id
= m_smallImageList
->GetImageCount();
1699 if ((bmp
.GetWidth() == (int) size
) && (bmp
.GetHeight() == (int) size
))
1701 m_smallImageList
->Add(bmp
);
1706 wxImage img
= bmp
.ConvertToImage();
1708 if ((img
.GetWidth() != size
*2) || (img
.GetHeight() != size
*2))
1709 // m_smallImageList->Add(CreateAntialiasedBitmap(CutEmptyBorders(img).Rescale(size*2, size*2)));
1710 m_smallImageList
->Add(CreateAntialiasedBitmap(img
.Rescale(size
*2, size
*2)));
1712 m_smallImageList
->Add(CreateAntialiasedBitmap(img
));
1714 #endif // wxUSE_IMAGE
1716 m_HashTable
->Put(extension
, new wxFileIconEntry(id
));
1719 #else // !wxUSE_MIMETYPE
1721 if (extension
== wxT("exe"))
1725 #endif // wxUSE_MIMETYPE/!wxUSE_MIMETYPE
1728 #endif // wxUSE_DIRDLG || wxUSE_FILEDLG