]> git.saurik.com Git - wxWidgets.git/blobdiff - src/osx/cocoa/filedlg.mm
fixing class
[wxWidgets.git] / src / osx / cocoa / filedlg.mm
index 462ee154e477e7d604f7fcb7e385642a0cf11f63..6e4e5c4f2c243a8e7af63960de8e8abbb31bd501 100644 (file)
@@ -4,7 +4,7 @@
 // Author:      Ryan Norton
 // Modified by:
 // Created:     2004-10-02
-// RCS-ID:      $Id: filedlg.mm 40007 2006-07-05 13:10:46Z SC $
+// RCS-ID:      $Id$
 // Copyright:   (c) Ryan Norton
 // Licence:     wxWindows licence
 /////////////////////////////////////////////////////////////////////////////
 #ifndef WX_PRECOMP
     #include "wx/msgdlg.h"
     #include "wx/app.h"
+    #include "wx/sizer.h"
+    #include "wx/stattext.h"
+    #include "wx/choice.h"
 #endif
 
 #include "wx/filename.h"
+#include "wx/tokenzr.h"
+#include "wx/evtloop.h"
 
 #include "wx/osx/private.h"
+#include "wx/sysopt.h"
+#include "wx/testing.h"
+
+#include <mach-o/dyld.h>
 
 // ============================================================================
 // implementation
 // ============================================================================
 
 // Open Items:
-// - support for old style MacOS creator / type combos
 // - parameter support for descending into packages as directories (setTreatsFilePackagesAsDirectories)
+// - as setAllowedFileTypes is only functional for NSOpenPanel on 10.6+, on earlier systems, the file
+// type choice will not be shown, but all possible file items will be shown, if a popup must be working
+// then the delegate method - (BOOL)panel:(id)sender shouldShowFilename:(NSString *)filename will have to
+// be implemented
+
+namespace
+{
+
+bool HasAppKit_10_6()
+{
+    // Even if we require 10.6, we might be loaded by an application that
+    // was linked against 10.5.  setAllowedFileTypes will still be ignored
+    // in this case.  From NSSavePanel.h:
+    // NSOpenPanel: On versions less than 10.6, this property is ignored.
+    // For applications that link against 10.6 and higher, this property will
+    // determine which files should be enabled in the open panel.
+    int32_t version = NSVersionOfLinkTimeLibrary("AppKit");
+    if (version == -1)
+    {
+        // If we're loaded by an application that doesn't link against AppKit,
+        // use the runtime version instead.  This check will not work for the
+        // case above.
+        version = NSVersionOfRunTimeLibrary("AppKit");
+    }
+
+    // Notice that this still works correctly even if version is -1.
+    return version >= 0x40e2400 /* version of 10.6 AppKit */;
+}
+
+} // anonymous namespace
+
+@interface wxOpenPanelDelegate : NSObject wxOSX_10_6_AND_LATER(<NSOpenSavePanelDelegate>)
+{
+    wxFileDialog* _dialog;
+}
+
+- (wxFileDialog*) fileDialog;
+- (void) setFileDialog:(wxFileDialog*) dialog;
+
+- (BOOL)panel:(id)sender shouldShowFilename:(NSString *)filename;
+
+@end
+
+@implementation wxOpenPanelDelegate
+
+- (id) init
+{
+    self = [super init];
+    _dialog = NULL;
+    return self;
+}
+
+- (wxFileDialog*) fileDialog
+{
+    return _dialog;
+}
+
+- (void) setFileDialog:(wxFileDialog*) dialog
+{
+    _dialog = dialog;
+}
+
+- (BOOL)panel:(id)sender shouldShowFilename:(NSString *)filename
+{
+    BOOL showObject = YES;
+    
+    NSString* resolvedLink = [[NSFileManager defaultManager] pathContentOfSymbolicLinkAtPath:filename];
+    if ( resolvedLink != nil )
+        filename = resolvedLink;
+    
+    NSDictionary* fileAttribs = [[NSFileManager defaultManager]
+                                 fileAttributesAtPath:filename traverseLink:YES];
+    if (fileAttribs)
+    {
+        // check for packages
+        if ([NSFileTypeDirectory isEqualTo:[fileAttribs objectForKey:NSFileType]])
+        {
+            if ([[NSWorkspace sharedWorkspace] isFilePackageAtPath:filename] == NO)
+                showObject = YES;    // it's a folder, OK to show
+            else
+            {
+                // it's a packaged directory, apply check
+                wxCFStringRef filecf([filename retain]);
+                showObject = _dialog->CheckFile(filecf.AsString());  
+            }
+        }
+        else
+        {
+            // the code above only solves links, not aliases, do this here:
+            
+            NSString* resolvedAlias = nil;
+            
+            CFURLRef url = CFURLCreateWithFileSystemPath (kCFAllocatorDefault, 
+                                                          (CFStringRef)filename, 
+                                                          kCFURLPOSIXPathStyle,
+                                                          NO); 
+            if (url != NULL) 
+            {
+                FSRef fsRef; 
+                if (CFURLGetFSRef(url, &fsRef)) 
+                {
+                    Boolean targetIsFolder, wasAliased;
+                    OSErr err = FSResolveAliasFile (&fsRef, true, &targetIsFolder, &wasAliased);
+                    
+                    if ((err == noErr) && wasAliased) 
+                    {
+                        CFURLRef resolvedUrl = CFURLCreateFromFSRef(kCFAllocatorDefault,  &fsRef);
+                        if (resolvedUrl != NULL) 
+                        {
+                            resolvedAlias = (NSString*) CFURLCopyFileSystemPath(resolvedUrl,
+                                                                               kCFURLPOSIXPathStyle); 
+                            CFRelease(resolvedUrl);
+                        }
+                    } 
+                }
+                CFRelease(url);
+            }
+
+            if (resolvedAlias != nil) 
+            {
+                // recursive call
+                [resolvedAlias autorelease];
+                showObject = [self panel:sender shouldShowFilename:resolvedAlias];
+            }
+            else
+            {
+                wxCFStringRef filecf([filename retain]);
+                showObject = _dialog->CheckFile(filecf.AsString());  
+            }
+        }
+    }
+
+    return showObject;    
+}
+
+@end
 
 IMPLEMENT_CLASS(wxFileDialog, wxFileDialogBase)
 
