src/msw/filedlg.cpp

/////////////////////////////////////////////////////////////////////////////
// Name:        filedlg.cpp
// Purpose:     wxFileDialog
// Author:      Julian Smart
// Modified by:
// Created:     01/02/97
// RCS-ID:      $Id$
// Copyright:   (c) Julian Smart and Markus Holzem
// Licence:     wxWindows licence
/////////////////////////////////////////////////////////////////////////////

#ifdef __GNUG__
    #pragma implementation "filedlg.h"
#endif

// For compilers that support precompilation, includes "wx.h".
#include "wx/wxprec.h"
#include "wx/msw/private.h"

#ifdef __BORLANDC__
    #pragma hdrstop
#endif

#ifndef WX_PRECOMP
    #include "wx/utils.h"
    #include "wx/msgdlg.h"
    #include "wx/dialog.h"
    #include "wx/filedlg.h"
    #include "wx/intl.h"
    #include "wx/log.h"

//    #include "wx/msw/private.h"
#endif

#if !defined(__WIN32__) || defined(__SALFORDC__) || defined(__WXWINE__)
    #include <commdlg.h>
#endif

#include <math.h>
#include <stdlib.h>
#include <string.h>

#include "wx/tokenzr.h"

IMPLEMENT_CLASS(wxFileDialog, wxDialog)

wxString wxFileSelector(const wxChar *title,
                        const wxChar *defaultDir,
                        const wxChar *defaultFileName,
                        const wxChar *defaultExtension,
                        const wxChar *filter,
                        int flags,
                        wxWindow *parent,
                        int x, int y)
{
    // In the original implementation, defaultExtension is passed to the
    // lpstrDefExt member of OPENFILENAME. This extension, if non-NULL, is
    // appended to the filename if the user fails to type an extension. The new
    // implementation (taken from wxFileSelectorEx) appends the extension
    // automatically, by looking at the filter specification. In fact this
    // should be better than the native Microsoft implementation because
    // Windows only allows *one* default extension, whereas here we do the
    // right thing depending on the filter the user has chosen.

    // If there's a default extension specified but no filter, we create a
    // suitable filter.

    wxString filter2;
    if ( defaultExtension && !filter )
        filter2 = wxString(wxT("*.")) + defaultExtension;
    else if ( filter )
        filter2 = filter;

    wxString defaultDirString;
    if (defaultDir)
        defaultDirString = defaultDir;

    wxString defaultFilenameString;
    if (defaultFileName)
        defaultFilenameString = defaultFileName;

    wxFileDialog fileDialog(parent, title, defaultDirString,
                            defaultFilenameString, filter2,
                            flags, wxPoint(x, y));
    if( wxStrlen(defaultExtension) != 0 )
    {
        int filterFind = 1,
            filterIndex = 0;

        for( unsigned int i = 0; i < filter2.Len(); i++ )
        {
            if( filter2.GetChar(i) == wxT('|') )
            {
                // save the start index of the new filter
                unsigned int is = i++;
                filterIndex++;

                // find the end of the filter
                for( ; i < filter2.Len(); i++ )
                {
                    if(filter2[i] == wxT('|'))
                        break;
                }

                if( i-is-1 > 0 && is+1 < filter2.Len() )
                {
                    if( filter2.Mid(is+1,i-is-1).Contains(defaultExtension) )
//                    if( filter2.Mid(is+1,i-is-1) == defaultExtension )
                    {
                        filterFind = filterIndex;
                        break;
                    }
                }
            }
        }

        fileDialog.SetFilterIndex(filterFind);
    }

    if ( fileDialog.ShowModal() == wxID_OK )
    {
        wxStrcpy(wxBuffer, (const wxChar *)fileDialog.GetPath());
        return wxBuffer;
    }
    else
        return wxGetEmptyString();
}

# if __BORLANDC__
#   include <dir.h>  // for MAXPATH etc. ( Borland 3.1 )
# endif

# ifndef MAXPATH
# define MAXPATH   400
# endif

# ifndef MAXDRIVE
# define MAXDRIVE  3
# endif

# ifndef MAXFILE
# define MAXFILE   9
# endif

