Added support for strict handles. Only works on machines where
[wine] / controls / desktop.c
1 /*
2  * Desktop window class.
3  *
4  * Copyright 1994 Alexandre Julliard
5  */
6
7 #include <stdio.h>
8 #include <string.h>
9 #include <unistd.h>
10
11 #include "desktop.h"
12 #include "windef.h"
13 #include "heap.h"
14 #include "monitor.h"
15 #include "win.h"
16 #include "wine/winuser16.h"
17
18 /**********************************************************************/
19
20 DESKTOP_DRIVER *DESKTOP_Driver = NULL;
21
22 /***********************************************************************
23  *              DESKTOP_IsSingleWindow
24  */
25 BOOL DESKTOP_IsSingleWindow()
26 {
27   BOOL retvalue;
28   DESKTOP *pDesktop = (DESKTOP *) WIN_GetDesktop()->wExtra;
29   retvalue = MONITOR_IsSingleWindow(pDesktop->pPrimaryMonitor);
30   WIN_ReleaseDesktop();
31   return retvalue;
32 }
33
34 /***********************************************************************
35  *              DESKTOP_GetScreenWidth
36  *
37  * Return the width of the screen associated to the current desktop.
38  */
39 int DESKTOP_GetScreenWidth()
40 {
41     int retvalue;
42   DESKTOP *pDesktop = (DESKTOP *) WIN_GetDesktop()->wExtra;
43     retvalue = MONITOR_GetWidth(pDesktop->pPrimaryMonitor);
44     WIN_ReleaseDesktop();
45     return retvalue;
46     
47 }
48
49 /***********************************************************************
50  *              DESKTOP_GetScreenHeight
51  *
52  * Return the height of the screen associated to the current desktop.
53  */
54 int DESKTOP_GetScreenHeight()
55 {
56     int retvalue;
57   DESKTOP *pDesktop = (DESKTOP *) WIN_GetDesktop()->wExtra;
58     retvalue = MONITOR_GetHeight(pDesktop->pPrimaryMonitor);
59     WIN_ReleaseDesktop();
60     return retvalue;
61     
62 }
63
64 /***********************************************************************
65  *              DESKTOP_GetScreenDepth
66  *
67  * Return the depth of the screen associated to the current desktop.
68  */
69 int DESKTOP_GetScreenDepth()
70 {
71     int retvalue;
72   DESKTOP *pDesktop = (DESKTOP *) WIN_GetDesktop()->wExtra;
73     retvalue = MONITOR_GetDepth(pDesktop->pPrimaryMonitor);
74     WIN_ReleaseDesktop();
75     return retvalue;
76
77 }
78
79 /***********************************************************************
80  *           DESKTOP_LoadBitmap
81  *
82  * Load a bitmap from a file. Used by SetDeskWallPaper().
83  */
84 static HBITMAP DESKTOP_LoadBitmap( HDC hdc, const char *filename )
85 {
86     BITMAPFILEHEADER *fileHeader;
87     BITMAPINFO *bitmapInfo;
88     HBITMAP hbitmap;
89     HFILE file;
90     LPSTR buffer;
91     LONG size;
92
93     /* Read all the file into memory */
94
95     if ((file = _lopen( filename, OF_READ )) == HFILE_ERROR)
96     {
97         UINT len = GetWindowsDirectoryA( NULL, 0 );
98         if (!(buffer = HeapAlloc( GetProcessHeap(), 0,
99                                   len + strlen(filename) + 2 )))
100             return 0;
101         GetWindowsDirectoryA( buffer, len + 1 );
102         strcat( buffer, "\\" );
103         strcat( buffer, filename );
104         file = _lopen( buffer, OF_READ );
105         HeapFree( GetProcessHeap(), 0, buffer );
106     }
107     if (file == HFILE_ERROR) return 0;
108     size = _llseek( file, 0, 2 );
109     if (!(buffer = HeapAlloc( GetProcessHeap(), 0, size )))
110     {
111         _lclose( file );
112         return 0;
113     }
114     _llseek( file, 0, 0 );
115     size = _lread( file, buffer, size );
116     _lclose( file );
117     fileHeader = (BITMAPFILEHEADER *)buffer;
118     bitmapInfo = (BITMAPINFO *)(buffer + sizeof(BITMAPFILEHEADER));
119     
120       /* Check header content */
121     if ((fileHeader->bfType != 0x4d42) || (size < fileHeader->bfSize))
122     {
123         HeapFree( GetProcessHeap(), 0, buffer );
124         return 0;
125     }
126     hbitmap = CreateDIBitmap( hdc, &bitmapInfo->bmiHeader, CBM_INIT,
127                                 buffer + fileHeader->bfOffBits,
128                                 bitmapInfo, DIB_RGB_COLORS );
129     HeapFree( GetProcessHeap(), 0, buffer );
130     return hbitmap;
131 }
132
133
134 /***********************************************************************
135  *           DESKTOP_DoEraseBkgnd
136  *
137  * Handle the WM_ERASEBKGND message.
138  */
139 static LRESULT DESKTOP_DoEraseBkgnd( HWND hwnd, HDC hdc,
140                                      DESKTOP *desktopPtr )
141 {
142     RECT rect;
143     WND*   Wnd = WIN_FindWndPtr( hwnd );
144
145     if (Wnd->hrgnUpdate > 1) DeleteObject( Wnd->hrgnUpdate );
146     Wnd->hrgnUpdate = 0;
147
148     WIN_ReleaseWndPtr(Wnd);
149     
150     GetClientRect( hwnd, &rect );    
151
152     /* Paint desktop pattern (only if wall paper does not cover everything) */
153
154     if (!desktopPtr->hbitmapWallPaper || 
155         (!desktopPtr->fTileWallPaper && ((desktopPtr->bitmapSize.cx < rect.right) ||
156          (desktopPtr->bitmapSize.cy < rect.bottom))))
157     {
158           /* Set colors in case pattern is a monochrome bitmap */
159         SetBkColor( hdc, RGB(0,0,0) );
160         SetTextColor( hdc, GetSysColor(COLOR_BACKGROUND) );
161         FillRect( hdc, &rect, desktopPtr->hbrushPattern );
162     }
163
164       /* Paint wall paper */
165
166     if (desktopPtr->hbitmapWallPaper)
167     {
168         INT x, y;
169         HDC hMemDC = CreateCompatibleDC( hdc );
170         
171         SelectObject( hMemDC, desktopPtr->hbitmapWallPaper );
172
173         if (desktopPtr->fTileWallPaper)
174         {
175             for (y = 0; y < rect.bottom; y += desktopPtr->bitmapSize.cy)
176                 for (x = 0; x < rect.right; x += desktopPtr->bitmapSize.cx)
177                     BitBlt( hdc, x, y, desktopPtr->bitmapSize.cx,
178                               desktopPtr->bitmapSize.cy, hMemDC, 0, 0, SRCCOPY );
179         }
180         else
181         {
182             x = (rect.left + rect.right - desktopPtr->bitmapSize.cx) / 2;
183             y = (rect.top + rect.bottom - desktopPtr->bitmapSize.cy) / 2;
184             if (x < 0) x = 0;
185             if (y < 0) y = 0;
186             BitBlt( hdc, x, y, desktopPtr->bitmapSize.cx,
187                       desktopPtr->bitmapSize.cy, hMemDC, 0, 0, SRCCOPY );
188         }
189         DeleteDC( hMemDC );
190     }
191
192     return 1;
193 }
194
195
196 /***********************************************************************
197  *           DesktopWndProc
198  *
199  * Window procedure for the desktop window.
200  */
201 LRESULT WINAPI DesktopWndProc( HWND hwnd, UINT message,
202                                WPARAM wParam, LPARAM lParam )
203 {
204     LRESULT retvalue;
205     WND *wndPtr = WIN_FindWndPtr( hwnd );
206     DESKTOP *desktopPtr = (DESKTOP *)wndPtr->wExtra;
207
208       /* Most messages are ignored (we DON'T call DefWindowProc) */
209
210     switch(message)
211     {
212         /* Warning: this message is sent directly by                     */
213         /* WIN_CreateDesktopWindow() and does not contain a valid lParam */
214     case WM_NCCREATE:
215         desktopPtr->hbrushPattern = 0;
216         desktopPtr->hbitmapWallPaper = 0;
217         SetDeskPattern();
218         SetDeskWallPaper( (LPSTR)-1 );
219         retvalue = 1;
220         goto END;
221         
222     case WM_ERASEBKGND:
223         if(!DESKTOP_IsSingleWindow())
224         {
225             retvalue = 1;
226             goto END;
227         }
228         retvalue = DESKTOP_DoEraseBkgnd( hwnd, (HDC)wParam, desktopPtr );
229         goto END;
230
231     case WM_SYSCOMMAND:
232         if ((wParam & 0xfff0) != SC_CLOSE)
233         {
234             retvalue = 0;
235             goto END;
236         }
237         ExitWindows16( 0, 0 ); 
238
239     case WM_SETCURSOR:
240         retvalue = (LRESULT)SetCursor16( LoadCursor16( 0, IDC_ARROW16 ) );
241         goto END;
242     }
243     
244     retvalue = 0;
245 END:
246     WIN_ReleaseWndPtr(wndPtr);
247     return retvalue;
248 }
249
250 /***********************************************************************
251  *           PaintDesktop   (USER32.415)
252  *
253  */
254 BOOL WINAPI PaintDesktop(HDC hdc)
255 {
256     BOOL retvalue;
257     HWND hwnd = GetDesktopWindow();
258     WND *wndPtr = WIN_FindWndPtr( hwnd );
259     DESKTOP *desktopPtr = (DESKTOP *)wndPtr->wExtra;
260     retvalue = DESKTOP_DoEraseBkgnd( hwnd, hdc, desktopPtr );
261     WIN_ReleaseWndPtr(wndPtr);
262     return retvalue;
263
264 }
265
266 /***********************************************************************
267  *           SetDeskPattern   (USER.279)
268  */
269 BOOL16 WINAPI SetDeskPattern(void)
270 {
271     char buffer[100];
272     GetProfileStringA( "desktop", "Pattern", "(None)", buffer, 100 );
273     return DESKTOP_SetPattern( buffer );
274 }
275
276
277 /***********************************************************************
278  *           SetDeskWallPaper16   (USER.285)
279  */
280 BOOL16 WINAPI SetDeskWallPaper16( LPCSTR filename )
281 {
282     return SetDeskWallPaper( filename );
283 }
284
285
286 /***********************************************************************
287  *           SetDeskWallPaper32   (USER32.475)
288  *
289  * FIXME: is there a unicode version?
290  */
291 BOOL WINAPI SetDeskWallPaper( LPCSTR filename )
292 {
293     HBITMAP hbitmap;
294     HDC hdc;
295     char buffer[256];
296     WND *wndPtr = WIN_GetDesktop();
297     DESKTOP *desktopPtr = (DESKTOP *)wndPtr->wExtra;
298
299     if (filename == (LPSTR)-1)
300     {
301         GetProfileStringA( "desktop", "WallPaper", "(None)", buffer, 256 );
302         filename = buffer;
303     }
304     hdc = GetDC( 0 );
305     hbitmap = DESKTOP_LoadBitmap( hdc, filename );
306     ReleaseDC( 0, hdc );
307     if (desktopPtr->hbitmapWallPaper) DeleteObject( desktopPtr->hbitmapWallPaper );
308     desktopPtr->hbitmapWallPaper = hbitmap;
309     desktopPtr->fTileWallPaper = GetProfileIntA( "desktop", "TileWallPaper", 0 );
310     if (hbitmap)
311     {
312         BITMAP bmp;
313         GetObjectA( hbitmap, sizeof(bmp), &bmp );
314         desktopPtr->bitmapSize.cx = (bmp.bmWidth != 0) ? bmp.bmWidth : 1;
315         desktopPtr->bitmapSize.cy = (bmp.bmHeight != 0) ? bmp.bmHeight : 1;
316     }
317     WIN_ReleaseDesktop();
318     return TRUE;
319 }
320
321
322 /***********************************************************************
323  *           DESKTOP_SetPattern
324  *
325  * Set the desktop pattern.
326  */
327 BOOL DESKTOP_SetPattern( LPCSTR pattern )
328 {
329     WND *wndPtr = WIN_GetDesktop();
330     DESKTOP *desktopPtr = (DESKTOP *)wndPtr->wExtra;
331     int pat[8];
332
333     if (desktopPtr->hbrushPattern) DeleteObject( desktopPtr->hbrushPattern );
334     memset( pat, 0, sizeof(pat) );
335     if (pattern && sscanf( pattern, " %d %d %d %d %d %d %d %d",
336                            &pat[0], &pat[1], &pat[2], &pat[3],
337                            &pat[4], &pat[5], &pat[6], &pat[7] ))
338     {
339         WORD pattern[8];
340         HBITMAP hbitmap;
341         int i;
342
343         for (i = 0; i < 8; i++) pattern[i] = pat[i] & 0xffff;
344         hbitmap = CreateBitmap( 8, 8, 1, 1, (LPSTR)pattern );
345         desktopPtr->hbrushPattern = CreatePatternBrush( hbitmap );
346         DeleteObject( hbitmap );
347     }
348     else desktopPtr->hbrushPattern = CreateSolidBrush( GetSysColor(COLOR_BACKGROUND) );
349     WIN_ReleaseDesktop();
350     return TRUE;
351 }
352