Moved MAKEINTATOM to winbase.h and added Unicode version.
[wine] / windows / caret.c
1 /*
2  * Caret functions
3  *
4  * Copyright 1993 David Metcalfe
5  * Copyright 1996 Frans van Dorsselaer
6  */
7
8 #include "windef.h"
9 #include "winbase.h"
10 #include "wingdi.h"
11 #include "winuser.h"
12 #include "wine/wingdi16.h"
13 #include "wine/winuser16.h"
14 #include "win.h"
15 #include "debugtools.h"
16
17 DEFAULT_DEBUG_CHANNEL(caret);
18
19 typedef struct
20 {
21     HWND     hwnd;
22     UINT     hidden;
23     BOOL     on;
24     INT      x;
25     INT      y;
26     INT      width;
27     INT      height;
28     HBRUSH   hBrush;
29     UINT     timeout;
30     UINT     timerid;
31 } CARET;
32
33 typedef enum
34 {
35     CARET_OFF = 0,
36     CARET_ON,
37     CARET_TOGGLE
38 } DISPLAY_CARET;
39
40 static CARET Caret = { 0, 0, FALSE, 0, 0, 2, 12, 0, 500, 0 };
41
42 /*****************************************************************
43  *              CARET_GetHwnd
44  */
45 HWND CARET_GetHwnd(void)
46 {
47     return Caret.hwnd;
48 }
49
50 /*****************************************************************
51  *              CARET_GetRect
52  */
53 void CARET_GetRect(LPRECT lprc)
54 {
55     lprc->right = (lprc->left = Caret.x) + Caret.width - 1;
56     lprc->bottom = (lprc->top = Caret.y) + Caret.height - 1;
57 }
58
59 /*****************************************************************
60  *               CARET_DisplayCaret
61  */
62 static void CARET_DisplayCaret( DISPLAY_CARET status )
63 {
64     HDC hdc;
65     HBRUSH hPrevBrush;
66
67     if (Caret.on && (status == CARET_ON)) return;
68     if (!Caret.on && (status == CARET_OFF)) return;
69
70     /* So now it's always a toggle */
71
72     Caret.on = !Caret.on;
73     /* do not use DCX_CACHE here, for x,y,width,height are in logical units */
74     if (!(hdc = GetDCEx( Caret.hwnd, 0, DCX_USESTYLE /*| DCX_CACHE*/ ))) return;
75     hPrevBrush = SelectObject( hdc, Caret.hBrush );
76     PatBlt( hdc, Caret.x, Caret.y, Caret.width, Caret.height, PATINVERT );
77     SelectObject( hdc, hPrevBrush );
78     ReleaseDC( Caret.hwnd, hdc );
79 }
80
81   
82 /*****************************************************************
83  *               CARET_Callback
84  */
85 static VOID CALLBACK CARET_Callback( HWND hwnd, UINT msg, UINT id, DWORD ctime)
86 {
87     TRACE("hwnd=%04x, timerid=%d, caret=%d\n",
88                   hwnd, id, Caret.on);
89     CARET_DisplayCaret(CARET_TOGGLE);
90 }
91
92
93 /*****************************************************************
94  *               CARET_SetTimer
95  */
96 static void CARET_SetTimer(void)
97 {
98     if (Caret.timerid) KillSystemTimer( (HWND)0, Caret.timerid );
99     Caret.timerid = SetSystemTimer( (HWND)0, 0, Caret.timeout,
100                                       CARET_Callback );
101 }
102
103
104 /*****************************************************************
105  *               CARET_ResetTimer
106  */
107 static void CARET_ResetTimer(void)
108 {
109     if (Caret.timerid) 
110     {
111         KillSystemTimer( (HWND)0, Caret.timerid );
112         Caret.timerid = SetSystemTimer( (HWND)0, 0, Caret.timeout,
113                                           CARET_Callback );
114     }
115 }
116
117
118 /*****************************************************************
119  *               CARET_KillTimer
120  */
121 static void CARET_KillTimer(void)
122 {
123     if (Caret.timerid) 
124     {
125         KillSystemTimer( (HWND)0, Caret.timerid );
126         Caret.timerid = 0;
127     }
128 }
129
130
131 /*****************************************************************
132  *              CreateCaret (USER32.@)
133  */
134 BOOL WINAPI CreateCaret( HWND hwnd, HBITMAP bitmap,
135                              INT width, INT height )
136 {
137     TRACE("hwnd=%04x\n", hwnd);
138
139     if (!hwnd) return FALSE;
140
141     /* if cursor already exists, destroy it */
142     if (Caret.hwnd) DestroyCaret();
143
144     if (bitmap && (bitmap != 1))
145     {
146         BITMAP bmp;
147         if (!GetObjectA( bitmap, sizeof(bmp), &bmp )) return FALSE;
148         Caret.width = bmp.bmWidth;
149         Caret.height = bmp.bmHeight;
150         /* FIXME: we should make a copy of the bitmap instead of a brush */
151         Caret.hBrush = CreatePatternBrush( bitmap );
152     }
153     else
154     {
155         Caret.width = width ? width : GetSystemMetrics(SM_CXBORDER);
156         Caret.height = height ? height : GetSystemMetrics(SM_CYBORDER);
157         Caret.hBrush = CreateSolidBrush(bitmap ?
158                                           GetSysColor(COLOR_GRAYTEXT) :
159                                           GetSysColor(COLOR_WINDOW) );
160     }
161
162     Caret.hwnd = WIN_GetFullHandle( hwnd );
163     Caret.hidden = 1;
164     Caret.on = FALSE;
165     Caret.x = 0;
166     Caret.y = 0;
167
168     Caret.timeout = GetProfileIntA( "windows", "CursorBlinkRate", 500 );
169     return TRUE;
170 }
171    
172
173 /*****************************************************************
174  *              DestroyCaret (USER.164)
175  */
176 void WINAPI DestroyCaret16(void)
177 {
178     DestroyCaret();
179 }
180
181
182 /*****************************************************************
183  *              DestroyCaret (USER32.@)
184  */
185 BOOL WINAPI DestroyCaret(void)
186 {
187     if (!Caret.hwnd) return FALSE;
188
189     TRACE("hwnd=%04x, timerid=%d\n",
190                 Caret.hwnd, Caret.timerid);
191
192     CARET_KillTimer();
193     CARET_DisplayCaret(CARET_OFF);
194     DeleteObject( Caret.hBrush );
195     Caret.hwnd = 0;
196     return TRUE;
197 }
198
199
200 /*****************************************************************
201  *              SetCaretPos (USER.165)
202  */
203 void WINAPI SetCaretPos16( INT16 x, INT16 y )
204 {
205     SetCaretPos( x, y );
206 }
207
208
209 /*****************************************************************
210  *              SetCaretPos (USER32.@)
211  */
212 BOOL WINAPI SetCaretPos( INT x, INT y)
213 {
214     if (!Caret.hwnd) return FALSE;
215     if ((x == Caret.x) && (y == Caret.y)) return TRUE;
216
217     TRACE("x=%d, y=%d\n", x, y);
218
219     CARET_KillTimer();
220     CARET_DisplayCaret(CARET_OFF);
221     Caret.x = x;
222     Caret.y = y;
223     if (!Caret.hidden)
224     {
225         CARET_DisplayCaret(CARET_ON);
226         CARET_SetTimer();
227     }
228     return TRUE;
229 }
230
231
232 /*****************************************************************
233  *              HideCaret (USER32.@)
234  */
235 BOOL WINAPI HideCaret( HWND hwnd )
236 {
237     if (!Caret.hwnd) return FALSE;
238     if (hwnd && (Caret.hwnd != WIN_GetFullHandle(hwnd))) return FALSE;
239
240     TRACE("hwnd=%04x, hidden=%d\n",
241                   hwnd, Caret.hidden);
242
243     CARET_KillTimer();
244     CARET_DisplayCaret(CARET_OFF);
245     Caret.hidden++;
246     return TRUE;
247 }
248
249
250 /*****************************************************************
251  *              ShowCaret (USER32.@)
252  */
253 BOOL WINAPI ShowCaret( HWND hwnd )
254 {
255     if (!Caret.hwnd) return FALSE;
256     if (hwnd && (Caret.hwnd != WIN_GetFullHandle(hwnd))) return FALSE;
257
258     TRACE("hwnd=%04x, hidden=%d\n",
259                 hwnd, Caret.hidden);
260
261     if (Caret.hidden)
262     {
263         Caret.hidden--;
264         if (!Caret.hidden)
265         {
266             CARET_DisplayCaret(CARET_ON);
267             CARET_SetTimer();
268         }
269     }
270     return TRUE;
271 }
272
273
274 /*****************************************************************
275  *              SetCaretBlinkTime (USER.168)
276  */
277 void WINAPI SetCaretBlinkTime16( UINT16 msecs )
278 {
279     SetCaretBlinkTime( msecs );
280 }
281
282 /*****************************************************************
283  *              SetCaretBlinkTime (USER32.@)
284  */
285 BOOL WINAPI SetCaretBlinkTime( UINT msecs )
286 {
287     if (!Caret.hwnd) return FALSE;
288
289     TRACE("hwnd=%04x, msecs=%d\n",
290                 Caret.hwnd, msecs);
291
292     Caret.timeout = msecs;
293     CARET_ResetTimer();
294     return TRUE;
295 }
296
297
298 /*****************************************************************
299  *              GetCaretBlinkTime (USER.169)
300  */
301 UINT16 WINAPI GetCaretBlinkTime16(void)
302 {
303     return (UINT16)GetCaretBlinkTime();
304 }
305
306
307 /*****************************************************************
308  *              GetCaretBlinkTime (USER32.@)
309  */
310 UINT WINAPI GetCaretBlinkTime(void)
311 {
312     return Caret.timeout;
313 }
314
315
316 /*****************************************************************
317  *              GetCaretPos (USER.183)
318  */
319 VOID WINAPI GetCaretPos16( LPPOINT16 pt )
320 {
321     if (!Caret.hwnd || !pt) return;
322
323     TRACE("hwnd=%04x, pt=%p, x=%d, y=%d\n",
324                   Caret.hwnd, pt, Caret.x, Caret.y);
325     pt->x = (INT16)Caret.x;
326     pt->y = (INT16)Caret.y;
327 }
328
329
330 /*****************************************************************
331  *              GetCaretPos (USER32.@)
332  */
333 BOOL WINAPI GetCaretPos( LPPOINT pt )
334 {
335     if (!Caret.hwnd || !pt) return FALSE;
336     pt->x = Caret.x;
337     pt->y = Caret.y;
338     return TRUE;
339 }