Fixed crash in winamp reported by Andreas Mohr.
[wine] / dlls / wineps / pen.c
1 /*
2  *      PostScript pen handling
3  *
4  *      Copyright 1998  Huw D M 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19  */
20
21 #include "gdi.h"
22 #include "psdrv.h"
23 #include "wine/debug.h"
24
25 WINE_DEFAULT_DEBUG_CHANNEL(psdrv);
26
27 static char PEN_dash[]       = "50 30";     /* -----   -----   -----  */
28 static char PEN_dot[]        = "20";      /* --  --  --  --  --  -- */
29 static char PEN_dashdot[]    = "40 30 20 30";  /* ----   --   ----   --  */
30 static char PEN_dashdotdot[] = "40 20 20 20 20 20"; /* ----  --  --  ----  */
31 static char PEN_alternate[]  = "1";
32
33 /***********************************************************************
34  *           SelectPen   (WINEPS.@)
35  */
36 HPEN PSDRV_SelectPen( PSDRV_PDEVICE *physDev, HPEN hpen )
37 {
38     LOGPEN logpen;
39
40     if (!GetObjectA( hpen, sizeof(logpen), &logpen )) return 0;
41
42     TRACE("hpen = %p colour = %08lx\n", hpen, logpen.lopnColor);
43
44     physDev->pen.width = INTERNAL_XWSTODS(physDev->dc, logpen.lopnWidth.x);
45     if(physDev->pen.width < 0)
46         physDev->pen.width = -physDev->pen.width;
47
48     PSDRV_CreateColor(physDev, &physDev->pen.color, logpen.lopnColor);
49     physDev->pen.style = logpen.lopnStyle & PS_STYLE_MASK;
50
51     switch(physDev->pen.style) {
52     case PS_DASH:
53         physDev->pen.dash = PEN_dash;
54         break;
55
56     case PS_DOT:
57         physDev->pen.dash = PEN_dot;
58         break;
59
60     case PS_DASHDOT:
61         physDev->pen.dash = PEN_dashdot;
62         break;
63
64     case PS_DASHDOTDOT:
65         physDev->pen.dash = PEN_dashdotdot;
66         break;
67
68     case PS_ALTERNATE:
69         physDev->pen.dash = PEN_alternate;
70         break;
71
72     default:
73         physDev->pen.dash = NULL;
74     }
75
76     if ((physDev->pen.width > 1) && (physDev->pen.dash != NULL)) {
77         physDev->pen.style = PS_SOLID;
78          physDev->pen.dash = NULL;
79     }
80
81     physDev->pen.set = FALSE;
82     return hpen;
83 }
84
85
86 /**********************************************************************
87  *
88  *      PSDRV_SetPen
89  *
90  */
91 BOOL PSDRV_SetPen(PSDRV_PDEVICE *physDev)
92 {
93     if (physDev->pen.style != PS_NULL) {
94         PSDRV_WriteSetColor(physDev, &physDev->pen.color);
95
96         if(!physDev->pen.set) {
97             PSDRV_WriteSetPen(physDev);
98             physDev->pen.set = TRUE;
99         }
100     }
101
102     return TRUE;
103 }