@@ -49,99 +193,315 @@ wxFileDialog::wxFileDialog(
     long style, const wxPoint& pos, const wxSize& sz, const wxString& name)
     : wxFileDialogBase(parent, message, defaultDir, defaultFileName, wildCard, style, pos, sz, name)
 {
+    m_filterIndex = -1;
+    m_sheetDelegate = [[ModalDialogDelegate alloc] init];
+    [(ModalDialogDelegate*)m_sheetDelegate setImplementation: this];
 }
 
+wxFileDialog::~wxFileDialog()
+{
+    [m_sheetDelegate release];
+}
 
-NSArray* GetTypesFromFilter( const wxString filter )
+bool wxFileDialog::SupportsExtraControl() const
+{
+    return true;
+}
+
+NSArray* GetTypesFromExtension( const wxString extensiongroup, wxArrayString& extensions )
 {
     NSMutableArray* types = nil;
-    if ( !filter.empty() )
+    extensions.Clear();
+
+    wxStringTokenizer tokenizer( extensiongroup, wxT(";") ) ;
+    while ( tokenizer.HasMoreTokens() )
     {
-        wxArrayString names ;
-        wxArrayString extensions;
+        wxString extension = tokenizer.GetNextToken() ;
+        // Remove leading '*'
+        if ( extension.length() && (extension.GetChar(0) == '*') )
+            extension = extension.Mid( 1 );
+
+        // Remove leading '.'
+        if ( extension.length() && (extension.GetChar(0) == '.') )
+            extension = extension.Mid( 1 );
 
-        wxString filter2(filter) ;
-        int filterIndex = 0;
-        bool isName = true ;
-        wxString current ;
+        // Remove leading '*', this is for handling *.*
+        if ( extension.length() && (extension.GetChar(0) == '*') )
+            extension = extension.Mid( 1 );
 
-        for ( unsigned int i = 0; i < filter2.length() ; i++ )
+        if ( extension.IsEmpty() )
         {
-            if ( filter2.GetChar(i) == wxT('|') )
+            extensions.Clear();
+            [types release];
+            types = nil;
+            return nil;
+        }
+
+        if ( types == nil )
+            types = [[NSMutableArray alloc] init];
+
+        extensions.Add(extension.Lower());
+        wxCFStringRef cfext(extension);
+        [types addObject: (NSString*)cfext.AsNSString()  ];
+#if 0
+        // add support for classic fileType / creator here
+        wxUint32 fileType, creator;
+        // extension -> mactypes
+#endif
+    }
+    [types autorelease];
+    return types;
+}
+
+NSArray* GetTypesFromFilter( const wxString& filter, wxArrayString& names, wxArrayString& extensiongroups )
+{
+    NSMutableArray* types = nil;
+    bool allowAll = false;
+
+    names.Clear();
+    extensiongroups.Clear();
+
+    if ( !filter.empty() )
+    {
+        wxStringTokenizer tokenizer( filter, wxT("|") );
+        int numtokens = (int)tokenizer.CountTokens();
+        if(numtokens == 1)
+        {
+            // we allow for compatibility reason to have a single filter expression (like *.*) without
+            // an explanatory text, in that case the first part is name and extension at the same time
+            wxString extension = tokenizer.GetNextToken();
+            names.Add( extension );
+            extensiongroups.Add( extension );
+        }
+        else
+        {
+            int numextensions = numtokens / 2;
+            for(int i = 0; i < numextensions; i++)
             {
-                if ( isName )
-                {
-                    names.Add( current ) ;
-                }
-                else
+                wxString name = tokenizer.GetNextToken();
+                wxString extension = tokenizer.GetNextToken();
+                names.Add( name );
+                extensiongroups.Add( extension );
+            }
+        }
+
+        const size_t extCount = extensiongroups.GetCount();
+        wxArrayString extensions;
+        for ( size_t i = 0 ; i < extCount; i++ )
+        {
+            NSArray* exttypes = GetTypesFromExtension(extensiongroups[i], extensions);
+            if ( exttypes != nil )
+            {
+                if ( allowAll == false )
                 {
-                    extensions.Add( current ) ;
-                    ++filterIndex ;
-                }
+                    if ( types == nil )
+                        types = [[NSMutableArray alloc] init];
 
-                isName = !isName ;
-                current = wxEmptyString ;
+                    [types addObjectsFromArray:exttypes];
+                }
             }
             else
             {
-                current += filter2.GetChar(i) ;
+                allowAll = true;
+                [types release];
+                types = nil;
             }
         }
-        // we allow for compatibility reason to have a single filter expression (like *.*) without
-        // an explanatory text, in that case the first part is name and extension at the same time
+    }
+    [types autorelease];
+    return types;
+}
 
