4 * Copyright 1993 David Metcalfe
5 * 1994 Alexandre Julliard
10 #include "wine/winuser16.h"
16 #include "debugtools.h"
18 DEFAULT_DEBUG_CHANNEL(win)
21 /*****************************************************************
23 * pMsgQ is the queue whose perQData focus is to be modified
25 void FOCUS_SwitchFocus( MESSAGEQUEUE *pMsgQ, HWND hFocusFrom, HWND hFocusTo )
27 WND *pFocusTo = WIN_FindWndPtr( hFocusTo );
29 PERQDATA_SetFocusWnd( pMsgQ->pQData, hFocusTo );
32 if (hFocusFrom) SendMessageA( hFocusFrom, WM_KILLFOCUS, hFocusTo, 0 );
34 /* FIXME: must be SendMessage16() because 32A doesn't do
35 * intertask at this time */
36 if (hFocusFrom) SendMessage16( hFocusFrom, WM_KILLFOCUS, hFocusTo, 0 );
39 if( !pFocusTo || hFocusTo != PERQDATA_GetFocusWnd( pMsgQ->pQData ) )
41 WIN_ReleaseWndPtr(pFocusTo);
45 /* According to API docs, the WM_SETFOCUS message is sent AFTER the window
46 has received the keyboard focus. */
48 pFocusTo->pDriver->pSetFocus(pFocusTo);
50 WIN_ReleaseWndPtr(pFocusTo);
52 SendMessageA( hFocusTo, WM_SETFOCUS, hFocusFrom, 0 );
54 SendMessage16( hFocusTo, WM_SETFOCUS, hFocusFrom, 0 );
59 /*****************************************************************
60 * SetFocus16 (USER.22)
62 HWND16 WINAPI SetFocus16( HWND16 hwnd )
64 return (HWND16)SetFocus( hwnd );
68 /*****************************************************************
69 * SetFocus32 (USER32.481)
71 HWND WINAPI SetFocus( HWND hwnd )
73 HWND hWndFocus = 0, hwndTop = hwnd;
74 WND *wndPtr = WIN_FindWndPtr( hwnd );
75 MESSAGEQUEUE *pMsgQ = 0, *pCurMsgQ = 0;
78 /* Get the messageQ for the current thread */
79 if (!(pCurMsgQ = (MESSAGEQUEUE *)QUEUE_Lock( GetFastQueue16() )))
81 WARN("\tCurrent message queue not found. Exiting!\n" );
87 /* Check if we can set the focus to this window */
89 while ( (wndPtr->dwStyle & (WS_CHILD | WS_POPUP)) == WS_CHILD )
91 if ( wndPtr->dwStyle & ( WS_MINIMIZE | WS_DISABLED) )
93 WIN_UpdateWndPtr(&wndPtr,wndPtr->parent);
94 if (!wndPtr) goto CLEANUP;
95 hwndTop = wndPtr->hwndSelf;
98 /* definitely at the top window now */
99 if ( wndPtr->dwStyle & ( WS_MINIMIZE | WS_DISABLED) ) goto CLEANUP;
101 /* Retrieve the message queue associated with this window */
102 pMsgQ = (MESSAGEQUEUE *)QUEUE_Lock( wndPtr->hmemTaskQ );
105 WARN("\tMessage queue not found. Exiting!\n" );
109 /* Make sure that message queue for the window we are setting focus to
110 * shares the same perQ data as the current threads message queue.
111 * In other words you can't set focus to a window owned by a different
112 * thread unless AttachThreadInput has been called previously.
113 * (see AttachThreadInput and SetFocus docs)
115 if ( pCurMsgQ->pQData != pMsgQ->pQData )
118 /* Get the current focus window from the perQ data */
119 hWndFocus = PERQDATA_GetFocusWnd( pMsgQ->pQData );
121 if( hwnd == hWndFocus )
123 bRet = 1; /* Success */
124 goto CLEANUP; /* Nothing to do */
128 if( HOOK_CallHooks16( WH_CBT, HCBT_SETFOCUS, (WPARAM16)hwnd,
132 /* activate hwndTop if needed. */
133 if (hwndTop != GetActiveWindow())
135 if (!WINPOS_SetActiveWindow(hwndTop, 0, 0)) goto CLEANUP;
137 if (!IsWindow( hwnd )) goto CLEANUP; /* Abort if window destroyed */
140 /* Get the current focus window from the perQ data */
141 hWndFocus = PERQDATA_GetFocusWnd( pMsgQ->pQData );
143 /* Change focus and send messages */
144 FOCUS_SwitchFocus( pMsgQ, hWndFocus, hwnd );
146 else /* NULL hwnd passed in */
148 if( HOOK_CallHooks16( WH_CBT, HCBT_SETFOCUS, 0, (LPARAM)hWndFocus ) )
151 /* Get the current focus from the perQ data of the current message Q */
152 hWndFocus = PERQDATA_GetFocusWnd( pCurMsgQ->pQData );
154 /* Change focus and send messages */
155 FOCUS_SwitchFocus( pCurMsgQ, hWndFocus, hwnd );
158 bRet = 1; /* Success */
162 /* Unlock the queues before returning */
164 QUEUE_Unlock( pMsgQ );
166 QUEUE_Unlock( pCurMsgQ );
168 WIN_ReleaseWndPtr(wndPtr);
169 return bRet ? hWndFocus : 0;
173 /*****************************************************************
174 * GetFocus16 (USER.23)
176 HWND16 WINAPI GetFocus16(void)
178 return (HWND16)GetFocus();
182 /*****************************************************************
183 * GetFocus32 (USER32.240)
185 HWND WINAPI GetFocus(void)
187 MESSAGEQUEUE *pCurMsgQ = 0;
190 /* Get the messageQ for the current thread */
191 if (!(pCurMsgQ = (MESSAGEQUEUE *)QUEUE_Lock( GetFastQueue16() )))
193 WARN("\tCurrent message queue not found. Exiting!\n" );
197 /* Get the current focus from the perQ data of the current message Q */
198 hwndFocus = PERQDATA_GetFocusWnd( pCurMsgQ->pQData );
200 QUEUE_Unlock( pCurMsgQ );