In .:
[mono.git] / mcs / class / Managed.Windows.Forms / System.Windows.Forms.CarbonInternal / EventHandler.cs
1 // Permission is hereby granted, free of charge, to any person obtaining
2 // a copy of this software and associated documentation files (the
3 // "Software"), to deal in the Software without restriction, including
4 // without limitation the rights to use, copy, modify, merge, publish,
5 // distribute, sublicense, and/or sell copies of the Software, and to
6 // permit persons to whom the Software is furnished to do so, subject to
7 // 
8 // The above copyright notice and this permission notice shall be
9 // included in all copies or substantial portions of the Software.
10 // 
11 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
12 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
13 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
14 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
15 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
16 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
17 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
18 //
19 // Copyright (c) 2007 Novell, Inc.
20 //
21 // Authors:
22 //      Geoff Norton  <gnorton@novell.com>
23 //
24 //
25
26 using System;
27 using System.Runtime.InteropServices;
28
29 namespace System.Windows.Forms.CarbonInternal {
30         internal delegate int EventDelegate (IntPtr callref, IntPtr eventref, IntPtr user_data);
31
32         internal class EventHandler {
33                 internal static EventDelegate EventHandlerDelegate = new EventDelegate (EventCallback);
34                 internal static XplatUICarbon Driver;
35
36                 internal const int EVENT_NOT_HANDLED = 0;
37                 internal const int EVENT_HANDLED = -9874;
38
39                 internal const uint kEventClassMouse = 1836021107;
40                 internal const uint kEventClassKeyboard = 1801812322;
41                 internal const uint kEventClassTextInput = 1952807028;
42                 internal const uint kEventClassApplication = 1634758764;
43                 internal const uint kEventClassAppleEvent = 1701867619;
44                 internal const uint kEventClassMenu = 1835363957;
45                 internal const uint kEventClassWindow = 2003398244;
46                 internal const uint kEventClassControl = 1668183148;
47                 internal const uint kEventClassCommand = 1668113523;
48                 internal const uint kEventClassTablet = 1952607348;
49                 internal const uint kEventClassVolume = 1987013664;
50                 internal const uint kEventClassAppearance = 1634758765;
51                 internal const uint kEventClassService = 1936028278;
52                 internal const uint kEventClassToolbar = 1952604530;
53                 internal const uint kEventClassToolbarItem = 1952606580;
54                 internal const uint kEventClassAccessibility = 1633903461;
55                 internal const uint kEventClassHIObject = 1751740258;
56                 
57                 internal static EventTypeSpec [] HIObjectEvents = new EventTypeSpec [] {
58                                                                         new EventTypeSpec (kEventClassHIObject, HIObjectHandler.kEventHIObjectConstruct),
59                                                                         new EventTypeSpec (kEventClassHIObject, HIObjectHandler.kEventHIObjectInitialize),
60                                                                         new EventTypeSpec (kEventClassHIObject, HIObjectHandler.kEventHIObjectDestruct)
61                                                                         };
62                 internal static EventTypeSpec [] ControlEvents = new EventTypeSpec [] {
63                                                                         new EventTypeSpec (kEventClassControl, ControlHandler.kEventControlBoundsChanged), 
64                                                                         new EventTypeSpec (kEventClassControl, ControlHandler.kEventControlDraw),
65                                                                         new EventTypeSpec (kEventClassControl, ControlHandler.kEventControlDragEnter),
66                                                                         new EventTypeSpec (kEventClassControl, ControlHandler.kEventControlDragWithin),
67                                                                         new EventTypeSpec (kEventClassControl, ControlHandler.kEventControlDragLeave),
68                                                                         new EventTypeSpec (kEventClassControl, ControlHandler.kEventControlDragReceive),
69                                                                         new EventTypeSpec (kEventClassControl, ControlHandler.kEventControlGetFocusPart), 
70                                                                         new EventTypeSpec (kEventClassControl, ControlHandler.kEventControlInitialize), 
71                                                                         new EventTypeSpec (kEventClassControl, ControlHandler.kEventControlVisibilityChanged) 
72                                                                         };
73
74                 internal static EventTypeSpec [] ApplicationEvents = new EventTypeSpec[] {
75                                                                         new EventTypeSpec (kEventClassApplication, ApplicationHandler.kEventAppActivated),
76                                                                         new EventTypeSpec (kEventClassApplication, ApplicationHandler.kEventAppDeactivated)
77                                                                         };
78                 
79                 private static EventTypeSpec [] WindowEvents = new EventTypeSpec[] {
80                                                                         new EventTypeSpec (kEventClassMouse, MouseHandler.kEventMouseMoved),
81                                                                         new EventTypeSpec (kEventClassMouse, MouseHandler.kEventMouseDragged),
82                                                                         new EventTypeSpec (kEventClassMouse, MouseHandler.kEventMouseDown),
83                                                                         new EventTypeSpec (kEventClassMouse, MouseHandler.kEventMouseUp),
84                                                                         new EventTypeSpec (kEventClassMouse, MouseHandler.kEventMouseWheelMoved),
85                                                                         new EventTypeSpec (kEventClassMouse, MouseHandler.kEventMouseScroll),
86
87                                                                         new EventTypeSpec (kEventClassWindow, WindowHandler.kEventWindowDeactivated),
88                                                                         new EventTypeSpec (kEventClassWindow, WindowHandler.kEventWindowActivated),
89                                                                         new EventTypeSpec (kEventClassWindow, WindowHandler.kEventWindowDeactivated),
90                                                                         new EventTypeSpec (kEventClassWindow, WindowHandler.kEventWindowCollapsing),
91                                                                         new EventTypeSpec (kEventClassWindow, WindowHandler.kEventWindowExpanding),
92                                                                         new EventTypeSpec (kEventClassWindow, WindowHandler.kEventWindowBoundsChanged),
93                                                                         new EventTypeSpec (kEventClassWindow, WindowHandler.kEventWindowResizeStarted),
94                                                                         new EventTypeSpec (kEventClassWindow, WindowHandler.kEventWindowResizeCompleted),
95                                                                         new EventTypeSpec (kEventClassWindow, WindowHandler.kEventWindowClose),
96                                                                         new EventTypeSpec (kEventClassWindow, WindowHandler.kEventWindowShown),
97
98                                                                         new EventTypeSpec (kEventClassKeyboard, KeyboardHandler.kEventRawKeyModifiersChanged),
99                                                                         new EventTypeSpec (kEventClassKeyboard, KeyboardHandler.kEventRawKeyDown),
100                                                                         new EventTypeSpec (kEventClassKeyboard, KeyboardHandler.kEventRawKeyRepeat),
101                                                                         new EventTypeSpec (kEventClassKeyboard, KeyboardHandler.kEventRawKeyUp),
102                                                                         new EventTypeSpec (kEventClassTextInput, KeyboardHandler.kEventTextInputUnicodeForKeyEvent)
103                                                                         };
104
105                 internal static int EventCallback (IntPtr callref, IntPtr eventref, IntPtr handle) {
106                         uint klass = GetEventClass (eventref);
107                         uint kind = GetEventKind (eventref);
108                         MSG msg = new MSG ();
109                         IEventHandler handler = null;
110
111                         switch (klass) {
112                                 case kEventClassHIObject: {
113                                         handler = (IEventHandler) Driver.HIObjectHandler;
114                                         break;
115                                 }
116                                 case kEventClassKeyboard:
117                                 case kEventClassTextInput:
118                                         handler = (IEventHandler) Driver.KeyboardHandler;
119                                         break;
120                                 case kEventClassWindow:
121                                         handler = (IEventHandler) Driver.WindowHandler;
122                                         break;
123                                 case kEventClassMouse:
124                                         handler = (IEventHandler) Driver.MouseHandler;
125                                         break;
126                                 case kEventClassControl:
127                                         handler = (IEventHandler) Driver.ControlHandler;
128                                         break;
129                                 case kEventClassApplication:
130                                         handler = (IEventHandler) Driver.ApplicationHandler;
131                                         break;
132                                 default:
133                                         return EVENT_NOT_HANDLED;
134                         }
135
136                         if (handler.ProcessEvent (callref, eventref, handle, kind, ref msg)) {
137                                 Driver.EnqueueMessage (msg);
138                                 return EVENT_HANDLED;
139                         }
140                         
141                         return EVENT_NOT_HANDLED;
142                 }
143
144                 internal static bool TranslateMessage (ref MSG msg) {
145                         bool result = false;
146  
147                         if (!result)
148                                 result = Driver.KeyboardHandler.TranslateMessage (ref msg);
149                         if (!result)
150                                 result = Driver.MouseHandler.TranslateMessage (ref msg);
151
152                         return result;
153                 }
154
155                 internal static void InstallApplicationHandler () {
156                         InstallEventHandler (GetApplicationEventTarget (), EventHandlerDelegate, (uint)ApplicationEvents.Length, ApplicationEvents, IntPtr.Zero, IntPtr.Zero);
157                 }
158
159                 internal static void InstallControlHandler (IntPtr control) {
160                         InstallEventHandler (GetControlEventTarget (control), EventHandlerDelegate, (uint)ControlEvents.Length, ControlEvents, control, IntPtr.Zero);
161                 }
162                 
163                 internal static void InstallWindowHandler (IntPtr window) {
164                         InstallEventHandler (GetWindowEventTarget (window), EventHandlerDelegate, (uint)WindowEvents.Length, WindowEvents, window, IntPtr.Zero);
165                 }
166
167                 [DllImport ("/System/Library/Frameworks/Carbon.framework/Versions/Current/Carbon")]
168                 static extern IntPtr GetApplicationEventTarget ();
169                 [DllImport ("/System/Library/Frameworks/Carbon.framework/Versions/Current/Carbon")]
170                 internal static extern IntPtr GetControlEventTarget (IntPtr control);
171                 [DllImport("/System/Library/Frameworks/Carbon.framework/Versions/Current/Carbon")]
172                 internal static extern IntPtr GetWindowEventTarget (IntPtr window);
173
174                 [DllImport ("/System/Library/Frameworks/Carbon.framework/Versions/Current/Carbon")]
175                 internal static extern uint GetEventClass (IntPtr eventref);
176                 [DllImport ("/System/Library/Frameworks/Carbon.framework/Versions/Current/Carbon")]
177                 static extern uint GetEventKind (IntPtr eventref);
178                 
179                 [DllImport ("/System/Library/Frameworks/Carbon.framework/Versions/Current/Carbon")]
180                 static extern int InstallEventHandler (IntPtr window, EventDelegate event_handler, uint count, EventTypeSpec [] types, IntPtr user_data, IntPtr handlerref);
181         }
182 }