#define __SP_DROPPER_CONTEXT_C__

#ifdef HAVE_CONFIG_H

# include <config.h>

#endif

#include <glibmm/i18n.h>

#include <glibmm/ustring.h>

#include <glibmm/refptr.h>

#include <gtkmm/clipboard.h>

#include <gdk/gdkkeysyms.h>

#include "libnr/n-art-bpath.h"

#include "macros.h"

#include "display/canvas-bpath.h"

#include "display/canvas-arena.h"

#include "display/curve.h"

#include "svg/svg-color.h"

#include "color.h"

#include "color-rgba.h"

#include "desktop-style.h"

#include "prefs-utils.h"

#include "sp-namedview.h"

#include "desktop.h"

#include "desktop-handles.h"

#include "selection.h"

#include "document.h"

#include "pixmaps/cursor-dropper.xpm"

#include "dropper-context.h"

#include "message-context.h"

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

#define C1 0.552

static NArtBpath const spdc_circle[] = {

{ NR_MOVETO, 0, 0, 0, 0, -1, 0 },

{ NR_CURVETO, -1, C1, -C1, 1, 0, 1 },

{ NR_CURVETO, C1, 1, 1, C1, 1, 0 },

{ NR_CURVETO, 1, -C1, C1, -1, 0, -1 },

{ NR_CURVETO, -C1, -1, -1, -C1, -1, 0 },

{ NR_END, 0, 0, 0, 0, 0, 0 }

};

#undef C1

static void sp_dropper_context_class_init(SPDropperContextClass *klass);

static void sp_dropper_context_init(SPDropperContext *dc);

static void sp_dropper_context_setup(SPEventContext *ec);

static void sp_dropper_context_finish(SPEventContext *ec);

static gint sp_dropper_context_root_handler(SPEventContext *ec, GdkEvent * event);

static SPEventContextClass *parent_class;

GType sp_dropper_context_get_type()

{

static GType type = 0;

if (!type) {

GTypeInfo info = {

sizeof(SPDropperContextClass),

NULL, NULL,

(GClassInitFunc) sp_dropper_context_class_init,

NULL, NULL,

sizeof(SPDropperContext),

4,

(GInstanceInitFunc) sp_dropper_context_init,

NULL, /* value_table */

};

type = g_type_register_static(SP_TYPE_EVENT_CONTEXT, "SPDropperContext", &info, (GTypeFlags) 0);

}

return type;

}

static void sp_dropper_context_class_init(SPDropperContextClass *klass)

{

SPEventContextClass *ec_class = (SPEventContextClass *) klass;

parent_class = (SPEventContextClass*)g_type_class_peek_parent(klass);

ec_class->setup = sp_dropper_context_setup;

ec_class->finish = sp_dropper_context_finish;

ec_class->root_handler = sp_dropper_context_root_handler;

}

static void sp_dropper_context_init(SPDropperContext *dc)

{

SPEventContext *event_context = SP_EVENT_CONTEXT(dc);

event_context->cursor_shape = cursor_dropper_xpm;

event_context->hot_x = 7;

event_context->hot_y = 7;

}

static void sp_dropper_context_setup(SPEventContext *ec)

{

SPDropperContext *dc = SP_DROPPER_CONTEXT(ec);

if (((SPEventContextClass *) parent_class)->setup) {

((SPEventContextClass *) parent_class)->setup(ec);

}

SPCurve *c = sp_curve_new_from_foreign_bpath(spdc_circle);

dc->area = sp_canvas_bpath_new(sp_desktop_controls(ec->desktop), c);

sp_curve_unref(c);

sp_canvas_bpath_set_fill(SP_CANVAS_BPATH(dc->area), 0x00000000,(SPWindRule)0);

sp_canvas_bpath_set_stroke(SP_CANVAS_BPATH(dc->area), 0x0000007f, 1.0, SP_STROKE_LINEJOIN_MITER, SP_STROKE_LINECAP_BUTT);

sp_canvas_item_hide(dc->area);

if (prefs_get_int_attribute("tools.dropper", "selcue", 0) != 0) {

ec->enableSelectionCue();

}

if (prefs_get_int_attribute("tools.dropper", "gradientdrag", 0) != 0) {

ec->enableGrDrag();

}

}

static void sp_dropper_context_finish(SPEventContext *ec)

{

SPDropperContext *dc = SP_DROPPER_CONTEXT(ec);

ec->enableGrDrag(false);

if (dc->area) {

gtk_object_destroy(GTK_OBJECT(dc->area));

dc->area = NULL;

}

}

void sp_dropper_context_copy(SPEventContext *ec)

