Code

remove many unnecessary to_2geom and from_2geom calls
[inkscape.git] / src / extension / internal / ps.cpp
index b4a3f89047f28b44664d3fa4c07fcfe2d7ee019e..15b0bd8f40d95bc57e8a592c1fea40ec64df9d9f 100644 (file)
@@ -13,8 +13,9 @@
  *
  * Image printing and Ascii85 filter:
  *
- * Copyright (C) 1995 Spencer Kimball and Peter Mattis
+ * Copyright (C) 2006 Johan Engelen
  * Copyright (C) 1997-98 Peter Kirchgessner
+ * Copyright (C) 1995 Spencer Kimball and Peter Mattis
  * George White <aa056@chebucto.ns.ca>
  * Austin Donnelly <austin@gimp.org>
  *
 #include <signal.h>
 #include <errno.h>
 
-#include <libnr/n-art-bpath.h>
+#include <libnr/nr-matrix-fns.h>
 
 #include <glib/gmem.h>
+#include <glib/gstrfuncs.h>
 #include <gtk/gtkstock.h>
 #include <gtk/gtkvbox.h>
 #include <gtk/gtkframe.h>
 
 #include "io/sys.h"
 
+#include <ft2build.h>
+#include FT_FREETYPE_H
+#include FT_XFREE86_H
+#include <pango/pangoft2.h>
+#include <string>
+#include <iostream>
+#include <fstream>
+#include <cstring>
+#include <cstdio>
+#include <cstdlib>
+#include <cmath>
+
+#include <2geom/sbasis-to-bezier.h>
+#include <2geom/bezier-curve.h>
+#include <2geom/hvlinesegment.h>
+#include "helper/geom-curves.h"
+
+/*
+using std::atof;
+using std::ceil;
+using std::fclose;
+using std::ferror;
+using std::fflush;
+using std::fgetc;
+using std::fprintf;  --> this line will result  'std::libintl_fprintf' has not been declared
+using std::fputc;
+using std::fseek;
+using std::ifstream;
+using std::ios;
+using std::memset;
+using std::strchr;
+using std::strcmp;
+using std::strerror;
+using std::tmpfile;
+*/
+using namespace std;
+
 namespace Inkscape {
 namespace Extension {
 namespace Internal {
@@ -70,12 +109,18 @@ PrintPS::PrintPS() :
     _dpi(72),
     _bitmap(false)
 {
+    //map font types
+    _fontTypesMap["Type 1"] = FONT_TYPE1;
+    _fontTypesMap["TrueType"] = FONT_TRUETYPE;
+    //TODO: support other font types (cf. embed_font())
 }
 
 PrintPS::~PrintPS(void)
 {
     /* fixme: should really use pclose for popen'd streams */
     if (_stream) fclose(_stream);
+    if(_begin_stream) fclose(_begin_stream);
+    if(_fonts) g_tree_destroy(_fonts);
 
     /* restore default signal handling for SIGPIPE */
 #if !defined(_WIN32) && !defined(__WIN32__)
@@ -95,19 +140,21 @@ PrintPS::setup(Inkscape::Extension::Print * mod)
 #endif
 
     unsigned int ret = FALSE;
+    gchar const *destination = mod->get_param_string("destination");
 
     /* Create dialog */
     GtkTooltips *tt = gtk_tooltips_new();
     g_object_ref((GObject *) tt);
     gtk_object_sink((GtkObject *) tt);
 
-    GtkWidget *dlg = gtk_dialog_new_with_buttons(_("Print Destination"),
+    GtkWidget *dlg = gtk_dialog_new_with_buttons(
+            destination ?  _("Print Configuration") : _("Print Destination"),
 //            SP_DT_WIDGET(SP_ACTIVE_DESKTOP)->window,
             NULL,
             (GtkDialogFlags) (GTK_DIALOG_MODAL | GTK_DIALOG_NO_SEPARATOR | GTK_DIALOG_DESTROY_WITH_PARENT),
             GTK_STOCK_CANCEL,
             GTK_RESPONSE_CANCEL,
-            GTK_STOCK_PRINT,
+            destination ? GTK_STOCK_GO_FORWARD : GTK_STOCK_PRINT,
             GTK_RESPONSE_OK,
             NULL);
 
@@ -163,30 +210,31 @@ PrintPS::setup(Inkscape::Extension::Print * mod)
     GtkWidget *l = gtk_label_new(_("Resolution:"));
     gtk_box_pack_end(GTK_BOX(hb), l, FALSE, FALSE, 0);
 
-    /* Print destination frame */
-    f = gtk_frame_new(_("Print destination"));
-    gtk_box_pack_start(GTK_BOX(vbox), f, FALSE, FALSE, 4);
-    vb = gtk_vbox_new(FALSE, 4);
-    gtk_container_add(GTK_CONTAINER(f), vb);
-    gtk_container_set_border_width(GTK_CONTAINER(vb), 4);
-
-    l = gtk_label_new(_("Printer name (as given by lpstat -p);\n"
-                        "leave empty to use the system default printer.\n"
-                        "Use '> filename' to print to file.\n"
+    GtkWidget *e = NULL;
+    /* if the destination isn't already set, we must prompt for it */
+    if (!destination) {
+        /* Print destination frame */
+        f = gtk_frame_new(_("Print destination"));
+        gtk_box_pack_start(GTK_BOX(vbox), f, FALSE, FALSE, 4);
+        vb = gtk_vbox_new(FALSE, 4);
+        gtk_container_add(GTK_CONTAINER(f), vb);
+        gtk_container_set_border_width(GTK_CONTAINER(vb), 4);
+
+        l = gtk_label_new(_("Printer name (as given by lpstat -p);\n"
+                            "leave empty to use the system default printer.\n"
+                            "Use '> filename' to print to file.\n"
                         "Use '| prog arg...' to pipe to a program."));
-    gtk_box_pack_start(GTK_BOX(vb), l, FALSE, FALSE, 0);
+        gtk_box_pack_start(GTK_BOX(vb), l, FALSE, FALSE, 0);
 
-    GtkWidget *e = gtk_entry_new();
-    if (1) {
-        gchar const *val = mod->get_param_string("destination");
-        gtk_entry_set_text(GTK_ENTRY(e), ( val != NULL
-                                           ? val
+        e = gtk_entry_new();
+        gtk_entry_set_text(GTK_ENTRY(e), ( destination != NULL
+                                           ? destination
                                            : "" ));
-    }
-    gtk_box_pack_start(GTK_BOX(vb), e, FALSE, FALSE, 0);
+        gtk_box_pack_start(GTK_BOX(vb), e, FALSE, FALSE, 0);
 
-    // pressing enter in the destination field is the same as clicking Print:
-    gtk_entry_set_activates_default(GTK_ENTRY(e), TRUE);
+        // pressing enter in the destination field is the same as clicking Print:
+        gtk_entry_set_activates_default(GTK_ENTRY(e), TRUE);
+    }
 
     gtk_widget_show_all(vbox);
 
@@ -201,15 +249,19 @@ PrintPS::setup(Inkscape::Extension::Print * mod)
         _bitmap = gtk_toggle_button_get_active((GtkToggleButton *) rb);
         sstr = gtk_entry_get_text(GTK_ENTRY(GTK_COMBO(combo)->entry));
         _dpi = (unsigned int) MAX((int)(atof(sstr)), 1);
-        /* Arrgh, have to do something */
-        fn = gtk_entry_get_text(GTK_ENTRY(e));
-        /* skip leading whitespace, bug #1068483 */
-        while (fn && *fn==' ') { fn++; }
-        /* g_print("Printing to %s\n", fn); */
 
+        /* if the destination was prompted for, record the new value */
+        if (e) {
+            /* Arrgh, have to do something */
+            fn = gtk_entry_get_text(GTK_ENTRY(e));
+            /* skip leading whitespace, bug #1068483 */
+            while (fn && *fn==' ') { fn++; }
+            /* g_print("Printing to %s\n", fn); */
+
+            mod->set_param_string("destination", (gchar *)fn);
+        }
         mod->set_param_bool("bitmap", _bitmap);
         mod->set_param_string("resolution", (gchar *)sstr);
-        mod->set_param_string("destination", (gchar *)fn);
         ret = TRUE;
     }
 
@@ -221,17 +273,21 @@ PrintPS::setup(Inkscape::Extension::Print * mod)
 unsigned int
 PrintPS::begin(Inkscape::Extension::Print *mod, SPDocument *doc)
 {
-    bool epsexport = false;
+    gboolean epsexport = false;
+
 
     _latin1_encoded_fonts.clear();
     _newlatin1font_proc_defined = false;
 
     FILE *osf = NULL;
     FILE *osp = NULL;
+    FILE *osf_tmp = NULL;
 
     gsize bytesRead = 0;
     gsize bytesWritten = 0;
     GError *error = NULL;
+    //check whether fonts have to be embedded in the (EPS only) output
+    bool font_embedded = mod->fontEmbedded();
     gchar const *utf8_fn = mod->get_param_string("destination");
     gchar *local_fn = g_filename_from_utf8( utf8_fn,
                                             -1,  &bytesRead,  &bytesWritten, &error);
@@ -245,7 +301,7 @@ PrintPS::begin(Inkscape::Extension::Print *mod, SPDocument *doc)
     if (fn != NULL) {
         if (*fn == '|') {
             fn += 1;
-            while (isspace(*fn)) fn += 1;
+            while (g_ascii_isspace(*fn)) fn += 1;
 #ifndef WIN32
             osp = popen(fn, "w");
 #else
@@ -256,7 +312,7 @@ PrintPS::begin(Inkscape::Extension::Print *mod, SPDocument *doc)
                         fn, strerror(errno));
                 return 0;
             }
-            _stream = osp;
+            _stream = _begin_stream = osp;
         } else if (*fn == '>') {
             fn += 1;
             epsexport = g_str_has_suffix(fn,".eps");
@@ -268,7 +324,31 @@ PrintPS::begin(Inkscape::Extension::Print *mod, SPDocument *doc)
                         fn, strerror(errno));
                 return 0;
             }
-            _stream = osf;
+            _begin_stream = osf;
+             /* if font embedding is requested for EPS export...
+             * TODO:could be extended to PS export if texttopath=FALSE possible
+             */
+             if(font_embedded && epsexport)
+             {
+               /**
+               * Create temporary file where to print the main "script" part of the EPS document.
+               * Use an extra stream (_begin_stream) to print the prolog and document setup sections.
+               * Thus, once all the (main) script part printed, all the fonts used are known and can be embedded
+               * just after the prolog section, in a Begin(End)Setup section (document setup),
+               * one Begin(End)Resource (DSC comment) section for each font embedded.
+               * Then, append the final script part from the temporary file (_stream in this case).
+               * Reference: Adobe Technical note 5001, "PostScript Document Struturing Conventions Specifications"
+               * page 19
+               */
+               osf_tmp = tmpfile();
+               if(!osf_tmp)
+               {
+                 g_warning("Could not create a temporary file for font embedding. Font embedding canceled.");
+                 mod->set_param_bool("fontEmbedded", false);
+                 font_embedded = false;
+                 _stream = osf;
+               } else _stream = osf_tmp;
+             } else _stream = osf;
         } else {
             /* put cwd stuff in here */
             gchar *qn = ( *fn
@@ -285,7 +365,7 @@ PrintPS::begin(Inkscape::Extension::Print *mod, SPDocument *doc)
                 return 0;
             }
             g_free(qn);
-            _stream = osp;
+            _stream = _begin_stream = osp;
         }
     }
 
@@ -298,23 +378,24 @@ PrintPS::begin(Inkscape::Extension::Print *mod, SPDocument *doc)
 #endif
     }
 
-    int const res = fprintf(_stream, ( epsexport
+    int const res = fprintf(_begin_stream, ( epsexport
                                        ? "%%!PS-Adobe-3.0 EPSF-3.0\n"
                                        : "%%!PS-Adobe-3.0\n" ));
     /* flush this to test output stream as early as possible */
-    if (fflush(_stream)) {
+    if (fflush(_begin_stream)) {
         /*g_print("caught error in sp_module_print_plain_begin\n");*/
-        if (ferror(_stream)) {
+        if (ferror(_begin_stream)) {
             g_print("Error %d on output stream: %s\n", errno,
                     g_strerror(errno));
         }
         g_print("Printing failed\n");
         /* fixme: should use pclose() for pipes */
-        fclose(_stream);
-        _stream = NULL;
+        fclose(_begin_stream);
+        _begin_stream = NULL;
         fflush(stdout);
         return 0;
     }
+    //TODO: do this same test on _stream
 
     // width and height in pt
     _width = sp_document_width(doc) * PT_PER_PX;
@@ -385,10 +466,12 @@ PrintPS::begin(Inkscape::Extension::Print *mod, SPDocument *doc)
                << d.x0 << " "
                << (_height - d.y0) << " "
                << d.x1 << "\n";
-            os << "%%DocumentMedia: plain "
-               << (int) ceil(_height) << " "
-               << (int) ceil(_width) << " "
-               << "0 () ()\n";
+            if (!epsexport) {
+                os << "%%DocumentMedia: plain "
+                   << (int) ceil(_height) << " "
+                   << (int) ceil(_width) << " "
+                   << "0 () ()\n";
+            }
         } else {
             os << "%%Orientation: Portrait\n";
             os << "%%BoundingBox: " << (int) d.x0 << " "
@@ -399,13 +482,24 @@ PrintPS::begin(Inkscape::Extension::Print *mod, SPDocument *doc)
                << d.y0 << " "
                << d.x1 << " "
                << d.y1 << "\n";
-            os << "%%DocumentMedia: plain "
-               << (int) ceil(_width) << " "
-               << (int) ceil(_height) << " "
-               << "0 () ()\n";
+            if (!epsexport) {
+                               os << "%%DocumentMedia: plain "
+                                  << (int) ceil(_width) << " "
+                  << (int) ceil(_height) << " "
+                  << "0 () ()\n";
+                       }
         }
 
         os << "%%EndComments\n";
+         /* If font embedding requested, begin document setup section where to include font resources */
+         if(font_embedded) os << "%%BeginSetup\n";/* Resume it later with Begin(End)Resource sections for font embedding. So, for now, we are done with the prolog/setup part. */
+         gint ret = fprintf(_begin_stream, "%s", os.str().c_str());
+         if(ret < 0) return ret;
+
+         /* Main Script part (after document setup) begins */
+         /* Empty os from all previous printing */
+         std::string clrstr = "";
+         os.str(clrstr);
         // This will become problematic if we print multi paged documents:
         os << "%%Page: 1 1\n";
 
@@ -424,6 +518,9 @@ PrintPS::begin(Inkscape::Extension::Print *mod, SPDocument *doc)
             os << PT_PER_PX << " " << -PT_PER_PX << " scale\n";
             // from now on we can output px, but they will be treated as pt
         }
+
+       /* As a new PS document is created, _fontlist has to be reinitialized (unref fonts from possible former PS docs) */
+        _fonts = g_tree_new_full((GCompareDataFunc)strcmp, NULL, (GDestroyNotify)g_free, (GDestroyNotify)g_free);
     }
 
     os << "0 0 0 setrgbcolor\n"
@@ -456,13 +553,13 @@ PrintPS::finish(Inkscape::Extension::Print *mod)
         int const width = (int) (_width * dots_per_pt + 0.5);
         int const height = (int) (_height * dots_per_pt + 0.5);
 
-        NRMatrix affine;
-        affine.c[0] = width / ((x1 - x0) * PX_PER_PT);
-        affine.c[1] = 0.0;
-        affine.c[2] = 0.0;
-        affine.c[3] = height / ((y1 - y0) * PX_PER_PT);
-        affine.c[4] = -affine.c[0] * x0;
-        affine.c[5] = -affine.c[3] * y0;
+        NR::Matrix affine;
+        affine[0] = width / ((x1 - x0) * PX_PER_PT);
+        affine[1] = 0.0;
+        affine[2] = 0.0;
+        affine[3] = height / ((y1 - y0) * PX_PER_PT);
+        affine[4] = -affine[0] * x0;
+        affine[5] = -affine[3] * y0;
 
         nr_arena_item_set_transform(mod->root, &affine);
 
@@ -478,7 +575,7 @@ PrintPS::finish(Inkscape::Extension::Print *mod)
 
             /* Update to renderable state. */
             NRGC gc(NULL);
-            nr_matrix_set_identity(&gc.transform);
+            gc.transform.set_identity();
             nr_arena_item_invoke_update(mod->root, &bbox, &gc, NR_ARENA_ITEM_STATE_ALL, NR_ARENA_ITEM_STATE_NONE);
             /* Render */
             /* This should take guchar* instead of unsigned char*) */
@@ -487,15 +584,15 @@ PrintPS::finish(Inkscape::Extension::Print *mod)
                                      bbox.x0, bbox.y0, bbox.x1, bbox.y1,
                                      (guchar*)px, 4 * width, FALSE, FALSE);
             memset(px, 0xff, 4 * width * 64);
-            nr_arena_item_invoke_render(mod->root, &bbox, &pb, 0);
+            nr_arena_item_invoke_render(NULL, mod->root, &bbox, &pb, 0);
             /* Blitter goes here */
-            NRMatrix imgt;
-            imgt.c[0] = (bbox.x1 - bbox.x0) / dots_per_pt;
-            imgt.c[1] = 0.0;
-            imgt.c[2] = 0.0;
-            imgt.c[3] = (bbox.y1 - bbox.y0) / dots_per_pt;
-            imgt.c[4] = 0.0;
-            imgt.c[5] = _height - y / dots_per_pt - (bbox.y1 - bbox.y0) / dots_per_pt;
+            NR::Matrix imgt;
+            imgt[0] = (bbox.x1 - bbox.x0) / dots_per_pt;
+            imgt[1] = 0.0;
+            imgt[2] = 0.0;
+            imgt[3] = (bbox.y1 - bbox.y0) / dots_per_pt;
+            imgt[4] = 0.0;
+            imgt[5] = _height - y / dots_per_pt - (bbox.y1 - bbox.y0) / dots_per_pt;
 
             print_image(_stream, px, bbox.x1 - bbox.x0, bbox.y1 - bbox.y0, 4 * width, &imgt);
         }
@@ -509,33 +606,51 @@ PrintPS::finish(Inkscape::Extension::Print *mod)
     /* Flush stream to be sure. */
     (void) fflush(_stream);
 
+    char c;
+    /* If font embedding... */
+    if(mod->get_param_bool("fontEmbedded"))
+    {
+        /* Close the document setup section that had been started (because all the needed resources are supposed to be included now) */
+       /*res = */fprintf(_begin_stream, "%s", "%%EndSetup\n");
+       /* If font embedding requested, the following PS script part was printed to a different file from the prolog/setup, so script part (current _stream) needs to be copied to prolog/setup file to get the complete (E)PS document */
+       if(fseek(_stream, 0, SEEK_SET) == 0)
+       {
+           while((c = fgetc(_stream))!=EOF) fputc(c, _begin_stream);
+       }
+       fclose(_stream);
+       _stream = _begin_stream;
+    }
+
     /* fixme: should really use pclose for popen'd streams */
     fclose(_stream);
-    _stream = 0;
+    _stream = NULL;
+
     _latin1_encoded_fonts.clear();
 
+    g_tree_destroy(_fonts);
+
     return res;
 }
 
 unsigned int
-PrintPS::bind(Inkscape::Extension::Print *mod, NRMatrix const *transform, float opacity)
+PrintPS::bind(Inkscape::Extension::Print */*mod*/, NR::Matrix const *transform, float /*opacity*/)
 {
     if (!_stream) return 0;  // XXX: fixme, returning -1 as unsigned.
     if (_bitmap) return 0;
 
     Inkscape::SVGOStringStream os;
-    os << "gsave [" << transform->c[0] << " "
-       << transform->c[1] << " "
-       << transform->c[2] << " "
-       << transform->c[3] << " "
-       << transform->c[4] << " "
-       << transform->c[5] << "] concat\n";
+    os << "gsave [" << (*transform)[0] << " "
+       << (*transform)[1] << " "
+       << (*transform)[2] << " "
+       << (*transform)[3] << " "
+       << (*transform)[4] << " "
+       << (*transform)[5] << "] concat\n";
 
     return fprintf(_stream, "%s", os.str().c_str());
 }
 
 unsigned int
-PrintPS::release(Inkscape::Extension::Print *mod)
+PrintPS::release(Inkscape::Extension::Print */*mod*/)
 {
     if (!_stream) return 0; // XXX: fixme, returning -1 as unsigned.
     if (_bitmap) return 0;
@@ -544,7 +659,7 @@ PrintPS::release(Inkscape::Extension::Print *mod)
 }
 
 unsigned int
-PrintPS::comment(Inkscape::Extension::Print *mod, char const *comment)
+PrintPS::comment(Inkscape::Extension::Print */*mod*/, char const *comment)
 {
     if (!_stream) return 0; // XXX: fixme, returning -1 as unsigned.
     if (_bitmap) return 0;
@@ -555,18 +670,18 @@ PrintPS::comment(Inkscape::Extension::Print *mod, char const *comment)
 void
 PrintPS::print_fill_style(SVGOStringStream &os, SPStyle const *const style, NRRect const *pbox)
 {
-    g_return_if_fail( style->fill.type == SP_PAINT_TYPE_COLOR
-                      || ( style->fill.type == SP_PAINT_TYPE_PAINTSERVER
+    g_return_if_fail( style->fill.isColor()
+                      || ( style->fill.isPaintserver()
                            && SP_IS_GRADIENT(SP_STYLE_FILL_SERVER(style)) ) );
 
-    if (style->fill.type == SP_PAINT_TYPE_COLOR) {
+    if (style->fill.isColor()) {
         float rgb[3];
         sp_color_get_rgb_floatv(&style->fill.value.color, rgb);
 
         os << rgb[0] << " " << rgb[1] << " " << rgb[2] << " setrgbcolor\n";
 
     } else {
-        g_assert( style->fill.type == SP_PAINT_TYPE_PAINTSERVER
+        g_assert( style->fill.isPaintserver()
                   && SP_IS_GRADIENT(SP_STYLE_FILL_SERVER(style)) );
 
         if (SP_IS_LINEARGRADIENT(SP_STYLE_FILL_SERVER(style))) {
@@ -623,7 +738,7 @@ PrintPS::print_fill_style(SVGOStringStream &os, SPStyle const *const style, NRRe
                                            pbox->x0, pbox->y0);
                 c *= bbox2user;
                 f *= bbox2user;
-                r *= bbox2user.expansion();
+                r *= NR::expansion(bbox2user);
             }
 
             os << "<<\n/ShadingType 3\n/ColorSpace /DeviceRGB\n";
@@ -702,14 +817,14 @@ PrintPS::print_stroke_style(SVGOStringStream &os, SPStyle const *style)
 
 
 unsigned int
-PrintPS::fill(Inkscape::Extension::Print *mod, NRBPath const *bpath, NRMatrix const *ctm, SPStyle const *const style,
+PrintPS::fill(Inkscape::Extension::Print *mod, Geom::PathVector const &pathv, NR::Matrix const *ctm, SPStyle const *const style,
               NRRect const *pbox, NRRect const *dbox, NRRect const *bbox)
 {
     if (!_stream) return 0; // XXX: fixme, returning -1 as unsigned.
     if (_bitmap) return 0;
 
-    if ( style->fill.type == SP_PAINT_TYPE_COLOR
-         || ( style->fill.type == SP_PAINT_TYPE_PAINTSERVER
+    if ( style->fill.isColor()
+         || ( style->fill.isPaintserver()
               && SP_IS_GRADIENT(SP_STYLE_FILL_SERVER(style)) ) )
     {
         Inkscape::SVGOStringStream os;
@@ -718,13 +833,13 @@ PrintPS::fill(Inkscape::Extension::Print *mod, NRBPath const *bpath, NRMatrix co
 
         print_fill_style(os, style, pbox);
 
-        print_bpath(os, bpath->path);
+        print_pathvector(os, pathv);
 
-        if (style->fill_rule.value == SP_WIND_RULE_EVENODD) {
-            if (style->fill.type == SP_PAINT_TYPE_COLOR) {
+        if (style->fill_rule.computed == SP_WIND_RULE_EVENODD) {
+            if (style->fill.isColor()) {
                 os << "eofill\n";
             } else {
-                g_assert( style->fill.type == SP_PAINT_TYPE_PAINTSERVER
+                g_assert( style->fill.isPaintserver()
                           && SP_IS_GRADIENT(SP_STYLE_FILL_SERVER(style)) );
                 SPGradient const *g = SP_GRADIENT(SP_STYLE_FILL_SERVER(style));
                 os << "eoclip\n";
@@ -739,10 +854,10 @@ PrintPS::fill(Inkscape::Extension::Print *mod, NRBPath const *bpath, NRMatrix co
                 }
             }
         } else {
-            if (style->fill.type == SP_PAINT_TYPE_COLOR) {
+            if (style->fill.isColor()) {
                 os << "fill\n";
             } else {
-                g_assert( style->fill.type == SP_PAINT_TYPE_PAINTSERVER
+                g_assert( style->fill.isPaintserver()
                           && SP_IS_GRADIENT(SP_STYLE_FILL_SERVER(style)) );
                 SPGradient const *g = SP_GRADIENT(SP_STYLE_FILL_SERVER(style));
                 os << "clip\n";
@@ -768,18 +883,18 @@ PrintPS::fill(Inkscape::Extension::Print *mod, NRBPath const *bpath, NRMatrix co
 
 
 unsigned int
-PrintPS::stroke(Inkscape::Extension::Print *mod, NRBPath const *bpath, NRMatrix const *ctm, SPStyle const *style,
+PrintPS::stroke(Inkscape::Extension::Print *mod, Geom::PathVector const &pathv, NR::Matrix const *ctm, SPStyle const *style,
                 NRRect const *pbox, NRRect const *dbox, NRRect const *bbox)
 {
     if (!_stream) return 0; // XXX: fixme, returning -1 as unsigned.
     if (_bitmap) return 0;
 
-    if (style->stroke.type == SP_PAINT_TYPE_COLOR) {
+    if (style->stroke.isColor()) {
         Inkscape::SVGOStringStream os;
 
         print_stroke_style(os, style);
 
-        print_bpath(os, bpath->path);
+        print_pathvector(os, pathv);
 
         os << "stroke\n";
 
@@ -791,7 +906,7 @@ PrintPS::stroke(Inkscape::Extension::Print *mod, NRBPath const *bpath, NRMatrix
 
 unsigned int
 PrintPS::image(Inkscape::Extension::Print *mod, guchar *px, unsigned int w, unsigned int h, unsigned int rs,
-               NRMatrix const *transform, SPStyle const *style)
+               NR::Matrix const *transform, SPStyle const *style)
 {
     if (!_stream) return 0; // XXX: fixme, returning -1 as unsigned.
     if (_bitmap) return 0;
@@ -799,17 +914,20 @@ PrintPS::image(Inkscape::Extension::Print *mod, guchar *px, unsigned int w, unsi
     return print_image(_stream, px, w, h, rs, transform);
 }
 
+/* PSFontName is now useless (cf. text() method code) */
 char const *
 PrintPS::PSFontName(SPStyle const *style)
 {
-    font_instance *tf = (font_factory::Default())->Face(style->text->font_family.value, font_style_to_pos(*style));
+    font_instance *tf = font_factory::Default()->FaceFromStyle(style);
 
     char const *n;
     char name_buf[256];
 
+    // PS does not like spaces in fontnames, replace them with the usual dashes.
+
     if (tf) {
         tf->PSName(name_buf, sizeof(name_buf));
-        n = name_buf;
+        n = g_strdelimit(name_buf, " ", '-');
         tf->Unref();
     } else {
         // this system does not have this font, so just use the name from SVG in the hope that PS interpreter will make sense of it
@@ -819,7 +937,7 @@ PrintPS::PSFontName(SPStyle const *style)
             (style->font_weight.value >= SP_CSS_FONT_WEIGHT_500 && style->font_weight.value <= SP_CSS_FONT_WEIGHT_900);
 
         n = g_strdup_printf("%s%s%s%s",
-                            g_strdelimit(style->text->font_family.value, " ", '-'),
+                            g_strdelimit(style->text->font_family.value, " ", '-'), 
                             (b || i || o) ? "-" : "",
                             (b) ? "Bold" : "",
                             (i) ? "Italic" : ((o) ? "Oblique" : "") );
@@ -828,6 +946,319 @@ PrintPS::PSFontName(SPStyle const *style)
     return g_strdup(n);
 }
 
+//LSB = Least Significant Byte
+//converts 4-byte array to "LSB first" to "LSB last"
+/**
+* (Used by PrintPS::embed_t1 (from libgnomeprint/gnome-font-face.c),
+* to get the length of data segment (bytes 3-6 in IBM PC (PostScript) font file format.
+* Reference: Adobe technical note 5040, "Supporting Downloadable PostScript
+* Language Fonts", page 9)
+*/
+
+#define INT32_LSB_2_5(q) ((q)[2] + ((q)[3] << 8) + ((q)[4] << 16) + ((q)[5] << 24))
+
+/**
+* \brief For "Type 1" font only, print font data in output stream, to embed font data in PS output.
+* \param os Stream of output.
+* \param font Font whose data to embed.
+* \return FALSE if font embedding canceled (due to error or not supported font type), TRUE otherwise
+* TODO: enable font embedding for True Type
+*/
+//adapted more/less from libgnomeprint/gnome_font_face_ps_embed_t1()
+bool
+PrintPS::embed_t1 (SVGOStringStream &os, font_instance* font)
+{
+        //check font type
+        FT_Face font_face = pango_ft2_font_get_face(font->pFont);
+        const FT_String* font_type = FT_Get_X11_Font_Format(font_face);
+        g_return_val_if_fail (_fontTypesMap[font_type] == FONT_TYPE1, false);
+        //get font filename, stream to font file and size
+        FT_Stream font_stream = font_face->stream;
+        const char* font_filename = (char*) font_stream->pathname.pointer;
+        unsigned long font_stream_size = font_stream->size;
+        //first detect if font file is in IBM PC format
+        /**
+        * if first byte is 0x80, font file is pfb, do the same as a pfb to pfa converter
+        * Reference: Adobe technical note 5040, "Supporting Downloadable PostScript
+        * Language Fonts", page 9
+       * else: include all the ASCII data in the font pfa file
+        **/
+        char* buf = new char[7];
+        unsigned char* buffer = new unsigned char[7];//for the 6 header bytes (data segment length is unknown at this point) and final '\0'
+        std::string ascii_data;//for data segment "type 1" in IBM PC Format
+        //read the 6 header bytes
+        //for debug: g_warning("Reading from font file %s...", font_filename);
+        font_stream->close(font_stream);
+        ifstream font_file (font_filename, ios::in|ios::binary);
+        if (!font_file.is_open()) {
+                g_warning ("file %s: line %d: Cannot open font file %s", __FILE__, __LINE__, font_filename);
+                return false;
+        }
+        font_file.read(buf, 6);
+        buffer = (unsigned char*) buf;
+
+       //If font file is pfb, do the same as pfb to pfa converter
+        //check byte 1
+        if (buffer[0] == 0x80) {
+                const char hextab[17] = "0123456789abcdef";
+                unsigned long offset = 0;
+
+                while (offset < font_stream_size) {
+                        gint length, i;
+                        if (buffer[0] != 0x80) {
+                                g_warning ("file %s: line %d: Corrupt %s", __FILE__, __LINE__, font_filename);
+                                //TODO: print some default font data anyway like libgnomeprint/gnome_font_face_ps_embed_empty
+                                return false;
+                        }
+                        switch (buffer[1]) {
+                        case 1:
+                                //get data segment length from bytes 3-6
+                                //(Note: byte 1 is first byte in comments to match Adobe technical note 5040, but index 0 in code)
+                                length = INT32_LSB_2_5 (buffer);
+                                offset += 6;
+                                //resize the buffer to fit the data segment length
+                                delete [] buf;
+                                buf = new char[length + 1];
+                                buffer = new unsigned char[length + 1];
+                                //read and print all the data segment length
+                                font_file.read(buf, length);
+                               buffer = (unsigned char*) buf;
+                                /**
+                                * Assigning a part from the buffer of length "length" ensures
+                                * that no incorrect extra character will be printed and make the PS output invalid
+                                * That was the case with the code:
+                                * os << buffer;
+                                * (A substring method could have been used as well.)
+                                */
+                                ascii_data.assign(buf, 0, length);
+                                os << ascii_data;
+                                offset += length;
+                                //read next 6 header bytes
+                                font_file.read(buf, 6);
+                                break;
+                        case 2:
+                                length = INT32_LSB_2_5 (buffer);
+                                offset += 6;
+                                //resize the buffer to fit the data segment length
+                                delete [] buf;
+                                buf = new char[length + 1];
+                                buffer = new unsigned char[length + 1];
+                                //read and print all the data segment length
+                                font_file.read(buf, length);
+                                buffer = (unsigned char*) buf;
+                                for (i = 0; i < length; i++) {
+                                        os << hextab[buffer[i] >> 4];
+                                        os << hextab[buffer[i] & 15];
+                                        offset += 1;
+                                        if ((i & 31) == 31 || i == length - 1)
+                                                os << "\n";
+                                }
+                                //read next 6 header bytes
+                                font_file.read(buf, 6);
+                                break;
+                        case 3:
+                                /* Finished */
+                                os << "\n";
+                                offset = font_stream_size;
+                                break;
+                        default:
+                                os << "%%%ERROR: Font file corrupted at byte " << offset << "\n";
+                                //TODO: print some default font data anyway like libgnomeprint/gnome_font_face_ps_embed_empty
+                                return false;
+                        }
+                }
+        }
+       //else: font file is pfa, include all directly
+       else {
+                //font is not in IBM PC format, all the file content can be directly printed
+                //resize buffer
+                delete [] buf;
+                buf = new char[font_stream_size + 1];
+                delete [] buffer;
+                font_file.seekg (0, ios::beg);
+                font_file.read(buf, font_stream_size);
+               /**
+                * Assigning a part from the buffer of length "length" ensures
+                 * that no incorrect extra character will be printed and make the PS output invalid
+                 * That was the case with the code:
+                 * os << buffer;
+                 * (A substring method could have been used as well.)
+                 */
+               ascii_data.assign(buf, 0, font_stream_size);
+               os << ascii_data;
+        }
+        font_file.close();
+        delete [] buf;
+        buf = NULL;
+        buffer = NULL;// Clear buffer to prevent using invalid memory reference.
+
+        char font_psname[256];
+        font->PSName(font_psname, sizeof(font_psname));
+        FT_Long font_num_glyphs = font_face->num_glyphs;
+        if (font_num_glyphs < 256) {
+                gint glyph;
+                /* 8-bit vector */
+                os << "(" << font_psname << ") cvn findfont dup length dict begin\n";
+                os << "{1 index /FID ne {def} {pop pop} ifelse} forall\n";
+                os << "/Encoding [\n";
+                for (glyph = 0; glyph < 256; glyph++) {
+                        guint g;
+                        gchar c[256];
+                        FT_Error status;
+                        g = (glyph < font_num_glyphs) ? glyph : 0;
+                        status = FT_Get_Glyph_Name (font_face, g, c, 256);
+
+                       if (status != FT_Err_Ok) {
+                                g_warning ("file %s: line %d: Glyph %d has no name in %s", __FILE__, __LINE__, g, font_filename);
+                                g_snprintf (c, 256, ".notdef");
+                        }
+
+                        os << "/" << c << ( ((glyph & 0xf) == 0xf)?"\n":" " );
+                }
+                os << "] def currentdict end\n";
+                //TODO: manage several font instances for same ps name like in libgnomeprint/gnome_print_ps2_set_font_real()
+                //gf_pso_sprintf (pso, "(%s) cvn exch definefont pop\n", pso->encodedname);
+                os << "(" << font_psname << ") cvn exch definefont pop\n";
+        } else {
+                gint nfonts, i, j;
+                /* 16-bit vector */
+                nfonts = (font_num_glyphs + 255) >> 8;
+
+                os << "32 dict begin\n";
+                /* Common entries */
+                os << "/FontType 0 def\n";
+                os << "/FontMatrix [1 0 0 1 0 0] def\n";
+                os << "/FontName (" << font_psname << "-Glyph-Composite) cvn def\n";
+                os << "/LanguageLevel 2 def\n";
+
+                /* Type 0 entries */
+                os << "/FMapType 2 def\n";
+
+                /* Bitch 'o' bitches */
+                os << "/FDepVector [\n";
+
+                for (i = 0; i < nfonts; i++) {
+                        os << "(" << font_psname << ") cvn findfont dup length dict begin\n";
+                        os << "{1 index /FID ne {def} {pop pop} ifelse} forall\n";
+                        os << "/Encoding [\n";
+                        for (j = 0; j < 256; j++) {
+                                gint glyph;
+                                gchar c[256];
+                                FT_Error status;
+                                glyph = 256 * i + j;
+                                if (glyph >= font_num_glyphs)
+                                        glyph = 0;
+                                status = FT_Get_Glyph_Name (font_face, glyph, c, 256);
+                                if (status != FT_Err_Ok) {
+                                        g_warning ("file %s: line %d: Glyph %d has no name in %s", __FILE__, __LINE__, glyph, font_filename);
+                                        g_snprintf (c, 256, ".notdef");
+                                }
+                                os << "/" << c << ( ((j & 0xf) == 0xf)?"\n":" " );
+                        }
+                        os << "] def\n";
+                        os << "currentdict end (" << font_psname << "-Glyph-Page-";
+                        os << std::dec << i;
+                        os << ") cvn exch definefont\n";
+                }
+                os << "] def\n";
+                os << "/Encoding [\n";
+                for (i = 0; i < 256; i++) {
+                        gint fn;
+                        fn = (i < nfonts) ? i : 0;
+                        os << std::dec << fn;
+                        os << ( ((i & 0xf) == 0xf) ? "\n" : " " );
+                }
+                os << "] def\n";
+                os << "currentdict end\n";
+                //TODO: manage several font instances for same ps name like in libgnomeprint/gnome_print_ps2_set_font_real()
+                //gf_pso_sprintf (pso, "(%s) cvn exch definefont pop\n", pso->encodedname);
+                os << "(" << font_psname << ") cvn exch definefont pop\n";
+        }
+       //font embedding completed
+       return true;
+}
+
+
+
+/**
+* \brief Print font data in output stream, to embed font data in PS output.
+* \param os Stream of output.
+* \param font Font whose data to embed.
+* \return FALSE if font embedding canceled (due to error or not supported font type), TRUE otherwise
+*/
+//adapted from libgnomeprint/gnome_font_face_ps_embed()
+bool PrintPS::embed_font(SVGOStringStream &os, font_instance* font)
+{
+  //Hinted at by a comment in libgnomeprint/fcpattern_to_gp_font_entry()
+  //Determining the font type in the "Pango way"
+  FT_Face font_face = pango_ft2_font_get_face(font->pFont);
+  const FT_String* font_type = FT_Get_X11_Font_Format(font_face);
+
+  /**
+  * Possible values of "font_type": Type 1, TrueType, etc.
+  * Embedding available only for Type 1 fonts so far.
+  */
+  //TODO: provide support for other font types (TrueType is a priority)
+  switch(_fontTypesMap[font_type])
+  {
+    case FONT_TYPE1:
+      return embed_t1 (os, font);
+    //TODO: implement TT font embedding
+    /*case FONT_TRUETYPE:
+      embed_tt (os, font);
+      break;*/
+    default:
+      g_warning("Unknown (not supported) font type for embedding: %s", font_type);
+      //TODO: embed something like in libgnomeprint/gnome_font_face_ps_embed_empty();
+      return false;
+  }
+}
+
+
+/**
+* \brief Converts UTF-8 string to sequence of glyph numbers for PostScript string (cf. "show" commands.).
+* \param os Stream of output.
+* \param font Font used for unicode->glyph mapping.
+* \param unistring UTF-8 encoded string to convert.
+*/
+void PrintPS::print_glyphlist(SVGOStringStream &os, font_instance* font, Glib::ustring unistring)
+{
+  //iterate through unicode chars in unistring
+  Glib::ustring::iterator unistring_iter;
+  gunichar unichar;
+  gint glyph_index, glyph_page;
+  
+  FT_Face font_face = pango_ft2_font_get_face(font->pFont);
+  FT_Long font_num_glyphs = font_face->num_glyphs;
+  //whether font has more than one glyph pages (16-bit encoding)
+  bool two_bytes_encoded = (font_num_glyphs > 255);
+
+  for (unistring_iter = unistring.begin();   unistring_iter!=unistring.end();  unistring_iter++)
+  {
+    //get unicode char
+    unichar = *unistring_iter;
+    //get matching glyph index in current font for unicode char
+    //default glyph index is 0 for undefined font character (glyph unavailable)
+    //TODO: if glyph unavailable for current font, use a default font among the most Unicode-compliant - e.g. Bitstream Cyberbit - I guess
+    glyph_index = font->MapUnicodeChar(unichar);
+    //if more than one glyph pages for current font (16-bit encoding),
+    if(two_bytes_encoded)
+    {
+      //add glyph page before glyph index.
+      glyph_page = (glyph_index >> 8) & 0xff;
+      os << "\\";
+      //convert in octal code before printing
+      os << std::oct << glyph_page;
+    }
+    //(If one page - 8-bit encoding -, nothing to add.)
+    //TODO: explain the following line inspired from libgnomeprint/gnome_print_ps2_glyphlist()
+    glyph_index = glyph_index & 0xff;
+    //TODO: mark glyph as used for current font, if Inkscape has to embed minimal font data in PS
+    os << "\\";
+    //convert in octal code before printing
+    os << std::oct << glyph_index;
+  }
+}
 
 unsigned int
 PrintPS::text(Inkscape::Extension::Print *mod, char const *text, NR::Point p,
@@ -836,45 +1267,133 @@ PrintPS::text(Inkscape::Extension::Print *mod, char const *text, NR::Point p,
     if (!_stream) return 0; // XXX: fixme, returning -1 as unsigned.
     if (_bitmap) return 0;
 
+    //check whether fonts have to be embedded in the PS output
+    //if not, use the former way of Inkscape to print text
+    gboolean font_embedded = mod->fontEmbedded();
+
     Inkscape::SVGOStringStream os;
+    //find font
+    /**
+    * A font_instance object is necessary for the next steps,
+    * that's why using PSFontName() method just to get the PS fontname
+    * is not enough and not appropriate
+    */
+    font_instance *tf = font_factory::Default()->FaceFromStyle(style);
+    
+    const gchar *fn = NULL;
+    char name_buf[256];
+
+    //check whether font was found
+    /**
+    * This check is not strictly reliable
+    * since Inkscape returns a default font if font not found.
+    * This is just to be consistent with the method PSFontName().
+    */
+    if (tf) {
+        //get font PS name
+        tf->PSName(name_buf, sizeof(name_buf));
+        fn = name_buf;
+    } else {
+       // this system does not have this font, so cancel font embedding...
+        font_embedded = FALSE;
+        //this case seems to never happen since Inkscape uses a default font instead (like BitstreamVeraSans on Windows)
+        g_warning("Font %s not found.", fn);
+        //...and just use the name from SVG in the hope that PS interpreter will make sense of it
+        bool i = (style->font_style.value == SP_CSS_FONT_STYLE_ITALIC);
+        bool o = (style->font_style.value == SP_CSS_FONT_STYLE_OBLIQUE);
+        bool b = (style->font_weight.value == SP_CSS_FONT_WEIGHT_BOLD) ||
+            (style->font_weight.value >= SP_CSS_FONT_WEIGHT_500 && style->font_weight.value <= SP_CSS_FONT_WEIGHT_900);
+
+        fn = g_strdup_printf("%s%s%s%s",
+                            g_strdelimit(style->text->font_family.value, " ", '-'),
+                            (b || i || o) ? "-" : "",
+                            (b) ? "Bold" : "",
+                            (i) ? "Italic" : ((o) ? "Oblique" : "") );
+    }
 
+    /**
+    * If font embedding is requested, tempt to embed the font the first time it is used, once and for all.
+    * There is no selection of the glyph descriptions to embed, based on the characters used effectively in the document.
+    * (TODO?)
+    * Else, back to the former way of printing.
+    */
+    gpointer  is_embedded;
+    //if not first time the font is used and if font embedding requested, check whether the font has been embedded (successfully the first time).
+    if(g_tree_lookup_extended(_fonts, fn, NULL, &is_embedded)) font_embedded = font_embedded && (strcmp((char *)is_embedded, "TRUE") == 0);
+    else
+    {
+      //first time the font is used
+      if(font_embedded)
+      {
+        //embed font in PS output
+        //adapted from libgnomeprint/gnome_print_ps2_close()
+        os << "%%BeginResource: font " << fn << "\n";
+        font_embedded = embed_font(os, tf);
+        os << "%%EndResource: font " << fn << "\n";
+        if(!font_embedded) g_warning("Font embedding canceled for font: %s", fn);
+        else fprintf(_begin_stream, "%s", os.str().c_str());
+        //empty os before resume printing to the script stream
+        std::string clrstr = "";
+        os.str(clrstr);
+
+      }
+      //add to the list
+      g_tree_insert(_fonts, g_strdup(fn), g_strdup((font_embedded)?"TRUE":"FALSE"));
+    }
+    
+    Glib::ustring s;
     // Escape chars
     Inkscape::SVGOStringStream escaped_text;
-    escaped_text << std::oct;
-    for (gchar const *p_text = text ; *p_text ; p_text = g_utf8_next_char(p_text)) {
-        gunichar const c = g_utf8_get_char(p_text);
-        if (c == '\\' || c == ')' || c == '(')
-            escaped_text << '\\' << static_cast<char>(c);
-        else if (c >= 0x80)
-            escaped_text << '\\' << c;
-        else
-            escaped_text << static_cast<char>(c);
+    //if font embedding, all characters will be converted to glyph indices (cf. PrintPS::print_glyphlist()),
+    //so no need to escape characters
+    //else back to the old way, i.e. escape chars: '\',')','(' and UTF-8 ones
+    if(font_embedded) s = text;
+    else {
+       escaped_text << std::oct;
+       for (gchar const *p_text = text ; *p_text ; p_text = g_utf8_next_char(p_text)) {
+               gunichar const c = g_utf8_get_char(p_text);
+               if (c == '\\' || c == ')' || c == '(')
+               escaped_text << '\\' << static_cast<char>(c);
+               else if (c >= 0x80)
+               escaped_text << '\\' << c;
+               else
+               escaped_text << static_cast<char>(c);
+       }
     }
 
     os << "gsave\n";
 
     // set font
-    char const *fn = PSFontName(style);
-    if (_latin1_encoded_fonts.find(fn) == _latin1_encoded_fonts.end()) {
-        if (!_newlatin1font_proc_defined) {
-            // input: newfontname, existingfontname
-            // output: new font object, also defined to newfontname
-            os << "/newlatin1font "         // name of the proc
-                  "{findfont dup length dict copy "     // load the font and create a copy of it
-                  "dup /Encoding ISOLatin1Encoding put "     // change the encoding in the copy
-                  "definefont} def\n";      // create the new font and leave it on the stack, define the proc
-            _newlatin1font_proc_defined = true;
-        }
-        os << "/(" << fn << "-ISOLatin1) /(" << fn << ") newlatin1font\n";
-        _latin1_encoded_fonts.insert(fn);
-    } else
-        os << "/(" << fn << "-ISOLatin1) findfont\n";
+    if(font_embedded) os << "/" << fn << " findfont\n";
+    else {
+       if (_latin1_encoded_fonts.find(fn) == _latin1_encoded_fonts.end()) {
+               if (!_newlatin1font_proc_defined) {
+               // input: newfontname, existingfontname
+               // output: new font object, also defined to newfontname
+               os << "/newlatin1font "         // name of the proc
+                       "{findfont dup length dict copy "     // load the font and create a copy of it
+                       "dup /Encoding ISOLatin1Encoding put "     // change the encoding in the copy
+                       "definefont} def\n";      // create the new font and leave it on the stack, define the proc
+               _newlatin1font_proc_defined = true;
+               }
+               if(strchr(fn, ' ') == NULL)
+                       os << "/" << fn << "-ISOLatin1 /" << fn << " newlatin1font\n";
+               else
+                       os << "(/" << fn << "-ISOLatin1) (/" << fn << ") newlatin1font\n";
+               _latin1_encoded_fonts.insert(fn);
+       } else
+               if(strchr(fn, ' ') == NULL)
+                       os << "/" << fn << "-ISOLatin1 findfont\n";
+               else
+                       os << "(/" << fn << "-ISOLatin1) findfont\n";
+    }
     os << style->font_size.computed << " scalefont\n";
     os << "setfont\n";
-    g_free((void *) fn);
+   //The commented line beneath causes Inkscape to crash under Linux but not under Windows
+    //g_free((void*) fn);
 
-    if ( style->fill.type == SP_PAINT_TYPE_COLOR
-         || ( style->fill.type == SP_PAINT_TYPE_PAINTSERVER
+    if ( style->fill.isColor()
+         || ( style->fill.isPaintserver()
               && SP_IS_GRADIENT(SP_STYLE_FILL_SERVER(style)) ) )
     {
         // set fill style
@@ -885,10 +1404,13 @@ PrintPS::text(Inkscape::Extension::Print *mod, char const *text, NR::Point p,
 
         os << "newpath\n";
         os << p[NR::X] << " " << p[NR::Y] << " moveto\n";
-        os << "(" << escaped_text.str() << ") show\n";
+        os << "(";
+        if(font_embedded) print_glyphlist(os, tf, s);
+        else os << escaped_text.str();
+        os << ") show\n";
     }
 
-    if (style->stroke.type == SP_PAINT_TYPE_COLOR) {
+    if (style->stroke.isColor()) {
 
         // set stroke style
         print_stroke_style(os, style);
@@ -896,9 +1418,14 @@ PrintPS::text(Inkscape::Extension::Print *mod, char const *text, NR::Point p,
         // paint stroke
         os << "newpath\n";
         os << p[NR::X] << " " << p[NR::Y] << " moveto\n";
-        os << "(" << escaped_text.str() << ") false charpath stroke\n";
+        os << "(";
+        if(font_embedded) print_glyphlist(os, tf, s);
+        else os << escaped_text.str();
+        os << ") false charpath stroke\n";
     }
 
+    if(tf) tf->Unref();
+
     os << "grestore\n";
 
     fprintf(_stream, "%s", os.str().c_str());
@@ -911,44 +1438,55 @@ PrintPS::text(Inkscape::Extension::Print *mod, char const *text, NR::Point p,
 /* PostScript helpers */
 
 void
-PrintPS::print_bpath(SVGOStringStream &os, NArtBpath const *bp)
+PrintPS::print_pathvector(SVGOStringStream &os, Geom::PathVector const &pathv)
 {
+    if (pathv.empty())
+        return;
+
     os << "newpath\n";
-    bool closed = false;
-    while (bp->code != NR_END) {
-        switch (bp->code) {
-            case NR_MOVETO:
-                if (closed) {
-                    os << "closepath\n";
-                }
-                closed = true;
-                os << bp->x3 << " " << bp->y3 << " moveto\n";
-                break;
-            case NR_MOVETO_OPEN:
-                if (closed) {
-                    os << "closepath\n";
-                }
-                closed = false;
-                os << bp->x3 << " " << bp->y3 << " moveto\n";
-                break;
-            case NR_LINETO:
-                os << bp->x3 << " " << bp->y3 << " lineto\n";
-                break;
-            case NR_CURVETO:
-                os << bp->x1 << " " << bp->y1 << " "
-                   << bp->x2 << " " << bp->y2 << " "
-                   << bp->x3 << " " << bp->y3 << " curveto\n";
-                break;
-            default:
-                break;
+
+    for(Geom::PathVector::const_iterator it = pathv.begin(); it != pathv.end(); ++it) {
+
+        os << it->initialPoint()[Geom::X] << " " << it->initialPoint()[Geom::Y] << " moveto\n";
+
+        for(Geom::Path::const_iterator cit = it->begin(); cit != it->end_open(); ++cit) {
+            print_2geomcurve(os, *cit);
+        }
+
+        if (it->closed()) {
+            os << "closepath\n";
         }
-        bp += 1;
+
+    }
+}
+
+void
+PrintPS::print_2geomcurve(SVGOStringStream &os, Geom::Curve const & c )
+{
+    using Geom::X;
+    using Geom::Y;
+
+    if( is_straight_curve(c) )
+    {
+        os << c.finalPoint()[X] << " " << c.finalPoint()[Y] << " lineto\n";
     }
-    if (closed) {
-        os << "closepath\n";
+    else if(Geom::CubicBezier const *cubic_bezier = dynamic_cast<Geom::CubicBezier const*>(&c)) {
+        std::vector<Geom::Point> points = cubic_bezier->points();
+        os << points[1][X] << " " << points[1][Y] << " "
+           << points[2][X] << " " << points[2][Y] << " "
+           << points[3][X] << " " << points[3][Y] << " curveto\n";
+    }
+    else {
+        //this case handles sbasis as well as all other curve types
+        Geom::Path sbasis_path = Geom::cubicbezierpath_from_sbasis(c.toSBasis(), 0.1);
+
+        for(Geom::Path::iterator iter = sbasis_path.begin(); iter != sbasis_path.end(); ++iter) {
+            print_2geomcurve(os, *iter);
+        }
     }
 }
 
+
 /* The following code is licensed under GNU GPL.
 ** The packbits, ascii85 and imaging printing code
 ** is from the gimp's postscript.c.
@@ -1112,18 +1650,18 @@ PrintPS::ascii85_done(SVGOStringStream &os)
 
 unsigned int
 PrintPS::print_image(FILE *ofp, guchar *px, unsigned int width, unsigned int height, unsigned int rs,
-                     NRMatrix const *transform)
+                     NR::Matrix const *transform)
 {
     Inkscape::SVGOStringStream os;
 
     os << "gsave\n";
 
-    os << "[" << transform->c[0] << " "
-       << transform->c[1] << " "
-       << transform->c[2] << " "
-       << transform->c[3] << " "
-       << transform->c[4] << " "
-       << transform->c[5] << "] concat\n";
+    os << "[" << (*transform)[0] << " "
+       << (*transform)[1] << " "
+       << (*transform)[2] << " "
+       << (*transform)[3] << " "
+       << (*transform)[4] << " "
+       << (*transform)[5] << "] concat\n";
 
     /* Write read image procedure */
     os << "<<\n";
@@ -1206,6 +1744,19 @@ PrintPS::textToPath(Inkscape::Extension::Print * ext)
     return ext->get_param_bool("textToPath");
 }
 
+/**
+* \brief Get "fontEmbedded" param
+* \retval TRUE Fonts have to be embedded in the output so that the user might not need to install fonts to have the interpreter read the document correctly
+* \retval FALSE No font embedding
+*
+* Only available for Adobe Type 1 fonts in EPS output till now
+*/
+bool
+PrintPS::fontEmbedded(Inkscape::Extension::Print * ext)
+{
+    return ext->get_param_bool("fontEmbedded");
+}
+
 #include "clear-n_.h"
 
 void
@@ -1213,14 +1764,15 @@ PrintPS::init(void)
 {
     /* SVG in */
     (void) Inkscape::Extension::build_from_mem(
-        "<inkscape-extension>\n"
+        "<inkscape-extension xmlns=\"" INKSCAPE_EXTENSION_URI "\">\n"
         "<name>" N_("Postscript Print") "</name>\n"
         "<id>" SP_MODULE_KEY_PRINT_PS "</id>\n"
-        "<param name=\"bitmap\" type=\"boolean\">FALSE</param>\n"
+        "<param name=\"bitmap\" type=\"boolean\">false</param>\n"
         "<param name=\"resolution\" type=\"string\">72</param>\n"
         "<param name=\"destination\" type=\"string\">| lp</param>\n"
-        "<param name=\"pageBoundingBox\" type=\"boolean\">TRUE</param>\n"
-        "<param name=\"textToPath\" type=\"boolean\">TRUE</param>\n"
+        "<param name=\"pageBoundingBox\" type=\"boolean\">true</param>\n"
+        "<param name=\"textToPath\" type=\"boolean\">true</param>\n"
+        "<param name=\"fontEmbedded\" type=\"boolean\">false</param>\n"
         "<print/>\n"
         "</inkscape-extension>", new PrintPS());
 }