10139N/A#define __SP_LATEX_C__

10139N/A

10139N/A

10139N/A#ifdef HAVE_CONFIG_H

10139N/A# include "config.h"

10139N/A#endif

10139N/A

10139N/A

10139N/A#include <signal.h>

10139N/A#include <errno.h>

10139N/A

10139N/A

10139N/A#include "libnr/nr-matrix.h"

10139N/A#include "libnr/nr-matrix-ops.h"

10139N/A#include "libnr/nr-matrix-scale-ops.h"

10139N/A#include "libnr/nr-matrix-translate-ops.h"

10139N/A#include "libnr/nr-scale-translate-ops.h"

10139N/A#include "libnr/nr-translate-scale-ops.h"

10139N/A#include <libnr/nr-matrix-fns.h>

10139N/A#include <2geom/pathvector.h>

10139N/A#include <2geom/sbasis-to-bezier.h>

10139N/A

10139N/A#include "sp-item.h"

10139N/A

10139N/A#include "style.h"

10139N/A

10139N/A#include "latex-pstricks.h"

10139N/A

10139N/A#include <unit-constants.h>

10139N/A

10139N/A#include "extension/system.h"

10139N/A#include "extension/print.h"

10139N/A

10139N/A#include "io/sys.h"

10139N/A

10139N/Anamespace Inkscape {

10139N/Anamespace Extension {

10139N/Anamespace Internal {

10139N/A

10139N/APrintLatex::PrintLatex (void): _stream(NULL)

10139N/A{

10139N/A}

10139N/A

10139N/APrintLatex::~PrintLatex (void)

10139N/A{

10139N/A if (_stream) fclose(_stream);

10139N/A

10139N/A /* restore default signal handling for SIGPIPE */

10139N/A#if !defined(_WIN32) && !defined(__WIN32__)

10139N/A (void) signal(SIGPIPE, SIG_DFL);

10139N/A#endif

10139N/A return;

10139N/A}

10139N/A

10139N/Aunsigned int

10139N/APrintLatex::setup (Inkscape::Extension::Print *mod)

10139N/A{

10139N/A return TRUE;

10139N/A}

10139N/A

10139N/Aunsigned int

10139N/APrintLatex::begin (Inkscape::Extension::Print *mod, SPDocument *doc)

10139N/A{

10139N/A Inkscape::SVGOStringStream os;

10139N/A int res;

10139N/A FILE *osf, *osp;

10139N/A const gchar * fn;

10139N/A

10139N/A os.setf(std::ios::fixed);

10139N/A

10139N/A fn = mod->get_param_string("destination");

10139N/A

10139N/A osf = NULL;

10139N/A osp = NULL;

10139N/A

10139N/A gsize bytesRead = 0;

10139N/A gsize bytesWritten = 0;

10139N/A GError* error = NULL;

10139N/A gchar* local_fn = g_filename_from_utf8( fn,

10139N/A -1, &bytesRead, &bytesWritten, &error);

10139N/A fn = local_fn;

10139N/A

10139N/A /* TODO: Replace the below fprintf's with something that does the right thing whether in

10139N/A if (fn != NULL) {

10139N/A while (isspace(*fn)) fn += 1;

10139N/A Inkscape::IO::dump_fopen_call(fn, "K");

10139N/A osf = Inkscape::IO::fopen_utf8name(fn, "w+");

10139N/A if (!osf) {

10139N/A fprintf(stderr, "inkscape: fopen(%s): %s\n",

13623N/A fn, strerror(errno));

10139N/A return 0;

10139N/A }

10139N/A _stream = osf;

10139N/A }

10139N/A

10139N/A g_free(local_fn);

10139N/A

10139N/A if (_stream) {

10139N/A /* fixme: this is kinda icky */

10139N/A#if !defined(_WIN32) && !defined(__WIN32__)

10139N/A (void) signal(SIGPIPE, SIG_IGN);

10139N/A#endif

10139N/A }

10139N/A

10139N/A res = fprintf(_stream, "%%LaTeX with PSTricks extensions\n");

10139N/A /* flush this to test output stream as early as possible */

11904N/A if (fflush(_stream)) {

10139N/A /*g_print("caught error in sp_module_print_plain_begin\n");*/

10139N/A if (ferror(_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;

fflush(stdout);

return 0;

}

// width and height in pt

_width = sp_document_width(doc) * PT_PER_PX;

_height = sp_document_height(doc) * PT_PER_PX;

if (res >= 0) {

os << "%%Creator: " << PACKAGE_STRING << "\n";

os << "%%Please note this file requires PSTricks extensions\n";

os << "\\psset{xunit=.5pt,yunit=.5pt,runit=.5pt}\n";

// from now on we can output px, but they will be treated as pt

os << "\\begin{pspicture}(" << sp_document_width(doc) << "," << sp_document_height(doc) << ")\n";

}

m_tr_stack.push( NR::scale(1, -1) * NR::translate(0, sp_document_height(doc)));

return fprintf(_stream, "%s", os.str().c_str());

}

unsigned int

PrintLatex::finish (Inkscape::Extension::Print *mod)

{

int res;

if (!_stream) return 0;

res = fprintf(_stream, "\\end{pspicture}\n");

/* Flush stream to be sure. */

(void) fflush(_stream);

fclose(_stream);

_stream = NULL;

return 0;

}

unsigned int

PrintLatex::bind(Inkscape::Extension::Print *mod, NR::Matrix const *transform, float opacity)

{

NR::Matrix tr = *transform;

if(m_tr_stack.size()){

NR::Matrix tr_top = m_tr_stack.top();

m_tr_stack.push(tr * tr_top);

}else

m_tr_stack.push(tr);

return 1;

}

unsigned int

PrintLatex::release(Inkscape::Extension::Print *mod)

{

m_tr_stack.pop();

return 1;

}

unsigned int PrintLatex::comment (Inkscape::Extension::Print * module,

const char * comment)

{

if (!_stream) return 0; // XXX: fixme, returning -1 as unsigned.

return fprintf(_stream, "%%! %s\n",comment);

}

unsigned int

PrintLatex::fill(Inkscape::Extension::Print *mod,

Geom::PathVector const &pathv, NR::Matrix const *transform, SPStyle const *style,

NRRect const *pbox, NRRect const *dbox, NRRect const *bbox)

{

if (!_stream) return 0; // XXX: fixme, returning -1 as unsigned.

if (style->fill.isColor()) {

Inkscape::SVGOStringStream os;

float rgb[3];

os.setf(std::ios::fixed);

sp_color_get_rgb_floatv(&style->fill.value.color, rgb);

os << "{\n\\newrgbcolor{curcolor}{" << rgb[0] << " " << rgb[1] << " " << rgb[2] << "}\n";

os << "\\pscustom[linestyle=none,fillstyle=solid,fillcolor=curcolor]\n{\n";

print_pathvector(os, pathv, transform);

os << "}\n}\n";

fprintf(_stream, "%s", os.str().c_str());

}

return 0;

}

unsigned int

PrintLatex::stroke (Inkscape::Extension::Print *mod, Geom::PathVector const &pathv, const NR::Matrix *transform, const SPStyle *style,

const NRRect *pbox, const NRRect *dbox, const NRRect *bbox)

{

if (!_stream) return 0; // XXX: fixme, returning -1 as unsigned.

if (style->stroke.isColor()) {

Inkscape::SVGOStringStream os;

float rgb[3];

NR::Matrix tr_stack = m_tr_stack.top();

double const scale = expansion(tr_stack);

os.setf(std::ios::fixed);

sp_color_get_rgb_floatv(&style->stroke.value.color, rgb);

os << "{\n\\newrgbcolor{curcolor}{" << rgb[0] << " " << rgb[1] << " " << rgb[2] << "}\n";

os << "\\pscustom[linewidth=" << style->stroke_width.computed*scale<< ",linecolor=curcolor";

if (style->stroke_dasharray_set &&

style->stroke_dash.n_dash &&

style->stroke_dash.dash) {

int i;

os << ",linestyle=dashed,dash=";

for (i = 0; i < style->stroke_dash.n_dash; i++) {

if ((i)) {

os << " ";

}

os << style->stroke_dash.dash[i];

}

}

os <<"]\n{\n";

print_pathvector(os, pathv, transform);

os << "}\n}\n";

fprintf(_stream, "%s", os.str().c_str());

}

return 0;

}

PrintLatex::print_pathvector(SVGOStringStream &os, Geom::PathVector const &pathv_in, const NR::Matrix * /*transform*/)

{

if (pathv_in.empty())

return;

NR::Matrix tf_stack=m_tr_stack.top(); // and why is transform argument not used?

Geom::PathVector pathv = pathv_in * to_2geom(tf_stack); // generates new path, which is a bit slow, but this doesn't have to be performance optimized

os << "\\newpath\n";

for(Geom::PathVector::const_iterator it = pathv.begin(); it != pathv.end(); ++it) {

os << "\\moveto(" << it->initialPoint()[Geom::X] << "," << it->initialPoint()[Geom::Y] << ")\n";

for(Geom::Path::const_iterator cit = it->begin(); cit != it->end_open(); ++cit) {

print_2geomcurve(os, *cit);

}

if (it->closed()) {

os << "\\closepath\n";

}

}

}

PrintLatex::print_2geomcurve(SVGOStringStream &os, Geom::Curve const & c )

{

using Geom::X;

using Geom::Y;

if( dynamic_cast<Geom::LineSegment const*>(&c) ||

dynamic_cast<Geom::HLineSegment const*>(&c) ||

dynamic_cast<Geom::VLineSegment const*>(&c) )

{

os << "\\lineto(" << c.finalPoint()[X] << "," << c.finalPoint()[Y] << ")\n";

}

else if(Geom::CubicBezier const *cubic_bezier = dynamic_cast<Geom::CubicBezier const*>(&c)) {

std::vector<Geom::Point> points = cubic_bezier->points();

os << "\\curveto(" << points[1][X] << "," << points[1][Y] << ")("

<< points[2][X] << "," << points[2][Y] << ")("

<< points[3][X] << "," << points[3][Y] << ")\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);

}

}

}

PrintLatex::textToPath(Inkscape::Extension::Print * ext)

{

return ext->get_param_bool("textToPath");

}

#include "clear-n_.h"

PrintLatex::init (void)

{

Inkscape::Extension::Extension * ext;

/* SVG in */

ext = Inkscape::Extension::build_from_mem(

"<inkscape-extension xmlns=\"" INKSCAPE_EXTENSION_URI "\">\n"

"<name>" N_("LaTeX Print") "</name>\n"

"<id>" SP_MODULE_KEY_PRINT_LATEX "</id>\n"

"<param name=\"destination\" type=\"string\"></param>\n"

"<param name=\"textToPath\" type=\"boolean\">true</param>\n"

"<print/>\n"

"</inkscape-extension>", new PrintLatex());

return;

}

} /* namespace Internal */

} /* namespace Extension */

} /* namespace Inkscape */