Updated list of subprojects.

[wxWidgets.git] / src / html / htmlctrl / webkit / webkit.mm

diff --git a/src/html/htmlctrl/webkit/webkit.mm b/src/html/htmlctrl/webkit/webkit.mm
index 592f68fe0939d88889c4b1129b170418cb69d918..160a02c7805a21bee325374b8b56694cec9ba46b 100755 (executable)
--- a/src/html/htmlctrl/webkit/webkit.mm
+++ b/src/html/htmlctrl/webkit/webkit.mm
@@ -15,6 +15,7 @@
 
 // For compilers that support precompilation, includes "wx.h".
 #include "wx/wxprec.h"
 
 // For compilers that support precompilation, includes "wx.h".
 #include "wx/wxprec.h"

+#include "wx/splitter.h"

 
 #ifndef WX_PRECOMP
     #include "wx/wx.h"
 
 #ifndef WX_PRECOMP
     #include "wx/wx.h"


@@ -27,26 +28,106 @@
 #else
 #include "wx/mac/uma.h"
 #include <Carbon/Carbon.h>
 #else
 #include "wx/mac/uma.h"
 #include <Carbon/Carbon.h>

+#include <WebKit/WebKit.h>

 #include <WebKit/HIWebView.h>
 #include <WebKit/CarbonUtils.h>
 #endif
 
 #include "wx/html/webkit.h"
 #include <WebKit/HIWebView.h>
 #include <WebKit/CarbonUtils.h>
 #endif
 
 #include "wx/html/webkit.h"

-#include "wx/notebook.h"

 
 

+#define DEBUG_WEBKIT_SIZING 0

 
 // ----------------------------------------------------------------------------
 // macros
 // ----------------------------------------------------------------------------
 
 
 // ----------------------------------------------------------------------------
 // macros
 // ----------------------------------------------------------------------------
 

-#if !USE_SHARED_LIBRARY

 IMPLEMENT_DYNAMIC_CLASS(wxWebKitCtrl, wxControl)
 IMPLEMENT_DYNAMIC_CLASS(wxWebKitCtrl, wxControl)

-#endif

 
 BEGIN_EVENT_TABLE(wxWebKitCtrl, wxControl)
     EVT_SIZE(wxWebKitCtrl::OnSize)
 END_EVENT_TABLE()
 
 
 BEGIN_EVENT_TABLE(wxWebKitCtrl, wxControl)
     EVT_SIZE(wxWebKitCtrl::OnSize)
 END_EVENT_TABLE()
 

