dlls/msvideo/drawdib.c

   1 /*
   2  * Copyright 2000 Bradley Baetz
   3  *
   4  * Fixme: Some flags are ignored
   5  * Should be doing buffering when requested
   6  * Handle palettes
   7  */
   8
   9 #include "windef.h"
  10 #include "wingdi.h"
  11 #include "winuser.h"
  12 #include "winbase.h"
  13 #include "debugtools.h"
  14 #include "vfw.h"
  15 #include "windef.h"
  16
  17 DEFAULT_DEBUG_CHANNEL(msvideo);
  18 typedef struct {
  19         HDC hdc;
  20         INT dxDst;
  21         INT dyDst;
  22         LPBITMAPINFOHEADER lpbi;
  23         INT dxSrc;
  24         INT dySrc;
  25         HPALETTE hpal;                          /* Palette to use for the DIB */
  26         BOOL begun;                                     /* DrawDibBegin has been called */
  27         LPBITMAPINFOHEADER lpbiOut;     /* Output format */
  28         HIC hic;                                        /* HIC for decompression */
  29         HDC hMemDC;                                     /* DC for buffering */
  30         HBITMAP hOldDib;                        /* Original Dib */
  31         HBITMAP hDib;                           /* DibSection */
  32         LPVOID lpvbits;                         /* Buffer for holding decompressed dib */
  33 } WINE_HDD;
  34
  35 /***********************************************************************
  36  *              DrawDibOpen             [MSVFW32.10]
  37  */
  38 HDRAWDIB VFWAPI DrawDibOpen(void) {
  39         HDRAWDIB hdd;
  40
  41         TRACE("(void)\n");
  42         hdd = GlobalAlloc16(GHND,sizeof(WINE_HDD));
  43         TRACE("=> %d\n",hdd);
  44         return hdd;
  45 }
  46
  47 /***********************************************************************
  48  *              DrawDibOpen             [MSVIDEO.102]
  49  */
  50 HDRAWDIB16 VFWAPI DrawDibOpen16(void) {
  51         return (HDRAWDIB16)DrawDibOpen();
  52 }
  53
  54 /***********************************************************************
  55  *              DrawDibClose            [MSVFW32.5]
  56  */
  57 BOOL VFWAPI DrawDibClose(HDRAWDIB hdd) {
  58         WINE_HDD *whdd = GlobalLock16(hdd);
  59
  60         TRACE("(0x%08lx)\n",(DWORD)hdd);
  61
  62         if (!whdd)
  63                 return FALSE;
  64
  65         if (whdd->begun)
  66                 DrawDibEnd(hdd);
  67
  68         GlobalUnlock16(hdd);
  69         GlobalFree16(hdd);
  70         return TRUE;
  71 }
  72
  73 /***********************************************************************
  74  *              DrawDibClose            [MSVIDEO.103]
  75  */
  76 BOOL16 VFWAPI DrawDibClose16(HDRAWDIB16 hdd) {
  77         return DrawDibClose(hdd);
  78 }
  79
  80 /***********************************************************************
  81  *              DrawDibEnd              [MSVFW32.7]
  82  */
  83 BOOL VFWAPI DrawDibEnd(HDRAWDIB hdd) {
  84         BOOL ret = TRUE;
  85         WINE_HDD *whdd = GlobalLock16(hdd);
  86
  87         TRACE("(0x%08lx)\n",(DWORD)hdd);
  88
  89         whdd->hpal = 0; /* Do not free this */
  90         whdd->hdc = 0;
  91         if (whdd->lpbi) {
  92                 HeapFree(GetProcessHeap(),0,whdd->lpbi);
  93                 whdd->lpbi = NULL;
  94         }
  95         if (whdd->lpbiOut) {
  96                 HeapFree(GetProcessHeap(),0,whdd->lpbiOut);
  97                 whdd->lpbiOut = NULL;
  98         }
  99
 100         whdd->begun = FALSE;
 101
 102         /*if (whdd->lpvbits)
 103           HeapFree(GetProcessHeap(),0,whdd->lpvbuf);*/
 104
 105         if (whdd->hMemDC) {
 106                 SelectObject(whdd->hMemDC,whdd->hOldDib);
 107                 DeleteDC(whdd->hMemDC);
 108         }
 109
 110         if (whdd->hDib)
 111                 DeleteObject(whdd->hDib);
 112
 113         if (whdd->hic) {
 114                 ICDecompressEnd(whdd->hic);
 115                 ICClose(whdd->hic);
 116         }
 117
 118         whdd->lpvbits = NULL;
 119
 120         GlobalUnlock16(hdd);
 121         return ret;
 122 }
 123
 124 /***********************************************************************
 125  *              DrawDibEnd              [MSVIDEO.105]
 126  */
 127 BOOL16 VFWAPI DrawDibEnd16(HDRAWDIB16 hdd) {
 128         return DrawDibEnd(hdd);
 129 }
 130
 131 /***********************************************************************
 132  *              DrawDibBegin            [MSVFW32.3]
 133  */
 134 BOOL VFWAPI DrawDibBegin(HDRAWDIB hdd,
 135                                                  HDC      hdc,
 136                                                  INT      dxDst,
 137                                                  INT      dyDst,
 138                                                  LPBITMAPINFOHEADER lpbi,
 139                                                  INT      dxSrc,
 140                                                  INT      dySrc,
 141                                                  UINT     wFlags) {
 142         BOOL ret = TRUE;
 143         WINE_HDD *whdd;
 144
 145         TRACE("(%d,0x%lx,%d,%d,%p,%d,%d,0x%08lx)\n",
 146                 hdd,(DWORD)hdc,dxDst,dyDst,lpbi,dxSrc,dySrc,(DWORD)wFlags
 147         );
 148
 149         if (wFlags)
 150                 FIXME("wFlags == 0x%08lx not handled\n",(DWORD)wFlags);
 151
 152         whdd = (WINE_HDD*)GlobalLock16(hdd);
 153
 154         if (whdd->begun)
 155                 DrawDibEnd(hdd);
 156
 157         if (lpbi->biCompression) {
 158                 DWORD size;
 159
 160                 whdd->hic = ICOpen(ICTYPE_VIDEO,lpbi->biCompression,ICMODE_DECOMPRESS);
 161                 if (!whdd->hic) {
 162                         ERR("Could not open IC. biCompression == 0x%08lx\n",lpbi->biCompression);
 163                         ret = FALSE;
 164                 }
 165
 166                 if (ret) {
 167                         size = ICDecompressGetFormat(whdd->hic,lpbi,NULL);
 168                         if (size == ICERR_UNSUPPORTED) {
 169                                 FIXME("Codec doesn't support GetFormat, giving up.\n");
 170                                 ret = FALSE;
 171                         }
 172                 }
 173
 174                 if (ret) {
 175                         whdd->lpbiOut = HeapAlloc(GetProcessHeap(),0,size);
 176
 177                         if (ICDecompressGetFormat(whdd->hic,lpbi,whdd->lpbiOut) != ICERR_OK)
 178                                 ret = FALSE;
 179                 }
 180
 181                 if (ret) {
 182                         /* FIXME: Use Ex functions if available? */
 183                         if (ICDecompressBegin(whdd->hic,lpbi,whdd->lpbiOut) != ICERR_OK)
 184                                 ret = FALSE;
 185
 186                         TRACE("biSizeImage == %ld\n",whdd->lpbiOut->biSizeImage);
 187                         TRACE("biCompression == %ld\n",whdd->lpbiOut->biCompression);
 188                         TRACE("biBitCount == %d\n",whdd->lpbiOut->biBitCount);
 189                 }
 190         } else {
 191                 /* No compression */
 192                 TRACE("Not compressed!\n");
 193                 whdd->lpbiOut = HeapAlloc(GetProcessHeap(),0,lpbi->biSize);
 194                 memcpy(whdd->lpbiOut,lpbi,lpbi->biSize);
 195         }
 196
 197         if (ret) {
 198                 /*whdd->lpvbuf = HeapAlloc(GetProcessHeap(),0,whdd->lpbiOut->biSizeImage);*/
 199
 200                 whdd->hMemDC = CreateCompatibleDC(hdc);
 201                 TRACE("Creating: %ld,%p\n",whdd->lpbiOut->biSize,whdd->lpvbits);
 202                 whdd->hDib = CreateDIBSection(whdd->hMemDC,(BITMAPINFO *)whdd->lpbiOut,DIB_RGB_COLORS,&(whdd->lpvbits),0,0);
 203                 if (!whdd->hDib) {
 204                         TRACE("Error: %ld\n",GetLastError());
 205                 }
 206                 TRACE("Created: %d,%p\n",whdd->hDib,whdd->lpvbits);
 207                 whdd->hOldDib = SelectObject(whdd->hMemDC,whdd->hDib);
 208         }
 209
 210         if (ret) {
 211                 whdd->hdc = hdc;
 212                 whdd->dxDst = dxDst;
 213                 whdd->dyDst = dyDst;
 214                 whdd->lpbi = HeapAlloc(GetProcessHeap(),0,lpbi->biSize);
 215                 memcpy(whdd->lpbi,lpbi,lpbi->biSize);
 216                 whdd->dxSrc = dxSrc;
 217                 whdd->dySrc = dySrc;
 218                 whdd->begun = TRUE;
 219                 whdd->hpal = 0;
 220         } else {
 221                 if (whdd->hic)
 222                         ICClose(whdd->hic);
 223                 if (whdd->lpbiOut) {
 224                         HeapFree(GetProcessHeap(),0,whdd->lpbiOut);
 225                         whdd->lpbiOut = NULL;
 226                 }
 227         }
 228
 229         GlobalUnlock16(hdd);
 230
 231         return ret;
 232 }
 233
 234 /************************************************************************
 235  *              DrawDibBegin            [MSVIDEO.104]
 236  */
 237 BOOL16 VFWAPI DrawDibBegin16(HDRAWDIB16 hdd,
 238                                                    HDC16      hdc,
 239                                                    INT16      dxDst,
 240                                                    INT16      dyDst,
 241                                                    LPBITMAPINFOHEADER lpbi,
 242                                                    INT16      dxSrc,
 243                                                    INT16      dySrc,
 244                                                    UINT16     wFlags) {
 245         return DrawDibBegin(hdd,hdc,dxDst,dyDst,lpbi,dxSrc,dySrc,wFlags);
 246 }
 247
 248 /**********************************************************************
 249  *              DrawDibDraw             [MSVFW32.6]
 250  */
 251 BOOL VFWAPI DrawDibDraw(HDRAWDIB hdd,
 252                                                 HDC hdc,
 253                                                 INT xDst,
 254                                                 INT yDst,
 255                                                 INT dxDst,
 256                                                 INT dyDst,
 257                                                 LPBITMAPINFOHEADER lpbi,
 258                                                 LPVOID lpBits,
 259                                                 INT xSrc,
 260                                                 INT ySrc,
 261                                                 INT dxSrc,
 262                                                 INT dySrc,
 263                                                 UINT wFlags) {
 264         WINE_HDD *whdd;
 265         BOOL ret = TRUE;
 266
 267         TRACE("(%d,0x%lx,%d,%d,%d,%d,%p,%p,%d,%d,%d,%d,0x%08lx)\n",
 268                   hdd,(DWORD)hdc,xDst,yDst,dxDst,dyDst,lpbi,lpBits,xSrc,ySrc,dxSrc,dySrc,(DWORD)wFlags
 269         );
 270
 271         if (wFlags & ~(DDF_SAME_HDC | DDF_SAME_DRAW | DDF_NOTKEYFRAME))
 272                 FIXME("wFlags == 0x%08lx not handled\n",(DWORD)wFlags);
 273
 274         if (!lpBits) {
 275                 /* Undocumented? */
 276                 lpBits = (LPSTR)lpbi + (WORD)(lpbi->biSize) + (WORD)(lpbi->biClrUsed*sizeof(RGBQUAD));
 277         }
 278
 279         whdd = GlobalLock16(hdd);
 280
 281 #define CHANGED(x) (whdd->##x != ##x)
 282
 283         if ((!whdd->begun) || (!(wFlags & DDF_SAME_HDC) && CHANGED(hdc)) || (!(wFlags & DDF_SAME_DRAW) &&
 284                  (CHANGED(lpbi) || CHANGED(dxSrc) || CHANGED(dySrc) || CHANGED(dxDst) || CHANGED(dyDst)))) {
 285                 TRACE("Something changed!\n");
 286                 ret = DrawDibBegin(hdd,hdc,dxDst,dyDst,lpbi,dxSrc,dySrc,0);
 287         }
 288
 289 #undef CHANGED
 290
 291     if ((dxDst == -1) && (dyDst == -1)) {
 292                 dxDst = dxSrc;
 293                 dyDst = dySrc;
 294         }
 295
 296         if (lpbi->biCompression) {
 297                 DWORD flags = 0;
 298
 299                 TRACE("Compression == 0x%08lx\n",lpbi->biCompression);
 300
 301                 if (wFlags & DDF_NOTKEYFRAME)
 302                   flags |= ICDECOMPRESS_NOTKEYFRAME;
 303
 304                 ICDecompress(whdd->hic,flags,lpbi,lpBits,whdd->lpbiOut,whdd->lpvbits);
 305         } else {
 306                 memcpy(whdd->lpvbits,lpBits,lpbi->biSizeImage);
 307         }
 308
 309         SelectPalette(hdc,whdd->hpal,FALSE);
 310
 311         StretchBlt(whdd->hdc,xDst,yDst,dxDst,dyDst,whdd->hMemDC,xSrc,ySrc,dxSrc,dySrc,SRCCOPY);
 312
 313         GlobalUnlock16(hdd);
 314         return ret;
 315 }
 316
 317 /**********************************************************************
 318  *              DrawDibDraw             [MSVIDEO.106]
 319  */
 320 BOOL16 VFWAPI DrawDibDraw16(HDRAWDIB16 hdd,
 321                                                   HDC16 hdc,
 322                                                   INT16 xDst,
 323                                                   INT16 yDst,
 324                                                   INT16 dxDst,
 325                                                   INT16 dyDst,
 326                                                   LPBITMAPINFOHEADER lpbi,
 327                                                   LPVOID lpBits,
 328                                                   INT16 xSrc,
 329                                                   INT16 ySrc,
 330                                                   INT16 dxSrc,
 331                                                   INT16 dySrc,
 332                                                   UINT16 wFlags) {
 333         return DrawDibDraw(hdd,hdc,xDst,yDst,dxDst,dyDst,lpbi,lpBits,xSrc,ySrc,dxSrc,dySrc,wFlags);
 334 }
 335
 336 /*************************************************************************
 337  *              DrawDibStart            [MSVFW32.14]
 338  */
 339 BOOL VFWAPI DrawDibStart(HDRAWDIB hdd, DWORD rate) {
 340         FIXME("(0x%08lx,%ld), stub\n",(DWORD)hdd,rate);
 341         return TRUE;
 342 }
 343
 344 /*************************************************************************
 345  *              DrawDibStart            [MSVIDEO.118]
 346  */
 347 BOOL16 VFWAPI DrawDibStart16(HDRAWDIB16 hdd, DWORD rate) {
 348         return DrawDibStart(hdd,rate);
 349 }
 350
 351 /*************************************************************************
 352  *              DrawDibStop             [MSVFW32.15]
 353  */
 354 BOOL VFWAPI DrawDibStop(HDRAWDIB hdd) {
 355         FIXME("(0x%08lx), stub\n",(DWORD)hdd);
 356         return TRUE;
 357 }
 358
 359 /*************************************************************************
 360  *              DrawDibStop             [MSVIDEO.119]
 361  */
 362 BOOL16 DrawDibStop16(HDRAWDIB16 hdd) {
 363         return DrawDibStop(hdd);
 364 }
 365
 366 /***********************************************************************
 367  *              DrawDibSetPalette       [MSVFW32.13]
 368  */
 369 BOOL VFWAPI DrawDibSetPalette(HDRAWDIB hdd, HPALETTE hpal) {
 370         WINE_HDD *whdd;
 371
 372         TRACE("(0x%08lx,0x%08lx)\n",(DWORD)hdd,(DWORD)hpal);
 373
 374         whdd = GlobalLock16(hdd);
 375         whdd->hpal = hpal;
 376
 377         if (whdd->begun) {
 378                 SelectPalette(whdd->hdc,hpal,0);
 379                 RealizePalette(whdd->hdc);
 380         }
 381         GlobalUnlock16(hdd);
 382         return TRUE;
 383 }
 384
 385 /***********************************************************************
 386  *              DrawDibSetPalette       [MSVIDEO.110]
 387  */
 388 BOOL16 VFWAPI DrawDibSetPalette16(HDRAWDIB16 hdd, HPALETTE16 hpal) {
 389         return DrawDibSetPalette(hdd,hpal);
 390 }
 391
 392 /***********************************************************************
 393  *              DrawDibGetPalette       [MSVFW32.9]
 394  */
 395 HPALETTE VFWAPI DrawDibGetPalette(HDRAWDIB hdd) {
 396         WINE_HDD *whdd;
 397         HPALETTE ret;
 398
 399         TRACE("(0x%08lx)\n",(DWORD)hdd);
 400
 401         whdd = GlobalLock16(hdd);
 402         ret = whdd->hpal;
 403         GlobalUnlock16(hdd);
 404         return ret;
 405 }
 406
 407 /***********************************************************************
 408  *              DrawDibGetPalette       [MSVIDEO.108]]
 409  */
 410 HPALETTE16 VFWAPI DrawDibGetPalette16(HDRAWDIB16 hdd) {
 411         return (HPALETTE16)DrawDibGetPalette(hdd);
 412 }
 413
 414 /***********************************************************************
 415  *              DrawDibRealize          [MSVFW32.12]
 416  */
 417 UINT VFWAPI DrawDibRealize(HDRAWDIB hdd, HDC hdc, BOOL fBackground) {
 418         WINE_HDD *whdd;
 419         HPALETTE oldPal;
 420         UINT ret = 0;
 421
 422         FIXME("(%d,0x%08lx,%d), stub\n",hdd,(DWORD)hdc,fBackground);
 423
 424         whdd = GlobalLock16(hdd);
 425
 426         if (!whdd || !(whdd->begun)) {
 427                 ret = 0;
 428                 goto out;
 429         }
 430
 431         if (!whdd->hpal)
 432                 whdd->hpal = CreateHalftonePalette(hdc);
 433
 434         oldPal = SelectPalette(hdc,whdd->hpal,fBackground);
 435         ret = RealizePalette(hdc);
 436
 437  out:
 438         GlobalUnlock16(hdd);
 439
 440         TRACE("=> %u\n",ret);
 441         return ret;
 442 }
 443
 444 /***********************************************************************
 445  *              DrawDibRealize          [MSVIDEO.112]
 446  */
 447 UINT16 VFWAPI DrawDibRealize16(HDRAWDIB16 hdd, HDC16 hdc, BOOL16 fBackground) {
 448         return (UINT16)DrawDibRealize(hdd,hdc,fBackground);
 449 }