| 1 | ///////////////////////////////////////////////////////////////////////////// |
| 2 | // Name: 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 | #ifndef WX_PRECOMP |
| 20 | #include "wx/utils.h" |
| 21 | #include "wx/msgdlg.h" |
| 22 | #include "wx/dialog.h" |
| 23 | #include "wx/filedlg.h" |
| 24 | #include "wx/intl.h" |
| 25 | #include "wx/log.h" |
| 26 | #include "wx/app.h" |
| 27 | #endif |
| 28 | |
| 29 | #define INCL_PM |
| 30 | #include <os2.h> |
| 31 | |
| 32 | #include "wx/os2/private.h" |
| 33 | |
| 34 | #include <math.h> |
| 35 | #include <stdlib.h> |
| 36 | #include <string.h> |
| 37 | |
| 38 | #include "wx/tokenzr.h" |
| 39 | |
| 40 | #define wxMAXPATH 1024 |
| 41 | #define wxMAXFILE 1024 |
| 42 | #define wxMAXEXT 5 |
| 43 | |
| 44 | #ifndef MAXPATH |
| 45 | # define MAXPATH 400 |
| 46 | #endif |
| 47 | |
| 48 | #ifndef MAXDRIVE |
| 49 | # define MAXDRIVE 3 |
| 50 | #endif |
| 51 | |
| 52 | #ifndef MAXFILE |
| 53 | # define MAXFILE 9 |
| 54 | #endif |
| 55 | |
| 56 | #ifndef MAXEXT |
| 57 | # define MAXEXT 5 |
| 58 | #endif |
| 59 | IMPLEMENT_CLASS(wxFileDialog, wxDialog) |
| 60 | |
| 61 | // ---------------------------------------------------------------------------- |
| 62 | // global functions |
| 63 | // ---------------------------------------------------------------------------- |
| 64 | |
| 65 | wxString wxFileSelector( |
| 66 | const char* pzTitle |
| 67 | , const char* pzDefaultDir |
| 68 | , const char* pzDefaultFileName |
| 69 | , const char* pzDefaultExtension |
| 70 | , const char* pzFilter |
| 71 | , int nFlags |
| 72 | , wxWindow* pParent |
| 73 | , int nX |
| 74 | , int nY |
| 75 | ) |
| 76 | { |
| 77 | wxString sFilter(""); |
| 78 | wxString sDefaultDirString; |
| 79 | wxString sDefaultFilenameString; |
| 80 | |
| 81 | // |
| 82 | // If there's a default extension specified but no filter, we create |
| 83 | // a suitable filter. |
| 84 | // |
| 85 | if (pzDefaultExtension && !pzFilter) |
| 86 | sFilter = wxString("*.") + wxString(pzDefaultExtension); |
| 87 | else if (pzFilter) |
| 88 | sFilter = pzFilter; |
| 89 | |
| 90 | if (pzDefaultDir) |
| 91 | sDefaultDirString = pzDefaultDir; |
| 92 | else |
| 93 | sDefaultDirString = ""; |
| 94 | |
| 95 | if (pzDefaultFileName) |
| 96 | sDefaultFilenameString = pzDefaultFileName; |
| 97 | else |
| 98 | sDefaultFilenameString = ""; |
| 99 | |
| 100 | wxFileDialog vFileDialog( pParent |
| 101 | ,pzTitle |
| 102 | ,sDefaultDirString |
| 103 | ,sDefaultFilenameString |
| 104 | ,sFilter |
| 105 | ,nFlags |
| 106 | ,wxPoint(nX, nY) |
| 107 | ); |
| 108 | |
| 109 | if (wxStrlen(pzDefaultExtension) != 0) |
| 110 | { |
| 111 | int nFilterFind = 0; |
| 112 | int nFilterIndex = 0; |
| 113 | |
| 114 | for (unsigned int i = 0; i < sFilter.Len(); i++) |
| 115 | { |
| 116 | if (sFilter.GetChar(i) == wxT('|')) |
| 117 | { |
| 118 | // |
| 119 | // Save the start index of the new filter |
| 120 | unsigned int uIs = i++; |
| 121 | |
| 122 | // |
| 123 | // Find the end of the filter |
| 124 | // |
| 125 | for(; i < sFilter.Len(); i++) |
| 126 | { |
| 127 | if(sFilter[i] == wxT('|')) |
| 128 | break; |
| 129 | } |
| 130 | |
| 131 | if( i - uIs - 1 > 0 && uIs + 1 < sFilter.Len() ) |
| 132 | { |
| 133 | if(sFilter.Mid(uIs + 1, i - uIs - 1).Contains(pzDefaultExtension)) |
| 134 | { |
| 135 | nFilterFind = nFilterIndex; |
| 136 | break; |
| 137 | } |
| 138 | } |
| 139 | nFilterIndex++; |
| 140 | } |
| 141 | } |
| 142 | vFileDialog.SetFilterIndex(nFilterFind); |
| 143 | } |
| 144 | if (vFileDialog.ShowModal() == wxID_OK) |
| 145 | { |
| 146 | return vFileDialog.GetPath(); |
| 147 | } |
| 148 | else |
| 149 | return wxEmptyString; |
| 150 | } // end of wxFileSelector |
| 151 | |
| 152 | wxString wxFileSelectorEx ( |
| 153 | const char* pzTitle |
| 154 | , const char* pzDefaultDir |
| 155 | , const char* pzDefaultFileName |
| 156 | , int* pnDefaultFilterIndex |
| 157 | , const char* pzFilter |
| 158 | , int nFlags |
| 159 | , wxWindow* pParent |
| 160 | , int nX |
| 161 | , int nY |
| 162 | ) |
| 163 | { |
| 164 | wxFileDialog vFileDialog( pParent |
| 165 | ,pzTitle ? pzTitle : "" |
| 166 | ,pzDefaultDir ? pzDefaultDir : "" |
| 167 | ,pzDefaultFileName ? pzDefaultFileName : "" |
| 168 | ,pzFilter ? pzFilter : "" |
| 169 | ,nFlags |
| 170 | ,wxPoint(nX, nY) |
| 171 | ); |
| 172 | |
| 173 | if (vFileDialog.ShowModal() == wxID_OK) |
| 174 | { |
| 175 | *pnDefaultFilterIndex = vFileDialog.GetFilterIndex(); |
| 176 | return vFileDialog.GetPath(); |
| 177 | } |
| 178 | else |
| 179 | return wxEmptyString; |
| 180 | } // end of wxFileSelectorEx |
| 181 | |
| 182 | // ---------------------------------------------------------------------------- |
| 183 | // CLASS wxFileDialog |
| 184 | // ---------------------------------------------------------------------------- |
| 185 | |
| 186 | wxFileDialog::wxFileDialog ( |
| 187 | wxWindow* pParent |
| 188 | , const wxString& rsMessage |
| 189 | , const wxString& rsDefaultDir |
| 190 | , const wxString& rsDefaultFileName |
| 191 | , const wxString& rsWildCard |
| 192 | , long lStyle |
| 193 | , const wxPoint& rPos |
| 194 | ) |
| 195 | { |
| 196 | m_sMessage = rsMessage; |
| 197 | m_lDialogStyle = lStyle; |
| 198 | if ((m_lDialogStyle & wxMULTIPLE) && (m_lDialogStyle & wxSAVE)) |
| 199 | m_lDialogStyle &= ~wxMULTIPLE; |
| 200 | m_pParent = pParent; |
| 201 | m_sPath = ""; |
| 202 | m_sFileName = rsDefaultFileName; |
| 203 | m_sDir = rsDefaultDir; |
| 204 | m_sWildCard = rsWildCard; |
| 205 | m_nFilterIndex = 1; |
| 206 | m_vPos = rPos; |
| 207 | } // end of wxFileDialog::wxFileDialog |
| 208 | |
| 209 | void wxFileDialog::GetPaths ( |
| 210 | wxArrayString& rasPaths |
| 211 | ) const |
| 212 | { |
| 213 | wxString sDir(m_sDir); |
| 214 | size_t nCount = m_asFileNames.GetCount(); |
| 215 | |
| 216 | rasPaths.Empty(); |
| 217 | if (m_sDir.Last() != _T('\\')) |
| 218 | sDir += _T('\\'); |
| 219 | |
| 220 | for ( size_t n = 0; n < nCount; n++ ) |
| 221 | { |
| 222 | rasPaths.Add(sDir + m_asFileNames[n]); |
| 223 | } |
| 224 | } // end of wxFileDialog::GetPaths |
| 225 | |
| 226 | int wxFileDialog::ShowModal() |
| 227 | { |
| 228 | wxString sTheFilter; |
| 229 | wxString sFilterBuffer; |
| 230 | wxChar* pzFilterBuffer; |
| 231 | static wxChar zFileNameBuffer[wxMAXPATH]; // the file-name |
| 232 | HWND hWnd = 0; |
| 233 | wxChar zTitleBuffer[wxMAXFILE + 1 + wxMAXEXT]; // the file-name, without path |
| 234 | wxString sDir; |
| 235 | size_t i; |
| 236 | size_t nLen = m_sDir.length(); |
| 237 | int nCount = 0; |
| 238 | FILEDLG vFileDlg; |
| 239 | ULONG lFlags = 0L; |
| 240 | |
| 241 | memset(&vFileDlg, '\0', sizeof(FILEDLG)); |
| 242 | if (m_pParent) |
| 243 | hWnd = (HWND) m_pParent->GetHWND(); |
| 244 | if (!hWnd && wxTheApp->GetTopWindow()) |
| 245 | hWnd = (HWND) wxTheApp->GetTopWindow()->GetHWND(); |
| 246 | |
| 247 | |
| 248 | *zFileNameBuffer = wxT('\0'); |
| 249 | *zTitleBuffer = wxT('\0'); |
| 250 | |
| 251 | if (m_lDialogStyle & wxSAVE) |
| 252 | lFlags = FDS_SAVEAS_DIALOG; |
| 253 | else |
| 254 | lFlags = FDS_OPEN_DIALOG; |
| 255 | |
| 256 | if ((m_lDialogStyle & wxHIDE_READONLY) || (m_lDialogStyle & wxSAVE)) |
| 257 | lFlags |= FDS_SAVEAS_DIALOG; |
| 258 | if (m_lDialogStyle & wxMULTIPLE ) |
| 259 | lFlags |= FDS_OPEN_DIALOG | FDS_MULTIPLESEL; |
| 260 | |
| 261 | vFileDlg.cbSize = sizeof(FILEDLG); |
| 262 | vFileDlg.fl = lFlags; |
| 263 | vFileDlg.pszTitle = zTitleBuffer; |
| 264 | |
| 265 | // |
| 266 | // Convert forward slashes to backslashes (file selector doesn't like |
| 267 | // forward slashes) and also squeeze multiple consecutive slashes into one |
| 268 | // as it doesn't like two backslashes in a row neither |
| 269 | // |
| 270 | sDir.reserve(nLen); |
| 271 | for ( i = 0; i < nLen; i++ ) |
| 272 | { |
| 273 | wxChar ch = m_sDir[i]; |
| 274 | |
| 275 | switch (ch) |
| 276 | { |
| 277 | case _T('/'): |
| 278 | // |
| 279 | // Convert to backslash |
| 280 | // |
| 281 | ch = _T('\\'); |
| 282 | |
| 283 | // |
| 284 | // Fall through |
| 285 | // |
| 286 | case _T('\\'): |
| 287 | while (i < nLen - 1) |
| 288 | { |
| 289 | wxChar chNext = m_sDir[i + 1]; |
| 290 | |
| 291 | if (chNext != _T('\\') && chNext != _T('/')) |
| 292 | break; |
| 293 | |
| 294 | // |
| 295 | // Ignore the next one, unless it is at the start of a UNC path |
| 296 | // |
| 297 | if (i > 0) |
| 298 | i++; |
| 299 | else |
| 300 | break; |
| 301 | } |
| 302 | |
| 303 | // |
| 304 | // Fall through |
| 305 | // |
| 306 | |
| 307 | default: |
| 308 | // |
| 309 | // Normal char |
| 310 | sDir += ch; |
| 311 | } |
| 312 | } |
| 313 | if ( wxStrlen(m_sWildCard) == 0 ) |
| 314 | sTheFilter = ""; |
| 315 | else |
| 316 | sTheFilter = m_sWildCard; |
| 317 | |
| 318 | pzFilterBuffer = strtok((char*)sTheFilter.c_str(), "|"); |
| 319 | while(pzFilterBuffer != NULL) |
| 320 | { |
| 321 | if (nCount > 0 && !(nCount % 2)) |
| 322 | sDir += wxT(";"); |
| 323 | if (nCount % 2) |
| 324 | { |
| 325 | sDir += pzFilterBuffer; |
| 326 | } |
| 327 | pzFilterBuffer = strtok(NULL, "|"); |
| 328 | nCount++; |
| 329 | } |
| 330 | if (nCount == 0) |
| 331 | sDir += m_sFileName; |
| 332 | if (sDir.IsEmpty()) |
| 333 | sDir = "*.*"; |
| 334 | wxStrcpy(vFileDlg.szFullFile, sDir.c_str()); |
| 335 | sFilterBuffer = sDir; |
| 336 | |
| 337 | hWnd = ::WinFileDlg( HWND_DESKTOP |
| 338 | ,GetHwndOf(m_pParent) |
| 339 | ,&vFileDlg |
| 340 | ); |
| 341 | if (hWnd && vFileDlg.lReturn == DID_OK) |
| 342 | { |
| 343 | m_asFileNames.Empty(); |
| 344 | if ((m_lDialogStyle & wxMULTIPLE ) && vFileDlg.ulFQFCount > 1) |
| 345 | { |
| 346 | for (int i = 0; i < vFileDlg.ulFQFCount; i++) |
| 347 | { |
| 348 | if (i == 0) |
| 349 | { |
| 350 | m_sDir = wxPathOnly(wxString((const char*)*vFileDlg.papszFQFilename[0])); |
| 351 | m_sPath = (const char*)*vFileDlg.papszFQFilename[0]; |
| 352 | } |
| 353 | m_sFileName = wxFileNameFromPath(wxString((const char*)*vFileDlg.papszFQFilename[i])); |
| 354 | m_asFileNames.Add(m_sFileName); |
| 355 | } |
| 356 | ::WinFreeFileDlgList(vFileDlg.papszFQFilename); |
| 357 | } |
| 358 | else if (!(m_lDialogStyle & wxSAVE)) |
| 359 | { |
| 360 | m_sPath = vFileDlg.szFullFile; |
| 361 | m_sFileName = wxFileNameFromPath(vFileDlg.szFullFile); |
| 362 | m_sDir = wxPathOnly(vFileDlg.szFullFile); |
| 363 | } |
| 364 | else // save file |
| 365 | { |
| 366 | const wxChar* pzExtension = NULL; |
| 367 | |
| 368 | wxStrcpy(zFileNameBuffer, vFileDlg.szFullFile); |
| 369 | |
| 370 | int nIdx = wxStrlen(zFileNameBuffer) - 1; |
| 371 | wxString sExt; |
| 372 | |
| 373 | wxSplitPath( zFileNameBuffer |
| 374 | ,&m_sPath |
| 375 | ,&m_sFileName |
| 376 | ,&sExt |
| 377 | ); |
| 378 | if (zFileNameBuffer[nIdx] == wxT('.') || sExt.IsEmpty()) |
| 379 | { |
| 380 | zFileNameBuffer[nIdx] = wxT('\0'); |
| 381 | |
| 382 | // |
| 383 | // User has typed a filename without an extension: |
| 384 | // |
| 385 | // A filename can end in a "." here ("abc."), this means it |
| 386 | // does not have an extension. Because later on a "." with |
| 387 | // the default extension is appended we remove the "." if |
| 388 | // filename ends with one (We don't want files called |
| 389 | // "abc..ext") |
| 390 | // |
| 391 | pzExtension = sFilterBuffer.c_str(); |
| 392 | |
| 393 | for( int i = 0; i < sFilterBuffer.length(); i++ ) |
| 394 | { |
| 395 | // |
| 396 | // Get extension |
| 397 | // |
| 398 | pzExtension = wxStrrchr(pzExtension, wxT('.')); |
| 399 | if ( pzExtension && |
| 400 | !wxStrrchr(pzExtension, wxT('*')) && |
| 401 | !wxStrrchr(pzExtension, wxT('?')) && |
| 402 | pzExtension[1] && |
| 403 | pzExtension[1] != wxT(' ') |
| 404 | ) // != "blabla. " |
| 405 | { |
| 406 | // |
| 407 | // Now concat extension to the fileName: |
| 408 | // |
| 409 | m_sPath = wxString(zFileNameBuffer) + pzExtension; |
| 410 | } |
| 411 | } |
| 412 | } |
| 413 | else |
| 414 | { |
| 415 | m_sPath = vFileDlg.szFullFile; |
| 416 | } |
| 417 | m_sFileName = wxFileNameFromPath(vFileDlg.szFullFile); |
| 418 | m_sDir = wxPathOnly(vFileDlg.szFullFile); |
| 419 | |
| 420 | // |
| 421 | // === Simulating the wxOVERWRITE_PROMPT >>============================ |
| 422 | // |
| 423 | if ((m_lDialogStyle & wxOVERWRITE_PROMPT) && |
| 424 | (m_lDialogStyle & wxSAVE) && |
| 425 | (wxFileExists(m_sPath.c_str()))) |
| 426 | { |
| 427 | wxString sMessageText; |
| 428 | |
| 429 | sMessageText.Printf( _("File '%s' already exists.\nDo you want to replace it?") |
| 430 | ,m_sPath.c_str() |
| 431 | ); |
| 432 | if (wxMessageBox( sMessageText |
| 433 | ,wxT("Save File As") |
| 434 | ,wxYES_NO | wxICON_EXCLAMATION |
| 435 | ) != wxYES) |
| 436 | { |
| 437 | return wxID_CANCEL; |
| 438 | } |
| 439 | } |
| 440 | } |
| 441 | return wxID_OK; |
| 442 | } |
| 443 | return wxID_CANCEL; |
| 444 | } // end of wxFileDialog::ShowModal |
| 445 | |
| 446 | // |
| 447 | // Generic file load/save dialog |
| 448 | // |
| 449 | static wxString wxDefaultFileSelector ( |
| 450 | bool bLoad |
| 451 | , const char* pzWhat |
| 452 | , const char* pzExtension |
| 453 | , const char* pzDefaultName |
| 454 | , wxWindow* pParent |
| 455 | ) |
| 456 | { |
| 457 | char* pzExt = (char *)pzExtension; |
| 458 | char zPrompt[50]; |
| 459 | wxString sStr; |
| 460 | char zWild[60]; |
| 461 | |
| 462 | if (bLoad) |
| 463 | sStr = "Load %s file"; |
| 464 | else |
| 465 | sStr = "Save %s file"; |
| 466 | sprintf(zPrompt, wxGetTranslation(sStr), pzWhat); |
| 467 | |
| 468 | if (*pzExt == '.') |
| 469 | pzExt++; |
| 470 | sprintf(zWild, "*.%s", pzExt); |
| 471 | return wxFileSelector ( zPrompt |
| 472 | ,NULL |
| 473 | ,pzDefaultName |
| 474 | ,pzExt |
| 475 | ,zWild |
| 476 | ,0 |
| 477 | ,pParent |
| 478 | ); |
| 479 | } // end of wxDefaultFileSelector |
| 480 | |
| 481 | // |
| 482 | // Generic file load dialog |
| 483 | // |
| 484 | wxString wxLoadFileSelector ( |
| 485 | const char* pzWhat |
| 486 | , const char* pzExtension |
| 487 | , const char* pzDefaultName |
| 488 | , wxWindow* pParent |
| 489 | ) |
| 490 | { |
| 491 | return wxDefaultFileSelector( TRUE |
| 492 | ,pzWhat |
| 493 | ,pzExtension |
| 494 | ,pzDefaultName |
| 495 | ,pParent |
| 496 | ); |
| 497 | } // end of wxLoadFileSelector |
| 498 | |
| 499 | |
| 500 | // |
| 501 | // Generic file save dialog |
| 502 | // |
| 503 | wxString wxSaveFileSelector ( |
| 504 | const char* pzWhat |
| 505 | , const char* pzExtension |
| 506 | , const char* pzDefaultName |
| 507 | , wxWindow* pParent |
| 508 | ) |
| 509 | { |
| 510 | return wxDefaultFileSelector( FALSE |
| 511 | ,pzWhat |
| 512 | ,pzExtension |
| 513 | ,pzDefaultName |
| 514 | ,pParent |
| 515 | ); |
| 516 | } // end of wxSaveFileSelector |
| 517 | |