src/msw/filedlg.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        src/msw/filedlg.cpp
   3 // Purpose:     wxFileDialog
   4 // Author:      Julian Smart
   5 // Modified by:
   6 // Created:     01/02/97
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Julian Smart
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // ============================================================================
  13 // declarations
  14 // ============================================================================
  15
  16 // ----------------------------------------------------------------------------
  17 // headers
  18 // ----------------------------------------------------------------------------
  19
  20 #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
  21     #pragma implementation "filedlg.h"
  22 #endif
  23
  24 // For compilers that support precompilation, includes "wx.h".
  25 #include "wx/wxprec.h"
  26
  27 #ifdef __BORLANDC__
  28     #pragma hdrstop
  29 #endif
  30
  31 #if wxUSE_FILEDLG && !wxUSE_SMARTPHONE
  32
  33 #ifndef WX_PRECOMP
  34     #include "wx/utils.h"
  35     #include "wx/msgdlg.h"
  36     #include "wx/filedlg.h"
  37     #include "wx/filefn.h"
  38     #include "wx/intl.h"
  39     #include "wx/log.h"
  40     #include "wx/app.h"
  41 #endif
  42
  43 #include "wx/msw/private.h"
  44
  45 #if !defined(__WIN32__) || defined(__WXWINCE__)
  46     #include <commdlg.h>
  47 #endif
  48
  49 #include <math.h>
  50 #include <stdlib.h>
  51 #include <string.h>
  52
  53 #include "wx/filename.h"
  54 #include "wx/tokenzr.h"
  55
  56 #ifndef OFN_EXPLORER
  57     #define OFN_EXPLORER 0x00080000
  58 #endif
  59
  60 // ----------------------------------------------------------------------------
  61 // constants
  62 // ----------------------------------------------------------------------------
  63
  64 #ifdef __WIN32__
  65 # define wxMAXPATH   65534
  66 #else
  67 # define wxMAXPATH   1024
  68 #endif
  69
  70 # define wxMAXFILE   1024
  71
  72 # define wxMAXEXT    5
  73
  74 // ============================================================================
  75 // implementation
  76 // ============================================================================
  77
  78 IMPLEMENT_CLASS(wxFileDialog, wxFileDialogBase)
  79
  80 // ----------------------------------------------------------------------------
  81 // wxFileDialog
  82 // ----------------------------------------------------------------------------
  83
  84 wxFileDialog::wxFileDialog(wxWindow *parent,
  85                            const wxString& message,
  86                            const wxString& defaultDir,
  87                            const wxString& defaultFileName,
  88                            const wxString& wildCard,
  89                            long style,
  90                            const wxPoint& pos)
  91              :wxFileDialogBase(parent, message, defaultDir, defaultFileName, wildCard, style, pos)
  92
  93 {
  94     if ( ( m_dialogStyle & wxMULTIPLE ) && ( m_dialogStyle & wxSAVE ) )
  95         m_dialogStyle &= ~wxMULTIPLE;
  96 }
  97
  98 void wxFileDialog::GetPaths(wxArrayString& paths) const
  99 {
 100     paths.Empty();
 101
 102     wxString dir(m_dir);
 103     if ( m_dir.Last() != _T('\\') )
 104         dir += _T('\\');
 105
 106     size_t count = m_fileNames.GetCount();
 107     for ( size_t n = 0; n < count; n++ )
 108     {
 109         if (wxFileName(m_fileNames[n]).IsAbsolute())
 110             paths.Add(m_fileNames[n]);
 111         else
 112             paths.Add(dir + m_fileNames[n]);
 113     }
 114 }
 115
 116 void wxFileDialog::GetFilenames(wxArrayString& files) const
 117 {
 118     files = m_fileNames;
 119 }
 120
 121 void wxFileDialog::SetPath(const wxString& path)
 122 {
 123     wxString ext;
 124     wxSplitPath(path, &m_dir, &m_fileName, &ext);
 125     if ( !ext.empty() )
 126         m_fileName << _T('.') << ext;
 127 }
 128
 129 int wxFileDialog::ShowModal()
 130 {
 131     HWND hWnd = 0;
 132     if (m_parent) hWnd = (HWND) m_parent->GetHWND();
 133     if (!hWnd && wxTheApp->GetTopWindow())
 134         hWnd = (HWND) wxTheApp->GetTopWindow()->GetHWND();
 135
 136     static wxChar fileNameBuffer [ wxMAXPATH ];           // the file-name
 137     wxChar        titleBuffer    [ wxMAXFILE+1+wxMAXEXT ];  // the file-name, without path
 138
 139     *fileNameBuffer = wxT('\0');
 140     *titleBuffer    = wxT('\0');
 141
 142     long msw_flags = 0;
 143     if ( (m_dialogStyle & wxHIDE_READONLY) || (m_dialogStyle & wxSAVE) )
 144         msw_flags |= OFN_HIDEREADONLY;
 145     if ( m_dialogStyle & wxFILE_MUST_EXIST )
 146         msw_flags |= OFN_PATHMUSTEXIST | OFN_FILEMUSTEXIST;
 147
 148     if (m_dialogStyle & wxMULTIPLE )
 149     {
 150         // OFN_EXPLORER must always be specified with OFN_ALLOWMULTISELECT
 151         msw_flags |= OFN_EXPLORER | OFN_ALLOWMULTISELECT;
 152     }
 153
 154     // if wxCHANGE_DIR flag is not given we shouldn't change the CWD which the
 155     // standard dialog does by default
 156     if ( !(m_dialogStyle & wxCHANGE_DIR) )
 157     {
 158         msw_flags |= OFN_NOCHANGEDIR;
 159     }
 160 /* chris elliott for some reason this does not work usefully if no extension
 161    is given, as it test for junk instead of junk.ext
 162     if ( m_dialogStyle & wxOVERWRITE_PROMPT )
 163     {
 164         msw_flags |= OFN_OVERWRITEPROMPT;
 165     }
 166 */
 167     OPENFILENAME of;
 168     wxZeroMemory(of);
 169
 170     // the OPENFILENAME struct has been extended in newer version of
 171     // comcdlg32.dll, but as we don't use the extended fields anyhow, set
 172     // the struct size to the old value - otherwise, the programs compiled
 173     // with new headers will not work with the old libraries
 174 #if defined(_WIN32_WINNT) && (_WIN32_WINNT >= 0x0500)
 175     of.lStructSize       = sizeof(OPENFILENAME) -
 176                            (sizeof(void *) + 2*sizeof(DWORD));
 177 #else // old headers
 178     of.lStructSize       = sizeof(OPENFILENAME);
 179 #endif
 180
 181     of.hwndOwner         = hWnd;
 182     of.lpstrTitle        = WXSTRINGCAST m_message;
 183     of.lpstrFileTitle    = titleBuffer;
 184     of.nMaxFileTitle     = wxMAXFILE + 1 + wxMAXEXT;    // Windows 3.0 and 3.1
 185
 186     // Convert forward slashes to backslashes (file selector doesn't like
 187     // forward slashes) and also squeeze multiple consecutive slashes into one
 188     // as it doesn't like two backslashes in a row neither
 189
 190     wxString    dir;
 191     size_t      i, len = m_dir.length();
 192     dir.reserve(len);
 193     for ( i = 0; i < len; i++ )
 194     {
 195         wxChar ch = m_dir[i];
 196         switch ( ch )
 197         {
 198             case _T('/'):
 199                 // convert to backslash
 200                 ch = _T('\\');
 201
 202                 // fall through
 203
 204             case _T('\\'):
 205                 while ( i < len - 1 )
 206                 {
 207                     wxChar chNext = m_dir[i + 1];
 208                     if ( chNext != _T('\\') && chNext != _T('/') )
 209                         break;
 210
 211                     // ignore the next one, unless it is at the start of a UNC path
 212                     if (i > 0)
 213                         i++;
 214                     else
 215                         break;
 216                 }
 217                 // fall through
 218
 219             default:
 220                 // normal char
 221                 dir += ch;
 222         }
 223     }
 224
 225     of.lpstrInitialDir   = dir.c_str();
 226
 227     of.Flags             = msw_flags;
 228
 229
 230     //=== Like Alejandro Sierra's wildcard modification >>===================
 231     /*
 232        In wxFileSelector you can put, instead of a single wild_card,
 233        pairs of strings separated by '|'.
 234        The first string is a description, and the
 235        second is the wild card. You can put any number of pairs.
 236
 237        eg.  "description1 (*.ex1)|*.ex1|description2 (*.ex2)|*.ex2"
 238
 239        If you put a single wild card, it works as before the modification.
 240      */
 241     //=======================================================================
 242
 243     wxString theFilter;
 244     if ( wxStrlen(m_wildCard) == 0 )
 245         theFilter = wxString(wxT("*.*"));
 246     else
 247         theFilter = m_wildCard ;
 248     wxString filterBuffer;
 249
 250     if ( !wxStrchr( theFilter, wxT('|') ) ) {    // only one filter ==> default text
 251         filterBuffer.Printf(_("Files (%s)|%s"),
 252                             theFilter.c_str(), theFilter.c_str());
 253     }
 254     else {                                // more then one filter
 255         filterBuffer = theFilter;
 256
 257     }
 258
 259     filterBuffer += wxT("|");
 260     // Replace | with \0
 261     for (i = 0; i < filterBuffer.Len(); i++ ) {
 262         if ( filterBuffer.GetChar(i) == wxT('|') ) {
 263             filterBuffer[i] = wxT('\0');
 264         }
 265     }
 266
 267     of.lpstrFilter  = (LPTSTR)(const wxChar *)filterBuffer;
 268     of.nFilterIndex = m_filterIndex + 1;
 269
 270     //=== Setting defaultFileName >>=========================================
 271
 272     wxStrncpy( fileNameBuffer, (const wxChar *)m_fileName, wxMAXPATH-1 );
 273     fileNameBuffer[ wxMAXPATH-1 ] = wxT('\0');
 274
 275     of.lpstrFile = fileNameBuffer;  // holds returned filename
 276     of.nMaxFile  = wxMAXPATH;
 277
 278     //== Execute FileDialog >>=================================================
 279
 280     bool success = (m_dialogStyle & wxSAVE ? GetSaveFileName(&of)
 281                                            : GetOpenFileName(&of)) != 0;
 282
 283     DWORD errCode = CommDlgExtendedError();
 284
 285 #ifdef __WIN32__
 286     if (!success && (errCode == CDERR_STRUCTSIZE))
 287     {
 288         // The struct size has changed so try a smaller or bigger size
 289
 290         int oldStructSize = of.lStructSize;
 291         of.lStructSize       = oldStructSize - (sizeof(void *) + 2*sizeof(DWORD));
 292         success = (m_dialogStyle & wxSAVE) ? (GetSaveFileName(&of) != 0)
 293                                             : (GetOpenFileName(&of) != 0);
 294         errCode = CommDlgExtendedError();
 295
 296         if (!success && (errCode == CDERR_STRUCTSIZE))
 297         {
 298             of.lStructSize       = oldStructSize + (sizeof(void *) + 2*sizeof(DWORD));
 299             success = (m_dialogStyle & wxSAVE) ? (GetSaveFileName(&of) != 0)
 300                                             : (GetOpenFileName(&of) != 0);
 301         }
 302     }
 303 #endif // __WIN32__
 304
 305     if ( success )
 306     {
 307         m_fileNames.Empty();
 308
 309         if ( ( m_dialogStyle & wxMULTIPLE ) &&
 310 #if defined(OFN_EXPLORER)
 311              ( fileNameBuffer[of.nFileOffset-1] == wxT('\0') )
 312 #else
 313              ( fileNameBuffer[of.nFileOffset-1] == wxT(' ') )
 314 #endif // OFN_EXPLORER
 315            )
 316         {
 317 #if defined(OFN_EXPLORER)
 318             m_dir = fileNameBuffer;
 319             i = of.nFileOffset;
 320             m_fileName = &fileNameBuffer[i];
 321             m_fileNames.Add(m_fileName);
 322             i += m_fileName.Len() + 1;
 323
 324             while (fileNameBuffer[i] != wxT('\0'))
 325             {
 326                 m_fileNames.Add(&fileNameBuffer[i]);
 327                 i += wxStrlen(&fileNameBuffer[i]) + 1;
 328             }
 329 #else
 330             wxStringTokenizer toke(fileNameBuffer, _T(" \t\r\n"));
 331             m_dir = toke.GetNextToken();
 332             m_fileName = toke.GetNextToken();
 333             m_fileNames.Add(m_fileName);
 334
 335             while (toke.HasMoreTokens())
 336                 m_fileNames.Add(toke.GetNextToken());
 337 #endif // OFN_EXPLORER
 338
 339             wxString dir(m_dir);
 340             if ( m_dir.Last() != _T('\\') )
 341                 dir += _T('\\');
 342
 343             m_path = dir + m_fileName;
 344         }
 345         else
 346         {
 347             //=== Adding the correct extension >>=================================
 348
 349             m_filterIndex = (int)of.nFilterIndex - 1;
 350
 351             if ( !of.nFileExtension ||
 352                  (of.nFileExtension && fileNameBuffer[of.nFileExtension] == wxT('\0')) )
 353             {
 354                 // User has typed a filename without an extension:
 355                 const wxChar* extension = filterBuffer;
 356                 int   maxFilter = (int)(of.nFilterIndex*2L) - 1;
 357
 358                 for( int i = 0; i < maxFilter; i++ )           // get extension
 359                     extension = extension + wxStrlen( extension ) + 1;
 360
 361                 m_fileName = AppendExtension(fileNameBuffer, extension);
 362                 wxStrncpy(fileNameBuffer, m_fileName.c_str(), wxMin(m_fileName.Len(), wxMAXPATH-1));
 363                 fileNameBuffer[wxMin(m_fileName.Len(), wxMAXPATH-1)] = wxT('\0');
 364             }
 365
 366             m_path = fileNameBuffer;
 367             m_fileName = wxFileNameFromPath(fileNameBuffer);
 368             m_fileNames.Add(m_fileName);
 369             m_dir = wxPathOnly(fileNameBuffer);
 370         }
 371         //=== Simulating the wxOVERWRITE_PROMPT >>============================
 372         //should we also test for file save style ??
 373         if ( (m_dialogStyle & wxOVERWRITE_PROMPT) &&
 374              ::wxFileExists( fileNameBuffer ) )
 375              {
 376              wxString messageText;
 377              messageText.Printf(_("File '%s' already exists.\nDo you want to replace it?"), fileNameBuffer);
 378              if ( wxMessageBox(messageText, _("Save File As"), wxYES_NO | wxICON_EXCLAMATION     ) != wxYES )
 379              {
 380                  success = FALSE;
 381              }
 382         }
 383     }
 384     else
 385     {
 386         // common dialog failed - why?
 387 #ifdef __WXDEBUG__
 388         DWORD dwErr = CommDlgExtendedError();
 389         if ( dwErr != 0 )
 390         {
 391             // this msg is only for developers
 392             wxLogError(wxT("Common dialog failed with error code %0lx."),
 393                        dwErr);
 394         }
 395         //else: it was just cancelled
 396 #endif
 397     }
 398
 399     return success ? wxID_OK : wxID_CANCEL;
 400
 401 }
 402
 403 #endif // wxUSE_FILEDLG
 404