+// ----------------------------------------------------------------------------
+// Carbon Events handlers
+// ----------------------------------------------------------------------------
+
+// prototype for function in src/mac/carbon/toplevel.cpp
+void SetupMouseEvent( wxMouseEvent &wxevent , wxMacCarbonEvent &cEvent );
+
+static const EventTypeSpec eventList[] =
+{
+    //{ kEventClassControl, kEventControlTrack } ,
+    { kEventClassMouse, kEventMouseUp },
+    { kEventClassMouse, kEventMouseDown },
+    { kEventClassMouse, kEventMouseMoved },
+    { kEventClassMouse, kEventMouseDragged },
+#if DEBUG_WEBKIT_SIZING == 1
+    { kEventClassControl, kEventControlBoundsChanged } ,
+#endif
+};
+
+static pascal OSStatus wxWebKitCtrlEventHandler( EventHandlerCallRef handler , EventRef event , void *data )
+{
+    OSStatus result = eventNotHandledErr ;
+
+    wxMacCarbonEvent cEvent( event ) ;
+
+    ControlRef controlRef ;
+    wxWebKitCtrl* thisWindow = (wxWebKitCtrl*) data ;
+    wxTopLevelWindowMac* tlw = NULL;
+    if (thisWindow)
+        tlw = thisWindow->MacGetTopLevelWindow();
+
+    cEvent.GetParameter( kEventParamDirectObject , &controlRef ) ;
+    
+    wxWindow* currentMouseWindow = thisWindow ;
+    
+    if ( wxApp::s_captureWindow )
+        currentMouseWindow = wxApp::s_captureWindow;
+
+    switch ( GetEventKind( event ) )
+    {
+        case kEventMouseDragged :
+        case kEventMouseMoved :
+            {
+                wxMouseEvent wxevent(wxEVT_LEFT_DOWN);
+                SetupMouseEvent( wxevent , cEvent ) ;
+                
+                currentMouseWindow->ScreenToClient( &wxevent.m_x , &wxevent.m_y ) ;
+                wxevent.SetEventObject( currentMouseWindow ) ;
+                wxevent.SetId( currentMouseWindow->GetId() ) ;
+                
+                if ( currentMouseWindow->GetEventHandler()->ProcessEvent(wxevent) )
+                {
+                    result = noErr;
+                }
+
+                break; // this should enable WebKit to fire mouse dragged and mouse up events...
+            }
+
+        case kEventControlBoundsChanged:
+            {
+                // this is just here for debugging, so we can note any differences between
+                // native event sizes and the sizes the wxWindow receives.
+                Rect origBounds = cEvent.GetParameter<Rect>(kEventParamOriginalBounds, typeQDRectangle) ;
+                Rect prevBounds = cEvent.GetParameter<Rect>(kEventParamPreviousBounds, typeQDRectangle) ;
+                Rect curBounds = cEvent.GetParameter<Rect>(kEventParamCurrentBounds, typeQDRectangle) ;
+                    
+                fprintf(stderr, "Orig bounds x=%d, y=%d, height=%d, width=%d\n", origBounds.left, origBounds.top, origBounds.bottom -origBounds.top, origBounds.right - origBounds.left);
+                fprintf(stderr, "Prev bounds x=%d, y=%d, height=%d, width=%d\n", prevBounds.left, prevBounds.top, prevBounds.bottom -prevBounds.top, prevBounds.right - prevBounds.left);
+                fprintf(stderr, "Cur bounds x=%d, y=%d, height=%d, width=%d\n", curBounds.left, curBounds.top, curBounds.bottom -curBounds.top, curBounds.right - curBounds.left);
+            }
+        default :
+            break ;
+    }
+
+    result = CallNextEventHandler(handler, event);
+    return result ;
+}
+
+DEFINE_ONE_SHOT_HANDLER_GETTER( wxWebKitCtrlEventHandler )
+
+

 // ----------------------------------------------------------------------------
 // wxWebKit Events
 // ----------------------------------------------------------------------------
 // ----------------------------------------------------------------------------
 // wxWebKit Events
 // ----------------------------------------------------------------------------


@@ -62,6 +143,18 @@ wxWebKitStateChangedEvent::wxWebKitStateChangedEvent( wxWindow* win )
     SetId(win->GetId());
 }
 
     SetId(win->GetId());
 }
 

+IMPLEMENT_DYNAMIC_CLASS( wxWebKitBeforeLoadEvent, wxCommandEvent )
+
+DEFINE_EVENT_TYPE( wxEVT_WEBKIT_BEFORE_LOAD )
+
+wxWebKitBeforeLoadEvent::wxWebKitBeforeLoadEvent( wxWindow* win )
+{
+    m_cancelled = false;
+    SetEventType( wxEVT_WEBKIT_BEFORE_LOAD);
+    SetEventObject( win );
+    SetId(win->GetId());
+}
+

 //---------------------------------------------------------
 // helper functions for NSString<->wxString conversion
 //---------------------------------------------------------
 //---------------------------------------------------------
 // helper functions for NSString<->wxString conversion
 //---------------------------------------------------------


@@ -84,12 +177,40 @@ inline NSString* wxNSStringWithWxString(const wxString &wxstring)
 #endif // wxUSE_UNICODE
 }
 
 #endif // wxUSE_UNICODE
 }
 

