#ifdef HAVE_CONFIG_H

# include "config.h"

#endif

#include <cstring>

#include <algorithm>

#include <string>

#include <glib/gstdio.h>

#include <2geom/rect.h>

#include <2geom/transforms.h>

#include <glibmm/i18n.h>

#include "display/drawing-image.h"

#include "display/cairo-utils.h"

#include "display/curve.h"

#include "enums.h"

#include "attributes.h"

#include "print.h"

#include "brokenimage.xpm"

#include "document.h"

#include "sp-image.h"

#include "sp-clippath.h"

#include "xml/quote.h"

#include "xml/repr.h"

#include "snap-candidate.h"

#include "preferences.h"

#include "io/sys.h"

#include "sp-factory.h"

#if defined(HAVE_LIBLCMS1) || defined(HAVE_LIBLCMS2)

#include "cms-system.h"

#include "color-profile.h"

#if HAVE_LIBLCMS2

# include <lcms2.h>

#elif HAVE_LIBLCMS1

# include <lcms.h>

#endif // HAVE_LIBLCMS2

#ifdef DEBUG_LCMS

#define DEBUG_MESSAGE(key, ...)\

{\

g_message( __VA_ARGS__ );\

}

#include <gtk/gtk.h>

#else

#define DEBUG_MESSAGE(key, ...)

#endif // DEBUG_LCMS

#endif // defined(HAVE_LIBLCMS1) || defined(HAVE_LIBLCMS2)

#define MAGIC_EPSILON 1e-9

#define MAGIC_EPSILON_TOO 1e-18

static void sp_image_set_curve(SPImage *image);

static Inkscape::Pixbuf *sp_image_repr_read_image(gchar const *href, gchar const *absref, gchar const *base );

static void sp_image_update_arenaitem (SPImage *img, Inkscape::DrawingImage *ai);

static void sp_image_update_canvas_image (SPImage *image);

static GdkPixbuf * sp_image_repr_read_dataURI (const gchar * uri_data);

static GdkPixbuf * sp_image_repr_read_b64 (const gchar * uri_data);

static void pixbuf_set_mime_data(GdkPixbuf *pb, guchar *data, gsize len, GdkPixbufFormat *fmt);

#ifdef DEBUG_LCMS

extern guint update_in_progress;

#define DEBUG_MESSAGE_SCISLAC(key, ...) \

