Fixed a bug in the FrameBuffer => Texture blits.
[wine] / controls / desktop.c
1 /*
2  * Desktop window class.
3  *
4  * Copyright 1994 Alexandre Julliard
5  *
6  * This library is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2.1 of the License, or (at your option) any later version.
10  *
11  * This library is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with this library; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19  */
20
21 #include "config.h"
22
23 #include <stdio.h>
24 #include <string.h>
25 #ifdef HAVE_UNISTD_H
26 # include <unistd.h>
27 #endif
28
29 #include "windef.h"
30 #include "wingdi.h"
31 #include "user.h"
32 #include "controls.h"
33 #include "wine/winuser16.h"
34
35 static HBRUSH hbrushPattern;
36 static HBITMAP hbitmapWallPaper;
37 static SIZE bitmapSize;
38 static BOOL fTileWallPaper;
39
40 static LRESULT WINAPI DesktopWndProc( HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam );
41
42
43 /*********************************************************************
44  * desktop class descriptor
45  */
46 const struct builtin_class_descr DESKTOP_builtin_class =
47 {
48     DESKTOP_CLASS_ATOM,   /* name */
49     CS_GLOBALCLASS,       /* style */
50     NULL,                 /* procA (winproc is Unicode only) */
51     DesktopWndProc,       /* procW */
52     0,                    /* extra */
53     IDC_ARROWA,           /* cursor */
54     (HBRUSH)(COLOR_BACKGROUND+1)    /* brush */
55 };
56
57
58 /***********************************************************************
59  *           DESKTOP_LoadBitmap
60  *
61  * Load a bitmap from a file. Used by SetDeskWallPaper().
62  */
63 static HBITMAP DESKTOP_LoadBitmap( HDC hdc, const char *filename )
64 {
65     BITMAPFILEHEADER *fileHeader;
66     BITMAPINFO *bitmapInfo;
67     HBITMAP hbitmap;
68     HFILE file;
69     LPSTR buffer;
70     LONG size;
71
72     /* Read all the file into memory */
73
74     if ((file = _lopen( filename, OF_READ )) == HFILE_ERROR)
75     {
76         UINT len = GetWindowsDirectoryA( NULL, 0 );
77         if (!(buffer = HeapAlloc( GetProcessHeap(), 0,
78                                   len + strlen(filename) + 2 )))
79             return 0;
80         GetWindowsDirectoryA( buffer, len + 1 );
81         strcat( buffer, "\\" );
82         strcat( buffer, filename );
83         file = _lopen( buffer, OF_READ );
84         HeapFree( GetProcessHeap(), 0, buffer );
85     }
86     if (file == HFILE_ERROR) return 0;
87     size = _llseek( file, 0, 2 );
88     if (!(buffer = HeapAlloc( GetProcessHeap(), 0, size )))
89     {
90         _lclose( file );
91         return 0;
92     }
93     _llseek( file, 0, 0 );
94     size = _lread( file, buffer, size );
95     _lclose( file );
96     fileHeader = (BITMAPFILEHEADER *)buffer;
97     bitmapInfo = (BITMAPINFO *)(buffer + sizeof(BITMAPFILEHEADER));
98
99       /* Check header content */
100     if ((fileHeader->bfType != 0x4d42) || (size < fileHeader->bfSize))
101     {
102         HeapFree( GetProcessHeap(), 0, buffer );
103         return 0;
104     }
105     hbitmap = CreateDIBitmap( hdc, &bitmapInfo->bmiHeader, CBM_INIT,
106                                 buffer + fileHeader->bfOffBits,
107                                 bitmapInfo, DIB_RGB_COLORS );
108     HeapFree( GetProcessHeap(), 0, buffer );
109     return hbitmap;
110 }
111
112
113
114 /***********************************************************************
115  *           DesktopWndProc
116  */
117 static LRESULT WINAPI DesktopWndProc( HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam )
118 {
119     /* all messages are ignored */
120     return 0;
121 }
122
123 /***********************************************************************
124  *           PaintDesktop   (USER32.@)
125  *
126  */
127 BOOL WINAPI PaintDesktop(HDC hdc)
128 {
129     HWND hwnd = GetDesktopWindow();
130
131     /* check for an owning thread; otherwise don't paint anything (non-desktop mode) */
132     if (GetWindowThreadProcessId( hwnd, NULL ))
133     {
134         RECT rect;
135
136         GetClientRect( hwnd, &rect );
137
138         /* Paint desktop pattern (only if wall paper does not cover everything) */
139
140         if (!hbitmapWallPaper ||
141             (!fTileWallPaper && ((bitmapSize.cx < rect.right) || (bitmapSize.cy < rect.bottom))))
142         {
143             HBRUSH brush = hbrushPattern;
144             if (!brush) brush = (HBRUSH)GetClassLongA( hwnd, GCL_HBRBACKGROUND );
145             /* Set colors in case pattern is a monochrome bitmap */
146             SetBkColor( hdc, RGB(0,0,0) );
147             SetTextColor( hdc, GetSysColor(COLOR_BACKGROUND) );
148             FillRect( hdc, &rect, brush );
149         }
150
151         /* Paint wall paper */
152
153         if (hbitmapWallPaper)
154         {
155             INT x, y;
156             HDC hMemDC = CreateCompatibleDC( hdc );
157
158             SelectObject( hMemDC, hbitmapWallPaper );
159
160             if (fTileWallPaper)
161             {
162                 for (y = 0; y < rect.bottom; y += bitmapSize.cy)
163                     for (x = 0; x < rect.right; x += bitmapSize.cx)
164                         BitBlt( hdc, x, y, bitmapSize.cx, bitmapSize.cy, hMemDC, 0, 0, SRCCOPY );
165             }
166             else
167             {
168                 x = (rect.left + rect.right - bitmapSize.cx) / 2;
169                 y = (rect.top + rect.bottom - bitmapSize.cy) / 2;
170                 if (x < 0) x = 0;
171                 if (y < 0) y = 0;
172                 BitBlt( hdc, x, y, bitmapSize.cx, bitmapSize.cy, hMemDC, 0, 0, SRCCOPY );
173             }
174             DeleteDC( hMemDC );
175         }
176     }
177     return TRUE;
178 }
179
180 /***********************************************************************
181  *           OldSetDeskPattern   (USER.279)
182  */
183 BOOL16 WINAPI SetDeskPattern(void)
184 {
185     return SystemParametersInfoA( SPI_SETDESKPATTERN, -1, NULL, FALSE );
186 }
187
188
189 /***********************************************************************
190  *           SetDeskWallPaper   (USER.285)
191  */
192 BOOL16 WINAPI SetDeskWallPaper16( LPCSTR filename )
193 {
194     return SetDeskWallPaper( filename );
195 }
196
197
198 /***********************************************************************
199  *           SetDeskWallPaper   (USER32.@)
200  *
201  * FIXME: is there a unicode version?
202  */
203 BOOL WINAPI SetDeskWallPaper( LPCSTR filename )
204 {
205     HBITMAP hbitmap;
206     HDC hdc;
207     char buffer[256];
208
209     if (filename == (LPSTR)-1)
210     {
211         GetProfileStringA( "desktop", "WallPaper", "(None)", buffer, 256 );
212         filename = buffer;
213     }
214     hdc = GetDC( 0 );
215     hbitmap = DESKTOP_LoadBitmap( hdc, filename );
216     ReleaseDC( 0, hdc );
217     if (hbitmapWallPaper) DeleteObject( hbitmapWallPaper );
218     hbitmapWallPaper = hbitmap;
219     fTileWallPaper = GetProfileIntA( "desktop", "TileWallPaper", 0 );
220     if (hbitmap)
221     {
222         BITMAP bmp;
223         GetObjectA( hbitmap, sizeof(bmp), &bmp );
224         bitmapSize.cx = (bmp.bmWidth != 0) ? bmp.bmWidth : 1;
225         bitmapSize.cy = (bmp.bmHeight != 0) ? bmp.bmHeight : 1;
226     }
227     return TRUE;
228 }
229
230
231 /***********************************************************************
232  *           DESKTOP_SetPattern
233  *
234  * Set the desktop pattern.
235  */
236 BOOL DESKTOP_SetPattern( LPCSTR pattern )
237 {
238     int pat[8];
239
240     if (hbrushPattern) DeleteObject( hbrushPattern );
241     memset( pat, 0, sizeof(pat) );
242     if (pattern && sscanf( pattern, " %d %d %d %d %d %d %d %d",
243                            &pat[0], &pat[1], &pat[2], &pat[3],
244                            &pat[4], &pat[5], &pat[6], &pat[7] ))
245     {
246         WORD pattern[8];
247         HBITMAP hbitmap;
248         int i;
249
250         for (i = 0; i < 8; i++) pattern[i] = pat[i] & 0xffff;
251         hbitmap = CreateBitmap( 8, 8, 1, 1, (LPSTR)pattern );
252         hbrushPattern = CreatePatternBrush( hbitmap );
253         DeleteObject( hbitmap );
254     }
255     else hbrushPattern = 0;
256     return TRUE;
257 }