src/generic/dirctrlg.cpp

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