#ifdef HAVE_CONFIG_H

# include "config.h"

#endif

#include <glib.h>

#include <glib/gmessages.h>

#include <png.h>

#include <2geom/transforms.h>

#include "interface.h"

#include "helper/png-write.h"

#include "display/cairo-utils.h"

#include "display/drawing-context.h"

#include "display/drawing-item.h"

#include "display/nr-arena.h"

#include "document.h"

#include "sp-item.h"

#include "sp-root.h"

#include "sp-use.h"

#include "sp-defs.h"

#include "unit-constants.h"

#include "helper/pixbuf-ops.h"

static void hide_other_items_recursively(SPObject *o, GSList *list, unsigned dkey)

{

if ( SP_IS_ITEM(o)

&& !SP_IS_DEFS(o)

&& !SP_IS_ROOT(o)

&& !SP_IS_GROUP(o)

&& !SP_IS_USE(o)

&& !g_slist_find(list, o) )

{

SP_ITEM(o)->invoke_hide(dkey);

}

// recurse

if (!g_slist_find(list, o)) {

for ( SPObject *child = o->firstChild() ; child; child = child->getNext() ) {

hide_other_items_recursively(child, list, dkey);

}

}

}

sp_export_jpg_file(SPDocument *doc, gchar const *filename,

double x0, double y0, double x1, double y1,

unsigned width, unsigned height, double xdpi, double ydpi,

unsigned long bgcolor, double quality,GSList *items)

{

GdkPixbuf* pixbuf;

pixbuf = sp_generate_internal_bitmap(doc, filename, x0, y0, x1, y1,

width, height, xdpi, ydpi,

bgcolor, items );

gchar c[32];

g_snprintf(c, 32, "%f", quality);

gboolean saved = gdk_pixbuf_save (pixbuf, filename, "jpeg", NULL, "quality", c, NULL);

g_free(c);

gdk_pixbuf_unref (pixbuf);

if (saved) return true;

else return false;

}

GdkPixbuf*

sp_generate_internal_bitmap(SPDocument *doc, gchar const */*filename*/,

double x0, double y0, double x1, double y1,

unsigned width, unsigned height, double xdpi, double ydpi,

unsigned long bgcolor,

GSList *items_only)

{

if (width == 0 || height == 0) return NULL;

GdkPixbuf* pixbuf = NULL;

/* Create new arena for offscreen rendering*/

NRArena *arena = NRArena::create();

nr_arena_set_renderoffscreen(arena);

unsigned dkey = SPItem::display_key_new(1);

doc->ensureUpToDate();

Geom::Rect screen=Geom::Rect(Geom::Point(x0,y0), Geom::Point(x1, y1));

double padding = 1.0;

Geom::Point origin(screen.min()[Geom::X],

doc->getHeight() - screen[Geom::Y].extent() - screen.min()[Geom::Y]);

origin[Geom::X] = origin[Geom::X] + (screen[Geom::X].extent() * ((1 - padding) / 2));

origin[Geom::Y] = origin[Geom::Y] + (screen[Geom::Y].extent() * ((1 - padding) / 2));

Geom::Scale scale( (xdpi / PX_PER_IN), (ydpi / PX_PER_IN));

Geom::Affine affine = scale * Geom::Translate(-origin * scale);

/* Create ArenaItems and set transform */

Inkscape::DrawingItem *root = doc->getRoot()->invoke_show( arena, dkey, SP_ITEM_SHOW_DISPLAY);

root->setTransform(affine);

Inkscape::UpdateContext ctx;

// We show all and then hide all items we don't want, instead of showing only requested items,

// because that would not work if the shown item references something in defs

if (items_only) {

hide_other_items_recursively(doc->getRoot(), items_only, dkey);

}

Geom::IntRect final_bbox = Geom::IntRect::from_xywh(0, 0, width, height);

root->update(final_bbox, ctx, Inkscape::DrawingItem::STATE_ALL, 0);

cairo_surface_t *surface = cairo_image_surface_create(CAIRO_FORMAT_ARGB32, width, height);

if (cairo_surface_status(surface) == CAIRO_STATUS_SUCCESS) {

Inkscape::DrawingContext ct(surface, Geom::Point(0,0));

// render items

root->render(ct, final_bbox, Inkscape::DrawingItem::RENDER_BYPASS_CACHE);

pixbuf = gdk_pixbuf_new_from_data(cairo_image_surface_get_data(surface),

GDK_COLORSPACE_RGB, TRUE,

8, width, height, cairo_image_surface_get_stride(surface),

ink_cairo_pixbuf_cleanup,

surface);

convert_pixbuf_argb32_to_normal(pixbuf);

}

else

{

long long size = (long long) height * (long long) cairo_format_stride_for_width(CAIRO_FORMAT_ARGB32, width);

g_warning("sp_generate_internal_bitmap: not enough memory to create pixel buffer. Need %lld.", size);

cairo_surface_destroy(surface);

}

doc->getRoot()->invoke_hide(dkey);

nr_object_unref((NRObject *) arena);

return pixbuf;

}