]> git.saurik.com Git - wxWidgets.git/blob - src/os2/filedlg.cpp
New eventb based Drag interface for wxDataViewCtrl
[wxWidgets.git] / src / os2 / filedlg.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/os2/filedlg.cpp
3 // Purpose: wxFileDialog
4 // Author: David Webster
5 // Modified by:
6 // Created: 10/05/99
7 // RCS-ID: $Id$
8 // Copyright: (c) David Webster
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_FILEDLG
20
21 #include "wx/filedlg.h"
22
23 #ifndef WX_PRECOMP
24 #include "wx/utils.h"
25 #include "wx/msgdlg.h"
26 #include "wx/intl.h"
27 #include "wx/log.h"
28 #include "wx/app.h"
29 #include "wx/math.h"
30 #endif
31
32 #define INCL_PM
33 #include <os2.h>
34
35 #include "wx/os2/private.h"
36
37 #include <stdlib.h>
38 #include <string.h>
39
40 #include "wx/tokenzr.h"
41
42 #define wxMAXPATH 1024
43 #define wxMAXFILE 1024
44 #define wxMAXEXT 5
45
46 #ifndef MAXPATH
47 # define MAXPATH 400
48 #endif
49
50 #ifndef MAXDRIVE
51 # define MAXDRIVE 3
52 #endif
53
54 #ifndef MAXFILE
55 # define MAXFILE 9
56 #endif
57
58 #ifndef MAXEXT
59 # define MAXEXT 5
60 #endif
61
62 IMPLEMENT_CLASS(wxFileDialog, wxFileDialogBase)
63
64 // ----------------------------------------------------------------------------
65 // CLASS wxFileDialog
66 // ----------------------------------------------------------------------------
67
68 wxFileDialog::wxFileDialog (
69 wxWindow* pParent
70 , const wxString& rsMessage
71 , const wxString& rsDefaultDir
72 , const wxString& rsDefaultFileName
73 , const wxString& rsWildCard
74 , long lStyle
75 , const wxPoint& rPos,
76 const wxSize& sz,
77 const wxString& name
78 )
79 :wxFileDialogBase(pParent, rsMessage, rsDefaultDir, rsDefaultFileName, rsWildCard, lStyle, rPos, sz, name)
80
81 {
82 // NB: all style checks are done by wxFileDialogBase::Create
83
84 m_filterIndex = 1;
85 } // end of wxFileDialog::wxFileDialog
86
87 void wxFileDialog::GetPaths (
88 wxArrayString& rasPaths
89 ) const
90 {
91 wxString sDir(m_dir);
92 size_t nCount = m_fileNames.GetCount();
93
94 rasPaths.Empty();
95 if (m_dir.Last() != _T('\\'))
96 sDir += _T('\\');
97
98 for ( size_t n = 0; n < nCount; n++ )
99 {
100 rasPaths.Add(sDir + m_fileNames[n]);
101 }
102 } // end of wxFileDialog::GetPaths
103
104 int wxFileDialog::ShowModal()
105 {
106 wxString sTheFilter;
107 wxString sFilterBuffer;
108 wxChar* pzFilterBuffer;
109 static wxChar zFileNameBuffer[wxMAXPATH]; // the file-name
110 HWND hWnd = 0;
111 wxChar zTitleBuffer[wxMAXFILE + 1 + wxMAXEXT]; // the file-name, without path
112 wxString sDir;
113 size_t i;
114 size_t nLen = m_dir.length();
115 int nCount = 0;
116 FILEDLG vFileDlg;
117 ULONG lFlags = 0L;
118
119 memset(&vFileDlg, '\0', sizeof(FILEDLG));
120 if (m_parent)
121 hWnd = (HWND) m_parent->GetHWND();
122 if (!hWnd && wxTheApp->GetTopWindow())
123 hWnd = (HWND) wxTheApp->GetTopWindow()->GetHWND();
124
125
126 *zFileNameBuffer = wxT('\0');
127 *zTitleBuffer = wxT('\0');
128
129 if (m_windowStyle & wxFD_SAVE)
130 lFlags = FDS_SAVEAS_DIALOG;
131 else
132 lFlags = FDS_OPEN_DIALOG;
133
134 if (m_windowStyle & wxFD_SAVE)
135 lFlags |= FDS_SAVEAS_DIALOG;
136 if (m_windowStyle & wxFD_MULTIPLE)
137 lFlags |= FDS_OPEN_DIALOG | FDS_MULTIPLESEL;
138
139 vFileDlg.cbSize = sizeof(FILEDLG);
140 vFileDlg.fl = lFlags;
141 vFileDlg.pszTitle = (PSZ)zTitleBuffer;
142
143 //
144 // Convert forward slashes to backslashes (file selector doesn't like
145 // forward slashes) and also squeeze multiple consecutive slashes into one
146 // as it doesn't like two backslashes in a row neither
147 //
148 sDir.reserve(nLen);
149 for ( i = 0; i < nLen; i++ )
150 {
151 wxChar ch = m_dir[i];
152
153 switch (ch)
154 {
155 case _T('/'):
156 //
157 // Convert to backslash
158 //
159 ch = _T('\\');
160
161 //
162 // Fall through
163 //
164 case _T('\\'):
165 while (i < nLen - 1)
166 {
167 wxChar chNext = m_dir[i + 1];
168
169 if (chNext != _T('\\') && chNext != _T('/'))
170 break;
171
172 //
173 // Ignore the next one, unless it is at the start of a UNC path
174 //
175 if (i > 0)
176 i++;
177 else
178 break;
179 }
180
181 //
182 // Fall through
183 //
184
185 default:
186 //
187 // Normal char
188 sDir += ch;
189 }
190 }
191 if ( wxStrlen(m_wildCard) == 0 )
192 sTheFilter = wxEmptyString;
193 else
194 sTheFilter = m_wildCard;
195
196 wxStrtok(sTheFilter.wchar_str(), wxT("|"), &pzFilterBuffer);
197 while(pzFilterBuffer != NULL)
198 {
199 if (nCount > 0 && !(nCount % 2))
200 sDir += wxT(";");
201 if (nCount % 2)
202 {
203 sDir += pzFilterBuffer;
204 }
205 wxStrtok(NULL, wxT("|"), &pzFilterBuffer);
206 nCount++;
207 }
208 if (nCount == 0)
209 sDir += m_fileName;
210 if (sDir.empty())
211 sDir = wxT("*.*");
212 wxStrcpy((wxChar*)vFileDlg.szFullFile, sDir);
213 sFilterBuffer = sDir;
214
215 hWnd = ::WinFileDlg( HWND_DESKTOP
216 ,GetHwndOf(m_parent)
217 ,&vFileDlg
218 );
219 if (hWnd && vFileDlg.lReturn == DID_OK)
220 {
221 m_fileNames.Empty();
222 if ((m_windowStyle & wxFD_MULTIPLE ) && vFileDlg.ulFQFCount > 1)
223 {
224 for (int i = 0; i < (int)vFileDlg.ulFQFCount; i++)
225 {
226 if (i == 0)
227 {
228 m_dir = wxPathOnly(wxString((const wxChar*)*vFileDlg.papszFQFilename[0]));
229 m_path = (const wxChar*)*vFileDlg.papszFQFilename[0];
230 }
231 m_fileName = wxFileNameFromPath(wxString((const wxChar*)*vFileDlg.papszFQFilename[i]));
232 m_fileNames.Add(m_fileName);
233 }
234 ::WinFreeFileDlgList(vFileDlg.papszFQFilename);
235 }
236 else if (!(m_windowStyle & wxFD_SAVE))
237 {
238 m_path = (wxChar*)vFileDlg.szFullFile;
239 m_fileName = wxFileNameFromPath(wxString((const wxChar*)vFileDlg.szFullFile));
240 m_dir = wxPathOnly((const wxChar*)vFileDlg.szFullFile);
241 }
242 else // save file
243 {
244 const wxChar* pzExtension = NULL;
245
246 wxStrcpy(zFileNameBuffer, (const wxChar*)vFileDlg.szFullFile);
247
248 int nIdx = wxStrlen(zFileNameBuffer) - 1;
249 wxString sExt;
250
251 wxFileName::SplitPath( zFileNameBuffer
252 ,&m_path
253 ,&m_fileName
254 ,&sExt
255 );
256 if (zFileNameBuffer[nIdx] == wxT('.') || sExt.empty())
257 {
258 zFileNameBuffer[nIdx] = wxT('\0');
259
260 //
261 // User has typed a filename without an extension:
262 //
263 // A filename can end in a "." here ("abc."), this means it
264 // does not have an extension. Because later on a "." with
265 // the default extension is appended we remove the "." if
266 // filename ends with one (We don't want files called
267 // "abc..ext")
268 //
269 pzExtension = sFilterBuffer.c_str();
270
271 for( int i = 0; i < (int)sFilterBuffer.length(); i++ )
272 {
273 //
274 // Get extension
275 //
276 pzExtension = wxStrrchr(pzExtension, wxT('.'));
277 if ( pzExtension &&
278 !wxStrrchr(pzExtension, wxT('*')) &&
279 !wxStrrchr(pzExtension, wxT('?')) &&
280 pzExtension[1] &&
281 pzExtension[1] != wxT(' ')
282 ) // != "blabla. "
283 {
284 //
285 // Now concat extension to the fileName:
286 //
287 m_path = wxString(zFileNameBuffer) + pzExtension;
288 }
289 }
290 }
291 else
292 {
293 m_path = (wxChar*)vFileDlg.szFullFile;
294 }
295 m_fileName = wxFileNameFromPath((const wxChar*)vFileDlg.szFullFile);
296 m_dir = wxPathOnly((const wxChar*)vFileDlg.szFullFile);
297
298 //
299 // === Simulating the wxFD_OVERWRITE_PROMPT >>============================
300 //
301 if ((m_windowStyle & wxFD_OVERWRITE_PROMPT) &&
302 (m_windowStyle & wxFD_SAVE) &&
303 (wxFileExists(m_path.c_str())))
304 {
305 wxString sMessageText;
306
307 sMessageText.Printf( _("File '%s' already exists.\nDo you want to replace it?")
308 ,m_path.c_str()
309 );
310 if (wxMessageBox( sMessageText
311 ,wxT("Save File As")
312 ,wxYES_NO | wxICON_EXCLAMATION
313 ) != wxYES)
314 {
315 return wxID_CANCEL;
316 }
317 }
318 }
319 return wxID_OK;
320 }
321 return wxID_CANCEL;
322 } // end of wxFileDialog::ShowModal
323
324 #endif // wxUSE_FILEDLG