-        wxASSERT_MSG( filterIndex == 0 || !isName , wxT("incorrect format of format string") ) ;
-        if ( current.empty() )
-            extensions.Add( names[filterIndex] ) ;
-        else
-            extensions.Add( current ) ;
-        if ( filterIndex == 0 || isName )
-            names.Add( current ) ;
+void wxFileDialog::ShowWindowModal()
+{
+    wxCFStringRef cf( m_message );
+    wxCFStringRef dir( m_dir );
+    wxCFStringRef file( m_fileName );
 
-        ++filterIndex ;
+    wxNonOwnedWindow* parentWindow = NULL;
+    
+    m_modality = wxDIALOG_MODALITY_WINDOW_MODAL;
 
-        const size_t extCount = extensions.GetCount();
-        for ( size_t i = 0 ; i < extCount; i++ )
+    if (GetParent())
+        parentWindow = dynamic_cast<wxNonOwnedWindow*>(wxGetTopLevelParent(GetParent()));
+
+    wxASSERT_MSG(parentWindow, "Window modal display requires parent.");
+
+    NSArray* types = GetTypesFromFilter( m_wildCard, m_filterNames, m_filterExtensions ) ;
+    if ( HasFlag(wxFD_SAVE) )
+    {
+        NSSavePanel* sPanel = [NSSavePanel savePanel];
+
+        SetupExtraControls(sPanel);
+
+        // makes things more convenient:
+        [sPanel setCanCreateDirectories:YES];
+        [sPanel setMessage:cf.AsNSString()];
+        // if we should be able to descend into pacakges we must somehow
+        // be able to pass this in
+        [sPanel setTreatsFilePackagesAsDirectories:NO];
+        [sPanel setCanSelectHiddenExtension:YES];
+        [sPanel setAllowedFileTypes:types];
+        [sPanel setAllowsOtherFileTypes:NO];
+        
+        NSWindow* nativeParent = parentWindow->GetWXWindow();
+        [sPanel beginSheetForDirectory:dir.AsNSString() file:file.AsNSString()
+            modalForWindow: nativeParent modalDelegate: m_sheetDelegate
+            didEndSelector: @selector(sheetDidEnd:returnCode:contextInfo:)
+            contextInfo: nil];
+    }
+    else 
+    {
+        NSOpenPanel* oPanel = [NSOpenPanel openPanel];
+        
+        SetupExtraControls(oPanel);
+
+        [oPanel setTreatsFilePackagesAsDirectories:NO];
+        [oPanel setCanChooseDirectories:NO];
+        [oPanel setResolvesAliases:YES];
+        [oPanel setCanChooseFiles:YES];
+        [oPanel setMessage:cf.AsNSString()];
+        [oPanel setAllowsMultipleSelection: (HasFlag(wxFD_MULTIPLE) ? YES : NO )];
+        
+        NSWindow* nativeParent = parentWindow->GetWXWindow();
+        [oPanel beginSheetForDirectory:dir.AsNSString() file:file.AsNSString()
+            types: types modalForWindow: nativeParent
+            modalDelegate: m_sheetDelegate
+            didEndSelector: @selector(sheetDidEnd:returnCode:contextInfo:)
+            contextInfo: nil];
+    }
+}
+
+// Create a panel with the file type drop down list
+// If extra controls need to be added (see wxFileDialog::SetExtraControlCreator), add
+// them to the panel as well
+// Returns the newly created wxPanel
+
+wxWindow* wxFileDialog::CreateFilterPanel(wxWindow *extracontrol)
+{
+    wxPanel *extrapanel = new wxPanel(this, wxID_ANY, wxDefaultPosition, wxDefaultSize);
+    wxBoxSizer *verticalSizer = new wxBoxSizer(wxVERTICAL);
+    extrapanel->SetSizer(verticalSizer);
+    
+    // the file type control
+    {
+        wxBoxSizer *horizontalSizer = new wxBoxSizer(wxHORIZONTAL);
+        verticalSizer->Add(horizontalSizer, 0, wxEXPAND, 0);
+        wxStaticText *stattext = new wxStaticText( extrapanel, wxID_ANY, _("File type:") );
+        horizontalSizer->Add(stattext, 0, wxALIGN_CENTER_VERTICAL|wxALL, 5);
+        m_filterChoice = new wxChoice(extrapanel, wxID_ANY);
+        horizontalSizer->Add(m_filterChoice, 1, wxALIGN_CENTER_VERTICAL|wxALL, 5);
+        m_filterChoice->Append(m_filterNames);
+        if( m_filterNames.GetCount() > 0)
         {
-            wxString extension = extensions[i];
+            if ( m_firstFileTypeFilter >= 0 )
+                m_filterChoice->SetSelection(m_firstFileTypeFilter);
+        }
+        m_filterChoice->Connect(wxEVT_COMMAND_CHOICE_SELECTED, wxCommandEventHandler(wxFileDialog::OnFilterSelected), NULL, this);
+    }
+        
+    if(extracontrol)
+    {
+        wxBoxSizer *horizontalSizer = new wxBoxSizer(wxHORIZONTAL);
+        verticalSizer->Add(horizontalSizer, 0, wxEXPAND, 0);
 
-            // Remove leading '*'
-            if (extension.length() && (extension.GetChar(0) == '*'))
-                extension = extension.Mid( 1 );
+        extracontrol->Reparent(extrapanel);
+        horizontalSizer->Add(extracontrol);
+    }
 
-            // Remove leading '.'
-            if (extension.length() && (extension.GetChar(0) == '.'))
-                extension = extension.Mid( 1 );
+    verticalSizer->Layout();
+    verticalSizer->SetSizeHints(extrapanel);
+    return extrapanel;
+}
 
