#ifdef HAVE_CONFIG_H

# include "config.h"

#endif

#include <gtk/gtk.h>

#include "macros.h"

#include "widgets/button.h"

#include "widgets/widget-sizes.h"

#include "widgets/spw-utilities.h"

#include "widgets/spinbutton-events.h"

#include "widgets/gradient-vector.h"

#include "widgets/gradient-image.h"

#include "style.h"

#include "preferences.h"

#include "document-private.h"

#include "desktop.h"

#include "desktop-handles.h"

#include <glibmm/i18n.h>

#include "gradient-context.h"

#include "gradient-drag.h"

#include "sp-linear-gradient.h"

#include "sp-radial-gradient.h"

#include "gradient-chemistry.h"

#include "selection.h"

#include "ui/icon-names.h"

#include "toolbox.h"

using Inkscape::DocumentUndo;

static void gr_toggle_type (GtkWidget *button, gpointer data) {

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

GtkWidget *linear = (GtkWidget *) g_object_get_data (G_OBJECT(data), "linear");

GtkWidget *radial = (GtkWidget *) g_object_get_data (G_OBJECT(data), "radial");

if (button == linear && gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (linear))) {

prefs->setInt("/tools/gradient/newgradient", SP_GRADIENT_TYPE_LINEAR);

if (radial) gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (radial), FALSE);

} else if (button == radial && gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (radial))) {

prefs->setInt("/tools/gradient/newgradient", SP_GRADIENT_TYPE_RADIAL);

if (linear) gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (linear), FALSE);

}

}

static void gr_toggle_fillstroke (GtkWidget *button, gpointer data) {

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

GtkWidget *fill = (GtkWidget *) g_object_get_data (G_OBJECT(data), "fill");

GtkWidget *stroke = (GtkWidget *) g_object_get_data (G_OBJECT(data), "stroke");

if (button == fill && gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (fill))) {

prefs->setBool("/tools/gradient/newfillorstroke", true);

if (stroke) gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (stroke), FALSE);

} else if (button == stroke && gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (stroke))) {

prefs->setBool("/tools/gradient/newfillorstroke", false);

if (fill) gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (fill), FALSE);

}

}

void gr_apply_gradient_to_item( SPItem *item, SPGradient *gr, SPGradientType new_type, guint new_fill, bool do_fill, bool do_stroke )

{

SPStyle *style = item->style;

if (do_fill) {

if (style && (style->fill.isPaintserver()) &&

SP_IS_GRADIENT( item->style->getFillPaintServer() )) {

SPPaintServer *server = item->style->getFillPaintServer();

if ( SP_IS_LINEARGRADIENT(server) ) {

sp_item_set_gradient(item, gr, SP_GRADIENT_TYPE_LINEAR, true);

} else if ( SP_IS_RADIALGRADIENT(server) ) {

sp_item_set_gradient(item, gr, SP_GRADIENT_TYPE_RADIAL, true);

}

} else if (new_fill) {

sp_item_set_gradient(item, gr, new_type, true);

}

}

if (do_stroke) {

if (style && (style->stroke.isPaintserver()) &&

SP_IS_GRADIENT( item->style->getStrokePaintServer() )) {

SPPaintServer *server = item->style->getStrokePaintServer();

if ( SP_IS_LINEARGRADIENT(server) ) {

sp_item_set_gradient(item, gr, SP_GRADIENT_TYPE_LINEAR, false);

} else if ( SP_IS_RADIALGRADIENT(server) ) {

sp_item_set_gradient(item, gr, SP_GRADIENT_TYPE_RADIAL, false);

}

} else if (!new_fill) {

sp_item_set_gradient(item, gr, new_type, false);

}

}

}

void gr_apply_gradient (Inkscape::Selection *selection, GrDrag *drag, SPGradient *gr)

