services: Fix memory leak of some data in the service record.
[wine] / dlls / gdi32 / wing.c
1 /*
2  * WinG support
3  *
4  * Copyright (C) Robert Pouliot <krynos@clic.net>
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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19  */
20
21 #include "config.h"
22
23 #include <stdarg.h>
24
25 #include "windef.h"
26 #include "winbase.h"
27 #include "wingdi.h"
28 #include "wownt32.h"
29 #include "gdi_private.h"
30 #include "wine/wingdi16.h"
31 #include "wine/debug.h"
32
33 WINE_DEFAULT_DEBUG_CHANNEL(wing);
34
35 /*************************************************************************
36  * WING {WING}
37  *
38  * The Windows Game dll provides a number of functions designed to allow
39  * programmers to bypass Gdi and write directly to video memory. The intention
40  * was to bolster the use of Windows as a gaming platform and remove the
41  * need for Dos based games using 32 bit Dos extenders.
42  *
43  * This initial approach could not compete with the performance of Dos games
44  * (such as Doom and Warcraft) at the time, and so this dll was eventually
45  * superseded by DirectX. It should not be used by new applications, and is
46  * provided only for compatibility with older Windows programs.
47  */
48
49 typedef enum WING_DITHER_TYPE
50 {
51   WING_DISPERSED_4x4, WING_DISPERSED_8x8, WING_CLUSTERED_4x4
52 } WING_DITHER_TYPE;
53
54 /*
55  * WinG DIB bitmaps can be selected into DC and then scribbled upon
56  * by GDI functions. They can also be changed directly. This gives us
57  * three choices
58  *      - use original WinG 16-bit DLL
59  *              requires working 16-bit driver interface
60  *      - implement DIB graphics driver from scratch
61  *              see wing.zip size
62  *      - use shared pixmaps
63  *              won't work with some videocards and/or videomodes
64  * 961208 - AK
65  */
66
67 /***********************************************************************
68  *          WinGCreateDC        (WING.1001)
69  *
70  * Create a new WinG device context.
71  *
72  * PARAMS
73  *  None.
74  *
75  * RETURNS
76  *  Success: A handle to the created device context.
77  *  Failure: A NULL handle.
78  */
79 HDC16 WINAPI WinGCreateDC16(void)
80 {
81     TRACE("(void)\n");
82         return CreateCompatibleDC16(0);
83 }
84
85 /***********************************************************************
86  *  WinGRecommendDIBFormat    (WING.1002)
87  *
88  * Get the recommended format of bitmaps for the current display.
89  *
90  * PARAMS
91  *  bmpi [O] Destination for format information
92  *
93  * RETURNS
94  *  Success: TRUE. bmpi is filled with the best (fastest) bitmap format
95  *  Failure: FALSE, if bmpi is NULL.
96  */
97 BOOL16 WINAPI WinGRecommendDIBFormat16(BITMAPINFO *bmpi)
98 {
99     TRACE("(%p)\n", bmpi);
100
101     if (!bmpi)
102         return FALSE;
103
104     bmpi->bmiHeader.biSize = sizeof(BITMAPINFOHEADER);
105     bmpi->bmiHeader.biWidth = 320;
106     bmpi->bmiHeader.biHeight = -1;
107     bmpi->bmiHeader.biPlanes = 1;
108     bmpi->bmiHeader.biBitCount = 8;
109     bmpi->bmiHeader.biCompression = BI_RGB;
110     bmpi->bmiHeader.biSizeImage = 0;
111     bmpi->bmiHeader.biXPelsPerMeter = 0;
112     bmpi->bmiHeader.biYPelsPerMeter = 0;
113     bmpi->bmiHeader.biClrUsed = 0;
114     bmpi->bmiHeader.biClrImportant = 0;
115
116     return TRUE;
117 }
118
119 /***********************************************************************
120  *        WinGCreateBitmap    (WING.1003)
121  *
122  * Create a new WinG bitmap.
123  *
124  * PARAMS
125  *  hdc  [I] WinG device context
126  *  bmpi [I] Information about the bitmap
127  *  bits [I] Location of the bitmap image data
128  *
129  * RETURNS
130  *  Success: A handle to the created bitmap.
131  *  Failure: A NULL handle.
132  */
133 HBITMAP16 WINAPI WinGCreateBitmap16(HDC16 hdc, BITMAPINFO *bmpi,
134                                     SEGPTR *bits)
135 {
136     TRACE("(%d,%p,%p)\n", hdc, bmpi, bits);
137     TRACE(": create %dx%dx%d bitmap\n", bmpi->bmiHeader.biWidth,
138           bmpi->bmiHeader.biHeight, bmpi->bmiHeader.biPlanes);
139     return CreateDIBSection16(hdc, bmpi, 0, bits, 0, 0);
140 }
141
142 /***********************************************************************
143  *  WinGGetDIBPointer   (WING.1004)
144  */
145 SEGPTR WINAPI WinGGetDIBPointer16(HBITMAP16 hWinGBitmap, BITMAPINFO* bmpi)
146 {
147     BITMAPOBJ* bmp = (BITMAPOBJ *) GDI_GetObjPtr( HBITMAP_32(hWinGBitmap),
148                                                   BITMAP_MAGIC );
149     SEGPTR res = 0;
150
151     TRACE("(%d,%p)\n", hWinGBitmap, bmpi);
152     if (!bmp) return 0;
153
154     if (bmpi) FIXME(": Todo - implement setting BITMAPINFO\n");
155
156     res = bmp->segptr_bits;
157     GDI_ReleaseObj( HBITMAP_32(hWinGBitmap) );
158     return res;
159 }
160
161 /***********************************************************************
162  *  WinGSetDIBColorTable   (WING.1006)
163  *
164  * Set all or part of the color table for a WinG device context.
165  *
166  * PARAMS
167  *  hdc    [I] WinG device context
168  *  start  [I] Start color
169  *  num    [I] Number of entries to set
170  *  colors [I] Array of color data
171  *
172  * RETURNS
173  *  The number of entries set.
174  */
175 UINT16 WINAPI WinGSetDIBColorTable16(HDC16 hdc, UINT16 start, UINT16 num,
176                                      RGBQUAD *colors)
177 {
178     TRACE("(%d,%d,%d,%p)\n", hdc, start, num, colors);
179     return SetDIBColorTable16(hdc, start, num, colors);
180 }
181
182 /***********************************************************************
183  *  WinGGetDIBColorTable   (WING.1005)
184  *
185  * Get all or part of the color table for a WinG device context.
186  *
187  * PARAMS
188  *  hdc    [I] WinG device context
189  *  start  [I] Start color
190  *  num    [I] Number of entries to set
191  *  colors [O] Destination for the array of color data
192  *
193  * RETURNS
194  *  The number of entries retrieved.
195  */
196 UINT16 WINAPI WinGGetDIBColorTable16(HDC16 hdc, UINT16 start, UINT16 num,
197                                      RGBQUAD *colors)
198 {
199     TRACE("(%d,%d,%d,%p)\n", hdc, start, num, colors);
200     return GetDIBColorTable16(hdc, start, num, colors);
201 }
202
203 /***********************************************************************
204  *  WinGCreateHalfTonePalette   (WING.1007)
205  *
206  * Create a half tone palette.
207  *
208  * PARAMS
209  *  None.
210  *
211  * RETURNS
212  *  Success: A handle to the created palette.
213  *  Failure: A NULL handle.
214  */
215 HPALETTE16 WINAPI WinGCreateHalfTonePalette16(void)
216 {
217     HDC16 hdc = CreateCompatibleDC16(0);
218     HPALETTE16 ret = CreateHalftonePalette16(hdc);
219     TRACE("(void)\n");
220     DeleteDC16(hdc);
221     return ret;
222 }
223
224 /***********************************************************************
225  *  WinGCreateHalfToneBrush   (WING.1008)
226  *
227  * Create a half tone brush for a WinG device context.
228  *
229  * PARAMS
230  *  winDC [I] WinG device context
231  *  col   [I] Color
232  *  type  [I] Desired dithering type.
233  *
234  * RETURNS
235  *  Success: A handle to the created brush.
236  *  Failure: A NULL handle.
237  */
238 HBRUSH16 WINAPI WinGCreateHalfToneBrush16(HDC16 winDC, COLORREF col,
239                                             WING_DITHER_TYPE type)
240 {
241     TRACE("(%d,%d,%d)\n", winDC, col, type);
242     return CreateSolidBrush16(col);
243 }
244
245 /***********************************************************************
246  *  WinGStretchBlt   (WING.1009)
247  *
248  * See StretchBlt16.
249  */
250 BOOL16 WINAPI WinGStretchBlt16(HDC16 destDC, INT16 xDest, INT16 yDest,
251                                INT16 widDest, INT16 heiDest,
252                                HDC16 srcDC, INT16 xSrc, INT16 ySrc,
253                                INT16 widSrc, INT16 heiSrc)
254 {
255     BOOL16 retval;
256     TRACE("(%d,%d,...)\n", destDC, srcDC);
257     SetStretchBltMode16 ( destDC, COLORONCOLOR );
258     retval=StretchBlt16(destDC, xDest, yDest, widDest, heiDest, srcDC,
259                         xSrc, ySrc, widSrc, heiSrc, SRCCOPY);
260     SetStretchBltMode16 ( destDC, BLACKONWHITE );
261     return retval;
262 }
263
264 /***********************************************************************
265  *  WinGBitBlt   (WING.1010)
266  *
267  * See BitBlt16.
268  */
269 BOOL16 WINAPI WinGBitBlt16(HDC16 destDC, INT16 xDest, INT16 yDest,
270                            INT16 widDest, INT16 heiDest, HDC16 srcDC,
271                            INT16 xSrc, INT16 ySrc)
272 {
273     TRACE("(%d,%d,...)\n", destDC, srcDC);
274     return BitBlt16(destDC, xDest, yDest, widDest, heiDest, srcDC,
275                     xSrc, ySrc, SRCCOPY);
276 }