# ifndef MAXEXT
# define MAXEXT    5
# endif


wxString wxFileSelectorEx(const wxChar *title,
                       const wxChar *defaultDir,
                       const wxChar *defaultFileName,
                       int* defaultFilterIndex,
                       const wxChar *filter,
                       int       flags,
                       wxWindow* parent,
                       int       x,
                       int       y)

{
    wxFileDialog fileDialog(parent, title ? title : wxT(""), defaultDir ? defaultDir : wxT(""),
        defaultFileName ? defaultFileName : wxT(""), filter ? filter : wxT(""), flags, wxPoint(x, y));

    if ( fileDialog.ShowModal() == wxID_OK )
    {
        *defaultFilterIndex = fileDialog.GetFilterIndex();
        wxStrcpy(wxBuffer, (const wxChar *)fileDialog.GetPath());
        return wxBuffer;
    }
    else
        return wxGetEmptyString();
}

wxFileDialog::wxFileDialog(wxWindow *parent, const wxString& message,
        const wxString& defaultDir, const wxString& defaultFileName, const wxString& wildCard,
        long style, const wxPoint& pos)
{
    m_message = message;
    m_dialogStyle = style;
    if ( ( m_dialogStyle & wxMULTIPLE ) && ( m_dialogStyle & wxSAVE ) )
        m_dialogStyle &= ~wxMULTIPLE;
    m_parent = parent;
    m_path = wxT("");
    m_fileName = defaultFileName;
    m_dir = defaultDir;
    m_wildCard = wildCard;
    m_filterIndex = 0;
}

void wxFileDialog::GetPaths(wxArrayString& paths) const
{
    paths.Empty();

    wxString dir(m_dir);
    if ( m_dir.Last() != _T('\\') )
        dir += _T('\\');

    size_t count = m_fileNames.GetCount();
    for ( size_t n = 0; n < count; n++ )
    {
        paths.Add(dir + m_fileNames[n]);
    }
}