+inline int wxNavTypeFromWebNavType(int type){
+    if (type == WebNavigationTypeLinkClicked)
+        return wxWEBKIT_NAV_LINK_CLICKED;
+    
+    if (type == WebNavigationTypeFormSubmitted)
+        return wxWEBKIT_NAV_FORM_SUBMITTED;
+        
+    if (type == WebNavigationTypeBackForward)
+        return wxWEBKIT_NAV_BACK_NEXT;
+        
+    if (type == WebNavigationTypeReload)
+        return wxWEBKIT_NAV_RELOAD;
+        
+    if (type == WebNavigationTypeFormResubmitted)
+        return wxWEBKIT_NAV_FORM_RESUBMITTED;
+        
+    return wxWEBKIT_NAV_OTHER;
+}
+

 @interface MyFrameLoadMonitor : NSObject
 {
 @interface MyFrameLoadMonitor : NSObject
 {

-    wxWindow* webKitWindow;
+    wxWebKitCtrl* webKitWindow;

 }
 
 }
 

-- initWithWxWindow: (wxWindow*)inWindow;
+- initWithWxWindow: (wxWebKitCtrl*)inWindow;
+
+@end
+
+@interface MyPolicyDelegate : NSObject
+{
+    wxWebKitCtrl* webKitWindow;
+}
+
+- initWithWxWindow: (wxWebKitCtrl*)inWindow;

 
 @end
 
 
 @end
 


@@ -145,21 +266,34 @@ bool wxWebKitCtrl::Create(wxWindow *parent,
     SetInitialFrameRect(pos,sizeInstance);
 #else
     m_macIsUserPane = false;
     SetInitialFrameRect(pos,sizeInstance);
 #else
     m_macIsUserPane = false;

-       wxControl::Create(parent, m_windowID, pos, size, style , validator , name);
+    wxControl::Create(parent, winID, pos, size, style , validator , name);

     m_peer = new wxMacControl(this);
     WebInitForCarbon();
     HIWebViewCreate( m_peer->GetControlRefAddr() );
 
     m_webView = (WebView*) HIWebViewGetWebView( m_peer->GetControlRef() );
     m_peer = new wxMacControl(this);
     WebInitForCarbon();
     HIWebViewCreate( m_peer->GetControlRefAddr() );
 
     m_webView = (WebView*) HIWebViewGetWebView( m_peer->GetControlRef() );

+    

     MacPostControlCreate(pos, size);
     HIViewSetVisible( m_peer->GetControlRef(), true );
     [m_webView setHidden:false];
     MacPostControlCreate(pos, size);
     HIViewSetVisible( m_peer->GetControlRef(), true );
     [m_webView setHidden:false];

+#if MAC_OS_X_VERSION_MAX_ALLOWED >= MAC_OS_X_VERSION_10_3
+    if ( UMAGetSystemVersion() >= 0x1030 )
+        HIViewChangeFeatures( m_peer->GetControlRef() , kHIViewIsOpaque , 0 ) ;
+#endif
+    InstallControlEventHandler( m_peer->GetControlRef() , GetwxWebKitCtrlEventHandlerUPP(),
+        GetEventTypeCount(eventList), eventList, this,
+        (EventHandlerRef *)&m_webKitCtrlEventHandler);
+

 #endif
 
     // Register event listener interfaces
 #endif
 
     // Register event listener interfaces

-    MyFrameLoadMonitor* myFrameLoadMonitor = [[MyFrameLoadMonitor alloc] initWithWxWindow: (wxWindow*)this];
+    MyFrameLoadMonitor* myFrameLoadMonitor = [[MyFrameLoadMonitor alloc] initWithWxWindow: this];

     [m_webView setFrameLoadDelegate:myFrameLoadMonitor];
     [m_webView setFrameLoadDelegate:myFrameLoadMonitor];

-
+    
+    // this is used to veto page loads, etc.
+    MyPolicyDelegate* myPolicyDelegate = [[MyPolicyDelegate alloc] initWithWxWindow: this];
+    [m_webView setPolicyDelegate:myPolicyDelegate];
+    

     LoadURL(m_currentURL);
     return true;
 }
     LoadURL(m_currentURL);
     return true;
 }


