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