int wxFileDialog::ShowModal()
{
    HWND hWnd = 0;
    if (m_parent) hWnd = (HWND) m_parent->GetHWND();

    static wxChar fileNameBuffer [ MAXPATH ];           // the file-name
    wxChar        titleBuffer    [ MAXFILE+1+MAXEXT ];  // the file-name, without path

    *fileNameBuffer = wxT('\0');
    *titleBuffer    = wxT('\0');

    long msw_flags = 0;
    if ( (m_dialogStyle & wxHIDE_READONLY) || (m_dialogStyle & wxSAVE) )
        msw_flags |= OFN_HIDEREADONLY;
    if ( m_dialogStyle & wxFILE_MUST_EXIST )
        msw_flags |= OFN_PATHMUSTEXIST | OFN_FILEMUSTEXIST;
    if (m_dialogStyle & wxMULTIPLE )
        msw_flags |=
#if defined(OFN_EXPLORER)
        OFN_EXPLORER |
#endif // OFN_EXPLORER
        OFN_ALLOWMULTISELECT;

    OPENFILENAME of;
    memset(&of, 0, sizeof(OPENFILENAME));

    of.lpstrCustomFilter = NULL;   // system should not save custom filter
    of.nMaxCustFilter    = 0L;

    of.nFileOffset       = 0;      // 0-based pointer to filname in lpstFile
    of.nFileExtension    = 0;      // 0-based pointer to extension in lpstrFile
    of.lpstrDefExt       = NULL;   // no default extension

    of.lStructSize       = sizeof(OPENFILENAME);
    of.hwndOwner         = hWnd;
    of.lpstrTitle        = WXSTRINGCAST m_message;


    of.lpstrFileTitle    = titleBuffer;
    of.nMaxFileTitle     = MAXFILE + 1 + MAXEXT;    // Windows 3.0 and 3.1

    // Convert forward slashes to backslashes (file selector doesn't like
    // forward slashes)
    size_t i = 0;
    size_t len = m_dir.Length();
    for (i = 0; i < len; i++)
        if (m_dir[i] == wxT('/'))
            m_dir[i] = wxT('\\');

    of.lpstrInitialDir   = m_dir.c_str();

    of.Flags             = msw_flags;


    //=== Like Alejandro Sierra's wildcard modification >>===================
    /*
       In wxFileSelector you can put, instead of a single wild_card,
       pairs of strings separated by '|'.
       The first string is a description, and the
       second is the wild card. You can put any number of pairs.

       eg.  "description1 (*.ex1)|*.ex1|description2 (*.ex2)|*.ex2"

       If you put a single wild card, it works as before the modification.
     */
    //=======================================================================

    wxString theFilter;
    if ( wxStrlen(m_wildCard) == 0 )
        theFilter = wxString(wxT("*.*"));
    else
        theFilter = m_wildCard ;
    wxString filterBuffer;

    if ( !wxStrchr( theFilter, wxT('|') ) ) {    // only one filter ==> default text
        filterBuffer.Printf(_("Files (%s)|%s"),
                            theFilter.c_str(), theFilter.c_str());
    }
    else {                                // more then one filter
        filterBuffer = theFilter;

    }

    filterBuffer += wxT("|");
    // Replace | with \0
    for (i = 0; i < filterBuffer.Len(); i++ ) {
        if ( filterBuffer.GetChar(i) == wxT('|') ) {
            filterBuffer[i] = wxT('\0');
        }
    }

    of.lpstrFilter  = (LPTSTR)(const wxChar *)filterBuffer;
    of.nFilterIndex = m_filterIndex + 1;

    //=== Setting defaultFileName >>=========================================

    wxStrncpy( fileNameBuffer, (const wxChar *)m_fileName, MAXPATH-1 );
    fileNameBuffer[ MAXPATH-1 ] = wxT('\0');

    of.lpstrFile = fileNameBuffer;  // holds returned filename
    of.nMaxFile  = MAXPATH;

    //== Execute FileDialog >>=================================================

    bool success = (m_dialogStyle & wxSAVE) ? (GetSaveFileName(&of) != 0)
                                            : (GetOpenFileName(&of) != 0);

    if ( success )
    {
        m_fileNames.Empty();

        if ( ( m_dialogStyle & wxMULTIPLE ) &&
#if defined(OFN_EXPLORER)
             ( fileNameBuffer[of.nFileOffset-1] == wxT('\0') ) )
#else
             ( fileNameBuffer[of.nFileOffset-1] == wxT(' ') ) )
#endif // OFN_EXPLORER
        {
#if defined(OFN_EXPLORER)
            m_dir = fileNameBuffer;
            i = of.nFileOffset;
            m_fileName = &fileNameBuffer[i];
            m_fileNames.Add(m_fileName);
            i += m_fileName.Len() + 1;

            while (fileNameBuffer[i] != wxT('\0'))
            {
                m_fileNames.Add(&fileNameBuffer[i]);
                i += wxStrlen(&fileNameBuffer[i]) + 1;
            }
#else
            wxStringTokenizer toke(fileNameBuffer, " \t\r\n");
            m_dir = toke.GetNextToken();
            m_fileName = toke.GetNextToken();
            m_fileNames.Add(m_fileName);

            while (toke.HasMoreTokens())
                m_fileNames.Add(toke.GetNextToken());
#endif // OFN_EXPLORER

            wxString dir(m_dir);
            if ( m_dir.Last() != _T('\\') )
                dir += _T('\\');

            m_fileNames.Sort();
            m_path = dir + m_fileName;
        }
        else
        {
            const wxChar* extension = NULL;

            //=== Adding the correct extension >>=================================

            m_filterIndex = (int)of.nFilterIndex - 1;

            if ( !of.nFileExtension || (of.nFileExtension && fileNameBuffer[ of.nFileExtension-1] != wxT('.')) )
            {                                    // user has typed an filename
                // without an extension:

                int   maxFilter = (int)(of.nFilterIndex*2L-1L);
                extension = filterBuffer;

                for( int i = 0; i < maxFilter; i++ ) {          // get extension
                    extension = extension + wxStrlen( extension ) +1;
                }

                extension = wxStrrchr( extension, wxT('.') );
                if (  extension                                 // != "blabla"
                        && !wxStrrchr( extension, wxT('*') )       // != "blabla.*"
                        && !wxStrrchr( extension, wxT('?') )       // != "blabla.?"
                        && extension[1]                           // != "blabla."
                        && extension[1] != wxT(' ') )              // != "blabla. "
                {
                    // now concat extension to the fileName:
                    m_fileName = wxString(fileNameBuffer) + extension;

                    int len = wxStrlen( fileNameBuffer );
                    wxStrncpy( fileNameBuffer + len, extension, MAXPATH - len );
                    fileNameBuffer[ MAXPATH -1 ] = wxT('\0');
                }
            }

            m_path = fileNameBuffer;
            m_fileName = wxFileNameFromPath(fileNameBuffer);
            m_fileNames.Add(m_fileName);
            m_dir = wxPathOnly(fileNameBuffer);
        }


        //=== Simulating the wxOVERWRITE_PROMPT >>============================

        if ( (m_dialogStyle & wxOVERWRITE_PROMPT) &&
             ::wxFileExists( fileNameBuffer ) )
        {
            wxString messageText;
            messageText.Printf(_("Replace file '%s'?"), fileNameBuffer);

            if ( wxMessageBox(messageText, m_message, wxYES_NO ) != wxYES )
            {
                success = FALSE;
            }
        }

    }
    else
    {
        // common dialog failed - why?
#ifdef __WXDEBUG__
        DWORD dwErr = CommDlgExtendedError();
        if ( dwErr != 0 )
        {
            // this msg is only for developers
            wxLogError(wxT("Common dialog failed with error code %0lx."),
                       dwErr);
        }
        //else: it was just cancelled
#endif
    }

    return success ? wxID_OK : wxID_CANCEL;

}