{

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

SPGradientType new_type = static_cast<SPGradientType>(prefs->getInt("/tools/gradient/newgradient", SP_GRADIENT_TYPE_LINEAR));

guint new_fill = prefs->getBool("/tools/gradient/newfillorstroke", true);

// GRADIENTFIXME: make this work for multiple selected draggers.

// First try selected dragger

if (drag && drag->selected) {

GrDragger *dragger = static_cast<GrDragger*>(drag->selected->data);

for (GSList const* i = dragger->draggables; i != NULL; i = i->next) { // for all draggables of dragger

GrDraggable *draggable = (GrDraggable *) i->data;

gr_apply_gradient_to_item (draggable->item, gr, new_type, new_fill, draggable->fill_or_stroke, !draggable->fill_or_stroke);

}

return;

}

// If no drag or no dragger selected, act on selection

for (GSList const* i = selection->itemList(); i != NULL; i = i->next) {

gr_apply_gradient_to_item (SP_ITEM(i->data), gr, new_type, new_fill, new_fill, !new_fill);

}

}

void gr_item_activate (GtkMenuItem *menuitem, gpointer data)

{

SPGradient *gr = static_cast<SPGradient *>(g_object_get_data (G_OBJECT (menuitem), "gradient"));

gr = sp_gradient_ensure_vector_normalized(gr);

SPDesktop *desktop = static_cast<SPDesktop *>(data);

Inkscape::Selection *selection = sp_desktop_selection (desktop);

SPEventContext *ev = sp_desktop_event_context (desktop);

gr_apply_gradient (selection, ev? ev->get_drag() : NULL, gr);

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

_("Assign gradient to object"));

}

gchar *gr_prepare_label (SPObject *obj)

{

const gchar *id = obj->defaultLabel();

if (strlen(id) > 15 && (!strncmp (id, "#linearGradient", 15) || !strncmp (id, "#radialGradient", 15)))

return g_strdup_printf ("<small>#%s</small>", id+15);

return g_strdup_printf ("<small>%s</small>", id);

}

GtkWidget *gr_vector_list(SPDesktop *desktop, bool selection_empty, SPGradient *gr_selected, bool gr_multi)

{

SPDocument *document = sp_desktop_document (desktop);

GtkWidget *om = gtk_option_menu_new ();

GtkWidget *m = gtk_menu_new ();

GSList *gl = NULL;

const GSList *gradients = document->getResourceList("gradient");

for (const GSList *i = gradients; i != NULL; i = i->next) {

SPGradient *grad = SP_GRADIENT(i->data);

if ( grad->hasStops() && !grad->isSolid() ) {

gl = g_slist_prepend (gl, i->data);

}

}

gl = g_slist_reverse (gl);

guint pos = 0;

guint idx = 0;

if (!gl) {

// The document has no gradients

GtkWidget *l = gtk_label_new("");

gtk_label_set_markup (GTK_LABEL(l), _("<small>No gradients</small>"));

GtkWidget *i = gtk_menu_item_new ();

gtk_container_add (GTK_CONTAINER (i), l);

gtk_widget_show (i);

gtk_menu_shell_append(GTK_MENU_SHELL (m), i);

gtk_widget_set_sensitive (om, FALSE);

} else if (selection_empty) {

// Document has gradients, but nothing is currently selected.

GtkWidget *l = gtk_label_new("");

gtk_label_set_markup (GTK_LABEL(l), _("<small>Nothing selected</small>"));

GtkWidget *i = gtk_menu_item_new ();

gtk_container_add (GTK_CONTAINER (i), l);

gtk_widget_show (i);

gtk_menu_shell_append(GTK_MENU_SHELL (m), i);

gtk_widget_set_sensitive (om, FALSE);

} else {

if (gr_selected == NULL) {

GtkWidget *l = gtk_label_new("");

gtk_label_set_markup (GTK_LABEL(l), _("<small>No gradients in selection</small>"));

GtkWidget *i = gtk_menu_item_new ();

gtk_container_add (GTK_CONTAINER (i), l);

gtk_widget_show (i);

gtk_menu_shell_append(GTK_MENU_SHELL (m), i);

}

if (gr_multi) {

GtkWidget *l = gtk_label_new("");

gtk_label_set_markup (GTK_LABEL(l), _("<small>Multiple gradients</small>"));

GtkWidget *i = gtk_menu_item_new ();

gtk_container_add (GTK_CONTAINER (i), l);

gtk_widget_show (i);

gtk_menu_shell_append(GTK_MENU_SHELL (m), i);

}

while (gl) {

SPGradient *gradient = SP_GRADIENT (gl->data);

gl = g_slist_remove (gl, gradient);

GtkWidget *i = gtk_menu_item_new ();

g_object_set_data (G_OBJECT (i), "gradient", gradient);

g_signal_connect (G_OBJECT (i), "activate", G_CALLBACK (gr_item_activate), desktop);

GtkWidget *image = sp_gradient_image_new (gradient);

GtkWidget *hb = gtk_hbox_new (FALSE, 4);

GtkWidget *l = gtk_label_new ("");

gchar *label = gr_prepare_label(gradient);

gtk_label_set_markup (GTK_LABEL(l), label);

g_free (label);

gtk_misc_set_alignment (GTK_MISC (l), 1.0, 0.5);

gtk_box_pack_start (GTK_BOX (hb), l, TRUE, TRUE, 0);

gtk_box_pack_start (GTK_BOX (hb), image, FALSE, FALSE, 0);

gtk_widget_show_all (i);

gtk_container_add (GTK_CONTAINER (i), hb);

gtk_menu_shell_append(GTK_MENU_SHELL (m), i);

if (gradient == gr_selected) {

pos = idx;

}

idx ++;

}

gtk_widget_set_sensitive (om, TRUE);

}

gtk_option_menu_set_menu (GTK_OPTION_MENU (om), m);

/* Select the current gradient, or the Multi/Nothing line */

if (gr_multi || gr_selected == NULL)

gtk_option_menu_set_history (GTK_OPTION_MENU (om), 0);

else

gtk_option_menu_set_history (GTK_OPTION_MENU (om), pos);

return om;

}

