4 * Copyright 1993 Alexandre Julliard
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.
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.
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
27 #include "wine/wingdi16.h"
29 #include "wine/debug.h"
31 WINE_DEFAULT_DEBUG_CHANNEL(gdi
);
33 /* GDI logical pen object */
41 static HGDIOBJ
PEN_SelectObject( HGDIOBJ handle
, void *obj
, HDC hdc
);
42 static INT
PEN_GetObject16( HGDIOBJ handle
, void *obj
, INT count
, LPVOID buffer
);
43 static INT
PEN_GetObject( HGDIOBJ handle
, void *obj
, INT count
, LPVOID buffer
);
45 static const struct gdi_obj_funcs pen_funcs
=
47 PEN_SelectObject
, /* pSelectObject */
48 PEN_GetObject16
, /* pGetObject16 */
49 PEN_GetObject
, /* pGetObjectA */
50 PEN_GetObject
, /* pGetObjectW */
51 NULL
, /* pUnrealizeObject */
52 GDI_FreeObject
/* pDeleteObject */
55 /***********************************************************************
58 HPEN16 WINAPI
CreatePen16( INT16 style
, INT16 width
, COLORREF color
)
62 TRACE("%d %d %06lx\n", style
, width
, color
);
64 logpen
.lopnStyle
= style
;
65 logpen
.lopnWidth
.x
= width
;
66 logpen
.lopnWidth
.y
= 0;
67 logpen
.lopnColor
= color
;
69 return CreatePenIndirect( &logpen
);
73 /***********************************************************************
76 HPEN WINAPI
CreatePen( INT style
, INT width
, COLORREF color
)
80 TRACE("%d %d %06lx\n", style
, width
, color
);
82 logpen
.lopnStyle
= style
;
83 logpen
.lopnWidth
.x
= width
;
84 logpen
.lopnWidth
.y
= 0;
85 logpen
.lopnColor
= color
;
87 return CreatePenIndirect( &logpen
);
91 /***********************************************************************
92 * CreatePenIndirect (GDI.62)
94 HPEN16 WINAPI
CreatePenIndirect16( const LOGPEN16
* pen
)
99 if (pen
->lopnStyle
> PS_INSIDEFRAME
) return 0;
100 if (!(penPtr
= GDI_AllocObject( sizeof(PENOBJ
), PEN_MAGIC
, &hpen
, &pen_funcs
))) return 0;
101 penPtr
->logpen
.lopnStyle
= pen
->lopnStyle
;
102 penPtr
->logpen
.lopnColor
= pen
->lopnColor
;
103 CONV_POINT16TO32( &pen
->lopnWidth
, &penPtr
->logpen
.lopnWidth
);
104 GDI_ReleaseObj( hpen
);
109 /***********************************************************************
110 * CreatePenIndirect (GDI32.@)
112 HPEN WINAPI
CreatePenIndirect( const LOGPEN
* pen
)
117 if (!(penPtr
= GDI_AllocObject( sizeof(PENOBJ
), PEN_MAGIC
, &hpen
, &pen_funcs
))) return 0;
118 penPtr
->logpen
.lopnStyle
= pen
->lopnStyle
;
119 penPtr
->logpen
.lopnWidth
= pen
->lopnWidth
;
120 penPtr
->logpen
.lopnColor
= pen
->lopnColor
;
121 GDI_ReleaseObj( hpen
);
125 /***********************************************************************
126 * ExtCreatePen (GDI32.@)
128 * FIXME: PS_USERSTYLE not handled
131 HPEN WINAPI
ExtCreatePen( DWORD style
, DWORD width
,
132 const LOGBRUSH
* brush
, DWORD style_count
,
133 const DWORD
*style_bits
)
138 if ((style
& PS_STYLE_MASK
) == PS_USERSTYLE
)
139 FIXME("PS_USERSTYLE not handled\n");
140 if ((style
& PS_TYPE_MASK
) == PS_GEOMETRIC
)
142 FIXME("Hatches not implemented\n");
144 if (!(penPtr
= GDI_AllocObject( sizeof(PENOBJ
), PEN_MAGIC
, &hpen
, &pen_funcs
))) return 0;
145 penPtr
->logpen
.lopnStyle
= style
& ~PS_TYPE_MASK
;
147 /* PS_USERSTYLE workaround */
148 if((penPtr
->logpen
.lopnStyle
& PS_STYLE_MASK
) == PS_USERSTYLE
)
149 penPtr
->logpen
.lopnStyle
=
150 (penPtr
->logpen
.lopnStyle
& ~PS_STYLE_MASK
) | PS_SOLID
;
152 penPtr
->logpen
.lopnWidth
.x
= (style
& PS_GEOMETRIC
) ? width
: 1;
153 penPtr
->logpen
.lopnWidth
.y
= 0;
154 penPtr
->logpen
.lopnColor
= brush
->lbColor
;
155 GDI_ReleaseObj( hpen
);
161 /***********************************************************************
164 static HGDIOBJ
PEN_SelectObject( HGDIOBJ handle
, void *obj
, HDC hdc
)
167 DC
*dc
= DC_GetDCPtr( hdc
);
171 if (dc
->funcs
->pSelectPen
) handle
= dc
->funcs
->pSelectPen( dc
->physDev
, handle
);
172 if (handle
) dc
->hPen
= handle
;
174 GDI_ReleaseObj( hdc
);
179 /***********************************************************************
182 static INT
PEN_GetObject16( HGDIOBJ handle
, void *obj
, INT count
, LPVOID buffer
)
187 logpen
.lopnStyle
= pen
->logpen
.lopnStyle
;
188 logpen
.lopnColor
= pen
->logpen
.lopnColor
;
189 CONV_POINT32TO16( &pen
->logpen
.lopnWidth
, &logpen
.lopnWidth
);
190 if (count
> sizeof(logpen
)) count
= sizeof(logpen
);
191 memcpy( buffer
, &logpen
, count
);
196 /***********************************************************************
199 static INT
PEN_GetObject( HGDIOBJ handle
, void *obj
, INT count
, LPVOID buffer
)
203 if (count
> sizeof(pen
->logpen
)) count
= sizeof(pen
->logpen
);
204 memcpy( buffer
, &pen
->logpen
, count
);