// Generic file load/save dialog (for internal use only)
static
wxString wxDefaultFileSelector(bool load,
                               const wxChar *what,
                               const wxChar *extension,
                               const wxChar *default_name,
                               wxWindow *parent)
{
  wxString prompt;
  wxString str;
  if (load) str = _("Load %s file");
  else str = _("Save %s file");
  prompt.Printf(str, what);

  const wxChar *ext = extension;
  if (*ext == wxT('.'))
      ext++;

  wxString wild;
  wild.Printf(wxT("*.%s"), ext);

  return wxFileSelector (prompt, NULL, default_name, ext, wild, 0, parent);
}

// Generic file load dialog
WXDLLEXPORT wxString wxLoadFileSelector(const wxChar *what,
                                        const wxChar *extension,
                                        const wxChar *default_name,
                                        wxWindow *parent)
{
    return wxDefaultFileSelector(TRUE, what, extension, default_name, parent);
}

// Generic file save dialog
WXDLLEXPORT wxString wxSaveFileSelector(const wxChar *what,
                                        const wxChar *extension,
                                        const wxChar *default_name,
                                        wxWindow *parent)
{
    return wxDefaultFileSelector(FALSE, what, extension, default_name, parent);
}
Commit	Line	Data
	1	/////////////////////////////////////////////////////////////////////////////
	2	// Name: 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 and Markus Holzem
	9	// Licence: wxWindows licence
	10	/////////////////////////////////////////////////////////////////////////////
	11
	12	#ifdef __GNUG__
	13	#pragma implementation "filedlg.h"
	14	#endif
	15
	16	// For compilers that support precompilation, includes "wx.h".
	17	#include "wx/wxprec.h"
	18	#include "wx/msw/private.h"
	19
	20	#ifdef __BORLANDC__
	21	#pragma hdrstop
	22	#endif
	23
	24	#ifndef WX_PRECOMP
	25	#include "wx/utils.h"
	26	#include "wx/msgdlg.h"
	27	#include "wx/dialog.h"
	28	#include "wx/filedlg.h"
	29	#include "wx/intl.h"
	30	#include "wx/log.h"
	31
	32	// #include "wx/msw/private.h"
	33	#endif
	34
	35	#if !defined(__WIN32__) \|\| defined(__SALFORDC__) \|\| defined(__WXWINE__)
	36	#include <commdlg.h>
	37	#endif
	38
	39	#include <math.h>
	40	#include <stdlib.h>
	41	#include <string.h>
	42
	43	#include "wx/tokenzr.h"
	44
	45	IMPLEMENT_CLASS(wxFileDialog, wxDialog)
	46
	47	wxString wxFileSelector(const wxChar *title,
	48	const wxChar *defaultDir,
	49	const wxChar *defaultFileName,
	50	const wxChar *defaultExtension,
	51	const wxChar *filter,
	52	int flags,
	53	wxWindow *parent,
	54	int x, int y)
	55	{
	56	// In the original implementation, defaultExtension is passed to the
	57	// lpstrDefExt member of OPENFILENAME. This extension, if non-NULL, is
	58	// appended to the filename if the user fails to type an extension. The new
	59	// implementation (taken from wxFileSelectorEx) appends the extension
	60	// automatically, by looking at the filter specification. In fact this
	61	// should be better than the native Microsoft implementation because
	62	// Windows only allows one default extension, whereas here we do the
	63	// right thing depending on the filter the user has chosen.
	64
	65	// If there's a default extension specified but no filter, we create a
	66	// suitable filter.
	67
	68	wxString filter2;
	69	if ( defaultExtension && !filter )
	70	filter2 = wxString(wxT("*.")) + defaultExtension;
	71	else if ( filter )
	72	filter2 = filter;
	73
	74	wxString defaultDirString;
	75	if (defaultDir)
	76	defaultDirString = defaultDir;
	77
	78	wxString defaultFilenameString;
	79	if (defaultFileName)
	80	defaultFilenameString = defaultFileName;
	81
	82	wxFileDialog fileDialog(parent, title, defaultDirString,
	83	defaultFilenameString, filter2,
	84	flags, wxPoint(x, y));
	85	if( wxStrlen(defaultExtension) != 0 )
	86	{
	87	int filterFind = 1,
	88	filterIndex = 0;
	89
	90	for( unsigned int i = 0; i < filter2.Len(); i++ )
	91	{
	92	if( filter2.GetChar(i) == wxT('\|') )
	93	{
	94	// save the start index of the new filter
	95	unsigned int is = i++;
	96	filterIndex++;
	97
	98	// find the end of the filter
	99	for( ; i < filter2.Len(); i++ )
	100	{
	101	if(filter2[i] == wxT('\|'))
	102	break;
	103	}
	104
	105	if( i-is-1 > 0 && is+1 < filter2.Len() )
	106	{
	107	if( filter2.Mid(is+1,i-is-1).Contains(defaultExtension) )
	108	// if( filter2.Mid(is+1,i-is-1) == defaultExtension )
	109	{
	110	filterFind = filterIndex;
	111	break;
	112	}
	113	}
	114	}
	115	}
	116
	117	fileDialog.SetFilterIndex(filterFind);
	118	}
	119
	120	if ( fileDialog.ShowModal() == wxID_OK )
	121	{
	122	wxStrcpy(wxBuffer, (const wxChar *)fileDialog.GetPath());
	123	return wxBuffer;
	124	}
	125	else
	126	return wxGetEmptyString();
	127	}
	128
	129	# if __BORLANDC__
	130	# include <dir.h> // for MAXPATH etc. ( Borland 3.1 )
	131	# endif
	132
	133	# ifndef MAXPATH
	134	# define MAXPATH 400
	135	# endif
	136
	137	# ifndef MAXDRIVE
	138	# define MAXDRIVE 3
	139	# endif
	140
	141	# ifndef MAXFILE
	142	# define MAXFILE 9
	143	# endif
	144
	145	# ifndef MAXEXT
	146	# define MAXEXT 5
	147	# endif
	148
	149
	150	wxString wxFileSelectorEx(const wxChar *title,
	151	const wxChar *defaultDir,
	152	const wxChar *defaultFileName,
	153	int* defaultFilterIndex,
	154	const wxChar *filter,
	155	int flags,
	156	wxWindow* parent,
	157	int x,
	158	int y)
	159
	160	{
	161	wxFileDialog fileDialog(parent, title ? title : wxT(""), defaultDir ? defaultDir : wxT(""),
	162	defaultFileName ? defaultFileName : wxT(""), filter ? filter : wxT(""), flags, wxPoint(x, y));
	163
	164	if ( fileDialog.ShowModal() == wxID_OK )
	165	{
	166	*defaultFilterIndex = fileDialog.GetFilterIndex();
	167	wxStrcpy(wxBuffer, (const wxChar *)fileDialog.GetPath());
	168	return wxBuffer;
	169	}
	170	else
	171	return wxGetEmptyString();
	172	}
	173
	174	wxFileDialog::wxFileDialog(wxWindow *parent, const wxString& message,
	175	const wxString& defaultDir, const wxString& defaultFileName, const wxString& wildCard,
	176	long style, const wxPoint& pos)
	177	{
	178	m_message = message;
	179	m_dialogStyle = style;
	180	if ( ( m_dialogStyle & wxMULTIPLE ) && ( m_dialogStyle & wxSAVE ) )
	181	m_dialogStyle &= ~wxMULTIPLE;
	182	m_parent = parent;
	183	m_path = wxT("");
	184	m_fileName = defaultFileName;
	185	m_dir = defaultDir;
	186	m_wildCard = wildCard;
	187	m_filterIndex = 0;
	188	}
	189
	190	void wxFileDialog::GetPaths(wxArrayString& paths) const
	191	{
	192	paths.Empty();
	193
	194	wxString dir(m_dir);
	195	if ( m_dir.Last() != _T('\\') )
	196	dir += _T('\\');
	197
	198	size_t count = m_fileNames.GetCount();
	199	for ( size_t n = 0; n < count; n++ )
	200	{
	201	paths.Add(dir + m_fileNames[n]);
	202	}
	203	}
	204
	205	int wxFileDialog::ShowModal()
	206	{
	207	HWND hWnd = 0;
	208	if (m_parent) hWnd = (HWND) m_parent->GetHWND();
	209
	210	static wxChar fileNameBuffer [ MAXPATH ]; // the file-name
	211	wxChar titleBuffer [ MAXFILE+1+MAXEXT ]; // the file-name, without path
	212
	213	*fileNameBuffer = wxT('\0');
	214	*titleBuffer = wxT('\0');
	215
	216	long msw_flags = 0;
	217	if ( (m_dialogStyle & wxHIDE_READONLY) \|\| (m_dialogStyle & wxSAVE) )
	218	msw_flags \|= OFN_HIDEREADONLY;
	219	if ( m_dialogStyle & wxFILE_MUST_EXIST )
	220	msw_flags \|= OFN_PATHMUSTEXIST \| OFN_FILEMUSTEXIST;
	221	if (m_dialogStyle & wxMULTIPLE )
	222	msw_flags \|=
	223	#if defined(OFN_EXPLORER)
	224	OFN_EXPLORER \|
	225	#endif // OFN_EXPLORER
	226	OFN_ALLOWMULTISELECT;
	227
	228	OPENFILENAME of;
	229	memset(&of, 0, sizeof(OPENFILENAME));
	230
	231	of.lpstrCustomFilter = NULL; // system should not save custom filter
	232	of.nMaxCustFilter = 0L;
	233
	234	of.nFileOffset = 0; // 0-based pointer to filname in lpstFile
	235	of.nFileExtension = 0; // 0-based pointer to extension in lpstrFile
	236	of.lpstrDefExt = NULL; // no default extension
	237
	238	of.lStructSize = sizeof(OPENFILENAME);
	239	of.hwndOwner = hWnd;
	240	of.lpstrTitle = WXSTRINGCAST m_message;
	241
	242
	243	of.lpstrFileTitle = titleBuffer;
	244	of.nMaxFileTitle = MAXFILE + 1 + MAXEXT; // Windows 3.0 and 3.1
	245
	246	// Convert forward slashes to backslashes (file selector doesn't like
	247	// forward slashes)
	248	size_t i = 0;
	249	size_t len = m_dir.Length();
	250	for (i = 0; i < len; i++)
	251	if (m_dir[i] == wxT('/'))
	252	m_dir[i] = wxT('\\');
	253
	254	of.lpstrInitialDir = m_dir.c_str();
	255
	256	of.Flags = msw_flags;
	257
	258
	259	//=== Like Alejandro Sierra's wildcard modification >>===================
	260	/*
	261	In wxFileSelector you can put, instead of a single wild_card,
	262	pairs of strings separated by '\|'.
	263	The first string is a description, and the
	264	second is the wild card. You can put any number of pairs.
	265
	266	eg. "description1 (.ex1)\|.ex1\|description2 (.ex2)\|.ex2"
	267
	268	If you put a single wild card, it works as before the modification.
	269	*/
	270	//=======================================================================
	271
	272	wxString theFilter;
	273	if ( wxStrlen(m_wildCard) == 0 )
	274	theFilter = wxString(wxT("."));
	275	else
	276	theFilter = m_wildCard ;
	277	wxString filterBuffer;
	278
	279	if ( !wxStrchr( theFilter, wxT('\|') ) ) { // only one filter ==> default text
	280	filterBuffer.Printf(_("Files (%s)\|%s"),
	281	theFilter.c_str(), theFilter.c_str());
	282	}
	283	else { // more then one filter
	284	filterBuffer = theFilter;
	285
	286	}
	287
	288	filterBuffer += wxT("\|");
	289	// Replace \| with \0
	290	for (i = 0; i < filterBuffer.Len(); i++ ) {
	291	if ( filterBuffer.GetChar(i) == wxT('\|') ) {
	292	filterBuffer[i] = wxT('\0');
	293	}
	294	}
	295
	296	of.lpstrFilter = (LPTSTR)(const wxChar *)filterBuffer;
	297	of.nFilterIndex = m_filterIndex + 1;
	298
	299	//=== Setting defaultFileName >>=========================================
	300
	301	wxStrncpy( fileNameBuffer, (const wxChar *)m_fileName, MAXPATH-1 );
	302	fileNameBuffer[ MAXPATH-1 ] = wxT('\0');
	303
	304	of.lpstrFile = fileNameBuffer; // holds returned filename
	305	of.nMaxFile = MAXPATH;
	306
	307	//== Execute FileDialog >>=================================================
	308
	309	bool success = (m_dialogStyle & wxSAVE) ? (GetSaveFileName(&of) != 0)
	310	: (GetOpenFileName(&of) != 0);
	311
	312	if ( success )
	313	{
	314	m_fileNames.Empty();
	315
	316	if ( ( m_dialogStyle & wxMULTIPLE ) &&
	317	#if defined(OFN_EXPLORER)
	318	( fileNameBuffer[of.nFileOffset-1] == wxT('\0') ) )
	319	#else
	320	( fileNameBuffer[of.nFileOffset-1] == wxT(' ') ) )
	321	#endif // OFN_EXPLORER
	322	{
	323	#if defined(OFN_EXPLORER)
	324	m_dir = fileNameBuffer;
	325	i = of.nFileOffset;
	326	m_fileName = &fileNameBuffer[i];
	327	m_fileNames.Add(m_fileName);
	328	i += m_fileName.Len() + 1;
	329
	330	while (fileNameBuffer[i] != wxT('\0'))
	331	{
	332	m_fileNames.Add(&fileNameBuffer[i]);
	333	i += wxStrlen(&fileNameBuffer[i]) + 1;
	334	}
	335	#else
	336	wxStringTokenizer toke(fileNameBuffer, " \t\r\n");
	337	m_dir = toke.GetNextToken();
	338	m_fileName = toke.GetNextToken();
	339	m_fileNames.Add(m_fileName);
	340
	341	while (toke.HasMoreTokens())
	342	m_fileNames.Add(toke.GetNextToken());
	343	#endif // OFN_EXPLORER
	344
	345	wxString dir(m_dir);
	346	if ( m_dir.Last() != _T('\\') )
	347	dir += _T('\\');
	348
	349	m_fileNames.Sort();
	350	m_path = dir + m_fileName;
	351	}
	352	else
	353	{
	354	const wxChar* extension = NULL;
	355
	356	//=== Adding the correct extension >>=================================
	357
	358	m_filterIndex = (int)of.nFilterIndex - 1;
	359
	360	if ( !of.nFileExtension \|\| (of.nFileExtension && fileNameBuffer[ of.nFileExtension-1] != wxT('.')) )
	361	{ // user has typed an filename
	362	// without an extension:
	363
	364	int maxFilter = (int)(of.nFilterIndex*2L-1L);
	365	extension = filterBuffer;
	366
	367	for( int i = 0; i < maxFilter; i++ ) { // get extension
	368	extension = extension + wxStrlen( extension ) +1;
	369	}
	370
	371	extension = wxStrrchr( extension, wxT('.') );
	372	if ( extension // != "blabla"
	373	&& !wxStrrchr( extension, wxT('') ) // != "blabla."
	374	&& !wxStrrchr( extension, wxT('?') ) // != "blabla.?"
	375	&& extension[1] // != "blabla."
	376	&& extension[1] != wxT(' ') ) // != "blabla. "
	377	{
	378	// now concat extension to the fileName:
	379	m_fileName = wxString(fileNameBuffer) + extension;
	380
	381	int len = wxStrlen( fileNameBuffer );
	382	wxStrncpy( fileNameBuffer + len, extension, MAXPATH - len );
	383	fileNameBuffer[ MAXPATH -1 ] = wxT('\0');
	384	}
	385	}
	386
	387	m_path = fileNameBuffer;
	388	m_fileName = wxFileNameFromPath(fileNameBuffer);
	389	m_fileNames.Add(m_fileName);
	390	m_dir = wxPathOnly(fileNameBuffer);
	391	}
	392
	393
	394	//=== Simulating the wxOVERWRITE_PROMPT >>============================
	395
	396	if ( (m_dialogStyle & wxOVERWRITE_PROMPT) &&
	397	::wxFileExists( fileNameBuffer ) )
	398	{
	399	wxString messageText;
	400	messageText.Printf(_("Replace file '%s'?"), fileNameBuffer);
	401
	402	if ( wxMessageBox(messageText, m_message, wxYES_NO ) != wxYES )
	403	{
	404	success = FALSE;
	405	}
	406	}
	407
	408	}
	409	else
	410	{
	411	// common dialog failed - why?
	412	#ifdef __WXDEBUG__
	413	DWORD dwErr = CommDlgExtendedError();
	414	if ( dwErr != 0 )
	415	{
	416	// this msg is only for developers
	417	wxLogError(wxT("Common dialog failed with error code %0lx."),
	418	dwErr);
	419	}
	420	//else: it was just cancelled
	421	#endif
	422	}
	423
	424	return success ? wxID_OK : wxID_CANCEL;
	425
	426	}
	427
	428	// Generic file load/save dialog (for internal use only)
	429	static
	430	wxString wxDefaultFileSelector(bool load,
	431	const wxChar *what,
	432	const wxChar *extension,
	433	const wxChar *default_name,
	434	wxWindow *parent)
	435	{
	436	wxString prompt;
	437	wxString str;
	438	if (load) str = _("Load %s file");
	439	else str = _("Save %s file");
	440	prompt.Printf(str, what);
	441
	442	const wxChar *ext = extension;
	443	if (*ext == wxT('.'))
	444	ext++;
	445
	446	wxString wild;
	447	wild.Printf(wxT("*.%s"), ext);
	448
	449	return wxFileSelector (prompt, NULL, default_name, ext, wild, 0, parent);
	450	}
	451
	452	// Generic file load dialog
	453	WXDLLEXPORT wxString wxLoadFileSelector(const wxChar *what,
	454	const wxChar *extension,
	455	const wxChar *default_name,
	456	wxWindow *parent)
	457	{
	458	return wxDefaultFileSelector(TRUE, what, extension, default_name, parent);
	459	}
	460
	461	// Generic file save dialog
	462	WXDLLEXPORT wxString wxSaveFileSelector(const wxChar *what,
	463	const wxChar *extension,
	464	const wxChar *default_name,
	465	wxWindow *parent)
	466	{
	467	return wxDefaultFileSelector(FALSE, what, extension, default_name, parent);
	468	}
	469
	470