void gr_read_selection( Inkscape::Selection *selection,

GrDrag *drag,

SPGradient *&gr_selected,

bool &gr_multi,

SPGradientSpread &spr_selected,

bool &spr_multi )

{

if (drag && drag->selected) {

// GRADIENTFIXME: make this work for more than one selected dragger?

GrDragger *dragger = static_cast<GrDragger*>(drag->selected->data);

for (GSList const* i = dragger->draggables; i; i = i->next) { // for all draggables of dragger

GrDraggable *draggable = static_cast<GrDraggable *>(i->data);

SPGradient *gradient = sp_item_gradient_get_vector(draggable->item, draggable->fill_or_stroke);

SPGradientSpread spread = sp_item_gradient_get_spread(draggable->item, draggable->fill_or_stroke);

if (gradient && gradient->isSolid()) {

gradient = 0;

}

if (gradient && (gradient != gr_selected)) {

if (gr_selected) {

gr_multi = true;

} else {

gr_selected = gradient;

}

}

if (spread != spr_selected) {

if (spr_selected != INT_MAX) {

spr_multi = true;

} else {

spr_selected = spread;

}

}

}

return;

}

// If no selected dragger, read desktop selection

for (GSList const* i = selection->itemList(); i; i = i->next) {

SPItem *item = SP_ITEM(i->data);

SPStyle *style = item->style;

if (style && (style->fill.isPaintserver())) {

SPPaintServer *server = item->style->getFillPaintServer();

if ( SP_IS_GRADIENT(server) ) {

SPGradient *gradient = SP_GRADIENT(server)->getVector();

SPGradientSpread spread = SP_GRADIENT(server)->fetchSpread();

if (gradient && gradient->isSolid()) {

gradient = 0;

}

if (gradient && (gradient != gr_selected)) {

if (gr_selected) {

gr_multi = true;

} else {

gr_selected = gradient;

}

}

if (spread != spr_selected) {

if (spr_selected != INT_MAX) {

spr_multi = true;

} else {

spr_selected = spread;

}

}

}

}

if (style && (style->stroke.isPaintserver())) {

SPPaintServer *server = item->style->getStrokePaintServer();

if ( SP_IS_GRADIENT(server) ) {

SPGradient *gradient = SP_GRADIENT(server)->getVector();

SPGradientSpread spread = SP_GRADIENT(server)->fetchSpread();

if (gradient && gradient->isSolid()) {

gradient = 0;

}

if (gradient && (gradient != gr_selected)) {

if (gr_selected) {

gr_multi = true;

} else {

gr_selected = gradient;

}

}

if (spread != spr_selected) {

if (spr_selected != INT_MAX) {

spr_multi = true;

} else {

spr_selected = spread;

}

}

}

}

}

}