@@ -245,132 +379,203 @@ wxString wxWebKitCtrl::GetPageSource(){
     return wxEmptyString;
 }
 
     return wxEmptyString;
 }
 

-void wxWebKitCtrl::SetPageSource(wxString& source, const wxString& baseUrl){
+wxString wxWebKitCtrl::GetSelection(){
+    if ( !m_webView )
+        return wxEmptyString;
+        
+    NSString* selectedText = [[m_webView selectedDOMRange] toString];
+    return wxStringWithNSString( selectedText );
+}
+
+bool wxWebKitCtrl::CanIncreaseTextSize(){
+    if ( !m_webView )
+        return false;
+        
+    if ([m_webView canMakeTextLarger])
+        return true;
+    else
+        return false;
+}
+
+void wxWebKitCtrl::IncreaseTextSize(){

     if ( !m_webView )
         return;
     if ( !m_webView )
         return;

+        
+    if (CanIncreaseTextSize())
+        [m_webView makeTextLarger:(WebView*)m_webView];
+}

 
 

-    if (CanGetPageSource()){
-        [[m_webView mainFrame] loadHTMLString:(NSString*)wxNSStringWithWxString( source ) baseURL:[NSURL URLWithString:wxNSStringWithWxString( baseUrl )]];
+bool wxWebKitCtrl::CanDecreaseTextSize(){
+    if ( !m_webView )
+        return false;
+        
+    if ([m_webView canMakeTextSmaller])
+        return true;
+    else
+        return false;
+}
+
+void wxWebKitCtrl::DecreaseTextSize(){
+    if ( !m_webView )
+        return;
+        
+    if (CanDecreaseTextSize())
+        [m_webView makeTextSmaller:(WebView*)m_webView];
+}
+
+void wxWebKitCtrl::SetPageSource(const wxString& source, const wxString& baseUrl){
+    if ( !m_webView )
+        return;
+
+    [[m_webView mainFrame] loadHTMLString:(NSString*)wxNSStringWithWxString( source ) baseURL:[NSURL URLWithString:wxNSStringWithWxString( baseUrl )]];
+
+}
+
+void wxWebKitCtrl::Print(bool showPrompt){
+    if ( !m_webView )
+        return;
+    
+    id view = [[[m_webView mainFrame] frameView] documentView]; 
+    NSPrintOperation *op = [NSPrintOperation printOperationWithView:view printInfo: [NSPrintInfo sharedPrintInfo]]; 
+    if (showPrompt){
+        [op setShowsPrintPanel: showPrompt];
+        // in my tests, the progress bar always freezes and it stops the whole print operation.
+        // do not turn this to true unless there is a workaround for the bug.
+        [op setShowsProgressPanel: false];

     }
     }

+    // Print it. 
+    [op runOperation]; 
+}
+
+void wxWebKitCtrl::MakeEditable(bool enable){
+    if ( !m_webView )
+        return;
+
+    [m_webView setEditable:enable ];
+}
+
+bool wxWebKitCtrl::IsEditable(){
+    if ( !m_webView )
+        return false;
+
+    return [m_webView isEditable];
+}
+
+int wxWebKitCtrl::GetScrollPos(){
+    id result = [[m_webView windowScriptObject] evaluateWebScript:@"document.body.scrollTop"];
+    return [result intValue];
+}   
+
+void wxWebKitCtrl::SetScrollPos(int pos){
+    if ( !m_webView )
+        return;
+        
+    wxString javascript; 
+    javascript.Printf(wxT("document.body.scrollTop = %d;"), pos);
+    [[m_webView windowScriptObject] evaluateWebScript:(NSString*)wxNSStringWithWxString( javascript )];
+}
+
+wxString wxWebKitCtrl::RunScript(const wxString& javascript){
+    if ( !m_webView )
+        return wxEmptyString;    
+        
+    id result = [[m_webView windowScriptObject] evaluateWebScript:(NSString*)wxNSStringWithWxString( javascript )];
+    
+    NSString* resultAsString;
+    wxString resultAsWxString = wxEmptyString;
+    NSString* className = NSStringFromClass([result class]);
+    if ([className isEqualToString:@"NSCFNumber"])
+        resultAsString = [NSString stringWithFormat:@"%@", result];
+    else if ([className isEqualToString:@"NSCFString"])
+        resultAsString = result;
+    else if ([className isEqualToString:@"NSCFBoolean"]){
+        if ([result boolValue])
+            resultAsString = @"true";
+        else
+            resultAsString = @"false";
+    }
+    else if ([className isEqualToString:@"WebScriptObject"])
+        resultAsString = [result stringRepresentation];
+    else
+        fprintf(stderr, "wxWebKitCtrl::RunScript - Unexpected return type: %s!\n", [className UTF8String]);

 
 

+    resultAsWxString = wxStringWithNSString( resultAsString );
+    return resultAsWxString;

 }
 
 void wxWebKitCtrl::OnSize(wxSizeEvent &event){
     // This is a nasty hack because WebKit seems to lose its position when it is embedded
     // in a control that is not itself the content view for a TLW.
 }
 
 void wxWebKitCtrl::OnSize(wxSizeEvent &event){
     // This is a nasty hack because WebKit seems to lose its position when it is embedded
     // in a control that is not itself the content view for a TLW.

-       // I put it in OnSize because these calcs are not perfect, and in fact are basically 
-       // guesses based on reverse engineering, so it's best to give people the option of
-       // overriding OnSize with their own calcs if need be.
-       // I also left some test debugging print statements as a convenience if a(nother)
-       // problem crops up.
-       
-       // Let's hope that Tiger fixes this mess...
-       
-       int x, y; 
-       x = 0;
-       y = 0;
-       
-       bool isParentTopLevel = true;
-                       
-       wxWindow* parent = GetParent();
-       
-       wxWindow* tlw = MacGetTopLevelWindow();
-       
-       // This must be the case that Apple tested with, because well, in this one case
-       // we don't need to do anything! It just works. ;)
-       if (parent == tlw){
-               return;
-       }
-                                       
-       while(parent != NULL)
-       {
-               if ( parent->GetClassInfo()->GetClassName() == wxT("wxSplitterWindow") ){
-                       //do nothing in this case
-               }
-               else{
-                       if (!parent->IsTopLevel()) {
-                               //printf("Parent: %s\n", parent->GetClassInfo()->GetClassName());
-                               int plusx = 0;
-                               plusx = parent->GetClientAreaOrigin().x + parent->GetPosition().x; 
-                               if (plusx > 0){
-                                       x += plusx; 
-                                       //printf("Parent: %s Added x: %d\n", parent->GetClassInfo()->GetClassName(), parent->GetClientAreaOrigin().x + parent->GetPosition().x);
-                               }
-                               
-                               int plusy = 0;
-                               plusy = parent->GetClientAreaOrigin().y + parent->GetPosition().y;
-                               if (plusy > 0){
-                                       y += plusy; 
-                                       //printf("Parent: %s Added y: %d\n", parent->GetClassInfo()->GetClassName(), parent->GetClientAreaOrigin().y + parent->GetPosition().y);
-                               }
-                               else{
-                                       //printf("Parent: %s Origin: %d Position:%d\n", parent->GetClassInfo()->GetClassName(), parent->GetClientAreaOrigin().y, parent->GetPosition().y);
-                               }
-                               
-                       }
-                       else{
-                               // 
-                               x += parent->GetClientAreaOrigin().x;
-                               // calculate the title bar height (26 pixels) into the top offset.
-                               // This becomes important later when we must flip the y coordinate
-                               // to convert to Cocoa's coordinate system.
-                               y += parent->GetClientAreaOrigin().y += 26;
-                               //printf("x: %d, y:%d\n", x, y);
-                       }
-                       //we still need to add the y, because we have to convert/flip coordinates for Cocoa
-
-                       if ( parent->IsKindOf( CLASSINFO( wxNotebook ) )  ){
-                               //Not sure why calcs are off in this one scenario...
-                               x -= 3;
-                               //printf("x: %d, y:%d\n", x, y);
-                       }
-                       
-                       if (parent->IsKindOf( CLASSINFO( wxPanel ) ) ){
-                               // Another strange case. Adding a wxPanel to the parent heirarchy
-                               // causes wxWebKitCtrl's Cocoa y origin to be 4 pixels off 
-                               // for some reason, even if the panel has a position and origin of 0. 
-                               // This corrects that. Man, I wish I could debug Carbon/HIWebView!! ;)
-                               y -= 4;
-                       }
-               }
-
-               parent = parent->GetParent();
-       }
-
-       // Tried using MacWindowToRootWindow both for wxWebKitCtrl and its parent,
-       // but coordinates were off by a significant amount.
-       // Am leaving the code here if anyone wants to play with it.
-       
-       //int x2, y2 = 0;
-       //if (GetParent())
-       //      GetParent()->MacWindowToRootWindow(&x2, &y2);
-       //printf("x = %d, y = %d\n", x, y);
-       //printf("x2 = %d, y2 = %d\n", x2, y2);
-       //x = x2;
-       //y = y2;
-       
-       if (tlw){
-               //flip the y coordinate to convert to Cocoa coordinates
-               //printf("tlw y: %d, y: %d\n", tlw->GetSize().y, (GetSize().y + y));
-               y = tlw->GetSize().y - ((GetSize().y) + y);
-       }
-                       
-       //printf("Added to bounds x=%d, y=%d\n", x, y);
-       NSRect bounds = [m_webView frame];
-       bounds.origin.x = x;
-       bounds.origin.y = y;
-       [m_webView setFrame:bounds];
-
-    //printf("Carbon position x=%d, y=%d\n", GetPosition().x, GetPosition().y);
+    // I put it in OnSize because these calcs are not perfect, and in fact are basically
+    // guesses based on reverse engineering, so it's best to give people the option of
+    // overriding OnSize with their own calcs if need be.
+    // I also left some test debugging print statements as a convenience if a(nother)
+    // problem crops up.
+
+    wxWindow* tlw = MacGetTopLevelWindow();
+
+    NSRect frame = [m_webView frame];
+    NSRect bounds = [m_webView bounds];
+    
+#if DEBUG_WEBKIT_SIZING
+    fprintf(stderr,"Carbon window x=%d, y=%d, width=%d, height=%d\n", GetPosition().x, GetPosition().y, GetSize().x, GetSize().y);
+    fprintf(stderr, "Cocoa window frame x=%G, y=%G, width=%G, height=%G\n", frame.origin.x, frame.origin.y, frame.size.width, frame.size.height);
+    fprintf(stderr, "Cocoa window bounds x=%G, y=%G, width=%G, height=%G\n", bounds.origin.x, bounds.origin.y, bounds.size.width, bounds.size.height);
+#endif
+
+    // This must be the case that Apple tested with, because well, in this one case
+    // we don't need to do anything! It just works. ;)
+    if (GetParent() == tlw){
+        return;
+    }
+
+    int x = GetPosition().x; 
+    int y = GetPosition().y;
+    
+    HIRect rect;
+    rect.origin.x = x;
+    rect.origin.y = y;
+
+#if DEBUG_WEBKIT_SIZING
+    printf("Before conversion, origin is: x = %d, y = %d\n", x, y);
+#endif
+
+    // NB: In most cases, when calling HIViewConvertRect, what people want is to use GetRootControl(),
+    // and this tripped me up at first. But in fact, what we want is the root view, because we need to
+    // make the y origin relative to the very top of the window, not its contents, since we later flip 
+    // the y coordinate for Cocoa. 
+    HIViewConvertRect (&rect, HIViewGetSuperview( m_peer->GetControlRef() ), 
+                                HIViewGetRoot( (WindowRef) MacGetTopLevelWindowRef() ) );
+
+    x = (int)rect.origin.x;
+    y = (int)rect.origin.y;
+
+#if DEBUG_WEBKIT_SIZING
+    printf("Moving Cocoa frame origin to: x = %d, y = %d\n", x, y);
+#endif
+
+    if (tlw){
+        //flip the y coordinate to convert to Cocoa coordinates
+        y = tlw->GetSize().y - ((GetSize().y) + y);
+    }
+
+#if DEBUG_WEBKIT_SIZING
+    printf("y = %d after flipping value\n", y);
+#endif
+
+    frame.origin.x = x;
+    frame.origin.y = y;
+    [m_webView setFrame:frame];
+   

     if (IsShown())
     if (IsShown())

-        [m_webView display];
+        [(WebView*)m_webView display];

     event.Skip();
 }
 
 void wxWebKitCtrl::MacVisibilityChanged(){
     bool isHidden = !IsControlVisible( m_peer->GetControlRef());
     if (!isHidden)
     event.Skip();
 }
 
 void wxWebKitCtrl::MacVisibilityChanged(){
     bool isHidden = !IsControlVisible( m_peer->GetControlRef());
     if (!isHidden)

-        [m_webView display];
+        [(WebView*)m_webView display];

 
     [m_webView setHidden:isHidden];
 }
 
     [m_webView setHidden:isHidden];
 }


