adding support for extraControl on osx_carbon
[wxWidgets.git] / src / osx / cocoa / filedlg.mm
1 /////////////////////////////////////////////////////////////////////////////
2 // Name:        src/cocoa/filedlg.mm
3 // Purpose:     wxFileDialog for wxCocoa
4 // Author:      Ryan Norton
5 // Modified by:
6 // Created:     2004-10-02
7 // RCS-ID:      $Id: filedlg.mm 40007 2006-07-05 13:10:46Z SC $
8 // Copyright:   (c) Ryan Norton
9 // Licence:     wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
11
12 // ============================================================================
13 // declarations
14 // ============================================================================
15
16 // ----------------------------------------------------------------------------
17 // headers
18 // ----------------------------------------------------------------------------
19
20 // For compilers that support precompilation, includes "wx.h".
21 #include "wx/wxprec.h"
22
23 #if wxUSE_FILEDLG
24
25 #include "wx/filedlg.h"
26
27 #ifndef WX_PRECOMP
28     #include "wx/msgdlg.h"
29     #include "wx/app.h"
30 #endif
31
32 #include "wx/filename.h"
33 #include "wx/tokenzr.h"
34
35 #include "wx/osx/private.h"
36
37 // ============================================================================
38 // implementation
39 // ============================================================================
40
41 // Open Items:
42 // - support for old style MacOS creator / type combos
43 // - parameter support for descending into packages as directories (setTreatsFilePackagesAsDirectories)
44
45 IMPLEMENT_CLASS(wxFileDialog, wxFileDialogBase)
46
47 wxFileDialog::wxFileDialog(
48     wxWindow *parent, const wxString& message,
49     const wxString& defaultDir, const wxString& defaultFileName, const wxString& wildCard,
50     long style, const wxPoint& pos, const wxSize& sz, const wxString& name)
51     : wxFileDialogBase(parent, message, defaultDir, defaultFileName, wildCard, style, pos, sz, name)
52 {
53 }
54
55 bool wxFileDialog::SupportsExtraControl() const
56 {
57     return false;
58 }
59
60 NSArray* GetTypesFromFilter( const wxString filter )
61 {
62     NSMutableArray* types = nil;
63     if ( !filter.empty() )
64     {
65         wxArrayString names ;
66         wxArrayString extensions;
67
68         wxString filter2(filter) ;
69         int filterIndex = 0;
70         bool isName = true ;
71         wxString current ;
72
73         for ( unsigned int i = 0; i < filter2.length() ; i++ )
74         {
75             if ( filter2.GetChar(i) == wxT('|') )
76             {
77                 if ( isName )
78                 {
79                     names.Add( current ) ;
80                 }
81                 else
82                 {
83                     extensions.Add( current ) ;
84                     ++filterIndex ;
85                 }
86
87                 isName = !isName ;
88                 current = wxEmptyString ;
89             }
90             else
91             {
92                 current += filter2.GetChar(i) ;
93             }
94         }
95         // we allow for compatibility reason to have a single filter expression (like *.*) without
96         // an explanatory text, in that case the first part is name and extension at the same time
97
98         wxASSERT_MSG( filterIndex == 0 || !isName , wxT("incorrect format of format string") ) ;
99         if ( current.empty() )
100             extensions.Add( names[filterIndex] ) ;
101         else
102             extensions.Add( current ) ;
103         if ( filterIndex == 0 || isName )
104             names.Add( current ) ;
105
106         ++filterIndex ;
107
108         const size_t extCount = extensions.GetCount();
109         for ( size_t i = 0 ; i < extCount; i++ )
110         {
111             wxString extensiongroup = extensions[i];
112             wxStringTokenizer tokenizer( extensiongroup , wxT(";") ) ;
113             while ( tokenizer.HasMoreTokens() )
114             {
115                 wxString extension = tokenizer.GetNextToken() ;
116                 // Remove leading '*'
117                 if (extension.length() && (extension.GetChar(0) == '*'))
118                     extension = extension.Mid( 1 );
119
120                 // Remove leading '.'
121                 if (extension.length() && (extension.GetChar(0) == '.'))
122                     extension = extension.Mid( 1 );
123
124                 // Remove leading '*', this is for handling *.*
125                 if (extension.length() && (extension.GetChar(0) == '*'))
126                     extension = extension.Mid( 1 );
127
128                 if ( extension.IsEmpty() )
129                 {
130                     if ( types != nil )
131                         [types release];
132                     return nil;
133                 }
134
135                 if ( types == nil )
136                     types = [[NSMutableArray alloc] init];
137
138                 wxCFStringRef cfext(extension);
139                 [types addObject: (NSString*)cfext.AsNSString()  ];
140 #if 0
141                 // add support for classic fileType / creator here
142                 wxUint32 fileType, creator;
143                 // extension -> mactypes
144 #endif
145             }
146
147         }
148     }
149     return types;
150 }
151
152 void wxFileDialog::ShowWindowModal()
153 {
154     wxCFStringRef cf( m_message );
155     wxCFStringRef dir( m_dir );
156     wxCFStringRef file( m_fileName );
157
158     wxNonOwnedWindow* parentWindow = NULL;
159     
160     m_modality = wxDIALOG_MODALITY_WINDOW_MODAL;
161
162     if (GetParent())
163         parentWindow = dynamic_cast<wxNonOwnedWindow*>(wxGetTopLevelParent(GetParent()));
164
165     wxASSERT_MSG(parentWindow, "Window modal display requires parent.");
166     
167     if (HasFlag(wxFD_SAVE))
168     {
169         NSSavePanel* sPanel = [NSSavePanel savePanel];
170         // makes things more convenient:
171         [sPanel setCanCreateDirectories:YES];
172         [sPanel setMessage:cf.AsNSString()];
173         // if we should be able to descend into pacakges we must somehow
174         // be able to pass this in
175         [sPanel setTreatsFilePackagesAsDirectories:NO];
176         [sPanel setCanSelectHiddenExtension:YES];
177         
178         NSWindow* nativeParent = parentWindow->GetWXWindow();
179         ModalDialogDelegate* sheetDelegate = [[ModalDialogDelegate alloc] init];
180         [sheetDelegate setImplementation: this];
181         [sPanel beginSheetForDirectory:dir.AsNSString() file:file.AsNSString()
182             modalForWindow: nativeParent modalDelegate: sheetDelegate
183             didEndSelector: @selector(sheetDidEnd:returnCode:contextInfo:)
184             contextInfo: nil];
185     }
186     else 
187     {
188         NSArray* types = GetTypesFromFilter( m_wildCard ) ;
189         NSOpenPanel* oPanel = [NSOpenPanel openPanel];
190         [oPanel setTreatsFilePackagesAsDirectories:NO];
191         [oPanel setCanChooseDirectories:NO];
192         [oPanel setResolvesAliases:YES];
193         [oPanel setCanChooseFiles:YES];
194         [oPanel setMessage:cf.AsNSString()];
195     
196         NSWindow* nativeParent = parentWindow->GetWXWindow();
197         ModalDialogDelegate* sheetDelegate = [[ModalDialogDelegate alloc] init];
198         [sheetDelegate setImplementation: this];
199         [oPanel beginSheetForDirectory:dir.AsNSString() file:file.AsNSString()
200             types: types modalForWindow: nativeParent
201             modalDelegate: sheetDelegate
202             didEndSelector: @selector(sheetDidEnd:returnCode:contextInfo:)
203             contextInfo: nil];
204     }
205 }
206
207 int wxFileDialog::ShowModal()
208 {
209     NSSavePanel *panel = nil;
210
211     wxCFStringRef cf( m_message );
212
213     wxCFStringRef dir( m_dir );
214     wxCFStringRef file( m_fileName );
215
216     m_path = wxEmptyString;
217     m_fileNames.Clear();
218     m_paths.Clear();
219     // since we don't support retrieving the matching filter
220     m_filterIndex = -1;
221
222     wxNonOwnedWindow* parentWindow = NULL;
223     int returnCode = -1;
224
225     if (GetParent())
226     {
227         parentWindow = dynamic_cast<wxNonOwnedWindow*>(wxGetTopLevelParent(GetParent()));
228     }
229
230     if (HasFlag(wxFD_SAVE))
231     {
232         NSSavePanel* sPanel = [NSSavePanel savePanel];
233         // makes things more convenient:
234         [sPanel setCanCreateDirectories:YES];
235         [sPanel setMessage:cf.AsNSString()];
236         // if we should be able to descend into pacakges we must somehow
237         // be able to pass this in
238         [sPanel setTreatsFilePackagesAsDirectories:NO];
239         [sPanel setCanSelectHiddenExtension:YES];
240
241         if ( HasFlag(wxFD_OVERWRITE_PROMPT) )
242         {
243         }
244
245         returnCode = [sPanel runModalForDirectory:dir.AsNSString() file:file.AsNSString() ];
246         ModalFinishedCallback(sPanel, returnCode);
247     }
248     else
249     {
250         NSArray* types = GetTypesFromFilter( m_wildCard ) ;
251         NSOpenPanel* oPanel = [NSOpenPanel openPanel];
252         [oPanel setTreatsFilePackagesAsDirectories:NO];
253         [oPanel setCanChooseDirectories:NO];
254         [oPanel setResolvesAliases:YES];
255         [oPanel setCanChooseFiles:YES];
256         [oPanel setMessage:cf.AsNSString()];
257
258         returnCode = [oPanel runModalForDirectory:dir.AsNSString()
259                         file:file.AsNSString() types:types];
260
261         ModalFinishedCallback(oPanel, returnCode);
262         
263         if ( types != nil )
264             [types release];
265     }
266
267     return GetReturnCode();
268 }
269
270 void wxFileDialog::ModalFinishedCallback(void* panel, int returnCode)
271 {
272     int result = wxID_CANCEL;
273     if (HasFlag(wxFD_SAVE))
274     {
275         if (returnCode == NSOKButton )
276         {
277             NSSavePanel* sPanel = (NSSavePanel*)panel;
278             result = wxID_OK;
279
280             m_path = wxCFStringRef::AsString([sPanel filename]);
281             m_fileName = wxFileNameFromPath(m_path);
282             m_dir = wxPathOnly( m_path );
283         }
284     }
285     else
286     {
287         NSOpenPanel* oPanel = (NSOpenPanel*)panel;
288         if (returnCode == NSOKButton )
289         {
290             panel = oPanel;
291             result = wxID_OK;
292             NSArray* filenames = [oPanel filenames];
293             for ( size_t i = 0 ; i < [filenames count] ; ++ i )
294             {
295                 wxString fnstr = wxCFStringRef::AsString([filenames objectAtIndex:i]);
296                 m_paths.Add( fnstr );
297                 m_fileNames.Add( wxFileNameFromPath(fnstr) );
298                 if ( i == 0 )
299                 {
300                     m_path = fnstr;
301                     m_fileName = wxFileNameFromPath(fnstr);
302                     m_dir = wxPathOnly( fnstr );
303                 }
304             }
305         }
306     }
307     SetReturnCode(result);
308     
309     if (GetModality() == wxDIALOG_MODALITY_WINDOW_MODAL)
310         SendWindowModalDialogEvent ( wxEVT_WINDOW_MODAL_DIALOG_CLOSED  );
311 }
312
313 #endif // wxUSE_FILEDLG