src/generic/filedlgg.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        filedlgg.cpp
   3 // Purpose:     wxFileDialog
   4 // Author:      Robert Roebling
   5 // Modified by:
   6 // Created:     12/12/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Robert Roebling
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 #ifdef __GNUG__
  13 #pragma implementation "filedlgg.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 #ifndef __UNIX__
  24 #error wxFileDialog currently only supports unix
  25 #endif
  26
  27 #include "wx/filedlg.h"
  28 #include "wx/debug.h"
  29 #include "wx/log.h"
  30 #include "wx/intl.h"
  31 #include "wx/msgdlg.h"
  32 #include "wx/sizer.h"
  33 #include "wx/bmpbuttn.h"
  34 #include "wx/tokenzr.h"
  35 #include "wx/mimetype.h"
  36 #include "wx/image.h"
  37 #include "wx/module.h"
  38
  39
  40 #if wxUSE_TOOLTIPS
  41     #include "wx/tooltip.h"
  42 #endif
  43
  44 #include <sys/types.h>
  45 #include <sys/stat.h>
  46 #include <dirent.h>
  47 #include <pwd.h>
  48 #include <grp.h>
  49 #include <time.h>
  50 #include <unistd.h>
  51
  52 #include "wx/generic/home.xpm"
  53 #include "wx/generic/listview.xpm"
  54 #include "wx/generic/repview.xpm"
  55 #include "wx/generic/new_dir.xpm"
  56 #include "wx/generic/dir_up.xpm"
  57
  58 /* XPM */
  59 static char * folder_xpm[] = {
  60 /* width height ncolors chars_per_pixel */
  61 "16 16 6 1",
  62 /* colors */
  63 "         s None        c None",
  64 ".        c #000000",
  65 "+        c #c0c0c0",
  66 "@        c #808080",
  67 "#        c #ffff00",
  68 "$        c #ffffff",
  69 /* pixels */
  70 "                ",
  71 "   @@@@@        ",
  72 "  @#+#+#@       ",
  73 " @#+#+#+#@@@@@@ ",
  74 " @$$$$$$$$$$$$@.",
  75 " @$#+#+#+#+#+#@.",
  76 " @$+#+#+#+#+#+@.",
  77 " @$#+#+#+#+#+#@.",
  78 " @$+#+#+#+#+#+@.",
  79 " @$#+#+#+#+#+#@.",
  80 " @$+#+#+#+#+#+@.",
  81 " @$#+#+#+#+#+#@.",
  82 " @@@@@@@@@@@@@@.",
  83 "  ..............",
  84 "                ",
  85 "                "};
  86
  87
  88 // ----------------------------------------------------------------------------
  89 // private classes - icons list management
  90 // ----------------------------------------------------------------------------
  91
  92 class wxFileIconEntry : public wxObject
  93 {
  94     public:
  95         wxFileIconEntry(int i) { id = i; }
  96
  97         int id;
  98 };
  99
 100
 101 class wxFileIconsTable
 102 {
 103     public:
 104
 105         wxFileIconsTable();
 106
 107         int GetIconID(const wxString& extension);
 108         wxImageList *GetImageList() { return &m_ImageList; }
 109
 110     protected:
 111         wxImageList m_ImageList;
 112         wxHashTable m_HashTable;
 113         wxMimeTypesManager m_Mime;
 114 };
 115
 116 static wxFileIconsTable *g_IconsTable = NULL;
 117
 118
 119 wxFileIconsTable::wxFileIconsTable() :
 120                     m_ImageList(16, 16),
 121                     m_HashTable(wxKEY_STRING),
 122                     m_Mime()
 123 {
 124     m_HashTable.DeleteContents(TRUE);
 125     m_ImageList.Add(wxBitmap(folder_xpm));
 126 }
 127
 128
 129
 130 static wxBitmap CreateAntialiasedBitmap(const wxImage& img)
 131 {
 132     wxImage small(16, 16);
 133     unsigned char *p1, *p2, *ps;
 134     unsigned char mr = img.GetMaskRed(), mg = img.GetMaskGreen(), mb = img.GetMaskBlue();
 135
 136     unsigned x, y;
 137     unsigned sr, sg, sb, smask;
 138
 139     p1 = img.GetData(), p2 = img.GetData() + 3 * 32, ps = small.GetData();
 140     small.SetMaskColour(mr, mr, mr);
 141
 142     for (y = 0; y < 16; y++)
 143     {
 144         for (x = 0; x < 16; x++)
 145         {
 146             sr = sg = sb = smask = 0;
 147             if (p1[0] != mr || p1[1] != mg || p1[2] != mb)
 148                 sr += p1[0], sg += p1[1], sb += p1[2];
 149             else smask++;
 150             p1 += 3;
 151             if (p1[0] != mr || p1[1] != mg || p1[2] != mb)
 152                 sr += p1[0], sg += p1[1], sb += p1[2];
 153             else smask++;
 154             p1 += 3;
 155             if (p2[0] != mr || p2[1] != mg || p2[2] != mb)
 156                 sr += p2[0], sg += p2[1], sb += p2[2];
 157             else smask++;
 158             p2 += 3;
 159             if (p2[0] != mr || p2[1] != mg || p2[2] != mb)
 160                 sr += p2[0], sg += p2[1], sb += p2[2];
 161             else smask++;
 162             p2 += 3;
 163
 164             if (smask > 2)
 165                 ps[0] = ps[1] = ps[2] = mr;
 166             else
 167                 ps[0] = sr >> 2, ps[1] = sg >> 2, ps[2] = sb >> 2;
 168             ps += 3;
 169         }
 170         p1 += 32 * 3, p2 += 32 * 3;
 171     }
 172
 173     return small.ConvertToBitmap();
 174 }
 175
 176
 177 int wxFileIconsTable::GetIconID(const wxString& extension)
 178 {
 179     wxFileIconEntry *entry = (wxFileIconEntry*) m_HashTable.Get(extension);
 180
 181     if (entry) return (entry -> id);
 182
 183     wxFileType *ft = m_Mime.GetFileTypeFromExtension(extension);
 184     wxIcon ic;
 185     if (ft == NULL || (!ft -> GetIcon(&ic)))
 186     {
 187         int newid = GetIconID(wxT("txt"));
 188         m_HashTable.Put(extension, new wxFileIconEntry(newid));
 189         return newid;
 190     }
 191     wxImage img(ic);
 192     delete ft;
 193
 194     int id = m_ImageList.GetImageCount();
 195     if (img.GetWidth() == 16 && img.GetHeight() == 16)
 196         m_ImageList.Add(img.ConvertToBitmap());
 197     else
 198         m_ImageList.Add(CreateAntialiasedBitmap(img.Scale(32, 32)));
 199     m_HashTable.Put(extension, new wxFileIconEntry(id));
 200     return id;
 201 }
 202
 203
 204
 205 // ----------------------------------------------------------------------------
 206 // private functions
 207 // ----------------------------------------------------------------------------
 208
 209 static
 210 int ListCompare( long data1, long data2, long WXUNUSED(data) )
 211 {
 212      wxFileData *fd1 = (wxFileData*)data1 ;
 213      wxFileData *fd2 = (wxFileData*)data2 ;
 214      if (fd1->GetName() == wxT("..")) return -1;
 215      if (fd2->GetName() == wxT("..")) return 1;
 216      if (fd1->IsDir() && !fd2->IsDir()) return -1;
 217      if (fd2->IsDir() && !fd1->IsDir()) return 1;
 218      return wxStrcmp( fd1->GetName(), fd2->GetName() );
 219 }
 220
 221 //-----------------------------------------------------------------------------
 222 //  wxFileData
 223 //-----------------------------------------------------------------------------
 224
 225 IMPLEMENT_DYNAMIC_CLASS(wxFileData,wxObject);
 226
 227 wxFileData::wxFileData( const wxString &name, const wxString &fname )
 228 {
 229     m_name = name;
 230     m_fileName = fname;
 231
 232     struct stat buff;
 233     stat( m_fileName.fn_str(), &buff );
 234
 235 #ifndef __EMX__
 236     struct stat lbuff;
 237     lstat( m_fileName.fn_str(), &lbuff );
 238     m_isLink = S_ISLNK( lbuff.st_mode );
 239     struct tm *t = localtime( &lbuff.st_mtime );
 240 #else
 241     m_isLink = FALSE;
 242     struct tm *t = localtime( &buff.st_mtime );
 243 #endif
 244
 245 //  struct passwd *user = getpwuid( buff.st_uid );
 246 //  struct group *grp = getgrgid( buff.st_gid );
 247
 248     m_isDir = S_ISDIR( buff.st_mode );
 249     m_isExe = ((buff.st_mode & S_IXUSR ) == S_IXUSR );
 250
 251     m_size = buff.st_size;
 252
 253     m_hour = t->tm_hour;
 254     m_minute = t->tm_min;
 255     m_month = t->tm_mon+1;
 256     m_day = t->tm_mday;
 257     m_year = t->tm_year;
 258     m_year += 1900;
 259
 260     m_permissions.sprintf( wxT("%c%c%c"),
 261      ((( buff.st_mode & S_IRUSR ) == S_IRUSR ) ? wxT('r') : wxT('-')),
 262      ((( buff.st_mode & S_IWUSR ) == S_IWUSR ) ? wxT('w') : wxT('-')),
 263      ((( buff.st_mode & S_IXUSR ) == S_IXUSR ) ? wxT('x') : wxT('-')) );
 264 }
 265
 266 wxString wxFileData::GetName() const
 267 {
 268     return m_name;
 269 }
 270
 271 wxString wxFileData::GetFullName() const
 272 {
 273     return m_fileName;
 274 }
 275
 276 wxString wxFileData::GetHint() const
 277 {
 278     wxString s = m_fileName;
 279     s += "  ";
 280     if (m_isDir) s += _("<DIR> ");
 281     else if (m_isLink) s += _("<LINK> ");
 282     else
 283     {
 284         s += LongToString( m_size );
 285         s += _(" bytes ");
 286     }
 287     s += IntToString( m_day );
 288     s += wxT(".");
 289     s += IntToString( m_month );
 290     s += wxT(".");
 291     s += IntToString( m_year );
 292     s += wxT("  ");
 293     s += IntToString( m_hour );
 294     s += wxT(":");
 295     s += IntToString( m_minute );
 296     s += wxT("  ");
 297     s += m_permissions;
 298     return s;
 299 };
 300
 301 wxString wxFileData::GetEntry( int num )
 302 {
 303     wxString s;
 304     switch (num)
 305     {
 306         case 0:
 307         {
 308             s = m_name;
 309         }
 310         break;
 311         case 1:
 312         {
 313             if (m_isDir) s = _("<DIR>");
 314             else if (m_isLink) s = _("<LINK>");
 315             else s = LongToString( m_size );
 316         }
 317         break;
 318         case 2:
 319         {
 320             if (m_day < 10) s = wxT("0"); else s = wxT("");
 321             s += IntToString( m_day );
 322             s += wxT(".");
 323             if (m_month < 10) s += wxT("0");
 324             s += IntToString( m_month );
 325             s += wxT(".");
 326             s += IntToString( m_year );
 327         }
 328         break;
 329         case 3:
 330         {
 331             if (m_hour < 10) s = wxT("0"); else s = wxT("");
 332             s += IntToString( m_hour );
 333             s += wxT(":");
 334             if (m_minute < 10) s += wxT("0");
 335             s += IntToString( m_minute );
 336             break;
 337         }
 338         case 4:
 339             s = m_permissions;
 340             break;
 341         default:
 342             s = wxT("No entry");
 343             break;
 344     }
 345     return s;
 346 }
 347
 348 bool wxFileData::IsDir()
 349 {
 350     return m_isDir;
 351 }
 352
 353 bool wxFileData::IsExe()
 354 {
 355     return m_isExe;
 356 }
 357
 358 bool wxFileData::IsLink()
 359 {
 360     return m_isLink;
 361 }
 362
 363 long wxFileData::GetSize()
 364 {
 365     return m_size;
 366 }
 367
 368 void wxFileData::SetNewName( const wxString &name, const wxString &fname )
 369 {
 370     m_name = name;
 371     m_fileName = fname;
 372 }
 373
 374 void wxFileData::MakeItem( wxListItem &item )
 375 {
 376     item.m_text = m_name;
 377     item.ClearAttributes();
 378     if (IsExe()) item.SetTextColour(*wxRED);
 379     if (IsDir()) item.SetTextColour(*wxBLUE);
 380
 381     if (IsDir())
 382         item.m_image = 0;
 383     else if (m_name.Find(wxT('.')) != wxNOT_FOUND)
 384         item.m_image = g_IconsTable -> GetIconID(m_name.AfterLast(wxT('.')));
 385     else
 386         item.m_image = -1;
 387
 388     if (IsLink())
 389     {
 390         wxColour *dg = wxTheColourDatabase->FindColour( "MEDIUM GREY" );
 391         item.SetTextColour(*dg);
 392     }
 393     item.m_data = (long)this;
 394 }
 395
 396 //-----------------------------------------------------------------------------
 397 //  wxFileCtrl
 398 //-----------------------------------------------------------------------------
 399
 400 IMPLEMENT_DYNAMIC_CLASS(wxFileCtrl,wxListCtrl);
 401
 402 BEGIN_EVENT_TABLE(wxFileCtrl,wxListCtrl)
 403     EVT_LIST_DELETE_ITEM(-1, wxFileCtrl::OnListDeleteItem)
 404     EVT_LIST_END_LABEL_EDIT(-1, wxFileCtrl::OnListEndLabelEdit)
 405 END_EVENT_TABLE()
 406
 407
 408
 409 wxFileCtrl::wxFileCtrl()
 410 {
 411     m_dirName = wxT("/");
 412     m_showHidden = FALSE;
 413 }
 414
 415 wxFileCtrl::wxFileCtrl( wxWindow *win, wxWindowID id,
 416     const wxString &dirName, const wxString &wild,
 417     const wxPoint &pos, const wxSize &size,
 418     long style, const wxValidator &validator, const wxString &name ) :
 419   wxListCtrl( win, id, pos, size, style, validator, name )
 420 {
 421     if (! g_IconsTable) g_IconsTable = new wxFileIconsTable;
 422     wxImageList *imageList = g_IconsTable -> GetImageList();
 423
 424     SetImageList( imageList, wxIMAGE_LIST_SMALL );
 425
 426     m_dirName = dirName;
 427     m_wild = wild;
 428     m_showHidden = FALSE;
 429     Update();
 430 }
 431
 432 void wxFileCtrl::ChangeToListMode()
 433 {
 434     SetSingleStyle( wxLC_LIST );
 435     Update();
 436 }
 437
 438 void wxFileCtrl::ChangeToReportMode()
 439 {
 440     SetSingleStyle( wxLC_REPORT );
 441     Update();
 442 }
 443
 444 void wxFileCtrl::ChangeToIconMode()
 445 {
 446     SetSingleStyle( wxLC_ICON );
 447     Update();
 448 }
 449
 450 void wxFileCtrl::ShowHidden( bool show )
 451 {
 452     m_showHidden = show;
 453     Update();
 454 }
 455
 456 long wxFileCtrl::Add( wxFileData *fd, wxListItem &item )
 457 {
 458     long ret = -1;
 459     item.m_mask = wxLIST_MASK_TEXT + wxLIST_MASK_DATA + wxLIST_MASK_IMAGE;
 460     fd->MakeItem( item );
 461     long my_style = GetWindowStyleFlag();
 462     if (my_style & wxLC_REPORT)
 463     {
 464         ret = InsertItem( item );
 465         for (int i = 1; i < 5; i++) SetItem( item.m_itemId, i, fd->GetEntry( i) );
 466     }
 467     else if (my_style & wxLC_LIST)
 468     {
 469         ret = InsertItem( item );
 470     }
 471     return ret;
 472 }
 473
 474 void wxFileCtrl::Update()
 475 {
 476     long my_style = GetWindowStyleFlag();
 477     int name_col_width = 0;
 478     if (my_style & wxLC_REPORT)
 479     {
 480         if (GetColumnCount() > 0)
 481             name_col_width = GetColumnWidth( 0 );
 482     }
 483
 484     ClearAll();
 485     if (my_style & wxLC_REPORT)
 486     {
 487         if (name_col_width < 140) name_col_width = 140;
 488         InsertColumn( 0, _("Name"), wxLIST_FORMAT_LEFT, name_col_width );
 489         InsertColumn( 1, _("Size"), wxLIST_FORMAT_LEFT, 60 );
 490         InsertColumn( 2, _("Date"), wxLIST_FORMAT_LEFT, 65 );
 491         InsertColumn( 3, _("Time"), wxLIST_FORMAT_LEFT, 50 );
 492         InsertColumn( 4, _("Permissions"), wxLIST_FORMAT_LEFT, 120 );
 493     }
 494     wxFileData *fd = (wxFileData *) NULL;
 495     wxListItem item;
 496     item.m_itemId = 0;
 497     item.m_col = 0;
 498
 499     if (m_dirName != wxT("/"))
 500     {
 501         wxString p( wxPathOnly(m_dirName) );
 502         if (p.IsEmpty()) p = wxT("/");
 503         fd = new wxFileData( wxT(".."), p );
 504         Add( fd, item );
 505         item.m_itemId++;
 506     }
 507
 508     wxString res = m_dirName + wxT("/*");
 509     wxString f( wxFindFirstFile( res.GetData(), wxDIR ) );
 510     while (!f.IsEmpty())
 511     {
 512         res = wxFileNameFromPath( f );
 513         fd = new wxFileData( res, f );
 514         wxString s = fd->GetName();
 515         if (m_showHidden || (s[0] != wxT('.')))
 516         {
 517             Add( fd, item );
 518             item.m_itemId++;
 519         }
 520         f = wxFindNextFile();
 521     }
 522
 523     res = m_dirName + wxT("/") + m_wild;
 524     f = wxFindFirstFile( res.GetData(), wxFILE );
 525     while (!f.IsEmpty())
 526     {
 527         res = wxFileNameFromPath( f );
 528         fd = new wxFileData( res, f );
 529         wxString s = fd->GetName();
 530         if (m_showHidden || (s[0] != wxT('.')))
 531         {
 532             Add( fd, item );
 533             item.m_itemId++;
 534         }
 535         f = wxFindNextFile();
 536     }
 537
 538     SortItems( ListCompare, 0 );
 539
 540     SetColumnWidth( 1, wxLIST_AUTOSIZE );
 541     SetColumnWidth( 2, wxLIST_AUTOSIZE );
 542     SetColumnWidth( 3, wxLIST_AUTOSIZE );
 543 }
 544
 545 void wxFileCtrl::SetWild( const wxString &wild )
 546 {
 547     m_wild = wild;
 548     Update();
 549 }
 550
 551 void wxFileCtrl::MakeDir()
 552 {
 553     wxString new_name( wxT("NewName") );
 554     wxString path( m_dirName );
 555     path += wxT("/");
 556     path += new_name;
 557     if (wxFileExists(path))
 558     {
 559         // try NewName0, NewName1 etc.
 560         int i = 0;
 561         do {
 562             new_name = _("NewName");
 563             wxString num;
 564             num.Printf( wxT("%d"), i );
 565             new_name += num;
 566
 567             path = m_dirName;
 568             path += wxT("/");
 569             path += new_name;
 570             i++;
 571         } while (wxFileExists(path));
 572     }
 573
 574     wxLogNull log;
 575     if (!wxMkdir(path))
 576     {
 577         wxMessageDialog dialog(this, _("Operation not permitted."), _("Error"), wxOK | wxICON_ERROR );
 578         dialog.ShowModal();
 579         return;
 580     }
 581
 582     wxFileData *fd = new wxFileData( new_name, path );
 583     wxListItem item;
 584     item.m_itemId = 0;
 585     item.m_col = 0;
 586     long id = Add( fd, item );
 587
 588     if (id != -1)
 589     {
 590         SortItems( ListCompare, 0 );
 591         id = FindItem( 0, (long)fd );
 592         EnsureVisible( id );
 593         EditLabel( id );
 594     }
 595 }
 596
 597 void wxFileCtrl::GoToParentDir()
 598 {
 599     if (m_dirName != wxT("/"))
 600     {
 601         wxString fname( wxFileNameFromPath(m_dirName) );
 602         m_dirName = wxPathOnly( m_dirName );
 603         if (m_dirName.IsEmpty()) m_dirName = wxT("/");
 604         Update();
 605         long id = FindItem( 0, fname );
 606         if (id != -1)
 607         {
 608             SetItemState( id, wxLIST_STATE_SELECTED, wxLIST_STATE_SELECTED );
 609             EnsureVisible( id );
 610         }
 611     }
 612 }
 613
 614 void wxFileCtrl::GoToHomeDir()
 615 {
 616     wxString s = wxGetUserHome( wxString() );
 617     m_dirName = s;
 618     Update();
 619     SetItemState( 0, wxLIST_STATE_SELECTED, wxLIST_STATE_SELECTED );
 620     EnsureVisible( 0 );
 621 }
 622
 623 void wxFileCtrl::GoToDir( const wxString &dir )
 624 {
 625     m_dirName = dir;
 626     Update();
 627     SetItemState( 0, wxLIST_STATE_SELECTED, wxLIST_STATE_SELECTED );
 628     EnsureVisible( 0 );
 629 }
 630
 631 void wxFileCtrl::GetDir( wxString &dir )
 632 {
 633     dir = m_dirName;
 634 }
 635
 636 void wxFileCtrl::OnListDeleteItem( wxListEvent &event )
 637 {
 638     wxFileData *fd = (wxFileData*)event.m_item.m_data;
 639     delete fd;
 640 }
 641
 642 void wxFileCtrl::OnListEndLabelEdit( wxListEvent &event )
 643 {
 644     wxFileData *fd = (wxFileData*)event.m_item.m_data;
 645     wxASSERT( fd );
 646
 647     if ((event.GetLabel().IsEmpty()) ||
 648         (event.GetLabel() == _(".")) ||
 649         (event.GetLabel() == _("..")) ||
 650         (event.GetLabel().First( wxT("/") ) != wxNOT_FOUND))
 651     {
 652         wxMessageDialog dialog(this, _("Illegal directory name."), _("Error"), wxOK | wxICON_ERROR );
 653         dialog.ShowModal();
 654         event.Veto();
 655         return;
 656     }
 657
 658     wxString new_name( wxPathOnly( fd->GetFullName() ) );
 659     new_name += wxT("/");
 660     new_name += event.GetLabel();
 661
 662     wxLogNull log;
 663
 664     if (wxFileExists(new_name))
 665     {
 666         wxMessageDialog dialog(this, _("File name exists already."), _("Error"), wxOK | wxICON_ERROR );
 667         dialog.ShowModal();
 668         event.Veto();
 669     }
 670
 671     if (wxRenameFile(fd->GetFullName(),new_name))
 672     {
 673         fd->SetNewName( new_name, event.GetLabel() );
 674         SetItemState( event.GetItem(), wxLIST_STATE_SELECTED, wxLIST_STATE_SELECTED );
 675         EnsureVisible( event.GetItem() );
 676     }
 677     else
 678     {
 679         wxMessageDialog dialog(this, _("Operation not permitted."), _("Error"), wxOK | wxICON_ERROR );
 680         dialog.ShowModal();
 681         event.Veto();
 682     }
 683 }
 684
 685 //-----------------------------------------------------------------------------
 686 // wxFileDialog
 687 //-----------------------------------------------------------------------------
 688
 689 #define  ID_LIST_MODE     wxID_FILEDLGG
 690 #define  ID_REPORT_MODE   wxID_FILEDLGG + 1
 691 #define  ID_UP_DIR        wxID_FILEDLGG + 5
 692 #define  ID_PARENT_DIR    wxID_FILEDLGG + 6
 693 #define  ID_NEW_DIR       wxID_FILEDLGG + 7
 694 #define  ID_CHOICE        wxID_FILEDLGG + 8
 695 #define  ID_TEXT          wxID_FILEDLGG + 9
 696 #define  ID_LIST_CTRL     wxID_FILEDLGG + 10
 697 #define  ID_ACTIVATED     wxID_FILEDLGG + 11
 698 #define  ID_CHECK         wxID_FILEDLGG + 12
 699
 700 IMPLEMENT_DYNAMIC_CLASS(wxFileDialog,wxDialog)
 701
 702 BEGIN_EVENT_TABLE(wxFileDialog,wxDialog)
 703         EVT_BUTTON(ID_LIST_MODE, wxFileDialog::OnList)
 704         EVT_BUTTON(ID_REPORT_MODE, wxFileDialog::OnReport)
 705         EVT_BUTTON(ID_UP_DIR, wxFileDialog::OnUp)
 706         EVT_BUTTON(ID_PARENT_DIR, wxFileDialog::OnHome)
 707         EVT_BUTTON(ID_NEW_DIR, wxFileDialog::OnNew)
 708         EVT_BUTTON(wxID_OK, wxFileDialog::OnListOk)
 709         EVT_LIST_ITEM_SELECTED(ID_LIST_CTRL, wxFileDialog::OnSelected)
 710         EVT_LIST_ITEM_ACTIVATED(ID_LIST_CTRL, wxFileDialog::OnActivated)
 711         EVT_CHOICE(ID_CHOICE,wxFileDialog::OnChoice)
 712         EVT_TEXT_ENTER(ID_TEXT,wxFileDialog::OnTextEnter)
 713         EVT_CHECKBOX(ID_CHECK,wxFileDialog::OnCheck)
 714 END_EVENT_TABLE()
 715
 716 long wxFileDialog::m_lastViewStyle = wxLC_LIST;
 717 bool wxFileDialog::m_lastShowHidden = FALSE;
 718
 719 wxFileDialog::wxFileDialog(wxWindow *parent,
 720                  const wxString& message,
 721                  const wxString& defaultDir,
 722                  const wxString& defaultFile,
 723                  const wxString& wildCard,
 724                  long style,
 725                  const wxPoint& pos ) :
 726   wxDialog( parent, -1, message, pos, wxDefaultSize, wxDEFAULT_DIALOG_STYLE | wxRESIZE_BORDER )
 727 {
 728     wxBeginBusyCursor();
 729
 730     m_message = message;
 731     m_dialogStyle = style;
 732
 733     if (m_dialogStyle == 0) m_dialogStyle = wxOPEN;
 734     if ((m_dialogStyle & wxMULTIPLE ) && !(m_dialogStyle & wxOPEN))
 735         m_dialogStyle |= wxOPEN;
 736
 737     m_dir = defaultDir;
 738     if ((m_dir.IsEmpty()) || (m_dir == wxT(".")))
 739     {
 740         char buf[200];
 741         m_dir = getcwd( buf, sizeof(buf) );
 742     }
 743     m_path = defaultDir;
 744     m_path += wxT("/");
 745     m_path += defaultFile;
 746     m_fileName = defaultFile;
 747     m_wildCard = wildCard;
 748     m_filterIndex = 0;
 749     m_filterExtension = wxEmptyString;
 750
 751     // interpret wildcards
 752
 753     if (m_wildCard.IsEmpty())
 754         m_wildCard = _("All files (*)|*");
 755
 756     wxStringTokenizer tokens( m_wildCard, wxT("|") );
 757     wxString firstWild;
 758     wxString firstWildText;
 759     if (tokens.CountTokens() == 1)
 760     {
 761         firstWildText = tokens.GetNextToken();
 762         firstWild = firstWildText;
 763     }
 764     else
 765     {
 766         wxASSERT_MSG( tokens.CountTokens() % 2 == 0, wxT("Wrong file type descripition") );
 767         firstWildText = tokens.GetNextToken();
 768         firstWild = tokens.GetNextToken();
 769     }
 770     if ( firstWild.Left( 2 ) == wxT("*.") )
 771         m_filterExtension = firstWild.Mid( 1 );
 772     if ( m_filterExtension == ".*" ) m_filterExtension = wxEmptyString;
 773
 774     // layout
 775
 776     wxBoxSizer *mainsizer = new wxBoxSizer( wxVERTICAL );
 777
 778     wxBoxSizer *buttonsizer = new wxBoxSizer( wxHORIZONTAL );
 779
 780     wxBitmapButton *but;
 781
 782     but = new wxBitmapButton( this, ID_LIST_MODE, wxBitmap( listview_xpm ) );
 783 #if wxUSE_TOOLTIPS
 784     but->SetToolTip( _("View files as a list view") );
 785 #endif
 786     buttonsizer->Add( but, 0, wxALL, 5 );
 787
 788     but = new wxBitmapButton( this, ID_REPORT_MODE, wxBitmap( repview_xpm ) );
 789 #if wxUSE_TOOLTIPS
 790     but->SetToolTip( _("View files as a detailed view") );
 791 #endif
 792     buttonsizer->Add( but, 0, wxALL, 5 );
 793
 794     buttonsizer->Add( 30, 5, 1 );
 795
 796     but = new wxBitmapButton( this, ID_UP_DIR, wxBitmap( dir_up_xpm ) );
 797 #if wxUSE_TOOLTIPS
 798     but->SetToolTip( _("Go to parent directory") );
 799 #endif
 800     buttonsizer->Add( but, 0, wxALL, 5 );
 801
 802     but = new wxBitmapButton( this, ID_PARENT_DIR, wxBitmap(home_xpm) );
 803 #if wxUSE_TOOLTIPS
 804     but->SetToolTip( _("Go to home directory") );
 805 #endif
 806     buttonsizer->Add( but, 0, wxALL, 5);
 807
 808     buttonsizer->Add( 20, 20 );
 809
 810     but = new wxBitmapButton( this, ID_NEW_DIR, wxBitmap(new_dir_xpm) );
 811 #if wxUSE_TOOLTIPS
 812     but->SetToolTip( _("Create new directory") );
 813 #endif
 814     buttonsizer->Add( but, 0, wxALL, 5 );
 815
 816     mainsizer->Add( buttonsizer, 0, wxALL | wxEXPAND, 5 );
 817
 818     wxBoxSizer *staticsizer = new wxBoxSizer( wxHORIZONTAL );
 819     staticsizer->Add( new wxStaticText( this, -1, _("Current directory:") ), 0, wxRIGHT, 10 );
 820     m_static = new wxStaticText( this, -1, m_dir );
 821     staticsizer->Add( m_static, 1 );
 822     mainsizer->Add( staticsizer, 0, wxEXPAND | wxLEFT|wxRIGHT|wxBOTTOM, 10 );
 823
 824     if (m_dialogStyle & wxMULTIPLE)
 825         m_list = new wxFileCtrl( this, ID_LIST_CTRL, m_dir, firstWild, wxDefaultPosition,
 826                                  wxSize(440,180), m_lastViewStyle | wxSUNKEN_BORDER );
 827     else
 828         m_list = new wxFileCtrl( this, ID_LIST_CTRL, m_dir, firstWild, wxDefaultPosition,
 829                                  wxSize(440,180), m_lastViewStyle | wxSUNKEN_BORDER | wxLC_SINGLE_SEL );
 830     m_list -> ShowHidden(m_lastShowHidden);
 831     mainsizer->Add( m_list, 1, wxEXPAND | wxLEFT|wxRIGHT, 10 );
 832
 833     wxBoxSizer *textsizer = new wxBoxSizer( wxHORIZONTAL );
 834     m_text = new wxTextCtrl( this, ID_TEXT, m_fileName, wxDefaultPosition, wxDefaultSize, wxPROCESS_ENTER );
 835     textsizer->Add( m_text, 1, wxCENTER | wxLEFT|wxRIGHT|wxTOP, 10 );
 836     textsizer->Add( new wxButton( this, wxID_OK, _("OK") ), 0, wxCENTER | wxLEFT|wxRIGHT|wxTOP, 10 );
 837     mainsizer->Add( textsizer, 0, wxEXPAND );
 838
 839     wxBoxSizer *choicesizer = new wxBoxSizer( wxHORIZONTAL );
 840     m_choice = new wxChoice( this, ID_CHOICE );
 841     choicesizer->Add( m_choice, 1, wxCENTER|wxALL, 10 );
 842     m_check = new wxCheckBox( this, ID_CHECK, _("Show hidden files") );
 843     m_check->SetValue( m_lastShowHidden );
 844     choicesizer->Add( m_check, 0, wxCENTER|wxALL, 10 );
 845     choicesizer->Add( new wxButton( this, wxID_CANCEL, _("Cancel") ), 0, wxCENTER | wxALL, 10 );
 846     mainsizer->Add( choicesizer, 0, wxEXPAND );
 847
 848     m_choice->Append( firstWildText, (void*) new wxString( firstWild ) );
 849     while (tokens.HasMoreTokens())
 850     {
 851         firstWildText = tokens.GetNextToken();
 852         firstWild = tokens.GetNextToken();
 853         m_choice->Append( firstWildText, (void*) new wxString( firstWild ) );
 854     }
 855     m_choice->SetSelection( 0 );
 856
 857     SetAutoLayout( TRUE );
 858     SetSizer( mainsizer );
 859
 860     mainsizer->Fit( this );
 861     mainsizer->SetSizeHints( this );
 862
 863     Centre( wxBOTH );
 864
 865     if (m_fileName.IsEmpty())
 866         m_list->SetFocus();
 867     else
 868         m_text->SetFocus();
 869
 870     wxEndBusyCursor();
 871 }
 872
 873 wxFileDialog::~wxFileDialog()
 874 {
 875 }
 876
 877 void wxFileDialog::OnChoice( wxCommandEvent &event )
 878 {
 879     int index = (int)event.GetInt();
 880     wxString *str = (wxString*) m_choice->GetClientData( index );
 881     m_list->SetWild( *str );
 882     m_filterIndex = index;
 883     if ( str -> Left( 2 ) == wxT("*.") )
 884     {
 885         m_filterExtension = str -> Mid( 1 );
 886         if (m_filterExtension == ".*") m_filterExtension = wxEmptyString;
 887     }
 888     else
 889         m_filterExtension = wxEmptyString;
 890 }
 891
 892 void wxFileDialog::OnCheck( wxCommandEvent &event )
 893 {
 894     m_list->ShowHidden( (m_lastShowHidden = event.GetInt() != 0) );
 895 }
 896
 897 void wxFileDialog::OnActivated( wxListEvent &event )
 898 {
 899     HandleAction( event.m_item.m_text );
 900 }
 901
 902 void wxFileDialog::OnTextEnter( wxCommandEvent &WXUNUSED(event) )
 903 {
 904     wxCommandEvent cevent(wxEVT_COMMAND_BUTTON_CLICKED, wxID_OK);
 905     cevent.SetEventObject( this );
 906     GetEventHandler()->ProcessEvent( cevent );
 907 }
 908
 909 void wxFileDialog::OnSelected( wxListEvent &event )
 910 {
 911     if (FindFocus() != m_list) return;
 912
 913     wxString filename( event.m_item.m_text );
 914     if (filename == wxT("..")) return;
 915
 916     wxString dir;
 917     m_list->GetDir( dir );
 918     if (dir != wxT("/")) dir += wxT("/");
 919     dir += filename;
 920     if (wxDirExists(dir)) return;
 921
 922     m_text->SetValue( filename );
 923 }
 924
 925 void wxFileDialog::HandleAction( const wxString &fn )
 926 {
 927     wxString filename( fn );
 928     wxString dir;
 929     m_list->GetDir( dir );
 930     if (filename.IsEmpty()) return;
 931     if (filename == wxT(".")) return;
 932
 933     if (filename == wxT(".."))
 934     {
 935         m_list->GoToParentDir();
 936         m_list->SetFocus();
 937         m_list->GetDir( dir );
 938         m_static->SetLabel( dir );
 939         return;
 940     }
 941
 942     if (filename == wxT("~"))
 943     {
 944         m_list->GoToHomeDir();
 945         m_list->SetFocus();
 946         m_list->GetDir( dir );
 947         m_static->SetLabel( dir );
 948         return;
 949     }
 950
 951     if (filename[0] == wxT('~'))
 952     {
 953         filename.Remove( 0, 1 );
 954         wxString tmp( wxGetUserHome() );
 955         tmp += wxT('/');
 956         tmp += filename;
 957         filename = tmp;
 958     }
 959
 960     if ((filename.Find(wxT('*')) != wxNOT_FOUND) ||
 961         (filename.Find(wxT('?')) != wxNOT_FOUND))
 962     {
 963         if (filename.Find(wxT('/')) != wxNOT_FOUND)
 964         {
 965             wxMessageBox(_("Illegal file specification."), _("Error"), wxOK | wxICON_ERROR );
 966             return;
 967         }
 968         m_list->SetWild( filename );
 969         return;
 970     }
 971
 972     if (dir != wxT("/")) dir += wxT("/");
 973     if (filename[0] != wxT('/'))
 974     {
 975         dir += filename;
 976         filename = dir;
 977     }
 978
 979     if (wxDirExists(filename))
 980     {
 981         m_list->GoToDir( filename );
 982         m_list->GetDir( dir );
 983         m_static->SetLabel( dir );
 984         return;
 985     }
 986
 987
 988     if ( (m_dialogStyle & wxSAVE) && (m_dialogStyle & wxOVERWRITE_PROMPT) )
 989     {
 990         if (filename.Find( wxT('.') ) == wxNOT_FOUND ||
 991                 filename.AfterLast( wxT('.') ).Find( wxT('/') ) != wxNOT_FOUND)
 992             filename << m_filterExtension;
 993         if (wxFileExists( filename ))
 994         {
 995             wxString msg;
 996             msg.Printf( _("File '%s' already exists, do you really want to "
 997                          "overwrite it?"), filename.c_str() );
 998
 999             if (wxMessageBox(msg, _("Confirm"), wxYES_NO) != wxYES)
1000                 return;
1001         }
1002     }
1003     else if ( m_dialogStyle & wxOPEN )
1004     {
1005         if ( !wxFileExists( filename ) )
1006             if (filename.Find( wxT('.') ) == wxNOT_FOUND ||
1007                   filename.AfterLast( wxT('.') ).Find( wxT('/') ) != wxNOT_FOUND)
1008                 filename << m_filterExtension;
1009
1010         if ( m_dialogStyle & wxFILE_MUST_EXIST )
1011         {
1012             if ( !wxFileExists( filename ) )
1013             {
1014                 wxMessageBox(_("Please choose an existing file."), _("Error"), wxOK | wxICON_ERROR );
1015                 return;
1016             }
1017         }
1018     }
1019
1020     SetPath( filename );
1021
1022     wxCommandEvent event;
1023     wxDialog::OnOK(event);
1024 }
1025
1026 void wxFileDialog::OnListOk( wxCommandEvent &WXUNUSED(event) )
1027 {
1028     HandleAction( m_text->GetValue() );
1029 }
1030
1031 void wxFileDialog::OnList( wxCommandEvent &WXUNUSED(event) )
1032 {
1033     m_list->ChangeToListMode();
1034     m_lastViewStyle = wxLC_LIST;
1035     m_list->SetFocus();
1036 }
1037
1038 void wxFileDialog::OnReport( wxCommandEvent &WXUNUSED(event) )
1039 {
1040     m_list->ChangeToReportMode();
1041     m_lastViewStyle = wxLC_REPORT;
1042     m_list->SetFocus();
1043 }
1044
1045 void wxFileDialog::OnUp( wxCommandEvent &WXUNUSED(event) )
1046 {
1047     m_list->GoToParentDir();
1048     m_list->SetFocus();
1049     wxString dir;
1050     m_list->GetDir( dir );
1051     m_static->SetLabel( dir );
1052 }
1053
1054 void wxFileDialog::OnHome( wxCommandEvent &WXUNUSED(event) )
1055 {
1056     m_list->GoToHomeDir();
1057     m_list->SetFocus();
1058     wxString dir;
1059     m_list->GetDir( dir );
1060     m_static->SetLabel( dir );
1061 }
1062
1063 void wxFileDialog::OnNew( wxCommandEvent &WXUNUSED(event) )
1064 {
1065     m_list->MakeDir();
1066 }
1067
1068 void wxFileDialog::SetPath( const wxString& path )
1069 {
1070     // not only set the full path but also update filename and dir
1071     m_path = path;
1072     if ( !!path )
1073     {
1074         wxString ext;
1075         wxSplitPath(path, &m_dir, &m_fileName, &ext);
1076         if (!ext.IsEmpty())
1077         {
1078             m_fileName += wxT(".");
1079             m_fileName += ext;
1080         }
1081     }
1082 }
1083
1084 void wxFileDialog::GetPaths( wxArrayString& paths ) const
1085 {
1086     paths.Empty();
1087     if (m_list->GetSelectedItemCount() == 0)
1088     {
1089         paths.Add( GetPath() );
1090         return;
1091     }
1092
1093     paths.Alloc( m_list->GetSelectedItemCount() );
1094
1095     wxString dir;
1096     m_list->GetDir( dir );
1097     if (dir != wxT("/")) dir += wxT("/");
1098
1099     wxListItem item;
1100     item.m_mask = wxLIST_MASK_TEXT;
1101
1102     item.m_itemId = m_list->GetNextItem( -1, wxLIST_NEXT_ALL, wxLIST_STATE_SELECTED );
1103     while ( item.m_itemId != -1 ) {
1104         m_list->GetItem( item );
1105         paths.Add( dir + item.m_text );
1106         item.m_itemId = m_list->GetNextItem( item.m_itemId + 1,
1107             wxLIST_NEXT_ALL, wxLIST_STATE_SELECTED );
1108     }
1109 }
1110
1111 void wxFileDialog::GetFilenames(wxArrayString& files) const
1112 {
1113     files.Empty();
1114     if (m_list->GetSelectedItemCount() == 0)
1115     {
1116         files.Add( GetFilename() );
1117         return;
1118     }
1119     files.Alloc( m_list->GetSelectedItemCount() );
1120
1121     wxListItem item;
1122     item.m_mask = wxLIST_MASK_TEXT;
1123
1124     item.m_itemId = m_list->GetNextItem( -1, wxLIST_NEXT_ALL, wxLIST_STATE_SELECTED );
1125     while ( item.m_itemId != -1 ) {
1126         m_list->GetItem( item );
1127         files.Add( item.m_text );
1128         item.m_itemId = m_list->GetNextItem( item.m_itemId + 1,
1129             wxLIST_NEXT_ALL, wxLIST_STATE_SELECTED );
1130     }
1131 }
1132
1133
1134
1135 // ----------------------------------------------------------------------------
1136 // global functions
1137 // ----------------------------------------------------------------------------
1138
1139 wxString
1140 wxFileSelectorEx(const wxChar *message,
1141                  const wxChar *default_path,
1142                  const wxChar *default_filename,
1143                  int *WXUNUSED(indexDefaultExtension),
1144                  const wxChar *wildcard,
1145                  int flags,
1146                  wxWindow *parent,
1147                  int x, int y)
1148 {
1149     // TODO: implement this somehow
1150     return wxFileSelector(message, default_path, default_filename, wxT(""),
1151                           wildcard, flags, parent, x, y);
1152 }
1153
1154 wxString wxFileSelector( const wxChar *title,
1155                       const wxChar *defaultDir, const wxChar *defaultFileName,
1156                       const wxChar *defaultExtension, const wxChar *filter, int flags,
1157                       wxWindow *parent, int x, int y )
1158 {
1159     wxString filter2;
1160     if ( defaultExtension && !filter )
1161         filter2 = wxString(wxT("*.")) + wxString(defaultExtension) ;
1162     else if ( filter )
1163         filter2 = filter;
1164
1165     wxString defaultDirString;
1166     if (defaultDir)
1167         defaultDirString = defaultDir;
1168
1169     wxString defaultFilenameString;
1170     if (defaultFileName)
1171         defaultFilenameString = defaultFileName;
1172
1173     wxFileDialog fileDialog( parent, title, defaultDirString, defaultFilenameString, filter2, flags, wxPoint(x, y) );
1174
1175     if ( fileDialog.ShowModal() == wxID_OK )
1176     {
1177         return fileDialog.GetPath();
1178     }
1179     else
1180     {
1181         return wxEmptyString;
1182     }
1183 }
1184
1185 wxString wxLoadFileSelector( const wxChar *what, const wxChar *extension, const wxChar *default_name, wxWindow *parent )
1186 {
1187     wxChar *ext = (wxChar *)extension;
1188
1189     wxChar prompt[50];
1190     wxString str = _("Load %s file");
1191     wxSprintf(prompt, str, what);
1192
1193     if (*ext == wxT('.')) ext++;
1194     wxChar wild[60];
1195     wxSprintf(wild, wxT("*.%s"), ext);
1196
1197     return wxFileSelector (prompt, (const wxChar *) NULL, default_name, ext, wild, 0, parent);
1198 }
1199
1200 wxString wxSaveFileSelector(const wxChar *what, const wxChar *extension, const wxChar *default_name,
1201          wxWindow *parent )
1202 {
1203     wxChar *ext = (wxChar *)extension;
1204
1205     wxChar prompt[50];
1206     wxString str = _("Save %s file");
1207     wxSprintf(prompt, str, what);
1208
1209     if (*ext == wxT('.')) ext++;
1210     wxChar wild[60];
1211     wxSprintf(wild, wxT("*.%s"), ext);
1212
1213     return wxFileSelector (prompt, (const wxChar *) NULL, default_name, ext, wild, 0, parent);
1214 }
1215
1216
1217
1218
1219
1220
1221 // A module to allow icons table cleanup
1222
1223 class wxFileDialogGenericModule: public wxModule
1224 {
1225 DECLARE_DYNAMIC_CLASS(wxFileDialogGenericModule)
1226 public:
1227     wxFileDialogGenericModule() {}
1228     bool OnInit() { return TRUE; }
1229     void OnExit() { if (g_IconsTable) {delete g_IconsTable; g_IconsTable = NULL;} }
1230 };
1231
1232 IMPLEMENT_DYNAMIC_CLASS(wxFileDialogGenericModule, wxModule)