static void gr_tb_selection_changed(Inkscape::Selection * /*selection*/, gpointer data)

{

GtkWidget *widget = GTK_WIDGET(data);

SPDesktop *desktop = static_cast<SPDesktop *>(g_object_get_data(G_OBJECT(widget), "desktop"));

if (desktop) {

Inkscape::Selection *selection = sp_desktop_selection(desktop); // take from desktop, not from args

if (selection) {

SPEventContext *ev = sp_desktop_event_context(desktop);

GtkWidget *om = (GtkWidget *) g_object_get_data(G_OBJECT(widget), "menu");

if (om) {

gtk_widget_destroy(om);

om = 0;

}

SPGradient *gr_selected = 0;

bool gr_multi = false;

SPGradientSpread spr_selected = static_cast<SPGradientSpread>(INT_MAX); // meaning undefined

bool spr_multi = false;

gr_read_selection(selection, ev ? ev->get_drag() : 0, gr_selected, gr_multi, spr_selected, spr_multi);

om = gr_vector_list(desktop, selection->isEmpty(), gr_selected, gr_multi);

g_object_set_data(G_OBJECT(widget), "menu", om);

GtkWidget *buttons = (GtkWidget *) g_object_get_data(G_OBJECT(widget), "buttons");

gtk_widget_set_sensitive(buttons, (gr_selected && !gr_multi));

gtk_box_pack_start(GTK_BOX(widget), om, TRUE, TRUE, 0);

gtk_widget_show_all(widget);

}

}

}

static void

gr_tb_selection_modified (Inkscape::Selection *selection, guint /*flags*/, gpointer data)

{

gr_tb_selection_changed (selection, data);

}

static void

gr_drag_selection_changed (gpointer /*dragger*/, gpointer data)

{

gr_tb_selection_changed (NULL, data);

}

static void

gr_defs_release (SPObject */*defs*/, GtkWidget *widget)

{

gr_tb_selection_changed (NULL, (gpointer) widget);

}

static void

gr_defs_modified (SPObject */*defs*/, guint /*flags*/, GtkWidget *widget)

{

gr_tb_selection_changed (NULL, (gpointer) widget);

}

static void gr_disconnect_sigc (GObject */*obj*/, sigc::connection *connection) {

connection->disconnect();

delete connection;

}

static void

gr_edit (GtkWidget */*button*/, GtkWidget *widget)

{

GtkWidget *om = (GtkWidget *) g_object_get_data (G_OBJECT(widget), "menu");

spinbutton_defocus(GTK_OBJECT(widget));

if (om) {

GtkWidget *i = gtk_menu_get_active (GTK_MENU (gtk_option_menu_get_menu (GTK_OPTION_MENU (om))));

SPGradient *gr = (SPGradient *) g_object_get_data (G_OBJECT(i), "gradient");

if (gr) {

GtkWidget *dialog = sp_gradient_vector_editor_new (gr);

gtk_widget_show (dialog);

}

}

}

GtkWidget * gr_change_widget(SPDesktop *desktop)

