dlls/gdi/pen.c

   1 /*
   2  * GDI pen objects
   3  *
   4  * Copyright 1993 Alexandre Julliard
   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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19  */
  20
  21 #include "config.h"
  22
  23 #include <stdarg.h>
  24 #include <stdlib.h>
  25 #include <string.h>
  26
  27 #include "windef.h"
  28 #include "winbase.h"
  29 #include "wingdi.h"
  30 #include "wine/wingdi16.h"
  31 #include "gdi.h"
  32 #include "gdi_private.h"
  33 #include "wine/debug.h"
  34
  35 WINE_DEFAULT_DEBUG_CHANNEL(gdi);
  36
  37   /* GDI logical pen object */
  38 typedef struct
  39 {
  40     GDIOBJHDR   header;
  41     LOGPEN    logpen;
  42 } PENOBJ;
  43
  44
  45 static HGDIOBJ PEN_SelectObject( HGDIOBJ handle, void *obj, HDC hdc );
  46 static INT PEN_GetObject16( HGDIOBJ handle, void *obj, INT count, LPVOID buffer );
  47 static INT PEN_GetObject( HGDIOBJ handle, void *obj, INT count, LPVOID buffer );
  48
  49 static const struct gdi_obj_funcs pen_funcs =
  50 {
  51     PEN_SelectObject,  /* pSelectObject */
  52     PEN_GetObject16,   /* pGetObject16 */
  53     PEN_GetObject,     /* pGetObjectA */
  54     PEN_GetObject,     /* pGetObjectW */
  55     NULL,              /* pUnrealizeObject */
  56     GDI_FreeObject     /* pDeleteObject */
  57 };
  58
  59
  60 /***********************************************************************
  61  *           CreatePen    (GDI32.@)
  62  */
  63 HPEN WINAPI CreatePen( INT style, INT width, COLORREF color )
  64 {
  65     LOGPEN logpen;
  66
  67     TRACE("%d %d %06lx\n", style, width, color );
  68
  69     logpen.lopnStyle = style;
  70     logpen.lopnWidth.x = width;
  71     logpen.lopnWidth.y = 0;
  72     logpen.lopnColor = color;
  73
  74     return CreatePenIndirect( &logpen );
  75 }
  76
  77
  78 /***********************************************************************
  79  *           CreatePenIndirect    (GDI32.@)
  80  */
  81 HPEN WINAPI CreatePenIndirect( const LOGPEN * pen )
  82 {
  83     PENOBJ * penPtr;
  84     HPEN hpen;
  85
  86     if (!(penPtr = GDI_AllocObject( sizeof(PENOBJ), PEN_MAGIC, (HGDIOBJ *)&hpen,
  87                                     &pen_funcs ))) return 0;
  88     if (pen->lopnStyle == PS_USERSTYLE || pen->lopnStyle == PS_ALTERNATE)
  89         penPtr->logpen.lopnStyle = PS_SOLID;
  90     else
  91         penPtr->logpen.lopnStyle = pen->lopnStyle;
  92     penPtr->logpen.lopnWidth.y = 0;
  93     if (pen->lopnStyle == PS_NULL)
  94     {
  95         penPtr->logpen.lopnWidth.x = 1;
  96         penPtr->logpen.lopnColor = RGB(0, 0, 0);
  97     }
  98     else
  99     {
 100         penPtr->logpen.lopnWidth.x = abs(pen->lopnWidth.x);
 101         penPtr->logpen.lopnColor = pen->lopnColor;
 102     }
 103     GDI_ReleaseObj( hpen );
 104     return hpen;
 105 }
 106
 107 /***********************************************************************
 108  *           ExtCreatePen    (GDI32.@)
 109  *
 110  * FIXME: PS_USERSTYLE not handled
 111  */
 112
 113 HPEN WINAPI ExtCreatePen( DWORD style, DWORD width,
 114                               const LOGBRUSH * brush, DWORD style_count,
 115                               const DWORD *style_bits )
 116 {
 117     PENOBJ * penPtr;
 118     HPEN hpen;
 119
 120     if ((style & PS_STYLE_MASK) == PS_USERSTYLE)
 121         FIXME("PS_USERSTYLE not handled\n");
 122     if ((style & PS_TYPE_MASK) == PS_GEOMETRIC)
 123         if (brush->lbHatch && ((brush->lbStyle == BS_SOLID) || (brush->lbStyle == BS_HOLLOW)))
 124             FIXME("Hatches not implemented\n");
 125
 126     if (!(penPtr = GDI_AllocObject( sizeof(PENOBJ), PEN_MAGIC, (HGDIOBJ *)&hpen,
 127                                     &pen_funcs ))) return 0;
 128     penPtr->logpen.lopnStyle = style & ~PS_TYPE_MASK;
 129
 130     /* PS_USERSTYLE workaround */
 131     if((penPtr->logpen.lopnStyle & PS_STYLE_MASK) == PS_USERSTYLE)
 132        penPtr->logpen.lopnStyle =
 133          (penPtr->logpen.lopnStyle & ~PS_STYLE_MASK) | PS_SOLID;
 134
 135     penPtr->logpen.lopnWidth.x = (style & PS_GEOMETRIC) ? width : 1;
 136     penPtr->logpen.lopnWidth.y = 0;
 137     penPtr->logpen.lopnColor = brush->lbColor;
 138     GDI_ReleaseObj( hpen );
 139
 140     return hpen;
 141 }
 142
 143
 144 /***********************************************************************
 145  *           PEN_SelectObject
 146  */
 147 static HGDIOBJ PEN_SelectObject( HGDIOBJ handle, void *obj, HDC hdc )
 148 {
 149     HGDIOBJ ret;
 150     DC *dc = DC_GetDCPtr( hdc );
 151
 152     if (!dc) return 0;
 153     ret = dc->hPen;
 154     if (dc->funcs->pSelectPen) handle = dc->funcs->pSelectPen( dc->physDev, handle );
 155     if (handle) dc->hPen = handle;
 156     else ret = 0;
 157     GDI_ReleaseObj( hdc );
 158     return ret;
 159 }
 160
 161
 162 /***********************************************************************
 163  *           PEN_GetObject16
 164  */
 165 static INT PEN_GetObject16( HGDIOBJ handle, void *obj, INT count, LPVOID buffer )
 166 {
 167     PENOBJ *pen = obj;
 168     LOGPEN16 logpen;
 169
 170     logpen.lopnStyle = pen->logpen.lopnStyle;
 171     logpen.lopnColor = pen->logpen.lopnColor;
 172     logpen.lopnWidth.x = pen->logpen.lopnWidth.x;
 173     logpen.lopnWidth.y = pen->logpen.lopnWidth.y;
 174     if (count > sizeof(logpen)) count = sizeof(logpen);
 175     memcpy( buffer, &logpen, count );
 176     return count;
 177 }
 178
 179
 180 /***********************************************************************
 181  *           PEN_GetObject
 182  */
 183 static INT PEN_GetObject( HGDIOBJ handle, void *obj, INT count, LPVOID buffer )
 184 {
 185     PENOBJ *pen = obj;
 186
 187     if( !buffer )
 188         return sizeof(pen->logpen);
 189
 190     switch (count)
 191     {
 192     case sizeof(EXTLOGPEN):
 193         FIXME("extended pens not supported\n");
 194         return 0;
 195
 196     case sizeof(LOGPEN):
 197         memcpy( buffer, &pen->logpen, sizeof(LOGPEN) );
 198         return sizeof(LOGPEN);
 199
 200     default:
 201         break;
 202     }
 203     return 0;
 204 }