src/extension/internal/latex-pstricks.cpp

   1 #define __SP_LATEX_C__
   2
   3 /*
   4  * LaTeX Printing
   5  *
   6  * Author:
   7  *  Michael Forbes <miforbes@mbhs.edu>
   8  *
   9  * Copyright (C) 2004 Authors
  10  *
  11  * Released under GNU GPL, read the file 'COPYING' for more information
  12  */
  13
  14 #ifdef HAVE_CONFIG_H
  15 # include "config.h"
  16 #endif
  17
  18
  19 #include <signal.h>
  20 #include <errno.h>
  21
  22
  23 #include "libnr/nr-matrix.h"
  24 #include "libnr/nr-matrix-ops.h"
  25 #include "libnr/nr-matrix-scale-ops.h"
  26 #include "libnr/nr-matrix-translate-ops.h"
  27 #include "libnr/nr-scale-translate-ops.h"
  28 #include "libnr/nr-translate-scale-ops.h"
  29 #include <libnr/nr-matrix-fns.h>
  30
  31
  32 #include "libnr/n-art-bpath.h"
  33 #include "sp-item.h"
  34
  35
  36 #include "style.h"
  37
  38 #include "latex-pstricks.h"
  39
  40 #include <unit-constants.h>
  41
  42 #include "extension/system.h"
  43 #include "extension/print.h"
  44
  45 #include "io/sys.h"
  46
  47 namespace Inkscape {
  48 namespace Extension {
  49 namespace Internal {
  50
  51 PrintLatex::PrintLatex (void): _stream(NULL)
  52 {
  53 }
  54
  55 PrintLatex::~PrintLatex (void)
  56 {
  57     if (_stream) fclose(_stream);
  58
  59     /* restore default signal handling for SIGPIPE */
  60 #if !defined(_WIN32) && !defined(__WIN32__)
  61     (void) signal(SIGPIPE, SIG_DFL);
  62 #endif
  63         return;
  64 }
  65
  66 unsigned int
  67 PrintLatex::setup (Inkscape::Extension::Print *mod)
  68 {
  69     return TRUE;
  70 }
  71
  72 unsigned int
  73 PrintLatex::begin (Inkscape::Extension::Print *mod, SPDocument *doc)
  74 {
  75     Inkscape::SVGOStringStream os;
  76     int res;
  77     FILE *osf, *osp;
  78     const gchar * fn;
  79
  80     os.setf(std::ios::fixed);
  81
  82     fn = mod->get_param_string("destination");
  83
  84     osf = NULL;
  85     osp = NULL;
  86
  87     gsize bytesRead = 0;
  88     gsize bytesWritten = 0;
  89     GError* error = NULL;
  90     gchar* local_fn = g_filename_from_utf8( fn,
  91                                             -1,  &bytesRead,  &bytesWritten, &error);
  92     fn = local_fn;
  93
  94     /* TODO: Replace the below fprintf's with something that does the right thing whether in
  95      * gui or batch mode (e.g. --print=blah).  Consider throwing an exception: currently one of
  96      * the callers (sp_print_document_to_file, "ret = mod->begin(doc)") wrongly ignores the
  97      * return code.
  98      */
  99     if (fn != NULL) {
 100         while (isspace(*fn)) fn += 1;
 101         Inkscape::IO::dump_fopen_call(fn, "K");
 102         osf = Inkscape::IO::fopen_utf8name(fn, "w+");
 103         if (!osf) {
 104             fprintf(stderr, "inkscape: fopen(%s): %s\n",
 105                     fn, strerror(errno));
 106             return 0;
 107         }
 108         _stream = osf;
 109     }
 110
 111     g_free(local_fn);
 112
 113     if (_stream) {
 114         /* fixme: this is kinda icky */
 115 #if !defined(_WIN32) && !defined(__WIN32__)
 116         (void) signal(SIGPIPE, SIG_IGN);
 117 #endif
 118     }
 119
 120     res = fprintf(_stream, "%%LaTeX with PSTricks extensions\n");
 121     /* flush this to test output stream as early as possible */
 122     if (fflush(_stream)) {
 123         /*g_print("caught error in sp_module_print_plain_begin\n");*/
 124         if (ferror(_stream)) {
 125             g_print("Error %d on output stream: %s\n", errno,
 126                     g_strerror(errno));
 127         }
 128         g_print("Printing failed\n");
 129         /* fixme: should use pclose() for pipes */
 130         fclose(_stream);
 131         _stream = NULL;
 132         fflush(stdout);
 133         return 0;
 134     }
 135
 136     // width and height in pt
 137     _width = sp_document_width(doc) * PT_PER_PX;
 138     _height = sp_document_height(doc) * PT_PER_PX;
 139
 140     if (res >= 0) {
 141
 142         os << "%%Creator: " << PACKAGE_STRING << "\n";
 143         os << "%%Please note this file requires PSTricks extensions\n";
 144
 145         os << "\\psset{xunit=.5pt,yunit=.5pt,runit=.5pt}\n";
 146         // from now on we can output px, but they will be treated as pt
 147
 148         os << "\\begin{pspicture}(" << sp_document_width(doc) << "," << sp_document_height(doc) << ")\n";
 149     }
 150
 151     m_tr_stack.push( NR::scale(1, -1) * NR::translate(0, sp_document_height(doc)));
 152
 153     return fprintf(_stream, "%s", os.str().c_str());
 154 }
 155
 156 unsigned int
 157 PrintLatex::finish (Inkscape::Extension::Print *mod)
 158 {
 159     int res;
 160
 161     if (!_stream) return 0;
 162
 163     res = fprintf(_stream, "\\end{pspicture}\n");
 164
 165     /* Flush stream to be sure. */
 166     (void) fflush(_stream);
 167
 168     fclose(_stream);
 169     _stream = NULL;
 170     return 0;
 171 }
 172
 173 unsigned int
 174 PrintLatex::bind(Inkscape::Extension::Print *mod, NR::Matrix const *transform, float opacity)
 175 {
 176     NR::Matrix tr = *transform;
 177
 178     if(m_tr_stack.size()){
 179         NR::Matrix tr_top = m_tr_stack.top();
 180         m_tr_stack.push(tr * tr_top);
 181     }else
 182         m_tr_stack.push(tr);
 183
 184     return 1;
 185 }
 186
 187 unsigned int
 188 PrintLatex::release(Inkscape::Extension::Print *mod)
 189 {
 190     m_tr_stack.pop();
 191     return 1;
 192 }
 193
 194 unsigned int PrintLatex::comment (Inkscape::Extension::Print * module,
 195                                   const char * comment)
 196 {
 197     if (!_stream) return 0; // XXX: fixme, returning -1 as unsigned.
 198
 199     return fprintf(_stream, "%%! %s\n",comment);
 200 }
 201
 202 unsigned int
 203 PrintLatex::fill(Inkscape::Extension::Print *mod,
 204                  NRBPath const *bpath, NR::Matrix const *transform, SPStyle const *style,
 205                  NRRect const *pbox, NRRect const *dbox, NRRect const *bbox)
 206 {
 207     if (!_stream) return 0; // XXX: fixme, returning -1 as unsigned.
 208
 209     if (style->fill.isColor()) {
 210         Inkscape::SVGOStringStream os;
 211         float rgb[3];
 212
 213         os.setf(std::ios::fixed);
 214
 215         sp_color_get_rgb_floatv(&style->fill.value.color, rgb);
 216         os << "{\n\\newrgbcolor{curcolor}{" << rgb[0] << " " << rgb[1] << " " << rgb[2] << "}\n";
 217
 218         os << "\\pscustom[linestyle=none,fillstyle=solid,fillcolor=curcolor]\n{\n";
 219
 220         print_bpath(os, bpath->path, transform);
 221
 222         os << "}\n}\n";
 223
 224         fprintf(_stream, "%s", os.str().c_str());
 225     }
 226
 227     return 0;
 228 }
 229
 230 unsigned int
 231 PrintLatex::stroke (Inkscape::Extension::Print *mod, const NRBPath *bpath, const NR::Matrix *transform, const SPStyle *style,
 232                               const NRRect *pbox, const NRRect *dbox, const NRRect *bbox)
 233 {
 234     if (!_stream) return 0; // XXX: fixme, returning -1 as unsigned.
 235
 236     if (style->stroke.isColor()) {
 237         Inkscape::SVGOStringStream os;
 238         float rgb[3];
 239         NR::Matrix tr_stack = m_tr_stack.top();
 240         double const scale = expansion(tr_stack);
 241         os.setf(std::ios::fixed);
 242
 243         sp_color_get_rgb_floatv(&style->stroke.value.color, rgb);
 244         os << "{\n\\newrgbcolor{curcolor}{" << rgb[0] << " " << rgb[1] << " " << rgb[2] << "}\n";
 245
 246         os << "\\pscustom[linewidth=" << style->stroke_width.computed*scale<< ",linecolor=curcolor";
 247
 248         if (style->stroke_dasharray_set &&
 249                 style->stroke_dash.n_dash &&
 250                 style->stroke_dash.dash) {
 251             int i;
 252             os << ",linestyle=dashed,dash=";
 253             for (i = 0; i < style->stroke_dash.n_dash; i++) {
 254                 if ((i)) {
 255                     os << " ";
 256                 }
 257                 os << style->stroke_dash.dash[i];
 258             }
 259         }
 260
 261         os <<"]\n{\n";
 262
 263         print_bpath(os, bpath->path, transform);
 264
 265         os << "}\n}\n";
 266
 267         fprintf(_stream, "%s", os.str().c_str());
 268     }
 269
 270     return 0;
 271 }
 272
 273 void
 274 PrintLatex::print_bpath(SVGOStringStream &os, const NArtBpath *bp, const NR::Matrix *transform)
 275 {
 276     unsigned int closed;
 277     NR::Matrix tf=*transform;
 278     NR::Matrix tf_stack=m_tr_stack.top();
 279
 280     os << "\\newpath\n";
 281     closed = FALSE;
 282     while (bp->code != NR_END) {
 283         using NR::X;
 284         using NR::Y;
 285
 286 //        NR::Point const p1(bp->c(1) * tf);
 287 //        NR::Point const p2(bp->c(2) * tf);
 288 //        NR::Point const p3(bp->c(3) * tf);
 289
 290         NR::Point const p1(bp->c(1) * tf_stack);
 291         NR::Point const p2(bp->c(2) * tf_stack);
 292         NR::Point const p3(bp->c(3) * tf_stack);
 293
 294         double const x1 = p1[X], y1 = p1[Y];
 295         double const x2 = p2[X], y2 = p2[Y];
 296         double const x3 = p3[X], y3 = p3[Y];
 297
 298         switch (bp->code) {
 299             case NR_MOVETO:
 300                 if (closed) {
 301                     os << "\\closepath\n";
 302                 }
 303                 closed = TRUE;
 304                 os << "\\moveto(" << x3 << "," << y3 << ")\n";
 305                 break;
 306             case NR_MOVETO_OPEN:
 307                 if (closed) {
 308                     os << "\\closepath\n";
 309                 }
 310                 closed = FALSE;
 311                 os << "\\moveto(" << x3 << "," << y3 << ")\n";
 312                 break;
 313             case NR_LINETO:
 314                 os << "\\lineto(" << x3 << "," << y3 << ")\n";
 315                 break;
 316             case NR_CURVETO:
 317                 os << "\\curveto(" << x1 << "," << y1 << ")("
 318                    << x2 << "," << y2 << ")("
 319                    << x3 << "," << y3 << ")\n";
 320                 break;
 321             default:
 322                 break;
 323         }
 324         bp += 1;
 325     }
 326     if (closed) {
 327         os << "\\closepath\n";
 328     }
 329 }
 330
 331 bool
 332 PrintLatex::textToPath(Inkscape::Extension::Print * ext)
 333 {
 334     return ext->get_param_bool("textToPath");
 335 }
 336
 337 #include "clear-n_.h"
 338
 339 void
 340 PrintLatex::init (void)
 341 {
 342         Inkscape::Extension::Extension * ext;
 343
 344         /* SVG in */
 345     ext = Inkscape::Extension::build_from_mem(
 346                 "<inkscape-extension xmlns=\"" INKSCAPE_EXTENSION_URI "\">\n"
 347                         "<name>" N_("LaTeX Print") "</name>\n"
 348                         "<id>" SP_MODULE_KEY_PRINT_LATEX "</id>\n"
 349                         "<param name=\"destination\" type=\"string\"></param>\n"
 350                         "<param name=\"textToPath\" type=\"boolean\">true</param>\n"
 351                         "<print/>\n"
 352                 "</inkscape-extension>", new PrintLatex());
 353
 354         return;
 355 }
 356
 357 }  /* namespace Internal */
 358 }  /* namespace Extension */
 359 }  /* namespace Inkscape */
 360
 361 /*
 362   Local Variables:
 363   mode:c++
 364   c-file-style:"stroustrup"
 365   c-file-offsets:((innamespace . 0)(inline-open . 0)(case-label . +))
 366   indent-tabs-mode:nil
 367   fill-column:99
 368   End:
 369 */
 370 // vim: filetype=cpp:expandtab:shiftwidth=4:tabstop=8:softtabstop=4:encoding=utf-8:textwidth=99 :
 371