{

SPDropperContext *dc = SP_DROPPER_CONTEXT(ec);

guint32 const c32 = SP_RGBA32_F_COMPOSE(dc->R, dc->G, dc->B, dc->alpha);

int pick = prefs_get_int_attribute("tools.dropper", "pick",

SP_DROPPER_PICK_VISIBLE);

int setalpha = prefs_get_int_attribute("tools.dropper", "setalpha", 1);

gchar c[64];

g_snprintf(c, 64, "%06x%02x", c32 >> 8,

(pick == SP_DROPPER_PICK_ACTUAL && setalpha)? SP_COLOR_F_TO_U(dc->alpha) : 255);

Glib::ustring text;

text += c;

if (!text.empty())

{

Glib::RefPtr<Gtk::Clipboard> refClipboard =

Gtk::Clipboard::get();

refClipboard->set_text(text);

}

}

void sp_dropper_c32_color_copy(guint32 c32)

{

int const pick = prefs_get_int_attribute("tools.dropper", "pick",

SP_DROPPER_PICK_VISIBLE);

gchar c[64];

g_snprintf(c, 64, "%06x%02x", c32 >> 8,

pick == SP_DROPPER_PICK_ACTUAL? SP_RGBA32_A_U(c32) : 255);

Glib::ustring text;

text += c;

if (!text.empty()) {

Glib::RefPtr<Gtk::Clipboard> refClipboard = Gtk::Clipboard::get();

refClipboard->set_text(text);

}

}

void sp_dropper_c32_color_copy_hex(guint32 c32)

{

/*

gchar c[48];

g_snprintf(c, 48, "%06x", c32 >> 8);

Glib::ustring text;

text += c;

if (!text.empty()) {

Glib::RefPtr<Gtk::Clipboard> refClipboard = Gtk::Clipboard::get();

refClipboard->set_text(text);

}

}

static gint sp_dropper_context_root_handler(SPEventContext *event_context, GdkEvent *event)

{

SPDropperContext *dc = (SPDropperContext *) event_context;

int ret = FALSE;

SPDesktop *desktop = event_context->desktop;

int pick = prefs_get_int_attribute("tools.dropper", "pick", SP_DROPPER_PICK_VISIBLE);

int setalpha = prefs_get_int_attribute("tools.dropper", "setalpha", 1);

switch (event->type) {

case GDK_BUTTON_PRESS:

if (event->button.button == 1 && !event_context->space_panning) {

dc->centre = NR::Point(event->button.x, event->button.y);

dc->dragging = TRUE;

ret = TRUE;

}

break;

case GDK_MOTION_NOTIFY:

if (event->motion.state & GDK_BUTTON2_MASK) {

// pass on middle-drag

ret = FALSE;

break;

} else if (!event_context->space_panning) {

// otherwise, constantly calculate color no matter is any button pressed or not

double rw = 0.0;

double W(0), R(0), G(0), B(0), A(0);

if (dc->dragging) {

// calculate average

// radius

rw = std::min(NR::L2(NR::Point(event->button.x, event->button.y) - dc->centre), 400.0);

if (rw == 0) { // happens sometimes, little idea why...

break;

}

NR::Point const cd = desktop->w2d(dc->centre);

NR::Matrix const w2dt = desktop->w2d();

const double scale = rw * NR::expansion(w2dt);

NR::Matrix const sm( NR::scale(scale, scale) * NR::translate(cd) );

sp_canvas_item_affine_absolute(dc->area, sm);

sp_canvas_item_show(dc->area);

/* Get buffer */

const int x0 = (int) floor(dc->centre[NR::X] - rw);

const int y0 = (int) floor(dc->centre[NR::Y] - rw);

const int x1 = (int) ceil(dc->centre[NR::X] + rw);

const int y1 = (int) ceil(dc->centre[NR::Y] + rw);

if ((x1 > x0) && (y1 > y0)) {

NRPixBlock pb;

nr_pixblock_setup_fast(&pb, NR_PIXBLOCK_MODE_R8G8B8A8P, x0, y0, x1, y1, TRUE);

/* fixme: (Lauris) */

sp_canvas_arena_render_pixblock(SP_CANVAS_ARENA(sp_desktop_drawing(desktop)), &pb);

for (int y = y0; y < y1; y++) {

const unsigned char *s = NR_PIXBLOCK_PX(&pb) + (y - y0) * pb.rs;

for (int x = x0; x < x1; x++) {

const double dx = x - dc->centre[NR::X];

const double dy = y - dc->centre[NR::Y];

const double w = exp(-((dx * dx) + (dy * dy)) / (rw * rw));

W += w;

R += w * s[0];

G += w * s[1];

B += w * s[2];

A += w * s[3];

s += 4;

}

}

nr_pixblock_release(&pb);

R = (R + 0.001) / (255.0 * W);

G = (G + 0.001) / (255.0 * W);

B = (B + 0.001) / (255.0 * W);

A = (A + 0.001) / (255.0 * W);

R = CLAMP(R, 0.0, 1.0);

G = CLAMP(G, 0.0, 1.0);

B = CLAMP(B, 0.0, 1.0);

A = CLAMP(A, 0.0, 1.0);

}

} else {

// pick single pixel

NRPixBlock pb;

int x = (int) floor(event->button.x);

int y = (int) floor(event->button.y);

nr_pixblock_setup_fast(&pb, NR_PIXBLOCK_MODE_R8G8B8A8P, x, y, x+1, y+1, TRUE);

sp_canvas_arena_render_pixblock(SP_CANVAS_ARENA(sp_desktop_drawing(desktop)), &pb);

const unsigned char *s = NR_PIXBLOCK_PX(&pb);

R = s[0] / 255.0;

G = s[1] / 255.0;

B = s[2] / 255.0;

A = s[3] / 255.0;

}

