git.oblomov.eu Git - wine/blob - dlls/gdi32/dibdrv/bitblt.c

   1 /*
   2  * DIB driver blitting
   3  *
   4  * Copyright 2011 Huw Davies
   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 <assert.h>
  22
  23 #include "gdi_private.h"
  24 #include "dibdrv.h"
  25
  26 #include "wine/debug.h"
  27
  28 WINE_DEFAULT_DEBUG_CHANNEL(dib);
  29
  30 #define DST 0   /* Destination dib */
  31 #define SRC 1   /* Source dib */
  32 #define TMP 2   /* Temporary dib */
  33 #define PAT 3   /* Pattern (brush) in destination DC */
  34
  35 #define OP(src,dst,rop)   (OP_ARGS(src,dst) << 4 | ((rop) - 1))
  36 #define OP_ARGS(src,dst)  (((src) << 2) | (dst))
  37
  38 #define OP_SRC(opcode)    ((opcode) >> 6)
  39 #define OP_DST(opcode)    (((opcode) >> 4) & 3)
  40 #define OP_SRCDST(opcode) ((opcode) >> 4)
  41 #define OP_ROP(opcode)    (((opcode) & 0x0f) + 1)
  42
  43 #define MAX_OP_LEN  6  /* Longest opcode + 1 for the terminating 0 */
  44
  45 static const unsigned char BITBLT_Opcodes[256][MAX_OP_LEN] =
  46 {
  47     { OP(PAT,DST,R2_BLACK) },                                       /* 0x00  0              */
  48     { OP(PAT,SRC,R2_MERGEPEN), OP(SRC,DST,R2_NOTMERGEPEN) },        /* 0x01  ~(D|(P|S))     */
  49     { OP(PAT,SRC,R2_NOTMERGEPEN), OP(SRC,DST,R2_MASKPEN) },         /* 0x02  D&~(P|S)       */
  50     { OP(PAT,SRC,R2_NOTMERGEPEN) },                                 /* 0x03  ~(P|S)         */
  51     { OP(PAT,DST,R2_NOTMERGEPEN), OP(SRC,DST,R2_MASKPEN) },         /* 0x04  S&~(D|P)       */
  52     { OP(PAT,DST,R2_NOTMERGEPEN) },                                 /* 0x05  ~(D|P)         */
  53     { OP(SRC,DST,R2_NOTXORPEN), OP(PAT,DST,R2_NOTMERGEPEN), },      /* 0x06  ~(P|~(D^S))    */
  54     { OP(SRC,DST,R2_MASKPEN), OP(PAT,DST,R2_NOTMERGEPEN) },         /* 0x07  ~(P|(D&S))     */
  55     { OP(PAT,DST,R2_MASKNOTPEN), OP(SRC,DST,R2_MASKPEN) },          /* 0x08  S&D&~P         */
  56     { OP(SRC,DST,R2_XORPEN), OP(PAT,DST,R2_NOTMERGEPEN) },          /* 0x09  ~(P|(D^S))     */
  57     { OP(PAT,DST,R2_MASKNOTPEN) },                                  /* 0x0a  D&~P           */
  58     { OP(SRC,DST,R2_MASKPENNOT), OP(PAT,DST,R2_NOTMERGEPEN) },      /* 0x0b  ~(P|(S&~D))    */
  59     { OP(PAT,SRC,R2_MASKNOTPEN) },                                  /* 0x0c  S&~P           */
  60     { OP(SRC,DST,R2_MASKNOTPEN), OP(PAT,DST,R2_NOTMERGEPEN) },      /* 0x0d  ~(P|(D&~S))    */
  61     { OP(SRC,DST,R2_NOTMERGEPEN), OP(PAT,DST,R2_NOTMERGEPEN) },     /* 0x0e  ~(P|~(D|S))    */
  62     { OP(PAT,DST,R2_NOTCOPYPEN) },                                  /* 0x0f  ~P             */
  63     { OP(SRC,DST,R2_NOTMERGEPEN), OP(PAT,DST,R2_MASKPEN) },         /* 0x10  P&~(S|D)       */
  64     { OP(SRC,DST,R2_NOTMERGEPEN) },                                 /* 0x11  ~(D|S)         */
  65     { OP(PAT,DST,R2_NOTXORPEN), OP(SRC,DST,R2_NOTMERGEPEN) },       /* 0x12  ~(S|~(D^P))    */
  66     { OP(PAT,DST,R2_MASKPEN), OP(SRC,DST,R2_NOTMERGEPEN) },         /* 0x13  ~(S|(D&P))     */
  67     { OP(PAT,SRC,R2_NOTXORPEN), OP(SRC,DST,R2_NOTMERGEPEN) },       /* 0x14  ~(D|~(P^S))    */
  68     { OP(PAT,SRC,R2_MASKPEN), OP(SRC,DST,R2_NOTMERGEPEN) },         /* 0x15  ~(D|(P&S))     */
  69     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_NOTMASKPEN),
  70       OP(SRC,DST,R2_MASKPEN), OP(TMP,DST,R2_XORPEN),
  71       OP(PAT,DST,R2_XORPEN) },                                      /* 0x16  P^S^(D&~(P&S)  */
  72     { OP(SRC,TMP,R2_COPYPEN), OP(SRC,DST,R2_XORPEN),
  73       OP(PAT,SRC,R2_XORPEN), OP(SRC,DST,R2_MASKPEN),
  74       OP(TMP,DST,R2_NOTXORPEN) },                                   /* 0x17 ~S^((S^P)&(S^D))*/
  75     { OP(PAT,SRC,R2_XORPEN), OP(PAT,DST,R2_XORPEN),
  76         OP(SRC,DST,R2_MASKPEN) },                                   /* 0x18  (S^P)&(D^P)    */
  77     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_NOTMASKPEN),
  78       OP(SRC,DST,R2_MASKPEN), OP(TMP,DST,R2_NOTXORPEN) },           /* 0x19  ~S^(D&~(P&S))  */
  79     { OP(PAT,SRC,R2_MASKPEN), OP(SRC,DST,R2_MERGEPEN),
  80       OP(PAT,DST,R2_XORPEN) },                                      /* 0x1a  P^(D|(S&P))    */
  81     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_XORPEN),
  82       OP(SRC,DST,R2_MASKPEN), OP(TMP,DST,R2_NOTXORPEN) },           /* 0x1b  ~S^(D&(P^S))   */
  83     { OP(PAT,DST,R2_MASKPEN), OP(SRC,DST,R2_MERGEPEN),
  84       OP(PAT,DST,R2_XORPEN) },                                      /* 0x1c  P^(S|(D&P))    */
  85     { OP(DST,TMP,R2_COPYPEN), OP(PAT,DST,R2_XORPEN),
  86       OP(SRC,DST,R2_MASKPEN), OP(TMP,DST,R2_NOTXORPEN) },           /* 0x1d  ~D^(S&(D^P))   */
  87     { OP(SRC,DST,R2_MERGEPEN), OP(PAT,DST,R2_XORPEN) },             /* 0x1e  P^(D|S)        */
  88     { OP(SRC,DST,R2_MERGEPEN), OP(PAT,DST,R2_NOTMASKPEN) },         /* 0x1f  ~(P&(D|S))     */
  89     { OP(PAT,SRC,R2_MASKPENNOT), OP(SRC,DST,R2_MASKPEN) },          /* 0x20  D&(P&~S)       */
  90     { OP(PAT,DST,R2_XORPEN), OP(SRC,DST,R2_NOTMERGEPEN) },          /* 0x21  ~(S|(D^P))     */
  91     { OP(SRC,DST,R2_MASKNOTPEN) },                                  /* 0x22  ~S&D           */
  92     { OP(PAT,DST,R2_MASKPENNOT), OP(SRC,DST,R2_NOTMERGEPEN) },      /* 0x23  ~(S|(P&~D))    */
  93     { OP(SRC,DST,R2_XORPEN), OP(PAT,SRC,R2_XORPEN),
  94       OP(SRC,DST,R2_MASKPEN) },                                     /* 0x24   (S^P)&(S^D)   */
  95     { OP(PAT,SRC,R2_NOTMASKPEN), OP(SRC,DST,R2_MASKPEN),
  96       OP(PAT,DST,R2_NOTXORPEN) },                                   /* 0x25  ~P^(D&~(S&P))  */
  97     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_MASKPEN),
  98       OP(SRC,DST,R2_MERGEPEN), OP(TMP,DST,R2_XORPEN) },             /* 0x26  S^(D|(S&P))    */
  99     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_NOTXORPEN),
 100       OP(SRC,DST,R2_MERGEPEN), OP(TMP,DST,R2_XORPEN) },             /* 0x27  S^(D|~(P^S))   */
 101     { OP(PAT,SRC,R2_XORPEN), OP(SRC,DST,R2_MASKPEN) },              /* 0x28  D&(P^S)        */
 102     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_MASKPEN),
 103       OP(SRC,DST,R2_MERGEPEN), OP(TMP,DST,R2_XORPEN),
 104       OP(PAT,DST,R2_NOTXORPEN) },                                   /* 0x29  ~P^S^(D|(P&S)) */
 105     { OP(PAT,SRC,R2_NOTMASKPEN), OP(SRC,DST,R2_MASKPEN) },          /* 0x2a  D&~(P&S)       */
 106     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_XORPEN),
 107       OP(PAT,DST,R2_XORPEN), OP(SRC,DST,R2_MASKPEN),
 108       OP(TMP,DST,R2_NOTXORPEN) },                                   /* 0x2b ~S^((P^S)&(P^D))*/
 109     { OP(SRC,DST,R2_MERGEPEN), OP(PAT,DST,R2_MASKPEN),
 110       OP(SRC,DST,R2_XORPEN) },                                      /* 0x2c  S^(P&(S|D))    */
 111     { OP(SRC,DST,R2_MERGEPENNOT), OP(PAT,DST,R2_XORPEN) },          /* 0x2d  P^(S|~D)       */
 112     { OP(PAT,DST,R2_XORPEN), OP(SRC,DST,R2_MERGEPEN),
 113       OP(PAT,DST,R2_XORPEN) },                                      /* 0x2e  P^(S|(D^P))    */
 114     { OP(SRC,DST,R2_MERGEPENNOT), OP(PAT,DST,R2_NOTMASKPEN) },      /* 0x2f  ~(P&(S|~D))    */
 115     { OP(PAT,SRC,R2_MASKPENNOT) },                                  /* 0x30  P&~S           */
 116     { OP(PAT,DST,R2_MASKNOTPEN), OP(SRC,DST,R2_NOTMERGEPEN) },      /* 0x31  ~(S|(D&~P))    */
 117     { OP(SRC,DST,R2_MERGEPEN), OP(PAT,DST,R2_MERGEPEN),
 118       OP(SRC,DST,R2_XORPEN) },                                      /* 0x32  S^(D|P|S)      */
 119     { OP(SRC,DST,R2_NOTCOPYPEN) },                                  /* 0x33  ~S             */
 120     { OP(SRC,DST,R2_MASKPEN), OP(PAT,DST,R2_MERGEPEN),
 121       OP(SRC,DST,R2_XORPEN) },                                      /* 0x34  S^(P|(D&S))    */
 122     { OP(SRC,DST,R2_NOTXORPEN), OP(PAT,DST,R2_MERGEPEN),
 123       OP(SRC,DST,R2_XORPEN) },                                      /* 0x35  S^(P|~(D^S))   */
 124     { OP(PAT,DST,R2_MERGEPEN), OP(SRC,DST,R2_XORPEN) },             /* 0x36  S^(D|P)        */
 125     { OP(PAT,DST,R2_MERGEPEN), OP(SRC,DST,R2_NOTMASKPEN) },         /* 0x37  ~(S&(D|P))     */
 126     { OP(PAT,DST,R2_MERGEPEN), OP(SRC,DST,R2_MASKPEN),
 127       OP(PAT,DST,R2_XORPEN) },                                      /* 0x38  P^(S&(D|P))    */
 128     { OP(PAT,DST,R2_MERGEPENNOT), OP(SRC,DST,R2_XORPEN) },          /* 0x39  S^(P|~D)       */
 129     { OP(SRC,DST,R2_XORPEN), OP(PAT,DST,R2_MERGEPEN),
 130       OP(SRC,DST,R2_XORPEN) },                                      /* 0x3a  S^(P|(D^S))    */
 131     { OP(PAT,DST,R2_MERGEPENNOT), OP(SRC,DST,R2_NOTMASKPEN) },      /* 0x3b  ~(S&(P|~D))    */
 132     { OP(PAT,SRC,R2_XORPEN) },                                      /* 0x3c  P^S            */
 133     { OP(SRC,DST,R2_NOTMERGEPEN), OP(PAT,DST,R2_MERGEPEN),
 134       OP(SRC,DST,R2_XORPEN) },                                      /* 0x3d  S^(P|~(D|S))   */
 135     { OP(SRC,DST,R2_MASKNOTPEN), OP(PAT,DST,R2_MERGEPEN),
 136       OP(SRC,DST,R2_XORPEN) },                                      /* 0x3e  S^(P|(D&~S))   */
 137     { OP(PAT,SRC,R2_NOTMASKPEN) },                                  /* 0x3f  ~(P&S)         */
 138     { OP(SRC,DST,R2_MASKPENNOT), OP(PAT,DST,R2_MASKPEN) },          /* 0x40  P&S&~D         */
 139     { OP(PAT,SRC,R2_XORPEN), OP(SRC,DST,R2_NOTMERGEPEN) },          /* 0x41  ~(D|(P^S))     */
 140     { OP(DST,SRC,R2_XORPEN), OP(PAT,DST,R2_XORPEN),
 141       OP(SRC,DST,R2_MASKPEN) },                                     /* 0x42  (S^D)&(P^D)    */
 142     { OP(SRC,DST,R2_NOTMASKPEN), OP(PAT,DST,R2_MASKPEN),
 143       OP(SRC,DST,R2_NOTXORPEN) },                                   /* 0x43  ~S^(P&~(D&S))  */
 144     { OP(SRC,DST,R2_MASKPENNOT) },                                  /* 0x44  S&~D           */
 145     { OP(PAT,SRC,R2_MASKPENNOT), OP(SRC,DST,R2_NOTMERGEPEN) },      /* 0x45  ~(D|(P&~S))    */
 146     { OP(DST,TMP,R2_COPYPEN), OP(PAT,DST,R2_MASKPEN),
 147       OP(SRC,DST,R2_MERGEPEN), OP(TMP,DST,R2_XORPEN) },             /* 0x46  D^(S|(P&D))    */
 148     { OP(PAT,DST,R2_XORPEN), OP(SRC,DST,R2_MASKPEN),
 149       OP(PAT,DST,R2_NOTXORPEN) },                                   /* 0x47  ~P^(S&(D^P))   */
 150     { OP(PAT,DST,R2_XORPEN), OP(SRC,DST,R2_MASKPEN) },              /* 0x48  S&(P^D)        */
 151     { OP(DST,TMP,R2_COPYPEN), OP(PAT,DST,R2_MASKPEN),
 152       OP(SRC,DST,R2_MERGEPEN), OP(TMP,DST,R2_XORPEN),
 153       OP(PAT,DST,R2_NOTXORPEN) },                                   /* 0x49  ~P^D^(S|(P&D)) */
 154     { OP(DST,SRC,R2_MERGEPEN), OP(PAT,SRC,R2_MASKPEN),
 155       OP(SRC,DST,R2_XORPEN) },                                      /* 0x4a  D^(P&(S|D))    */
 156     { OP(SRC,DST,R2_MERGENOTPEN), OP(PAT,DST,R2_XORPEN) },          /* 0x4b  P^(D|~S)       */
 157     { OP(PAT,DST,R2_NOTMASKPEN), OP(SRC,DST,R2_MASKPEN) },          /* 0x4c  S&~(D&P)       */
 158     { OP(SRC,TMP,R2_COPYPEN), OP(SRC,DST,R2_XORPEN),
 159       OP(PAT,SRC,R2_XORPEN), OP(SRC,DST,R2_MERGEPEN),
 160       OP(TMP,DST,R2_NOTXORPEN) },                                   /* 0x4d ~S^((S^P)|(S^D))*/
 161     { OP(PAT,SRC,R2_XORPEN), OP(SRC,DST,R2_MERGEPEN),
 162       OP(PAT,DST,R2_XORPEN) },                                      /* 0x4e  P^(D|(S^P))    */
 163     { OP(SRC,DST,R2_MERGENOTPEN), OP(PAT,DST,R2_NOTMASKPEN) },      /* 0x4f  ~(P&(D|~S))    */
 164     { OP(PAT,DST,R2_MASKPENNOT) },                                  /* 0x50  P&~D           */
 165     { OP(PAT,SRC,R2_MASKNOTPEN), OP(SRC,DST,R2_NOTMERGEPEN) },      /* 0x51  ~(D|(S&~P))    */
 166     { OP(DST,SRC,R2_MASKPEN), OP(PAT,SRC,R2_MERGEPEN),
 167       OP(SRC,DST,R2_XORPEN) },                                      /* 0x52  D^(P|(S&D))    */
 168     { OP(SRC,DST,R2_XORPEN), OP(PAT,DST,R2_MASKPEN),
 169       OP(SRC,DST,R2_NOTXORPEN) },                                   /* 0x53  ~S^(P&(D^S))   */
 170     { OP(PAT,SRC,R2_NOTMERGEPEN), OP(SRC,DST,R2_NOTMERGEPEN) },     /* 0x54  ~(D|~(P|S))    */
 171     { OP(PAT,DST,R2_NOT) },                                         /* 0x55  ~D             */
 172     { OP(PAT,SRC,R2_MERGEPEN), OP(SRC,DST,R2_XORPEN) },             /* 0x56  D^(P|S)        */
 173     { OP(PAT,SRC,R2_MERGEPEN), OP(SRC,DST,R2_NOTMASKPEN) },         /* 0x57  ~(D&(P|S))     */
 174     { OP(PAT,SRC,R2_MERGEPEN), OP(SRC,DST,R2_MASKPEN),
 175       OP(PAT,DST,R2_XORPEN) },                                      /* 0x58  P^(D&(P|S))    */
 176     { OP(PAT,SRC,R2_MERGEPENNOT), OP(SRC,DST,R2_XORPEN) },          /* 0x59  D^(P|~S)       */
 177     { OP(PAT,DST,R2_XORPEN) },                                      /* 0x5a  D^P            */
 178     { OP(DST,SRC,R2_NOTMERGEPEN), OP(PAT,SRC,R2_MERGEPEN),
 179       OP(SRC,DST,R2_XORPEN) },                                      /* 0x5b  D^(P|~(S|D))   */
 180     { OP(DST,SRC,R2_XORPEN), OP(PAT,SRC,R2_MERGEPEN),
 181       OP(SRC,DST,R2_XORPEN) },                                      /* 0x5c  D^(P|(S^D))    */
 182     { OP(PAT,SRC,R2_MERGEPENNOT), OP(SRC,DST,R2_NOTMASKPEN) },      /* 0x5d  ~(D&(P|~S))    */
 183     { OP(DST,SRC,R2_MASKNOTPEN), OP(PAT,SRC,R2_MERGEPEN),
 184       OP(SRC,DST,R2_XORPEN) },                                      /* 0x5e  D^(P|(S&~D))   */
 185     { OP(PAT,DST,R2_NOTMASKPEN) },                                  /* 0x5f  ~(D&P)         */
 186     { OP(SRC,DST,R2_XORPEN), OP(PAT,DST,R2_MASKPEN) },              /* 0x60  P&(D^S)        */
 187     { OP(DST,TMP,R2_COPYPEN), OP(SRC,DST,R2_MASKPEN),
 188       OP(PAT,DST,R2_MERGEPEN), OP(SRC,DST,R2_XORPEN),
 189       OP(TMP,DST,R2_NOTXORPEN) },                                   /* 0x61  ~D^S^(P|(D&S)) */
 190     { OP(DST,TMP,R2_COPYPEN), OP(PAT,DST,R2_MERGEPEN),
 191       OP(SRC,DST,R2_MASKPEN), OP(TMP,DST,R2_XORPEN) },              /* 0x62  D^(S&(P|D))    */
 192     { OP(PAT,DST,R2_MERGENOTPEN), OP(SRC,DST,R2_XORPEN) },          /* 0x63  S^(D|~P)       */
 193     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_MERGEPEN),
 194       OP(SRC,DST,R2_MASKPEN), OP(TMP,DST,R2_XORPEN) },              /* 0x64  S^(D&(P|S))    */
 195     { OP(PAT,SRC,R2_MERGENOTPEN), OP(SRC,DST,R2_XORPEN) },          /* 0x65  D^(S|~P)       */
 196     { OP(SRC,DST,R2_XORPEN) },                                      /* 0x66  S^D            */
 197     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_NOTMERGEPEN),
 198       OP(SRC,DST,R2_MERGEPEN), OP(TMP,DST,R2_XORPEN) },             /* 0x67  S^(D|~(S|P)    */
 199     { OP(DST,TMP,R2_COPYPEN), OP(SRC,DST,R2_NOTMERGEPEN),
 200       OP(PAT,DST,R2_MERGEPEN), OP(SRC,DST,R2_XORPEN),
 201       OP(TMP,DST,R2_NOTXORPEN) },                                   /* 0x68  ~D^S^(P|~(D|S))*/
 202     { OP(SRC,DST,R2_XORPEN), OP(PAT,DST,R2_NOTXORPEN) },            /* 0x69  ~P^(D^S)       */
 203     { OP(PAT,SRC,R2_MASKPEN), OP(SRC,DST,R2_XORPEN) },              /* 0x6a  D^(P&S)        */
 204     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_MERGEPEN),
 205       OP(SRC,DST,R2_MASKPEN), OP(TMP,DST,R2_XORPEN),
 206       OP(PAT,DST,R2_NOTXORPEN) },                                   /* 0x6b  ~P^S^(D&(P|S)) */
 207     { OP(PAT,DST,R2_MASKPEN), OP(SRC,DST,R2_XORPEN) },              /* 0x6c  S^(D&P)        */
 208     { OP(DST,TMP,R2_COPYPEN), OP(PAT,DST,R2_MERGEPEN),
 209       OP(SRC,DST,R2_MASKPEN), OP(TMP,DST,R2_XORPEN),
 210       OP(PAT,DST,R2_NOTXORPEN) },                                   /* 0x6d  ~P^D^(S&(P|D)) */
 211     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_MERGEPENNOT),
 212       OP(SRC,DST,R2_MASKPEN), OP(TMP,DST,R2_XORPEN) },              /* 0x6e  S^(D&(P|~S))   */
 213     { OP(SRC,DST,R2_NOTXORPEN), OP(PAT,DST,R2_NOTMASKPEN) },        /* 0x6f  ~(P&~(S^D))    */
 214     { OP(SRC,DST,R2_NOTMASKPEN), OP(PAT,DST,R2_MASKPEN) },          /* 0x70  P&~(D&S)       */
 215     { OP(SRC,TMP,R2_COPYPEN), OP(DST,SRC,R2_XORPEN),
 216       OP(PAT,DST,R2_XORPEN), OP(SRC,DST,R2_MASKPEN),
 217       OP(TMP,DST,R2_NOTXORPEN) },                                   /* 0x71 ~S^((S^D)&(P^D))*/
 218     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_XORPEN),
 219       OP(SRC,DST,R2_MERGEPEN), OP(TMP,DST,R2_XORPEN) },             /* 0x72  S^(D|(P^S))    */
 220     { OP(PAT,DST,R2_MERGENOTPEN), OP(SRC,DST,R2_NOTMASKPEN) },      /* 0x73  ~(S&(D|~P))    */
 221     { OP(DST,TMP,R2_COPYPEN), OP(PAT,DST,R2_XORPEN),
 222       OP(SRC,DST,R2_MERGEPEN), OP(TMP,DST,R2_XORPEN) },             /* 0x74   D^(S|(P^D))   */
 223     { OP(PAT,SRC,R2_MERGENOTPEN), OP(SRC,DST,R2_NOTMASKPEN) },      /* 0x75  ~(D&(S|~P))    */
 224     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_MASKPENNOT),
 225       OP(SRC,DST,R2_MERGEPEN), OP(TMP,DST,R2_XORPEN) },             /* 0x76  S^(D|(P&~S))   */
 226     { OP(SRC,DST,R2_NOTMASKPEN) },                                  /* 0x77  ~(S&D)         */
 227     { OP(SRC,DST,R2_MASKPEN), OP(PAT,DST,R2_XORPEN) },              /* 0x78  P^(D&S)        */
 228     { OP(DST,TMP,R2_COPYPEN), OP(SRC,DST,R2_MERGEPEN),
 229       OP(PAT,DST,R2_MASKPEN), OP(SRC,DST,R2_XORPEN),
 230       OP(TMP,DST,R2_NOTXORPEN) },                                   /* 0x79  ~D^S^(P&(D|S)) */
 231     { OP(DST,SRC,R2_MERGENOTPEN), OP(PAT,SRC,R2_MASKPEN),
 232       OP(SRC,DST,R2_XORPEN) },                                      /* 0x7a  D^(P&(S|~D))   */
 233     { OP(PAT,DST,R2_NOTXORPEN), OP(SRC,DST,R2_NOTMASKPEN) },        /* 0x7b  ~(S&~(D^P))    */
 234     { OP(SRC,DST,R2_MERGENOTPEN), OP(PAT,DST,R2_MASKPEN),
 235       OP(SRC,DST,R2_XORPEN) },                                      /* 0x7c  S^(P&(D|~S))   */
 236     { OP(PAT,SRC,R2_NOTXORPEN), OP(SRC,DST,R2_NOTMASKPEN) },        /* 0x7d  ~(D&~(P^S))    */
 237     { OP(SRC,DST,R2_XORPEN), OP(PAT,SRC,R2_XORPEN),
 238       OP(SRC,DST,R2_MERGEPEN) },                                    /* 0x7e  (S^P)|(S^D)    */
 239     { OP(PAT,SRC,R2_MASKPEN), OP(SRC,DST,R2_NOTMASKPEN) },          /* 0x7f  ~(D&P&S)       */
 240     { OP(PAT,SRC,R2_MASKPEN), OP(SRC,DST,R2_MASKPEN) },             /* 0x80  D&P&S          */
 241     { OP(SRC,DST,R2_XORPEN), OP(PAT,SRC,R2_XORPEN),
 242       OP(SRC,DST,R2_NOTMERGEPEN) },                                 /* 0x81  ~((S^P)|(S^D)) */
 243     { OP(PAT,SRC,R2_NOTXORPEN), OP(SRC,DST,R2_MASKPEN) },           /* 0x82  D&~(P^S)       */
 244     { OP(SRC,DST,R2_MERGENOTPEN), OP(PAT,DST,R2_MASKPEN),
 245       OP(SRC,DST,R2_NOTXORPEN) },                                   /* 0x83  ~S^(P&(D|~S))  */
 246     { OP(PAT,DST,R2_NOTXORPEN), OP(SRC,DST,R2_MASKPEN) },           /* 0x84  S&~(D^P)       */
 247     { OP(PAT,SRC,R2_MERGENOTPEN), OP(SRC,DST,R2_MASKPEN),
 248       OP(PAT,DST,R2_NOTXORPEN) },                                   /* 0x85  ~P^(D&(S|~P))  */
 249     { OP(DST,TMP,R2_COPYPEN), OP(SRC,DST,R2_MERGEPEN),
 250       OP(PAT,DST,R2_MASKPEN), OP(SRC,DST,R2_XORPEN),
 251       OP(TMP,DST,R2_XORPEN) },                                      /* 0x86  D^S^(P&(D|S))  */
 252     { OP(SRC,DST,R2_MASKPEN), OP(PAT,DST,R2_NOTXORPEN) },           /* 0x87  ~P^(D&S)       */
 253     { OP(SRC,DST,R2_MASKPEN) },                                     /* 0x88  S&D            */
 254     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_MASKPENNOT),
 255       OP(SRC,DST,R2_MERGEPEN), OP(TMP,DST,R2_NOTXORPEN) },          /* 0x89  ~S^(D|(P&~S))  */
 256     { OP(PAT,SRC,R2_MERGENOTPEN), OP(SRC,DST,R2_MASKPEN) },         /* 0x8a  D&(S|~P)       */
 257     { OP(DST,TMP,R2_COPYPEN), OP(PAT,DST,R2_XORPEN),
 258       OP(SRC,DST,R2_MERGEPEN), OP(TMP,DST,R2_NOTXORPEN) },          /* 0x8b  ~D^(S|(P^D))   */
 259     { OP(PAT,DST,R2_MERGENOTPEN), OP(SRC,DST,R2_MASKPEN) },         /* 0x8c  S&(D|~P)       */
 260     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_XORPEN),
 261       OP(SRC,DST,R2_MERGEPEN), OP(TMP,DST,R2_NOTXORPEN) },          /* 0x8d  ~S^(D|(P^S))   */
 262     { OP(SRC,TMP,R2_COPYPEN), OP(DST,SRC,R2_XORPEN),
 263       OP(PAT,DST,R2_XORPEN), OP(SRC,DST,R2_MASKPEN),
 264       OP(TMP,DST,R2_XORPEN) },                                      /* 0x8e  S^((S^D)&(P^D))*/
 265     { OP(SRC,DST,R2_NOTMASKPEN), OP(PAT,DST,R2_NOTMASKPEN) },       /* 0x8f  ~(P&~(D&S))    */
 266     { OP(SRC,DST,R2_NOTXORPEN), OP(PAT,DST,R2_MASKPEN) },           /* 0x90  P&~(D^S)       */
 267     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_MERGEPENNOT),
 268       OP(SRC,DST,R2_MASKPEN), OP(TMP,DST,R2_NOTXORPEN) },           /* 0x91  ~S^(D&(P|~S))  */
 269     { OP(DST,TMP,R2_COPYPEN), OP(PAT,DST,R2_MERGEPEN),
 270       OP(SRC,DST,R2_MASKPEN), OP(PAT,DST,R2_XORPEN),
 271       OP(TMP,DST,R2_XORPEN) },                                      /* 0x92  D^P^(S&(D|P))  */
 272     { OP(PAT,DST,R2_MASKPEN), OP(SRC,DST,R2_NOTXORPEN) },           /* 0x93  ~S^(P&D)       */
 273     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_MERGEPEN),
 274       OP(SRC,DST,R2_MASKPEN), OP(PAT,DST,R2_XORPEN),
 275       OP(TMP,DST,R2_XORPEN) },                                      /* 0x94  S^P^(D&(P|S))  */
 276     { OP(PAT,SRC,R2_MASKPEN), OP(SRC,DST,R2_NOTXORPEN) },           /* 0x95  ~D^(P&S)       */
 277     { OP(PAT,SRC,R2_XORPEN), OP(SRC,DST,R2_XORPEN) },               /* 0x96  D^P^S          */
 278     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_NOTMERGEPEN),
 279       OP(SRC,DST,R2_MERGEPEN), OP(PAT,DST,R2_XORPEN),
 280       OP(TMP,DST,R2_XORPEN) },                                      /* 0x97  S^P^(D|~(P|S)) */
 281     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_NOTMERGEPEN),
 282       OP(SRC,DST,R2_MERGEPEN), OP(TMP,DST,R2_NOTXORPEN) },          /* 0x98  ~S^(D|~(P|S))  */
 283     { OP(SRC,DST,R2_NOTXORPEN) },                                   /* 0x99  ~S^D           */
 284     { OP(PAT,SRC,R2_MASKPENNOT), OP(SRC,DST,R2_XORPEN) },           /* 0x9a  D^(P&~S)       */
 285     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_MERGEPEN),
 286       OP(SRC,DST,R2_MASKPEN), OP(TMP,DST,R2_NOTXORPEN) },           /* 0x9b  ~S^(D&(P|S))   */
 287     { OP(PAT,DST,R2_MASKPENNOT), OP(SRC,DST,R2_XORPEN) },           /* 0x9c  S^(P&~D)       */
 288     { OP(DST,TMP,R2_COPYPEN), OP(PAT,DST,R2_MERGEPEN),
 289       OP(SRC,DST,R2_MASKPEN), OP(TMP,DST,R2_NOTXORPEN) },           /* 0x9d  ~D^(S&(P|D))   */
 290     { OP(DST,TMP,R2_COPYPEN), OP(SRC,DST,R2_MASKPEN),
 291       OP(PAT,DST,R2_MERGEPEN), OP(SRC,DST,R2_XORPEN),
 292       OP(TMP,DST,R2_XORPEN) },                                      /* 0x9e  D^S^(P|(D&S))  */
 293     { OP(SRC,DST,R2_XORPEN), OP(PAT,DST,R2_NOTMASKPEN) },           /* 0x9f  ~(P&(D^S))     */
 294     { OP(PAT,DST,R2_MASKPEN) },                                     /* 0xa0  D&P            */
 295     { OP(PAT,SRC,R2_MASKNOTPEN), OP(SRC,DST,R2_MERGEPEN),
 296       OP(PAT,DST,R2_NOTXORPEN) },                                   /* 0xa1  ~P^(D|(S&~P))  */
 297     { OP(PAT,SRC,R2_MERGEPENNOT), OP(SRC,DST,R2_MASKPEN) },         /* 0xa2  D&(P|~S)       */
 298     { OP(DST,SRC,R2_XORPEN), OP(PAT,SRC,R2_MERGEPEN),
 299       OP(SRC,DST,R2_NOTXORPEN) },                                   /* 0xa3  ~D^(P|(S^D))   */
 300     { OP(PAT,SRC,R2_NOTMERGEPEN), OP(SRC,DST,R2_MERGEPEN),
 301       OP(PAT,DST,R2_NOTXORPEN) },                                   /* 0xa4  ~P^(D|~(S|P))  */
 302     { OP(PAT,DST,R2_NOTXORPEN) },                                   /* 0xa5  ~P^D           */
 303     { OP(PAT,SRC,R2_MASKNOTPEN), OP(SRC,DST,R2_XORPEN) },           /* 0xa6  D^(S&~P)       */
 304     { OP(PAT,SRC,R2_MERGEPEN), OP(SRC,DST,R2_MASKPEN),
 305       OP(PAT,DST,R2_NOTXORPEN) },                                   /* 0xa7  ~P^(D&(S|P))   */
 306     { OP(PAT,SRC,R2_MERGEPEN), OP(SRC,DST,R2_MASKPEN) },            /* 0xa8  D&(P|S)        */
 307     { OP(PAT,SRC,R2_MERGEPEN), OP(SRC,DST,R2_NOTXORPEN) },          /* 0xa9  ~D^(P|S)       */
 308     { OP(PAT,DST,R2_NOP) },                                         /* 0xaa  D              */
 309     { OP(PAT,SRC,R2_NOTMERGEPEN), OP(SRC,DST,R2_MERGEPEN) },        /* 0xab  D|~(P|S)       */
 310     { OP(SRC,DST,R2_XORPEN), OP(PAT,DST,R2_MASKPEN),
 311       OP(SRC,DST,R2_XORPEN) },                                      /* 0xac  S^(P&(D^S))    */
 312     { OP(DST,SRC,R2_MASKPEN), OP(PAT,SRC,R2_MERGEPEN),
 313       OP(SRC,DST,R2_NOTXORPEN) },                                   /* 0xad  ~D^(P|(S&D))   */
 314     { OP(PAT,SRC,R2_MASKNOTPEN), OP(SRC,DST,R2_MERGEPEN) },         /* 0xae  D|(S&~P)       */
 315     { OP(PAT,DST,R2_MERGENOTPEN) },                                 /* 0xaf  D|~P           */
 316     { OP(SRC,DST,R2_MERGENOTPEN), OP(PAT,DST,R2_MASKPEN) },         /* 0xb0  P&(D|~S)       */
 317     { OP(PAT,SRC,R2_XORPEN), OP(SRC,DST,R2_MERGEPEN),
 318       OP(PAT,DST,R2_NOTXORPEN) },                                   /* 0xb1  ~P^(D|(S^P))   */
 319     { OP(SRC,TMP,R2_COPYPEN), OP(SRC,DST,R2_XORPEN),
 320       OP(PAT,SRC,R2_XORPEN), OP(SRC,DST,R2_MERGEPEN),
 321       OP(TMP,DST,R2_XORPEN) },                                      /* 0xb2  S^((S^P)|(S^D))*/
 322     { OP(PAT,DST,R2_NOTMASKPEN), OP(SRC,DST,R2_NOTMASKPEN) },       /* 0xb3  ~(S&~(D&P))    */
 323     { OP(SRC,DST,R2_MASKPENNOT), OP(PAT,DST,R2_XORPEN) },           /* 0xb4  P^(S&~D)       */
 324     { OP(DST,SRC,R2_MERGEPEN), OP(PAT,SRC,R2_MASKPEN),
 325       OP(SRC,DST,R2_NOTXORPEN) },                                   /* 0xb5  ~D^(P&(S|D))   */
 326     { OP(DST,TMP,R2_COPYPEN), OP(PAT,DST,R2_MASKPEN),
 327       OP(SRC,DST,R2_MERGEPEN), OP(PAT,DST,R2_XORPEN),
 328       OP(TMP,DST,R2_XORPEN) },                                      /* 0xb6  D^P^(S|(D&P))  */
 329     { OP(PAT,DST,R2_XORPEN), OP(SRC,DST,R2_NOTMASKPEN) },           /* 0xb7  ~(S&(D^P))     */
 330     { OP(PAT,DST,R2_XORPEN), OP(SRC,DST,R2_MASKPEN),
 331       OP(PAT,DST,R2_XORPEN) },                                      /* 0xb8  P^(S&(D^P))    */
 332     { OP(DST,TMP,R2_COPYPEN), OP(PAT,DST,R2_MASKPEN),
 333       OP(SRC,DST,R2_MERGEPEN), OP(TMP,DST,R2_NOTXORPEN) },          /* 0xb9  ~D^(S|(P&D))   */
 334     { OP(PAT,SRC,R2_MASKPENNOT), OP(SRC,DST,R2_MERGEPEN) },         /* 0xba  D|(P&~S)       */
 335     { OP(SRC,DST,R2_MERGENOTPEN) },                                 /* 0xbb  ~S|D           */
 336     { OP(SRC,DST,R2_NOTMASKPEN), OP(PAT,DST,R2_MASKPEN),
 337       OP(SRC,DST,R2_XORPEN) },                                      /* 0xbc  S^(P&~(D&S))   */
 338     { OP(DST,SRC,R2_XORPEN), OP(PAT,DST,R2_XORPEN),
 339       OP(SRC,DST,R2_NOTMASKPEN) },                                  /* 0xbd  ~((S^D)&(P^D)) */
 340     { OP(PAT,SRC,R2_XORPEN), OP(SRC,DST,R2_MERGEPEN) },             /* 0xbe  D|(P^S)        */
 341     { OP(PAT,SRC,R2_NOTMASKPEN), OP(SRC,DST,R2_MERGEPEN) },         /* 0xbf  D|~(P&S)       */
 342     { OP(PAT,SRC,R2_MASKPEN) },                                     /* 0xc0  P&S            */
 343     { OP(SRC,DST,R2_MASKNOTPEN), OP(PAT,DST,R2_MERGEPEN),
 344       OP(SRC,DST,R2_NOTXORPEN) },                                   /* 0xc1  ~S^(P|(D&~S))  */
 345     { OP(SRC,DST,R2_NOTMERGEPEN), OP(PAT,DST,R2_MERGEPEN),
 346       OP(SRC,DST,R2_NOTXORPEN) },                                   /* 0xc2  ~S^(P|~(D|S))  */
 347     { OP(PAT,SRC,R2_NOTXORPEN) },                                   /* 0xc3  ~P^S           */
 348     { OP(PAT,DST,R2_MERGEPENNOT), OP(SRC,DST,R2_MASKPEN) },         /* 0xc4  S&(P|~D)       */
 349     { OP(SRC,DST,R2_XORPEN), OP(PAT,DST,R2_MERGEPEN),
 350       OP(SRC,DST,R2_NOTXORPEN) },                                   /* 0xc5  ~S^(P|(D^S))   */
 351     { OP(PAT,DST,R2_MASKNOTPEN), OP(SRC,DST,R2_XORPEN) },           /* 0xc6  S^(D&~P)       */
 352     { OP(PAT,DST,R2_MERGEPEN), OP(SRC,DST,R2_MASKPEN),
 353       OP(PAT,DST,R2_NOTXORPEN) },                                   /* 0xc7  ~P^(S&(D|P))   */
 354     { OP(PAT,DST,R2_MERGEPEN), OP(SRC,DST,R2_MASKPEN) },            /* 0xc8  S&(D|P)        */
 355     { OP(PAT,DST,R2_MERGEPEN), OP(SRC,DST,R2_NOTXORPEN) },          /* 0xc9  ~S^(P|D)       */
 356     { OP(DST,SRC,R2_XORPEN), OP(PAT,SRC,R2_MASKPEN),
 357       OP(SRC,DST,R2_XORPEN) },                                      /* 0xca  D^(P&(S^D))    */
 358     { OP(SRC,DST,R2_MASKPEN), OP(PAT,DST,R2_MERGEPEN),
 359       OP(SRC,DST,R2_NOTXORPEN) },                                   /* 0xcb  ~S^(P|(D&S))   */
 360     { OP(SRC,DST,R2_COPYPEN) },                                     /* 0xcc  S              */
 361     { OP(PAT,DST,R2_NOTMERGEPEN), OP(SRC,DST,R2_MERGEPEN) },        /* 0xcd  S|~(D|P)       */
 362     { OP(PAT,DST,R2_MASKNOTPEN), OP(SRC,DST,R2_MERGEPEN) },         /* 0xce  S|(D&~P)       */
 363     { OP(PAT,SRC,R2_MERGENOTPEN) },                                 /* 0xcf  S|~P           */
 364     { OP(SRC,DST,R2_MERGEPENNOT), OP(PAT,DST,R2_MASKPEN) },         /* 0xd0  P&(S|~D)       */
 365     { OP(PAT,DST,R2_XORPEN), OP(SRC,DST,R2_MERGEPEN),
 366       OP(PAT,DST,R2_NOTXORPEN) },                                   /* 0xd1  ~P^(S|(D^P))   */
 367     { OP(SRC,DST,R2_MASKNOTPEN), OP(PAT,DST,R2_XORPEN) },           /* 0xd2  P^(D&~S)       */
 368     { OP(SRC,DST,R2_MERGEPEN), OP(PAT,DST,R2_MASKPEN),
 369       OP(SRC,DST,R2_NOTXORPEN) },                                   /* 0xd3  ~S^(P&(D|S))   */
 370     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_XORPEN),
 371       OP(PAT,DST,R2_XORPEN), OP(SRC,DST,R2_MASKPEN),
 372       OP(TMP,DST,R2_XORPEN) },                                      /* 0xd4  S^((S^P)&(D^P))*/
 373     { OP(PAT,SRC,R2_NOTMASKPEN), OP(SRC,DST,R2_NOTMASKPEN) },       /* 0xd5  ~(D&~(P&S))    */
 374     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_MASKPEN),
 375       OP(SRC,DST,R2_MERGEPEN), OP(PAT,DST,R2_XORPEN),
 376       OP(TMP,DST,R2_XORPEN) },                                      /* 0xd6  S^P^(D|(P&S))  */
 377     { OP(PAT,SRC,R2_XORPEN), OP(SRC,DST,R2_NOTMASKPEN) },           /* 0xd7  ~(D&(P^S))     */
 378     { OP(PAT,SRC,R2_XORPEN), OP(SRC,DST,R2_MASKPEN),
 379       OP(PAT,DST,R2_XORPEN) },                                      /* 0xd8  P^(D&(S^P))    */
 380     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_MASKPEN),
 381       OP(SRC,DST,R2_MERGEPEN), OP(TMP,DST,R2_NOTXORPEN) },          /* 0xd9  ~S^(D|(P&S))   */
 382     { OP(DST,SRC,R2_NOTMASKPEN), OP(PAT,SRC,R2_MASKPEN),
 383       OP(SRC,DST,R2_XORPEN) },                                      /* 0xda  D^(P&~(S&D))   */
 384     { OP(SRC,DST,R2_XORPEN), OP(PAT,SRC,R2_XORPEN),
 385       OP(SRC,DST,R2_NOTMASKPEN) },                                  /* 0xdb  ~((S^P)&(S^D)) */
 386     { OP(PAT,DST,R2_MASKPENNOT), OP(SRC,DST,R2_MERGEPEN) },         /* 0xdc  S|(P&~D)       */
 387     { OP(SRC,DST,R2_MERGEPENNOT) },                                 /* 0xdd  S|~D           */
 388     { OP(PAT,DST,R2_XORPEN), OP(SRC,DST,R2_MERGEPEN) },             /* 0xde  S|(D^P)        */
 389     { OP(PAT,DST,R2_NOTMASKPEN), OP(SRC,DST,R2_MERGEPEN) },         /* 0xdf  S|~(D&P)       */
 390     { OP(SRC,DST,R2_MERGEPEN), OP(PAT,DST,R2_MASKPEN) },            /* 0xe0  P&(D|S)        */
 391     { OP(SRC,DST,R2_MERGEPEN), OP(PAT,DST,R2_NOTXORPEN) },          /* 0xe1  ~P^(D|S)       */
 392     { OP(DST,TMP,R2_COPYPEN), OP(PAT,DST,R2_XORPEN),
 393       OP(SRC,DST,R2_MASKPEN), OP(TMP,DST,R2_XORPEN) },              /* 0xe2  D^(S&(P^D))    */
 394     { OP(PAT,DST,R2_MASKPEN), OP(SRC,DST,R2_MERGEPEN),
 395       OP(PAT,DST,R2_NOTXORPEN) },                                   /* 0xe3  ~P^(S|(D&P))   */
 396     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_XORPEN),
 397       OP(SRC,DST,R2_MASKPEN), OP(TMP,DST,R2_XORPEN) },              /* 0xe4  S^(D&(P^S))    */
 398     { OP(PAT,SRC,R2_MASKPEN), OP(SRC,DST,R2_MERGEPEN),
 399       OP(PAT,DST,R2_NOTXORPEN) },                                   /* 0xe5  ~P^(D|(S&P))   */
 400     { OP(SRC,TMP,R2_COPYPEN), OP(PAT,SRC,R2_NOTMASKPEN),
 401       OP(SRC,DST,R2_MASKPEN), OP(TMP,DST,R2_XORPEN) },              /* 0xe6  S^(D&~(P&S))   */
 402     { OP(PAT,SRC,R2_XORPEN), OP(PAT,DST,R2_XORPEN),
 403       OP(SRC,DST,R2_NOTMASKPEN) },                                  /* 0xe7  ~((S^P)&(D^P)) */
 404     { OP(SRC,TMP,R2_COPYPEN), OP(SRC,DST,R2_XORPEN),
 405       OP(PAT,SRC,R2_XORPEN), OP(SRC,DST,R2_MASKPEN),
 406       OP(TMP,DST,R2_XORPEN) },                                      /* 0xe8  S^((S^P)&(S^D))*/
 407     { OP(DST,TMP,R2_COPYPEN), OP(SRC,DST,R2_NOTMASKPEN),
 408       OP(PAT,DST,R2_MASKPEN), OP(SRC,DST,R2_XORPEN),
 409       OP(TMP,DST,R2_NOTXORPEN) },                                   /* 0xe9  ~D^S^(P&~(S&D))*/
 410     { OP(PAT,SRC,R2_MASKPEN), OP(SRC,DST,R2_MERGEPEN) },            /* 0xea  D|(P&S)        */
 411     { OP(PAT,SRC,R2_NOTXORPEN), OP(SRC,DST,R2_MERGEPEN) },          /* 0xeb  D|~(P^S)       */
 412     { OP(PAT,DST,R2_MASKPEN), OP(SRC,DST,R2_MERGEPEN) },            /* 0xec  S|(D&P)        */
 413     { OP(PAT,DST,R2_NOTXORPEN), OP(SRC,DST,R2_MERGEPEN) },          /* 0xed  S|~(D^P)       */
 414     { OP(SRC,DST,R2_MERGEPEN) },                                    /* 0xee  S|D            */
 415     { OP(PAT,DST,R2_MERGENOTPEN), OP(SRC,DST,R2_MERGEPEN) },        /* 0xef  S|D|~P         */
 416     { OP(PAT,DST,R2_COPYPEN) },                                     /* 0xf0  P              */
 417     { OP(SRC,DST,R2_NOTMERGEPEN), OP(PAT,DST,R2_MERGEPEN) },        /* 0xf1  P|~(D|S)       */
 418     { OP(SRC,DST,R2_MASKNOTPEN), OP(PAT,DST,R2_MERGEPEN) },         /* 0xf2  P|(D&~S)       */
 419     { OP(PAT,SRC,R2_MERGEPENNOT) },                                 /* 0xf3  P|~S           */
 420     { OP(SRC,DST,R2_MASKPENNOT), OP(PAT,DST,R2_MERGEPEN) },         /* 0xf4  P|(S&~D)       */
 421     { OP(PAT,DST,R2_MERGEPENNOT) },                                 /* 0xf5  P|~D           */
 422     { OP(SRC,DST,R2_XORPEN), OP(PAT,DST,R2_MERGEPEN) },             /* 0xf6  P|(D^S)        */
 423     { OP(SRC,DST,R2_NOTMASKPEN), OP(PAT,DST,R2_MERGEPEN) },         /* 0xf7  P|~(S&D)       */
 424     { OP(SRC,DST,R2_MASKPEN), OP(PAT,DST,R2_MERGEPEN) },            /* 0xf8  P|(D&S)        */
 425     { OP(SRC,DST,R2_NOTXORPEN), OP(PAT,DST,R2_MERGEPEN) },          /* 0xf9  P|~(D^S)       */
 426     { OP(PAT,DST,R2_MERGEPEN) },                                    /* 0xfa  D|P            */
 427     { OP(PAT,SRC,R2_MERGEPENNOT), OP(SRC,DST,R2_MERGEPEN) },        /* 0xfb  D|P|~S         */
 428     { OP(PAT,SRC,R2_MERGEPEN) },                                    /* 0xfc  P|S            */
 429     { OP(SRC,DST,R2_MERGEPENNOT), OP(PAT,DST,R2_MERGEPEN) },        /* 0xfd  P|S|~D         */
 430     { OP(SRC,DST,R2_MERGEPEN), OP(PAT,DST,R2_MERGEPEN) },           /* 0xfe  P|D|S          */
 431     { OP(PAT,DST,R2_WHITE) }                                        /* 0xff  1              */
 432 };
 433
 434 static int get_overlap( const dib_info *dst, const RECT *dst_rect,
 435                         const dib_info *src, const RECT *src_rect )
 436 {
 437     const char *src_top, *dst_top;
 438     int height, ret = 0;
 439
 440     if (dst->stride != src->stride) return 0;  /* can't be the same dib */
 441     if (dst->rect.left + dst_rect->right <= src->rect.left + src_rect->left) return 0;
 442     if (dst->rect.left + dst_rect->left >= src->rect.left + src_rect->right) return 0;
 443
 444     src_top = (const char *)src->bits.ptr + (src->rect.top + src_rect->top) * src->stride;
 445     dst_top = (const char *)dst->bits.ptr + (dst->rect.top + dst_rect->top) * dst->stride;
 446     height = (dst_rect->bottom - dst_rect->top) * dst->stride;
 447
 448     if (dst->stride > 0)
 449     {
 450         if (src_top >= dst_top + height) return 0;
 451         if (src_top + height <= dst_top) return 0;
 452         if (dst_top < src_top) ret |= OVERLAP_ABOVE;
 453         else if (dst_top > src_top) ret |= OVERLAP_BELOW;
 454     }
 455     else
 456     {
 457         if (src_top <= dst_top + height) return 0;
 458         if (src_top + height >= dst_top) return 0;
 459         if (dst_top > src_top) ret |= OVERLAP_ABOVE;
 460         else if (dst_top < src_top) ret |= OVERLAP_BELOW;
 461     }
 462
 463     if (dst->rect.left + dst_rect->left < src->rect.left + src_rect->left) ret |= OVERLAP_LEFT;
 464     else if (dst->rect.left + dst_rect->left > src->rect.left + src_rect->left) ret |= OVERLAP_RIGHT;
 465
 466     return ret;
 467 }
 468
 469 static void copy_rect( dib_info *dst, const RECT *dst_rect, const dib_info *src, const RECT *src_rect,
 470                         const struct clipped_rects *clipped_rects, INT rop2 )
 471 {
 472     POINT origin;
 473     const RECT *rects;
 474     int i, count, start, end, overlap;
 475     DWORD and = 0, xor = 0;
 476
 477     if (clipped_rects)
 478     {
 479         rects = clipped_rects->rects;
 480         count = clipped_rects->count;
 481     }
 482     else
 483     {
 484         rects = dst_rect;
 485         count = 1;
 486     }
 487
 488     switch (rop2)
 489     {
 490     case R2_NOT:   and = ~0u;
 491         /* fall through */
 492     case R2_WHITE: xor = ~0u;
 493         /* fall through */
 494     case R2_BLACK:
 495         dst->funcs->solid_rects( dst, count, rects, and, xor );
 496         /* fall through */
 497     case R2_NOP:
 498         return;
 499     }
 500
 501     overlap = get_overlap( dst, dst_rect, src, src_rect );
 502     if (overlap & OVERLAP_BELOW)
 503     {
 504         if (overlap & OVERLAP_RIGHT)  /* right to left, bottom to top */
 505         {
 506             for (i = count - 1; i >= 0; i--)
 507             {
 508                 origin.x = src_rect->left + rects[i].left - dst_rect->left;
 509                 origin.y = src_rect->top  + rects[i].top  - dst_rect->top;
 510                 dst->funcs->copy_rect( dst, &rects[i], src, &origin, rop2, overlap );
 511             }
 512         }
 513         else  /* left to right, bottom to top */
 514         {
 515             for (start = count - 1; start >= 0; start = end)
 516             {
 517                 for (end = start - 1; end >= 0; end--)
 518                     if (rects[start].top != rects[end].top) break;
 519
 520                 for (i = end + 1; i <= start; i++)
 521                 {
 522                     origin.x = src_rect->left + rects[i].left - dst_rect->left;
 523                     origin.y = src_rect->top  + rects[i].top  - dst_rect->top;
 524                     dst->funcs->copy_rect( dst, &rects[i], src, &origin, rop2, overlap );
 525                 }
 526             }
 527         }
 528     }
 529     else if (overlap & OVERLAP_RIGHT)  /* right to left, top to bottom */
 530     {
 531         for (start = 0; start < count; start = end)
 532         {
 533             for (end = start + 1; end < count; end++)
 534                 if (rects[start].top != rects[end].top) break;
 535
 536             for (i = end - 1; i >= start; i--)
 537             {
 538                 origin.x = src_rect->left + rects[i].left - dst_rect->left;
 539                 origin.y = src_rect->top  + rects[i].top  - dst_rect->top;
 540                 dst->funcs->copy_rect( dst, &rects[i], src, &origin, rop2, overlap );
 541             }
 542         }
 543     }
 544     else  /* left to right, top to bottom */
 545     {
 546         for (i = 0; i < count; i++)
 547         {
 548             origin.x = src_rect->left + rects[i].left - dst_rect->left;
 549             origin.y = src_rect->top  + rects[i].top  - dst_rect->top;
 550             dst->funcs->copy_rect( dst, &rects[i], src, &origin, rop2, overlap );
 551         }
 552     }
 553 }
 554
 555 static DWORD blend_rect( dib_info *dst, const RECT *dst_rect, const dib_info *src, const RECT *src_rect,
 556                          HRGN clip, BLENDFUNCTION blend )
 557 {
 558     POINT origin;
 559     struct clipped_rects clipped_rects;
 560     int i;
 561
 562     if (!get_clipped_rects( dst, dst_rect, clip, &clipped_rects )) return ERROR_SUCCESS;
 563     for (i = 0; i < clipped_rects.count; i++)
 564     {
 565         origin.x = src_rect->left + clipped_rects.rects[i].left - dst_rect->left;
 566         origin.y = src_rect->top  + clipped_rects.rects[i].top  - dst_rect->top;
 567         dst->funcs->blend_rect( dst, &clipped_rects.rects[i], src, &origin, blend );
 568     }
 569     free_clipped_rects( &clipped_rects );
 570     return ERROR_SUCCESS;
 571 }
 572
 573 /* compute y-ordered, device coords vertices for a horizontal rectangle gradient */
 574 static void get_gradient_hrect_vertices( const GRADIENT_RECT *rect, const TRIVERTEX *vert,
 575                                          const POINT *dev_pts, TRIVERTEX v[2], RECT *bounds )
 576 {
 577     int v0 = rect->UpperLeft;
 578     int v1 = rect->LowerRight;
 579
 580     if (dev_pts[v1].x < dev_pts[v0].x)  /* swap the colors */
 581     {
 582         v0 = rect->LowerRight;
 583         v1 = rect->UpperLeft;
 584     }
 585     v[0]   = vert[v0];
 586     v[1]   = vert[v1];
 587     bounds->left   = v[0].x = dev_pts[v0].x;
 588     bounds->right  = v[1].x = dev_pts[v1].x;
 589     bounds->top    = v[0].y = min( dev_pts[v0].y, dev_pts[v1].y );
 590     bounds->bottom = v[1].y = max( dev_pts[v0].y, dev_pts[v1].y );
 591 }
 592
 593 /* compute y-ordered, device coords vertices for a vertical rectangle gradient */
 594 static void get_gradient_vrect_vertices( const GRADIENT_RECT *rect, const TRIVERTEX *vert,
 595                                          const POINT *dev_pts, TRIVERTEX v[2], RECT *bounds )
 596 {
 597     int v0 = rect->UpperLeft;
 598     int v1 = rect->LowerRight;
 599
 600     if (dev_pts[v1].y < dev_pts[v0].y)  /* swap the colors */
 601     {
 602         v0 = rect->LowerRight;
 603         v1 = rect->UpperLeft;
 604     }
 605     v[0]   = vert[v0];
 606     v[1]   = vert[v1];
 607     bounds->left   = v[0].x = min( dev_pts[v0].x, dev_pts[v1].x );
 608     bounds->right  = v[1].x = max( dev_pts[v0].x, dev_pts[v1].x );
 609     bounds->top    = v[0].y = dev_pts[v0].y;
 610     bounds->bottom = v[1].y = dev_pts[v1].y;
 611 }
 612
 613 /* compute y-ordered, device coords vertices for a triangle gradient */
 614 static void get_gradient_triangle_vertices( const GRADIENT_TRIANGLE *tri, const TRIVERTEX *vert,
 615                                             const POINT *dev_pts, TRIVERTEX v[3], RECT *bounds )
 616 {
 617     int v0, v1, v2;
 618
 619     if (dev_pts[tri->Vertex1].y > dev_pts[tri->Vertex2].y)
 620     {
 621         if (dev_pts[tri->Vertex3].y < dev_pts[tri->Vertex2].y)
 622             { v0 = tri->Vertex3; v1 = tri->Vertex2; v2 = tri->Vertex1; }
 623         else if (dev_pts[tri->Vertex3].y < dev_pts[tri->Vertex1].y)
 624             { v0 = tri->Vertex2; v1 = tri->Vertex3; v2 = tri->Vertex1; }
 625         else
 626             { v0 = tri->Vertex2; v1 = tri->Vertex1; v2 = tri->Vertex3; }
 627     }
 628     else
 629     {
 630         if (dev_pts[tri->Vertex3].y < dev_pts[tri->Vertex1].y)
 631             { v0 = tri->Vertex3; v1 = tri->Vertex1; v2 = tri->Vertex2; }
 632         else if (dev_pts[tri->Vertex3].y < dev_pts[tri->Vertex2].y)
 633             { v0 = tri->Vertex1; v1 = tri->Vertex3; v2 = tri->Vertex2; }
 634         else
 635             { v0 = tri->Vertex1; v1 = tri->Vertex2; v2 = tri->Vertex3; }
 636     }
 637     v[0]   = vert[v0];
 638     v[1]   = vert[v1];
 639     v[2]   = vert[v2];
 640     v[0].x = dev_pts[v0].x;
 641     v[0].y = dev_pts[v0].y;
 642     v[1].y = dev_pts[v1].y;
 643     v[1].x = dev_pts[v1].x;
 644     v[2].x = dev_pts[v2].x;
 645     v[2].y = dev_pts[v2].y;
 646     bounds->left   = min( v[0].x, min( v[1].x, v[2].x ));
 647     bounds->top    = v[0].y;
 648     bounds->right  = max( v[0].x, max( v[1].x, v[2].x ));
 649     bounds->bottom = v[2].y;
 650 }
 651
 652 static BOOL gradient_rect( dib_info *dib, TRIVERTEX *v, int mode, HRGN clip, const RECT *bounds )
 653 {
 654     int i;
 655     struct clipped_rects clipped_rects;
 656     BOOL ret = TRUE;
 657
 658     if (!get_clipped_rects( dib, bounds, clip, &clipped_rects )) return TRUE;
 659     for (i = 0; i < clipped_rects.count; i++)
 660     {
 661         if (!(ret = dib->funcs->gradient_rect( dib, &clipped_rects.rects[i], v, mode ))) break;
 662     }
 663     free_clipped_rects( &clipped_rects );
 664     return ret;
 665 }
 666
 667 static DWORD copy_src_bits( dib_info *src, RECT *src_rect )
 668 {
 669     int y, stride = get_dib_stride( src->width, src->bit_count );
 670     int height = src_rect->bottom - src_rect->top;
 671     void *ptr = HeapAlloc( GetProcessHeap(), 0, stride * height );
 672
 673     if (!ptr) return ERROR_OUTOFMEMORY;
 674
 675     for (y = 0; y < height; y++)
 676         memcpy( (char *)ptr + y * stride,
 677                 (char *)src->bits.ptr + (src->rect.top + src_rect->top + y) * src->stride, stride );
 678     src->stride = stride;
 679     src->height = height;
 680     src->rect.top = 0;
 681     src->rect.bottom = height;
 682     if (src->bits.free) src->bits.free( &src->bits );
 683     src->bits.is_copy = TRUE;
 684     src->bits.ptr = ptr;
 685     src->bits.free = free_heap_bits;
 686     src->bits.param = NULL;
 687
 688     offset_rect( src_rect, 0, -src_rect->top );
 689     return ERROR_SUCCESS;
 690 }
 691
 692 static DWORD create_tmp_dib( const dib_info *copy, int width, int height, dib_info *ret )
 693 {
 694     copy_dib_color_info( ret, copy );
 695     ret->width = width;
 696     ret->height = height;
 697     ret->stride = get_dib_stride( width, ret->bit_count );
 698     ret->rect.left   = 0;
 699     ret->rect.top    = 0;
 700     ret->rect.right  = width;
 701     ret->rect.bottom = height;
 702     ret->bits.ptr = HeapAlloc( GetProcessHeap(), 0, ret->height * ret->stride );
 703     ret->bits.is_copy = TRUE;
 704     ret->bits.free = free_heap_bits;
 705     ret->bits.param = NULL;
 706
 707     return ret->bits.ptr ? ERROR_SUCCESS : ERROR_OUTOFMEMORY;
 708 }
 709
 710 static DWORD execute_rop( dibdrv_physdev *pdev, const RECT *dst_rect, dib_info *src,
 711                           const RECT *src_rect, const struct clipped_rects *clipped_rects, DWORD rop )
 712 {
 713     dib_info *dibs[3], *result = src, tmp;
 714     RECT rects[3];
 715     int width  = dst_rect->right - dst_rect->left;
 716     int height = dst_rect->bottom - dst_rect->top;
 717     const BYTE *opcode = BITBLT_Opcodes[(rop >> 16) & 0xff];
 718     DWORD err;
 719
 720     dibs[SRC] = src;
 721     dibs[DST] = &pdev->dib;
 722     dibs[TMP] = 0;
 723
 724     rects[SRC] = *src_rect;
 725     rects[DST] = *dst_rect;
 726     rects[TMP] = *dst_rect;
 727     offset_rect( &rects[TMP], -rects[TMP].left, -rects[TMP].top );
 728
 729     for ( ; *opcode; opcode++)
 730     {
 731         if (OP_DST(*opcode) == DST) result = dibs[DST];
 732         if (OP_DST(*opcode) == SRC && src->bits.is_copy == FALSE)
 733         {
 734             err = copy_src_bits( src, &rects[SRC] );
 735             if (err) return err;
 736         }
 737         if (OP_DST(*opcode) == TMP && !dibs[TMP])
 738         {
 739             err = create_tmp_dib( &pdev->dib, width, height, &tmp );
 740             if (err) return err;
 741             dibs[TMP] = &tmp;
 742         }
 743
 744         switch(OP_SRCDST(*opcode))
 745         {
 746         case OP_ARGS(DST,TMP):
 747         case OP_ARGS(SRC,TMP):
 748         case OP_ARGS(DST,SRC):
 749         case OP_ARGS(SRC,DST):
 750         case OP_ARGS(TMP,SRC):
 751         case OP_ARGS(TMP,DST):
 752             copy_rect( dibs[OP_DST(*opcode)], &rects[OP_DST(*opcode)],
 753                        dibs[OP_SRC(*opcode)], &rects[OP_SRC(*opcode)],
 754                        OP_DST(*opcode) == DST ? clipped_rects : NULL, OP_ROP(*opcode) );
 755             break;
 756         case OP_ARGS(PAT,DST):
 757             pdev->brush.rects( pdev, &pdev->brush, dibs[DST], clipped_rects->count, clipped_rects->rects,
 758                                OP_ROP(*opcode) );
 759             break;
 760         case OP_ARGS(PAT,SRC):
 761             pdev->brush.rects( pdev, &pdev->brush, dibs[SRC], 1, &rects[SRC], OP_ROP(*opcode) );
 762             break;
 763         }
 764     }
 765
 766     if (dibs[TMP]) free_dib_info( dibs[TMP] );
 767
 768     if (result == src)
 769         copy_rect( dibs[DST], &rects[DST], dibs[SRC], &rects[SRC], clipped_rects, R2_COPYPEN );
 770
 771     return ERROR_SUCCESS;
 772 }
 773
 774 static void set_color_info( const dib_info *dib, BITMAPINFO *info )
 775 {
 776     DWORD *masks = (DWORD *)info->bmiColors;
 777
 778     info->bmiHeader.biCompression = BI_RGB;
 779     info->bmiHeader.biClrUsed     = 0;
 780
 781     switch (info->bmiHeader.biBitCount)
 782     {
 783     case 1:
 784     case 4:
 785     case 8:
 786         if (dib->color_table)
 787         {
 788             info->bmiHeader.biClrUsed = 1 << dib->bit_count;
 789             memcpy( info->bmiColors, dib->color_table, info->bmiHeader.biClrUsed * sizeof(RGBQUAD) );
 790         }
 791         break;
 792     case 16:
 793         masks[0] = dib->red_mask;
 794         masks[1] = dib->green_mask;
 795         masks[2] = dib->blue_mask;
 796         info->bmiHeader.biCompression = BI_BITFIELDS;
 797         break;
 798     case 32:
 799         if (dib->funcs != &funcs_8888)
 800         {
 801             masks[0] = dib->red_mask;
 802             masks[1] = dib->green_mask;
 803             masks[2] = dib->blue_mask;
 804             info->bmiHeader.biCompression = BI_BITFIELDS;
 805         }
 806         break;
 807     }
 808 }
 809
 810 static DWORD get_image_dib_info( dib_info *dib, BITMAPINFO *info,
 811                                  struct gdi_image_bits *bits, struct bitblt_coords *src )
 812 {
 813     info->bmiHeader.biSize          = sizeof(info->bmiHeader);
 814     info->bmiHeader.biPlanes        = 1;
 815     info->bmiHeader.biXPelsPerMeter = 0;
 816     info->bmiHeader.biYPelsPerMeter = 0;
 817     info->bmiHeader.biClrImportant  = 0;
 818     info->bmiHeader.biWidth         = dib->width;
 819     info->bmiHeader.biHeight        = dib->height;
 820     info->bmiHeader.biBitCount      = dib->bit_count;
 821     info->bmiHeader.biSizeImage     = info->bmiHeader.biHeight * abs( dib->stride );
 822     if (dib->stride > 0) info->bmiHeader.biHeight = -info->bmiHeader.biHeight;
 823
 824     set_color_info( dib, info );
 825
 826     if (bits)
 827     {
 828         bits->ptr = dib->bits.ptr;
 829         bits->is_copy = FALSE;
 830         bits->free = NULL;
 831         if (dib->stride < 0) bits->ptr = (char *)bits->ptr + (dib->height - 1) * dib->stride;
 832         src->x += dib->rect.left;
 833         src->y += dib->rect.top;
 834         offset_rect( &src->visrect, dib->rect.left, dib->rect.top );
 835     }
 836     return ERROR_SUCCESS;
 837 }
 838
 839 DWORD get_image_from_bitmap( BITMAPOBJ *bmp, BITMAPINFO *info,
 840                              struct gdi_image_bits *bits, struct bitblt_coords *src )
 841 {
 842     dib_info dib;
 843
 844     if (!init_dib_info_from_bitmapobj( &dib, bmp )) return ERROR_OUTOFMEMORY;
 845     return get_image_dib_info( &dib, info, bits, src );
 846 }
 847
 848 /***********************************************************************
 849  *           dibdrv_GetImage
 850  */
 851 DWORD dibdrv_GetImage( PHYSDEV dev, BITMAPINFO *info, struct gdi_image_bits *bits,
 852                        struct bitblt_coords *src )
 853 {
 854     dibdrv_physdev *pdev = get_dibdrv_pdev(dev);
 855
 856     TRACE( "%p %p\n", dev, info );
 857
 858     return get_image_dib_info( &pdev->dib, info, bits, src );
 859 }
 860
 861 static BOOL matching_color_info( const dib_info *dib, const BITMAPINFO *info )
 862 {
 863     const RGBQUAD *color_table = info->bmiColors;
 864
 865     if (info->bmiHeader.biPlanes != 1) return FALSE;
 866     if (info->bmiHeader.biBitCount != dib->bit_count) return FALSE;
 867
 868     switch (info->bmiHeader.biBitCount)
 869     {
 870     case 1:
 871         if (dib->color_table_size != info->bmiHeader.biClrUsed) return FALSE;
 872         return !memcmp( color_table, dib->color_table, dib->color_table_size * sizeof(RGBQUAD) );
 873
 874     case 4:
 875     case 8:
 876         if (!info->bmiHeader.biClrUsed)
 877         {
 878             if (!dib->color_table_size) return TRUE;
 879             if (dib->color_table_size != 1 << info->bmiHeader.biBitCount) return FALSE;
 880             color_table = get_default_color_table( info->bmiHeader.biBitCount );
 881         }
 882         else if (dib->color_table_size != info->bmiHeader.biClrUsed) return FALSE;
 883
 884         return !memcmp( color_table, dib->color_table, dib->color_table_size * sizeof(RGBQUAD) );
 885
 886     case 16:
 887     {
 888         DWORD *masks = (DWORD *)info->bmiColors;
 889         if (info->bmiHeader.biCompression == BI_RGB) return dib->funcs == &funcs_555;
 890         if (info->bmiHeader.biCompression == BI_BITFIELDS)
 891             return masks[0] == dib->red_mask && masks[1] == dib->green_mask && masks[2] == dib->blue_mask;
 892         break;
 893     }
 894
 895     case 24:
 896         return TRUE;
 897
 898     case 32:
 899     {
 900         DWORD *masks = (DWORD *)info->bmiColors;
 901         if (info->bmiHeader.biCompression == BI_RGB) return dib->funcs == &funcs_8888;
 902         if (info->bmiHeader.biCompression == BI_BITFIELDS)
 903             return masks[0] == dib->red_mask && masks[1] == dib->green_mask && masks[2] == dib->blue_mask;
 904         break;
 905     }
 906
 907     }
 908
 909     return FALSE;
 910 }
 911
 912 DWORD put_image_into_bitmap( BITMAPOBJ *bmp, HRGN clip, BITMAPINFO *info,
 913                              const struct gdi_image_bits *bits, struct bitblt_coords *src,
 914                              struct bitblt_coords *dst )
 915 {
 916     struct clipped_rects clipped_rects;
 917     dib_info dib, src_dib;
 918
 919     if (!init_dib_info_from_bitmapobj( &dib, bmp )) return ERROR_OUTOFMEMORY;
 920     if (!matching_color_info( &dib, info )) goto update_format;
 921     if (!bits) return ERROR_SUCCESS;
 922     if ((src->width != dst->width) || (src->height != dst->height)) return ERROR_TRANSFORM_NOT_SUPPORTED;
 923
 924     init_dib_info_from_bitmapinfo( &src_dib, info, bits->ptr );
 925     src_dib.bits.is_copy = bits->is_copy;
 926
 927     if (get_clipped_rects( &dib, &dst->visrect, clip, &clipped_rects ))
 928         copy_rect( &dib, &dst->visrect, &src_dib, &src->visrect, &clipped_rects, R2_COPYPEN );
 929
 930     return ERROR_SUCCESS;
 931
 932 update_format:
 933     info->bmiHeader.biPlanes   = 1;
 934     info->bmiHeader.biBitCount = dib.bit_count;
 935     set_color_info( &dib, info );
 936     return ERROR_BAD_FORMAT;
 937 }
 938
 939 static inline BOOL rop_uses_pat(DWORD rop)
 940 {
 941     return ((rop >> 4) & 0x0f0000) != (rop & 0x0f0000);
 942 }
 943
 944 /***********************************************************************
 945  *           dibdrv_PutImage
 946  */
 947 DWORD dibdrv_PutImage( PHYSDEV dev, HRGN clip, BITMAPINFO *info,
 948                        const struct gdi_image_bits *bits, struct bitblt_coords *src,
 949                        struct bitblt_coords *dst, DWORD rop )
 950 {
 951     struct clipped_rects clipped_rects;
 952     DWORD ret = ERROR_SUCCESS;
 953     dib_info src_dib;
 954     HRGN tmp_rgn = 0;
 955     dibdrv_physdev *pdev = get_dibdrv_pdev( dev );
 956
 957     TRACE( "%p %p\n", dev, info );
 958
 959     if (!matching_color_info( &pdev->dib, info )) goto update_format;
 960     if (!bits) return ERROR_SUCCESS;
 961     if ((src->width != dst->width) || (src->height != dst->height)) return ERROR_TRANSFORM_NOT_SUPPORTED;
 962
 963     init_dib_info_from_bitmapinfo( &src_dib, info, bits->ptr );
 964     src_dib.bits.is_copy = bits->is_copy;
 965
 966     if (clip && pdev->clip)
 967     {
 968         tmp_rgn = CreateRectRgn( 0, 0, 0, 0 );
 969         CombineRgn( tmp_rgn, clip, pdev->clip, RGN_AND );
 970         clip = tmp_rgn;
 971     }
 972     else if (!clip) clip = pdev->clip;
 973     add_clipped_bounds( pdev, &dst->visrect, clip );
 974
 975     if (get_clipped_rects( &pdev->dib, &dst->visrect, clip, &clipped_rects ))
 976     {
 977         if (!rop_uses_pat( rop ))
 978         {
 979             int rop2 = ((rop >> 16) & 0xf) + 1;
 980             copy_rect( &pdev->dib, &dst->visrect, &src_dib, &src->visrect, &clipped_rects, rop2 );
 981         }
 982         else
 983             ret = execute_rop( pdev, &dst->visrect, &src_dib, &src->visrect, &clipped_rects, rop );
 984     }
 985     if (tmp_rgn) DeleteObject( tmp_rgn );
 986     return ret;
 987
 988 update_format:
 989     info->bmiHeader.biPlanes   = 1;
 990     info->bmiHeader.biBitCount = pdev->dib.bit_count;
 991     set_color_info( &pdev->dib, info );
 992     return ERROR_BAD_FORMAT;
 993 }
 994
 995 /***********************************************************************
 996  *           dibdrv_BlendImage
 997  */
 998 DWORD dibdrv_BlendImage( PHYSDEV dev, BITMAPINFO *info, const struct gdi_image_bits *bits,
 999                          struct bitblt_coords *src, struct bitblt_coords *dst, BLENDFUNCTION blend )