{\

Inkscape::Preferences *prefs = Inkscape::Preferences::get();\

bool dump = prefs->getBool("/options/scislac/" #key);\

bool dumpD = prefs->getBool("/options/scislac/" #key "D");\

bool dumpD2 = prefs->getBool("/options/scislac/" #key "D2");\

dumpD &&= ( (update_in_progress == 0) || dumpD2 );\

if ( dump )\

{\

g_message( __VA_ARGS__ );\

\

}\

if ( dumpD )\

{\

GtkWidget *dialog = gtk_message_dialog_new(NULL,\

GTK_DIALOG_DESTROY_WITH_PARENT, \

GTK_MESSAGE_INFO, \

GTK_BUTTONS_OK, \

__VA_ARGS__ \

);\

g_signal_connect_swapped(dialog, "response",\

G_CALLBACK(gtk_widget_destroy), \

dialog); \

gtk_widget_show_all( dialog );\

}\

}

#else // DEBUG_LCMS

#define DEBUG_MESSAGE_SCISLAC(key, ...)

#endif // DEBUG_LCMS

namespace {

SPObject* createImage() {

return new SPImage();

}

bool imageRegistered = SPFactory::instance().registerObject("svg:image", createImage);

}

SPImage::SPImage() : SPItem() {

this->aspect_clip = 0;

this->x.unset();

this->y.unset();

this->width.unset();

this->height.unset();

this->aspect_align = SP_ASPECT_NONE;

this->clipbox = Geom::Rect();

this->sx = this->sy = 1.0;

this->ox = this->oy = 0.0;

this->curve = NULL;

this->href = 0;

#if defined(HAVE_LIBLCMS1) || defined(HAVE_LIBLCMS2)

this->color_profile = 0;

#endif // defined(HAVE_LIBLCMS1) || defined(HAVE_LIBLCMS2)

this->pixbuf = 0;

}

SPImage::~SPImage() {

}

void SPImage::build(SPDocument *document, Inkscape::XML::Node *repr) {

SPItem::build(document, repr);

this->readAttr( "xlink:href" );

this->readAttr( "x" );

this->readAttr( "y" );

this->readAttr( "width" );

this->readAttr( "height" );

this->readAttr( "preserveAspectRatio" );

this->readAttr( "color-profile" );

/* Register */

document->addResource("image", this);

}

void SPImage::release() {

if (this->document) {

// Unregister ourselves

this->document->removeResource("image", this);

}

if (this->href) {

g_free (this->href);

this->href = NULL;

}

delete this->pixbuf;

this->pixbuf = NULL;

#if defined(HAVE_LIBLCMS1) || defined(HAVE_LIBLCMS2)

if (this->color_profile) {

g_free (this->color_profile);

this->color_profile = NULL;

}

#endif // defined(HAVE_LIBLCMS1) || defined(HAVE_LIBLCMS2)

if (this->curve) {

this->curve = this->curve->unref();

}

SPItem::release();

}

void SPImage::set(unsigned int key, const gchar* value) {

switch (key) {

case SP_ATTR_XLINK_HREF:

g_free (this->href);

this->href = (value) ? g_strdup (value) : NULL;

this->requestDisplayUpdate(SP_OBJECT_MODIFIED_FLAG | SP_IMAGE_HREF_MODIFIED_FLAG);

break;

case SP_ATTR_X:

if (!this->x.readAbsolute(value)) {

/* fixme: em, ex, % are probably valid, but require special treatment (Lauris) */

this->x.unset();

}

this->requestDisplayUpdate(SP_OBJECT_MODIFIED_FLAG);

break;

case SP_ATTR_Y:

if (!this->y.readAbsolute(value)) {

/* fixme: em, ex, % are probably valid, but require special treatment (Lauris) */

this->y.unset();

}

this->requestDisplayUpdate(SP_OBJECT_MODIFIED_FLAG);

break;

case SP_ATTR_WIDTH:

if (!this->width.readAbsolute(value)) {

/* fixme: em, ex, % are probably valid, but require special treatment (Lauris) */

this->width.unset();

}

this->requestDisplayUpdate(SP_OBJECT_MODIFIED_FLAG);

break;

case SP_ATTR_HEIGHT:

if (!this->height.readAbsolute(value)) {

/* fixme: em, ex, % are probably valid, but require special treatment (Lauris) */

this->height.unset();

}

this->requestDisplayUpdate(SP_OBJECT_MODIFIED_FLAG);

break;

case SP_ATTR_PRESERVEASPECTRATIO:

/* Do setup before, so we can use break to escape */

this->aspect_align = SP_ASPECT_NONE;

this->aspect_clip = SP_ASPECT_MEET;

this->requestDisplayUpdate(SP_OBJECT_MODIFIED_FLAG | SP_OBJECT_VIEWPORT_MODIFIED_FLAG);

if (value) {

int len;

gchar c[256];

const gchar *p, *e;

unsigned int align, clip;

p = value;

while (*p && *p == 32) p += 1;

if (!*p) break;

e = p;

while (*e && *e != 32) e += 1;

len = e - p;

if (len > 8) break;

memcpy (c, value, len);

c[len] = 0;

/* Now the actual part */

if (!strcmp (c, "none")) {

align = SP_ASPECT_NONE;

} else if (!strcmp (c, "xMinYMin")) {

align = SP_ASPECT_XMIN_YMIN;

} else if (!strcmp (c, "xMidYMin")) {

align = SP_ASPECT_XMID_YMIN;

} else if (!strcmp (c, "xMaxYMin")) {

align = SP_ASPECT_XMAX_YMIN;

} else if (!strcmp (c, "xMinYMid")) {

align = SP_ASPECT_XMIN_YMID;

} else if (!strcmp (c, "xMidYMid")) {

align = SP_ASPECT_XMID_YMID;

} else if (!strcmp (c, "xMaxYMid")) {

align = SP_ASPECT_XMAX_YMID;

} else if (!strcmp (c, "xMinYMax")) {

align = SP_ASPECT_XMIN_YMAX;

} else if (!strcmp (c, "xMidYMax")) {

align = SP_ASPECT_XMID_YMAX;

} else if (!strcmp (c, "xMaxYMax")) {

align = SP_ASPECT_XMAX_YMAX;

} else {

break;

}

clip = SP_ASPECT_MEET;

while (*e && *e == 32) e += 1;

if (*e) {

if (!strcmp (e, "meet")) {

clip = SP_ASPECT_MEET;

} else if (!strcmp (e, "slice")) {

clip = SP_ASPECT_SLICE;

} else {

break;

}

}

this->aspect_align = align;

this->aspect_clip = clip;

}

break;

#if defined(HAVE_LIBLCMS1) || defined(HAVE_LIBLCMS2)

case SP_PROP_COLOR_PROFILE:

if ( this->color_profile ) {

g_free (this->color_profile);

}

this->color_profile = (value) ? g_strdup (value) : NULL;

if ( value ) {

DEBUG_MESSAGE( lcmsFour, "<this> color-profile set to '%s'", value );

} else {

DEBUG_MESSAGE( lcmsFour, "<this> color-profile cleared" );

}

// TODO check on this HREF_MODIFIED flag

this->requestDisplayUpdate(SP_OBJECT_MODIFIED_FLAG | SP_IMAGE_HREF_MODIFIED_FLAG);

break;

#endif // defined(HAVE_LIBLCMS1) || defined(HAVE_LIBLCMS2)

default:

SPItem::set(key, value);

break;

}

sp_image_set_curve(this); //creates a curve at the image's boundary for snapping

}

void SPImage::update(SPCtx *ctx, unsigned int flags) {

SPDocument *doc = this->document;

SPItem::update(ctx, flags);

if (flags & SP_IMAGE_HREF_MODIFIED_FLAG) {

delete this->pixbuf;

this->pixbuf = NULL;

if (this->href) {

Inkscape::Pixbuf *pixbuf = NULL;

pixbuf = sp_image_repr_read_image (

this->getRepr()->attribute("xlink:href"),

this->getRepr()->attribute("sodipodi:absref"),

doc->getBase());

if (pixbuf) {

#if defined(HAVE_LIBLCMS1) || defined(HAVE_LIBLCMS2)

if ( this->color_profile )

{

// TODO: this will prevent using MIME data when exporting.

// Integrate color correction into loading.

pixbuf->ensurePixelFormat(Inkscape::Pixbuf::PF_GDK);

int imagewidth = pixbuf->width();

int imageheight = pixbuf->height();

int rowstride = pixbuf->rowstride();;

guchar* px = pixbuf->pixels();

if ( px ) {

DEBUG_MESSAGE( lcmsFive, "in <image>'s sp_image_update. About to call colorprofile_get_handle()" );

guint profIntent = Inkscape::RENDERING_INTENT_UNKNOWN;

cmsHPROFILE prof = Inkscape::CMSSystem::getHandle( this->document,

&profIntent,

this->color_profile );

if ( prof ) {

cmsProfileClassSignature profileClass = cmsGetDeviceClass( prof );

if ( profileClass != cmsSigNamedColorClass ) {

int intent = INTENT_PERCEPTUAL;

switch ( profIntent ) {

case Inkscape::RENDERING_INTENT_RELATIVE_COLORIMETRIC:

intent = INTENT_RELATIVE_COLORIMETRIC;

break;

case Inkscape::RENDERING_INTENT_SATURATION:

intent = INTENT_SATURATION;

break;

case Inkscape::RENDERING_INTENT_ABSOLUTE_COLORIMETRIC:

intent = INTENT_ABSOLUTE_COLORIMETRIC;

break;

case Inkscape::RENDERING_INTENT_PERCEPTUAL:

case Inkscape::RENDERING_INTENT_UNKNOWN:

case Inkscape::RENDERING_INTENT_AUTO:

default:

intent = INTENT_PERCEPTUAL;

}

cmsHPROFILE destProf = cmsCreate_sRGBProfile();

cmsHTRANSFORM transf = cmsCreateTransform( prof,

TYPE_RGBA_8,

destProf,

TYPE_RGBA_8,

intent, 0 );

if ( transf ) {

guchar* currLine = px;

for ( int y = 0; y < imageheight; y++ ) {

// Since the types are the same size, we can do the transformation in-place

cmsDoTransform( transf, currLine, currLine, imagewidth );

currLine += rowstride;

}

cmsDeleteTransform( transf );

} else {

DEBUG_MESSAGE( lcmsSix, "in <image>'s sp_image_update. Unable to create LCMS transform." );

}

cmsCloseProfile( destProf );

} else {

DEBUG_MESSAGE( lcmsSeven, "in <image>'s sp_image_update. Profile type is named color. Can't transform." );

}

} else {

DEBUG_MESSAGE( lcmsEight, "in <image>'s sp_image_update. No profile found." );

}

}

}

#endif // defined(HAVE_LIBLCMS1) || defined(HAVE_LIBLCMS2)

this->pixbuf = pixbuf;

}

}

}

if (this->pixbuf) {

/* fixme: We are slightly violating spec here (Lauris) */

if (!this->width._set) {

this->width.computed = this->pixbuf->width();

}

if (!this->height._set) {

this->height.computed = this->pixbuf->height();

}

}

this->clipbox = Geom::Rect::from_xywh(

this->x.computed, this->y.computed,

this->width.computed, this->height.computed);

this->ox = this->x.computed;

this->oy = this->y.computed;

int pixwidth = this->pixbuf->width();

int pixheight = this->pixbuf->height();

this->sx = this->width.computed / pixwidth;

this->sy = this->height.computed / pixheight;

// preserveAspectRatio calculate bounds / clipping rectangle -- EAF

if (this->pixbuf && (this->aspect_align != SP_ASPECT_NONE)) {

double x, y;

switch (this->aspect_align) {

case SP_ASPECT_XMIN_YMIN:

x = 0.0;

y = 0.0;

break;

case SP_ASPECT_XMID_YMIN:

x = 0.5;

y = 0.0;

break;

case SP_ASPECT_XMAX_YMIN:

x = 1.0;

y = 0.0;

break;

case SP_ASPECT_XMIN_YMID:

x = 0.0;

y = 0.5;

break;

case SP_ASPECT_XMID_YMID:

x = 0.5;

y = 0.5;

break;

case SP_ASPECT_XMAX_YMID:

x = 1.0;

y = 0.5;

break;

case SP_ASPECT_XMIN_YMAX:

x = 0.0;

y = 1.0;

break;

case SP_ASPECT_XMID_YMAX:

x = 0.5;

y = 1.0;

break;

case SP_ASPECT_XMAX_YMAX:

x = 1.0;

y = 1.0;

break;

default:

x = 0.0;

y = 0.0;

break;

}

if (this->aspect_clip == SP_ASPECT_SLICE) {

double scale = std::max(this->sx, this->sy);

this->sx = scale;

this->sy = scale;

} else {

double scale = std::min(this->sx, this->sy);

this->sx = scale;

this->sy = scale;

}

double vw = pixwidth * this->sx;

double vh = pixheight * this->sy;

this->ox += x * (this->width.computed - vw);

this->oy += y * (this->height.computed - vh);

}

sp_image_update_canvas_image ((SPImage *) this);

}

void SPImage::modified(unsigned int flags) {

if (flags & SP_OBJECT_STYLE_MODIFIED_FLAG) {

for (SPItemView *v = this->display; v != NULL; v = v->next) {

Inkscape::DrawingImage *img = dynamic_cast<Inkscape::DrawingImage *>(v->arenaitem);

img->setStyle(this->style);

}

}

}

Inkscape::XML::Node *SPImage::write(Inkscape::XML::Document *xml_doc, Inkscape::XML::Node *repr, guint flags ) {

if ((flags & SP_OBJECT_WRITE_BUILD) && !repr) {

repr = xml_doc->createElement("svg:image");

}

repr->setAttribute("xlink:href", this->href);

/* fixme: Reset attribute if needed (Lauris) */

if (this->x._set) {

sp_repr_set_svg_double(repr, "x", this->x.computed);

}

if (this->y._set) {

sp_repr_set_svg_double(repr, "y", this->y.computed);

}

if (this->width._set) {

sp_repr_set_svg_double(repr, "width", this->width.computed);

}

if (this->height._set) {

sp_repr_set_svg_double(repr, "height", this->height.computed);

}

//XML Tree being used directly here while it shouldn't be...

repr->setAttribute("preserveAspectRatio", this->getRepr()->attribute("preserveAspectRatio"));

#if defined(HAVE_LIBLCMS1) || defined(HAVE_LIBLCMS2)

if (this->color_profile) {

repr->setAttribute("color-profile", this->color_profile);

}

#endif // defined(HAVE_LIBLCMS1) || defined(HAVE_LIBLCMS2)

SPItem::write(xml_doc, repr, flags);

return repr;

}

Geom::OptRect SPImage::bbox(Geom::Affine const &transform, SPItem::BBoxType type) {

Geom::OptRect bbox;

if ((this->width.computed > 0.0) && (this->height.computed > 0.0)) {

bbox = Geom::Rect::from_xywh(this->x.computed, this->y.computed, this->width.computed, this->height.computed);

*bbox *= transform;

}

return bbox;

}

void SPImage::print(SPPrintContext *ctx) {

if (this->pixbuf && (this->width.computed > 0.0) && (this->height.computed > 0.0) ) {

Inkscape::Pixbuf *pb = new Inkscape::Pixbuf(*this->pixbuf);

pb->ensurePixelFormat(Inkscape::Pixbuf::PF_GDK);

guchar *px = pb->pixels();

int w = pb->width();

int h = pb->height();

int rs = pb->rowstride();

//int pixskip = gdk_pixbuf_get_n_channels(pb) * gdk_pixbuf_get_bits_per_sample(pb) / 8;

int pixskip = 4;

if (this->aspect_align == SP_ASPECT_NONE) {

Geom::Affine t;

Geom::Translate tp(this->x.computed, this->y.computed);

Geom::Scale s(this->width.computed, -this->height.computed);

Geom::Translate ti(0.0, -1.0);

t = s * tp;

t = ti * t;

sp_print_image_R8G8B8A8_N(ctx, px, w, h, rs, t, this->style);

} else { // preserveAspectRatio

double vw = this->width.computed / this->sx;

double vh = this->height.computed / this->sy;

int trimwidth = std::min<int>(w, ceil(this->width.computed / vw * w));

int trimheight = std::min<int>(h, ceil(this->height.computed / vh * h));

int trimx = std::max<int>(0, floor((this->x.computed - this->ox) / vw * w));

int trimy = std::max<int>(0, floor((this->y.computed - this->oy) / vh * h));

double vx = std::max<double>(this->ox, this->x.computed);

double vy = std::max<double>(this->oy, this->y.computed);

double vcw = std::min<double>(this->width.computed, vw);

double vch = std::min<double>(this->height.computed, vh);

Geom::Affine t;

Geom::Translate tp(vx, vy);

Geom::Scale s(vcw, -vch);

Geom::Translate ti(0.0, -1.0);

t = s * tp;

t = ti * t;

sp_print_image_R8G8B8A8_N(ctx, px + trimx*pixskip + trimy*rs, trimwidth, trimheight, rs, t, this->style);

}

g_object_unref(pb);

}

}

gchar* SPImage::description() {

char *href_desc;

if (this->href) {

href_desc = (strncmp(this->href, "data:", 5) == 0)

? g_strdup(_("embedded"))

: xml_quote_strdup(this->href);

} else {

g_warning("Attempting to call strncmp() with a null pointer.");

href_desc = g_strdup("(null_pointer)"); // we call g_free() on href_desc

}

char *ret = ( this->pixbuf == NULL

? g_strdup_printf(_("<b>Image with bad reference</b>: %s"), href_desc)

: g_strdup_printf(_("<b>Image</b> %d &#215; %d: %s"),

this->pixbuf->width(),

this->pixbuf->height(),

href_desc) );

g_free(href_desc);

return ret;

}

Inkscape::DrawingItem* SPImage::show(Inkscape::Drawing &drawing, unsigned int key, unsigned int flags) {

Inkscape::DrawingImage *ai = new Inkscape::DrawingImage(drawing);

sp_image_update_arenaitem(this, ai);

return ai;

}

Inkscape::Pixbuf *sp_image_repr_read_image(gchar const *href, gchar const *absref, gchar const *base)

{

Inkscape::Pixbuf *inkpb = 0;

gchar const *filename = href;

if (filename != NULL) {

if (strncmp (filename,"file:",5) == 0) {

gchar *fullname = g_filename_from_uri(filename, NULL, NULL);

if (fullname) {

inkpb = Inkscape::Pixbuf::create_from_file(fullname);

g_free(fullname);

if (inkpb != NULL) {

return inkpb;

}

}

} else if (strncmp (filename,"data:",5) == 0) {

/* data URI - embedded image */

filename += 5;

inkpb = Inkscape::Pixbuf::create_from_data_uri(filename);

if (inkpb != NULL) {

return inkpb;

}

} else {

if (!g_path_is_absolute (filename)) {

/* try to load from relative pos combined with document base*/

const gchar *docbase = base;

if (!docbase) {

docbase = ".";

}

gchar *fullname = g_build_filename(docbase, filename, NULL);

// document base can be wrong (on the temporary doc when importing bitmap from a

// different dir) or unset (when doc is not saved yet), so we check for base+href existence first,

// and if it fails, we also try to use bare href regardless of its g_path_is_absolute

if (g_file_test (fullname, G_FILE_TEST_EXISTS) && !g_file_test (fullname, G_FILE_TEST_IS_DIR)) {

inkpb = Inkscape::Pixbuf::create_from_file(fullname);

g_free (fullname);

if (inkpb != NULL) {

return inkpb;

}

}

}

/* try filename as absolute */

if (g_file_test (filename, G_FILE_TEST_EXISTS) && !g_file_test (filename, G_FILE_TEST_IS_DIR)) {

inkpb = Inkscape::Pixbuf::create_from_file(filename);

if (inkpb != NULL) {

return inkpb;

}

}

}

}

/* at last try to load from sp absolute path name */

filename = absref;

if (filename != NULL) {

// using absref is outside of SVG rules, so we must at least warn the user

if ( base != NULL && href != NULL ) {

g_warning ("<image xlink:href=\"%s\"> did not resolve to a valid image file (base dir is %s), now trying sodipodi:absref=\"%s\"", href, base, absref);

} else {

g_warning ("xlink:href did not resolve to a valid image file, now trying sodipodi:absref=\"%s\"", absref);

}

inkpb = Inkscape::Pixbuf::create_from_file(filename);

if (inkpb != NULL) {

return inkpb;

}

}

/* Nope: We do not find any valid pixmap file :-( */

GdkPixbuf *pixbuf = gdk_pixbuf_new_from_xpm_data((const gchar **) brokenimage_xpm);

inkpb = new Inkscape::Pixbuf(pixbuf);

/* It should be included xpm, so if it still does not does load, */

/* our libraries are broken */

g_assert (inkpb != NULL);

return inkpb;

}

static void

sp_image_update_arenaitem (SPImage *image, Inkscape::DrawingImage *ai)

{

ai->setStyle(SP_OBJECT(image)->style);

ai->setPixbuf(image->pixbuf);

ai->setOrigin(Geom::Point(image->ox, image->oy));

ai->setScale(image->sx, image->sy);

ai->setClipbox(image->clipbox);

}

static void sp_image_update_canvas_image(SPImage *image)

{

SPItem *item = SP_ITEM(image);

for (SPItemView *v = item->display; v != NULL; v = v->next) {

sp_image_update_arenaitem(image, dynamic_cast<Inkscape::DrawingImage *>(v->arenaitem));

}

}

void SPImage::snappoints(std::vector<Inkscape::SnapCandidatePoint> &p, Inkscape::SnapPreferences const *snapprefs) {

/* An image doesn't have any nodes to snap, but still we want to be able snap one image

if (this->clip_ref->getObject()) {

//We are looking at a clipped image: do not return any snappoints, as these might be

//far far away from the visible part from the clipped image

//TODO Do return snappoints, but only when within visual bounding box

} else {

if (snapprefs->isTargetSnappable(Inkscape::SNAPTARGET_IMG_CORNER)) {

// The image has not been clipped: return its corners, which might be rotated for example

double const x0 = this->x.computed;

double const y0 = this->y.computed;

double const x1 = x0 + this->width.computed;

double const y1 = y0 + this->height.computed;

Geom::Affine const i2d (this->i2dt_affine ());

p.push_back(Inkscape::SnapCandidatePoint(Geom::Point(x0, y0) * i2d, Inkscape::SNAPSOURCE_IMG_CORNER, Inkscape::SNAPTARGET_IMG_CORNER));

p.push_back(Inkscape::SnapCandidatePoint(Geom::Point(x0, y1) * i2d, Inkscape::SNAPSOURCE_IMG_CORNER, Inkscape::SNAPTARGET_IMG_CORNER));

p.push_back(Inkscape::SnapCandidatePoint(Geom::Point(x1, y1) * i2d, Inkscape::SNAPSOURCE_IMG_CORNER, Inkscape::SNAPTARGET_IMG_CORNER));

p.push_back(Inkscape::SnapCandidatePoint(Geom::Point(x1, y0) * i2d, Inkscape::SNAPSOURCE_IMG_CORNER, Inkscape::SNAPTARGET_IMG_CORNER));

}

}

}

Geom::Affine SPImage::set_transform(Geom::Affine const &xform) {

/* Calculate position in parent coords. */

Geom::Point pos( Geom::Point(this->x.computed, this->y.computed) * xform );

/* This function takes care of translation and scaling, we return whatever parts we can't

Geom::Affine ret(Geom::Affine(xform).withoutTranslation());

Geom::Point const scale(hypot(ret[0], ret[1]),

hypot(ret[2], ret[3]));

if ( scale[Geom::X] > MAGIC_EPSILON ) {

ret[0] /= scale[Geom::X];

ret[1] /= scale[Geom::X];

} else {

ret[0] = 1.0;

ret[1] = 0.0;

}

if ( scale[Geom::Y] > MAGIC_EPSILON ) {

ret[2] /= scale[Geom::Y];

ret[3] /= scale[Geom::Y];

} else {

ret[2] = 0.0;

ret[3] = 1.0;

}

this->width = this->width.computed * scale[Geom::X];

this->height = this->height.computed * scale[Geom::Y];

/* Find position in item coords */

pos = pos * ret.inverse();

this->x = pos[Geom::X];

this->y = pos[Geom::Y];

this->requestDisplayUpdate(SP_OBJECT_MODIFIED_FLAG);

return ret;

}

static void sp_image_set_curve( SPImage *image )

{

//create a curve at the image's boundary for snapping

if ((image->height.computed < MAGIC_EPSILON_TOO) || (image->width.computed < MAGIC_EPSILON_TOO) || (image->clip_ref->getObject())) {

if (image->curve) {

image->curve = image->curve->unref();

}

} else {

Geom::OptRect rect = image->bbox(Geom::identity(), SPItem::VISUAL_BBOX);

SPCurve *c = SPCurve::new_from_rect(*rect, true);

if (image->curve) {

image->curve = image->curve->unref();

}

if (c) {

image->curve = c->ref();

c->unref();

}

}

}

SPCurve *sp_image_get_curve( SPImage *image )

{

SPCurve *result = 0;

if (image->curve) {

result = image->curve->copy();

}

return result;

}

void sp_embed_image(Inkscape::XML::Node *image_node, Inkscape::Pixbuf *pb)

{

bool free_data = false;

// check whether the pixbuf has MIME data

guchar *data = NULL;

gsize len = 0;

std::string data_mimetype;

data = const_cast<guchar *>(pb->getMimeData(len, data_mimetype));

if (data == NULL) {

// if there is no supported MIME data, embed as PNG

data_mimetype = "image/png";

gdk_pixbuf_save_to_buffer(pb->getPixbufRaw(), reinterpret_cast<gchar**>(&data), &len, "png", NULL, NULL);

free_data = true;

}

// Save base64 encoded data in image node

// this formula taken from Glib docs

gsize needed_size = len * 4 / 3 + len * 4 / (3 * 72) + 7;

needed_size += 5 + 8 + data_mimetype.size(); // 5 bytes for data: + 8 for ;base64,

gchar *buffer = (gchar *) g_malloc(needed_size);

gchar *buf_work = buffer;

buf_work += g_sprintf(buffer, "data:%s;base64,", data_mimetype.c_str());

gint state = 0;

gint save = 0;

gsize written = 0;

written += g_base64_encode_step(data, len, TRUE, buf_work, &state, &save);

written += g_base64_encode_close(TRUE, buf_work + written, &state, &save);

buf_work[written] = 0; // null terminate

// TODO: this is very wasteful memory-wise.

// It would be better to only keep the binary data around,

// and base64 encode on the fly when saving the XML.

image_node->setAttribute("xlink:href", buffer);

g_free(buffer);

if (free_data) g_free(data);

}

void sp_image_refresh_if_outdated( SPImage* image )

{

if ( image->href && image->pixbuf && image->pixbuf->modificationTime()) {

// It *might* change

struct stat st;

memset(&st, 0, sizeof(st));

int val = 0;

if (g_file_test (image->pixbuf->originalPath().c_str(), G_FILE_TEST_EXISTS)){

val = g_stat(image->pixbuf->originalPath().c_str(), &st);

}

if ( !val ) {

// stat call worked. Check time now

if ( st.st_mtime != image->pixbuf->modificationTime() ) {

SPCtx *ctx = 0;

unsigned int flags = SP_IMAGE_HREF_MODIFIED_FLAG;

image->update(ctx, flags);

}

}

}

}