if (pick == SP_DROPPER_PICK_VISIBLE) {

// compose with page color

guint32 bg = sp_desktop_namedview(desktop)->pagecolor;

R = R + (SP_RGBA32_R_F(bg)) * (1 - A);

G = G + (SP_RGBA32_G_F(bg)) * (1 - A);

B = B + (SP_RGBA32_B_F(bg)) * (1 - A);

A = 1.0;

} else {

// un-premultiply color channels

if (A > 0) {

R /= A;

G /= A;

B /= A;

}

}

if (fabs(A) < 1e-4) {

A = 0; // suppress exponentials, CSS does not allow that

}

// remember color

dc->R = R;

dc->G = G;

dc->B = B;

dc->alpha = A;

// status message

double alpha_to_set = setalpha? dc->alpha : 1.0;

guint32 c32 = SP_RGBA32_F_COMPOSE(R, G, B, alpha_to_set);

gchar c[64];

sp_svg_write_color(c, sizeof(c), c32);

// alpha of color under cursor, to show in the statusbar

// locale-sensitive printf is OK, since this goes to the UI, not into SVG

gchar *alpha = g_strdup_printf(_(" alpha %.3g"), alpha_to_set);

// where the color is picked, to show in the statusbar

gchar *where = dc->dragging ? g_strdup_printf(_(", averaged with radius %d"), (int) rw) : g_strdup_printf(_(" under cursor"));

// message, to show in the statusbar

const gchar *message = dc->dragging ? _("<b>Release mouse</b> to set color.") : _("<b>Click</b> to set fill, <b>Shift+click</b> to set stroke; <b>drag</b> to average color in area; with <b>Alt</b> to pick inverse color; <b>Ctrl+C</b> to copy the color under mouse to clipboard");

event_context->defaultMessageContext()->setF(

Inkscape::NORMAL_MESSAGE,

"<b>%s%s</b>%s. %s", c,

(pick == SP_DROPPER_PICK_VISIBLE)? "" : alpha,

where, message

);

g_free(where);

g_free(alpha);

ret = TRUE;

}

break;

case GDK_BUTTON_RELEASE:

if (event->button.button == 1 && !event_context->space_panning)

{

sp_canvas_item_hide(dc->area);

dc->dragging = FALSE;

double alpha_to_set = setalpha? dc->alpha : 1.0;

// do the actual color setting

sp_desktop_set_color(desktop,

(event->button.state & GDK_MOD1_MASK)?

ColorRGBA(1 - dc->R, 1 - dc->G, 1 - dc->B, alpha_to_set) : ColorRGBA(dc->R, dc->G, dc->B, alpha_to_set),

false, !(event->button.state & GDK_SHIFT_MASK));

// REJON: set aux. toolbar input to hex color!

if (!(sp_desktop_selection(desktop)->isEmpty())) {

sp_document_done(sp_desktop_document(desktop), SP_VERB_CONTEXT_DROPPER,

_("Set picked color"));

}

ret = TRUE;

}

break;

case GDK_KEY_PRESS:

switch (get_group0_keyval(&event->key)) {

case GDK_Up:

case GDK_Down:

case GDK_KP_Up:

case GDK_KP_Down:

// prevent the zoom field from activation

if (!MOD__CTRL_ONLY) {

ret = TRUE;

}

break;

case GDK_Escape:

sp_desktop_selection(desktop)->clear();

default:

break;

}

break;

default:

break;

}

if (!ret) {

if (((SPEventContextClass *) parent_class)->root_handler) {

ret = ((SPEventContextClass *) parent_class)->root_handler(event_context, event);

}

}

return ret;

}