1 /////////////////////////////////////////////////////////////////////////////
3 // Purpose: Generic wxPostScriptDC implementation
4 // Author: Julian Smart, Robert Roebling, Markus Holzhem
8 // Copyright: (c) Julian Smart and Markus Holzem
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
13 #pragma implementation "dcpsg.h"
16 #include "wx/wxprec.h"
25 #if wxUSE_PRINTING_ARCHITECTURE
31 #include "wx/window.h"
32 #include "wx/dcmemory.h"
35 #include "wx/filedlg.h"
37 #include "wx/msgdlg.h"
40 #include "wx/generic/dcpsg.h"
41 #include "wx/printdlg.h"
42 #include "wx/button.h"
43 #include "wx/stattext.h"
44 #include "wx/radiobox.h"
45 #include "wx/textctrl.h"
46 #include "wx/prntbase.h"
48 #include "wx/filefn.h"
72 //-----------------------------------------------------------------------------
73 // start and end of document/page
74 //-----------------------------------------------------------------------------
76 static const char *wxPostScriptHeaderConicTo
= "\
80 /conic_cntrl_y exch def\n\
81 /conic_cntrl_x exch def\n\
85 /p1_x p0_x conic_cntrl_x p0_x sub 2 3 div mul add def\n\
86 /p1_y p0_y conic_cntrl_y p0_y sub 2 3 div mul add def\n\
87 /p2_x p1_x to_x p0_x sub 1 3 div mul add def\n\
88 /p2_y p1_y to_y p0_y sub 1 3 div mul add def\n\
89 p1_x p1_y p2_x p2_y to_x to_y curveto\n\
93 static const char *wxPostScriptHeaderEllipse
= "\
94 /ellipsedict 8 dict def\n\
95 ellipsedict /mtrx matrix put\n\
99 /startangle exch def\n\
104 /savematrix mtrx currentmatrix def\n\
107 0 0 1 startangle endangle arc\n\
108 savematrix setmatrix\n\
113 static const char *wxPostScriptHeaderEllipticArc
= "\
114 /ellipticarcdict 8 dict def\n\
115 ellipticarcdict /mtrx matrix put\n\
117 { ellipticarcdict begin\n\
119 /endangle exch def\n\
120 /startangle exch def\n\
125 /savematrix mtrx currentmatrix def\n\
128 do_fill { 0 0 moveto } if\n\
129 0 0 1 startangle endangle arc\n\
130 savematrix setmatrix\n\
131 do_fill { fill }{ stroke } ifelse\n\
135 static const char *wxPostScriptHeaderSpline
= "\
136 /DrawSplineSection {\n\
143 /xa x1 x2 x1 sub 0.666667 mul add def\n\
144 /ya y1 y2 y1 sub 0.666667 mul add def\n\
145 /xb x3 x2 x3 sub 0.666667 mul add def\n\
146 /yb y3 y2 y3 sub 0.666667 mul add def\n\
148 xa ya xb yb x3 y3 curveto\n\
152 static const char *wxPostScriptHeaderColourImage
= "\
153 %% define 'colorimage' if it isn't defined\n\
154 %% ('colortogray' and 'mergeprocs' come from xwd2ps\n\
156 /colorimage where %% do we know about 'colorimage'?\n\
157 { pop } %% yes: pop off the 'dict' returned\n\
158 { %% no: define one\n\
159 /colortogray { %% define an RGB->I function\n\
160 /rgbdata exch store %% call input 'rgbdata'\n\
161 rgbdata length 3 idiv\n\
162 /npixls exch store\n\
164 0 1 npixls 1 sub {\n\
166 rgbdata rgbindx get 20 mul %% Red\n\
167 rgbdata rgbindx 1 add get 32 mul %% Green\n\
168 rgbdata rgbindx 2 add get 12 mul %% Blue\n\
169 add add 64 idiv %% I = .5G + .31R + .18B\n\
171 /rgbindx rgbindx 3 add store\n\
173 grays 0 npixls getinterval\n\
176 %% Utility procedure for colorimage operator.\n\
177 %% This procedure takes two procedures off the\n\
178 %% stack and merges them into a single procedure.\n\
180 /mergeprocs { %% def\n\
199 /colorimage { %% def\n\
200 pop pop %% remove 'false 3' operands\n\
201 {colortogray} mergeprocs\n\
204 } ifelse %% end of 'false' case\n\
208 static char wxPostScriptHeaderReencodeISO1
[] =
210 "dup dup findfont dup length dict begin\n"
211 "{ 1 index /FID ne { def }{ pop pop } ifelse } forall\n"
212 "/Encoding ISOLatin1Encoding def\n"
213 "currentdict end definefont\n"
215 "/ISOLatin1Encoding [\n"
216 "/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef\n"
217 "/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef\n"
218 "/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef\n"
219 "/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef\n"
220 "/space/exclam/quotedbl/numbersign/dollar/percent/ampersand/quoteright\n"
221 "/parenleft/parenright/asterisk/plus/comma/minus/period/slash\n"
222 "/zero/one/two/three/four/five/six/seven/eight/nine/colon/semicolon\n"
223 "/less/equal/greater/question/at/A/B/C/D/E/F/G/H/I/J/K/L/M/N\n"
224 "/O/P/Q/R/S/T/U/V/W/X/Y/Z/bracketleft/backslash/bracketright\n"
225 "/asciicircum/underscore/quoteleft/a/b/c/d/e/f/g/h/i/j/k/l/m\n"
226 "/n/o/p/q/r/s/t/u/v/w/x/y/z/braceleft/bar/braceright/asciitilde\n"
227 "/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef\n"
228 "/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef\n"
229 "/.notdef/dotlessi/grave/acute/circumflex/tilde/macron/breve\n"
230 "/dotaccent/dieresis/.notdef/ring/cedilla/.notdef/hungarumlaut\n";
232 static char wxPostScriptHeaderReencodeISO2
[] =
233 "/ogonek/caron/space/exclamdown/cent/sterling/currency/yen/brokenbar\n"
234 "/section/dieresis/copyright/ordfeminine/guillemotleft/logicalnot\n"
235 "/hyphen/registered/macron/degree/plusminus/twosuperior/threesuperior\n"
236 "/acute/mu/paragraph/periodcentered/cedilla/onesuperior/ordmasculine\n"
237 "/guillemotright/onequarter/onehalf/threequarters/questiondown\n"
238 "/Agrave/Aacute/Acircumflex/Atilde/Adieresis/Aring/AE/Ccedilla\n"
239 "/Egrave/Eacute/Ecircumflex/Edieresis/Igrave/Iacute/Icircumflex\n"
240 "/Idieresis/Eth/Ntilde/Ograve/Oacute/Ocircumflex/Otilde/Odieresis\n"
241 "/multiply/Oslash/Ugrave/Uacute/Ucircumflex/Udieresis/Yacute\n"
242 "/Thorn/germandbls/agrave/aacute/acircumflex/atilde/adieresis\n"
243 "/aring/ae/ccedilla/egrave/eacute/ecircumflex/edieresis/igrave\n"
244 "/iacute/icircumflex/idieresis/eth/ntilde/ograve/oacute/ocircumflex\n"
245 "/otilde/odieresis/divide/oslash/ugrave/uacute/ucircumflex/udieresis\n"
246 "/yacute/thorn/ydieresis\n"
250 //-------------------------------------------------------------------------------
252 //-------------------------------------------------------------------------------
254 IMPLEMENT_DYNAMIC_CLASS(wxPostScriptDC
, wxDC
)
256 float wxPostScriptDC::ms_PSScaleFactor
= 10.0;
258 void wxPostScriptDC::SetResolution(int ppi
)
260 ms_PSScaleFactor
= (float)ppi
/ 72.0;
263 int wxPostScriptDC::GetResolution()
265 return (int)(ms_PSScaleFactor
* 72.0);
268 //-------------------------------------------------------------------------------
270 wxPostScriptDC::wxPostScriptDC ()
272 m_pstream
= (FILE*) NULL
;
282 m_underlinePosition
= 0.0;
283 m_underlineThickness
= 0.0;
285 m_signX
= 1; // default x-axis left to right
286 m_signY
= -1; // default y-axis bottom up -> top down
289 wxPostScriptDC::wxPostScriptDC (const wxPrintData
& printData
)
291 m_pstream
= (FILE*) NULL
;
301 m_underlinePosition
= 0.0;
302 m_underlineThickness
= 0.0;
304 m_signX
= 1; // default x-axis left to right
305 m_signY
= -1; // default y-axis bottom up -> top down
307 m_printData
= printData
;
312 wxPostScriptDC::~wxPostScriptDC ()
317 m_pstream
= (FILE*) NULL
;
321 bool wxPostScriptDC::Ok() const
326 void wxPostScriptDC::DoSetClippingRegion (wxCoord x
, wxCoord y
, wxCoord w
, wxCoord h
)
328 wxCHECK_RET( m_ok
&& m_pstream
, wxT("invalid postscript dc") );
330 if (m_clipping
) DestroyClippingRegion();
332 wxDC::DoSetClippingRegion(x
, y
, w
, h
);
341 "closepath clip newpath\n",
342 LogicalToDeviceX(x
), LogicalToDeviceY(y
),
343 LogicalToDeviceX(x
+w
), LogicalToDeviceY(y
),
344 LogicalToDeviceX(x
+w
), LogicalToDeviceY(y
+h
),
345 LogicalToDeviceX(x
), LogicalToDeviceY(y
+h
) );
349 void wxPostScriptDC::DestroyClippingRegion()
351 wxCHECK_RET( m_ok
&& m_pstream
, wxT("invalid postscript dc") );
356 fprintf( m_pstream
, "grestore\n" );
359 wxDC::DestroyClippingRegion();
362 void wxPostScriptDC::Clear()
364 wxFAIL_MSG( wxT("wxPostScriptDC::Clear not implemented.") );
367 bool wxPostScriptDC::DoFloodFill (wxCoord
WXUNUSED(x
), wxCoord
WXUNUSED(y
), const wxColour
&WXUNUSED(col
), int WXUNUSED(style
))
369 wxFAIL_MSG( wxT("wxPostScriptDC::FloodFill not implemented.") );
373 bool wxPostScriptDC::DoGetPixel (wxCoord
WXUNUSED(x
), wxCoord
WXUNUSED(y
), wxColour
* WXUNUSED(col
)) const
375 wxFAIL_MSG( wxT("wxPostScriptDC::GetPixel not implemented.") );
379 void wxPostScriptDC::DoCrossHair (wxCoord
WXUNUSED(x
), wxCoord
WXUNUSED(y
))
381 wxFAIL_MSG( wxT("wxPostScriptDC::CrossHair not implemented.") );
384 void wxPostScriptDC::DoDrawLine (wxCoord x1
, wxCoord y1
, wxCoord x2
, wxCoord y2
)
386 wxCHECK_RET( m_ok
&& m_pstream
, wxT("invalid postscript dc") );
388 if (m_pen
.GetStyle() == wxTRANSPARENT
) return;
397 LogicalToDeviceX(x1
), LogicalToDeviceY(y1
),
398 LogicalToDeviceX(x2
), LogicalToDeviceY (y2
) );
400 CalcBoundingBox( x1
, y1
);
401 CalcBoundingBox( x2
, y2
);
404 #define RAD2DEG 57.29577951308
406 void wxPostScriptDC::DoDrawArc (wxCoord x1
, wxCoord y1
, wxCoord x2
, wxCoord y2
, wxCoord xc
, wxCoord yc
)
408 wxCHECK_RET( m_ok
&& m_pstream
, wxT("invalid postscript dc") );
410 wxCoord dx
= x1
- xc
;
411 wxCoord dy
= y1
- yc
;
412 wxCoord radius
= (wxCoord
) sqrt( (double)(dx
*dx
+dy
*dy
) );
413 double alpha1
, alpha2
;
415 if (x1
== x2
&& y1
== y2
)
420 else if (radius
== 0.0)
422 alpha1
= alpha2
= 0.0;
426 alpha1
= (x1
- xc
== 0) ?
427 (y1
- yc
< 0) ? 90.0 : -90.0 :
428 -atan2(double(y1
-yc
), double(x1
-xc
)) * RAD2DEG
;
429 alpha2
= (x2
- xc
== 0) ?
430 (y2
- yc
< 0) ? 90.0 : -90.0 :
431 -atan2(double(y2
-yc
), double(x2
-xc
)) * RAD2DEG
;
433 while (alpha1
<= 0) alpha1
+= 360;
434 while (alpha2
<= 0) alpha2
+= 360; // adjust angles to be between
435 while (alpha1
> 360) alpha1
-= 360; // 0 and 360 degree
436 while (alpha2
> 360) alpha2
-= 360;
438 if (m_brush
.GetStyle() != wxTRANSPARENT
)
444 "%d %d %d %d %d %d ellipse\n"
448 LogicalToDeviceX(xc
), LogicalToDeviceY(yc
), LogicalToDeviceXRel(radius
), LogicalToDeviceYRel(radius
), (wxCoord
)alpha1
, (wxCoord
) alpha2
,
449 LogicalToDeviceX(xc
), LogicalToDeviceY(yc
) );
451 CalcBoundingBox( xc
-radius
, yc
-radius
);
452 CalcBoundingBox( xc
+radius
, yc
+radius
);
455 if (m_pen
.GetStyle() != wxTRANSPARENT
)
461 "%d %d %d %d %d %d ellipse\n"
465 LogicalToDeviceX(xc
), LogicalToDeviceY(yc
), LogicalToDeviceXRel(radius
), LogicalToDeviceYRel(radius
), (wxCoord
)alpha1
, (wxCoord
) alpha2
,
466 LogicalToDeviceX(xc
), LogicalToDeviceY(yc
) );
468 CalcBoundingBox( xc
-radius
, yc
-radius
);
469 CalcBoundingBox( xc
+radius
, yc
+radius
);
473 void wxPostScriptDC::DoDrawEllipticArc(wxCoord x
,wxCoord y
,wxCoord w
,wxCoord h
,double sa
,double ea
)
475 wxCHECK_RET( m_ok
&& m_pstream
, wxT("invalid postscript dc") );
477 if (sa
>=360 || sa
<=-360) sa
=sa
-int(sa
/360)*360;
478 if (ea
>=360 || ea
<=-360) ea
=ea
-int(ea
/360)*360;
484 DrawEllipse(x
,y
,w
,h
);
488 if (m_brush
.GetStyle () != wxTRANSPARENT
)
494 "%d %d %d %d %d %d true ellipticarc\n",
495 LogicalToDeviceX(x
+w
/2), LogicalToDeviceY(y
+h
/2), LogicalToDeviceXRel(w
/2), LogicalToDeviceYRel(h
/2), (wxCoord
)sa
, (wxCoord
)ea
);
497 CalcBoundingBox( x
,y
);
498 CalcBoundingBox( x
+w
, y
+h
);
501 if (m_pen
.GetStyle () != wxTRANSPARENT
)
507 "%d %d %d %d %d %d false ellipticarc\n",
508 LogicalToDeviceX(x
+w
/2), LogicalToDeviceY(y
+h
/2), LogicalToDeviceXRel(w
/2), LogicalToDeviceYRel(h
/2), (wxCoord
)sa
, (wxCoord
)ea
);
510 CalcBoundingBox( x
,y
);
511 CalcBoundingBox( x
+w
, y
+h
);
515 void wxPostScriptDC::DoDrawPoint (wxCoord x
, wxCoord y
)
517 wxCHECK_RET( m_ok
&& m_pstream
, wxT("invalid postscript dc") );
519 if (m_pen
.GetStyle() == wxTRANSPARENT
) return;
528 LogicalToDeviceX(x
), LogicalToDeviceY(y
),
529 LogicalToDeviceX(x
+1), LogicalToDeviceY(y
) );
531 CalcBoundingBox( x
, y
);
534 void wxPostScriptDC::DoDrawPolygon (int n
, wxPoint points
[], wxCoord xoffset
, wxCoord yoffset
, int WXUNUSED(fillStyle
))
536 wxCHECK_RET( m_ok
&& m_pstream
, wxT("invalid postscript dc") );
540 if (m_brush
.GetStyle () != wxTRANSPARENT
)
544 fprintf( m_pstream
, "newpath\n" );
546 wxCoord xx
= LogicalToDeviceX(points
[0].x
+ xoffset
);
547 wxCoord yy
= LogicalToDeviceY(points
[0].y
+ yoffset
);
549 fprintf( m_pstream
, "%d %d moveto\n", xx
, yy
);
551 CalcBoundingBox( points
[0].x
+ xoffset
, points
[0].y
+ yoffset
);
553 for (int i
= 1; i
< n
; i
++)
555 xx
= LogicalToDeviceX(points
[i
].x
+ xoffset
);
556 yy
= LogicalToDeviceY(points
[i
].y
+ yoffset
);
558 fprintf( m_pstream
, "%d %d lineto\n", xx
, yy
);
560 CalcBoundingBox( points
[i
].x
+ xoffset
, points
[i
].y
+ yoffset
);
563 fprintf( m_pstream
, "fill\n" );
566 if (m_pen
.GetStyle () != wxTRANSPARENT
)
570 fprintf( m_pstream
, "newpath\n" );
572 wxCoord xx
= LogicalToDeviceX(points
[0].x
+ xoffset
);
573 wxCoord yy
= LogicalToDeviceY(points
[0].y
+ yoffset
);
575 fprintf( m_pstream
, "%d %d moveto\n", xx
, yy
);
577 CalcBoundingBox( points
[0].x
+ xoffset
, points
[0].y
+ yoffset
);
579 for (int i
= 1; i
< n
; i
++)
581 xx
= LogicalToDeviceX(points
[i
].x
+ xoffset
);
582 yy
= LogicalToDeviceY(points
[i
].y
+ yoffset
);
584 fprintf( m_pstream
, "%d %d lineto\n", xx
, yy
);
586 CalcBoundingBox( points
[i
].x
+ xoffset
, points
[i
].y
+ yoffset
);
589 fprintf( m_pstream
, "closepath\n" );
590 fprintf( m_pstream
, "stroke\n" );
594 void wxPostScriptDC::DoDrawLines (int n
, wxPoint points
[], wxCoord xoffset
, wxCoord yoffset
)
596 wxCHECK_RET( m_ok
&& m_pstream
, wxT("invalid postscript dc") );
598 if (m_pen
.GetStyle() == wxTRANSPARENT
) return;
605 for ( i
=0; i
<n
; i
++ )
607 CalcBoundingBox( LogicalToDeviceX(points
[i
].x
+xoffset
), LogicalToDeviceY(points
[i
].y
+yoffset
));
613 LogicalToDeviceX(points
[0].x
+xoffset
), LogicalToDeviceY(points
[0].y
+yoffset
) );
615 for (i
= 1; i
< n
; i
++)
619 LogicalToDeviceX(points
[i
].x
+xoffset
), LogicalToDeviceY(points
[i
].y
+yoffset
) );
622 fprintf( m_pstream
, "stroke\n" );
625 void wxPostScriptDC::DoDrawRectangle (wxCoord x
, wxCoord y
, wxCoord width
, wxCoord height
)
627 wxCHECK_RET( m_ok
&& m_pstream
, wxT("invalid postscript dc") );
629 if (m_brush
.GetStyle () != wxTRANSPARENT
)
641 LogicalToDeviceX(x
), LogicalToDeviceY(y
),
642 LogicalToDeviceX(x
+ width
), LogicalToDeviceY(y
),
643 LogicalToDeviceX(x
+ width
), LogicalToDeviceY(y
+ height
),
644 LogicalToDeviceX(x
), LogicalToDeviceY(y
+ height
) );
646 CalcBoundingBox( x
, y
);
647 CalcBoundingBox( x
+ width
, y
+ height
);
650 if (m_pen
.GetStyle () != wxTRANSPARENT
)
662 LogicalToDeviceX(x
), LogicalToDeviceY(y
),
663 LogicalToDeviceX(x
+ width
), LogicalToDeviceY(y
),
664 LogicalToDeviceX(x
+ width
), LogicalToDeviceY(y
+ height
),
665 LogicalToDeviceX(x
), LogicalToDeviceY(y
+ height
) );
667 CalcBoundingBox( x
, y
);
668 CalcBoundingBox( x
+ width
, y
+ height
);
672 void wxPostScriptDC::DoDrawRoundedRectangle (wxCoord x
, wxCoord y
, wxCoord width
, wxCoord height
, double radius
)
674 wxCHECK_RET( m_ok
&& m_pstream
, wxT("invalid postscript dc") );
678 // Now, a negative radius is interpreted to mean
679 // 'the proportion of the smallest X or Y dimension'
680 double smallest
= 0.0;
685 radius
= (-radius
* smallest
);
688 wxCoord rad
= (wxCoord
) radius
;
690 if (m_brush
.GetStyle () != wxTRANSPARENT
)
694 /* Draw rectangle anticlockwise */
697 "%d %d %d 90 180 arc\n"
699 "%d %d %d 180 270 arc\n"
701 "%d %d %d 270 0 arc\n"
703 "%d %d %d 0 90 arc\n"
707 LogicalToDeviceX(x
+ rad
), LogicalToDeviceY(y
+ rad
), LogicalToDeviceXRel(rad
),
708 LogicalToDeviceX(x
), LogicalToDeviceY(y
+ rad
),
709 LogicalToDeviceX(x
+ rad
), LogicalToDeviceY(y
+ height
- rad
), LogicalToDeviceXRel(rad
),
710 LogicalToDeviceX(x
+ width
- rad
), LogicalToDeviceY(y
+ height
),
711 LogicalToDeviceX(x
+ width
- rad
), LogicalToDeviceY(y
+ height
- rad
), LogicalToDeviceXRel(rad
),
712 LogicalToDeviceX(x
+ width
), LogicalToDeviceY(y
+ rad
),
713 LogicalToDeviceX(x
+ width
- rad
), LogicalToDeviceY(y
+ rad
), LogicalToDeviceXRel(rad
),
714 LogicalToDeviceX(x
+ rad
), LogicalToDeviceY(y
) );
716 CalcBoundingBox( x
, y
);
717 CalcBoundingBox( x
+ width
, y
+ height
);
720 if (m_pen
.GetStyle () != wxTRANSPARENT
)
724 /* Draw rectangle anticlockwise */
727 "%d %d %d 90 180 arc\n"
729 "%d %d %d 180 270 arc\n"
731 "%d %d %d 270 0 arc\n"
733 "%d %d %d 0 90 arc\n"
737 LogicalToDeviceX(x
+ rad
), LogicalToDeviceY(y
+ rad
), LogicalToDeviceXRel(rad
),
738 LogicalToDeviceX(x
), LogicalToDeviceY(y
+ rad
),
739 LogicalToDeviceX(x
+ rad
), LogicalToDeviceY(y
+ height
- rad
), LogicalToDeviceXRel(rad
),
740 LogicalToDeviceX(x
+ width
- rad
), LogicalToDeviceY(y
+ height
),
741 LogicalToDeviceX(x
+ width
- rad
), LogicalToDeviceY(y
+ height
- rad
), LogicalToDeviceXRel(rad
),
742 LogicalToDeviceX(x
+ width
), LogicalToDeviceY(y
+ rad
),
743 LogicalToDeviceX(x
+ width
- rad
), LogicalToDeviceY(y
+ rad
), LogicalToDeviceXRel(rad
),
744 LogicalToDeviceX(x
+ rad
), LogicalToDeviceY(y
) );
746 CalcBoundingBox( x
, y
);
747 CalcBoundingBox( x
+ width
, y
+ height
);
751 void wxPostScriptDC::DoDrawEllipse (wxCoord x
, wxCoord y
, wxCoord width
, wxCoord height
)
753 wxCHECK_RET( m_ok
&& m_pstream
, wxT("invalid postscript dc") );
755 if (m_brush
.GetStyle () != wxTRANSPARENT
)
761 "%d %d %d %d 0 360 ellipse\n"
763 LogicalToDeviceX(x
+ width
/ 2), LogicalToDeviceY(y
+ height
/ 2),
764 LogicalToDeviceXRel(width
/ 2), LogicalToDeviceYRel(height
/ 2) );
766 CalcBoundingBox( x
- width
, y
- height
);
767 CalcBoundingBox( x
+ width
, y
+ height
);
770 if (m_pen
.GetStyle () != wxTRANSPARENT
)
776 "%d %d %d %d 0 360 ellipse\n"
778 LogicalToDeviceX(x
+ width
/ 2), LogicalToDeviceY(y
+ height
/ 2),
779 LogicalToDeviceXRel(width
/ 2), LogicalToDeviceYRel(height
/ 2) );
781 CalcBoundingBox( x
- width
, y
- height
);
782 CalcBoundingBox( x
+ width
, y
+ height
);
786 void wxPostScriptDC::DoDrawIcon( const wxIcon
& icon
, wxCoord x
, wxCoord y
)
788 DrawBitmap( icon
, x
, y
, TRUE
);
791 /* this has to be char, not wxChar */
792 static char hexArray
[] = "0123456789ABCDEF";
793 static void LocalDecToHex( int dec
, char *buf
)
795 int firstDigit
= (int)(dec
/16.0);
796 int secondDigit
= (int)(dec
- (firstDigit
*16.0));
797 buf
[0] = hexArray
[firstDigit
];
798 buf
[1] = hexArray
[secondDigit
];
802 void wxPostScriptDC::DoDrawBitmap( const wxBitmap
& bitmap
, wxCoord x
, wxCoord y
, bool WXUNUSED(useMask
) )
804 wxCHECK_RET( m_ok
&& m_pstream
, wxT("invalid postscript dc") );
806 if (!bitmap
.Ok()) return;
808 wxImage image
= bitmap
.ConvertToImage();
810 if (!image
.Ok()) return;
812 wxCoord w
= image
.GetWidth();
813 wxCoord h
= image
.GetHeight();
815 wxCoord ww
= LogicalToDeviceXRel(image
.GetWidth());
816 wxCoord hh
= LogicalToDeviceYRel(image
.GetHeight());
818 wxCoord xx
= LogicalToDeviceX(x
);
819 wxCoord yy
= LogicalToDeviceY(y
+ bitmap
.GetHeight());
822 "/origstate save def\n"
824 "/pix %d string def\n"
825 "/grays %d string def\n"
832 "{currentfile pix readhexstring pop}\n"
833 "false 3 colorimage\n",
834 w
, w
, xx
, yy
, ww
, hh
, w
, h
, w
, -h
, h
);
837 for (int j
= 0; j
< h
; j
++)
839 for (int i
= 0; i
< w
; i
++)
842 LocalDecToHex( image
.GetRed(i
,j
), buffer
);
843 fprintf( m_pstream
, buffer
);
844 LocalDecToHex( image
.GetGreen(i
,j
), buffer
);
845 fprintf( m_pstream
, buffer
);
846 LocalDecToHex( image
.GetBlue(i
,j
), buffer
);
847 fprintf( m_pstream
, buffer
);
849 fprintf( m_pstream
, "\n" );
852 fprintf( m_pstream
, "end\n" );
853 fprintf( m_pstream
, "origstate restore\n" );
856 void wxPostScriptDC::SetFont( const wxFont
& font
)
858 wxCHECK_RET( m_ok
&& m_pstream
, wxT("invalid postscript dc") );
860 if (!font
.Ok()) return;
865 int Style
= m_font
.GetStyle();
866 int Weight
= m_font
.GetWeight();
869 switch (m_font
.GetFamily())
874 if (Style
== wxITALIC
)
876 if (Weight
== wxBOLD
)
877 name
= "/Courier-BoldOblique";
879 name
= "/Courier-Oblique";
883 if (Weight
== wxBOLD
)
884 name
= "/Courier-Bold";
892 if (Style
== wxITALIC
)
894 if (Weight
== wxBOLD
)
895 name
= "/Times-BoldItalic";
897 name
= "/Times-Italic";
901 if (Weight
== wxBOLD
)
902 name
= "/Times-Bold";
904 name
= "/Times-Roman";
910 name
= "/ZapfChancery-MediumItalic";
918 if (Style
== wxITALIC
)
920 if (Weight
== wxBOLD
)
921 name
= "/Helvetica-BoldOblique";
923 name
= "/Helvetica-Oblique";
927 if (Weight
== wxBOLD
)
928 name
= "/Helvetica-Bold";
936 fprintf( m_pstream
, name
);
937 fprintf( m_pstream
, " reencodeISO def\n" );
938 fprintf( m_pstream
, name
);
939 fprintf( m_pstream
, " findfont\n" );
942 sprintf( buffer
, "%f scalefont setfont\n", LogicalToDeviceYRel(m_font
.GetPointSize() * 1000) / 1000.0F
);
943 // this is a hack - we must scale font size (in pts) according to m_scaleY but
944 // LogicalToDeviceYRel works with wxCoord type (int or longint). Se we first convert font size
945 // to 1/1000th of pt and then back.
946 for (int i
= 0; i
< 100; i
++)
947 if (buffer
[i
] == ',') buffer
[i
] = '.';
948 fprintf( m_pstream
, buffer
);
952 void wxPostScriptDC::SetPen( const wxPen
& pen
)
954 wxCHECK_RET( m_ok
&& m_pstream
, wxT("invalid postscript dc") );
956 if (!pen
.Ok()) return;
958 int oldStyle
= m_pen
.GetStyle();
965 sprintf( buffer
, "%f setlinewidth\n", LogicalToDeviceXRel(1000 * m_pen
.GetWidth()) / 1000.0f
);
967 sprintf( buffer
, "%f setlinewidth\n", LogicalToDeviceXRel(1000 * m_pen
.GetWidth()) / 1000.0f
);
969 for (int i
= 0; i
< 100; i
++)
970 if (buffer
[i
] == ',') buffer
[i
] = '.';
971 fprintf( m_pstream
, buffer
);
975 Line style - WRONG: 2nd arg is OFFSET
977 Here, I'm afraid you do not conceive meaning of parameters of 'setdash'
978 operator correctly. You should look-up this in the Red Book: the 2nd parame-
979 ter is not number of values in the array of the first one, but an offset
980 into this description of the pattern. I mean a real *offset* not index
981 into array. I.e. If the command is [3 4] 1 setdash is used, then there
982 will be first black line *2* units wxCoord, then space 4 units, then the
983 pattern of *3* units black, 4 units space will be repeated.
986 static const char *dotted
= "[2 5] 2";
987 static const char *short_dashed
= "[4 4] 2";
988 static const char *wxCoord_dashed
= "[4 8] 2";
989 static const char *dotted_dashed
= "[6 6 2 6] 4";
991 const char *psdash
= (char *) NULL
;
992 switch (m_pen
.GetStyle())
994 case wxDOT
: psdash
= dotted
; break;
995 case wxSHORT_DASH
: psdash
= short_dashed
; break;
996 case wxLONG_DASH
: psdash
= wxCoord_dashed
; break;
997 case wxDOT_DASH
: psdash
= dotted_dashed
; break;
1000 default: psdash
= "[] 0"; break;
1003 if (oldStyle
!= m_pen
.GetStyle())
1005 fprintf( m_pstream
, psdash
);
1006 fprintf( m_pstream
," setdash\n" );
1010 unsigned char red
= m_pen
.GetColour().Red();
1011 unsigned char blue
= m_pen
.GetColour().Blue();
1012 unsigned char green
= m_pen
.GetColour().Green();
1016 // Anything not white is black
1017 if (! (red
== (unsigned char) 255 &&
1018 blue
== (unsigned char) 255 &&
1019 green
== (unsigned char) 255) )
1021 red
= (unsigned char) 0;
1022 green
= (unsigned char) 0;
1023 blue
= (unsigned char) 0;
1028 if (!(red
== m_currentRed
&& green
== m_currentGreen
&& blue
== m_currentBlue
))
1030 double redPS
= (double)(red
) / 255.0;
1031 double bluePS
= (double)(blue
) / 255.0;
1032 double greenPS
= (double)(green
) / 255.0;
1036 "%.8f %.8f %.8f setrgbcolor\n",
1037 redPS
, greenPS
, bluePS
);
1038 for (int i
= 0; i
< 100; i
++)
1039 if (buffer
[i
] == ',') buffer
[i
] = '.';
1040 fprintf( m_pstream
, buffer
);
1043 m_currentBlue
= blue
;
1044 m_currentGreen
= green
;
1048 void wxPostScriptDC::SetBrush( const wxBrush
& brush
)
1050 wxCHECK_RET( m_ok
&& m_pstream
, wxT("invalid postscript dc") );
1052 if (!brush
.Ok()) return;
1057 unsigned char red
= m_brush
.GetColour().Red();
1058 unsigned char blue
= m_brush
.GetColour().Blue();
1059 unsigned char green
= m_brush
.GetColour().Green();
1063 // Anything not white is black
1064 if (! (red
== (unsigned char) 255 &&
1065 blue
== (unsigned char) 255 &&
1066 green
== (unsigned char) 255) )
1068 red
= (unsigned char) 0;
1069 green
= (unsigned char) 0;
1070 blue
= (unsigned char) 0;
1075 if (!(red
== m_currentRed
&& green
== m_currentGreen
&& blue
== m_currentBlue
))
1077 double redPS
= (double)(red
) / 255.0;
1078 double bluePS
= (double)(blue
) / 255.0;
1079 double greenPS
= (double)(green
) / 255.0;
1083 "%.8f %.8f %.8f setrgbcolor\n",
1084 redPS
, greenPS
, bluePS
);
1085 for (int i
= 0; i
< 100; i
++)
1086 if (buffer
[i
] == ',') buffer
[i
] = '.';
1087 fprintf( m_pstream
, buffer
);
1090 m_currentBlue
= blue
;
1091 m_currentGreen
= green
;
1097 #define PANGO_ENABLE_ENGINE
1099 #include "wx/gtk/private.h"
1100 #include "wx/fontutil.h"
1101 #include "gtk/gtk.h"
1102 //#include "gtk/gdk/gdkx.h"
1103 //#include <pango/pangoxft.h>
1104 #include <pango/pangoft2.h>
1105 #include <freetype/ftglyph.h>
1107 #ifndef FT_Outline_Decompose
1108 FT_EXPORT( FT_Error
) FT_Outline_Decompose(
1109 FT_Outline
* outline
,
1110 const FT_Outline_Funcs
* interface
,
1114 typedef struct _OutlineInfo OutlineInfo
;
1115 struct _OutlineInfo
{
1117 FT_Vector glyph_origin
;
1121 static int paps_move_to( FT_Vector
* to
,
1124 OutlineInfo
*outline_info
= (OutlineInfo
*)user_data
;
1125 fprintf(outline_info
->OUT
, "%d %d moveto\n",
1131 static int paps_line_to( FT_Vector
* to
,
1134 OutlineInfo
*outline_info
= (OutlineInfo
*)user_data
;
1135 fprintf(outline_info
->OUT
, "%d %d lineto\n",
1141 static int paps_conic_to( FT_Vector
* control
,
1145 OutlineInfo
*outline_info
= (OutlineInfo
*)user_data
;
1146 fprintf(outline_info
->OUT
, "%d %d %d %d conicto\n",
1154 static int paps_cubic_to( FT_Vector
* control1
,
1155 FT_Vector
* control2
,
1159 OutlineInfo
*outline_info
= (OutlineInfo
*)user_data
;
1160 fprintf(outline_info
->OUT
,
1161 "%d %d %d %d %d %d curveto\n",
1171 void draw_bezier_outline(FILE *OUT
,
1174 FT_UInt glyph_index
,
1179 FT_Int load_flags
= FT_LOAD_DEFAULT
;
1182 /* Output outline */
1183 FT_Outline_Funcs outlinefunc
=
1190 OutlineInfo outline_info
;
1192 outline_info
.glyph_origin
.x
= (FT_Pos
) pos_x
;
1193 outline_info
.glyph_origin
.y
= (FT_Pos
) pos_y
;
1194 outline_info
.dpi
= dpi
;
1195 outline_info
.OUT
= OUT
;
1197 fprintf(OUT
, "gsave %d %d translate 1.0 72.0 div dup scale 0 0 0 setrgbcolor\n", pos_x
, pos_y
);
1199 FT_Load_Glyph(face
, glyph_index
, load_flags
);
1200 FT_Get_Glyph (face
->glyph
, &glyph
);
1201 FT_Outline_Decompose (&(((FT_OutlineGlyph
)glyph
)->outline
),
1202 &outlinefunc
, &outline_info
);
1203 fprintf(OUT
, "closepath fill grestore \n");
1205 FT_Done_Glyph (glyph
);
1210 void wxPostScriptDC::DoDrawText( const wxString
& text
, wxCoord x
, wxCoord y
)
1212 wxCHECK_RET( m_ok
&& m_pstream
, wxT("invalid postscript dc") );
1216 int dpi
= GetResolution();
1218 PangoContext
*context
= pango_ft2_get_context ( dpi
, dpi
);
1220 // What are these for?
1221 pango_context_set_language (context
, pango_language_from_string ("en_US"));
1222 pango_context_set_base_dir (context
, PANGO_DIRECTION_LTR
);
1225 pango_context_set_font_description (context
, m_font
.GetNativeFontInfo()->description
);
1228 PangoLayout
*layout
= pango_layout_new (context
);
1230 wxCharBuffer buffer
= wxConvUTF8
.cWC2MB( text
);
1232 wxCharBuffer buffer
= wxConvUTF8
.cWC2MB( wxConvLocal
.cWX2WC( text
) );
1234 pango_layout_set_text( layout
, (const char*) buffer
, strlen(buffer
) );
1237 int xx
= LogicalToDeviceX(x
);
1238 int yy
= LogicalToDeviceY(y
/*+ bitmap.GetHeight()*/ );
1243 // Loop over lines in layout
1244 int num_lines
= pango_layout_get_line_count( layout
);
1245 for (int i
= 0; i
< num_lines
; i
++)
1247 PangoLayoutLine
*line
= pango_layout_get_line( layout
, i
);
1249 // Loop over runs in line
1250 GSList
*runs_list
= line
->runs
;
1253 PangoLayoutRun
*run
= (PangoLayoutRun
*) runs_list
->data
;
1254 PangoItem
*item
= run
->item
;
1255 PangoGlyphString
*glyphs
= run
->glyphs
;
1256 PangoAnalysis
*analysis
= &item
->analysis
;
1257 PangoFont
*font
= analysis
->font
;
1258 FT_Face ft_face
= pango_ft2_font_get_face(font
);
1260 int num_glyphs
= glyphs
->num_glyphs
;
1261 for (int glyph_idx
= 0; glyph_idx
< num_glyphs
; glyph_idx
++)
1263 PangoGlyphGeometry geometry
= glyphs
->glyphs
[glyph_idx
].geometry
;
1264 int pos_x
= xx
+ geometry
.x_offset
;
1265 int pos_y
= yy
- geometry
.y_offset
;
1266 xx
+= geometry
.width
;
1268 draw_bezier_outline( m_pstream
, dpi
, ft_face
,
1269 (FT_UInt
)(glyphs
->glyphs
[glyph_idx
].glyph
),
1270 (wxCoord
)(pos_x
/ PANGO_SCALE
), (wxCoord
)(pos_y
/ PANGO_SCALE
) );
1272 runs_list
= runs_list
->next
;
1276 // Find out extent for the bitmap
1279 PangoRectangle logical_rect
;
1280 pango_layout_get_extents (layout
, NULL
, &logical_rect
);
1281 height
= PANGO_PIXELS (logical_rect
.height
);
1282 width
= PANGO_PIXELS (logical_rect
.width
);
1284 // printf( "h %d w %d lh %d lw %d\n", height, width, logical_rect.height, logical_rect.width );
1286 // Allocate FreeType 2 bitmap
1287 int byte_width
= (width
+ 7)/8 * 8;
1289 guchar
*buf
= (guchar
*) g_malloc (byte_width
* height
);
1290 memset (buf
, 0x00, byte_width
* height
);
1291 bitmap
.rows
= height
;
1292 bitmap
.width
= byte_width
;
1293 bitmap
.pitch
= byte_width
;
1294 bitmap
.buffer
= buf
;
1295 bitmap
.num_grays
= 256;
1296 bitmap
.pixel_mode
= ft_pixel_mode_grays
;
1299 pango_ft2_render_layout (&bitmap
, layout
, 0, 0);
1301 // Invert bitmap to get black text on white background
1302 for (int pix_idx
= 0; pix_idx
< width
* height
; pix_idx
++)
1303 buf
[pix_idx
] = 255-buf
[pix_idx
];
1306 wxCoord xx
= LogicalToDeviceX(x
);
1307 wxCoord yy
= LogicalToDeviceY(y
/*+ bitmap.GetHeight()*/ );
1309 fprintf(m_pstream
, "gsave\n");
1310 fprintf(m_pstream
, "%d %d translate\n", xx
, yy
);
1311 fprintf(m_pstream
, "/img_width %d def\n", bitmap
.width
);
1312 fprintf(m_pstream
, "/img_height %d def\n", bitmap
.rows
);
1313 fprintf(m_pstream
, "/picstr img_width 8 idiv string def\n");
1316 " img_width 72 15 div mul\n"
1317 " img_height 72 15 div mul scale\n"
1319 " img_width img_height\n"
1321 " [img_width 0 0 img_height neg 0 img_height 0.67 mul]\n"
1323 " picstr readhexstring pop }\n"
1328 for (int b_idx
= 0; b_idx
< bitmap
.width
/8 * bitmap
.rows
; b_idx
++)
1330 guchar packed_b
= 0;
1333 if (b_idx
% (bitmap
.width
/8) == 0)
1334 fprintf(m_pstream
, "\n");
1336 for (bit_idx
= 0; bit_idx
< 8; bit_idx
++)
1338 guchar this_bit
= bitmap
.buffer
[b_idx
* 8+bit_idx
]<128;
1339 packed_b
= (packed_b
<< 1) + this_bit
;
1341 fprintf(m_pstream
, "%02x", packed_b
);
1344 fprintf(m_pstream
, "\ngrestore\n" );
1351 wxCoord text_w
, text_h
, text_descent
;
1353 GetTextExtent(text
, &text_w
, &text_h
, &text_descent
);
1355 // VZ: this seems to be unnecessary, so taking it out for now, if it
1356 // doesn't create any problems, remove this comment entirely
1357 //SetFont( m_font );
1359 if (m_textForegroundColour
.Ok())
1361 unsigned char red
= m_textForegroundColour
.Red();
1362 unsigned char blue
= m_textForegroundColour
.Blue();
1363 unsigned char green
= m_textForegroundColour
.Green();
1367 // Anything not white is black
1368 if (! (red
== (unsigned char) 255 &&
1369 blue
== (unsigned char) 255 &&
1370 green
== (unsigned char) 255))
1372 red
= (unsigned char) 0;
1373 green
= (unsigned char) 0;
1374 blue
= (unsigned char) 0;
1378 // maybe setgray here ?
1379 if (!(red
== m_currentRed
&& green
== m_currentGreen
&& blue
== m_currentBlue
))
1381 double redPS
= (double)(red
) / 255.0;
1382 double bluePS
= (double)(blue
) / 255.0;
1383 double greenPS
= (double)(green
) / 255.0;
1387 "%.8f %.8f %.8f setrgbcolor\n",
1388 redPS
, greenPS
, bluePS
);
1389 for (int i
= 0; i
< 100; i
++)
1390 if (buffer
[i
] == ',') buffer
[i
] = '.';
1391 fprintf( m_pstream
, buffer
);
1394 m_currentBlue
= blue
;
1395 m_currentGreen
= green
;
1399 int size
= m_font
.GetPointSize();
1401 // wxCoord by = y + (wxCoord)floor( double(size) * 2.0 / 3.0 ); // approximate baseline
1402 // commented by V. Slavik and replaced by accurate version
1403 // - note that there is still rounding error in text_descent!
1404 wxCoord by
= y
+ size
- text_descent
; // baseline
1405 fprintf( m_pstream
, "%d %d moveto\n", LogicalToDeviceX(x
), LogicalToDeviceY(by
) );
1407 fprintf( m_pstream
, "(" );
1408 const wxWX2MBbuf textbuf
= text
.mb_str();
1409 size_t len
= strlen(textbuf
);
1411 for (i
= 0; i
< len
; i
++)
1413 int c
= (unsigned char) textbuf
[i
];
1414 if (c
== ')' || c
== '(' || c
== '\\')
1416 /* Cope with special characters */
1417 fprintf( m_pstream
, "\\" );
1418 fputc(c
, m_pstream
);
1420 else if ( c
>= 128 )
1422 /* Cope with character codes > 127 */
1423 fprintf(m_pstream
, "\\%o", c
);
1427 fputc(c
, m_pstream
);
1431 fprintf( m_pstream
, ") show\n" );
1433 if (m_font
.GetUnderlined())
1435 wxCoord uy
= (wxCoord
)(y
+ size
- m_underlinePosition
);
1445 LogicalToDeviceX(x
), LogicalToDeviceY(uy
),
1446 m_underlineThickness
,
1447 LogicalToDeviceX(x
+ text_w
), LogicalToDeviceY(uy
) );
1448 for (i
= 0; i
< 100; i
++)
1449 if (buffer
[i
] == ',') buffer
[i
] = '.';
1450 fprintf( m_pstream
, buffer
);
1453 CalcBoundingBox( x
, y
);
1454 CalcBoundingBox( x
+ size
* text
.Length() * 2/3 , y
);
1458 void wxPostScriptDC::DoDrawRotatedText( const wxString
& text
, wxCoord x
, wxCoord y
, double angle
)
1462 DoDrawText(text
, x
, y
);
1466 wxCHECK_RET( m_ok
&& m_pstream
, wxT("invalid postscript dc") );
1470 if (m_textForegroundColour
.Ok())
1472 unsigned char red
= m_textForegroundColour
.Red();
1473 unsigned char blue
= m_textForegroundColour
.Blue();
1474 unsigned char green
= m_textForegroundColour
.Green();
1478 // Anything not white is black
1479 if (! (red
== (unsigned char) 255 &&
1480 blue
== (unsigned char) 255 &&
1481 green
== (unsigned char) 255))
1483 red
= (unsigned char) 0;
1484 green
= (unsigned char) 0;
1485 blue
= (unsigned char) 0;
1489 // maybe setgray here ?
1490 if (!(red
== m_currentRed
&& green
== m_currentGreen
&& blue
== m_currentBlue
))
1492 double redPS
= (double)(red
) / 255.0;
1493 double bluePS
= (double)(blue
) / 255.0;
1494 double greenPS
= (double)(green
) / 255.0;
1498 "%.8f %.8f %.8f setrgbcolor\n",
1499 redPS
, greenPS
, bluePS
);
1500 for (int i
= 0; i
< 100; i
++)
1501 if (buffer
[i
] == ',') buffer
[i
] = '.';
1502 fprintf( m_pstream
, buffer
);
1505 m_currentBlue
= blue
;
1506 m_currentGreen
= green
;
1510 int size
= m_font
.GetPointSize();
1512 long by
= y
+ (long)floor( double(size
) * 2.0 / 3.0 ); // approximate baseline
1514 // FIXME only correct for 90 degrees
1515 fprintf(m_pstream
, "%d %d moveto\n",
1516 LogicalToDeviceX((wxCoord
)(x
+ size
)), LogicalToDeviceY((wxCoord
)by
) );
1519 sprintf(buffer
, "%.8f rotate\n", angle
);
1521 for (i
= 0; i
< 100; i
++)
1522 if (buffer
[i
] == ',') buffer
[i
] = '.';
1523 fprintf(m_pstream
, buffer
);
1525 fprintf( m_pstream
, "(" );
1526 const wxWX2MBbuf textbuf
= text
.mb_str();
1527 size_t len
= strlen(textbuf
);
1528 for (i
= 0; i
< len
; i
++)
1530 int c
= (unsigned char) textbuf
[i
];
1531 if (c
== ')' || c
== '(' || c
== '\\')
1533 /* Cope with special characters */
1534 fprintf( m_pstream
, "\\" );
1535 fputc(c
, m_pstream
);
1537 else if ( c
>= 128 )
1539 /* Cope with character codes > 127 */
1540 fprintf(m_pstream
, "\\%o", c
);
1544 fputc(c
, m_pstream
);
1548 fprintf( m_pstream
, ") show\n" );
1550 sprintf( buffer
, "%.8f rotate\n", -angle
);
1551 for (i
= 0; i
< 100; i
++)
1552 if (buffer
[i
] == ',') buffer
[i
] = '.';
1553 fprintf( m_pstream
, buffer
);
1555 if (m_font
.GetUnderlined())
1557 wxCoord uy
= (wxCoord
)(y
+ size
- m_underlinePosition
);
1560 GetTextExtent(text
, &w
, &h
);
1569 LogicalToDeviceX(x
), LogicalToDeviceY(uy
),
1570 m_underlineThickness
,
1571 LogicalToDeviceX(x
+ w
), LogicalToDeviceY(uy
) );
1572 for (i
= 0; i
< 100; i
++)
1573 if (buffer
[i
] == ',') buffer
[i
] = '.';
1574 fprintf( m_pstream
, buffer
);
1577 CalcBoundingBox( x
, y
);
1578 CalcBoundingBox( x
+ size
* text
.Length() * 2/3 , y
);
1581 void wxPostScriptDC::SetBackground (const wxBrush
& brush
)
1583 m_backgroundBrush
= brush
;
1586 void wxPostScriptDC::SetLogicalFunction (int WXUNUSED(function
))
1588 wxFAIL_MSG( wxT("wxPostScriptDC::SetLogicalFunction not implemented.") );
1591 void wxPostScriptDC::DoDrawSpline( wxList
*points
)
1593 wxCHECK_RET( m_ok
&& m_pstream
, wxT("invalid postscript dc") );
1597 double a
, b
, c
, d
, x1
, y1
, x2
, y2
, x3
, y3
;
1600 wxNode
*node
= points
->First();
1601 p
= (wxPoint
*)node
->Data();
1605 node
= node
->Next();
1606 p
= (wxPoint
*)node
->Data();
1609 x3
= a
= (double)(x1
+ c
) / 2;
1610 y3
= b
= (double)(y1
+ d
) / 2;
1616 LogicalToDeviceX((wxCoord
)x1
), LogicalToDeviceY((wxCoord
)y1
),
1617 LogicalToDeviceX((wxCoord
)x3
), LogicalToDeviceY((wxCoord
)y3
) );
1619 CalcBoundingBox( (wxCoord
)x1
, (wxCoord
)y1
);
1620 CalcBoundingBox( (wxCoord
)x3
, (wxCoord
)y3
);
1622 while ((node
= node
->Next()) != NULL
)
1624 q
= (wxPoint
*)node
->Data();
1632 x3
= (double)(x2
+ c
) / 2;
1633 y3
= (double)(y2
+ d
) / 2;
1636 "%d %d %d %d %d %d DrawSplineSection\n",
1637 LogicalToDeviceX((wxCoord
)x1
), LogicalToDeviceY((wxCoord
)y1
),
1638 LogicalToDeviceX((wxCoord
)x2
), LogicalToDeviceY((wxCoord
)y2
),
1639 LogicalToDeviceX((wxCoord
)x3
), LogicalToDeviceY((wxCoord
)y3
) );
1641 CalcBoundingBox( (wxCoord
)x1
, (wxCoord
)y1
);
1642 CalcBoundingBox( (wxCoord
)x3
, (wxCoord
)y3
);
1646 At this point, (x2,y2) and (c,d) are the position of the
1647 next-to-last and last point respectively, in the point list
1653 LogicalToDeviceX((wxCoord
)c
), LogicalToDeviceY((wxCoord
)d
) );
1656 wxCoord
wxPostScriptDC::GetCharWidth() const
1658 // Chris Breeze: reasonable approximation using wxMODERN/Courier
1659 return (wxCoord
) (GetCharHeight() * 72.0 / 120.0);
1663 void wxPostScriptDC::SetAxisOrientation( bool xLeftRight
, bool yBottomUp
)
1665 wxCHECK_RET( m_ok
&& m_pstream
, wxT("invalid postscript dc") );
1667 m_signX
= (xLeftRight
? 1 : -1);
1668 m_signY
= (yBottomUp
? 1 : -1);
1670 // FIXME there is no such function in MSW nor in OS2/PM
1671 #if !defined(__WXMSW__) && !defined(__WXPM__)
1672 ComputeScaleAndOrigin();
1676 void wxPostScriptDC::SetDeviceOrigin( wxCoord x
, wxCoord y
)
1678 wxCHECK_RET( m_ok
&& m_pstream
, wxT("invalid postscript dc") );
1684 wxDC::SetDeviceOrigin( x
, h
-y
);
1687 void wxPostScriptDC::DoGetSize(int* width
, int* height
) const
1689 wxPaperSize id
= m_printData
.GetPaperId();
1691 wxPrintPaperType
*paper
= wxThePrintPaperDatabase
->FindPaperType(id
);
1693 if (!paper
) paper
= wxThePrintPaperDatabase
->FindPaperType(wxPAPER_A4
);
1699 w
= paper
->GetSizeDeviceUnits().x
;
1700 h
= paper
->GetSizeDeviceUnits().y
;
1703 if (m_printData
.GetOrientation() == wxLANDSCAPE
)
1710 if (width
) *width
= (int)(w
* ms_PSScaleFactor
);
1711 if (height
) *height
= (int)(h
* ms_PSScaleFactor
);
1714 void wxPostScriptDC::DoGetSizeMM(int *width
, int *height
) const
1716 wxPaperSize id
= m_printData
.GetPaperId();
1718 wxPrintPaperType
*paper
= wxThePrintPaperDatabase
->FindPaperType(id
);
1720 if (!paper
) paper
= wxThePrintPaperDatabase
->FindPaperType(wxPAPER_A4
);
1726 w
= paper
->GetWidth() / 10;
1727 h
= paper
->GetHeight() / 10;
1730 if (m_printData
.GetOrientation() == wxLANDSCAPE
)
1737 if (width
) *width
= w
;
1738 if (height
) *height
= h
;
1741 // Resolution in pixels per logical inch
1742 wxSize
wxPostScriptDC::GetPPI(void) const
1744 return wxSize((int)(72 * ms_PSScaleFactor
),
1745 (int)(72 * ms_PSScaleFactor
));
1749 bool wxPostScriptDC::StartDoc( const wxString
& message
)
1751 wxCHECK_MSG( m_ok
, FALSE
, wxT("invalid postscript dc") );
1753 if (m_printData
.GetFilename() == "")
1755 wxString filename
= wxGetTempFileName("ps");
1756 m_printData
.SetFilename(filename
);
1759 m_pstream
= wxFopen( m_printData
.GetFilename().c_str(), wxT("w+") ); // FIXME: use fn_str() here under Unicode?
1763 wxLogError( _("Cannot open file for PostScript printing!"));
1770 fprintf( m_pstream
, "%%!PS-Adobe-2.0\n" );
1771 fprintf( m_pstream
, "%%%%Title: %s\n", (const char *) m_title
.ToAscii() );
1772 fprintf( m_pstream
, "%%%%Creator: wxWindows PostScript renderer\n" );
1773 fprintf( m_pstream
, "%%%%CreationDate: %s\n", (const char *) wxNow().ToAscii() );
1774 if (m_printData
.GetOrientation() == wxLANDSCAPE
)
1775 fprintf( m_pstream
, "%%%%Orientation: Landscape\n" );
1777 fprintf( m_pstream
, "%%%%Orientation: Portrait\n" );
1779 // fprintf( m_pstream, "%%%%Pages: %d\n", (wxPageNumber - 1) );
1781 // wxPaperSize ps = m_printData.GetPaperId();
1783 fprintf( m_pstream
, "%%%%DocumentPaperSizes: %s\n", "A4" );
1784 fprintf( m_pstream
, "%%%%EndComments\n\n" );
1786 fprintf( m_pstream
, "%%%%BeginProlog\n" );
1787 fprintf( m_pstream
, wxPostScriptHeaderConicTo
);
1788 fprintf( m_pstream
, wxPostScriptHeaderEllipse
);
1789 fprintf( m_pstream
, wxPostScriptHeaderEllipticArc
);
1790 fprintf( m_pstream
, wxPostScriptHeaderColourImage
);
1792 fprintf( m_pstream
, wxPostScriptHeaderReencodeISO1
);
1793 fprintf( m_pstream
, wxPostScriptHeaderReencodeISO2
);
1795 if (wxPostScriptHeaderSpline
)
1796 fprintf( m_pstream
, wxPostScriptHeaderSpline
);
1797 fprintf( m_pstream
, "%%%%EndProlog\n" );
1799 SetBrush( *wxBLACK_BRUSH
);
1800 SetPen( *wxBLACK_PEN
);
1801 SetBackground( *wxWHITE_BRUSH
);
1802 SetTextForeground( *wxBLACK
);
1804 // set origin according to paper size
1805 SetDeviceOrigin( 0,0 );
1813 void wxPostScriptDC::EndDoc ()
1815 wxCHECK_RET( m_ok
&& m_pstream
, wxT("invalid postscript dc") );
1820 fprintf( m_pstream
, "grestore\n" );
1823 fclose( m_pstream
);
1824 m_pstream
= (FILE *) NULL
;
1827 // THE FOLLOWING HAS BEEN CONTRIBUTED BY Andy Fyfe <andy@hyperparallel.com>
1828 wxCoord wx_printer_translate_x
, wx_printer_translate_y
;
1829 double wx_printer_scale_x
, wx_printer_scale_y
;
1831 wx_printer_translate_x
= (wxCoord
)m_printData
.GetPrinterTranslateX();
1832 wx_printer_translate_y
= (wxCoord
)m_printData
.GetPrinterTranslateY();
1834 wx_printer_scale_x
= m_printData
.GetPrinterScaleX();
1835 wx_printer_scale_y
= m_printData
.GetPrinterScaleY();
1837 // Compute the bounding box. Note that it is in the default user
1838 // coordinate system, thus we have to convert the values.
1839 wxCoord minX
= (wxCoord
) LogicalToDeviceX(m_minX
);
1840 wxCoord minY
= (wxCoord
) LogicalToDeviceY(m_minY
);
1841 wxCoord maxX
= (wxCoord
) LogicalToDeviceX(m_maxX
);
1842 wxCoord maxY
= (wxCoord
) LogicalToDeviceY(m_maxY
);
1844 // LOG2DEV may have changed the minimum to maximum vice versa
1845 if ( minX
> maxX
) { wxCoord tmp
= minX
; minX
= maxX
; maxX
= tmp
; }
1846 if ( minY
> maxY
) { wxCoord tmp
= minY
; minY
= maxY
; maxY
= tmp
; }
1848 // account for used scaling (boundingbox is before scaling in ps-file)
1849 double scale_x
= m_printData
.GetPrinterScaleX() / ms_PSScaleFactor
;
1850 double scale_y
= m_printData
.GetPrinterScaleY() / ms_PSScaleFactor
;
1852 wxCoord llx
, lly
, urx
, ury
;
1853 llx
= (wxCoord
) ((minX
+wx_printer_translate_x
)*scale_x
);
1854 lly
= (wxCoord
) ((minY
+wx_printer_translate_y
)*scale_y
);
1855 urx
= (wxCoord
) ((maxX
+wx_printer_translate_x
)*scale_x
);
1856 ury
= (wxCoord
) ((maxY
+wx_printer_translate_y
)*scale_y
);
1857 // (end of bounding box computation)
1860 // If we're landscape, our sense of "x" and "y" is reversed.
1861 if (m_printData
.GetOrientation() == wxLANDSCAPE
)
1864 tmp
= llx
; llx
= lly
; lly
= tmp
;
1865 tmp
= urx
; urx
= ury
; ury
= tmp
;
1867 // We need either the two lines that follow, or we need to subtract
1868 // min_x from real_translate_y, which is commented out below.
1869 llx
= llx
- (wxCoord
)(m_minX
*wx_printer_scale_y
);
1870 urx
= urx
- (wxCoord
)(m_minX
*wx_printer_scale_y
);
1873 // The Adobe specifications call for integers; we round as to make
1874 // the bounding larger.
1876 "%%%%BoundingBox: %d %d %d %d\n",
1877 (wxCoord
)floor((double)llx
), (wxCoord
)floor((double)lly
),
1878 (wxCoord
)ceil((double)urx
), (wxCoord
)ceil((double)ury
) );
1880 // To check the correctness of the bounding box, postscript commands
1881 // to draw a box corresponding to the bounding box are generated below.
1882 // But since we typically don't want to print such a box, the postscript
1883 // commands are generated within comments. These lines appear before any
1884 // adjustment of scale, rotation, or translation, and hence are in the
1885 // default user coordinates.
1886 fprintf( m_pstream
, "%% newpath\n" );
1887 fprintf( m_pstream
, "%% %d %d moveto\n", llx
, lly
);
1888 fprintf( m_pstream
, "%% %d %d lineto\n", urx
, lly
);
1889 fprintf( m_pstream
, "%% %d %d lineto\n", urx
, ury
);
1890 fprintf( m_pstream
, "%% %d %d lineto closepath stroke\n", llx
, ury
);
1893 #if defined(__X__) || defined(__WXGTK__)
1897 command
+= m_printData
.GetPrinterCommand();
1898 command
+= wxT(" ");
1899 command
+= m_printData
.GetFilename();
1901 wxExecute( command
, TRUE
);
1902 wxRemoveFile( m_printData
.GetFilename() );
1907 void wxPostScriptDC::StartPage()
1909 wxCHECK_RET( m_ok
&& m_pstream
, wxT("invalid postscript dc") );
1911 fprintf( m_pstream
, "%%%%Page: %d\n", wxPageNumber
++ );
1913 // What is this one supposed to do? RR.
1914 // *m_pstream << "matrix currentmatrix\n";
1916 // Added by Chris Breeze
1918 // Each page starts with an "initgraphics" which resets the
1919 // transformation and so we need to reset the origin
1920 // (and rotate the page for landscape printing)
1923 wxCoord translate_x
, translate_y
;
1924 double scale_x
, scale_y
;
1926 translate_x
= (wxCoord
)m_printData
.GetPrinterTranslateX();
1927 translate_y
= (wxCoord
)m_printData
.GetPrinterTranslateY();
1929 scale_x
= m_printData
.GetPrinterScaleX();
1930 scale_y
= m_printData
.GetPrinterScaleY();
1932 if (m_printData
.GetOrientation() == wxLANDSCAPE
)
1935 GetSize( (int*) NULL
, &h
);
1937 fprintf( m_pstream
, "90 rotate\n" );
1939 // I copied this one from a PostScript tutorial, but to no avail. RR.
1940 // fprintf( m_pstream, "90 rotate llx neg ury nef translate\n" );
1944 sprintf( buffer
, "%.8f %.8f scale\n", scale_x
/ ms_PSScaleFactor
,
1945 scale_y
/ ms_PSScaleFactor
);
1946 for (int i
= 0; i
< 100; i
++)
1947 if (buffer
[i
] == ',') buffer
[i
] = '.';
1948 fprintf( m_pstream
, buffer
);
1950 fprintf( m_pstream
, "%d %d translate\n", translate_x
, translate_y
);
1953 void wxPostScriptDC::EndPage ()
1955 wxCHECK_RET( m_ok
&& m_pstream
, wxT("invalid postscript dc") );
1957 fprintf( m_pstream
, "showpage\n" );
1960 bool wxPostScriptDC::DoBlit( wxCoord xdest
, wxCoord ydest
,
1961 wxCoord fwidth
, wxCoord fheight
,
1963 wxCoord xsrc
, wxCoord ysrc
,
1964 int rop
, bool WXUNUSED(useMask
), wxCoord
WXUNUSED(xsrcMask
), wxCoord
WXUNUSED(ysrcMask
) )
1966 wxCHECK_MSG( m_ok
&& m_pstream
, FALSE
, wxT("invalid postscript dc") );
1968 wxCHECK_MSG( source
, FALSE
, wxT("invalid source dc") );
1970 /* blit into a bitmap */
1971 wxBitmap
bitmap( (int)fwidth
, (int)fheight
);
1973 memDC
.SelectObject(bitmap
);
1974 memDC
.Blit(0, 0, fwidth
, fheight
, source
, xsrc
, ysrc
, rop
); /* TODO: Blit transparently? */
1975 memDC
.SelectObject(wxNullBitmap
);
1977 /* draw bitmap. scaling and positioning is done there */
1978 DrawBitmap( bitmap
, xdest
, ydest
);
1983 wxCoord
wxPostScriptDC::GetCharHeight() const
1986 return m_font
.GetPointSize();
1991 void wxPostScriptDC::DoGetTextExtent(const wxString
& string
,
1992 wxCoord
*x
, wxCoord
*y
,
1993 wxCoord
*descent
, wxCoord
*externalLeading
,
1994 wxFont
*theFont
) const
1996 wxFont
*fontToUse
= theFont
;
1998 if (!fontToUse
) fontToUse
= (wxFont
*) &m_font
;
2000 wxCHECK_RET( fontToUse
, wxT("GetTextExtent: no font defined") );
2002 const wxWX2MBbuf strbuf
= string
.mb_str();
2004 #if !wxUSE_AFM_FOR_POSTSCRIPT
2005 /* Provide a VERY rough estimate (avoid using it).
2006 * Produces accurate results for mono-spaced font
2007 * such as Courier (aka wxMODERN) */
2012 height
= fontToUse
->GetPointSize();
2015 *x
= strlen (strbuf
) * height
* 72 / 120;
2017 *y
= (wxCoord
) (height
* 1.32); /* allow for descender */
2018 if (descent
) *descent
= 0;
2019 if (externalLeading
) *externalLeading
= 0;
2022 /* method for calculating string widths in postscript:
2023 / read in the AFM (adobe font metrics) file for the
2024 / actual font, parse it and extract the character widths
2025 / and also the descender. this may be improved, but for now
2026 / it works well. the AFM file is only read in if the
2027 / font is changed. this may be chached in the future.
2028 / calls to GetTextExtent with the font unchanged are rather
2031 / for each font and style used there is an AFM file necessary.
2032 / currently i have only files for the roman font family.
2033 / I try to get files for the other ones!
2035 / CAVE: the size of the string is currently always calculated
2036 / in 'points' (1/72 of an inch). this should later on be
2037 / changed to depend on the mapping mode.
2038 / CAVE: the path to the AFM files must be set before calling this
2039 / function. this is usually done by a call like the following:
2040 / wxSetAFMPath("d:\\wxw161\\afm\\");
2044 / wxPostScriptDC dc(NULL, TRUE);
2046 / wxSetAFMPath("d:\\wxw161\\afm\\");
2047 / dc.StartDoc("Test");
2050 / dc.SetFont(new wxFont(10, wxROMAN, wxNORMAL, wxNORMAL));
2051 / dc.GetTextExtent("Hallo",&w,&h);
2056 / by steve (stefan.hammes@urz.uni-heidelberg.de)
2058 / updated: 14.05.95 */
2060 /* these static vars are for storing the state between calls */
2061 static int lastFamily
= INT_MIN
;
2062 static int lastSize
= INT_MIN
;
2063 static int lastStyle
= INT_MIN
;
2064 static int lastWeight
= INT_MIN
;
2065 static int lastDescender
= INT_MIN
;
2066 static int lastWidths
[256]; /* widths of the characters */
2068 double UnderlinePosition
= 0.0;
2069 double UnderlineThickness
= 0.0;
2071 // Get actual parameters
2072 int Family
= fontToUse
->GetFamily();
2073 int Size
= fontToUse
->GetPointSize();
2074 int Style
= fontToUse
->GetStyle();
2075 int Weight
= fontToUse
->GetWeight();
2077 // If we have another font, read the font-metrics
2078 if (Family
!=lastFamily
|| Size
!=lastSize
|| Style
!=lastStyle
|| Weight
!=lastWeight
)
2080 // Store actual values
2081 lastFamily
= Family
;
2084 lastWeight
= Weight
;
2086 const char *name
= NULL
;
2093 if ((Style
== wxITALIC
) && (Weight
== wxBOLD
)) name
= "CourBoO.afm";
2094 else if ((Style
!= wxITALIC
) && (Weight
== wxBOLD
)) name
= "CourBo.afm";
2095 else if ((Style
== wxITALIC
) && (Weight
!= wxBOLD
)) name
= "CourO.afm";
2096 else name
= "Cour.afm";
2101 if ((Style
== wxITALIC
) && (Weight
== wxBOLD
)) name
= "TimesBoO.afm";
2102 else if ((Style
!= wxITALIC
) && (Weight
== wxBOLD
)) name
= "TimesBo.afm";
2103 else if ((Style
== wxITALIC
) && (Weight
!= wxBOLD
)) name
= "TimesO.afm";
2104 else name
= "TimesRo.afm";
2116 if ((Style
== wxITALIC
) && (Weight
== wxBOLD
)) name
= "HelvBoO.afm";
2117 else if ((Style
!= wxITALIC
) && (Weight
== wxBOLD
)) name
= "HelvBo.afm";
2118 else if ((Style
== wxITALIC
) && (Weight
!= wxBOLD
)) name
= "HelvO.afm";
2119 else name
= "Helv.afm";
2124 FILE *afmFile
= NULL
;
2126 // Get the directory of the AFM files
2128 if (!m_printData
.GetFontMetricPath().IsEmpty())
2130 afmName
= m_printData
.GetFontMetricPath();
2131 afmName
<< wxFILE_SEP_PATH
<< name
;
2132 afmFile
= wxFopen(afmName
,wxT("r"));
2135 #if defined(__UNIX__) && !defined(__VMS__)
2138 afmName
= wxGetDataDir();
2139 afmName
<< wxFILE_SEP_PATH
2140 #if defined(__LINUX__) || defined(__FREEBSD__)
2141 << wxT("gs_afm") << wxFILE_SEP_PATH
2143 << wxT("afm") << wxFILE_SEP_PATH
2146 afmFile
= wxFopen(afmName
,wxT("r"));
2150 /* 2. open and process the file
2151 / a short explanation of the AFM format:
2152 / we have for each character a line, which gives its size
2155 / C 63 ; WX 444 ; N question ; B 49 -14 395 676 ;
2157 / that means, we have a character with ascii code 63, and width
2158 / (444/1000 * fontSize) points.
2159 / the other data is ignored for now!
2161 / when the font has changed, we read in the right AFM file and store the
2162 / character widths in an array, which is processed below (see point 3.). */
2165 wxLogDebug( wxT("GetTextExtent: can't open AFM file '%s'"), afmName
.c_str() );
2166 wxLogDebug( wxT(" using approximate values"));
2167 for (int i
=0; i
<256; i
++) lastWidths
[i
] = 500; /* an approximate value */
2168 lastDescender
= -150; /* dito. */
2172 /* init the widths array */
2173 for(int i
=0; i
<256; i
++) lastWidths
[i
] = INT_MIN
;
2174 /* some variables for holding parts of a line */
2175 char cString
[10],semiString
[10],WXString
[10],descString
[20];
2176 char upString
[30], utString
[30], encString
[50];
2179 /* read in the file and parse it */
2180 while(fgets(line
,sizeof(line
),afmFile
)!=NULL
)
2182 /* A.) check for descender definition */
2183 if (strncmp(line
,"Descender",9)==0)
2185 if ((sscanf(line
,"%s%d",descString
,&lastDescender
)!=2) ||
2186 (strcmp(descString
,"Descender")!=0))
2188 wxLogDebug( wxT("AFM-file '%s': line '%s' has error (bad descender)"), afmName
.c_str(),line
);
2191 /* JC 1.) check for UnderlinePosition */
2192 else if(strncmp(line
,"UnderlinePosition",17)==0)
2194 if ((sscanf(line
,"%s%lf",upString
,&UnderlinePosition
)!=2) ||
2195 (strcmp(upString
,"UnderlinePosition")!=0))
2197 wxLogDebug( wxT("AFM-file '%s': line '%s' has error (bad UnderlinePosition)"), afmName
.c_str(), line
);
2200 /* JC 2.) check for UnderlineThickness */
2201 else if(strncmp(line
,"UnderlineThickness",18)==0)
2203 if ((sscanf(line
,"%s%lf",utString
,&UnderlineThickness
)!=2) ||
2204 (strcmp(utString
,"UnderlineThickness")!=0))
2206 wxLogDebug( wxT("AFM-file '%s': line '%s' has error (bad UnderlineThickness)"), afmName
.c_str(), line
);
2209 /* JC 3.) check for EncodingScheme */
2210 else if(strncmp(line
,"EncodingScheme",14)==0)
2212 if ((sscanf(line
,"%s%s",utString
,encString
)!=2) ||
2213 (strcmp(utString
,"EncodingScheme")!=0))
2215 wxLogDebug( wxT("AFM-file '%s': line '%s' has error (bad EncodingScheme)"), afmName
.c_str(), line
);
2217 else if (strncmp(encString
, "AdobeStandardEncoding", 21))
2219 wxLogDebug( wxT("AFM-file '%s': line '%s' has error (unsupported EncodingScheme %s)"),
2220 afmName
.c_str(),line
, encString
);
2223 /* B.) check for char-width */
2224 else if(strncmp(line
,"C ",2)==0)
2226 if (sscanf(line
,"%s%d%s%s%d",cString
,&ascii
,semiString
,WXString
,&cWidth
)!=5)
2228 wxLogDebug(wxT("AFM-file '%s': line '%s' has an error (bad character width)"),afmName
.c_str(),line
);
2230 if(strcmp(cString
,"C")!=0 || strcmp(semiString
,";")!=0 || strcmp(WXString
,"WX")!=0)
2232 wxLogDebug(wxT("AFM-file '%s': line '%s' has a format error"),afmName
.c_str(),line
);
2234 /* printf(" char '%c'=%d has width '%d'\n",ascii,ascii,cWidth); */
2235 if (ascii
>=0 && ascii
<256)
2237 lastWidths
[ascii
] = cWidth
; /* store width */
2241 /* MATTHEW: this happens a lot; don't print an error */
2242 /* wxLogDebug("AFM-file '%s': ASCII value %d out of range",afmName.c_str(),ascii); */
2245 /* C.) ignore other entries. */
2249 /* hack to compute correct values for german 'Umlaute'
2250 / the correct way would be to map the character names
2251 / like 'adieresis' to corresp. positions of ISOEnc and read
2252 / these values from AFM files, too. Maybe later ... */
2253 lastWidths
[196] = lastWidths
['A']; // Ä
2254 lastWidths
[228] = lastWidths
['a']; // ä
2255 lastWidths
[214] = lastWidths
['O']; // Ö
2256 lastWidths
[246] = lastWidths
['o']; // ö
2257 lastWidths
[220] = lastWidths
['U']; // Ü
2258 lastWidths
[252] = lastWidths
['u']; // ü
2259 lastWidths
[223] = lastWidths
[251]; // ß
2261 /* JC: calculate UnderlineThickness/UnderlinePosition */
2263 // VS: dirty, but is there any better solution?
2265 pt
= (double*) &m_underlinePosition
;
2266 *pt
= LogicalToDeviceYRel((wxCoord
)(UnderlinePosition
* fontToUse
->GetPointSize())) / 1000.0f
;
2267 pt
= (double*) &m_underlineThickness
;
2268 *pt
= LogicalToDeviceYRel((wxCoord
)(UnderlineThickness
* fontToUse
->GetPointSize())) / 1000.0f
;
2273 /* 3. now the font metrics are read in, calc size this
2274 / is done by adding the widths of the characters in the
2275 / string. they are given in 1/1000 of the size! */
2278 wxCoord height
=Size
; /* by default */
2280 for(p
=(unsigned char *)wxMBSTRINGCAST strbuf
; *p
; p
++)
2282 if(lastWidths
[*p
]== INT_MIN
)
2284 wxLogDebug(wxT("GetTextExtent: undefined width for character '%c' (%d)"), *p
,*p
);
2285 sum
+= lastWidths
[' ']; /* assume space */
2289 sum
+= lastWidths
[*p
];
2293 double widthSum
= sum
;
2295 widthSum
/= 1000.0F
;
2297 /* add descender to height (it is usually a negative value) */
2298 //if (lastDescender != INT_MIN)
2300 // height += (wxCoord)(((-lastDescender)/1000.0F) * Size); /* MATTHEW: forgot scale */
2302 // - commented by V. Slavik - height already contains descender in it
2303 // (judging from few experiments)
2305 /* return size values */
2307 *x
= (wxCoord
)widthSum
;
2311 /* return other parameters */
2314 if(lastDescender
!=INT_MIN
)
2316 *descent
= (wxCoord
)(((-lastDescender
)/1000.0F
) * Size
); /* MATTHEW: forgot scale */
2324 /* currently no idea how to calculate this! */
2325 if (externalLeading
) *externalLeading
= 0;
2334 // wxUSE_PRINTING_ARCHITECTURE