git.oblomov.eu Git - wine/blob - dlls/wineps/graphics.c

   1 /*
   2  *      PostScript driver graphics functions
   3  *
   4  *      Copyright 1998  Huw D M Davies
   5  *
   6  */
   7
   8 #include "config.h"
   9
  10 #include <string.h>
  11 #include <math.h>
  12 #if defined(HAVE_FLOAT_H)
  13  #include <float.h>
  14 #endif
  15 #if !defined(PI)
  16  #define PI M_PI
  17 #endif
  18 #include "psdrv.h"
  19 #include "debugtools.h"
  20 #include "winspool.h"
  21
  22 DEFAULT_DEBUG_CHANNEL(psdrv);
  23
  24
  25 /***********************************************************************
  26  *           PSDRV_LineTo
  27  */
  28 BOOL PSDRV_LineTo(DC *dc, INT x, INT y)
  29 {
  30     TRACE("%d %d\n", x, y);
  31
  32     PSDRV_SetPen(dc);
  33     PSDRV_WriteMoveTo(dc, INTERNAL_XWPTODP(dc, dc->CursPosX, dc->CursPosY),
  34                           INTERNAL_YWPTODP(dc, dc->CursPosX, dc->CursPosY));
  35     PSDRV_WriteLineTo(dc, INTERNAL_XWPTODP(dc, x, y),
  36                           INTERNAL_YWPTODP(dc, x, y));
  37     PSDRV_DrawLine(dc);
  38
  39     return TRUE;
  40 }
  41
  42
  43 /***********************************************************************
  44  *           PSDRV_Rectangle
  45  */
  46 BOOL PSDRV_Rectangle( DC *dc, INT left, INT top, INT right,
  47                        INT bottom )
  48 {
  49     INT width;
  50     INT height;
  51
  52     TRACE("%d %d - %d %d\n", left, top, right, bottom);
  53     width = INTERNAL_XWSTODS(dc, right - left);
  54     height = INTERNAL_YWSTODS(dc, bottom - top);
  55     PSDRV_WriteRectangle(dc, INTERNAL_XWPTODP(dc, left, top),
  56                              INTERNAL_YWPTODP(dc, left, top),
  57                              width, height);
  58     PSDRV_Brush(dc,0);
  59     PSDRV_SetPen(dc);
  60     PSDRV_DrawLine(dc);
  61     return TRUE;
  62 }
  63
  64
  65 /***********************************************************************
  66  *           PSDRV_RoundRect
  67  */
  68 BOOL PSDRV_RoundRect( DC *dc, INT left, INT top, INT right,
  69                         INT bottom, INT ell_width, INT ell_height )
  70 {
  71     left = XLPTODP( dc, left );
  72     right = XLPTODP( dc, right );
  73     top = YLPTODP( dc, top );
  74     bottom = YLPTODP( dc, bottom );
  75     ell_width = XLSTODS( dc, ell_width );
  76     ell_height = YLSTODS( dc, ell_height );
  77
  78     if( left > right ) { INT tmp = left; left = right; right = tmp; }
  79     if( top > bottom ) { INT tmp = top; top = bottom; bottom = tmp; }
  80
  81     if(ell_width > right - left) ell_width = right - left;
  82     if(ell_height > bottom - top) ell_height = bottom - top;
  83
  84     PSDRV_WriteMoveTo( dc, left, top + ell_height/2 );
  85     PSDRV_WriteArc( dc, left + ell_width/2, top + ell_height/2, ell_width,
  86                     ell_height, 90.0, 180.0);
  87     PSDRV_WriteLineTo( dc, right - ell_width/2, top );
  88     PSDRV_WriteArc( dc, right - ell_width/2, top + ell_height/2, ell_width,
  89                     ell_height, 0.0, 90.0);
  90     PSDRV_WriteLineTo( dc, right, bottom - ell_height/2 );
  91     PSDRV_WriteArc( dc, right - ell_width/2, bottom - ell_height/2, ell_width,
  92                     ell_height, -90.0, 0.0);
  93     PSDRV_WriteLineTo( dc, right - ell_width/2, bottom);
  94     PSDRV_WriteArc( dc, left + ell_width/2, bottom - ell_height/2, ell_width,
  95                     ell_height, 180.0, -90.0);
  96     PSDRV_WriteClosePath( dc );
  97
  98     PSDRV_Brush(dc,0);
  99     PSDRV_SetPen(dc);
 100     PSDRV_DrawLine(dc);
 101     return TRUE;
 102 }
 103
 104 /***********************************************************************
 105  *           PSDRV_DrawArc
 106  *
 107  * Does the work of Arc, Chord and Pie. lines is 0, 1 or 2 respectively.
 108  */
 109 static BOOL PSDRV_DrawArc( DC *dc, INT left, INT top,
 110                              INT right, INT bottom,
 111                              INT xstart, INT ystart,
 112                              INT xend, INT yend,
 113                              int lines )
 114 {
 115     INT x, y, h, w;
 116     double start_angle, end_angle, ratio;
 117
 118     x = XLPTODP(dc, (left + right)/2);
 119     y = YLPTODP(dc, (top + bottom)/2);
 120
 121     w = XLSTODS(dc, (right - left));
 122     h = YLSTODS(dc, (bottom - top));
 123
 124     if(w < 0) w = -w;
 125     if(h < 0) h = -h;
 126     ratio = ((double)w)/h;
 127
 128     /* angle is the angle after the rectangle is transformed to a square and is
 129        measured anticlockwise from the +ve x-axis */
 130
 131     start_angle = atan2((double)(y - ystart) * ratio, (double)(xstart - x));
 132     end_angle = atan2((double)(y - yend) * ratio, (double)(xend - x));
 133
 134     start_angle *= 180.0 / PI;
 135     end_angle *= 180.0 / PI;
 136
 137     if(lines == 2) /* pie */
 138         PSDRV_WriteMoveTo(dc, x, y);
 139     else
 140         PSDRV_WriteNewPath( dc );
 141
 142     PSDRV_WriteArc(dc, x, y, w, h, start_angle, end_angle);
 143     if(lines == 1 || lines == 2) { /* chord or pie */
 144         PSDRV_WriteClosePath(dc);
 145         PSDRV_Brush(dc,0);
 146     }
 147     PSDRV_SetPen(dc);
 148     PSDRV_DrawLine(dc);
 149     return TRUE;
 150 }
 151
 152
 153 /***********************************************************************
 154  *           PSDRV_Arc
 155  */
 156 BOOL PSDRV_Arc( DC *dc, INT left, INT top, INT right, INT bottom,
 157                   INT xstart, INT ystart, INT xend, INT yend )
 158 {
 159     return PSDRV_DrawArc( dc, left, top, right, bottom, xstart, ystart,
 160                          xend, yend, 0 );
 161 }
 162
 163 /***********************************************************************
 164  *           PSDRV_Chord
 165  */
 166 BOOL PSDRV_Chord( DC *dc, INT left, INT top, INT right, INT bottom,
 167                   INT xstart, INT ystart, INT xend, INT yend )
 168 {
 169     return PSDRV_DrawArc( dc, left, top, right, bottom, xstart, ystart,
 170                          xend, yend, 1 );
 171 }
 172
 173
 174 /***********************************************************************
 175  *           PSDRV_Pie
 176  */
 177 BOOL PSDRV_Pie( DC *dc, INT left, INT top, INT right, INT bottom,
 178                   INT xstart, INT ystart, INT xend, INT yend )
 179 {
 180     return PSDRV_DrawArc( dc, left, top, right, bottom, xstart, ystart,
 181                          xend, yend, 2 );
 182 }
 183
 184
 185 /***********************************************************************
 186  *           PSDRV_Ellipse
 187  */
 188 BOOL PSDRV_Ellipse( DC *dc, INT left, INT top, INT right, INT bottom)
 189 {
 190     INT x, y, w, h;
 191
 192     TRACE("%d %d - %d %d\n", left, top, right, bottom);
 193
 194     x = XLPTODP(dc, (left + right)/2);
 195     y = YLPTODP(dc, (top + bottom)/2);
 196
 197     w = XLSTODS(dc, (right - left));
 198     h = YLSTODS(dc, (bottom - top));
 199
 200     PSDRV_WriteNewPath(dc);
 201     PSDRV_WriteArc(dc, x, y, w, h, 0.0, 360.0);
 202     PSDRV_WriteClosePath(dc);
 203     PSDRV_Brush(dc,0);
 204     PSDRV_SetPen(dc);
 205     PSDRV_DrawLine(dc);
 206     return TRUE;
 207 }
 208
 209
 210 /***********************************************************************
 211  *           PSDRV_PolyPolyline
 212  */
 213 BOOL PSDRV_PolyPolyline( DC *dc, const POINT* pts, const DWORD* counts,
 214                            DWORD polylines )
 215 {
 216     DWORD polyline, line;
 217     const POINT* pt;
 218     TRACE("\n");
 219
 220     pt = pts;
 221     for(polyline = 0; polyline < polylines; polyline++) {
 222         PSDRV_WriteMoveTo(dc, INTERNAL_XWPTODP(dc, pt->x, pt->y), INTERNAL_YWPTODP(dc, pt->x, pt->y));
 223         pt++;
 224         for(line = 1; line < counts[polyline]; line++) {
 225             PSDRV_WriteLineTo(dc, INTERNAL_XWPTODP(dc, pt->x, pt->y), INTERNAL_YWPTODP(dc, pt->x, pt->y));
 226             pt++;
 227         }
 228     }
 229     PSDRV_SetPen(dc);
 230     PSDRV_DrawLine(dc);
 231     return TRUE;
 232 }
 233
 234
 235 /***********************************************************************
 236  *           PSDRV_Polyline
 237  */
 238 BOOL PSDRV_Polyline( DC *dc, const POINT* pt, INT count )
 239 {
 240     return PSDRV_PolyPolyline( dc, pt, (LPDWORD) &count, 1 );
 241 }
 242
 243
 244 /***********************************************************************
 245  *           PSDRV_PolyPolygon
 246  */
 247 BOOL PSDRV_PolyPolygon( DC *dc, const POINT* pts, const INT* counts,
 248                           UINT polygons )
 249 {
 250     DWORD polygon, line;
 251     const POINT* pt;
 252     TRACE("\n");
 253
 254     pt = pts;
 255     for(polygon = 0; polygon < polygons; polygon++) {
 256         PSDRV_WriteMoveTo(dc, INTERNAL_XWPTODP(dc, pt->x, pt->y), INTERNAL_YWPTODP(dc, pt->x, pt->y));
 257         pt++;
 258         for(line = 1; line < counts[polygon]; line++) {
 259             PSDRV_WriteLineTo(dc, INTERNAL_XWPTODP(dc, pt->x, pt->y), INTERNAL_YWPTODP(dc, pt->x, pt->y));
 260             pt++;
 261         }
 262         PSDRV_WriteClosePath(dc);
 263     }
 264
 265     if(dc->polyFillMode == ALTERNATE)
 266         PSDRV_Brush(dc, 1);
 267     else /* WINDING */
 268         PSDRV_Brush(dc, 0);
 269     PSDRV_SetPen(dc);
 270     PSDRV_DrawLine(dc);
 271     return TRUE;
 272 }
 273
 274
 275 /***********************************************************************
 276  *           PSDRV_Polygon
 277  */
 278 BOOL PSDRV_Polygon( DC *dc, const POINT* pt, INT count )
 279 {
 280      return PSDRV_PolyPolygon( dc, pt, &count, 1 );
 281 }
 282
 283
 284 /***********************************************************************
 285  *           PSDRV_SetPixel
 286  */
 287 COLORREF PSDRV_SetPixel( DC *dc, INT x, INT y, COLORREF color )
 288 {
 289     PSDRV_PDEVICE *physDev = (PSDRV_PDEVICE *)dc->physDev;
 290     PSCOLOR pscolor;
 291
 292     x = INTERNAL_XWPTODP(dc, x, y);
 293     y = INTERNAL_YWPTODP(dc, x, y);
 294
 295     PSDRV_WriteRectangle( dc, x, y, 0, 0 );
 296     PSDRV_CreateColor( physDev, &pscolor, color );
 297     PSDRV_WriteSetColor( dc, &pscolor );
 298     PSDRV_WriteFill( dc );
 299     return color;
 300 }
 301
 302
 303 /***********************************************************************
 304  *           PSDRV_DrawLine
 305  */
 306 VOID PSDRV_DrawLine( DC *dc )
 307 {
 308     PSDRV_PDEVICE *physDev = (PSDRV_PDEVICE *)dc->physDev;
 309
 310     if (physDev->pen.style == PS_NULL)
 311         PSDRV_WriteNewPath(dc);
 312     else
 313         PSDRV_WriteStroke(dc);
 314 }