src/generic/dirctrlg.cpp

   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 #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
  13 #pragma implementation "dirctrlg.h"
  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
  23 #if wxUSE_DIRDLG || wxUSE_FILEDLG
  24
  25 #include "wx/generic/dirctrlg.h"
  26 #include "wx/module.h"
  27 #include "wx/utils.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"
  36 #include "wx/intl.h"
  37 #include "wx/imaglist.h"
  38 #include "wx/icon.h"
  39 #include "wx/log.h"
  40 #include "wx/sizer.h"
  41 #include "wx/tokenzr.h"
  42 #include "wx/dir.h"
  43 #include "wx/settings.h"
  44 #include "wx/artprov.h"
  45 #include "wx/hash.h"
  46 #include "wx/mimetype.h"
  47 #include "wx/image.h"
  48 #include "wx/choice.h"
  49
  50 #if wxUSE_STATLINE
  51     #include "wx/statline.h"
  52 #endif
  53
  54 #if defined(__WXMAC__)
  55   #include  "wx/mac/private.h"  // includes mac headers
  56 #endif
  57
  58 #ifdef __WXMSW__
  59 #include <windows.h>
  60
  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
  63 //         accordingly.
  64 #if !defined(__GNUWIN32__) || (defined(__MINGW32_MAJOR_VERSION) && __MINGW32_MAJOR_VERSION >= 1)
  65 #if !defined(__WXWINCE__)
  66   #include <direct.h>
  67 #endif
  68   #include <stdlib.h>
  69   #include <ctype.h>
  70 #endif
  71
  72 #endif
  73
  74 #if defined(__OS2__) || defined(__DOS__)
  75   #ifdef __OS2__
  76     #define INCL_BASE
  77     #include <os2.h>
  78     #ifndef __EMX__
  79       #include <direct.h>
  80     #endif
  81     #include <stdlib.h>
  82     #include <ctype.h>
  83   #endif
  84   extern bool wxIsDriveAvailable(const wxString& dirName);
  85 #endif // __OS2__
  86
  87 #if defined(__WXMAC__)
  88 # include "MoreFilesX.h"
  89 #endif
  90
  91 #ifdef __BORLANDC__
  92 #include "dos.h"
  93 #endif
  94
  95 // If compiled under Windows, this macro can cause problems
  96 #ifdef GetFirstChild
  97 #undef GetFirstChild
  98 #endif
  99
 100 // ----------------------------------------------------------------------------
 101 // wxGetAvailableDrives, for WINDOWS, DOS, OS2, MAC, UNIX (returns "/")
 102 // ----------------------------------------------------------------------------
 103
 104 size_t wxGetAvailableDrives(wxArrayString &paths, wxArrayString &names, wxArrayInt &icon_ids)
 105 {
 106 #if defined(__WINDOWS__) || defined(__DOS__) || defined(__OS2__)
 107
 108 #ifdef __WXWINCE__
 109     // No logical drives; return "\"
 110     paths.Add(wxT("\\"));
 111     names.Add(wxT("\\"));
 112     icon_ids.Add(wxFileIconsTable::computer);
 113 #elif defined(__WIN32__)
 114     wxChar driveBuffer[256];
 115     size_t n = (size_t) GetLogicalDriveStrings(255, driveBuffer);
 116     size_t i = 0;
 117     while (i < n)
 118     {
 119         wxString path, name;
 120         path.Printf(wxT("%c:\\"), driveBuffer[i]);
 121         name.Printf(wxT("%c:"), driveBuffer[i]);
 122
 123         int imageId;
 124         int driveType = ::GetDriveType(path);
 125         switch (driveType)
 126         {
 127             case DRIVE_REMOVABLE:
 128                 if (path == wxT("a:\\") || path == wxT("b:\\"))
 129                     imageId = wxFileIconsTable::floppy;
 130                 else
 131                     imageId = wxFileIconsTable::removeable;
 132                 break;
 133             case DRIVE_CDROM:
 134                 imageId = wxFileIconsTable::cdrom;
 135                 break;
 136             case DRIVE_REMOTE:
 137             case DRIVE_FIXED:
 138             default:
 139                 imageId = wxFileIconsTable::drive;
 140                 break;
 141         }
 142
 143         paths.Add(path);
 144         names.Add(name);
 145         icon_ids.Add(imageId);
 146
 147         while (driveBuffer[i] != wxT('\0'))
 148             i ++;
 149         i ++;
 150         if (driveBuffer[i] == wxT('\0'))
 151             break;
 152     }
 153 #elif defined(__OS2__)
 154     APIRET rc;
 155     ULONG ulDriveNum = 0;
 156     ULONG ulDriveMap = 0;
 157     rc = ::DosQueryCurrentDisk(&ulDriveNum, &ulDriveMap);
 158     if ( rc == 0)
 159     {
 160         size_t i = 0;
 161         while (i < 26)
 162         {
 163             if (ulDriveMap & ( 1 << i ))
 164             {
 165                 wxString path, name;
 166                 path.Printf(wxT("%c:\\"), 'A' + i);
 167                 name.Printf(wxT("%c:"), 'A' + i);
 168
 169                 int imageId;
 170                 if (path == wxT("A:\\") || path == wxT("B:\\"))
 171                     imageId = wxFileIconsTable::floppy;
 172                 else
 173                     imageId = wxFileIconsTable::drive;
 174                 paths.Add(path);
 175                 names.Add(name);
 176                 icon_ids.Add(imageId);
 177             }
 178             i ++;
 179         }
 180     }
 181 #else // !__WIN32__, !__OS2__
 182     int drive;
 183
 184     /* If we can switch to the drive, it exists. */
 185     for( drive = 1; drive <= 26; drive++ )
 186     {
 187         wxString path, name;
 188         path.Printf(wxT("%c:\\"), (char) (drive + 'a' - 1));
 189         name.Printf(wxT("%c:"), (char) (drive + 'A' - 1));
 190
 191         if (wxIsDriveAvailable(path))
 192         {
 193             paths.Add(path);
 194             names.Add(name);
 195             icon_ids.Add((drive <= 2) ? wxFileIconsTable::floppy : wxFileIconsTable::drive);
 196         }
 197     }
 198 #endif // __WIN32__/!__WIN32__
 199
 200 #elif defined(__WXMAC__)
 201
 202     ItemCount volumeIndex = 1;
 203     OSErr err = noErr ;
 204
 205     while( noErr == err )
 206     {
 207         HFSUniStr255 volumeName ;
 208         FSRef fsRef ;
 209         FSVolumeInfo volumeInfo ;
 210         err = FSGetVolumeInfo(0, volumeIndex, NULL, kFSVolInfoFlags , &volumeInfo , &volumeName, &fsRef);
 211         if( noErr == err )
 212         {
 213             wxString path = wxMacFSRefToPath( &fsRef ) ;
 214             wxString name = wxMacHFSUniStrToString( &volumeName ) ;
 215
 216             if ( (volumeInfo.flags & kFSVolFlagSoftwareLockedMask) || (volumeInfo.flags & kFSVolFlagHardwareLockedMask) )
 217             {
 218                 icon_ids.Add(wxFileIconsTable::cdrom);
 219             }
 220             else
 221             {
 222                 icon_ids.Add(wxFileIconsTable::drive);
 223             }
 224             // todo other removable
 225
 226             paths.Add(path);
 227             names.Add(name);
 228             volumeIndex++ ;
 229         }
 230     }
 231
 232 #elif defined(__UNIX__)
 233     paths.Add(wxT("/"));
 234     names.Add(wxT("/"));
 235     icon_ids.Add(wxFileIconsTable::computer);
 236 #else
 237     #error "Unsupported platform in wxGenericDirCtrl!"
 238 #endif
 239     wxASSERT_MSG( (paths.GetCount() == names.GetCount()), wxT("The number of paths and their human readable names should be equal in number."));
 240     wxASSERT_MSG( (paths.GetCount() == icon_ids.GetCount()), wxT("Wrong number of icons for available drives."));
 241     return paths.GetCount();
 242 }
 243
 244 // ----------------------------------------------------------------------------
 245 // wxIsDriveAvailable
 246 // ----------------------------------------------------------------------------
 247
 248 #if defined(__DOS__)
 249
 250 bool wxIsDriveAvailable(const wxString& dirName)
 251 {
 252     // FIXME_MGL - this method leads to hang up under Watcom for some reason
 253 #ifndef __WATCOMC__
 254     if ( dirName.Len() == 3 && dirName[1u] == wxT(':') )
 255     {
 256         wxString dirNameLower(dirName.Lower());
 257         // VS: always return true for removable media, since Win95 doesn't
 258         //     like it when MS-DOS app accesses empty floppy drive
 259         return (dirNameLower[0u] == wxT('a') ||
 260                 dirNameLower[0u] == wxT('b') ||
 261                 wxPathExists(dirNameLower));
 262     }
 263     else
 264 #endif
 265         return true;
 266 }
 267
 268 #elif defined(__WINDOWS__) || defined(__OS2__)
 269
 270 int setdrive(int drive)
 271 {
 272 #ifdef __WXWINCE__
 273     wxUnusedVar(drive);
 274     return 0;
 275 #elif defined(__GNUWIN32__) && \
 276     (defined(__MINGW32_MAJOR_VERSION) && __MINGW32_MAJOR_VERSION >= 1)
 277     return _chdrive(drive);
 278 #else
 279     wxChar  newdrive[4];
 280
 281     if (drive < 1 || drive > 31)
 282         return -1;
 283     newdrive[0] = (wxChar)(wxT('A') + drive - 1);
 284     newdrive[1] = wxT(':');
 285 #ifdef __OS2__
 286     newdrive[2] = wxT('\\');
 287     newdrive[3] = wxT('\0');
 288 #else
 289     newdrive[2] = wxT('\0');
 290 #endif
 291 #if defined(__WXMSW__)
 292     if (::SetCurrentDirectory(newdrive))
 293 #else
 294     // VA doesn't know what LPSTR is and has its own set
 295     if (!DosSetCurrentDir((PSZ)newdrive))
 296 #endif
 297         return 0;
 298     else
 299         return -1;
 300 #endif // !GNUWIN32
 301 }
 302
 303 bool wxIsDriveAvailable(const wxString& dirName)
 304 {
 305 #ifdef __WXWINCE__
 306     wxUnusedVar(dirName);
 307     return false;
 308 #else
 309 #ifdef __WIN32__
 310     UINT errorMode = SetErrorMode(SEM_FAILCRITICALERRORS | SEM_NOOPENFILEERRORBOX);
 311 #endif
 312     bool success = true;
 313
 314     // Check if this is a root directory and if so,
 315     // whether the drive is available.
 316     if (dirName.Len() == 3 && dirName[(size_t)1] == wxT(':'))
 317     {
 318         wxString dirNameLower(dirName.Lower());
 319 #if defined(__GNUWIN32__) && !(defined(__MINGW32_MAJOR_VERSION) && __MINGW32_MAJOR_VERSION >= 1)
 320         success = wxPathExists(dirNameLower);
 321 #else
 322         #if defined(__OS2__)
 323         // Avoid changing to drive since no media may be inserted.
 324         if (dirNameLower[(size_t)0] == 'a' || dirNameLower[(size_t)0] == 'b')
 325             return success;
 326         #endif
 327         int currentDrive = _getdrive();
 328         int thisDrive = (int) (dirNameLower[(size_t)0] - 'a' + 1) ;
 329         int err = setdrive( thisDrive ) ;
 330         setdrive( currentDrive );
 331
 332         if (err == -1)
 333         {
 334             success = false;
 335         }
 336 #endif
 337     }
 338 #ifdef __WIN32__
 339     (void) SetErrorMode(errorMode);
 340 #endif
 341
 342     return success;
 343 #endif
 344 }
 345 #endif // __WINDOWS__ || __OS2__
 346
 347 #endif // wxUSE_DIRDLG || wxUSE_FILEDLG
 348
 349
 350
 351 #if wxUSE_DIRDLG
 352
 353 // Function which is called by quick sort. We want to override the default wxArrayString behaviour,
 354 // and sort regardless of case.
 355 static int wxCMPFUNC_CONV wxDirCtrlStringCompareFunction(const wxString& strFirst, const wxString& strSecond)
 356 {
 357     return strFirst.CmpNoCase(strSecond);
 358 }
 359
 360 //-----------------------------------------------------------------------------
 361 // wxDirItemData
 362 //-----------------------------------------------------------------------------
 363
 364 wxDirItemData::wxDirItemData(const wxString& path, const wxString& name,
 365                              bool isDir)
 366 {
 367     m_path = path;
 368     m_name = name;
 369     /* Insert logic to detect hidden files here
 370      * In UnixLand we just check whether the first char is a dot
 371      * For FileNameFromPath read LastDirNameInThisPath ;-) */
 372     // m_isHidden = (bool)(wxFileNameFromPath(*m_path)[0] == '.');
 373     m_isHidden = false;
 374     m_isExpanded = false;
 375     m_isDir = isDir;
 376 }
 377
 378 void wxDirItemData::SetNewDirName(const wxString& path)
 379 {
 380     m_path = path;
 381     m_name = wxFileNameFromPath(path);
 382 }
 383
 384 bool wxDirItemData::HasSubDirs() const
 385 {
 386     if (m_path.empty())
 387         return false;
 388
 389     wxDir dir;
 390     {
 391         wxLogNull nolog;
 392         if ( !dir.Open(m_path) )
 393             return false;
 394     }
 395
 396     return dir.HasSubDirs();
 397 }
 398
 399 bool wxDirItemData::HasFiles(const wxString& WXUNUSED(spec)) const
 400 {
 401     if (m_path.empty())
 402         return false;
 403
 404     wxDir dir;
 405     {
 406         wxLogNull nolog;
 407         if ( !dir.Open(m_path) )
 408             return false;
 409     }
 410
 411     return dir.HasFiles();
 412 }
 413
 414 //-----------------------------------------------------------------------------
 415 // wxGenericDirCtrl
 416 //-----------------------------------------------------------------------------
 417
 418
 419 #if wxUSE_EXTENDED_RTTI
 420 WX_DEFINE_FLAGS( wxGenericDirCtrlStyle )
 421
 422 wxBEGIN_FLAGS( wxGenericDirCtrlStyle )
 423     // new style border flags, we put them first to
 424     // use them for streaming out
 425     wxFLAGS_MEMBER(wxBORDER_SIMPLE)
 426     wxFLAGS_MEMBER(wxBORDER_SUNKEN)
 427     wxFLAGS_MEMBER(wxBORDER_DOUBLE)
 428     wxFLAGS_MEMBER(wxBORDER_RAISED)
 429     wxFLAGS_MEMBER(wxBORDER_STATIC)
 430     wxFLAGS_MEMBER(wxBORDER_NONE)
 431
 432     // old style border flags
 433     wxFLAGS_MEMBER(wxSIMPLE_BORDER)
 434     wxFLAGS_MEMBER(wxSUNKEN_BORDER)
 435     wxFLAGS_MEMBER(wxDOUBLE_BORDER)
 436     wxFLAGS_MEMBER(wxRAISED_BORDER)
 437     wxFLAGS_MEMBER(wxSTATIC_BORDER)
 438     wxFLAGS_MEMBER(wxBORDER)
 439
 440     // standard window styles
 441     wxFLAGS_MEMBER(wxTAB_TRAVERSAL)
 442     wxFLAGS_MEMBER(wxCLIP_CHILDREN)
 443     wxFLAGS_MEMBER(wxTRANSPARENT_WINDOW)
 444     wxFLAGS_MEMBER(wxWANTS_CHARS)
 445     wxFLAGS_MEMBER(wxFULL_REPAINT_ON_RESIZE)
 446     wxFLAGS_MEMBER(wxALWAYS_SHOW_SB )
 447     wxFLAGS_MEMBER(wxVSCROLL)
 448     wxFLAGS_MEMBER(wxHSCROLL)
 449
 450     wxFLAGS_MEMBER(wxDIRCTRL_DIR_ONLY)
 451     wxFLAGS_MEMBER(wxDIRCTRL_3D_INTERNAL)
 452     wxFLAGS_MEMBER(wxDIRCTRL_SELECT_FIRST)
 453     wxFLAGS_MEMBER(wxDIRCTRL_SHOW_FILTERS)
 454
 455 wxEND_FLAGS( wxGenericDirCtrlStyle )
 456
 457 IMPLEMENT_DYNAMIC_CLASS_XTI(wxGenericDirCtrl, wxControl,"wx/dirctrl.h")
 458
 459 wxBEGIN_PROPERTIES_TABLE(wxGenericDirCtrl)
 460     wxHIDE_PROPERTY( Children )
 461     wxPROPERTY( DefaultPath , wxString , SetDefaultPath , GetDefaultPath  , EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
 462     wxPROPERTY( Filter , wxString , SetFilter , GetFilter  , EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group") )
 463     wxPROPERTY( DefaultFilter , int , SetFilterIndex, GetFilterIndex, EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group") )
 464     wxPROPERTY_FLAGS( WindowStyle, wxGenericDirCtrlStyle, long, SetWindowStyleFlag, GetWindowStyleFlag, EMPTY_MACROVALUE , 0, wxT("Helpstring"), wxT("group") )
 465 wxEND_PROPERTIES_TABLE()
 466
 467 wxBEGIN_HANDLERS_TABLE(wxGenericDirCtrl)
 468 wxEND_HANDLERS_TABLE()
 469
 470 wxCONSTRUCTOR_8( wxGenericDirCtrl , wxWindow* , Parent , wxWindowID , Id , wxString , DefaultPath ,
 471                  wxPoint , Position , wxSize , Size , long , WindowStyle , wxString , Filter , int , DefaultFilter )
 472 #else
 473 IMPLEMENT_DYNAMIC_CLASS(wxGenericDirCtrl, wxControl)
 474 #endif
 475
 476 BEGIN_EVENT_TABLE(wxGenericDirCtrl, wxControl)
 477   EVT_TREE_ITEM_EXPANDING     (wxID_TREECTRL, wxGenericDirCtrl::OnExpandItem)
 478   EVT_TREE_ITEM_COLLAPSED     (wxID_TREECTRL, wxGenericDirCtrl::OnCollapseItem)
 479   EVT_TREE_BEGIN_LABEL_EDIT   (wxID_TREECTRL, wxGenericDirCtrl::OnBeginEditItem)
 480   EVT_TREE_END_LABEL_EDIT     (wxID_TREECTRL, wxGenericDirCtrl::OnEndEditItem)
 481   EVT_SIZE                    (wxGenericDirCtrl::OnSize)
 482 END_EVENT_TABLE()
 483
 484 wxGenericDirCtrl::wxGenericDirCtrl(void)
 485 {
 486     Init();
 487 }
 488
 489 bool wxGenericDirCtrl::Create(wxWindow *parent,
 490                               const wxWindowID id,
 491                               const wxString& dir,
 492                               const wxPoint& pos,
 493                               const wxSize& size,
 494                               long style,
 495                               const wxString& filter,
 496                               int defaultFilter,
 497                               const wxString& name)
 498 {
 499     if (!wxControl::Create(parent, id, pos, size, style, wxDefaultValidator, name))
 500         return false;
 501
 502     SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_3DFACE));
 503
 504     Init();
 505
 506     long treeStyle = wxTR_HAS_BUTTONS | wxTR_HIDE_ROOT;
 507
 508 #ifdef __WXGTK20__
 509     treeStyle |= wxTR_NO_LINES;
 510 #endif
 511
 512     if (style & wxDIRCTRL_EDIT_LABELS)
 513         treeStyle |= wxTR_EDIT_LABELS;
 514
 515     if ((style & wxDIRCTRL_3D_INTERNAL) == 0)
 516         treeStyle |= wxNO_BORDER;
 517     else
 518         treeStyle |= wxBORDER_SUNKEN;
 519
 520     long filterStyle = 0;
 521     if ((style & wxDIRCTRL_3D_INTERNAL) == 0)
 522         filterStyle |= wxNO_BORDER;
 523     else
 524         filterStyle |= wxBORDER_SUNKEN;
 525
 526     m_treeCtrl = CreateTreeCtrl(this, wxID_TREECTRL,
 527                                 wxPoint(0,0), GetClientSize(), treeStyle);
 528
 529     if (!filter.empty() && (style & wxDIRCTRL_SHOW_FILTERS))
 530         m_filterListCtrl = new wxDirFilterListCtrl(this, wxID_FILTERLISTCTRL, wxDefaultPosition, wxDefaultSize, filterStyle);
 531
 532     m_defaultPath = dir;
 533     m_filter = filter;
 534
 535     SetFilterIndex(defaultFilter);
 536
 537     if (m_filterListCtrl)
 538         m_filterListCtrl->FillFilterList(filter, defaultFilter);
 539
 540     m_treeCtrl->SetImageList(wxTheFileIconsTable->GetSmallImageList());
 541
 542     m_showHidden = false;
 543     wxDirItemData* rootData = new wxDirItemData(wxEmptyString, wxEmptyString, true);
 544
 545     wxString rootName;
 546
 547 #if defined(__WINDOWS__) || defined(__OS2__) || defined(__DOS__)
 548     rootName = _("Computer");
 549 #else
 550     rootName = _("Sections");
 551 #endif
 552
 553     m_rootId = m_treeCtrl->AddRoot( rootName, 3, -1, rootData);
 554     m_treeCtrl->SetItemHasChildren(m_rootId);
 555     ExpandDir(m_rootId); // automatically expand first level
 556
 557     // Expand and select the default path
 558     if (!m_defaultPath.empty())
 559     {
 560         ExpandPath(m_defaultPath);
 561     }
 562 #ifdef __UNIX__
 563     else
 564     {
 565         // On Unix, there's only one node under the (hidden) root node. It
 566         // represents the / path, so the user would always have to expand it;
 567         // let's do it ourselves
 568         ExpandPath( wxT("/") );
 569     }
 570 #endif
 571
 572     SetBestSize(size);
 573     DoResize();
 574
 575     return true;
 576 }
 577
 578 wxGenericDirCtrl::~wxGenericDirCtrl()
 579 {
 580 }
 581
 582 void wxGenericDirCtrl::Init()
 583 {
 584     m_showHidden = false;
 585     m_currentFilter = 0;
 586     m_currentFilterStr = wxEmptyString; // Default: any file
 587     m_treeCtrl = NULL;
 588     m_filterListCtrl = NULL;
 589 }
 590
 591 wxTreeCtrl* wxGenericDirCtrl::CreateTreeCtrl(wxWindow *parent, wxWindowID id, const wxPoint& pos, const wxSize& size, long treeStyle)
 592 {
 593     return new wxTreeCtrl(parent, id, pos, size, treeStyle);
 594 }
 595
 596 void wxGenericDirCtrl::ShowHidden( bool show )
 597 {
 598     m_showHidden = show;
 599
 600     wxString path = GetPath();
 601     ReCreateTree();
 602     SetPath(path);
 603 }
 604
 605 const wxTreeItemId
 606 wxGenericDirCtrl::AddSection(const wxString& path, const wxString& name, int imageId)
 607 {
 608     wxDirItemData *dir_item = new wxDirItemData(path,name,true);
 609
 610     wxTreeItemId id = AppendItem( m_rootId, name, imageId, -1, dir_item);
 611
 612     m_treeCtrl->SetItemHasChildren(id);
 613
 614     return id;
 615 }
 616
 617 void wxGenericDirCtrl::SetupSections()
 618 {
 619     wxArrayString paths, names;
 620     wxArrayInt icons;
 621
 622     size_t n, count = wxGetAvailableDrives(paths, names, icons);
 623
 624 #ifdef __WXGTK20__
 625     wxString home = wxGetHomeDir();
 626     AddSection( home, _("Home directory"), 1);
 627     home += wxT("/Desktop");
 628     AddSection( home, _("Desktop"), 1);
 629 #endif
 630
 631     for (n = 0; n < count; n++)
 632         AddSection(paths[n], names[n], icons[n]);
 633 }
 634
 635 void wxGenericDirCtrl::OnBeginEditItem(wxTreeEvent &event)
 636 {
 637     // don't rename the main entry "Sections"
 638     if (event.GetItem() == m_rootId)
 639     {
 640         event.Veto();
 641         return;
 642     }
 643
 644     // don't rename the individual sections
 645     if (m_treeCtrl->GetItemParent( event.GetItem() ) == m_rootId)
 646     {
 647         event.Veto();
 648         return;
 649     }
 650 }
 651
 652 void wxGenericDirCtrl::OnEndEditItem(wxTreeEvent &event)
 653 {
 654     if ((event.GetLabel().empty()) ||
 655         (event.GetLabel() == _(".")) ||
 656         (event.GetLabel() == _("..")) ||
 657         (event.GetLabel().Find(wxT('/')) != wxNOT_FOUND) ||
 658         (event.GetLabel().Find(wxT('\\')) != wxNOT_FOUND) ||
 659         (event.GetLabel().Find(wxT('|')) != wxNOT_FOUND))
 660     {
 661         wxMessageDialog dialog(this, _("Illegal directory name."), _("Error"), wxOK | wxICON_ERROR );
 662         dialog.ShowModal();
 663         event.Veto();
 664         return;
 665     }
 666
 667     wxTreeItemId id = event.GetItem();
 668     wxDirItemData *data = (wxDirItemData*)m_treeCtrl->GetItemData( id );
 669     wxASSERT( data );
 670
 671     wxString new_name( wxPathOnly( data->m_path ) );
 672     new_name += wxString(wxFILE_SEP_PATH);
 673     new_name += event.GetLabel();
 674
 675     wxLogNull log;
 676
 677     if (wxFileExists(new_name))
 678     {
 679         wxMessageDialog dialog(this, _("File name exists already."), _("Error"), wxOK | wxICON_ERROR );
 680         dialog.ShowModal();
 681         event.Veto();
 682     }
 683
 684     if (wxRenameFile(data->m_path,new_name))
 685     {
 686         data->SetNewDirName( new_name );
 687     }
 688     else
 689     {
 690         wxMessageDialog dialog(this, _("Operation not permitted."), _("Error"), wxOK | wxICON_ERROR );
 691         dialog.ShowModal();
 692         event.Veto();
 693     }
 694 }
 695
 696 void wxGenericDirCtrl::OnExpandItem(wxTreeEvent &event)
 697 {
 698     wxTreeItemId parentId = event.GetItem();
 699
 700     // VS: this is needed because the event handler is called from wxTreeCtrl
 701     //     ctor when wxTR_HIDE_ROOT was specified
 702
 703     if (!m_rootId.IsOk())
 704
 705         m_rootId = m_treeCtrl->GetRootItem();
 706
 707     ExpandDir(parentId);
 708 }
 709
 710 void wxGenericDirCtrl::OnCollapseItem(wxTreeEvent &event )
 711 {
 712     CollapseDir(event.GetItem());
 713 }
 714
 715 void wxGenericDirCtrl::CollapseDir(wxTreeItemId parentId)
 716 {
 717     wxTreeItemId child;
 718
 719     wxDirItemData *data = (wxDirItemData *) m_treeCtrl->GetItemData(parentId);
 720     if (!data->m_isExpanded)
 721         return;
 722
 723     data->m_isExpanded = false;
 724     wxTreeItemIdValue cookie;
 725     /* Workaround because DeleteChildren has disapeared (why?) and
 726      * CollapseAndReset doesn't work as advertised (deletes parent too) */
 727     child = m_treeCtrl->GetFirstChild(parentId, cookie);
 728     while (child.IsOk())
 729     {
 730         m_treeCtrl->Delete(child);
 731         /* Not GetNextChild below, because the cookie mechanism can't
 732          * handle disappearing children! */
 733         child = m_treeCtrl->GetFirstChild(parentId, cookie);
 734     }
 735 }
 736
 737 void wxGenericDirCtrl::ExpandDir(wxTreeItemId parentId)
 738 {
 739     wxDirItemData *data = (wxDirItemData *) m_treeCtrl->GetItemData(parentId);
 740
 741     if (data->m_isExpanded)
 742         return;
 743
 744     data->m_isExpanded = true;
 745
 746     if (parentId == m_treeCtrl->GetRootItem())
 747     {
 748         SetupSections();
 749         return;
 750     }
 751
 752     wxASSERT(data);
 753
 754     wxString search,path,filename;
 755
 756     wxString dirName(data->m_path);
 757
 758 #if defined(__WINDOWS__) || defined(__DOS__) || defined(__OS2__)
 759     // Check if this is a root directory and if so,
 760     // whether the drive is avaiable.
 761     if (!wxIsDriveAvailable(dirName))
 762     {
 763         data->m_isExpanded = false;
 764         //wxMessageBox(wxT("Sorry, this drive is not available."));
 765         return;
 766     }
 767 #endif
 768
 769     // This may take a longish time. Go to busy cursor
 770     wxBusyCursor busy;
 771
 772 #if defined(__WINDOWS__) || defined(__DOS__) || defined(__OS2__)
 773     if (dirName.Last() == ':')
 774         dirName += wxString(wxFILE_SEP_PATH);
 775 #endif
 776
 777     wxArrayString dirs;
 778     wxArrayString filenames;
 779
 780     wxDir d;
 781     wxString eachFilename;
 782
 783     wxLogNull log;
 784     d.Open(dirName);
 785
 786     if (d.IsOpened())
 787     {
 788         int style = wxDIR_DIRS;
 789         if (m_showHidden) style |= wxDIR_HIDDEN;
 790         if (d.GetFirst(& eachFilename, wxEmptyString, style))
 791         {
 792             do
 793             {
 794                 if ((eachFilename != wxT(".")) && (eachFilename != wxT("..")))
 795                 {
 796                     dirs.Add(eachFilename);
 797                 }
 798             }
 799             while (d.GetNext(&eachFilename));
 800         }
 801     }
 802     dirs.Sort(wxDirCtrlStringCompareFunction);
 803
 804     // Now do the filenames -- but only if we're allowed to
 805     if ((GetWindowStyle() & wxDIRCTRL_DIR_ONLY) == 0)
 806     {
 807         wxLogNull log;
 808
 809         d.Open(dirName);
 810
 811         if (d.IsOpened())
 812         {
 813             int style = wxDIR_FILES;
 814             if (m_showHidden) style |= wxDIR_HIDDEN;
 815             // Process each filter (ex: "JPEG Files (*.jpg;*.jpeg)|*.jpg;*.jpeg")
 816             wxStringTokenizer strTok;
 817             wxString curFilter;
 818             strTok.SetString(m_currentFilterStr,wxT(";"));
 819             while(strTok.HasMoreTokens())
 820             {
 821                 curFilter = strTok.GetNextToken();
 822                 if (d.GetFirst(& eachFilename, m_currentFilterStr, style))
 823                 {
 824                     do
 825                     {
 826                         if ((eachFilename != wxT(".")) && (eachFilename != wxT("..")))
 827                         {
 828                             filenames.Add(eachFilename);
 829                         }
 830                     }
 831                     while (d.GetNext(& eachFilename));
 832                 }
 833             }
 834         }
 835         filenames.Sort(wxDirCtrlStringCompareFunction);
 836     }
 837
 838     // Add the sorted dirs
 839     size_t i;
 840     for (i = 0; i < dirs.Count(); i++)
 841     {
 842         wxString eachFilename(dirs[i]);
 843         path = dirName;
 844         if (!wxEndsWithPathSeparator(path))
 845             path += wxString(wxFILE_SEP_PATH);
 846         path += eachFilename;
 847
 848         wxDirItemData *dir_item = new wxDirItemData(path,eachFilename,true);
 849         wxTreeItemId id = AppendItem( parentId, eachFilename,
 850                                       wxFileIconsTable::folder, -1, dir_item);
 851         m_treeCtrl->SetItemImage( id, wxFileIconsTable::folder_open,
 852                                   wxTreeItemIcon_Expanded );
 853
 854         // Has this got any children? If so, make it expandable.
 855         // (There are two situations when a dir has children: either it
 856         // has subdirectories or it contains files that weren't filtered
 857         // out. The latter only applies to dirctrl with files.)
 858         if ( dir_item->HasSubDirs() ||
 859              (((GetWindowStyle() & wxDIRCTRL_DIR_ONLY) == 0) &&
 860                dir_item->HasFiles(m_currentFilterStr)) )
 861         {
 862             m_treeCtrl->SetItemHasChildren(id);
 863         }
 864     }
 865
 866     // Add the sorted filenames
 867     if ((GetWindowStyle() & wxDIRCTRL_DIR_ONLY) == 0)
 868     {
 869         for (i = 0; i < filenames.Count(); i++)
 870         {
 871             wxString eachFilename(filenames[i]);
 872             path = dirName;
 873             if (!wxEndsWithPathSeparator(path))
 874                 path += wxString(wxFILE_SEP_PATH);
 875             path += eachFilename;
 876             //path = dirName + wxString(wxT("/")) + eachFilename;
 877             wxDirItemData *dir_item = new wxDirItemData(path,eachFilename,false);
 878             int image_id = wxFileIconsTable::file;
 879             if (eachFilename.Find(wxT('.')) != wxNOT_FOUND)
 880                 image_id = wxTheFileIconsTable->GetIconID(eachFilename.AfterLast(wxT('.')));
 881             (void) AppendItem( parentId, eachFilename, image_id, -1, dir_item);
 882         }
 883     }
 884 }
 885
 886 void wxGenericDirCtrl::ReCreateTree()
 887 {
 888     CollapseDir(m_treeCtrl->GetRootItem());
 889     ExpandDir(m_treeCtrl->GetRootItem());
 890 }
 891
 892 // Find the child that matches the first part of 'path'.
 893 // E.g. if a child path is "/usr" and 'path' is "/usr/include"
 894 // then the child for /usr is returned.
 895 wxTreeItemId wxGenericDirCtrl::FindChild(wxTreeItemId parentId, const wxString& path, bool& done)
 896 {
 897     wxString path2(path);
 898
 899     // Make sure all separators are as per the current platform
 900     path2.Replace(wxT("\\"), wxString(wxFILE_SEP_PATH));
 901     path2.Replace(wxT("/"), wxString(wxFILE_SEP_PATH));
 902
 903     // Append a separator to foil bogus substring matching
 904     path2 += wxString(wxFILE_SEP_PATH);
 905
 906     // In MSW or PM, case is not significant
 907 #if defined(__WINDOWS__) || defined(__DOS__) || defined(__OS2__)
 908     path2.MakeLower();
 909 #endif
 910
 911     wxTreeItemIdValue cookie;
 912     wxTreeItemId childId = m_treeCtrl->GetFirstChild(parentId, cookie);
 913     while (childId.IsOk())
 914     {
 915         wxDirItemData* data = (wxDirItemData*) m_treeCtrl->GetItemData(childId);
 916
 917         if (data && !data->m_path.empty())
 918         {
 919             wxString childPath(data->m_path);
 920             if (!wxEndsWithPathSeparator(childPath))
 921                 childPath += wxString(wxFILE_SEP_PATH);
 922
 923             // In MSW and PM, case is not significant
 924 #if defined(__WINDOWS__) || defined(__DOS__) || defined(__OS2__)
 925             childPath.MakeLower();
 926 #endif
 927
 928             if (childPath.Len() <= path2.Len())
 929             {
 930                 wxString path3 = path2.Mid(0, childPath.Len());
 931                 if (childPath == path3)
 932                 {
 933                     if (path3.Len() == path2.Len())
 934                         done = true;
 935                     else
 936                         done = false;
 937                     return childId;
 938                 }
 939             }
 940         }
 941
 942         childId = m_treeCtrl->GetNextChild(parentId, cookie);
 943     }
 944     wxTreeItemId invalid;
 945     return invalid;
 946 }
 947
 948 // Try to expand as much of the given path as possible,
 949 // and select the given tree item.
 950 bool wxGenericDirCtrl::ExpandPath(const wxString& path)
 951 {
 952     bool done = false;
 953     wxTreeItemId id = FindChild(m_rootId, path, done);
 954     wxTreeItemId lastId = id; // The last non-zero id
 955     while (id.IsOk() && !done)
 956     {
 957         ExpandDir(id);
 958
 959         id = FindChild(id, path, done);
 960         if (id.IsOk())
 961             lastId = id;
 962     }
 963     if (lastId.IsOk())
 964     {
 965         wxDirItemData *data = (wxDirItemData *) m_treeCtrl->GetItemData(lastId);
 966         if (data->m_isDir)
 967         {
 968             m_treeCtrl->Expand(lastId);
 969         }
 970         if ((GetWindowStyle() & wxDIRCTRL_SELECT_FIRST) && data->m_isDir)
 971         {
 972             // Find the first file in this directory
 973             wxTreeItemIdValue cookie;
 974             wxTreeItemId childId = m_treeCtrl->GetFirstChild(lastId, cookie);
 975             bool selectedChild = false;
 976             while (childId.IsOk())
 977             {
 978                 wxDirItemData* data = (wxDirItemData*) m_treeCtrl->GetItemData(childId);
 979
 980                 if (data && data->m_path != wxEmptyString && !data->m_isDir)
 981                 {
 982                     m_treeCtrl->SelectItem(childId);
 983                     m_treeCtrl->EnsureVisible(childId);
 984                     selectedChild = true;
 985                     break;
 986                 }
 987                 childId = m_treeCtrl->GetNextChild(lastId, cookie);
 988             }
 989             if (!selectedChild)
 990             {
 991                 m_treeCtrl->SelectItem(lastId);
 992                 m_treeCtrl->EnsureVisible(lastId);
 993             }
 994         }
 995         else
 996         {
 997             m_treeCtrl->SelectItem(lastId);
 998             m_treeCtrl->EnsureVisible(lastId);
 999         }
1000
1001         return true;
1002     }
1003     else
1004         return false;
1005 }
1006
1007 wxString wxGenericDirCtrl::GetPath() const
1008 {
1009     wxTreeItemId id = m_treeCtrl->GetSelection();
1010     if (id)
1011     {
1012         wxDirItemData* data = (wxDirItemData*) m_treeCtrl->GetItemData(id);
1013         return data->m_path;
1014     }
1015     else
1016         return wxEmptyString;
1017 }
1018
1019 wxString wxGenericDirCtrl::GetFilePath() const
1020 {
1021     wxTreeItemId id = m_treeCtrl->GetSelection();
1022     if (id)
1023     {
1024         wxDirItemData* data = (wxDirItemData*) m_treeCtrl->GetItemData(id);
1025         if (data->m_isDir)
1026             return wxEmptyString;
1027         else
1028             return data->m_path;
1029     }
1030     else
1031         return wxEmptyString;
1032 }
1033
1034 void wxGenericDirCtrl::SetPath(const wxString& path)
1035 {
1036     m_defaultPath = path;
1037     if (m_rootId)
1038         ExpandPath(path);
1039 }
1040
1041 // Not used
1042 #if 0
1043 void wxGenericDirCtrl::FindChildFiles(wxTreeItemId id, int dirFlags, wxArrayString& filenames)
1044 {
1045     wxDirItemData *data = (wxDirItemData *) m_treeCtrl->GetItemData(id);
1046
1047     // This may take a longish time. Go to busy cursor
1048     wxBusyCursor busy;
1049
1050     wxASSERT(data);
1051
1052     wxString search,path,filename;
1053
1054     wxString dirName(data->m_path);
1055
1056 #if defined(__WXMSW__) || defined(__OS2__)
1057     if (dirName.Last() == ':')
1058         dirName += wxString(wxFILE_SEP_PATH);
1059 #endif
1060
1061     wxDir d;
1062     wxString eachFilename;
1063
1064     wxLogNull log;
1065     d.Open(dirName);
1066
1067     if (d.IsOpened())
1068     {
1069         if (d.GetFirst(& eachFilename, m_currentFilterStr, dirFlags))
1070         {
1071             do
1072             {
1073                 if ((eachFilename != wxT(".")) && (eachFilename != wxT("..")))
1074                 {
1075                     filenames.Add(eachFilename);
1076                 }
1077             }
1078             while (d.GetNext(& eachFilename)) ;
1079         }
1080     }
1081 }
1082 #endif
1083
1084 void wxGenericDirCtrl::SetFilterIndex(int n)
1085 {
1086     m_currentFilter = n;
1087
1088     wxString f, d;
1089     if (ExtractWildcard(m_filter, n, f, d))
1090         m_currentFilterStr = f;
1091     else
1092         m_currentFilterStr = wxT("*.*");
1093 }
1094
1095 void wxGenericDirCtrl::SetFilter(const wxString& filter)
1096 {
1097     m_filter = filter;
1098
1099     wxString f, d;
1100     if (ExtractWildcard(m_filter, m_currentFilter, f, d))
1101         m_currentFilterStr = f;
1102     else
1103         m_currentFilterStr = wxT("*.*");
1104 }
1105
1106 // Extract description and actual filter from overall filter string
1107 bool wxGenericDirCtrl::ExtractWildcard(const wxString& filterStr, int n, wxString& filter, wxString& description)
1108 {
1109     wxArrayString filters, descriptions;
1110     int count = wxParseCommonDialogsFilter(filterStr, descriptions, filters);
1111     if (count > 0 && n < count)
1112     {
1113         filter = filters[n];
1114         description = descriptions[n];
1115         return true;
1116     }
1117
1118     return false;
1119 }
1120
1121 #if WXWIN_COMPATIBILITY_2_4
1122 // Parses the global filter, returning the number of filters.
1123 // Returns 0 if none or if there's a problem.
1124 // filterStr is in the form: "All files (*.*)|*.*|JPEG Files (*.jpeg)|*.jpg"
1125 int wxGenericDirCtrl::ParseFilter(const wxString& filterStr, wxArrayString& filters, wxArrayString& descriptions)
1126 {
1127     return wxParseCommonDialogsFilter(filterStr, descriptions, filters );
1128 }
1129 #endif // WXWIN_COMPATIBILITY_2_4
1130
1131 void wxGenericDirCtrl::DoResize()
1132 {
1133     wxSize sz = GetClientSize();
1134     int verticalSpacing = 3;
1135     if (m_treeCtrl)
1136     {
1137         wxSize filterSz ;
1138         if (m_filterListCtrl)
1139         {
1140 #ifdef __WXMSW__
1141             // For some reason, this is required in order for the
1142             // correct control height to always be returned, rather
1143             // than the drop-down list height which is sometimes returned.
1144             wxSize oldSize = m_filterListCtrl->GetSize();
1145             m_filterListCtrl->SetSize(wxDefaultCoord,
1146                                       wxDefaultCoord,
1147                                       oldSize.x+10,
1148                                       wxDefaultCoord,
1149                                       wxSIZE_USE_EXISTING);
1150             m_filterListCtrl->SetSize(wxDefaultCoord,
1151                                       wxDefaultCoord,
1152                                       oldSize.x,
1153                                       wxDefaultCoord,
1154                                       wxSIZE_USE_EXISTING);
1155 #endif
1156             filterSz = m_filterListCtrl->GetSize();
1157             sz.y -= (filterSz.y + verticalSpacing);
1158         }
1159         m_treeCtrl->SetSize(0, 0, sz.x, sz.y);
1160         if (m_filterListCtrl)
1161         {
1162             m_filterListCtrl->SetSize(0, sz.y + verticalSpacing, sz.x, filterSz.y);
1163             // Don't know why, but this needs refreshing after a resize (wxMSW)
1164             m_filterListCtrl->Refresh();
1165         }
1166     }
1167 }
1168
1169
1170 void wxGenericDirCtrl::OnSize(wxSizeEvent& WXUNUSED(event))
1171 {
1172     DoResize();
1173 }
1174
1175 wxTreeItemId wxGenericDirCtrl::AppendItem (const wxTreeItemId & parent,
1176                                            const wxString & text,
1177                                            int image, int selectedImage,
1178                                            wxTreeItemData * data)
1179 {
1180   wxTreeCtrl *treeCtrl = GetTreeCtrl ();
1181
1182   wxASSERT (treeCtrl);
1183
1184   if (treeCtrl)
1185   {
1186     return treeCtrl->AppendItem (parent, text, image, selectedImage, data);
1187   }
1188   else
1189   {
1190     return wxTreeItemId();
1191   }
1192 }
1193
1194
1195 //-----------------------------------------------------------------------------
1196 // wxDirFilterListCtrl
1197 //-----------------------------------------------------------------------------
1198
1199 IMPLEMENT_CLASS(wxDirFilterListCtrl, wxChoice)
1200
1201 BEGIN_EVENT_TABLE(wxDirFilterListCtrl, wxChoice)
1202     EVT_CHOICE(wxID_ANY, wxDirFilterListCtrl::OnSelFilter)
1203 END_EVENT_TABLE()
1204
1205 bool wxDirFilterListCtrl::Create(wxGenericDirCtrl* parent, const wxWindowID id,
1206               const wxPoint& pos,
1207               const wxSize& size,
1208               long style)
1209 {
1210     m_dirCtrl = parent;
1211     return wxChoice::Create(parent, id, pos, size, 0, NULL, style);
1212 }
1213
1214 void wxDirFilterListCtrl::Init()
1215 {
1216     m_dirCtrl = NULL;
1217 }
1218
1219 void wxDirFilterListCtrl::OnSelFilter(wxCommandEvent& WXUNUSED(event))
1220 {
1221     int sel = GetSelection();
1222
1223     wxString currentPath = m_dirCtrl->GetPath();
1224
1225     m_dirCtrl->SetFilterIndex(sel);
1226
1227     // If the filter has changed, the view is out of date, so
1228     // collapse the tree.
1229     m_dirCtrl->ReCreateTree();
1230
1231     // Try to restore the selection, or at least the directory
1232     m_dirCtrl->ExpandPath(currentPath);
1233 }
1234
1235 void wxDirFilterListCtrl::FillFilterList(const wxString& filter, int defaultFilter)
1236 {
1237     Clear();
1238     wxArrayString descriptions, filters;
1239     size_t n = (size_t) wxParseCommonDialogsFilter(filter, descriptions, filters);
1240
1241     if (n > 0 && defaultFilter < (int) n)
1242     {
1243         for (size_t i = 0; i < n; i++)
1244             Append(descriptions[i]);
1245         SetSelection(defaultFilter);
1246     }
1247 }
1248 #endif // wxUSE_DIRDLG
1249
1250 #if wxUSE_DIRDLG || wxUSE_FILEDLG
1251
1252 // ----------------------------------------------------------------------------
1253 // wxFileIconsTable icons
1254 // ----------------------------------------------------------------------------
1255
1256 /* Computer */
1257 static const char * file_icons_tbl_computer_xpm[] = {
1258 "16 16 7 1",
1259 "     s None    c None",
1260 ".    c #808080",
1261 "X    c #c0c0c0",
1262 "o    c Black",
1263 "O    c Gray100",
1264 "+    c #008080",
1265 "@    c Blue",
1266 "    ........... ",
1267 "   .XXXXXXXXXX.o",
1268 "   .OOOOOOOOO..o",
1269 "   .OoooooooX..o",
1270 "   .Oo+...@+X..o",
1271 "   .Oo+XXX.+X..o",
1272 "   .Oo+....+X..o",
1273 "   .Oo++++++X..o",
1274 "   .OXXXXXXXX.oo",
1275 "   ..........o.o",
1276 "   ...........Xo",
1277 "   .XXXXXXXXXX.o",
1278 "  .o.o.o.o.o...o",
1279 " .oXoXoXoXoXo.o ",
1280 ".XOXXXXXXXXX.o  ",
1281 "............o   "};
1282
1283 // ----------------------------------------------------------------------------
1284 // wxFileIconsTable & friends
1285 // ----------------------------------------------------------------------------
1286
1287 // global instance of a wxFileIconsTable
1288 wxFileIconsTable* wxTheFileIconsTable = (wxFileIconsTable *)NULL;
1289
1290 // A module to allow icons table cleanup
1291
1292 class wxFileIconsTableModule: public wxModule
1293 {
1294 DECLARE_DYNAMIC_CLASS(wxFileIconsTableModule)
1295 public:
1296     wxFileIconsTableModule() {}
1297     bool OnInit() { wxTheFileIconsTable = new wxFileIconsTable; return true; }
1298     void OnExit()
1299     {
1300         if (wxTheFileIconsTable)
1301         {
1302             delete wxTheFileIconsTable;
1303             wxTheFileIconsTable = NULL;
1304         }
1305     }
1306 };
1307
1308 IMPLEMENT_DYNAMIC_CLASS(wxFileIconsTableModule, wxModule)
1309
1310 class wxFileIconEntry : public wxObject
1311 {
1312 public:
1313     wxFileIconEntry(int i) { id = i; }
1314
1315     int id;
1316 };
1317
1318 wxFileIconsTable::wxFileIconsTable()
1319 {
1320     m_HashTable = NULL;
1321     m_smallImageList = NULL;
1322 }
1323
1324 wxFileIconsTable::~wxFileIconsTable()
1325 {
1326     if (m_HashTable)
1327     {
1328         WX_CLEAR_HASH_TABLE(*m_HashTable);
1329         delete m_HashTable;
1330     }
1331     if (m_smallImageList) delete m_smallImageList;
1332 }
1333
1334 // delayed initialization - wait until first use (wxArtProv not created yet)
1335 void wxFileIconsTable::Create()
1336 {
1337     wxCHECK_RET(!m_smallImageList && !m_HashTable, wxT("creating icons twice"));
1338     m_HashTable = new wxHashTable(wxKEY_STRING);
1339     m_smallImageList = new wxImageList(16, 16);
1340
1341     // folder:
1342     m_smallImageList->Add(wxArtProvider::GetBitmap(wxART_FOLDER,
1343                                                    wxART_CMN_DIALOG,
1344                                                    wxSize(16, 16)));
1345     // folder_open
1346     m_smallImageList->Add(wxArtProvider::GetBitmap(wxART_FOLDER_OPEN,
1347                                                    wxART_CMN_DIALOG,
1348                                                    wxSize(16, 16)));
1349     // computer
1350 #ifdef __WXGTK24__
1351     // GTK24 uses this icon in the file open dialog
1352     m_smallImageList->Add(wxArtProvider::GetBitmap(wxART_HARDDISK,
1353                                                    wxART_CMN_DIALOG,
1354                                                    wxSize(16, 16)));
1355 #else
1356     m_smallImageList->Add(wxIcon(file_icons_tbl_computer_xpm));
1357 #endif
1358     // drive
1359     m_smallImageList->Add(wxArtProvider::GetBitmap(wxART_HARDDISK,
1360                                                    wxART_CMN_DIALOG,
1361                                                    wxSize(16, 16)));
1362     // cdrom
1363     m_smallImageList->Add(wxArtProvider::GetBitmap(wxART_CDROM,
1364                                                    wxART_CMN_DIALOG,
1365                                                    wxSize(16, 16)));
1366     // floppy
1367     m_smallImageList->Add(wxArtProvider::GetBitmap(wxART_FLOPPY,
1368                                                    wxART_CMN_DIALOG,
1369                                                    wxSize(16, 16)));
1370     // removeable
1371     m_smallImageList->Add(wxArtProvider::GetBitmap(wxART_REMOVABLE,
1372                                                    wxART_CMN_DIALOG,
1373                                                    wxSize(16, 16)));
1374     // file
1375     m_smallImageList->Add(wxArtProvider::GetBitmap(wxART_NORMAL_FILE,
1376                                                    wxART_CMN_DIALOG,
1377                                                    wxSize(16, 16)));
1378     // executable
1379     if (GetIconID(wxEmptyString, _T("application/x-executable")) == file)
1380     {
1381         m_smallImageList->Add(wxArtProvider::GetBitmap(wxART_EXECUTABLE_FILE,
1382                                                        wxART_CMN_DIALOG,
1383                                                        wxSize(16, 16)));
1384         delete m_HashTable->Get(_T("exe"));
1385         m_HashTable->Delete(_T("exe"));
1386         m_HashTable->Put(_T("exe"), new wxFileIconEntry(executable));
1387     }
1388     /* else put into list by GetIconID
1389        (KDE defines application/x-executable for *.exe and has nice icon)
1390      */
1391 }
1392
1393 wxImageList *wxFileIconsTable::GetSmallImageList()
1394 {
1395     if (!m_smallImageList)
1396         Create();
1397
1398     return m_smallImageList;
1399 }
1400
1401 #if wxUSE_MIMETYPE && wxUSE_IMAGE
1402 // VS: we don't need this function w/o wxMimeTypesManager because we'll only have
1403 //     one icon and we won't resize it
1404
1405 static wxBitmap CreateAntialiasedBitmap(const wxImage& img)
1406 {
1407     const unsigned int size = 16;
1408
1409     wxImage smallimg (size, size);
1410     unsigned char *p1, *p2, *ps;
1411     unsigned char mr = img.GetMaskRed(),
1412                   mg = img.GetMaskGreen(),
1413                   mb = img.GetMaskBlue();
1414
1415     unsigned x, y;
1416     unsigned sr, sg, sb, smask;
1417
1418     p1 = img.GetData(), p2 = img.GetData() + 3 * size*2, ps = smallimg.GetData();
1419     smallimg.SetMaskColour(mr, mr, mr);
1420
1421     for (y = 0; y < size; y++)
1422     {
1423         for (x = 0; x < size; x++)
1424         {
1425             sr = sg = sb = smask = 0;
1426             if (p1[0] != mr || p1[1] != mg || p1[2] != mb)
1427                 sr += p1[0], sg += p1[1], sb += p1[2];
1428             else smask++;
1429             p1 += 3;
1430             if (p1[0] != mr || p1[1] != mg || p1[2] != mb)
1431                 sr += p1[0], sg += p1[1], sb += p1[2];
1432             else smask++;
1433             p1 += 3;
1434             if (p2[0] != mr || p2[1] != mg || p2[2] != mb)
1435                 sr += p2[0], sg += p2[1], sb += p2[2];
1436             else smask++;
1437             p2 += 3;
1438             if (p2[0] != mr || p2[1] != mg || p2[2] != mb)
1439                 sr += p2[0], sg += p2[1], sb += p2[2];
1440             else smask++;
1441             p2 += 3;
1442
1443             if (smask > 2)
1444                 ps[0] = ps[1] = ps[2] = mr;
1445             else
1446             {
1447                 ps[0] = (unsigned char)(sr >> 2);
1448                 ps[1] = (unsigned char)(sg >> 2);
1449                 ps[2] = (unsigned char)(sb >> 2);
1450             }
1451             ps += 3;
1452         }
1453         p1 += size*2 * 3, p2 += size*2 * 3;
1454     }
1455
1456     return wxBitmap(smallimg);
1457 }
1458
1459 // This function is currently not unused anymore
1460 #if 0
1461 // finds empty borders and return non-empty area of image:
1462 static wxImage CutEmptyBorders(const wxImage& img)
1463 {
1464     unsigned char mr = img.GetMaskRed(),
1465                   mg = img.GetMaskGreen(),
1466                   mb = img.GetMaskBlue();
1467     unsigned char *dt = img.GetData(), *dttmp;
1468     unsigned w = img.GetWidth(), h = img.GetHeight();
1469
1470     unsigned top, bottom, left, right, i;
1471     bool empt;
1472
1473 #define MK_DTTMP(x,y)      dttmp = dt + ((x + y * w) * 3)
1474 #define NOEMPTY_PIX(empt)  if (dttmp[0] != mr || dttmp[1] != mg || dttmp[2] != mb) {empt = false; break;}
1475
1476     for (empt = true, top = 0; empt && top < h; top++)
1477     {
1478         MK_DTTMP(0, top);
1479         for (i = 0; i < w; i++, dttmp+=3)
1480             NOEMPTY_PIX(empt)
1481     }
1482     for (empt = true, bottom = h-1; empt && bottom > top; bottom--)
1483     {
1484         MK_DTTMP(0, bottom);
1485         for (i = 0; i < w; i++, dttmp+=3)
1486             NOEMPTY_PIX(empt)
1487     }
1488     for (empt = true, left = 0; empt && left < w; left++)
1489     {
1490         MK_DTTMP(left, 0);
1491         for (i = 0; i < h; i++, dttmp+=3*w)
1492             NOEMPTY_PIX(empt)
1493     }
1494     for (empt = true, right = w-1; empt && right > left; right--)
1495     {
1496         MK_DTTMP(right, 0);
1497         for (i = 0; i < h; i++, dttmp+=3*w)
1498             NOEMPTY_PIX(empt)
1499     }
1500     top--, left--, bottom++, right++;
1501
1502     return img.GetSubImage(wxRect(left, top, right - left + 1, bottom - top + 1));
1503 }
1504 #endif // #if 0
1505
1506 #endif // wxUSE_MIMETYPE
1507
1508 int wxFileIconsTable::GetIconID(const wxString& extension, const wxString& mime)
1509 {
1510     if (!m_smallImageList)
1511         Create();
1512
1513 #if wxUSE_MIMETYPE
1514     if (!extension.empty())
1515     {
1516         wxFileIconEntry *entry = (wxFileIconEntry*) m_HashTable->Get(extension);
1517         if (entry) return (entry -> id);
1518     }
1519
1520     wxFileType *ft = (mime.empty()) ?
1521                    wxTheMimeTypesManager -> GetFileTypeFromExtension(extension) :
1522                    wxTheMimeTypesManager -> GetFileTypeFromMimeType(mime);
1523
1524     wxIconLocation iconLoc;
1525     wxIcon ic;
1526
1527     {
1528         wxLogNull logNull;
1529         if ( ft && ft->GetIcon(&iconLoc) )
1530         {
1531             ic = wxIcon( iconLoc );
1532         }
1533     }
1534
1535     delete ft;
1536
1537     if ( !ic.Ok() )
1538     {
1539         int newid = file;
1540         m_HashTable->Put(extension, new wxFileIconEntry(newid));
1541         return newid;
1542     }
1543
1544     wxBitmap bmp;
1545     bmp.CopyFromIcon(ic);
1546
1547     if ( !bmp.Ok() )
1548     {
1549         int newid = file;
1550         m_HashTable->Put(extension, new wxFileIconEntry(newid));
1551         return newid;
1552     }
1553
1554     const unsigned int size = 16;
1555
1556     int id = m_smallImageList->GetImageCount();
1557     if ((bmp.GetWidth() == (int) size) && (bmp.GetHeight() == (int) size))
1558     {
1559         m_smallImageList->Add(bmp);
1560     }
1561 #if wxUSE_IMAGE
1562     else
1563     {
1564         wxImage img = bmp.ConvertToImage();
1565
1566         if ((img.GetWidth() != size*2) || (img.GetHeight() != size*2))
1567 //            m_smallImageList->Add(CreateAntialiasedBitmap(CutEmptyBorders(img).Rescale(size*2, size*2)));
1568             m_smallImageList->Add(CreateAntialiasedBitmap(img.Rescale(size*2, size*2)));
1569         else
1570             m_smallImageList->Add(CreateAntialiasedBitmap(img));
1571     }
1572 #endif // wxUSE_IMAGE
1573
1574     m_HashTable->Put(extension, new wxFileIconEntry(id));
1575     return id;
1576
1577 #else // !wxUSE_MIMETYPE
1578
1579     wxUnusedVar(mime);
1580     if (extension == wxT("exe"))
1581         return executable;
1582     else
1583         return file;
1584 #endif // wxUSE_MIMETYPE/!wxUSE_MIMETYPE
1585 }
1586
1587 #endif // wxUSE_DIRDLG || wxUSE_FILEDLG