{

Inkscape::Selection *selection = sp_desktop_selection (desktop);

SPDocument *document = sp_desktop_document (desktop);

SPEventContext *ev = sp_desktop_event_context (desktop);

SPGradient *gr_selected = NULL;

bool gr_multi = false;

SPGradientSpread spr_selected = (SPGradientSpread) INT_MAX; // meaning undefined

bool spr_multi = false;

gr_read_selection (selection, ev? ev->get_drag() : 0, gr_selected, gr_multi, spr_selected, spr_multi);

GtkWidget *widget = gtk_hbox_new(FALSE, FALSE);

g_object_set_data(G_OBJECT(widget), "dtw", desktop->canvas);

g_object_set_data (G_OBJECT (widget), "desktop", desktop);

GtkWidget *om = gr_vector_list (desktop, selection->isEmpty(), gr_selected, gr_multi);

g_object_set_data (G_OBJECT (widget), "menu", om);

gtk_box_pack_start (GTK_BOX (widget), om, TRUE, TRUE, 0);

{

GtkWidget *buttons = gtk_hbox_new(FALSE, 1);

/* Edit... */

{

GtkWidget *hb = gtk_hbox_new(FALSE, 1);

GtkWidget *b = gtk_button_new_with_label(_("Edit..."));

gtk_widget_set_tooltip_text(b, _("Edit the stops of the gradient"));

gtk_widget_show(b);

gtk_container_add(GTK_CONTAINER(hb), b);

g_signal_connect(G_OBJECT(b), "clicked", G_CALLBACK(gr_edit), widget);

gtk_box_pack_start (GTK_BOX(buttons), hb, FALSE, FALSE, 0);

}

gtk_box_pack_end (GTK_BOX(widget), buttons, FALSE, FALSE, 0);

g_object_set_data (G_OBJECT(widget), "buttons", buttons);

gtk_widget_set_sensitive (buttons, (gr_selected && !gr_multi));

}

// connect to selection modified and changed signals

sigc::connection *conn1 = new sigc::connection (selection->connectChanged(

sigc::bind (

sigc::ptr_fun(&gr_tb_selection_changed),

(gpointer)widget )

));

sigc::connection *conn2 = new sigc::connection (selection->connectModified(

sigc::bind (

sigc::ptr_fun(&gr_tb_selection_modified),

(gpointer)widget )

));

sigc::connection *conn3 = new sigc::connection (desktop->connectToolSubselectionChanged(

sigc::bind (

sigc::ptr_fun(&gr_drag_selection_changed),

(gpointer)widget )

));

// when widget is destroyed, disconnect

g_signal_connect(G_OBJECT(widget), "destroy", G_CALLBACK(gr_disconnect_sigc), conn1);

g_signal_connect(G_OBJECT(widget), "destroy", G_CALLBACK(gr_disconnect_sigc), conn2);

g_signal_connect(G_OBJECT(widget), "destroy", G_CALLBACK(gr_disconnect_sigc), conn3);

// connect to release and modified signals of the defs (i.e. when someone changes gradient)

sigc::connection *release_connection = new sigc::connection();

*release_connection = document->getDefs()->connectRelease(sigc::bind<1>(sigc::ptr_fun(&gr_defs_release), widget));

sigc::connection *modified_connection = new sigc::connection();

*modified_connection = document->getDefs()->connectModified(sigc::bind<2>(sigc::ptr_fun(&gr_defs_modified), widget));

// when widget is destroyed, disconnect

g_signal_connect(G_OBJECT(widget), "destroy", G_CALLBACK(gr_disconnect_sigc), release_connection);

g_signal_connect(G_OBJECT(widget), "destroy", G_CALLBACK(gr_disconnect_sigc), modified_connection);

gtk_widget_show_all (widget);

return widget;

}

GtkWidget *

sp_gradient_toolbox_new(SPDesktop *desktop)

