Sorry, I went and removed consts as per the style guide :-)
[wxWidgets.git] / src / msw / filedlg.cpp
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
19 #ifdef __BORLANDC__
20 #pragma hdrstop
21 #endif
22
23 #ifndef WX_PRECOMP
24 #include <stdio.h>
25 #include "wx/defs.h"
26 #include "wx/utils.h"
27 #include "wx/dialog.h"
28 #include "wx/filedlg.h"
29 #endif
30
31 #include <windows.h>
32
33 #ifndef __WIN32__
34 #include <commdlg.h>
35 #endif
36
37 #include "wx/msw/private.h"
38
39 #include <math.h>
40 #include <stdlib.h>
41 #include <string.h>
42
43 #define wxDIALOG_DEFAULT_X 300
44 #define wxDIALOG_DEFAULT_Y 300
45
46 #if !USE_SHARED_LIBRARY
47 IMPLEMENT_CLASS(wxFileDialog, wxDialog)
48 #endif
49
50 char *wxFileSelector(const char *title,
51 const char *defaultDir, const char *defaultFileName,
52 const char *defaultExtension, const char *filter, int flags,
53 wxWindow *parent, int x, int y)
54 {
55 // In the original implementation, defaultExtension is passed to the lpstrDefExt member
56 // of OPENFILENAME. This extension, if non-NULL, is appended to the filename if the user
57 // fails to type an extension.
58 // The new implementation (taken from wxFileSelectorEx) appends the extension automatically,
59 // by looking at the filter specification. In fact this should be better than the
60 // native Microsoft implementation because Windows only allows *one* default extension,
61 // whereas here we do the right thing depending on the filter the user has chosen.
62
63 // If there's a default extension specified but no filter, we create a suitable
64 // filter.
65
66 wxString filter2("");
67 if ( defaultExtension && !filter )
68 filter2 = wxString("*.") + wxString(defaultExtension) ;
69 else if ( filter )
70 filter2 = filter;
71
72 wxString defaultDirString;
73 if (defaultDir)
74 defaultDirString = defaultDir;
75 else
76 defaultDirString = "";
77
78 wxString defaultFilenameString;
79 if (defaultFileName)
80 defaultFilenameString = defaultFileName;
81 else
82 defaultFilenameString = "";
83
84 wxFileDialog fileDialog(parent, title, defaultDirString, defaultFilenameString, filter2, flags, wxPoint(x, y));
85
86 if ( fileDialog.ShowModal() == wxID_OK )
87 {
88 strcpy(wxBuffer, (const char *)fileDialog.GetPath());
89 return wxBuffer;
90 }
91 else
92 return NULL;
93 }
94
95 # if __BORLANDC__
96 # include <dir.h> // for MAXPATH etc. ( Borland 3.1 )
97 # endif
98
99 # ifndef MAXPATH
100 # define MAXPATH 400
101 # endif
102
103 # ifndef MAXDRIVE
104 # define MAXDRIVE 3
105 # endif
106
107 # ifndef MAXFILE
108 # define MAXFILE 9
109 # endif
110
111 # ifndef MAXEXT
112 # define MAXEXT 5
113 # endif
114
115
116 char *wxFileSelectorEx( const char *title,
117 const char *defaultDir,
118 const char *defaultFileName,
119 int* defaultFilterIndex,
120 const char *filter,
121 int flags,
122 wxWindow* parent,
123 int x,
124 int y)
125
126 {
127 wxFileDialog fileDialog(parent, title ? title : "", defaultDir ? defaultDir : "",
128 defaultFileName ? defaultFileName : "", filter ? filter : "", flags, wxPoint(x, y));
129
130 if ( fileDialog.ShowModal() == wxID_OK )
131 {
132 *defaultFilterIndex = fileDialog.GetFilterIndex();
133 strcpy(wxBuffer, (const char *)fileDialog.GetPath());
134 return wxBuffer;
135 }
136 else
137 return NULL;
138 }
139
140 wxFileDialog::wxFileDialog(wxWindow *parent, const wxString& message,
141 const wxString& defaultDir, const wxString& defaultFileName, const wxString& wildCard,
142 long style, const wxPoint& pos)
143 {
144 m_message = message;
145 m_dialogStyle = style;
146 m_parent = parent;
147 m_path = "";
148 m_fileName = defaultFileName;
149 m_dir = defaultDir;
150 m_wildCard = wildCard;
151 m_filterIndex = 1;
152 }
153
154 int wxFileDialog::ShowModal(void)
155 {
156 HWND hWnd = 0;
157 if (m_parent) hWnd = (HWND) m_parent->GetHWND();
158
159 static char fileNameBuffer [ MAXPATH ]; // the file-name
160 char titleBuffer [ MAXFILE+1+MAXEXT ]; // the file-name, without path
161
162 *fileNameBuffer = '\0';
163 *titleBuffer = '\0';
164
165 char* filterBuffer = NULL;
166 char* extension = NULL;
167 char* theFilter = (char *)(const char *)m_wildCard;
168
169 long msw_flags = 0;
170 if ( (m_dialogStyle & wxHIDE_READONLY) || (m_dialogStyle & wxSAVE) ) { msw_flags |= OFN_HIDEREADONLY; }
171
172
173 OPENFILENAME of;
174 memset(&of, 0, sizeof(OPENFILENAME));
175
176 of.lpstrCustomFilter = NULL; // system should not save custom filter
177 of.nMaxCustFilter = 0L;
178
179 of.nFileOffset = 0; // 0-based pointer to filname in lpstFile
180 of.nFileExtension = 0; // 0-based pointer to extension in lpstrFile
181 of.lpstrDefExt = NULL; // no default extension
182
183 of.lStructSize = sizeof(OPENFILENAME);
184 of.hwndOwner = hWnd;
185 of.lpstrTitle = (char *)(const char *)m_message;
186
187
188 of.lpstrFileTitle = titleBuffer;
189 of.nMaxFileTitle = MAXFILE + 1 + MAXEXT; // Windows 3.0 and 3.1
190
191 of.lpstrInitialDir = (const char *) m_dir;
192
193 of.Flags = msw_flags;
194
195
196
197 //=== Like Alejandro Sierra's wildcard modification >>===================
198 /*
199 In wxFileSelector you can put, instead of a single wild_card,
200 pairs of strings separated by '|'.
201 The first string is a description, and the
202 second is the wild card. You can put any number of pairs.
203
204 eg. "description1 (*.ex1)|*.ex1|description2 (*.ex2)|*.ex2"
205
206 If you put a single wild card, it works as before the modification.
207 */
208 //=======================================================================
209
210 if ( !theFilter || (strcmp(theFilter, "") == 0)) theFilter = "*.*";
211
212 int filterBufferLen = 0;
213
214 if ( !strchr( theFilter, '|' ) ) { // only one filter ==> default text:
215 char buffText[] = "Files (%s)|%s";
216 filterBufferLen = strlen( theFilter )*2 + strlen( buffText ) -4;
217 filterBuffer = new char[ filterBufferLen +2 ];
218
219 if ( filterBuffer ) {
220 sprintf( filterBuffer, buffText, theFilter, theFilter );
221 }
222 }
223 else { // more then one filter
224 filterBufferLen = strlen( theFilter );
225 filterBuffer = new char[ filterBufferLen +2 ];
226
227 if ( filterBuffer ) {
228 strcpy( filterBuffer, theFilter );
229 }
230 }
231
232 if ( filterBuffer ) { // Substituting '|' with '\0'
233 for ( int i = 0; i < filterBufferLen; i++ ) {
234 if ( filterBuffer[i] == '|' ) { filterBuffer[i] = '\0'; }
235 }
236 }
237
238 filterBuffer[filterBufferLen+1] = '\0';
239
240 of.lpstrFilter = (LPSTR)filterBuffer;
241 of.nFilterIndex = m_filterIndex;
242
243 //=== Setting defaultFileName >>=========================================
244
245 strncpy( fileNameBuffer, (const char *)m_fileName, MAXPATH-1 );
246 fileNameBuffer[ MAXPATH-1 ] = '\0';
247
248 of.lpstrFile = fileNameBuffer; // holds returned filename
249 of.nMaxFile = MAXPATH;
250
251 //== Execute FileDialog >>=================================================
252
253 bool success = (m_dialogStyle & wxSAVE) ? (GetSaveFileName(&of) != 0) : (GetOpenFileName(&of) != 0);
254
255 if ( success )
256 {
257 //=== Adding the correct extension >>=================================
258
259 m_filterIndex = (int)of.nFilterIndex;
260
261 if ( of.nFileExtension && fileNameBuffer[ of.nFileExtension-1] != '.' )
262 { // user has typed an filename
263 // without an extension:
264
265 int maxFilter = (int)(of.nFilterIndex*2L-1L);
266 extension = filterBuffer;
267
268 for( int i = 0; i < maxFilter; i++ ) { // get extension
269 extension = extension + strlen( extension ) +1;
270 }
271
272 if ( (extension = strrchr( extension, '.' )) // != "blabla"
273 && !strrchr( extension, '*' ) // != "blabla.*"
274 && !strrchr( extension, '?' ) // != "blabla.?"
275 && extension[1] // != "blabla."
276 && extension[1] != ' ' ) // != "blabla. "
277 {
278 // now concat extension to the fileName:
279 m_fileName = wxString(fileNameBuffer) + wxString(extension);
280
281 int len = strlen( fileNameBuffer );
282 strncpy( fileNameBuffer + len, extension, MAXPATH - len );
283 fileNameBuffer[ MAXPATH -1 ] = '\0';
284 }
285 }
286
287 m_path = fileNameBuffer;
288 m_fileName = wxFileNameFromPath(fileNameBuffer);
289
290
291 //=== Simulating the wxOVERWRITE_PROMPT >>============================
292
293 if ( (m_dialogStyle & wxOVERWRITE_PROMPT) && ::wxFileExists( fileNameBuffer ) )
294 {
295 char questionText[] = "Replace file\n%s?";
296 char* messageText = new char[strlen(questionText)+strlen(fileNameBuffer)-1];
297 sprintf( messageText, questionText, fileNameBuffer );
298
299 if ( messageText && ( wxMessageBox( (const char *)messageText, m_message, wxYES_NO ) != wxYES ) )
300 {
301 success = FALSE;
302 }
303
304 delete[] messageText;
305 }
306
307 } // END: if ( success )
308
309
310 delete[] filterBuffer;
311
312 return (success ? wxID_OK : wxID_CANCEL) ;
313
314 }
315
316 #define wxDIALOG_DEFAULT_X 300
317 #define wxDIALOG_DEFAULT_Y 300
318
319 // Generic file load/save dialog
320 // static inline char * // HP compiler complains
321 static char *
322 wxDefaultFileSelector(bool load, const char *what, const char *extension, const char *default_name, wxWindow *parent)
323 {
324 char *ext = (char *)extension;
325
326 char prompt[50];
327 wxString str;
328 if (load)
329 str = (const char*) wxTString("Load %s file");
330 else
331 str = (const char*) wxTString("Save %s file");
332 sprintf(prompt, str, what);
333
334 if (*ext == '.') ext++;
335 char wild[60];
336 sprintf(wild, "*.%s", ext);
337
338 return wxFileSelector (prompt, NULL, default_name, ext, wild, 0, parent);
339 }
340
341 // Generic file load dialog
342 char *
343 wxLoadFileSelector(const char *what, const char *extension, const char *default_name, wxWindow *parent)
344 {
345 return wxDefaultFileSelector(TRUE, what, extension, default_name, parent);
346 }
347
348
349 // Generic file save dialog
350 char *
351 wxSaveFileSelector(const char *what, const char *extension, const char *default_name, wxWindow *parent)
352 {
353 return wxDefaultFileSelector(FALSE, what, extension, default_name, parent);
354 }
355
356