-            if ( extension.IsEmpty() )
-            {
-                if ( types != nil )
-                    [types release];
-                return nil;
-            }
+void wxFileDialog::DoOnFilterSelected(int index)
+{
+    NSArray* types = GetTypesFromExtension(m_filterExtensions[index],m_currentExtensions);
+    NSSavePanel* panel = (NSSavePanel*) GetWXWindow();
+    if ( m_delegate )
+        [panel validateVisibleColumns];
+    else
+        [panel setAllowedFileTypes:types];
+}
 
+// An item has been selected in the file filter wxChoice:
+void wxFileDialog::OnFilterSelected( wxCommandEvent &WXUNUSED(event) )
+{
+    DoOnFilterSelected( m_filterChoice->GetSelection() );
+}
 
-            if ( types == nil )
-                types = [[NSMutableArray alloc] init];
+bool wxFileDialog::CheckFile( const wxString& filename )
+{
+    if ( m_currentExtensions.GetCount() == 0 )
+        return true;
+    
+    wxString ext = filename.AfterLast('.').Lower();
+    
+    for ( size_t i = 0; i < m_currentExtensions.GetCount(); ++i )
+    {
+        if ( ext == m_currentExtensions[i] )
+            return true;
+    }
+    return false;
+}
 
-            wxCFStringRef cfext(extension);
-            [types addObject: (NSString*)cfext.AsNSString()  ];
-#if 0
-            // add support for classic fileType / creator here
-            wxUint32 fileType, creator;
-            // extension -> mactypes
-#endif
+void wxFileDialog::SetupExtraControls(WXWindow nativeWindow)
+{
+    NSSavePanel* panel = (NSSavePanel*) nativeWindow;
+    
+    wxNonOwnedWindow::Create( GetParent(), nativeWindow );
+    wxWindow* extracontrol = NULL;
+    if ( HasExtraControlCreator() )
+    {
+        CreateExtraControl();
+        extracontrol = GetExtraControl();
+    }
+
+    NSView* accView = nil;
+    m_delegate = nil;
+
+    if ( m_useFileTypeFilter )
+    {
+        m_filterPanel = CreateFilterPanel(extracontrol);
+        accView = m_filterPanel->GetHandle();
+        if( HasFlag(wxFD_OPEN) )
+        {
+            if ( UMAGetSystemVersion() < 0x1060 || !HasAppKit_10_6() )
+            {
+                wxOpenPanelDelegate* del = [[wxOpenPanelDelegate alloc]init];
+                [del setFileDialog:this];
+                [panel setDelegate:del];
+                m_delegate = del;
+            }
         }
     }
-    return types;
+    else
+    {
+        m_filterPanel = NULL;
+        m_filterChoice = NULL;
+        if ( extracontrol != nil )
+            accView = extracontrol->GetHandle();
+    }
+
+    if ( accView != nil )
+    {
+        [accView removeFromSuperview];
+        [panel setAccessoryView:accView];
+    }
+    else
+    {
+        [panel setAccessoryView:nil];
+    }
 }
 
 int wxFileDialog::ShowModal()
 {
-    int result = wxID_CANCEL;
+    WX_TESTING_SHOW_MODAL_HOOK();
 
-    NSSavePanel *panel = nil;
+    wxCFEventLoopPauseIdleEvents pause;
 
+    wxMacAutoreleasePool autoreleasepool;
+    
     wxCFStringRef cf( m_message );
 
     wxCFStringRef dir( m_dir );
@@ -149,10 +509,73 @@ int wxFileDialog::ShowModal()
 
     m_path = wxEmptyString;
     m_fileNames.Clear();
+    m_paths.Clear();
 
-    if (HasFlag(wxFD_SAVE))
+    wxNonOwnedWindow* parentWindow = NULL;
+    int returnCode = -1;
+
+    if (GetParent())
+    {
+        parentWindow = dynamic_cast<wxNonOwnedWindow*>(wxGetTopLevelParent(GetParent()));
+    }
+
+
+    NSArray* types = GetTypesFromFilter( m_wildCard, m_filterNames, m_filterExtensions ) ;
+
+    m_useFileTypeFilter = m_filterExtensions.GetCount() > 1;
+
+    if( HasFlag(wxFD_OPEN) )
+    {
+        if ( !(wxSystemOptions::HasOption( wxOSX_FILEDIALOG_ALWAYS_SHOW_TYPES ) && (wxSystemOptions::GetOptionInt( wxOSX_FILEDIALOG_ALWAYS_SHOW_TYPES ) == 1)) )
+            m_useFileTypeFilter = false;            
+    }
+
+    m_firstFileTypeFilter = -1;
+
+    if ( m_useFileTypeFilter
+        && m_filterIndex >= 0 && m_filterIndex < m_filterExtensions.GetCount() )
+    {
+        m_firstFileTypeFilter = m_filterIndex;
+    }
+    else if ( m_useFileTypeFilter )
+    {
+        types = nil;
+        bool useDefault = true;
+        for ( size_t i = 0; i < m_filterExtensions.GetCount(); ++i )
+        {
+            types = GetTypesFromExtension(m_filterExtensions[i], m_currentExtensions);
+            if ( m_currentExtensions.GetCount() == 0 )
+            {
+                useDefault = false;
+                m_firstFileTypeFilter = i;
+                break;
+            }
+            
+            for ( size_t j = 0; j < m_currentExtensions.GetCount(); ++j )
+            {
+                if ( m_fileName.EndsWith(m_currentExtensions[j]) )
+                {
+                    m_firstFileTypeFilter = i;
+                    useDefault = false;
+                    break;
+                }
+            }
+            if ( !useDefault )
+                break;
+        }
+        if ( useDefault )
+        {
+            types = GetTypesFromExtension(m_filterExtensions[0], m_currentExtensions);
+            m_firstFileTypeFilter = 0;
+        }
+    }
+
+    if ( HasFlag(wxFD_SAVE) )
     {
         NSSavePanel* sPanel = [NSSavePanel savePanel];
+
+        SetupExtraControls(sPanel);
+
         // makes things more convenient:
         [sPanel setCanCreateDirectories:YES];
         [sPanel setMessage:cf.AsNSString()];
@@ -160,42 +583,94 @@ int wxFileDialog::ShowModal()
         // be able to pass this in
         [sPanel setTreatsFilePackagesAsDirectories:NO];
         [sPanel setCanSelectHiddenExtension:YES];
+        [sPanel setAllowedFileTypes:types];
+        [sPanel setAllowsOtherFileTypes:NO];
 
         if ( HasFlag(wxFD_OVERWRITE_PROMPT) )
         {
         }
 
-        if ( [sPanel runModalForDirectory:dir.AsNSString() file:file.AsNSString() ] == NSOKButton )
+        /*
+        Let the file dialog know what file type should be used initially.
+        If this is not done then when setting the filter index
+        programmatically to 1 the file will still have the extension
+        of the first file type instead of the second one. E.g. when file
+        types are foo and bar, a filename "myletter" with SetDialogIndex(1)
+        would result in saving as myletter.foo, while we want myletter.bar.
+        */
+        if(m_firstFileTypeFilter > 0)
         {
-            panel = sPanel;
-            result = wxID_OK;
-
-            wxCFStringRef filename( [[sPanel filename] retain] );
-
-            m_path = filename.AsString();
-            m_fileName = wxFileNameFromPath(m_path);
-            m_dir = wxPathOnly( m_path );
+            DoOnFilterSelected(m_firstFileTypeFilter);
         }
+
+        returnCode = [sPanel runModalForDirectory: m_dir.IsEmpty() ? nil : dir.AsNSString() file:file.AsNSString() ];
+        ModalFinishedCallback(sPanel, returnCode);
     }
     else
     {
-        NSArray* types = GetTypesFromFilter( m_wildCard ) ;
         NSOpenPanel* oPanel = [NSOpenPanel openPanel];
+        
+        SetupExtraControls(oPanel);
+                
         [oPanel setTreatsFilePackagesAsDirectories:NO];
         [oPanel setCanChooseDirectories:NO];
         [oPanel setResolvesAliases:YES];
         [oPanel setCanChooseFiles:YES];
         [oPanel setMessage:cf.AsNSString()];
+        [oPanel setAllowsMultipleSelection: (HasFlag(wxFD_MULTIPLE) ? YES : NO )];
 
-        if ( [oPanel runModalForDirectory:dir.AsNSString() file:file.AsNSString() types:types] == NSOKButton )
+#if MAC_OS_X_VERSION_MAX_ALLOWED >= 1060
+        if ( UMAGetSystemVersion() >= 0x1060 && HasAppKit_10_6() )
+        {
+            [oPanel setAllowedFileTypes: (m_delegate == nil ? types : nil)];
+            if ( !m_dir.IsEmpty() )
+                [oPanel setDirectoryURL:[NSURL fileURLWithPath:dir.AsNSString() 
+                                                   isDirectory:YES]];
+            returnCode = [oPanel runModal];
+        }
+        else 
+#endif
+        {
+            returnCode = [oPanel runModalForDirectory:m_dir.IsEmpty() ? nil : dir.AsNSString()
+                                                 file:file.AsNSString() types:(m_delegate == nil ? types : nil)];
+        }
+            
+        ModalFinishedCallback(oPanel, returnCode);
+    }
+
+    return GetReturnCode();
+}
+
+void wxFileDialog::ModalFinishedCallback(void* panel, int returnCode)
+{
+    int result = wxID_CANCEL;
+    if (HasFlag(wxFD_SAVE))
+    {
+        if (returnCode == NSOKButton )
+        {
+            NSSavePanel* sPanel = (NSSavePanel*)panel;
+            result = wxID_OK;
+
+            m_path = wxCFStringRef::AsString([sPanel filename]);
+            m_fileName = wxFileNameFromPath(m_path);
+            m_dir = wxPathOnly( m_path );
+            if (m_filterChoice)
+            {
+                m_filterIndex = m_filterChoice->GetSelection();
+            }
+        }
+    }
+    else
+    {
+        NSOpenPanel* oPanel = (NSOpenPanel*)panel;
+        if (returnCode == NSOKButton )
         {
             panel = oPanel;
             result = wxID_OK;
             NSArray* filenames = [oPanel filenames];
             for ( size_t i = 0 ; i < [filenames count] ; ++ i )
             {
-                wxCFStringRef filename( [(NSString*) [filenames objectAtIndex:i] retain] );
-                wxString fnstr = filename.AsString();
+                wxString fnstr = wxCFStringRef::AsString([filenames objectAtIndex:i]);
                 m_paths.Add( fnstr );
                 m_fileNames.Add( wxFileNameFromPath(fnstr) );
                 if ( i == 0 )
@@ -206,11 +681,20 @@ int wxFileDialog::ShowModal()
                 }
             }
         }
-        if ( types != nil )
-            [types release];
+        if ( m_delegate )
+        {
+            [oPanel setDelegate:nil];
+            [m_delegate release];
+            m_delegate = nil;
+        }
     }
-
-    return result;
+    SetReturnCode(result);
+    
+    if (GetModality() == wxDIALOG_MODALITY_WINDOW_MODAL)
+        SendWindowModalDialogEvent ( wxEVT_WINDOW_MODAL_DIALOG_CLOSED  );
+    
+    UnsubclassWin();
+    [(NSSavePanel*) panel setAccessoryView:nil];
 }
 
 #endif // wxUSE_FILEDLG