{

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

GtkWidget *tbl = gtk_toolbar_new();

g_object_set_data(G_OBJECT(tbl), "dtw", desktop->canvas);

g_object_set_data(G_OBJECT(tbl), "desktop", desktop);

sp_toolbox_add_label(tbl, _("<b>New:</b>"));

// TODO replace aux_toolbox_space(tbl, AUX_SPACING);

{

GtkWidget *cvbox = gtk_vbox_new (FALSE, 0);

GtkWidget *cbox = gtk_hbox_new (FALSE, 0);

{

GtkWidget *button = sp_button_new_from_data( Inkscape::ICON_SIZE_DECORATION,

SP_BUTTON_TYPE_TOGGLE,

NULL,

INKSCAPE_ICON("paint-gradient-linear"),

_("Create linear gradient") );

g_signal_connect_after (G_OBJECT (button), "clicked", G_CALLBACK (gr_toggle_type), tbl);

g_object_set_data(G_OBJECT(tbl), "linear", button);

gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (button),

prefs->getInt("/tools/gradient/newgradient", SP_GRADIENT_TYPE_LINEAR) == SP_GRADIENT_TYPE_LINEAR);

gtk_box_pack_start(GTK_BOX(cbox), button, FALSE, FALSE, 0);

}

{

GtkWidget *button = sp_button_new_from_data( Inkscape::ICON_SIZE_DECORATION,

SP_BUTTON_TYPE_TOGGLE,

NULL,

INKSCAPE_ICON("paint-gradient-radial"),

_("Create radial (elliptic or circular) gradient"));

g_signal_connect_after (G_OBJECT (button), "clicked", G_CALLBACK (gr_toggle_type), tbl);

g_object_set_data(G_OBJECT(tbl), "radial", button);

gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (button),

prefs->getInt("/tools/gradient/newgradient", SP_GRADIENT_TYPE_LINEAR) == SP_GRADIENT_TYPE_RADIAL);

gtk_box_pack_start(GTK_BOX(cbox), button, FALSE, FALSE, 0);

}

gtk_box_pack_start(GTK_BOX(cvbox), cbox, TRUE, FALSE, 0);

gtk_toolbar_append_widget( GTK_TOOLBAR(tbl), cvbox, "", "" );

}

// TODO replace aux_toolbox_space(tbl, AUX_SPACING);

sp_toolbox_add_label(tbl, _("on"), false);

// TODO replace aux_toolbox_space(tbl, AUX_SPACING);

{

GtkWidget *cvbox = gtk_vbox_new (FALSE, 0);

GtkWidget *cbox = gtk_hbox_new (FALSE, 0);

{

GtkWidget *button = sp_button_new_from_data( Inkscape::ICON_SIZE_DECORATION,

SP_BUTTON_TYPE_TOGGLE,

NULL,

INKSCAPE_ICON("object-fill"),

_("Create gradient in the fill"));

g_signal_connect_after (G_OBJECT (button), "clicked", G_CALLBACK (gr_toggle_fillstroke), tbl);

g_object_set_data(G_OBJECT(tbl), "fill", button);

gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (button),

prefs->getBool("/tools/gradient/newfillorstroke", true));

gtk_box_pack_start(GTK_BOX(cbox), button, FALSE, FALSE, 0);

}

{

GtkWidget *button = sp_button_new_from_data( Inkscape::ICON_SIZE_DECORATION,

SP_BUTTON_TYPE_TOGGLE,

NULL,

INKSCAPE_ICON("object-stroke"),

_("Create gradient in the stroke"));

g_signal_connect_after (G_OBJECT (button), "clicked", G_CALLBACK (gr_toggle_fillstroke), tbl);

g_object_set_data(G_OBJECT(tbl), "stroke", button);

gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (button),

!prefs->getBool("/tools/gradient/newfillorstroke", true));

gtk_box_pack_start(GTK_BOX(cbox), button, FALSE, FALSE, 0);

}

gtk_box_pack_start(GTK_BOX(cvbox), cbox, TRUE, TRUE, 3);

gtk_toolbar_append_widget( GTK_TOOLBAR(tbl), cvbox, "", "" );

}

sp_toolbox_add_label(tbl, _("<b>Change:</b>"));

// TODO replace aux_toolbox_space(tbl, AUX_SPACING);

{

GtkWidget *vectors = gr_change_widget (desktop);

gtk_toolbar_append_widget( GTK_TOOLBAR(tbl), vectors, "", "" );

}

gtk_widget_show_all(tbl);

sp_set_font_size_smaller (tbl);

return tbl;

}