2 * PostScript pen handling
4 * Copyright 1998 Huw D M Davies
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
22 #include "wine/debug.h"
24 WINE_DEFAULT_DEBUG_CHANNEL(psdrv);
26 static char PEN_dash[] = "50 30"; /* ----- ----- ----- */
27 static char PEN_dot[] = "20"; /* -- -- -- -- -- -- */
28 static char PEN_dashdot[] = "40 30 20 30"; /* ---- -- ---- -- */
29 static char PEN_dashdotdot[] = "40 20 20 20 20 20"; /* ---- -- -- ---- */
30 static char PEN_alternate[] = "1";
32 /***********************************************************************
33 * PSDRV_PEN_SelectObject
35 HPEN PSDRV_PEN_SelectObject( DC * dc, HPEN hpen )
38 HPEN prevpen = dc->hPen;
39 PSDRV_PDEVICE *physDev = (PSDRV_PDEVICE *)dc->physDev;
41 if (!GetObjectA( hpen, sizeof(logpen), &logpen )) return 0;
43 TRACE("hpen = %08x colour = %08lx\n", hpen, logpen.lopnColor);
47 physDev->pen.width = INTERNAL_XWSTODS(dc, logpen.lopnWidth.x);
48 if(physDev->pen.width < 0)
49 physDev->pen.width = -physDev->pen.width;
51 PSDRV_CreateColor(physDev, &physDev->pen.color, logpen.lopnColor);
52 physDev->pen.style = logpen.lopnStyle & PS_STYLE_MASK;
54 switch(physDev->pen.style) {
56 physDev->pen.dash = PEN_dash;
60 physDev->pen.dash = PEN_dot;
64 physDev->pen.dash = PEN_dashdot;
68 physDev->pen.dash = PEN_dashdotdot;
72 physDev->pen.dash = PEN_alternate;
76 physDev->pen.dash = NULL;
79 if ((physDev->pen.width > 1) && (physDev->pen.dash != NULL)) {
80 physDev->pen.style = PS_SOLID;
81 physDev->pen.dash = NULL;
84 physDev->pen.set = FALSE;
89 /**********************************************************************
94 BOOL PSDRV_SetPen(DC *dc)
96 PSDRV_PDEVICE *physDev = (PSDRV_PDEVICE *)dc->physDev;
98 if (physDev->pen.style != PS_NULL) {
99 PSDRV_WriteSetColor(dc, &physDev->pen.color);
101 if(!physDev->pen.set) {
102 PSDRV_WriteSetPen(dc);
103 physDev->pen.set = TRUE;