@@ -381,7 +586,7 @@ void wxWebKitCtrl::MacVisibilityChanged(){
 
 @implementation MyFrameLoadMonitor
 
 
 @implementation MyFrameLoadMonitor
 

-- initWithWxWindow: (wxWindow*)inWindow
+- initWithWxWindow: (wxWebKitCtrl*)inWindow

 {
     [super init];
     webKitWindow = inWindow;    // non retained
 {
     [super init];
     webKitWindow = inWindow;    // non retained


@@ -446,9 +651,40 @@ void wxWebKitCtrl::MacVisibilityChanged(){
 - (void)webView:(WebView *)sender didReceiveTitle:(NSString *)title forFrame:(WebFrame *)frame
 {
     if (frame == [sender mainFrame]){
 - (void)webView:(WebView *)sender didReceiveTitle:(NSString *)title forFrame:(WebFrame *)frame
 {
     if (frame == [sender mainFrame]){

-        webKitWindow->SetTitle(wxStringWithNSString( title ));
+        webKitWindow->SetPageTitle(wxStringWithNSString( title ));

     }
 }
 @end
 
     }
 }
 @end
 

+@implementation MyPolicyDelegate
+
+- initWithWxWindow: (wxWebKitCtrl*)inWindow
+{
+    [super init];
+    webKitWindow = inWindow;    // non retained
+    return self;
+}
+
+- (void)webView:(WebView *)sender decidePolicyForNavigationAction:(NSDictionary *)actionInformation request:(NSURLRequest *)request frame:(WebFrame *)frame decisionListener:(id<WebPolicyDecisionListener>)listener
+{
+    wxWebKitBeforeLoadEvent thisEvent(webKitWindow);
+
+    // Get the navigation type. 
+    NSNumber *n = [actionInformation objectForKey:WebActionNavigationTypeKey]; 
+    int actionType = [n intValue];
+    thisEvent.SetNavigationType( wxNavTypeFromWebNavType(actionType) );
+    
+    NSString *url = [[request URL] absoluteString];
+    thisEvent.SetURL( wxStringWithNSString( url ) );
+    
+    webKitWindow->GetEventHandler()->ProcessEvent(thisEvent);
+
+       if (thisEvent.IsCancelled())
+        [listener ignore];
+    else
+        [listener use];
+}
+
+@end
+

 #endif //wxUSE_WEBKIT
 #endif //wxUSE_WEBKIT