#ifdef HAVE_CONFIG_H

# include <config.h>

#endif

#include <glibmm/i18n.h>

#include <gdk/gdk.h>

#include <gdk/gdkkeysyms.h>

#include <2geom/transforms.h>

#include <2geom/circle.h>

#include "macros.h"

#include "display/canvas-bpath.h"

#include "display/canvas-arena.h"

#include "display/curve.h"

#include "display/cairo-utils.h"

#include "svg/svg-color.h"

#include "color.h"

#include "color-rgba.h"

#include "desktop-style.h"

#include "preferences.h"

#include "sp-namedview.h"

#include "sp-cursor.h"

#include "desktop.h"

#include "desktop-handles.h"

#include "selection.h"

#include "document.h"

#include "document-undo.h"

#include "pixmaps/cursor-dropper-f.xpm"

#include "pixmaps/cursor-dropper-s.xpm"

#include "ui/tools/dropper-tool.h"

#include "message-context.h"

#include "verbs.h"

#include "ui/tools/tool-base.h"

using Inkscape::DocumentUndo;

static GdkCursor *cursor_dropper_fill = NULL;

static GdkCursor *cursor_dropper_stroke = NULL;

#include "ui/tool-factory.h"

namespace Inkscape {

namespace UI {

namespace Tools {

namespace {

ToolBase* createDropperContext() {

return new DropperTool();

}

bool dropperContextRegistered = ToolFactory::instance().registerObject("/tools/dropper", createDropperContext);

}

const std::string& DropperTool::getPrefsPath() {

return DropperTool::prefsPath;

}

const std::string DropperTool::prefsPath = "/tools/dropper";

DropperTool::DropperTool()

: ToolBase(cursor_dropper_f_xpm, 7, 7)

, R(0)

, G(0)

, B(0)

, alpha(0)

, dragging(false)

, grabbed(NULL)

, area(NULL)

, centre(0, 0)

{

cursor_dropper_fill = sp_cursor_new_from_xpm(cursor_dropper_f_xpm , 7, 7);

cursor_dropper_stroke = sp_cursor_new_from_xpm(cursor_dropper_s_xpm , 7, 7);

}

DropperTool::~DropperTool() {

}

void DropperTool::setup() {

ToolBase::setup();

/* TODO: have a look at CalligraphicTool::setup where the same is done.. generalize? */

Geom::PathVector path;

Geom::Circle(0, 0, 1).getPath(path);

SPCurve *c = new SPCurve(path);

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

c->unref();

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

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

sp_canvas_item_hide(this->area);

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

if (prefs->getBool("/tools/dropper/selcue")) {

this->enableSelectionCue();

}

if (prefs->getBool("/tools/dropper/gradientdrag")) {

this->enableGrDrag();

}

}

void DropperTool::finish() {

this->enableGrDrag(false);

if (this->grabbed) {

sp_canvas_item_ungrab(this->grabbed, GDK_CURRENT_TIME);

this->grabbed = NULL;

}

if (this->area) {

sp_canvas_item_destroy(this->area);

this->area = NULL;

}

if (cursor_dropper_fill) {

#if GTK_CHECK_VERSION(3,0,0)

g_object_unref(cursor_dropper_fill);

#else

gdk_cursor_unref (cursor_dropper_fill);

#endif

cursor_dropper_fill = NULL;

}

if (cursor_dropper_stroke) {

#if GTK_CHECK_VERSION(3,0,0)

g_object_unref(cursor_dropper_stroke);

#else

gdk_cursor_unref (cursor_dropper_stroke);

#endif

cursor_dropper_fill = NULL;

}

ToolBase::finish();

}

guint32 DropperTool::get_color() {

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

int pick = prefs->getInt("/tools/dropper/pick", SP_DROPPER_PICK_VISIBLE);

bool setalpha = prefs->getBool("/tools/dropper/setalpha", true);

return SP_RGBA32_F_COMPOSE(this->R,

this->G,

this->B,

(pick == SP_DROPPER_PICK_ACTUAL && setalpha) ? this->alpha : 1.0);

}

bool DropperTool::root_handler(GdkEvent* event) {

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

int ret = FALSE;

int pick = prefs->getInt("/tools/dropper/pick", SP_DROPPER_PICK_VISIBLE);

bool setalpha = prefs->getBool("/tools/dropper/setalpha", true);

switch (event->type) {

case GDK_BUTTON_PRESS:

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

this->centre = Geom::Point(event->button.x, event->button.y);

this->dragging = true;

ret = TRUE;

}

sp_canvas_item_grab(SP_CANVAS_ITEM(desktop->acetate),

GDK_KEY_PRESS_MASK | GDK_KEY_RELEASE_MASK | GDK_BUTTON_RELEASE_MASK | GDK_POINTER_MOTION_MASK | GDK_POINTER_MOTION_HINT_MASK | GDK_BUTTON_PRESS_MASK,

NULL, event->button.time);

this->grabbed = SP_CANVAS_ITEM(desktop->acetate);

break;

case GDK_MOTION_NOTIFY:

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

// pass on middle and right drag

ret = FALSE;

break;

} else if (!this->space_panning) {

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

// If one time pick with stroke set the pixmap

if (prefs->getBool("/tools/dropper/onetimepick", false) && prefs->getInt("/dialogs/fillstroke/page", 0) == 1) {

//TODO Only set when not set already

GdkWindow* window = gtk_widget_get_window(GTK_WIDGET(desktop->getCanvas()));

gdk_window_set_cursor(window, cursor_dropper_stroke);

}

double rw = 0.0;

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

if (this->dragging) {

// calculate average

// radius

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

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

break;

}

Geom::Point const cd = desktop->w2d(this->centre);

Geom::Affine const w2dt = desktop->w2d();

const double scale = rw * w2dt.descrim();

Geom::Affine const sm( Geom::Scale(scale, scale) * Geom::Translate(cd) );

sp_canvas_item_affine_absolute(this->area, sm);

sp_canvas_item_show(this->area);

/* Get buffer */

Geom::Rect r(this->centre, this->centre);

r.expandBy(rw);

if (!r.hasZeroArea()) {

Geom::IntRect area = r.roundOutwards();

cairo_surface_t *s = cairo_image_surface_create(CAIRO_FORMAT_ARGB32, area.width(), area.height());

sp_canvas_arena_render_surface(SP_CANVAS_ARENA(desktop->getDrawing()), s, area);

ink_cairo_surface_average_color_premul(s, R, G, B, A);

cairo_surface_destroy(s);

}

} else {

// pick single pixel

Geom::IntRect area = Geom::IntRect::from_xywh(floor(event->button.x), floor(event->button.y), 1, 1);

cairo_surface_t *s = cairo_image_surface_create(CAIRO_FORMAT_ARGB32, 1, 1);

sp_canvas_arena_render_surface(SP_CANVAS_ARENA(desktop->getDrawing()), s, area);

ink_cairo_surface_average_color_premul(s, R, G, B, A);

cairo_surface_destroy(s);

}

if (pick == SP_DROPPER_PICK_VISIBLE) {

// compose with page color

guint32 bg = desktop->getNamedView()->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

this->R = R;

this->G = G;

this->B = B;

this->alpha = A;

// status message

double alpha_to_set = setalpha? this->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 = this->dragging ? g_strdup_printf(_(", averaged with radius %d"), (int) rw) : g_strdup_printf("%s", _(" under cursor"));

// message, to show in the statusbar

const gchar *message = this->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");

this->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 && !this->space_panning) {

sp_canvas_item_hide(this->area);

this->dragging = false;

if (this->grabbed) {

sp_canvas_item_ungrab(this->grabbed, event->button.time);

this->grabbed = NULL;

}

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

bool fill = !(event->button.state & GDK_SHIFT_MASK); // Stroke if Shift key held

if (prefs->getBool("/tools/dropper/onetimepick", false)) {

// "One time" pick from Fill/Stroke dialog stroke page, always apply fill or stroke (ignore <Shift> key)

fill = (prefs->getInt("/dialogs/fillstroke/page", 0) == 0) ? true : false;

}

// do the actual color setting

sp_desktop_set_color(desktop,

(event->button.state & GDK_MOD1_MASK)?

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

false, fill);

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

if (event->button.state & GDK_SHIFT_MASK) {

GdkWindow* window = gtk_widget_get_window(GTK_WIDGET(desktop->getCanvas()));

gdk_window_set_cursor(window, cursor_dropper_stroke);

}

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

DocumentUndo::done(sp_desktop_document(desktop), SP_VERB_CONTEXT_DROPPER,

_("Set picked color"));

}

if (prefs->getBool("/tools/dropper/onetimepick", false)) {

prefs->setBool("/tools/dropper/onetimepick", false);

sp_toggle_dropper(desktop);

// sp_toggle_dropper will delete ourselves.

// Thus, make sure we return immediately.

return true;

}

ret = TRUE;

}

break;

case GDK_KEY_PRESS:

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

case GDK_KEY_Up:

case GDK_KEY_Down:

case GDK_KEY_KP_Up:

case GDK_KEY_KP_Down:

// prevent the zoom field from activation

if (!MOD__CTRL_ONLY(event)) {

ret = TRUE;

}

break;

case GDK_KEY_Escape:

desktop->getSelection()->clear();

case GDK_KEY_Shift_L:

case GDK_KEY_Shift_R:

if (!desktop->isWaitingCursor() && !prefs->getBool("/tools/dropper/onetimepick", false)) {

GdkWindow* window = gtk_widget_get_window(GTK_WIDGET(desktop->getCanvas()));

gdk_window_set_cursor(window, cursor_dropper_stroke);

}

break;

default:

break;

}

break;

case GDK_KEY_RELEASE:

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

case GDK_KEY_Shift_L:

case GDK_KEY_Shift_R:

if (!desktop->isWaitingCursor() && !prefs->getBool("/tools/dropper/onetimepick", false)) {

GdkWindow* window = gtk_widget_get_window(GTK_WIDGET(desktop->getCanvas()));

gdk_window_set_cursor(window, cursor_dropper_fill);

}

break;

default:

break;

}

break;

default:

break;

}

if (!ret) {

ret = ToolBase::root_handler(event);

}

return ret;

}

}

}

}