313 lines
8.3 KiB
C
313 lines
8.3 KiB
C
/*
|
|
* PostScript driver graphics functions
|
|
*
|
|
* Copyright 1998 Huw D M Davies
|
|
*
|
|
*/
|
|
#include <string.h>
|
|
#include <math.h>
|
|
#include "config.h"
|
|
#if defined(HAVE_FLOAT_H)
|
|
#include <float.h>
|
|
#endif
|
|
#if !defined(PI)
|
|
#define PI M_PI
|
|
#endif
|
|
#include "psdrv.h"
|
|
#include "debugtools.h"
|
|
#include "winspool.h"
|
|
|
|
DEFAULT_DEBUG_CHANNEL(psdrv);
|
|
|
|
|
|
/***********************************************************************
|
|
* PSDRV_LineTo
|
|
*/
|
|
BOOL PSDRV_LineTo(DC *dc, INT x, INT y)
|
|
{
|
|
TRACE("%d %d\n", x, y);
|
|
|
|
PSDRV_SetPen(dc);
|
|
PSDRV_WriteMoveTo(dc, INTERNAL_XWPTODP(dc, dc->CursPosX, dc->CursPosY),
|
|
INTERNAL_YWPTODP(dc, dc->CursPosX, dc->CursPosY));
|
|
PSDRV_WriteLineTo(dc, INTERNAL_XWPTODP(dc, x, y),
|
|
INTERNAL_YWPTODP(dc, x, y));
|
|
PSDRV_DrawLine(dc);
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* PSDRV_Rectangle
|
|
*/
|
|
BOOL PSDRV_Rectangle( DC *dc, INT left, INT top, INT right,
|
|
INT bottom )
|
|
{
|
|
INT width;
|
|
INT height;
|
|
|
|
TRACE("%d %d - %d %d\n", left, top, right, bottom);
|
|
width = INTERNAL_XWSTODS(dc, right - left);
|
|
height = INTERNAL_YWSTODS(dc, bottom - top);
|
|
PSDRV_WriteRectangle(dc, INTERNAL_XWPTODP(dc, left, top),
|
|
INTERNAL_YWPTODP(dc, left, top),
|
|
width, height);
|
|
PSDRV_Brush(dc,0);
|
|
PSDRV_SetPen(dc);
|
|
PSDRV_DrawLine(dc);
|
|
return TRUE;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* PSDRV_RoundRect
|
|
*/
|
|
BOOL PSDRV_RoundRect( DC *dc, INT left, INT top, INT right,
|
|
INT bottom, INT ell_width, INT ell_height )
|
|
{
|
|
left = XLPTODP( dc, left );
|
|
right = XLPTODP( dc, right );
|
|
top = YLPTODP( dc, top );
|
|
bottom = YLPTODP( dc, bottom );
|
|
ell_width = XLSTODS( dc, ell_width );
|
|
ell_height = YLSTODS( dc, ell_height );
|
|
|
|
if( left > right ) { INT tmp = left; left = right; right = tmp; }
|
|
if( top > bottom ) { INT tmp = top; top = bottom; bottom = tmp; }
|
|
|
|
if(ell_width > right - left) ell_width = right - left;
|
|
if(ell_height > bottom - top) ell_height = bottom - top;
|
|
|
|
PSDRV_WriteMoveTo( dc, left, top + ell_height/2 );
|
|
PSDRV_WriteArc( dc, left + ell_width/2, top + ell_height/2, ell_width,
|
|
ell_height, 90.0, 180.0);
|
|
PSDRV_WriteLineTo( dc, right - ell_width/2, top );
|
|
PSDRV_WriteArc( dc, right - ell_width/2, top + ell_height/2, ell_width,
|
|
ell_height, 0.0, 90.0);
|
|
PSDRV_WriteLineTo( dc, right, bottom - ell_height/2 );
|
|
PSDRV_WriteArc( dc, right - ell_width/2, bottom - ell_height/2, ell_width,
|
|
ell_height, -90.0, 0.0);
|
|
PSDRV_WriteLineTo( dc, right - ell_width/2, bottom);
|
|
PSDRV_WriteArc( dc, left + ell_width/2, bottom - ell_height/2, ell_width,
|
|
ell_height, 180.0, -90.0);
|
|
PSDRV_WriteClosePath( dc );
|
|
|
|
PSDRV_Brush(dc,0);
|
|
PSDRV_SetPen(dc);
|
|
PSDRV_DrawLine(dc);
|
|
return TRUE;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* PSDRV_DrawArc
|
|
*
|
|
* Does the work of Arc, Chord and Pie. lines is 0, 1 or 2 respectively.
|
|
*/
|
|
static BOOL PSDRV_DrawArc( DC *dc, INT left, INT top,
|
|
INT right, INT bottom,
|
|
INT xstart, INT ystart,
|
|
INT xend, INT yend,
|
|
int lines )
|
|
{
|
|
INT x, y, h, w;
|
|
double start_angle, end_angle, ratio;
|
|
|
|
x = XLPTODP(dc, (left + right)/2);
|
|
y = YLPTODP(dc, (top + bottom)/2);
|
|
|
|
w = XLSTODS(dc, (right - left));
|
|
h = YLSTODS(dc, (bottom - top));
|
|
|
|
if(w < 0) w = -w;
|
|
if(h < 0) h = -h;
|
|
ratio = ((double)w)/h;
|
|
|
|
/* angle is the angle after the rectangle is transformed to a square and is
|
|
measured anticlockwise from the +ve x-axis */
|
|
|
|
start_angle = atan2((double)(y - ystart) * ratio, (double)(xstart - x));
|
|
end_angle = atan2((double)(y - yend) * ratio, (double)(xend - x));
|
|
|
|
start_angle *= 180.0 / PI;
|
|
end_angle *= 180.0 / PI;
|
|
|
|
if(lines == 2) /* pie */
|
|
PSDRV_WriteMoveTo(dc, x, y);
|
|
else
|
|
PSDRV_WriteNewPath( dc );
|
|
|
|
PSDRV_WriteArc(dc, x, y, w, h, start_angle, end_angle);
|
|
if(lines == 1 || lines == 2) { /* chord or pie */
|
|
PSDRV_WriteClosePath(dc);
|
|
PSDRV_Brush(dc,0);
|
|
}
|
|
PSDRV_SetPen(dc);
|
|
PSDRV_DrawLine(dc);
|
|
return TRUE;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* PSDRV_Arc
|
|
*/
|
|
BOOL PSDRV_Arc( DC *dc, INT left, INT top, INT right, INT bottom,
|
|
INT xstart, INT ystart, INT xend, INT yend )
|
|
{
|
|
return PSDRV_DrawArc( dc, left, top, right, bottom, xstart, ystart,
|
|
xend, yend, 0 );
|
|
}
|
|
|
|
/***********************************************************************
|
|
* PSDRV_Chord
|
|
*/
|
|
BOOL PSDRV_Chord( DC *dc, INT left, INT top, INT right, INT bottom,
|
|
INT xstart, INT ystart, INT xend, INT yend )
|
|
{
|
|
return PSDRV_DrawArc( dc, left, top, right, bottom, xstart, ystart,
|
|
xend, yend, 1 );
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* PSDRV_Pie
|
|
*/
|
|
BOOL PSDRV_Pie( DC *dc, INT left, INT top, INT right, INT bottom,
|
|
INT xstart, INT ystart, INT xend, INT yend )
|
|
{
|
|
return PSDRV_DrawArc( dc, left, top, right, bottom, xstart, ystart,
|
|
xend, yend, 2 );
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* PSDRV_Ellipse
|
|
*/
|
|
BOOL PSDRV_Ellipse( DC *dc, INT left, INT top, INT right, INT bottom)
|
|
{
|
|
INT x, y, w, h;
|
|
|
|
TRACE("%d %d - %d %d\n", left, top, right, bottom);
|
|
|
|
x = XLPTODP(dc, (left + right)/2);
|
|
y = YLPTODP(dc, (top + bottom)/2);
|
|
|
|
w = XLSTODS(dc, (right - left));
|
|
h = YLSTODS(dc, (bottom - top));
|
|
|
|
PSDRV_WriteNewPath(dc);
|
|
PSDRV_WriteArc(dc, x, y, w, h, 0.0, 360.0);
|
|
PSDRV_WriteClosePath(dc);
|
|
PSDRV_Brush(dc,0);
|
|
PSDRV_SetPen(dc);
|
|
PSDRV_DrawLine(dc);
|
|
return TRUE;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* PSDRV_PolyPolyline
|
|
*/
|
|
BOOL PSDRV_PolyPolyline( DC *dc, const POINT* pts, const DWORD* counts,
|
|
DWORD polylines )
|
|
{
|
|
DWORD polyline, line;
|
|
const POINT* pt;
|
|
TRACE("\n");
|
|
|
|
pt = pts;
|
|
for(polyline = 0; polyline < polylines; polyline++) {
|
|
PSDRV_WriteMoveTo(dc, INTERNAL_XWPTODP(dc, pt->x, pt->y), INTERNAL_YWPTODP(dc, pt->x, pt->y));
|
|
pt++;
|
|
for(line = 1; line < counts[polyline]; line++) {
|
|
PSDRV_WriteLineTo(dc, INTERNAL_XWPTODP(dc, pt->x, pt->y), INTERNAL_YWPTODP(dc, pt->x, pt->y));
|
|
pt++;
|
|
}
|
|
}
|
|
PSDRV_SetPen(dc);
|
|
PSDRV_DrawLine(dc);
|
|
return TRUE;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* PSDRV_Polyline
|
|
*/
|
|
BOOL PSDRV_Polyline( DC *dc, const POINT* pt, INT count )
|
|
{
|
|
return PSDRV_PolyPolyline( dc, pt, (LPDWORD) &count, 1 );
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* PSDRV_PolyPolygon
|
|
*/
|
|
BOOL PSDRV_PolyPolygon( DC *dc, const POINT* pts, const INT* counts,
|
|
UINT polygons )
|
|
{
|
|
DWORD polygon, line;
|
|
const POINT* pt;
|
|
TRACE("\n");
|
|
|
|
pt = pts;
|
|
for(polygon = 0; polygon < polygons; polygon++) {
|
|
PSDRV_WriteMoveTo(dc, INTERNAL_XWPTODP(dc, pt->x, pt->y), INTERNAL_YWPTODP(dc, pt->x, pt->y));
|
|
pt++;
|
|
for(line = 1; line < counts[polygon]; line++) {
|
|
PSDRV_WriteLineTo(dc, INTERNAL_XWPTODP(dc, pt->x, pt->y), INTERNAL_YWPTODP(dc, pt->x, pt->y));
|
|
pt++;
|
|
}
|
|
PSDRV_WriteClosePath(dc);
|
|
}
|
|
|
|
if(dc->polyFillMode == ALTERNATE)
|
|
PSDRV_Brush(dc, 1);
|
|
else /* WINDING */
|
|
PSDRV_Brush(dc, 0);
|
|
PSDRV_SetPen(dc);
|
|
PSDRV_DrawLine(dc);
|
|
return TRUE;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* PSDRV_Polygon
|
|
*/
|
|
BOOL PSDRV_Polygon( DC *dc, const POINT* pt, INT count )
|
|
{
|
|
return PSDRV_PolyPolygon( dc, pt, &count, 1 );
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* PSDRV_SetPixel
|
|
*/
|
|
COLORREF PSDRV_SetPixel( DC *dc, INT x, INT y, COLORREF color )
|
|
{
|
|
PSDRV_PDEVICE *physDev = (PSDRV_PDEVICE *)dc->physDev;
|
|
PSCOLOR pscolor;
|
|
|
|
x = INTERNAL_XWPTODP(dc, x, y);
|
|
y = INTERNAL_YWPTODP(dc, x, y);
|
|
|
|
PSDRV_WriteRectangle( dc, x, y, 0, 0 );
|
|
PSDRV_CreateColor( physDev, &pscolor, color );
|
|
PSDRV_WriteSetColor( dc, &pscolor );
|
|
PSDRV_WriteFill( dc );
|
|
return color;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* PSDRV_DrawLine
|
|
*/
|
|
VOID PSDRV_DrawLine( DC *dc )
|
|
{
|
|
PSDRV_PDEVICE *physDev = (PSDRV_PDEVICE *)dc->physDev;
|
|
|
|
if (physDev->pen.style == PS_NULL)
|
|
PSDRV_WriteNewPath(dc);
|
|
else
|
|
PSDRV_WriteStroke(dc);
|
|
}
|