1000 {
1001     dibdrv_physdev *pdev = get_dibdrv_pdev( dev );
1002     dib_info src_dib;
1003     DWORD *masks = (DWORD *)info->bmiColors;
1004
1005     TRACE( "%p %p\n", dev, info );
1006
1007     if (info->bmiHeader.biPlanes != 1) goto update_format;
1008     if (info->bmiHeader.biBitCount != 32) goto update_format;
1009     if (info->bmiHeader.biCompression == BI_BITFIELDS)
1010     {
1011         if (blend.AlphaFormat & AC_SRC_ALPHA) return ERROR_INVALID_PARAMETER;
1012         if (masks[0] != 0xff0000 || masks[1] != 0x00ff00 || masks[2] != 0x0000ff)
1013             goto update_format;
1014     }
1015
1016     if (!bits) return ERROR_SUCCESS;
1017     if ((src->width != dst->width) || (src->height != dst->height)) return ERROR_TRANSFORM_NOT_SUPPORTED;
1018
1019     init_dib_info_from_bitmapinfo( &src_dib, info, bits->ptr );
1020     src_dib.bits.is_copy = bits->is_copy;
1021     add_clipped_bounds( pdev, &dst->visrect, pdev->clip );
1022     return blend_rect( &pdev->dib, &dst->visrect, &src_dib, &src->visrect, pdev->clip, blend );
1023
1024 update_format:
1025     if (blend.AlphaFormat & AC_SRC_ALPHA)  /* source alpha requires A8R8G8B8 format */
1026         return ERROR_INVALID_PARAMETER;
1027
1028     info->bmiHeader.biPlanes      = 1;
1029     info->bmiHeader.biBitCount    = 32;
1030     info->bmiHeader.biCompression = BI_BITFIELDS;
1031     info->bmiHeader.biClrUsed     = 0;
1032     masks[0] = 0xff0000;
1033     masks[1] = 0x00ff00;
1034     masks[2] = 0x0000ff;
1035     return ERROR_BAD_FORMAT;
1036 }
1037
1038 /****************************************************************************
1039  *               calc_1d_stretch_params   (helper for stretch_bitmapinfo)
1040  *
1041  * If one plots the dst axis vertically, the src axis horizontally, then a
1042  * 1-d stretch/shrink is rather like finding the pixels to draw a straight
1043  * line.  Following a Bresenham type argument from point (s_i, d_i) we must
1044  * pick either (s_i + 1, d_i) or (s_i + 1, d_i + 1), however the choice
1045  * depends on where the centre of the next pixel is, ie whether the
1046  * point (s_i + 3/2, d_i + 1) (the mid-point between the two centres)
1047  * lies above or below the idea line.  The differences in error between
1048  * both choices and the current pixel is the same as per Bresenham,
1049  * the only difference is the error between the zeroth and first pixel.
1050  * This is now 3 dy - 2 dx (cf 2 dy - dx for the line case).
1051  *
1052  * Here we use the Bresenham line clipper to provide the start and end points
1053  * and add the additional dy - dx error term by passing this as the bias.
1054  *
1055  */
1056 static DWORD calc_1d_stretch_params( INT dst_start, INT dst_length, INT dst_vis_start, INT dst_vis_end,
1057                                      INT src_start, INT src_length, INT src_vis_start, INT src_vis_end,
1058                                      INT *dst_clipped_start, INT *src_clipped_start,
1059                                      INT *dst_clipped_end, INT *src_clipped_end,
1060                                      struct stretch_params *stretch_params, BOOL *stretch )
1061 {
1062     bres_params bres_params;
1063     POINT start, end, clipped_start, clipped_end;
1064     RECT clip;
1065     int clip_status, m, n;
1066
1067     stretch_params->src_inc = stretch_params->dst_inc = 1;
1068
1069     bres_params.dy = abs( dst_length );
1070     bres_params.dx = abs( src_length );
1071
1072     if (bres_params.dx > bres_params.dy) bres_params.octant = 1;
1073     else bres_params.octant = 2;
1074     if (src_length < 0)
1075     {
1076         bres_params.octant = 5 - bres_params.octant;
1077         stretch_params->src_inc = -1;
1078     }
1079     if (dst_length < 0)
1080     {
1081         bres_params.octant = 9 - bres_params.octant;
1082         stretch_params->dst_inc = -1;
1083     }
1084     bres_params.octant = 1 << (bres_params.octant - 1);
1085
1086     if (bres_params.dx > bres_params.dy)
1087         bres_params.bias = bres_params.dy - bres_params.dx;
1088     else
1089         bres_params.bias = bres_params.dx - bres_params.dy;
1090
1091     start.x = src_start;
1092     start.y = dst_start;
1093     end.x   = src_start + src_length;
1094     end.y   = dst_start + dst_length;
1095
1096     clip.left   = src_vis_start;
1097     clip.right  = src_vis_end;
1098     clip.top    = dst_vis_start;
1099     clip.bottom = dst_vis_end;
1100
1101     clip_status = clip_line( &start, &end, &clip, &bres_params, &clipped_start, &clipped_end );
1102
1103     if (!clip_status) return ERROR_NO_DATA;
1104
1105     m = abs( clipped_start.x - start.x );
1106     n = abs( clipped_start.y - start.y );
1107
1108     if (bres_params.dx > bres_params.dy)
1109     {
1110         stretch_params->err_start = 3 * bres_params.dy - 2 * bres_params.dx +
1111             m * 2 * bres_params.dy - n * 2 * bres_params.dx;
1112         stretch_params->err_add_1 = 2 * bres_params.dy - 2 * bres_params.dx;
1113         stretch_params->err_add_2 = 2 * bres_params.dy;
1114         stretch_params->length = abs( clipped_end.x - clipped_start.x );
1115         *stretch = FALSE;
1116     }
1117     else
1118     {
1119         stretch_params->err_start = 3 * bres_params.dx - 2 * bres_params.dy +
1120             n * 2 * bres_params.dx - m * 2 * bres_params.dy;
1121         stretch_params->err_add_1 = 2 * bres_params.dx - 2 * bres_params.dy;
1122         stretch_params->err_add_2 = 2 * bres_params.dx;
1123         stretch_params->length = abs( clipped_end.y - clipped_start.y );
1124         *stretch = TRUE;
1125     }
1126
1127     /* The endpoint will usually have been clipped out as we don't want to touch
1128        that pixel, if it is we'll increment the length. */
1129     if (end.x != clipped_end.x || end.y != clipped_end.y)
1130     {
1131         clipped_end.x += stretch_params->src_inc;
1132         clipped_end.y += stretch_params->dst_inc;
1133         stretch_params->length++;
1134     }
1135
1136     *src_clipped_start = clipped_start.x;
1137     *dst_clipped_start = clipped_start.y;
1138     *src_clipped_end   = clipped_end.x;
1139     *dst_clipped_end   = clipped_end.y;
1140
1141     return ERROR_SUCCESS;
1142 }
1143
1144
1145 DWORD stretch_bitmapinfo( const BITMAPINFO *src_info, void *src_bits, struct bitblt_coords *src,
1146                           const BITMAPINFO *dst_info, void *dst_bits, struct bitblt_coords *dst,
1147                           INT mode )
1148 {
1149     dib_info src_dib, dst_dib;
1150     POINT dst_start, src_start, dst_end, src_end;
1151     RECT rect;
1152     BOOL hstretch, vstretch;
1153     struct stretch_params v_params, h_params;
1154     int err;
1155     DWORD ret;
1156     void (* row_fn)(const dib_info *dst_dib, const POINT *dst_start,
1157                     const dib_info *src_dib, const POINT *src_start,
1158                     const struct stretch_params *params, int mode, BOOL keep_dst);
1159
1160     TRACE("dst %d, %d - %d x %d visrect %s src %d, %d - %d x %d visrect %s\n",
1161           dst->x, dst->y, dst->width, dst->height, wine_dbgstr_rect(&dst->visrect),
1162           src->x, src->y, src->width, src->height, wine_dbgstr_rect(&src->visrect));
1163
1164     init_dib_info_from_bitmapinfo( &src_dib, src_info, src_bits );
1165     init_dib_info_from_bitmapinfo( &dst_dib, dst_info, dst_bits );
1166
1167     /* v */
1168     ret = calc_1d_stretch_params( dst->y, dst->height, dst->visrect.top, dst->visrect.bottom,
1169                                   src->y, src->height, src->visrect.top, src->visrect.bottom,
1170                                   &dst_start.y, &src_start.y, &dst_end.y, &src_end.y,
1171                                   &v_params, &vstretch );
1172     if (ret) return ret;
1173
1174     /* h */
1175     ret = calc_1d_stretch_params( dst->x, dst->width, dst->visrect.left, dst->visrect.right,
1176                                   src->x, src->width, src->visrect.left, src->visrect.right,
1177                                   &dst_start.x, &src_start.x, &dst_end.x, &src_end.x,
1178                                   &h_params, &hstretch );
1179     if (ret) return ret;
1180
1181     TRACE("got dst start %d, %d inc %d, %d. src start %d, %d inc %d, %d len %d x %d\n",
1182           dst_start.x, dst_start.y, h_params.dst_inc, v_params.dst_inc,
1183           src_start.x, src_start.y, h_params.src_inc, v_params.src_inc,
1184           h_params.length, v_params.length);
1185
1186     get_bounding_rect( &rect, dst_start.x, dst_start.y, dst_end.x - dst_start.x, dst_end.y - dst_start.y );
1187     intersect_rect( &dst->visrect, &dst->visrect, &rect );
1188
1189     dst_start.x -= dst->visrect.left;
1190     dst_start.y -= dst->visrect.top;
1191
1192     err = v_params.err_start;
1193
1194     row_fn = hstretch ? dst_dib.funcs->stretch_row : dst_dib.funcs->shrink_row;
1195
1196     if (vstretch)
1197     {
1198         BOOL need_row = TRUE;
1199         RECT last_row, this_row;
1200         if (hstretch) mode = STRETCH_DELETESCANS;
1201         last_row.left = 0;
1202         last_row.right = dst->visrect.right - dst->visrect.left;
1203
1204         while (v_params.length--)
1205         {
1206             if (need_row)
1207             {
1208                 row_fn( &dst_dib, &dst_start, &src_dib, &src_start, &h_params, mode, FALSE );
1209                 need_row = FALSE;
1210             }
1211             else
1212             {
1213                 last_row.top = dst_start.y - v_params.dst_inc;
1214                 last_row.bottom = last_row.top + 1;
1215                 this_row = last_row;
1216                 offset_rect( &this_row, 0, v_params.dst_inc );
1217                 copy_rect( &dst_dib, &this_row, &dst_dib, &last_row, NULL, R2_COPYPEN );
1218             }
1219
1220             if (err > 0)
1221             {
1222                 src_start.y += v_params.src_inc;
1223                 need_row = TRUE;
1224                 err += v_params.err_add_1;
1225             }
1226             else err += v_params.err_add_2;
1227             dst_start.y += v_params.dst_inc;
1228         }
1229     }
1230     else
1231     {
1232         int merged_rows = 0;
1233
1234         while (v_params.length--)
1235         {
1236             if (mode != STRETCH_DELETESCANS || !merged_rows)
1237                 row_fn( &dst_dib, &dst_start, &src_dib, &src_start, &h_params, mode, merged_rows != 0 );
1238             merged_rows++;
1239
1240             if (err > 0)
1241             {
1242                 dst_start.y += v_params.dst_inc;
1243                 merged_rows = 0;
1244                 err += v_params.err_add_1;
1245             }
1246             else err += v_params.err_add_2;
1247             src_start.y += v_params.src_inc;
1248         }
1249     }
1250
1251     /* update coordinates, the destination rectangle is always stored at 0,0 */
1252     *src = *dst;
1253     src->x -= src->visrect.left;
1254     src->y -= src->visrect.top;
1255     offset_rect( &src->visrect, -src->visrect.left, -src->visrect.top );
1256     return ERROR_SUCCESS;
1257 }
1258
1259 DWORD blend_bitmapinfo( const BITMAPINFO *src_info, void *src_bits, struct bitblt_coords *src,
1260                         const BITMAPINFO *dst_info, void *dst_bits, struct bitblt_coords *dst,
1261                         BLENDFUNCTION blend )
1262 {
1263     dib_info src_dib, dst_dib;
1264
1265     init_dib_info_from_bitmapinfo( &src_dib, src_info, src_bits );
1266     init_dib_info_from_bitmapinfo( &dst_dib, dst_info, dst_bits );
1267
1268     return blend_rect( &dst_dib, &dst->visrect, &src_dib, &src->visrect, NULL, blend );
1269 }
1270
1271 DWORD gradient_bitmapinfo( const BITMAPINFO *info, void *bits, TRIVERTEX *vert_array, ULONG nvert,
1272                            void *grad_array, ULONG ngrad, ULONG mode, const POINT *dev_pts, HRGN rgn )
1273 {
1274     dib_info dib;
1275     const GRADIENT_TRIANGLE *tri = grad_array;
1276     const GRADIENT_RECT *rect = grad_array;
1277     unsigned int i;
1278     int y;
1279     TRIVERTEX vert[3];
1280     RECT rc;
1281     DWORD ret = ERROR_SUCCESS;
1282
1283     init_dib_info_from_bitmapinfo( &dib, info, bits );
1284
1285     switch (mode)
1286     {
1287     case GRADIENT_FILL_RECT_H:
1288         for (i = 0; i < ngrad; i++, rect++)
1289         {
1290             get_gradient_hrect_vertices( rect, vert_array, dev_pts, vert, &rc );
1291             gradient_rect( &dib, vert, mode, 0, &rc );
1292             add_rect_to_region( rgn, &rc );
1293         }
1294         break;
1295
1296     case GRADIENT_FILL_RECT_V:
1297         for (i = 0; i < ngrad; i++, rect++)
1298         {
1299             get_gradient_vrect_vertices( rect, vert_array, dev_pts, vert, &rc );
1300             gradient_rect( &dib, vert, mode, 0, &rc );
1301             add_rect_to_region( rgn, &rc );
1302         }
1303         break;
1304
1305     case GRADIENT_FILL_TRIANGLE:
1306         for (i = 0; i < ngrad; i++, tri++)
1307         {
1308             get_gradient_triangle_vertices( tri, vert_array, dev_pts, vert, &rc );
1309             if (gradient_rect( &dib, vert, mode, 0, &rc ))
1310             {
1311                 for (y = vert[0].y; y < vert[2].y; y++)
1312                 {
1313                     int x1, x2 = edge_coord( y, vert[0].x, vert[0].y, vert[2].x, vert[2].y );
1314                     if (y < vert[1].y) x1 = edge_coord( y, vert[0].x, vert[0].y, vert[1].x, vert[1].y );
1315                     else x1 = edge_coord( y, vert[1].x, vert[1].y, vert[2].x, vert[2].y );
1316
1317                     rc.left   = min( x1, x2 );
1318                     rc.top    = y;
1319                     rc.right  = max( x1, x2 );
1320                     rc.bottom = y + 1;
1321                     add_rect_to_region( rgn, &rc );
1322                 }
1323             }
1324             else ret = ERROR_INVALID_PARAMETER;
1325         }
1326         break;
1327     }
1328     return ret;
1329 }
1330
1331 COLORREF get_pixel_bitmapinfo( const BITMAPINFO *info, void *bits, struct bitblt_coords *src )
1332 {
1333     dib_info dib;
1334     DWORD pixel;
1335
1336     init_dib_info_from_bitmapinfo( &dib, info, bits );
1337     pixel = dib.funcs->get_pixel( &dib, src->x, src->y );
1338     return dib.funcs->pixel_to_colorref( &dib, pixel );
1339 }
1340
1341 /***********************************************************************
1342  *           dibdrv_StretchBlt
1343  */
1344 BOOL dibdrv_StretchBlt( PHYSDEV dst_dev, struct bitblt_coords *dst,
1345                         PHYSDEV src_dev, struct bitblt_coords *src, DWORD rop )
1346 {
1347     BOOL ret;
1348     DC *dc_dst = get_dc_ptr( dst_dev->hdc );
1349
1350     if (!dc_dst) return FALSE;
1351
1352     if (dst->width == 1 && src->width > 1) src->width--;
1353     if (dst->height == 1 && src->height > 1) src->height--;
1354
1355     ret = dc_dst->nulldrv.funcs->pStretchBlt( &dc_dst->nulldrv, dst,
1356                                               src_dev, src, rop );
1357     release_dc_ptr( dc_dst );
1358     return ret;
1359 }
1360
1361 /***********************************************************************
1362  *           dibdrv_AlphaBlend
1363  */
1364 BOOL dibdrv_AlphaBlend( PHYSDEV dst_dev, struct bitblt_coords *dst,
1365                         PHYSDEV src_dev, struct bitblt_coords *src, BLENDFUNCTION blend )
1366 {
1367     BOOL ret;
1368     DC *dc_dst = get_dc_ptr( dst_dev->hdc );
1369
1370     if (!dc_dst) return FALSE;
1371
1372     ret = dc_dst->nulldrv.funcs->pAlphaBlend( &dc_dst->nulldrv, dst, src_dev, src, blend );
1373     release_dc_ptr( dc_dst );
1374     return ret;
1375 }
1376
1377 /***********************************************************************
1378  *           dibdrv_GradientFill
1379  */
1380 BOOL dibdrv_GradientFill( PHYSDEV dev, TRIVERTEX *vert_array, ULONG nvert,
1381                           void *grad_array, ULONG ngrad, ULONG mode )
1382 {
1383     dibdrv_physdev *pdev = get_dibdrv_pdev( dev );
1384     const GRADIENT_TRIANGLE *tri = grad_array;
1385     const GRADIENT_RECT *rect = grad_array;
1386     unsigned int i;
1387     POINT *pts;
1388     TRIVERTEX vert[3];
1389     RECT bounds;
1390     BOOL ret = TRUE;
1391
1392     if (!(pts = HeapAlloc( GetProcessHeap(), 0, nvert * sizeof(*pts) ))) return FALSE;
1393     for (i = 0; i < nvert; i++)
1394     {
1395         pts[i].x = vert_array[i].x;
1396         pts[i].y = vert_array[i].y;
1397     }
1398     LPtoDP( dev->hdc, pts, nvert );
1399
1400     switch (mode)
1401     {
1402     case GRADIENT_FILL_RECT_H:
1403         for (i = 0; i < ngrad; i++, rect++)
1404         {
1405             get_gradient_hrect_vertices( rect, vert_array, pts, vert, &bounds );
1406             /* Windows bug: no alpha on a8r8g8b8 created with bitfields */
1407             if (pdev->dib.funcs == &funcs_8888 && pdev->dib.compression == BI_BITFIELDS)
1408                 vert[0].Alpha = vert[1].Alpha = 0;
1409             add_clipped_bounds( pdev, &bounds, pdev->clip );
1410             gradient_rect( &pdev->dib, vert, mode, pdev->clip, &bounds );
1411         }
1412         break;
1413
1414     case GRADIENT_FILL_RECT_V:
1415         for (i = 0; i < ngrad; i++, rect++)
1416         {
1417             get_gradient_vrect_vertices( rect, vert_array, pts, vert, &bounds );
1418             /* Windows bug: no alpha on a8r8g8b8 created with bitfields */
1419             if (pdev->dib.funcs == &funcs_8888 && pdev->dib.compression == BI_BITFIELDS)
1420                 vert[0].Alpha = vert[1].Alpha = 0;
1421             add_clipped_bounds( pdev, &bounds, pdev->clip );
1422             gradient_rect( &pdev->dib, vert, mode, pdev->clip, &bounds );
1423         }
1424         break;
1425
1426     case GRADIENT_FILL_TRIANGLE:
1427         for (i = 0; i < ngrad; i++, tri++)
1428         {
1429             get_gradient_triangle_vertices( tri, vert_array, pts, vert, &bounds );
1430             /* Windows bug: no alpha on a8r8g8b8 created with bitfields */
1431             if (pdev->dib.funcs == &funcs_8888 && pdev->dib.compression == BI_BITFIELDS)
1432                 vert[0].Alpha = vert[1].Alpha = vert[2].Alpha = 0;
1433             add_clipped_bounds( pdev, &bounds, pdev->clip );
1434             if (!gradient_rect( &pdev->dib, vert, mode, pdev->clip, &bounds )) ret = FALSE;
1435         }
1436         break;
1437     }
1438
1439     HeapFree( GetProcessHeap(), 0, pts );
1440     return ret;
1441 }