+#ifdef __WXGTK20__
+
+#include "wx/gtk/private.h"
+#include "wx/fontutil.h"
+#include "gtk/gtk.h"
+#include <pango/pangoft2.h>
+#include <freetype/ftglyph.h>
+
+#ifndef FT_Outline_Decompose
+ FT_EXPORT( FT_Error ) FT_Outline_Decompose(
+ FT_Outline* outline,
+ const FT_Outline_Funcs* interface,
+ void* user );
+#endif
+
+typedef struct _OutlineInfo OutlineInfo;
+struct _OutlineInfo {
+ FILE *OUT;
+ FT_Vector glyph_origin;
+ int dpi;
+};
+
+static int paps_move_to( FT_Vector* to,
+ void *user_data)
+{
+ OutlineInfo *outline_info = (OutlineInfo*)user_data;
+ fprintf(outline_info->OUT, "%d %d moveto\n",
+ (int)to->x ,
+ (int)to->y );
+ return 0;
+}
+
+static int paps_line_to( FT_Vector* to,
+ void *user_data)
+{
+ OutlineInfo *outline_info = (OutlineInfo*)user_data;
+ fprintf(outline_info->OUT, "%d %d lineto\n",
+ (int)to->x ,
+ (int)to->y );
+ return 0;
+}
+
+static int paps_conic_to( FT_Vector* control,
+ FT_Vector* to,
+ void *user_data)
+{
+ OutlineInfo *outline_info = (OutlineInfo*)user_data;
+ fprintf(outline_info->OUT, "%d %d %d %d conicto\n",
+ (int)control->x ,
+ (int)control->y ,
+ (int)to->x ,
+ (int)to->y );
+ return 0;
+}
+
+static int paps_cubic_to( FT_Vector* control1,
+ FT_Vector* control2,
+ FT_Vector* to,
+ void *user_data)
+{
+ OutlineInfo *outline_info = (OutlineInfo*)user_data;
+ fprintf(outline_info->OUT,
+ "%d %d %d %d %d %d curveto\n",
+ (int)control1->x ,
+ (int)control1->y ,
+ (int)control2->x ,
+ (int)control2->y ,
+ (int)to->x ,
+ (int)to->y );
+ return 0;
+}
+
+static void draw_bezier_outline(FILE *OUT,
+ int dpi,
+ FT_Face face,
+ FT_UInt glyph_index,
+ wxCoord pos_x,
+ wxCoord pos_y
+ )
+{
+ FT_Int load_flags = FT_LOAD_DEFAULT;
+ FT_Glyph glyph;
+
+ /* Output outline */
+ FT_Outline_Funcs outlinefunc =
+ {
+ paps_move_to,
+ paps_line_to,
+ paps_conic_to,
+ paps_cubic_to
+ };
+ OutlineInfo outline_info;
+
+ outline_info.glyph_origin.x = (FT_Pos) pos_x;
+ outline_info.glyph_origin.y = (FT_Pos) pos_y;
+ outline_info.dpi = dpi;
+ outline_info.OUT = OUT;
+
+ fprintf(OUT, "gsave %d %d translate 0 0 0 setrgbcolor\n", pos_x, pos_y);
+ fprintf(OUT, "start_ol\n");
+
+ FT_Load_Glyph(face, glyph_index, load_flags);
+ FT_Get_Glyph (face->glyph, &glyph);
+ FT_Outline_Decompose (&(((FT_OutlineGlyph)glyph)->outline),
+ &outlinefunc, &outline_info);
+ fprintf(OUT, "end_ol grestore \n");
+
+ FT_Done_Glyph (glyph);
+}
+
+
+#endif
+
+void wxPostScriptDC::DoDrawText( const wxString& text, wxCoord x, wxCoord y )
+{
+ wxCHECK_RET( m_ok && m_pstream, wxT("invalid postscript dc") );
+
+#ifdef __WXGTK20__
+ int dpi = GetResolution() * 2;
+
+ PangoContext *context = pango_ft2_get_context ( dpi, dpi );
+
+ // What are these for?
+ pango_context_set_language (context, pango_language_from_string ("en_US"));
+ pango_context_set_base_dir (context, PANGO_DIRECTION_LTR );
+
+ // Set the font
+ pango_context_set_font_description (context, m_font.GetNativeFontInfo()->description );
+
+ // Create layout
+ PangoLayout *layout = layout = pango_layout_new (context);
+#if wxUSE_UNICODE
+ wxCharBuffer buffer = wxConvUTF8.cWC2MB( text );
+#else
+ wxCharBuffer buffer = wxConvUTF8.cWC2MB( wxConvLocal.cWX2WC( text ) );
+#endif
+ pango_layout_set_text( layout, (const char*) buffer, strlen(buffer) );
+
+#if 1
+ double xx = LogicalToDeviceX(x);
+ double yy = LogicalToDeviceY(y /*+ bitmap.GetHeight()*/ );
+
+ // Loop over lines in layout
+ int num_lines = pango_layout_get_line_count( layout );
+ for (int i = 0; i < num_lines; i++)
+ {
+ PangoLayoutLine *line = pango_layout_get_line( layout, i );
+
+ // Loop over runs in line
+ GSList *runs_list = line->runs;
+ while (runs_list)
+ {
+ PangoLayoutRun *run = (PangoLayoutRun*) runs_list->data;
+ PangoItem *item = run->item;
+ PangoGlyphString *glyphs = run->glyphs;
+ PangoAnalysis *analysis = &item->analysis;
+ PangoFont *font = analysis->font;
+ FT_Face ft_face = pango_ft2_font_get_face(font);
+
+ int num_glyphs = glyphs->num_glyphs;
+ for (int glyph_idx = 0; glyph_idx < num_glyphs; glyph_idx++)
+ {
+ PangoGlyphGeometry geometry = glyphs->glyphs[glyph_idx].geometry;
+ double pos_x = xx + 1.0 * geometry.x_offset / PANGO_SCALE;
+ double pos_y = yy - 1.0 * geometry.y_offset / PANGO_SCALE;
+ xx += 1.0 * geometry.width / PANGO_SCALE;
+
+ draw_bezier_outline( m_pstream, dpi, ft_face,
+ (FT_UInt)(glyphs->glyphs[glyph_idx].glyph),
+ (wxCoord)pos_x, (wxCoord)pos_y );
+ }
+ runs_list = runs_list->next;
+ }
+ }
+#else
+ // Find out extent for the bitmap
+ int height = 0;
+ int width = 0;
+ PangoRectangle logical_rect;
+ pango_layout_get_extents (layout, NULL, &logical_rect);
+ height = PANGO_PIXELS (logical_rect.height);
+ width = PANGO_PIXELS (logical_rect.width);
+
+ // printf( "h %d w %d lh %d lw %d\n", height, width, logical_rect.height, logical_rect.width );
+
+ // Allocate FreeType 2 bitmap
+ int byte_width = (width + 7)/8 * 8;
+ FT_Bitmap bitmap;
+ guchar *buf = (guchar*) g_malloc (byte_width * height);
+ memset (buf, 0x00, byte_width * height);
+ bitmap.rows = height;
+ bitmap.width = byte_width;
+ bitmap.pitch = byte_width;
+ bitmap.buffer = buf;
+ bitmap.num_grays = 256;
+ bitmap.pixel_mode = ft_pixel_mode_grays;
+
+ // Render bitmap
+ pango_ft2_render_layout (&bitmap, layout, 0, 0);
+
+ // Invert bitmap to get black text on white background
+ for (int pix_idx = 0; pix_idx < width * height; pix_idx++)
+ buf[pix_idx] = 255-buf[pix_idx];
+
+ // Write PS output
+ wxCoord xx = LogicalToDeviceX(x);
+ wxCoord yy = LogicalToDeviceY(y /*+ bitmap.GetHeight()*/ );
+
+ fprintf(m_pstream, "gsave\n");
+ fprintf(m_pstream, "%d %d translate\n", xx, yy);
+ fprintf(m_pstream, "/img_width %d def\n", bitmap.width);
+ fprintf(m_pstream, "/img_height %d def\n", bitmap.rows);
+ fprintf(m_pstream, "/picstr img_width 8 idiv string def\n");
+
+ fprintf(m_pstream,
+ " img_width 72 15 div mul\n"
+ " img_height 72 15 div mul scale\n"
+ " 0 setgray\n"
+ " img_width img_height\n"
+ " true\n"
+ " [img_width 0 0 img_height neg 0 img_height 0.67 mul]\n"
+ " { currentfile\n"
+ " picstr readhexstring pop }\n"
+ " imagemask"
+ );
+
+
+ for (int b_idx= 0; b_idx < bitmap.width/8 * bitmap.rows; b_idx++)
+ {
+ guchar packed_b = 0;
+ int bit_idx;
+
+ if (b_idx % (bitmap.width/8) == 0)
+ fprintf(m_pstream, "\n");
+
+ for (bit_idx = 0; bit_idx < 8; bit_idx++)
+ {
+ guchar this_bit = bitmap.buffer[b_idx * 8+bit_idx]<128;
+ packed_b = (packed_b << 1) + this_bit;
+ }
+ fprintf(m_pstream, "%02x", packed_b);
+ }
+
+ fprintf(m_pstream, "\ngrestore\n" );
+
+ // Free memory
+ g_free( buf );
+#endif
+
+#else
+ wxCoord text_w, text_h, text_descent;
+
+ GetTextExtent(text, &text_w, &text_h, &text_descent);
+
+ // VZ: this seems to be unnecessary, so taking it out for now, if it
+ // doesn't create any problems, remove this comment entirely
+ //SetFont( m_font );
+
+ if (m_textForegroundColour.Ok())
+ {
+ unsigned char red = m_textForegroundColour.Red();
+ unsigned char blue = m_textForegroundColour.Blue();
+ unsigned char green = m_textForegroundColour.Green();
+
+ if (!m_colour)
+ {
+ // Anything not white is black
+ if (! (red == (unsigned char) 255 &&
+ blue == (unsigned char) 255 &&
+ green == (unsigned char) 255))
+ {
+ red = (unsigned char) 0;
+ green = (unsigned char) 0;
+ blue = (unsigned char) 0;
+ }
+ }
+
+ // maybe setgray here ?
+ if (!(red == m_currentRed && green == m_currentGreen && blue == m_currentBlue))
+ {
+ double redPS = (double)(red) / 255.0;
+ double bluePS = (double)(blue) / 255.0;
+ double greenPS = (double)(green) / 255.0;
+
+ char buffer[100];
+ sprintf( buffer,
+ "%.8f %.8f %.8f setrgbcolor\n",
+ redPS, greenPS, bluePS );
+ for (int i = 0; i < 100; i++)
+ if (buffer[i] == ',') buffer[i] = '.';
+ fprintf( m_pstream, buffer );
+
+ m_currentRed = red;
+ m_currentBlue = blue;
+ m_currentGreen = green;
+ }
+ }
+
+ int size = m_font.GetPointSize();
+
+// wxCoord by = y + (wxCoord)floor( double(size) * 2.0 / 3.0 ); // approximate baseline
+// commented by V. Slavik and replaced by accurate version
+// - note that there is still rounding error in text_descent!
+ wxCoord by = y + size - text_descent; // baseline
+ fprintf( m_pstream, "%d %d moveto\n", LogicalToDeviceX(x), LogicalToDeviceY(by) );
+
+ fprintf( m_pstream, "(" );
+ const wxWX2MBbuf textbuf = text.mb_str();
+ size_t len = strlen(textbuf);
+ size_t i;
+ for (i = 0; i < len; i++)
+ {
+ int c = (unsigned char) textbuf[i];
+ if (c == ')' || c == '(' || c == '\\')
+ {
+ /* Cope with special characters */
+ fprintf( m_pstream, "\\" );
+ fputc(c, m_pstream);
+ }
+ else if ( c >= 128 )
+ {
+ /* Cope with character codes > 127 */
+ fprintf(m_pstream, "\\%o", c);
+ }
+ else
+ {
+ fputc(c, m_pstream);
+ }
+ }
+
+ fprintf( m_pstream, ") show\n" );
+
+ if (m_font.GetUnderlined())
+ {
+ wxCoord uy = (wxCoord)(y + size - m_underlinePosition);
+ char buffer[100];
+
+ sprintf( buffer,
+ "gsave\n"
+ "%d %d moveto\n"
+ "%f setlinewidth\n"
+ "%d %d lineto\n"
+ "stroke\n"
+ "grestore\n",
+ LogicalToDeviceX(x), LogicalToDeviceY(uy),
+ m_underlineThickness,
+ LogicalToDeviceX(x + text_w), LogicalToDeviceY(uy) );
+ for (i = 0; i < 100; i++)
+ if (buffer[i] == ',') buffer[i] = '.';
+ fprintf( m_pstream, buffer );
+ }
+
+ CalcBoundingBox( x, y );
+ CalcBoundingBox( x + size * text.Length() * 2/3 , y );
+#endif
+}
+
+void wxPostScriptDC::DoDrawRotatedText( const wxString& text, wxCoord x, wxCoord y, double angle )