dlls/gdiplus/brush.c

   1 /*
   2  * Copyright (C) 2007 Google (Evan Stade)
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Lesser General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2.1 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Lesser General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Lesser General Public
  15  * License along with this library; if not, write to the Free Software
  16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  17  */
  18
  19 #include <stdarg.h>
  20
  21 #include "windef.h"
  22 #include "winbase.h"
  23 #include "winuser.h"
  24 #include "wingdi.h"
  25
  26 #define COBJMACROS
  27 #include "objbase.h"
  28 #include "olectl.h"
  29 #include "ole2.h"
  30
  31 #include "gdiplus.h"
  32 #include "gdiplus_private.h"
  33 #include "wine/debug.h"
  34
  35 WINE_DEFAULT_DEBUG_CHANNEL(gdiplus);
  36
  37 /******************************************************************************
  38  * GdipCloneBrush [GDIPLUS.@]
  39  */
  40 GpStatus WINGDIPAPI GdipCloneBrush(GpBrush *brush, GpBrush **clone)
  41 {
  42     TRACE("(%p, %p)\n", brush, clone);
  43
  44     if(!brush || !clone)
  45         return InvalidParameter;
  46
  47     switch(brush->bt){
  48         case BrushTypeSolidColor:
  49         {
  50             GpSolidFill *fill;
  51             *clone = GdipAlloc(sizeof(GpSolidFill));
  52             if (!*clone) return OutOfMemory;
  53
  54             fill = (GpSolidFill*)*clone;
  55
  56             memcpy(*clone, brush, sizeof(GpSolidFill));
  57
  58             (*clone)->gdibrush = CreateBrushIndirect(&(*clone)->lb);
  59             fill->bmp = ARGB2BMP(fill->color);
  60             break;
  61         }
  62         case BrushTypeHatchFill:
  63         {
  64             GpHatch *hatch = (GpHatch*)brush;
  65
  66             return GdipCreateHatchBrush(hatch->hatchstyle, hatch->forecol, hatch->backcol, (GpHatch**)clone);
  67         }
  68         case BrushTypePathGradient:{
  69             GpPathGradient *src, *dest;
  70             INT count;
  71
  72             *clone = GdipAlloc(sizeof(GpPathGradient));
  73             if (!*clone) return OutOfMemory;
  74
  75             src = (GpPathGradient*) brush,
  76             dest = (GpPathGradient*) *clone;
  77             count = src->pathdata.Count;
  78
  79             memcpy(dest, src, sizeof(GpPathGradient));
  80
  81             dest->pathdata.Count = count;
  82             dest->pathdata.Points = GdipAlloc(count * sizeof(PointF));
  83             dest->pathdata.Types = GdipAlloc(count);
  84
  85             if(!dest->pathdata.Points || !dest->pathdata.Types){
  86                 GdipFree(dest->pathdata.Points);
  87                 GdipFree(dest->pathdata.Types);
  88                 GdipFree(dest);
  89                 return OutOfMemory;
  90             }
  91
  92             memcpy(dest->pathdata.Points, src->pathdata.Points, count * sizeof(PointF));
  93             memcpy(dest->pathdata.Types, src->pathdata.Types, count);
  94
  95             /* blending */
  96             count = src->blendcount;
  97             dest->blendcount = count;
  98             dest->blendfac = GdipAlloc(count * sizeof(REAL));
  99             dest->blendpos = GdipAlloc(count * sizeof(REAL));
 100
 101             if(!dest->blendfac || !dest->blendpos){
 102                 GdipFree(dest->pathdata.Points);
 103                 GdipFree(dest->pathdata.Types);
 104                 GdipFree(dest->blendfac);
 105                 GdipFree(dest->blendpos);
 106                 GdipFree(dest);
 107                 return OutOfMemory;
 108             }
 109
 110             memcpy(dest->blendfac, src->blendfac, count * sizeof(REAL));
 111             memcpy(dest->blendpos, src->blendpos, count * sizeof(REAL));
 112
 113             break;
 114         }
 115         case BrushTypeLinearGradient:{
 116             GpLineGradient *dest, *src;
 117             INT count, pcount;
 118
 119             dest = GdipAlloc(sizeof(GpLineGradient));
 120             if(!dest)    return OutOfMemory;
 121
 122             src = (GpLineGradient*)brush;
 123
 124             memcpy(dest, src, sizeof(GpLineGradient));
 125
 126             dest->brush.gdibrush = CreateSolidBrush(dest->brush.lb.lbColor);
 127
 128             count = dest->blendcount;
 129             dest->blendfac = GdipAlloc(count * sizeof(REAL));
 130             dest->blendpos = GdipAlloc(count * sizeof(REAL));
 131             pcount = dest->pblendcount;
 132             if (pcount)
 133             {
 134                 dest->pblendcolor = GdipAlloc(pcount * sizeof(ARGB));
 135                 dest->pblendpos = GdipAlloc(pcount * sizeof(REAL));
 136             }
 137
 138             if (!dest->blendfac || !dest->blendpos ||
 139                 (pcount && (!dest->pblendcolor || !dest->pblendpos)))
 140             {
 141                 GdipFree(dest->blendfac);
 142                 GdipFree(dest->blendpos);
 143                 GdipFree(dest->pblendcolor);
 144                 GdipFree(dest->pblendpos);
 145                 DeleteObject(dest->brush.gdibrush);
 146                 GdipFree(dest);
 147                 return OutOfMemory;
 148             }
 149
 150             memcpy(dest->blendfac, src->blendfac, count * sizeof(REAL));
 151             memcpy(dest->blendpos, src->blendpos, count * sizeof(REAL));
 152
 153             if (pcount)
 154             {
 155                 memcpy(dest->pblendcolor, src->pblendcolor, pcount * sizeof(ARGB));
 156                 memcpy(dest->pblendpos, src->pblendpos, pcount * sizeof(REAL));
 157             }
 158
 159             *clone = &dest->brush;
 160             break;
 161         }
 162         case BrushTypeTextureFill:
 163         {
 164             GpStatus stat;
 165             GpTexture *texture = (GpTexture*)brush;
 166             GpTexture *new_texture;
 167
 168             stat = GdipCreateTexture(texture->image, texture->wrap, &new_texture);
 169
 170             if (stat == Ok)
 171             {
 172                 memcpy(new_texture->transform, texture->transform, sizeof(GpMatrix));
 173                 *clone = (GpBrush*)new_texture;
 174             }
 175             else
 176                 *clone = NULL;
 177
 178             return stat;
 179         }
 180         default:
 181             ERR("not implemented for brush type %d\n", brush->bt);
 182             return NotImplemented;
 183     }
 184
 185     TRACE("<-- %p\n", *clone);
 186     return Ok;
 187 }
 188
 189 static const char HatchBrushes[][8] = {
 190     { 0x00, 0x00, 0x00, 0xff, 0x00, 0x00, 0x00, 0x00 }, /* HatchStyleHorizontal */
 191     { 0x08, 0x08, 0x08, 0x08, 0x08, 0x08, 0x08, 0x08 }, /* HatchStyleVertical */
 192     { 0x01, 0x02, 0x04, 0x08, 0x10, 0x20, 0x40, 0x80 }, /* HatchStyleForwardDiagonal */
 193     { 0x80, 0x40, 0x20, 0x10, 0x08, 0x04, 0x02, 0x01 }, /* HatchStyleBackwardDiagonal */
 194     { 0x08, 0x08, 0x08, 0xff, 0x08, 0x08, 0x08, 0x08 }, /* HatchStyleCross */
 195     { 0x81, 0x42, 0x24, 0x18, 0x18, 0x24, 0x42, 0x81 }, /* HatchStyleDiagonalCross */
 196     { 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x80 }, /* HatchStyle05Percent */
 197     { 0x00, 0x02, 0x00, 0x88, 0x00, 0x20, 0x00, 0x88 }, /* HatchStyle10Percent */
 198     { 0x00, 0x22, 0x00, 0xcc, 0x00, 0x22, 0x00, 0xcc }, /* HatchStyle20Percent */
 199     { 0x00, 0xcc, 0x00, 0xcc, 0x00, 0xcc, 0x00, 0xcc }, /* HatchStyle25Percent */
 200     { 0x00, 0xcc, 0x04, 0xcc, 0x00, 0xcc, 0x40, 0xcc }, /* HatchStyle30Percent */
 201     { 0x44, 0xcc, 0x22, 0xcc, 0x44, 0xcc, 0x22, 0xcc }, /* HatchStyle40Percent */
 202     { 0x55, 0xcc, 0x55, 0xcc, 0x55, 0xcc, 0x55, 0xcc }, /* HatchStyle50Percent */
 203     { 0x55, 0xcd, 0x55, 0xee, 0x55, 0xdc, 0x55, 0xee }, /* HatchStyle60Percent */
 204     { 0x55, 0xdd, 0x55, 0xff, 0x55, 0xdd, 0x55, 0xff }, /* HatchStyle70Percent */
 205     { 0x55, 0xff, 0x55, 0xff, 0x55, 0xff, 0x55, 0xff }, /* HatchStyle75Percent */
 206     { 0x55, 0xff, 0x59, 0xff, 0x55, 0xff, 0x99, 0xff }, /* HatchStyle80Percent */
 207     { 0x77, 0xff, 0xdd, 0xff, 0x77, 0xff, 0xfd, 0xff }, /* HatchStyle90Percent */
 208     { 0x11, 0x22, 0x44, 0x88, 0x11, 0x22, 0x44, 0x88 }, /* HatchStyleLightDownwardDiagonal */
 209     { 0x88, 0x44, 0x22, 0x11, 0x88, 0x44, 0x22, 0x11 }, /* HatchStyleLightUpwardDiagonal */
 210     { 0x99, 0x33, 0x66, 0xcc, 0x99, 0x33, 0x66, 0xcc }, /* HatchStyleDarkDownwardDiagonal */
 211     { 0xcc, 0x66, 0x33, 0x99, 0xcc, 0x66, 0x33, 0x99 }, /* HatchStyleDarkUpwardDiagonal */
 212     { 0xc1, 0x83, 0x07, 0x0e, 0x1c, 0x38, 0x70, 0xe0 }, /* HatchStyleWideDownwardDiagonal */
 213     { 0xe0, 0x70, 0x38, 0x1c, 0x0e, 0x07, 0x83, 0xc1 }, /* HatchStyleWideUpwardDiagonal */
 214     { 0x88, 0x88, 0x88, 0x88, 0x88, 0x88, 0x88, 0x88 }, /* HatchStyleLightVertical */
 215     { 0x00, 0x00, 0x00, 0xff, 0x00, 0x00, 0x00, 0xff }, /* HatchStyleLightHorizontal */
 216     { 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa }, /* HatchStyleNarrowVertical */
 217     { 0x00, 0xff, 0x00, 0xff, 0x00, 0xff, 0x00, 0xff }, /* HatchStyleNarrowHorizontal */
 218     { 0xcc, 0xcc, 0xcc, 0xcc, 0xcc, 0xcc, 0xcc, 0xcc }, /* HatchStyleDarkVertical */
 219     { 0x00, 0x00, 0xff, 0xff, 0x00, 0x00, 0xff, 0xff }, /* HatchStyleDarkHorizontal */
 220 };
 221
 222 /******************************************************************************
 223  * GdipCreateHatchBrush [GDIPLUS.@]
 224  */
 225 GpStatus WINGDIPAPI GdipCreateHatchBrush(HatchStyle hatchstyle, ARGB forecol, ARGB backcol, GpHatch **brush)
 226 {
 227     COLORREF fgcol = ARGB2COLORREF(forecol);
 228     GpStatus stat = Ok;
 229
 230     TRACE("(%d, %d, %d, %p)\n", hatchstyle, forecol, backcol, brush);
 231
 232     if(!brush)  return InvalidParameter;
 233
 234     *brush = GdipAlloc(sizeof(GpHatch));
 235     if (!*brush) return OutOfMemory;
 236
 237     if (hatchstyle < sizeof(HatchBrushes) / sizeof(HatchBrushes[0]))
 238     {
 239         HBITMAP hbmp;
 240         HDC hdc;
 241         BITMAPINFOHEADER bmih;
 242         DWORD* bits;
 243         int x, y;
 244
 245         hdc = CreateCompatibleDC(0);
 246
 247         if (hdc)
 248         {
 249             bmih.biSize = sizeof(bmih);
 250             bmih.biWidth = 8;
 251             bmih.biHeight = 8;
 252             bmih.biPlanes = 1;
 253             bmih.biBitCount = 32;
 254             bmih.biCompression = BI_RGB;
 255             bmih.biSizeImage = 0;
 256
 257             hbmp = CreateDIBSection(hdc, (BITMAPINFO*)&bmih, DIB_RGB_COLORS, (void**)&bits, NULL, 0);
 258
 259             if (hbmp)
 260             {
 261                 for (y=0; y<8; y++)
 262                     for (x=0; x<8; x++)
 263                         if ((HatchBrushes[hatchstyle][y] & (0x80 >> x)) != 0)
 264                             bits[y*8+x] = forecol;
 265                         else
 266                             bits[y*8+x] = backcol;
 267             }
 268             else
 269                 stat = GenericError;
 270
 271             DeleteDC(hdc);
 272         }
 273         else
 274             stat = GenericError;
 275
 276         if (stat == Ok)
 277         {
 278             (*brush)->brush.lb.lbStyle = BS_PATTERN;
 279             (*brush)->brush.lb.lbColor = 0;
 280             (*brush)->brush.lb.lbHatch = (ULONG_PTR)hbmp;
 281             (*brush)->brush.gdibrush = CreateBrushIndirect(&(*brush)->brush.lb);
 282
 283             DeleteObject(hbmp);
 284         }
 285     }
 286     else
 287     {
 288         FIXME("Unimplemented hatch style %d\n", hatchstyle);
 289
 290         (*brush)->brush.lb.lbStyle = BS_SOLID;
 291         (*brush)->brush.lb.lbColor = fgcol;
 292         (*brush)->brush.lb.lbHatch = 0;
 293         (*brush)->brush.gdibrush = CreateBrushIndirect(&(*brush)->brush.lb);
 294     }
 295
 296     if (stat == Ok)
 297     {
 298         (*brush)->brush.bt = BrushTypeHatchFill;
 299         (*brush)->forecol = forecol;
 300         (*brush)->backcol = backcol;
 301         (*brush)->hatchstyle = hatchstyle;
 302         TRACE("<-- %p\n", *brush);
 303     }
 304     else
 305     {
 306         GdipFree(*brush);
 307         *brush = NULL;
 308     }
 309
 310     return stat;
 311 }
 312
 313 /******************************************************************************
 314  * GdipCreateLineBrush [GDIPLUS.@]
 315  */
 316 GpStatus WINGDIPAPI GdipCreateLineBrush(GDIPCONST GpPointF* startpoint,
 317     GDIPCONST GpPointF* endpoint, ARGB startcolor, ARGB endcolor,
 318     GpWrapMode wrap, GpLineGradient **line)
 319 {
 320     COLORREF col = ARGB2COLORREF(startcolor);
 321
 322     TRACE("(%s, %s, %x, %x, %d, %p)\n", debugstr_pointf(startpoint),
 323           debugstr_pointf(endpoint), startcolor, endcolor, wrap, line);
 324
 325     if(!line || !startpoint || !endpoint || wrap == WrapModeClamp)
 326         return InvalidParameter;
 327
 328     *line = GdipAlloc(sizeof(GpLineGradient));
 329     if(!*line)  return OutOfMemory;
 330
 331     (*line)->brush.lb.lbStyle = BS_SOLID;
 332     (*line)->brush.lb.lbColor = col;
 333     (*line)->brush.lb.lbHatch = 0;
 334     (*line)->brush.gdibrush = CreateSolidBrush(col);
 335     (*line)->brush.bt = BrushTypeLinearGradient;
 336
 337     (*line)->startpoint.X = startpoint->X;
 338     (*line)->startpoint.Y = startpoint->Y;
 339     (*line)->endpoint.X = endpoint->X;
 340     (*line)->endpoint.Y = endpoint->Y;
 341     (*line)->startcolor = startcolor;
 342     (*line)->endcolor = endcolor;
 343     (*line)->wrap = wrap;
 344     (*line)->gamma = FALSE;
 345
 346     (*line)->rect.X = (startpoint->X < endpoint->X ? startpoint->X: endpoint->X);
 347     (*line)->rect.Y = (startpoint->Y < endpoint->Y ? startpoint->Y: endpoint->Y);
 348     (*line)->rect.Width  = fabs(startpoint->X - endpoint->X);
 349     (*line)->rect.Height = fabs(startpoint->Y - endpoint->Y);
 350
 351     if ((*line)->rect.Width == 0)
 352     {
 353         (*line)->rect.X -= (*line)->rect.Height / 2.0f;
 354         (*line)->rect.Width = (*line)->rect.Height;
 355     }
 356     else if ((*line)->rect.Height == 0)
 357     {
 358         (*line)->rect.Y -= (*line)->rect.Width / 2.0f;
 359         (*line)->rect.Height = (*line)->rect.Width;
 360     }
 361
 362     (*line)->blendcount = 1;
 363     (*line)->blendfac = GdipAlloc(sizeof(REAL));
 364     (*line)->blendpos = GdipAlloc(sizeof(REAL));
 365
 366     if (!(*line)->blendfac || !(*line)->blendpos)
 367     {
 368         GdipFree((*line)->blendfac);
 369         GdipFree((*line)->blendpos);
 370         DeleteObject((*line)->brush.gdibrush);
 371         GdipFree(*line);
 372         *line = NULL;
 373         return OutOfMemory;
 374     }
 375
 376     (*line)->blendfac[0] = 1.0f;
 377     (*line)->blendpos[0] = 1.0f;
 378
 379     (*line)->pblendcolor = NULL;
 380     (*line)->pblendpos = NULL;
 381     (*line)->pblendcount = 0;
 382
 383     TRACE("<-- %p\n", *line);
 384
 385     return Ok;
 386 }
 387
 388 GpStatus WINGDIPAPI GdipCreateLineBrushI(GDIPCONST GpPoint* startpoint,
 389     GDIPCONST GpPoint* endpoint, ARGB startcolor, ARGB endcolor,
 390     GpWrapMode wrap, GpLineGradient **line)
 391 {
 392     GpPointF stF;
 393     GpPointF endF;
 394
 395     TRACE("(%p, %p, %x, %x, %d, %p)\n", startpoint, endpoint,
 396           startcolor, endcolor, wrap, line);
 397
 398     if(!startpoint || !endpoint)
 399         return InvalidParameter;
 400
 401     stF.X  = (REAL)startpoint->X;
 402     stF.Y  = (REAL)startpoint->Y;
 403     endF.X = (REAL)endpoint->X;
 404     endF.X = (REAL)endpoint->Y;
 405
 406     return GdipCreateLineBrush(&stF, &endF, startcolor, endcolor, wrap, line);
 407 }
 408
 409 GpStatus WINGDIPAPI GdipCreateLineBrushFromRect(GDIPCONST GpRectF* rect,
 410     ARGB startcolor, ARGB endcolor, LinearGradientMode mode, GpWrapMode wrap,
 411     GpLineGradient **line)
 412 {
 413     GpPointF start, end;
 414     GpStatus stat;
 415
 416     TRACE("(%p, %x, %x, %d, %d, %p)\n", rect, startcolor, endcolor, mode,
 417           wrap, line);
 418
 419     if(!line || !rect)
 420         return InvalidParameter;
 421
 422     switch (mode)
 423     {
 424     case LinearGradientModeHorizontal:
 425         start.X = rect->X;
 426         start.Y = rect->Y;
 427         end.X = rect->X + rect->Width;
 428         end.Y = rect->Y;
 429         break;
 430     case LinearGradientModeVertical:
 431         start.X = rect->X;
 432         start.Y = rect->Y;
 433         end.X = rect->X;
 434         end.Y = rect->Y + rect->Height;
 435         break;
 436     case LinearGradientModeForwardDiagonal:
 437         start.X = rect->X;
 438         start.Y = rect->Y;
 439         end.X = rect->X + rect->Width;
 440         end.Y = rect->Y + rect->Height;
 441         break;
 442     case LinearGradientModeBackwardDiagonal:
 443         start.X = rect->X + rect->Width;
 444         start.Y = rect->Y;
 445         end.X = rect->X;
 446         end.Y = rect->Y + rect->Height;
 447         break;
 448     default:
 449         return InvalidParameter;
 450     }
 451
 452     stat = GdipCreateLineBrush(&start, &end, startcolor, endcolor, wrap, line);
 453
 454     if (stat == Ok)
 455         (*line)->rect = *rect;
 456
 457     return stat;
 458 }
 459
 460 GpStatus WINGDIPAPI GdipCreateLineBrushFromRectI(GDIPCONST GpRect* rect,
 461     ARGB startcolor, ARGB endcolor, LinearGradientMode mode, GpWrapMode wrap,
 462     GpLineGradient **line)
 463 {
 464     GpRectF rectF;
 465
 466     TRACE("(%p, %x, %x, %d, %d, %p)\n", rect, startcolor, endcolor, mode,
 467           wrap, line);
 468
 469     rectF.X      = (REAL) rect->X;
 470     rectF.Y      = (REAL) rect->Y;
 471     rectF.Width  = (REAL) rect->Width;
 472     rectF.Height = (REAL) rect->Height;
 473
 474     return GdipCreateLineBrushFromRect(&rectF, startcolor, endcolor, mode, wrap, line);
 475 }
 476
 477 /******************************************************************************
 478  * GdipCreateLineBrushFromRectWithAngle [GDIPLUS.@]
 479  */
 480 GpStatus WINGDIPAPI GdipCreateLineBrushFromRectWithAngle(GDIPCONST GpRectF* rect,
 481     ARGB startcolor, ARGB endcolor, REAL angle, BOOL isAngleScalable, GpWrapMode wrap,
 482     GpLineGradient **line)
 483 {
 484     GpStatus stat;
 485     LinearGradientMode mode;
 486     REAL width, height, exofs, eyofs;
 487     REAL sin_angle, cos_angle, sin_cos_angle;
 488
 489     TRACE("(%p, %x, %x, %.2f, %d, %d, %p)\n", rect, startcolor, endcolor, angle, isAngleScalable,
 490           wrap, line);
 491
 492     sin_angle = sinf(deg2rad(angle));
 493     cos_angle = cosf(deg2rad(angle));
 494     sin_cos_angle = sin_angle * cos_angle;
 495
 496     if (isAngleScalable)
 497     {
 498         width = height = 1.0;
 499     }
 500     else
 501     {
 502         width = rect->Width;
 503         height = rect->Height;
 504     }
 505
 506     if (sin_cos_angle >= 0)
 507         mode = LinearGradientModeForwardDiagonal;
 508     else
 509         mode = LinearGradientModeBackwardDiagonal;
 510
 511     stat = GdipCreateLineBrushFromRect(rect, startcolor, endcolor, mode, wrap, line);
 512
 513     if (stat == Ok)
 514     {
 515         if (sin_cos_angle >= 0)
 516         {
 517             exofs = width * sin_cos_angle + height * cos_angle * cos_angle;
 518             eyofs = width * sin_angle * sin_angle + height * sin_cos_angle;
 519         }
 520         else
 521         {
 522             exofs = width * sin_angle * sin_angle + height * sin_cos_angle;
 523             eyofs = -width * sin_cos_angle + height * sin_angle * sin_angle;
 524         }
 525
 526         if (isAngleScalable)
 527         {
 528             exofs = exofs * rect->Width;
 529             eyofs = eyofs * rect->Height;
 530         }
 531
 532         if (sin_angle >= 0)
 533         {
 534             (*line)->endpoint.X = rect->X + exofs;
 535             (*line)->endpoint.Y = rect->Y + eyofs;
 536         }
 537         else
 538         {
 539             (*line)->endpoint.X = (*line)->startpoint.X;
 540             (*line)->endpoint.Y = (*line)->startpoint.Y;
 541             (*line)->startpoint.X = rect->X + exofs;
 542             (*line)->startpoint.Y = rect->Y + eyofs;
 543         }
 544     }
 545
 546     return stat;
 547 }
 548
 549 GpStatus WINGDIPAPI GdipCreateLineBrushFromRectWithAngleI(GDIPCONST GpRect* rect,
 550     ARGB startcolor, ARGB endcolor, REAL angle, BOOL isAngleScalable, GpWrapMode wrap,
 551     GpLineGradient **line)
 552 {
 553     TRACE("(%p, %x, %x, %.2f, %d, %d, %p)\n", rect, startcolor, endcolor, angle, isAngleScalable,
 554           wrap, line);
 555
 556     return GdipCreateLineBrushFromRectI(rect, startcolor, endcolor, LinearGradientModeForwardDiagonal,
 557                                         wrap, line);
 558 }
 559
 560 GpStatus WINGDIPAPI GdipCreatePathGradient(GDIPCONST GpPointF* points,
 561     INT count, GpWrapMode wrap, GpPathGradient **grad)
 562 {
 563     COLORREF col = ARGB2COLORREF(0xffffffff);
 564
 565     TRACE("(%p, %d, %d, %p)\n", points, count, wrap, grad);
 566
 567     if(!points || !grad)
 568         return InvalidParameter;
 569
 570     if(count <= 0)
 571         return OutOfMemory;
 572
 573     *grad = GdipAlloc(sizeof(GpPathGradient));
 574     if (!*grad) return OutOfMemory;
 575
 576     (*grad)->blendfac = GdipAlloc(sizeof(REAL));
 577     (*grad)->blendpos = GdipAlloc(sizeof(REAL));
 578     if(!(*grad)->blendfac || !(*grad)->blendpos){
 579         GdipFree((*grad)->blendfac);
 580         GdipFree((*grad)->blendpos);
 581         GdipFree(*grad);
 582         return OutOfMemory;
 583     }
 584     (*grad)->blendfac[0] = 1.0;
 585     (*grad)->blendpos[0] = 1.0;
 586     (*grad)->blendcount  = 1;
 587
 588     (*grad)->pathdata.Count = count;
 589     (*grad)->pathdata.Points = GdipAlloc(count * sizeof(PointF));
 590     (*grad)->pathdata.Types = GdipAlloc(count);
 591
 592     if(!(*grad)->pathdata.Points || !(*grad)->pathdata.Types){
 593         GdipFree((*grad)->pathdata.Points);
 594         GdipFree((*grad)->pathdata.Types);
 595         GdipFree(*grad);
 596         return OutOfMemory;
 597     }
 598
 599     memcpy((*grad)->pathdata.Points, points, count * sizeof(PointF));
 600     memset((*grad)->pathdata.Types, PathPointTypeLine, count);
 601
 602     (*grad)->brush.lb.lbStyle = BS_SOLID;
 603     (*grad)->brush.lb.lbColor = col;
 604     (*grad)->brush.lb.lbHatch = 0;
 605
 606     (*grad)->brush.gdibrush = CreateSolidBrush(col);
 607     (*grad)->brush.bt = BrushTypePathGradient;
 608     (*grad)->centercolor = 0xffffffff;
 609     (*grad)->wrap = wrap;
 610     (*grad)->gamma = FALSE;
 611     (*grad)->center.X = 0.0;
 612     (*grad)->center.Y = 0.0;
 613     (*grad)->focus.X = 0.0;
 614     (*grad)->focus.Y = 0.0;
 615
 616     TRACE("<-- %p\n", *grad);
 617
 618     return Ok;
 619 }
 620
 621 GpStatus WINGDIPAPI GdipCreatePathGradientI(GDIPCONST GpPoint* points,
 622     INT count, GpWrapMode wrap, GpPathGradient **grad)
 623 {
 624     GpPointF *pointsF;
 625     GpStatus ret;
 626     INT i;
 627
 628     TRACE("(%p, %d, %d, %p)\n", points, count, wrap, grad);
 629
 630     if(!points || !grad)
 631         return InvalidParameter;
 632
 633     if(count <= 0)
 634         return OutOfMemory;
 635
 636     pointsF = GdipAlloc(sizeof(GpPointF) * count);
 637     if(!pointsF)
 638         return OutOfMemory;
 639
 640     for(i = 0; i < count; i++){
 641         pointsF[i].X = (REAL)points[i].X;
 642         pointsF[i].Y = (REAL)points[i].Y;
 643     }
 644
 645     ret = GdipCreatePathGradient(pointsF, count, wrap, grad);
 646     GdipFree(pointsF);
 647
 648     return ret;
 649 }
 650
 651 /******************************************************************************
 652  * GdipCreatePathGradientFromPath [GDIPLUS.@]
 653  *
 654  * FIXME: path gradient brushes not truly supported (drawn as solid brushes)
 655  */
 656 GpStatus WINGDIPAPI GdipCreatePathGradientFromPath(GDIPCONST GpPath* path,
 657     GpPathGradient **grad)
 658 {
 659     COLORREF col = ARGB2COLORREF(0xffffffff);
 660
 661     TRACE("(%p, %p)\n", path, grad);
 662
 663     if(!path || !grad)
 664         return InvalidParameter;
 665
 666     *grad = GdipAlloc(sizeof(GpPathGradient));
 667     if (!*grad) return OutOfMemory;
 668
 669     (*grad)->blendfac = GdipAlloc(sizeof(REAL));
 670     (*grad)->blendpos = GdipAlloc(sizeof(REAL));
 671     if(!(*grad)->blendfac || !(*grad)->blendpos){
 672         GdipFree((*grad)->blendfac);
 673         GdipFree((*grad)->blendpos);
 674         GdipFree(*grad);
 675         return OutOfMemory;
 676     }
 677     (*grad)->blendfac[0] = 1.0;
 678     (*grad)->blendpos[0] = 1.0;
 679     (*grad)->blendcount  = 1;
 680
 681     (*grad)->pathdata.Count = path->pathdata.Count;
 682     (*grad)->pathdata.Points = GdipAlloc(path->pathdata.Count * sizeof(PointF));
 683     (*grad)->pathdata.Types = GdipAlloc(path->pathdata.Count);
 684
 685     if(!(*grad)->pathdata.Points || !(*grad)->pathdata.Types){
 686         GdipFree((*grad)->pathdata.Points);
 687         GdipFree((*grad)->pathdata.Types);
 688         GdipFree(*grad);
 689         return OutOfMemory;
 690     }
 691
 692     memcpy((*grad)->pathdata.Points, path->pathdata.Points,
 693            path->pathdata.Count * sizeof(PointF));
 694     memcpy((*grad)->pathdata.Types, path->pathdata.Types, path->pathdata.Count);
 695
 696     (*grad)->brush.lb.lbStyle = BS_SOLID;
 697     (*grad)->brush.lb.lbColor = col;
 698     (*grad)->brush.lb.lbHatch = 0;
 699
 700     (*grad)->brush.gdibrush = CreateSolidBrush(col);
 701     (*grad)->brush.bt = BrushTypePathGradient;
 702     (*grad)->centercolor = 0xffffffff;
 703     (*grad)->wrap = WrapModeClamp;
 704     (*grad)->gamma = FALSE;
 705     /* FIXME: this should be set to the "centroid" of the path by default */
 706     (*grad)->center.X = 0.0;
 707     (*grad)->center.Y = 0.0;
 708     (*grad)->focus.X = 0.0;
 709     (*grad)->focus.Y = 0.0;
 710
 711     TRACE("<-- %p\n", *grad);
 712
 713     return Ok;
 714 }
 715
 716 /******************************************************************************
 717  * GdipCreateSolidFill [GDIPLUS.@]
 718  */
 719 GpStatus WINGDIPAPI GdipCreateSolidFill(ARGB color, GpSolidFill **sf)
 720 {
 721     COLORREF col = ARGB2COLORREF(color);
 722
 723     TRACE("(%x, %p)\n", color, sf);
 724
 725     if(!sf)  return InvalidParameter;
 726
 727     *sf = GdipAlloc(sizeof(GpSolidFill));
 728     if (!*sf) return OutOfMemory;
 729
 730     (*sf)->brush.lb.lbStyle = BS_SOLID;
 731     (*sf)->brush.lb.lbColor = col;
 732     (*sf)->brush.lb.lbHatch = 0;
 733
 734     (*sf)->brush.gdibrush = CreateSolidBrush(col);
 735     (*sf)->brush.bt = BrushTypeSolidColor;
 736     (*sf)->color = color;
 737     (*sf)->bmp = ARGB2BMP(color);
 738
 739     TRACE("<-- %p\n", *sf);
 740
 741     return Ok;
 742 }
 743
 744 /******************************************************************************
 745  * GdipCreateTexture [GDIPLUS.@]
 746  *
 747  * PARAMS
 748  *  image       [I] image to use
 749  *  wrapmode    [I] optional
 750  *  texture     [O] pointer to the resulting texturebrush
 751  *
 752  * RETURNS
 753  *  SUCCESS: Ok
 754  *  FAILURE: element of GpStatus
 755  */
 756 GpStatus WINGDIPAPI GdipCreateTexture(GpImage *image, GpWrapMode wrapmode,
 757         GpTexture **texture)
 758 {
 759     UINT width, height;
 760     GpImageAttributes attributes;
 761     GpStatus stat;
 762
 763     TRACE("%p, %d %p\n", image, wrapmode, texture);
 764
 765     if (!(image && texture))
 766         return InvalidParameter;
 767
 768     stat = GdipGetImageWidth(image, &width);
 769     if (stat != Ok) return stat;
 770     stat = GdipGetImageHeight(image, &height);
 771     if (stat != Ok) return stat;
 772     attributes.wrap = wrapmode;
 773
 774     return GdipCreateTextureIA(image, &attributes, 0, 0, width, height,
 775             texture);
 776 }
 777
 778 /******************************************************************************
 779  * GdipCreateTexture2 [GDIPLUS.@]
 780  */
 781 GpStatus WINGDIPAPI GdipCreateTexture2(GpImage *image, GpWrapMode wrapmode,
 782         REAL x, REAL y, REAL width, REAL height, GpTexture **texture)
 783 {
 784     GpImageAttributes attributes;
 785
 786     TRACE("%p %d %f %f %f %f %p\n", image, wrapmode,
 787             x, y, width, height, texture);
 788
 789     attributes.wrap = wrapmode;
 790     return GdipCreateTextureIA(image, &attributes, x, y, width, height,
 791             texture);
 792 }
 793
 794 /******************************************************************************
 795  * GdipCreateTextureIA [GDIPLUS.@]
 796  *
 797  * FIXME: imageattr ignored
 798  */
 799 GpStatus WINGDIPAPI GdipCreateTextureIA(GpImage *image,
 800     GDIPCONST GpImageAttributes *imageattr, REAL x, REAL y, REAL width,
 801     REAL height, GpTexture **texture)
 802 {
 803     HBITMAP hbm=NULL;
 804     GpStatus status;
 805     GpImage *new_image=NULL;
 806
 807     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f, %p)\n", image, imageattr, x, y, width, height,
 808            texture);
 809
 810     if(!image || !texture || x < 0.0 || y < 0.0 || width < 0.0 || height < 0.0)
 811         return InvalidParameter;
 812
 813     *texture = NULL;
 814
 815     if(image->type != ImageTypeBitmap){
 816         FIXME("not implemented for image type %d\n", image->type);
 817         return NotImplemented;
 818     }
 819
 820     status = GdipCloneBitmapArea(x, y, width, height, PixelFormatDontCare, (GpBitmap*)image, (GpBitmap**)&new_image);
 821     if (status != Ok)
 822         return status;
 823
 824     status = GdipCreateHBITMAPFromBitmap((GpBitmap*)new_image, &hbm, 0);
 825     if(!hbm)
 826     {
 827         status = GenericError;
 828         goto exit;
 829     }
 830
 831     *texture = GdipAlloc(sizeof(GpTexture));
 832     if (!*texture){
 833         status = OutOfMemory;
 834         goto exit;
 835     }
 836
 837     if((status = GdipCreateMatrix(&(*texture)->transform)) != Ok){
 838         goto exit;
 839     }
 840
 841     (*texture)->brush.lb.lbStyle = BS_PATTERN;
 842     (*texture)->brush.lb.lbColor = 0;
 843     (*texture)->brush.lb.lbHatch = (ULONG_PTR)hbm;
 844
 845     (*texture)->brush.gdibrush = CreateBrushIndirect(&(*texture)->brush.lb);
 846     (*texture)->brush.bt = BrushTypeTextureFill;
 847     if (imageattr)
 848         (*texture)->wrap = imageattr->wrap;
 849     else
 850         (*texture)->wrap = WrapModeTile;
 851     (*texture)->image = new_image;
 852
 853 exit:
 854     if (status == Ok)
 855     {
 856         TRACE("<-- %p\n", *texture);
 857     }
 858     else
 859     {
 860         if (*texture)
 861         {
 862             GdipDeleteMatrix((*texture)->transform);
 863             GdipFree(*texture);
 864             *texture = NULL;
 865         }
 866         GdipDisposeImage(new_image);
 867         TRACE("<-- error %u\n", status);
 868     }
 869
 870     DeleteObject(hbm);
 871
 872     return status;
 873 }
 874
 875 /******************************************************************************
 876  * GdipCreateTextureIAI [GDIPLUS.@]
 877  */
 878 GpStatus WINGDIPAPI GdipCreateTextureIAI(GpImage *image, GDIPCONST GpImageAttributes *imageattr,
 879     INT x, INT y, INT width, INT height, GpTexture **texture)
 880 {
 881     TRACE("(%p, %p, %d, %d, %d, %d, %p)\n", image, imageattr, x, y, width, height,
 882            texture);
 883
 884     return GdipCreateTextureIA(image,imageattr,(REAL)x,(REAL)y,(REAL)width,(REAL)height,texture);
 885 }
 886
 887 GpStatus WINGDIPAPI GdipCreateTexture2I(GpImage *image, GpWrapMode wrapmode,
 888         INT x, INT y, INT width, INT height, GpTexture **texture)
 889 {
 890     GpImageAttributes imageattr;
 891
 892     TRACE("%p %d %d %d %d %d %p\n", image, wrapmode, x, y, width, height,
 893             texture);
 894
 895     imageattr.wrap = wrapmode;
 896
 897     return GdipCreateTextureIA(image, &imageattr, x, y, width, height, texture);
 898 }
 899
 900 GpStatus WINGDIPAPI GdipGetBrushType(GpBrush *brush, GpBrushType *type)
 901 {
 902     TRACE("(%p, %p)\n", brush, type);
 903
 904     if(!brush || !type)  return InvalidParameter;
 905
 906     *type = brush->bt;
 907
 908     return Ok;
 909 }
 910
 911 GpStatus WINGDIPAPI GdipGetHatchBackgroundColor(GpHatch *brush, ARGB *backcol)
 912 {
 913     TRACE("(%p, %p)\n", brush, backcol);
 914
 915     if(!brush || !backcol)  return InvalidParameter;
 916
 917     *backcol = brush->backcol;
 918
 919     return Ok;
 920 }
 921
 922 GpStatus WINGDIPAPI GdipGetHatchForegroundColor(GpHatch *brush, ARGB *forecol)
 923 {
 924     TRACE("(%p, %p)\n", brush, forecol);
 925
 926     if(!brush || !forecol)  return InvalidParameter;
 927
 928     *forecol = brush->forecol;
 929
 930     return Ok;
 931 }
 932
 933 GpStatus WINGDIPAPI GdipGetHatchStyle(GpHatch *brush, HatchStyle *hatchstyle)
 934 {
 935     TRACE("(%p, %p)\n", brush, hatchstyle);
 936
 937     if(!brush || !hatchstyle)  return InvalidParameter;
 938
 939     *hatchstyle = brush->hatchstyle;
 940
 941     return Ok;
 942 }
 943
 944 GpStatus WINGDIPAPI GdipDeleteBrush(GpBrush *brush)
 945 {
 946     TRACE("(%p)\n", brush);
 947
 948     if(!brush)  return InvalidParameter;
 949
 950     switch(brush->bt)
 951     {
 952         case BrushTypePathGradient:
 953             GdipFree(((GpPathGradient*) brush)->pathdata.Points);
 954             GdipFree(((GpPathGradient*) brush)->pathdata.Types);
 955             GdipFree(((GpPathGradient*) brush)->blendfac);
 956             GdipFree(((GpPathGradient*) brush)->blendpos);
 957             break;
 958         case BrushTypeSolidColor:
 959             if (((GpSolidFill*)brush)->bmp)
 960                 DeleteObject(((GpSolidFill*)brush)->bmp);
 961             break;
 962         case BrushTypeLinearGradient:
 963             GdipFree(((GpLineGradient*)brush)->blendfac);
 964             GdipFree(((GpLineGradient*)brush)->blendpos);
 965             GdipFree(((GpLineGradient*)brush)->pblendcolor);
 966             GdipFree(((GpLineGradient*)brush)->pblendpos);
 967             break;
 968         case BrushTypeTextureFill:
 969             GdipDeleteMatrix(((GpTexture*)brush)->transform);
 970             GdipDisposeImage(((GpTexture*)brush)->image);
 971             break;
 972         default:
 973             break;
 974     }
 975
 976     DeleteObject(brush->gdibrush);
 977     GdipFree(brush);
 978
 979     return Ok;
 980 }
 981
 982 GpStatus WINGDIPAPI GdipGetLineGammaCorrection(GpLineGradient *line,
 983     BOOL *usinggamma)
 984 {
 985     TRACE("(%p, %p)\n", line, usinggamma);
 986
 987     if(!line || !usinggamma)
 988         return InvalidParameter;
 989
 990     *usinggamma = line->gamma;
 991
 992     return Ok;
 993 }
 994
 995 GpStatus WINGDIPAPI GdipGetLineWrapMode(GpLineGradient *brush, GpWrapMode *wrapmode)
 996 {
 997     TRACE("(%p, %p)\n", brush, wrapmode);
 998
 999     if(!brush || !wrapmode)
1000         return InvalidParameter;
1001
1002     *wrapmode = brush->wrap;
1003
1004     return Ok;
1005 }
1006
1007 GpStatus WINGDIPAPI GdipGetPathGradientBlend(GpPathGradient *brush, REAL *blend,
1008     REAL *positions, INT count)
1009 {
1010     TRACE("(%p, %p, %p, %d)\n", brush, blend, positions, count);
1011
1012     if(!brush || !blend || !positions || count <= 0)
1013         return InvalidParameter;
1014
1015     if(count < brush->blendcount)
1016         return InsufficientBuffer;
1017
1018     memcpy(blend, brush->blendfac, count*sizeof(REAL));
1019     if(brush->blendcount > 1){
1020         memcpy(positions, brush->blendpos, count*sizeof(REAL));
1021     }
1022
1023     return Ok;
1024 }
1025
1026 GpStatus WINGDIPAPI GdipGetPathGradientBlendCount(GpPathGradient *brush, INT *count)
1027 {
1028     TRACE("(%p, %p)\n", brush, count);
1029
1030     if(!brush || !count)
1031         return InvalidParameter;
1032
1033     *count = brush->blendcount;
1034
1035     return Ok;
1036 }
1037
1038 GpStatus WINGDIPAPI GdipGetPathGradientCenterPoint(GpPathGradient *grad,
1039     GpPointF *point)
1040 {
1041     TRACE("(%p, %p)\n", grad, point);
1042
1043     if(!grad || !point)
1044         return InvalidParameter;
1045
1046     point->X = grad->center.X;
1047     point->Y = grad->center.Y;
1048
1049     return Ok;
1050 }
1051
1052 GpStatus WINGDIPAPI GdipGetPathGradientCenterPointI(GpPathGradient *grad,
1053     GpPoint *point)
1054 {
1055     GpStatus ret;
1056     GpPointF ptf;
1057
1058     TRACE("(%p, %p)\n", grad, point);
1059
1060     if(!point)
1061         return InvalidParameter;
1062
1063     ret = GdipGetPathGradientCenterPoint(grad,&ptf);
1064
1065     if(ret == Ok){
1066         point->X = roundr(ptf.X);
1067         point->Y = roundr(ptf.Y);
1068     }
1069
1070     return ret;
1071 }
1072
1073 GpStatus WINGDIPAPI GdipGetPathGradientCenterColor(GpPathGradient *grad,
1074     ARGB *colors)
1075 {
1076     static int calls;
1077
1078     TRACE("(%p,%p)\n", grad, colors);
1079
1080     if(!(calls++))
1081         FIXME("not implemented\n");
1082
1083     return NotImplemented;
1084 }
1085
1086 GpStatus WINGDIPAPI GdipGetPathGradientFocusScales(GpPathGradient *grad,
1087     REAL *x, REAL *y)
1088 {
1089     TRACE("(%p, %p, %p)\n", grad, x, y);
1090
1091     if(!grad || !x || !y)
1092         return InvalidParameter;
1093
1094     *x = grad->focus.X;
1095     *y = grad->focus.Y;
1096
1097     return Ok;
1098 }
1099
1100 GpStatus WINGDIPAPI GdipGetPathGradientGammaCorrection(GpPathGradient *grad,
1101     BOOL *gamma)
1102 {
1103     TRACE("(%p, %p)\n", grad, gamma);
1104
1105     if(!grad || !gamma)
1106         return InvalidParameter;
1107
1108     *gamma = grad->gamma;
1109
1110     return Ok;
1111 }
1112
1113 GpStatus WINGDIPAPI GdipGetPathGradientPointCount(GpPathGradient *grad,
1114     INT *count)
1115 {
1116     TRACE("(%p, %p)\n", grad, count);
1117
1118     if(!grad || !count)
1119         return InvalidParameter;
1120
1121     *count = grad->pathdata.Count;
1122
1123     return Ok;
1124 }
1125
1126 GpStatus WINGDIPAPI GdipGetPathGradientRect(GpPathGradient *brush, GpRectF *rect)
1127 {
1128     GpRectF r;
1129     GpPath* path;
1130     GpStatus stat;
1131
1132     TRACE("(%p, %p)\n", brush, rect);
1133
1134     if(!brush || !rect)
1135         return InvalidParameter;
1136
1137     stat = GdipCreatePath2(brush->pathdata.Points, brush->pathdata.Types,
1138                            brush->pathdata.Count, FillModeAlternate, &path);
1139     if(stat != Ok)  return stat;
1140
1141     stat = GdipGetPathWorldBounds(path, &r, NULL, NULL);
1142     if(stat != Ok){
1143         GdipDeletePath(path);
1144         return stat;
1145     }
1146
1147     memcpy(rect, &r, sizeof(GpRectF));
1148
1149     GdipDeletePath(path);
1150
1151     return Ok;
1152 }
1153
1154 GpStatus WINGDIPAPI GdipGetPathGradientRectI(GpPathGradient *brush, GpRect *rect)
1155 {
1156     GpRectF rectf;
1157     GpStatus stat;
1158
1159     TRACE("(%p, %p)\n", brush, rect);
1160
1161     if(!brush || !rect)
1162         return InvalidParameter;
1163
1164     stat = GdipGetPathGradientRect(brush, &rectf);
1165     if(stat != Ok)  return stat;
1166
1167     rect->X = roundr(rectf.X);
1168     rect->Y = roundr(rectf.Y);
1169     rect->Width  = roundr(rectf.Width);
1170     rect->Height = roundr(rectf.Height);
1171
1172     return Ok;
1173 }
1174
1175 GpStatus WINGDIPAPI GdipGetPathGradientSurroundColorsWithCount(GpPathGradient
1176     *grad, ARGB *argb, INT *count)
1177 {
1178     static int calls;
1179
1180     TRACE("(%p,%p,%p)\n", grad, argb, count);
1181
1182     if(!grad || !argb || !count || (*count < grad->pathdata.Count))
1183         return InvalidParameter;
1184
1185     if(!(calls++))
1186         FIXME("not implemented\n");
1187
1188     return NotImplemented;
1189 }
1190
1191 GpStatus WINGDIPAPI GdipGetPathGradientSurroundColorCount(GpPathGradient *brush, INT *count)
1192 {
1193     TRACE("(%p, %p)\n", brush, count);
1194
1195     if (!brush || !count)
1196        return InvalidParameter;
1197
1198     return NotImplemented;
1199 }
1200
1201 GpStatus WINGDIPAPI GdipGetPathGradientWrapMode(GpPathGradient *brush,
1202     GpWrapMode *wrapmode)
1203 {
1204     TRACE("(%p, %p)\n", brush, wrapmode);
1205
1206     if(!brush || !wrapmode)
1207         return InvalidParameter;
1208
1209     *wrapmode = brush->wrap;
1210
1211     return Ok;
1212 }
1213
1214 GpStatus WINGDIPAPI GdipGetSolidFillColor(GpSolidFill *sf, ARGB *argb)
1215 {
1216     TRACE("(%p, %p)\n", sf, argb);
1217
1218     if(!sf || !argb)
1219         return InvalidParameter;
1220
1221     *argb = sf->color;
1222
1223     return Ok;
1224 }
1225
1226 /******************************************************************************
1227  * GdipGetTextureImage [GDIPLUS.@]
1228  */
1229 GpStatus WINGDIPAPI GdipGetTextureImage(GpTexture *brush, GpImage **image)
1230 {
1231     TRACE("(%p, %p)\n", brush, image);
1232
1233     if(!brush || !image)
1234         return InvalidParameter;
1235
1236     return GdipCloneImage(brush->image, image);
1237 }
1238
1239 /******************************************************************************
1240  * GdipGetTextureTransform [GDIPLUS.@]
1241  */
1242 GpStatus WINGDIPAPI GdipGetTextureTransform(GpTexture *brush, GpMatrix *matrix)
1243 {
1244     TRACE("(%p, %p)\n", brush, matrix);
1245
1246     if(!brush || !matrix)
1247         return InvalidParameter;
1248
1249     memcpy(matrix, brush->transform, sizeof(GpMatrix));
1250
1251     return Ok;
1252 }
1253
1254 /******************************************************************************
1255  * GdipGetTextureWrapMode [GDIPLUS.@]
1256  */
1257 GpStatus WINGDIPAPI GdipGetTextureWrapMode(GpTexture *brush, GpWrapMode *wrapmode)
1258 {
1259     TRACE("(%p, %p)\n", brush, wrapmode);
1260
1261     if(!brush || !wrapmode)
1262         return InvalidParameter;
1263
1264     *wrapmode = brush->wrap;
1265
1266     return Ok;
1267 }
1268
1269 /******************************************************************************
1270  * GdipMultiplyTextureTransform [GDIPLUS.@]
1271  */
1272 GpStatus WINGDIPAPI GdipMultiplyTextureTransform(GpTexture* brush,
1273     GDIPCONST GpMatrix *matrix, GpMatrixOrder order)
1274 {
1275     TRACE("(%p, %p, %d)\n", brush, matrix, order);
1276
1277     if(!brush || !matrix)
1278         return InvalidParameter;
1279
1280     return GdipMultiplyMatrix(brush->transform, matrix, order);
1281 }
1282
1283 /******************************************************************************
1284  * GdipResetTextureTransform [GDIPLUS.@]
1285  */
1286 GpStatus WINGDIPAPI GdipResetTextureTransform(GpTexture* brush)
1287 {
1288     TRACE("(%p)\n", brush);
1289
1290     if(!brush)
1291         return InvalidParameter;
1292
1293     return GdipSetMatrixElements(brush->transform, 1.0, 0.0, 0.0, 1.0, 0.0, 0.0);
1294 }
1295
1296 /******************************************************************************
1297  * GdipScaleTextureTransform [GDIPLUS.@]
1298  */
1299 GpStatus WINGDIPAPI GdipScaleTextureTransform(GpTexture* brush,
1300     REAL sx, REAL sy, GpMatrixOrder order)
1301 {
1302     TRACE("(%p, %.2f, %.2f, %d)\n", brush, sx, sy, order);
1303
1304     if(!brush)
1305         return InvalidParameter;
1306
1307     return GdipScaleMatrix(brush->transform, sx, sy, order);
1308 }
1309
1310 GpStatus WINGDIPAPI GdipSetLineBlend(GpLineGradient *brush,
1311     GDIPCONST REAL *factors, GDIPCONST REAL* positions, INT count)
1312 {
1313     REAL *new_blendfac, *new_blendpos;
1314
1315     TRACE("(%p, %p, %p, %i)\n", brush, factors, positions, count);
1316
1317     if(!brush || !factors || !positions || count <= 0 ||
1318        (count >= 2 && (positions[0] != 0.0f || positions[count-1] != 1.0f)))
1319         return InvalidParameter;
1320
1321     new_blendfac = GdipAlloc(count * sizeof(REAL));
1322     new_blendpos = GdipAlloc(count * sizeof(REAL));
1323
1324     if (!new_blendfac || !new_blendpos)
1325     {
1326         GdipFree(new_blendfac);
1327         GdipFree(new_blendpos);
1328         return OutOfMemory;
1329     }
1330
1331     memcpy(new_blendfac, factors, count * sizeof(REAL));
1332     memcpy(new_blendpos, positions, count * sizeof(REAL));
1333
1334     GdipFree(brush->blendfac);
1335     GdipFree(brush->blendpos);
1336
1337     brush->blendcount = count;
1338     brush->blendfac = new_blendfac;
1339     brush->blendpos = new_blendpos;
1340
1341     return Ok;
1342 }
1343
1344 GpStatus WINGDIPAPI GdipGetLineBlend(GpLineGradient *brush, REAL *factors,
1345     REAL *positions, INT count)
1346 {
1347     TRACE("(%p, %p, %p, %i)\n", brush, factors, positions, count);
1348
1349     if (!brush || !factors || !positions || count <= 0)
1350         return InvalidParameter;
1351
1352     if (count < brush->blendcount)
1353         return InsufficientBuffer;
1354
1355     memcpy(factors, brush->blendfac, brush->blendcount * sizeof(REAL));
1356     memcpy(positions, brush->blendpos, brush->blendcount * sizeof(REAL));
1357
1358     return Ok;
1359 }
1360
1361 GpStatus WINGDIPAPI GdipGetLineBlendCount(GpLineGradient *brush, INT *count)
1362 {
1363     TRACE("(%p, %p)\n", brush, count);
1364
1365     if (!brush || !count)
1366         return InvalidParameter;
1367
1368     *count = brush->blendcount;
1369
1370     return Ok;
1371 }
1372
1373 GpStatus WINGDIPAPI GdipSetLineGammaCorrection(GpLineGradient *line,
1374     BOOL usegamma)
1375 {
1376     TRACE("(%p, %d)\n", line, usegamma);
1377
1378     if(!line)
1379         return InvalidParameter;
1380
1381     line->gamma = usegamma;
1382
1383     return Ok;
1384 }
1385
1386 GpStatus WINGDIPAPI GdipSetLineSigmaBlend(GpLineGradient *line, REAL focus,
1387     REAL scale)
1388 {
1389     REAL factors[33];
1390     REAL positions[33];
1391     int num_points = 0;
1392     int i;
1393     const int precision = 16;
1394     REAL erf_range; /* we use values erf(-erf_range) through erf(+erf_range) */
1395     REAL min_erf;
1396     REAL scale_erf;
1397
1398     TRACE("(%p, %0.2f, %0.2f)\n", line, focus, scale);
1399
1400     if(!line || focus < 0.0 || focus > 1.0 || scale < 0.0 || scale > 1.0)
1401         return InvalidParameter;
1402
1403     /* we want 2 standard deviations */
1404     erf_range = 2.0 / sqrt(2);
1405
1406     /* calculate the constants we need to normalize the error function to be
1407         between 0.0 and scale over the range we need */
1408     min_erf = erf(-erf_range);
1409     scale_erf = scale / (-2.0 * min_erf);
1410
1411     if (focus != 0.0)
1412     {
1413         positions[0] = 0.0;
1414         factors[0] = 0.0;
1415         for (i=1; i<precision; i++)
1416         {
1417             positions[i] = focus * i / precision;
1418             factors[i] = scale_erf * (erf(2 * erf_range * i / precision - erf_range) - min_erf);
1419         }
1420         num_points += precision;
1421     }
1422
1423     positions[num_points] = focus;
1424     factors[num_points] = scale;
1425     num_points += 1;
1426
1427     if (focus != 1.0)
1428     {
1429         for (i=1; i<precision; i++)
1430         {
1431             positions[i+num_points-1] = (focus + ((1.0-focus) * i / precision));
1432             factors[i+num_points-1] = scale_erf * (erf(erf_range - 2 * erf_range * i / precision) - min_erf);
1433         }
1434         num_points += precision;
1435         positions[num_points-1] = 1.0;
1436         factors[num_points-1] = 0.0;
1437     }
1438
1439     return GdipSetLineBlend(line, factors, positions, num_points);
1440 }
1441
1442 GpStatus WINGDIPAPI GdipSetLineWrapMode(GpLineGradient *line,
1443     GpWrapMode wrap)
1444 {
1445     TRACE("(%p, %d)\n", line, wrap);
1446
1447     if(!line || wrap == WrapModeClamp)
1448         return InvalidParameter;
1449
1450     line->wrap = wrap;
1451
1452     return Ok;
1453 }
1454
1455 GpStatus WINGDIPAPI GdipSetPathGradientBlend(GpPathGradient *brush, GDIPCONST REAL *blend,
1456     GDIPCONST REAL *pos, INT count)
1457 {
1458     static int calls;
1459
1460     TRACE("(%p,%p,%p,%i)\n", brush, blend, pos, count);
1461
1462     if(!(calls++))
1463         FIXME("not implemented\n");
1464
1465     return NotImplemented;
1466 }
1467
1468 GpStatus WINGDIPAPI GdipSetPathGradientPresetBlend(GpPathGradient *brush,
1469     GDIPCONST ARGB *blend, GDIPCONST REAL *pos, INT count)
1470 {
1471     FIXME("(%p,%p,%p,%i): stub\n", brush, blend, pos, count);
1472     return NotImplemented;
1473 }
1474
1475 GpStatus WINGDIPAPI GdipSetPathGradientCenterColor(GpPathGradient *grad,
1476     ARGB argb)
1477 {
1478     TRACE("(%p, %x)\n", grad, argb);
1479
1480     if(!grad)
1481         return InvalidParameter;
1482
1483     grad->centercolor = argb;
1484     grad->brush.lb.lbColor = ARGB2COLORREF(argb);
1485
1486     DeleteObject(grad->brush.gdibrush);
1487     grad->brush.gdibrush = CreateSolidBrush(grad->brush.lb.lbColor);
1488
1489     return Ok;
1490 }
1491
1492 GpStatus WINGDIPAPI GdipSetPathGradientCenterPoint(GpPathGradient *grad,
1493     GpPointF *point)
1494 {
1495     TRACE("(%p, %s)\n", grad, debugstr_pointf(point));
1496
1497     if(!grad || !point)
1498         return InvalidParameter;
1499
1500     grad->center.X = point->X;
1501     grad->center.Y = point->Y;
1502
1503     return Ok;
1504 }
1505
1506 GpStatus WINGDIPAPI GdipSetPathGradientCenterPointI(GpPathGradient *grad,
1507     GpPoint *point)
1508 {
1509     GpPointF ptf;
1510
1511     TRACE("(%p, %p)\n", grad, point);
1512
1513     if(!point)
1514         return InvalidParameter;
1515
1516     ptf.X = (REAL)point->X;
1517     ptf.Y = (REAL)point->Y;
1518
1519     return GdipSetPathGradientCenterPoint(grad,&ptf);
1520 }
1521
1522 GpStatus WINGDIPAPI GdipSetPathGradientFocusScales(GpPathGradient *grad,
1523     REAL x, REAL y)
1524 {
1525     TRACE("(%p, %.2f, %.2f)\n", grad, x, y);
1526
1527     if(!grad)
1528         return InvalidParameter;
1529
1530     grad->focus.X = x;
1531     grad->focus.Y = y;
1532
1533     return Ok;
1534 }
1535
1536 GpStatus WINGDIPAPI GdipSetPathGradientGammaCorrection(GpPathGradient *grad,
1537     BOOL gamma)
1538 {
1539     TRACE("(%p, %d)\n", grad, gamma);
1540
1541     if(!grad)
1542         return InvalidParameter;
1543
1544     grad->gamma = gamma;
1545
1546     return Ok;
1547 }
1548
1549 GpStatus WINGDIPAPI GdipSetPathGradientSigmaBlend(GpPathGradient *grad,
1550     REAL focus, REAL scale)
1551 {
1552     static int calls;
1553
1554     TRACE("(%p,%0.2f,%0.2f)\n", grad, focus, scale);
1555
1556     if(!grad || focus < 0.0 || focus > 1.0 || scale < 0.0 || scale > 1.0)
1557         return InvalidParameter;
1558
1559     if(!(calls++))
1560         FIXME("not implemented\n");
1561
1562     return NotImplemented;
1563 }
1564
1565 GpStatus WINGDIPAPI GdipSetPathGradientSurroundColorsWithCount(GpPathGradient
1566     *grad, GDIPCONST ARGB *argb, INT *count)
1567 {
1568     static int calls;
1569
1570     TRACE("(%p,%p,%p)\n", grad, argb, count);
1571
1572     if(!grad || !argb || !count || (*count <= 0) ||
1573         (*count > grad->pathdata.Count))
1574         return InvalidParameter;
1575
1576     if(!(calls++))
1577         FIXME("not implemented\n");
1578
1579     return NotImplemented;
1580 }
1581
1582 GpStatus WINGDIPAPI GdipSetPathGradientWrapMode(GpPathGradient *grad,
1583     GpWrapMode wrap)
1584 {
1585     TRACE("(%p, %d)\n", grad, wrap);
1586
1587     if(!grad)
1588         return InvalidParameter;
1589
1590     grad->wrap = wrap;
1591
1592     return Ok;
1593 }
1594
1595 GpStatus WINGDIPAPI GdipSetSolidFillColor(GpSolidFill *sf, ARGB argb)
1596 {
1597     TRACE("(%p, %x)\n", sf, argb);
1598
1599     if(!sf)
1600         return InvalidParameter;
1601
1602     sf->color = argb;
1603     sf->brush.lb.lbColor = ARGB2COLORREF(argb);
1604
1605     DeleteObject(sf->brush.gdibrush);
1606     sf->brush.gdibrush = CreateSolidBrush(sf->brush.lb.lbColor);
1607
1608     return Ok;
1609 }
1610
1611 /******************************************************************************
1612  * GdipSetTextureTransform [GDIPLUS.@]
1613  */
1614 GpStatus WINGDIPAPI GdipSetTextureTransform(GpTexture *texture,
1615     GDIPCONST GpMatrix *matrix)
1616 {
1617     TRACE("(%p, %p)\n", texture, matrix);
1618
1619     if(!texture || !matrix)
1620         return InvalidParameter;
1621
1622     memcpy(texture->transform, matrix, sizeof(GpMatrix));
1623
1624     return Ok;
1625 }
1626
1627 /******************************************************************************
1628  * GdipSetTextureWrapMode [GDIPLUS.@]
1629  *
1630  * WrapMode not used, only stored
1631  */
1632 GpStatus WINGDIPAPI GdipSetTextureWrapMode(GpTexture *brush, GpWrapMode wrapmode)
1633 {
1634     TRACE("(%p, %d)\n", brush, wrapmode);
1635
1636     if(!brush)
1637         return InvalidParameter;
1638
1639     brush->wrap = wrapmode;
1640
1641     return Ok;
1642 }
1643
1644 GpStatus WINGDIPAPI GdipSetLineColors(GpLineGradient *brush, ARGB color1,
1645     ARGB color2)
1646 {
1647     TRACE("(%p, %x, %x)\n", brush, color1, color2);
1648
1649     if(!brush)
1650         return InvalidParameter;
1651
1652     brush->startcolor = color1;
1653     brush->endcolor   = color2;
1654
1655     return Ok;
1656 }
1657
1658 GpStatus WINGDIPAPI GdipGetLineColors(GpLineGradient *brush, ARGB *colors)
1659 {
1660     TRACE("(%p, %p)\n", brush, colors);
1661
1662     if(!brush || !colors)
1663         return InvalidParameter;
1664
1665     colors[0] = brush->startcolor;
1666     colors[1] = brush->endcolor;
1667
1668     return Ok;
1669 }
1670
1671 /******************************************************************************
1672  * GdipRotateTextureTransform [GDIPLUS.@]
1673  */
1674 GpStatus WINGDIPAPI GdipRotateTextureTransform(GpTexture* brush, REAL angle,
1675     GpMatrixOrder order)
1676 {
1677     TRACE("(%p, %.2f, %d)\n", brush, angle, order);
1678
1679     if(!brush)
1680         return InvalidParameter;
1681
1682     return GdipRotateMatrix(brush->transform, angle, order);
1683 }
1684
1685 GpStatus WINGDIPAPI GdipSetLineLinearBlend(GpLineGradient *brush, REAL focus,
1686     REAL scale)
1687 {
1688     REAL factors[3];
1689     REAL positions[3];
1690     int num_points = 0;
1691
1692     TRACE("(%p,%.2f,%.2f)\n", brush, focus, scale);
1693
1694     if (!brush) return InvalidParameter;
1695
1696     if (focus != 0.0)
1697     {
1698         factors[num_points] = 0.0;
1699         positions[num_points] = 0.0;
1700         num_points++;
1701     }
1702
1703     factors[num_points] = scale;
1704     positions[num_points] = focus;
1705     num_points++;
1706
1707     if (focus != 1.0)
1708     {
1709         factors[num_points] = 0.0;
1710         positions[num_points] = 1.0;
1711         num_points++;
1712     }
1713
1714     return GdipSetLineBlend(brush, factors, positions, num_points);
1715 }
1716
1717 GpStatus WINGDIPAPI GdipSetLinePresetBlend(GpLineGradient *brush,
1718     GDIPCONST ARGB *blend, GDIPCONST REAL* positions, INT count)
1719 {
1720     ARGB *new_color;
1721     REAL *new_pos;
1722     TRACE("(%p,%p,%p,%i)\n", brush, blend, positions, count);
1723
1724     if (!brush || !blend || !positions || count < 2 ||
1725         positions[0] != 0.0f || positions[count-1] != 1.0f)
1726     {
1727         return InvalidParameter;
1728     }
1729
1730     new_color = GdipAlloc(count * sizeof(ARGB));
1731     new_pos = GdipAlloc(count * sizeof(REAL));
1732     if (!new_color || !new_pos)
1733     {
1734         GdipFree(new_color);
1735         GdipFree(new_pos);
1736         return OutOfMemory;
1737     }
1738
1739     memcpy(new_color, blend, sizeof(ARGB) * count);
1740     memcpy(new_pos, positions, sizeof(REAL) * count);
1741
1742     GdipFree(brush->pblendcolor);
1743     GdipFree(brush->pblendpos);
1744
1745     brush->pblendcolor = new_color;
1746     brush->pblendpos = new_pos;
1747     brush->pblendcount = count;
1748
1749     return Ok;
1750 }
1751
1752 GpStatus WINGDIPAPI GdipGetLinePresetBlend(GpLineGradient *brush,
1753     ARGB *blend, REAL* positions, INT count)
1754 {
1755     if (!brush || !blend || !positions || count < 2)
1756         return InvalidParameter;
1757
1758     if (brush->pblendcount == 0)
1759         return GenericError;
1760
1761     if (count < brush->pblendcount)
1762         return InsufficientBuffer;
1763
1764     memcpy(blend, brush->pblendcolor, sizeof(ARGB) * brush->pblendcount);
1765     memcpy(positions, brush->pblendpos, sizeof(REAL) * brush->pblendcount);
1766
1767     return Ok;
1768 }
1769
1770 GpStatus WINGDIPAPI GdipGetLinePresetBlendCount(GpLineGradient *brush,
1771     INT *count)
1772 {
1773     if (!brush || !count)
1774         return InvalidParameter;
1775
1776     *count = brush->pblendcount;
1777
1778     return Ok;
1779 }
1780
1781 GpStatus WINGDIPAPI GdipResetLineTransform(GpLineGradient *brush)
1782 {
1783     static int calls;
1784
1785     TRACE("(%p)\n", brush);
1786
1787     if(!(calls++))
1788         FIXME("not implemented\n");
1789
1790     return NotImplemented;
1791 }
1792
1793 GpStatus WINGDIPAPI GdipSetLineTransform(GpLineGradient *brush,
1794     GDIPCONST GpMatrix *matrix)
1795 {
1796     static int calls;
1797
1798     TRACE("(%p,%p)\n", brush,  matrix);
1799
1800     if(!(calls++))
1801         FIXME("not implemented\n");
1802
1803     return NotImplemented;
1804 }
1805
1806 GpStatus WINGDIPAPI GdipGetLineTransform(GpLineGradient *brush, GpMatrix *matrix)
1807 {
1808     static int calls;
1809
1810     TRACE("(%p,%p)\n", brush, matrix);
1811
1812     if(!(calls++))
1813         FIXME("not implemented\n");
1814
1815     return NotImplemented;
1816 }
1817
1818 GpStatus WINGDIPAPI GdipScaleLineTransform(GpLineGradient *brush, REAL sx, REAL sy,
1819     GpMatrixOrder order)
1820 {
1821     static int calls;
1822
1823     TRACE("(%p,%0.2f,%0.2f,%u)\n", brush, sx, sy, order);
1824
1825     if(!(calls++))
1826         FIXME("not implemented\n");
1827
1828     return NotImplemented;
1829 }
1830
1831 GpStatus WINGDIPAPI GdipMultiplyLineTransform(GpLineGradient *brush,
1832     GDIPCONST GpMatrix *matrix, GpMatrixOrder order)
1833 {
1834     static int calls;
1835
1836     TRACE("(%p,%p,%u)\n", brush, matrix, order);
1837
1838     if(!(calls++))
1839         FIXME("not implemented\n");
1840
1841     return NotImplemented;
1842 }
1843
1844 GpStatus WINGDIPAPI GdipTranslateLineTransform(GpLineGradient* brush,
1845         REAL dx, REAL dy, GpMatrixOrder order)
1846 {
1847     FIXME("stub: %p %f %f %d\n", brush, dx, dy, order);
1848
1849     return NotImplemented;
1850 }
1851
1852 /******************************************************************************
1853  * GdipTranslateTextureTransform [GDIPLUS.@]
1854  */
1855 GpStatus WINGDIPAPI GdipTranslateTextureTransform(GpTexture* brush, REAL dx, REAL dy,
1856     GpMatrixOrder order)
1857 {
1858     TRACE("(%p, %.2f, %.2f, %d)\n", brush, dx, dy, order);
1859
1860     if(!brush)
1861         return InvalidParameter;
1862
1863     return GdipTranslateMatrix(brush->transform, dx, dy, order);
1864 }
1865
1866 GpStatus WINGDIPAPI GdipGetLineRect(GpLineGradient *brush, GpRectF *rect)
1867 {
1868     TRACE("(%p, %p)\n", brush, rect);
1869
1870     if(!brush || !rect)
1871         return InvalidParameter;
1872
1873     *rect = brush->rect;
1874
1875     return Ok;
1876 }
1877
1878 GpStatus WINGDIPAPI GdipGetLineRectI(GpLineGradient *brush, GpRect *rect)
1879 {
1880     GpRectF  rectF;
1881     GpStatus ret;
1882
1883     TRACE("(%p, %p)\n", brush, rect);
1884
1885     if(!rect)
1886         return InvalidParameter;
1887
1888     ret = GdipGetLineRect(brush, &rectF);
1889
1890     if(ret == Ok){
1891         rect->X      = roundr(rectF.X);
1892         rect->Y      = roundr(rectF.Y);
1893         rect->Width  = roundr(rectF.Width);
1894         rect->Height = roundr(rectF.Height);
1895     }
1896
1897     return ret;
1898 }
1899
1900 GpStatus WINGDIPAPI GdipRotateLineTransform(GpLineGradient* brush,
1901     REAL angle, GpMatrixOrder order)
1902 {
1903     static int calls;
1904
1905     TRACE("(%p,%0.2f,%u)\n", brush, angle, order);
1906
1907     if(!brush)
1908         return InvalidParameter;
1909
1910     if(!(calls++))
1911         FIXME("(%p, %.2f, %d) stub\n", brush, angle, order);
1912
1913     return NotImplemented;
1914 }