096dfde2c1cb7bb1e0a4b76e21f2abf548b900d5Campbell Barton

096dfde2c1cb7bb1e0a4b76e21f2abf548b900d5Campbell Barton#include "config.h"

096dfde2c1cb7bb1e0a4b76e21f2abf548b900d5Campbell Barton

096dfde2c1cb7bb1e0a4b76e21f2abf548b900d5Campbell Barton#include <gtk/gtk.h>

096dfde2c1cb7bb1e0a4b76e21f2abf548b900d5Campbell Barton#include <gdk/gdkkeysyms.h>

096dfde2c1cb7bb1e0a4b76e21f2abf548b900d5Campbell Barton#include <glibmm/i18n.h>

096dfde2c1cb7bb1e0a4b76e21f2abf548b900d5Campbell Barton

096dfde2c1cb7bb1e0a4b76e21f2abf548b900d5Campbell Barton#include <numeric>

096dfde2c1cb7bb1e0a4b76e21f2abf548b900d5Campbell Barton

096dfde2c1cb7bb1e0a4b76e21f2abf548b900d5Campbell Barton#include "svg/svg.h"

874cad03a8450ed3464f6dfae2eb16108bec5bbdCampbell Barton

7a5d553ffd780a7b0e5e7e6935cff061dbdeccadCampbell Barton#include <glib.h>

7a5d553ffd780a7b0e5e7e6935cff061dbdeccadCampbell Barton#include "macros.h"

7a5d553ffd780a7b0e5e7e6935cff061dbdeccadCampbell Barton#include "document.h"

874cad03a8450ed3464f6dfae2eb16108bec5bbdCampbell Barton#include "selection.h"

874cad03a8450ed3464f6dfae2eb16108bec5bbdCampbell Barton#include "desktop.h"

874cad03a8450ed3464f6dfae2eb16108bec5bbdCampbell Barton#include "desktop-events.h"

874cad03a8450ed3464f6dfae2eb16108bec5bbdCampbell Barton#include "desktop-handles.h"

874cad03a8450ed3464f6dfae2eb16108bec5bbdCampbell Barton#include "desktop-style.h"

874cad03a8450ed3464f6dfae2eb16108bec5bbdCampbell Barton#include "message-context.h"

874cad03a8450ed3464f6dfae2eb16108bec5bbdCampbell Barton#include "pixmaps/cursor-tweak-move.xpm"

874cad03a8450ed3464f6dfae2eb16108bec5bbdCampbell Barton#include "pixmaps/cursor-thin.xpm"

874cad03a8450ed3464f6dfae2eb16108bec5bbdCampbell Barton#include "pixmaps/cursor-thicken.xpm"

874cad03a8450ed3464f6dfae2eb16108bec5bbdCampbell Barton#include "pixmaps/cursor-attract.xpm"

874cad03a8450ed3464f6dfae2eb16108bec5bbdCampbell Barton#include "pixmaps/cursor-repel.xpm"

874cad03a8450ed3464f6dfae2eb16108bec5bbdCampbell Barton#include "pixmaps/cursor-push.xpm"

874cad03a8450ed3464f6dfae2eb16108bec5bbdCampbell Barton#include "pixmaps/cursor-roughen.xpm"

874cad03a8450ed3464f6dfae2eb16108bec5bbdCampbell Barton#include "pixmaps/cursor-color.xpm"

ccee8a9aa5c7646c5e05f860a0e8221151551c51verbalshadow#include <boost/optional.hpp>

096dfde2c1cb7bb1e0a4b76e21f2abf548b900d5Campbell Barton#include "xml/repr.h"

874cad03a8450ed3464f6dfae2eb16108bec5bbdCampbell Barton#include "context-fns.h"

#include "sp-item.h"

#include "inkscape.h"

#include "color.h"

#include "svg/svg-color.h"

#include "splivarot.h"

#include "sp-item-group.h"

#include "sp-shape.h"

#include "sp-path.h"

#include "path-chemistry.h"

#include "sp-gradient.h"

#include "sp-stop.h"

#include "sp-gradient-reference.h"

#include "sp-linear-gradient.h"

#include "sp-radial-gradient.h"

#include "gradient-chemistry.h"

#include "sp-text.h"

#include "sp-flowtext.h"

#include "display/sp-canvas.h"

#include "display/canvas-bpath.h"

#include "display/canvas-arena.h"

#include "display/curve.h"

#include "livarot/Shape.h"

#include <2geom/transforms.h>

#include "preferences.h"

#include "style.h"

#include "box3d.h"

#include "sp-item-transform.h"

#include "filter-chemistry.h"

#include "filters/gaussian-blur.h"

#include "tweak-context.h"

using Inkscape::DocumentUndo;

#define DDC_RED_RGBA 0xff0000ff

#define DYNA_MIN_WIDTH 1.0e-6

static void sp_tweak_context_class_init(SPTweakContextClass *klass);

static void sp_tweak_context_init(SPTweakContext *ddc);

static void sp_tweak_context_dispose(GObject *object);

static void sp_tweak_context_setup(SPEventContext *ec);

static void sp_tweak_context_set(SPEventContext *ec, Inkscape::Preferences::Entry *val);

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

static SPEventContextClass *parent_class;

sp_tweak_context_get_type(void)

{

static GType type = 0;

if (!type) {

GTypeInfo info = {

sizeof(SPTweakContextClass),

NULL, NULL,

(GClassInitFunc) sp_tweak_context_class_init,

NULL, NULL,

sizeof(SPTweakContext),

4,

(GInstanceInitFunc) sp_tweak_context_init,

NULL, /* value_table */

};

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

}

return type;

}

static void

sp_tweak_context_class_init(SPTweakContextClass *klass)

{

GObjectClass *object_class = (GObjectClass *) klass;

SPEventContextClass *event_context_class = (SPEventContextClass *) klass;

parent_class = (SPEventContextClass*)g_type_class_peek_parent(klass);

object_class->dispose = sp_tweak_context_dispose;

event_context_class->setup = sp_tweak_context_setup;

event_context_class->set = sp_tweak_context_set;

event_context_class->root_handler = sp_tweak_context_root_handler;

}

static void

sp_tweak_context_init(SPTweakContext *tc)

{

SPEventContext *event_context = SP_EVENT_CONTEXT(tc);

event_context->cursor_shape = cursor_push_xpm;

event_context->hot_x = 4;

event_context->hot_y = 4;

/* attributes */

tc->dragging = FALSE;

tc->width = 0.2;

tc->force = 0.2;

tc->pressure = TC_DEFAULT_PRESSURE;

tc->is_dilating = false;

tc->has_dilated = false;

tc->do_h = true;

tc->do_s = true;

tc->do_l = true;

tc->do_o = false;

new (&tc->style_set_connection) sigc::connection();

}

static void

sp_tweak_context_dispose(GObject *object)

{

SPTweakContext *tc = SP_TWEAK_CONTEXT(object);

SPEventContext *ec = SP_EVENT_CONTEXT(object);

ec->enableGrDrag(false);

tc->style_set_connection.disconnect();

tc->style_set_connection.~connection();

if (tc->dilate_area) {

gtk_object_destroy(GTK_OBJECT(tc->dilate_area));

tc->dilate_area = NULL;

}

if (tc->_message_context) {

delete tc->_message_context;

}

G_OBJECT_CLASS(parent_class)->dispose(object);

}

bool is_transform_mode (gint mode)

{

return (mode == TWEAK_MODE_MOVE ||

mode == TWEAK_MODE_MOVE_IN_OUT ||

mode == TWEAK_MODE_MOVE_JITTER ||

mode == TWEAK_MODE_SCALE ||

mode == TWEAK_MODE_ROTATE ||

mode == TWEAK_MODE_MORELESS);

}

bool is_color_mode (gint mode)

{

return (mode == TWEAK_MODE_COLORPAINT || mode == TWEAK_MODE_COLORJITTER || mode == TWEAK_MODE_BLUR);

}

sp_tweak_update_cursor (SPTweakContext *tc, bool with_shift)

{

SPEventContext *event_context = SP_EVENT_CONTEXT(tc);

SPDesktop *desktop = event_context->desktop;

guint num = 0;

gchar *sel_message = NULL;

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

num = g_slist_length((GSList *) desktop->selection->itemList());

sel_message = g_strdup_printf(ngettext("<b>%i</b> object selected","<b>%i</b> objects selected",num), num);

} else {

sel_message = g_strdup_printf(_("<b>Nothing</b> selected"));

}

switch (tc->mode) {

case TWEAK_MODE_MOVE:

tc->_message_context->setF(Inkscape::NORMAL_MESSAGE, _("%s. Drag to <b>move</b>."), sel_message);

event_context->cursor_shape = cursor_tweak_move_xpm;

break;

case TWEAK_MODE_MOVE_IN_OUT:

tc->_message_context->setF(Inkscape::NORMAL_MESSAGE, _("%s. Drag or click to <b>move in</b>; with Shift to <b>move out</b>."), sel_message);

event_context->cursor_shape = cursor_tweak_move_xpm;

break;

case TWEAK_MODE_MOVE_JITTER:

tc->_message_context->setF(Inkscape::NORMAL_MESSAGE, _("%s. Drag or click to <b>move randomly</b>."), sel_message);

event_context->cursor_shape = cursor_tweak_move_xpm;

break;

case TWEAK_MODE_SCALE:

tc->_message_context->setF(Inkscape::NORMAL_MESSAGE, _("%s. Drag or click to <b>scale down</b>; with Shift to <b>scale up</b>."), sel_message);

event_context->cursor_shape = cursor_tweak_move_xpm;

break;

case TWEAK_MODE_ROTATE:

tc->_message_context->setF(Inkscape::NORMAL_MESSAGE, _("%s. Drag or click to <b>rotate clockwise</b>; with Shift, <b>counterclockwise</b>."), sel_message);

event_context->cursor_shape = cursor_tweak_move_xpm;

break;

case TWEAK_MODE_MORELESS:

tc->_message_context->setF(Inkscape::NORMAL_MESSAGE, _("%s. Drag or click to <b>duplicate</b>; with Shift, <b>delete</b>."), sel_message);

event_context->cursor_shape = cursor_tweak_move_xpm;

break;

case TWEAK_MODE_PUSH:

tc->_message_context->setF(Inkscape::NORMAL_MESSAGE, _("%s. Drag to <b>push paths</b>."), sel_message);

event_context->cursor_shape = cursor_push_xpm;

break;

case TWEAK_MODE_SHRINK_GROW:

tc->_message_context->setF(Inkscape::NORMAL_MESSAGE, _("%s. Drag or click to <b>inset paths</b>; with Shift to <b>outset</b>."), sel_message);

if (with_shift) {

event_context->cursor_shape = cursor_thicken_xpm;

} else {

event_context->cursor_shape = cursor_thin_xpm;

}

break;

case TWEAK_MODE_ATTRACT_REPEL:

tc->_message_context->setF(Inkscape::NORMAL_MESSAGE, _("%s. Drag or click to <b>attract paths</b>; with Shift to <b>repel</b>."), sel_message);

if (with_shift) {

event_context->cursor_shape = cursor_repel_xpm;

} else {

event_context->cursor_shape = cursor_attract_xpm;

}

break;

case TWEAK_MODE_ROUGHEN:

tc->_message_context->setF(Inkscape::NORMAL_MESSAGE, _("%s. Drag or click to <b>roughen paths</b>."), sel_message);

event_context->cursor_shape = cursor_roughen_xpm;

break;

case TWEAK_MODE_COLORPAINT:

tc->_message_context->setF(Inkscape::NORMAL_MESSAGE, _("%s. Drag or click to <b>paint objects</b> with color."), sel_message);

event_context->cursor_shape = cursor_color_xpm;

break;

case TWEAK_MODE_COLORJITTER:

tc->_message_context->setF(Inkscape::NORMAL_MESSAGE, _("%s. Drag or click to <b>randomize colors</b>."), sel_message);

event_context->cursor_shape = cursor_color_xpm;

break;

case TWEAK_MODE_BLUR:

tc->_message_context->setF(Inkscape::NORMAL_MESSAGE, _("%s. Drag or click to <b>increase blur</b>; with Shift to <b>decrease</b>."), sel_message);

event_context->cursor_shape = cursor_color_xpm;

break;

}

sp_event_context_update_cursor(event_context);

g_free(sel_message);

}

static bool

sp_tweak_context_style_set(SPCSSAttr const *css, SPTweakContext *tc)

{

if (tc->mode == TWEAK_MODE_COLORPAINT) { // intercept color setting only in this mode

// we cannot store properties with uris

css = sp_css_attr_unset_uris ((SPCSSAttr *) css);

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

prefs->setStyle("/tools/tweak/style", const_cast<SPCSSAttr*>(css));

return true;

}

return false;

}

static void

sp_tweak_context_setup(SPEventContext *ec)

{

SPTweakContext *tc = SP_TWEAK_CONTEXT(ec);

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

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

}

{

/* TODO: have a look at sp_dyna_draw_context_setup where the same is done.. generalize? at least make it an arcto! */

SPCurve *c = new SPCurve();

const double C1 = 0.552;

c->moveto(-1,0);

c->curveto(-1, C1, -C1, 1, 0, 1 );

c->curveto(C1, 1, 1, C1, 1, 0 );

c->curveto(1, -C1, C1, -1, 0, -1 );

c->curveto(-C1, -1, -1, -C1, -1, 0 );

c->closepath();

tc->dilate_area = sp_canvas_bpath_new(sp_desktop_controls(ec->desktop), c);

c->unref();

sp_canvas_bpath_set_fill(SP_CANVAS_BPATH(tc->dilate_area), 0x00000000,(SPWindRule)0);

sp_canvas_bpath_set_stroke(SP_CANVAS_BPATH(tc->dilate_area), 0xff9900ff, 1.0, SP_STROKE_LINEJOIN_MITER, SP_STROKE_LINECAP_BUTT);

sp_canvas_item_hide(tc->dilate_area);

}

tc->is_drawing = false;

tc->_message_context = new Inkscape::MessageContext((ec->desktop)->messageStack());

sp_event_context_read(ec, "width");

sp_event_context_read(ec, "mode");

sp_event_context_read(ec, "fidelity");

sp_event_context_read(ec, "force");

sp_event_context_read(ec, "usepressure");

sp_event_context_read(ec, "doh");

sp_event_context_read(ec, "dol");

sp_event_context_read(ec, "dos");

sp_event_context_read(ec, "doo");

tc->style_set_connection = ec->desktop->connectSetStyle( // catch style-setting signal in this tool

sigc::bind(sigc::ptr_fun(&sp_tweak_context_style_set), tc)

);

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

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

ec->enableSelectionCue();

}

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

ec->enableGrDrag();

}

}

static void

sp_tweak_context_set(SPEventContext *ec, Inkscape::Preferences::Entry *val)

{

SPTweakContext *tc = SP_TWEAK_CONTEXT(ec);

Glib::ustring path = val->getEntryName();

if (path == "width") {

tc->width = CLAMP(val->getDouble(0.1), -1000.0, 1000.0);

} else if (path == "mode") {

tc->mode = val->getInt();

sp_tweak_update_cursor(tc, false);

} else if (path == "fidelity") {

tc->fidelity = CLAMP(val->getDouble(), 0.0, 1.0);

} else if (path == "force") {

tc->force = CLAMP(val->getDouble(1.0), 0, 1.0);

} else if (path == "usepressure") {

tc->usepressure = val->getBool();

} else if (path == "doh") {

tc->do_h = val->getBool();

} else if (path == "dos") {

tc->do_s = val->getBool();

} else if (path == "dol") {

tc->do_l = val->getBool();

} else if (path == "doo") {

tc->do_o = val->getBool();

}

}

static void

sp_tweak_extinput(SPTweakContext *tc, GdkEvent *event)

{

if (gdk_event_get_axis (event, GDK_AXIS_PRESSURE, &tc->pressure)) {

tc->pressure = CLAMP (tc->pressure, TC_MIN_PRESSURE, TC_MAX_PRESSURE);

} else {

tc->pressure = TC_DEFAULT_PRESSURE;

}

}

get_dilate_radius (SPTweakContext *tc)

{

// 10 times the pen width:

return 500 * tc->width/SP_EVENT_CONTEXT(tc)->desktop->current_zoom();

}

get_path_force (SPTweakContext *tc)

{

double force = 8 * (tc->usepressure? tc->pressure : TC_DEFAULT_PRESSURE)

/sqrt(SP_EVENT_CONTEXT(tc)->desktop->current_zoom());

if (force > 3) {

force += 4 * (force - 3);

}

return force * tc->force;

}

get_move_force (SPTweakContext *tc)

{

double force = (tc->usepressure? tc->pressure : TC_DEFAULT_PRESSURE);

return force * tc->force;

}

sp_tweak_dilate_recursive (Inkscape::Selection *selection, SPItem *item, Geom::Point p, Geom::Point vector, gint mode, double radius, double force, double fidelity, bool reverse)

{

bool did = false;

if (SP_IS_BOX3D(item) && !is_transform_mode(mode) && !is_color_mode(mode)) {

// convert 3D boxes to ordinary groups before tweaking their shapes

item = box3d_convert_to_group(SP_BOX3D(item));

selection->add(item);

}

if (SP_IS_TEXT(item) || SP_IS_FLOWTEXT(item)) {

GSList *items = g_slist_prepend (NULL, item);

GSList *selected = NULL;

GSList *to_select = NULL;

SPDocument *doc = item->document;

sp_item_list_to_curves (items, &selected, &to_select);

g_slist_free (items);

SPObject* newObj = doc->getObjectByRepr((Inkscape::XML::Node *) to_select->data);

g_slist_free (to_select);

item = (SPItem *) newObj;

selection->add(item);

}

if (SP_IS_GROUP(item) && !SP_IS_BOX3D(item)) {

GSList *children = NULL;

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

if (SP_IS_ITEM(child)) {

children = g_slist_prepend(children, child);

}

}

for (GSList *i = children; i; i = i->next) {

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

if (sp_tweak_dilate_recursive (selection, SP_ITEM(child), p, vector, mode, radius, force, fidelity, reverse))

did = true;

}

g_slist_free(children);

} else {

if (mode == TWEAK_MODE_MOVE) {

Geom::OptRect a = item->documentVisualBounds();

if (a) {

double x = Geom::L2(a->midpoint() - p)/radius;

if (a->contains(p)) x = 0;

if (x < 1) {

Geom::Point move = force * 0.5 * (cos(M_PI * x) + 1) * vector;

sp_item_move_rel(item, Geom::Translate(move[Geom::X], -move[Geom::Y]));

did = true;

}

}

} else if (mode == TWEAK_MODE_MOVE_IN_OUT) {

Geom::OptRect a = item->documentVisualBounds();

if (a) {

double x = Geom::L2(a->midpoint() - p)/radius;

if (a->contains(p)) x = 0;

if (x < 1) {

Geom::Point move = force * 0.5 * (cos(M_PI * x) + 1) *

(reverse? (a->midpoint() - p) : (p - a->midpoint()));

sp_item_move_rel(item, Geom::Translate(move[Geom::X], -move[Geom::Y]));

did = true;

}

}

} else if (mode == TWEAK_MODE_MOVE_JITTER) {

Geom::OptRect a = item->documentVisualBounds();

if (a) {

double dp = g_random_double_range(0, M_PI*2);

double dr = g_random_double_range(0, radius);

double x = Geom::L2(a->midpoint() - p)/radius;

if (a->contains(p)) x = 0;

if (x < 1) {

Geom::Point move = force * 0.5 * (cos(M_PI * x) + 1) * Geom::Point(cos(dp)*dr, sin(dp)*dr);

sp_item_move_rel(item, Geom::Translate(move[Geom::X], -move[Geom::Y]));

did = true;

}

}

} else if (mode == TWEAK_MODE_SCALE) {

Geom::OptRect a = item->documentVisualBounds();

if (a) {

double x = Geom::L2(a->midpoint() - p)/radius;

if (a->contains(p)) x = 0;

if (x < 1) {

double scale = 1 + (reverse? force : -force) * 0.05 * (cos(M_PI * x) + 1);

sp_item_scale_rel(item, Geom::Scale(scale, scale));

did = true;

}

}

} else if (mode == TWEAK_MODE_ROTATE) {

Geom::OptRect a = item->documentVisualBounds();

if (a) {

double x = Geom::L2(a->midpoint() - p)/radius;

if (a->contains(p)) x = 0;

if (x < 1) {

double angle = (reverse? force : -force) * 0.05 * (cos(M_PI * x) + 1) * M_PI;

sp_item_rotate_rel(item, Geom::Rotate(angle));

did = true;

}

}

} else if (mode == TWEAK_MODE_MORELESS) {

Geom::OptRect a = item->documentVisualBounds();

if (a) {

double x = Geom::L2(a->midpoint() - p)/radius;

if (a->contains(p)) x = 0;

if (x < 1) {

double prob = force * 0.5 * (cos(M_PI * x) + 1);

double chance = g_random_double_range(0, 1);

if (chance <= prob) {

if (reverse) { // delete

sp_object_ref(item, NULL);

item->deleteObject(true, true);

sp_object_unref(item, NULL);

} else { // duplicate

SPDocument *doc = item->document;

Inkscape::XML::Document* xml_doc = doc->getReprDoc();

Inkscape::XML::Node *old_repr = item->getRepr();

SPObject *old_obj = doc->getObjectByRepr(old_repr);

Inkscape::XML::Node *parent = old_repr->parent();

Inkscape::XML::Node *copy = old_repr->duplicate(xml_doc);

parent->appendChild(copy);

SPObject *new_obj = doc->getObjectByRepr(copy);

if (selection->includes(old_obj)) {

selection->add(new_obj);

}

Inkscape::GC::release(copy);

}

did = true;

}

}

}

} else if (SP_IS_PATH(item) || SP_IS_SHAPE(item)) {

Inkscape::XML::Node *newrepr = NULL;

gint pos = 0;

Inkscape::XML::Node *parent = NULL;

char const *id = NULL;

if (!SP_IS_PATH(item)) {

newrepr = sp_selected_item_to_curved_repr(item, 0);

if (!newrepr) {

return false;

}

// remember the position of the item

pos = item->getRepr()->position();

// remember parent

parent = item->getRepr()->parent();

// remember id

id = item->getRepr()->attribute("id");

}

// skip those paths whose bboxes are entirely out of reach with our radius

Geom::OptRect bbox = item->documentVisualBounds();

if (bbox) {

bbox->expandBy(radius);

if (!bbox->contains(p)) {

return false;

}

}

Path *orig = Path_for_item(item, false);

if (orig == NULL) {

return false;

}

Path *res = new Path;

res->SetBackData(false);

Shape *theShape = new Shape;

Shape *theRes = new Shape;

Geom::Affine i2doc(item->i2doc_affine());

orig->ConvertWithBackData((0.08 - (0.07 * fidelity)) / i2doc.descrim()); // default 0.059

orig->Fill(theShape, 0);

SPCSSAttr *css = sp_repr_css_attr(item->getRepr(), "style");

gchar const *val = sp_repr_css_property(css, "fill-rule", NULL);

if (val && strcmp(val, "nonzero") == 0) {

theRes->ConvertToShape(theShape, fill_nonZero);

} else if (val && strcmp(val, "evenodd") == 0) {

theRes->ConvertToShape(theShape, fill_oddEven);

} else {

theRes->ConvertToShape(theShape, fill_nonZero);

}

if (Geom::L2(vector) != 0) {

vector = 1/Geom::L2(vector) * vector;

}

bool did_this = false;

if (mode == TWEAK_MODE_SHRINK_GROW) {

if (theShape->MakeTweak(tweak_mode_grow, theRes,

reverse? force : -force,

join_straight, 4.0,

true, p, Geom::Point(0,0), radius, &i2doc) == 0) // 0 means the shape was actually changed

did_this = true;

} else if (mode == TWEAK_MODE_ATTRACT_REPEL) {

if (theShape->MakeTweak(tweak_mode_repel, theRes,

reverse? force : -force,

join_straight, 4.0,

true, p, Geom::Point(0,0), radius, &i2doc) == 0)

did_this = true;

} else if (mode == TWEAK_MODE_PUSH) {

if (theShape->MakeTweak(tweak_mode_push, theRes,

1.0,

join_straight, 4.0,

true, p, force*2*vector, radius, &i2doc) == 0)

did_this = true;

} else if (mode == TWEAK_MODE_ROUGHEN) {

if (theShape->MakeTweak(tweak_mode_roughen, theRes,

force,

join_straight, 4.0,

true, p, Geom::Point(0,0), radius, &i2doc) == 0)

did_this = true;

}

// the rest only makes sense if we actually changed the path

if (did_this) {

theRes->ConvertToShape(theShape, fill_positive);

res->Reset();

theRes->ConvertToForme(res);

double th_max = (0.6 - 0.59*sqrt(fidelity)) / i2doc.descrim();

double threshold = MAX(th_max, th_max*force);

res->ConvertEvenLines(threshold);

res->Simplify(threshold / (selection->desktop()->current_zoom()));

if (newrepr) { // converting to path, need to replace the repr

bool is_selected = selection->includes(item);

if (is_selected) {

selection->remove(item);

}

// It's going to resurrect, so we delete without notifying listeners.

item->deleteObject(false);

// restore id

newrepr->setAttribute("id", id);

// add the new repr to the parent

parent->appendChild(newrepr);

// move to the saved position

newrepr->setPosition(pos > 0 ? pos : 0);

if (is_selected)

selection->add(newrepr);

}

if (res->descr_cmd.size() > 1) {

gchar *str = res->svg_dump_path();

if (newrepr) {

newrepr->setAttribute("d", str);

} else {

if (SP_IS_LPE_ITEM(item) && sp_lpe_item_has_path_effect_recursive(SP_LPE_ITEM(item))) {

item->getRepr()->setAttribute("inkscape:original-d", str);

} else {

item->getRepr()->setAttribute("d", str);

}

}

g_free(str);

} else {

// TODO: if there's 0 or 1 node left, delete this path altogether

}

if (newrepr) {

Inkscape::GC::release(newrepr);

newrepr = NULL;

}

}

delete theShape;

delete theRes;

delete orig;

delete res;

if (did_this) {

did = true;

}

}

}

return did;

}

tweak_colorpaint (float *color, guint32 goal, double force, bool do_h, bool do_s, bool do_l)

{

float rgb_g[3];

if (!do_h || !do_s || !do_l) {

float hsl_g[3];

sp_color_rgb_to_hsl_floatv (hsl_g, SP_RGBA32_R_F(goal), SP_RGBA32_G_F(goal), SP_RGBA32_B_F(goal));

float hsl_c[3];

sp_color_rgb_to_hsl_floatv (hsl_c, color[0], color[1], color[2]);

if (!do_h) {

hsl_g[0] = hsl_c[0];

}

if (!do_s) {

hsl_g[1] = hsl_c[1];

}

if (!do_l) {

hsl_g[2] = hsl_c[2];

}

sp_color_hsl_to_rgb_floatv (rgb_g, hsl_g[0], hsl_g[1], hsl_g[2]);

} else {

rgb_g[0] = SP_RGBA32_R_F(goal);

rgb_g[1] = SP_RGBA32_G_F(goal);

rgb_g[2] = SP_RGBA32_B_F(goal);

}

for (int i = 0; i < 3; i++) {

double d = rgb_g[i] - color[i];

color[i] += d * force;

}

}

tweak_colorjitter (float *color, double force, bool do_h, bool do_s, bool do_l)

{

float hsl_c[3];

sp_color_rgb_to_hsl_floatv (hsl_c, color[0], color[1], color[2]);

if (do_h) {

hsl_c[0] += g_random_double_range(-0.5, 0.5) * force;

if (hsl_c[0] > 1) {

hsl_c[0] -= 1;

}

if (hsl_c[0] < 0) {

hsl_c[0] += 1;

}

}

if (do_s) {

hsl_c[1] += g_random_double_range(-hsl_c[1], 1 - hsl_c[1]) * force;

}

if (do_l) {

hsl_c[2] += g_random_double_range(-hsl_c[2], 1 - hsl_c[2]) * force;

}

sp_color_hsl_to_rgb_floatv (color, hsl_c[0], hsl_c[1], hsl_c[2]);

}

tweak_color (guint mode, float *color, guint32 goal, double force, bool do_h, bool do_s, bool do_l)

{

if (mode == TWEAK_MODE_COLORPAINT) {

tweak_colorpaint (color, goal, force, do_h, do_s, do_l);

} else if (mode == TWEAK_MODE_COLORJITTER) {

tweak_colorjitter (color, force, do_h, do_s, do_l);

}

}

tweak_opacity (guint mode, SPIScale24 *style_opacity, double opacity_goal, double force)

{

double opacity = SP_SCALE24_TO_FLOAT (style_opacity->value);

if (mode == TWEAK_MODE_COLORPAINT) {

double d = opacity_goal - opacity;

opacity += d * force;

} else if (mode == TWEAK_MODE_COLORJITTER) {

opacity += g_random_double_range(-opacity, 1 - opacity) * force;

}

style_opacity->value = SP_SCALE24_FROM_FLOAT(opacity);

}

tweak_profile (double dist, double radius)

{

if (radius == 0) {

return 0;

}

double x = dist / radius;

double alpha = 1;

if (x >= 1) {

return 0;

} else if (x <= 0) {

return 1;

} else {

return (0.5 * cos (M_PI * (pow(x, alpha))) + 0.5);

}

}

tweak_colors_in_gradient (SPItem *item, bool fill_or_stroke,

guint32 const rgb_goal, Geom::Point p_w, double radius, double force, guint mode,

bool do_h, bool do_s, bool do_l, bool /*do_o*/)

{

SPGradient *gradient = sp_item_gradient (item, fill_or_stroke);

if (!gradient || !SP_IS_GRADIENT(gradient)) {

return;

}

Geom::Affine i2d (item->i2doc_affine ());

Geom::Point p = p_w * i2d.inverse();

p *= (gradient->gradientTransform).inverse();

// now p is in gradient's original coordinates

double pos = 0;

double r = 0;

if (SP_IS_LINEARGRADIENT(gradient)) {

SPLinearGradient *lg = SP_LINEARGRADIENT(gradient);

Geom::Point p1(lg->x1.computed, lg->y1.computed);

Geom::Point p2(lg->x2.computed, lg->y2.computed);

Geom::Point pdiff(p2 - p1);

double vl = Geom::L2(pdiff);

// This is the matrix which moves and rotates the gradient line

// so it's oriented along the X axis:

Geom::Affine norm = Geom::Affine(Geom::Translate(-p1)) * Geom::Affine(Geom::Rotate(-atan2(pdiff[Geom::Y], pdiff[Geom::X])));

// Transform the mouse point by it to find out its projection onto the gradient line:

Geom::Point pnorm = p * norm;

// Scale its X coordinate to match the length of the gradient line:

pos = pnorm[Geom::X] / vl;

// Calculate radius in lenfth-of-gradient-line units

r = radius / vl;

} else if (SP_IS_RADIALGRADIENT(gradient)) {

SPRadialGradient *rg = SP_RADIALGRADIENT(gradient);

Geom::Point c (rg->cx.computed, rg->cy.computed);

pos = Geom::L2(p - c) / rg->r.computed;

r = radius / rg->r.computed;

}

// Normalize pos to 0..1, taking into accound gradient spread:

double pos_e = pos;

if (gradient->getSpread() == SP_GRADIENT_SPREAD_PAD) {

if (pos > 1) {

pos_e = 1;

}

if (pos < 0) {

pos_e = 0;

}

} else if (gradient->getSpread() == SP_GRADIENT_SPREAD_REPEAT) {

if (pos > 1 || pos < 0) {

pos_e = pos - floor(pos);

}

} else if (gradient->getSpread() == SP_GRADIENT_SPREAD_REFLECT) {

if (pos > 1 || pos < 0) {

bool odd = ((int)(floor(pos)) % 2 == 1);

pos_e = pos - floor(pos);

if (odd) {

pos_e = 1 - pos_e;

}

}

}

SPGradient *vector = sp_gradient_get_forked_vector_if_necessary(gradient, false);

double offset_l = 0;

double offset_h = 0;

SPObject *child_prev = NULL;

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

if (!SP_IS_STOP(child)) {

continue;

}

SPStop *stop = SP_STOP (child);

offset_h = stop->offset;

if (child_prev) {

if (offset_h - offset_l > r && pos_e >= offset_l && pos_e <= offset_h) {

// the summit falls in this interstop, and the radius is small,

// so it only affects the ends of this interstop;

// distribute the force between the two endstops so that they

// get all the painting even if they are not touched by the brush

tweak_color (mode, stop->specified_color.v.c, rgb_goal,

force * (pos_e - offset_l) / (offset_h - offset_l),

do_h, do_s, do_l);

tweak_color (mode, SP_STOP(child_prev)->specified_color.v.c, rgb_goal,

force * (offset_h - pos_e) / (offset_h - offset_l),

do_h, do_s, do_l);

stop->updateRepr();

child_prev->updateRepr();

break;

} else {

// wide brush, may affect more than 2 stops,

// paint each stop by the force from the profile curve

if (offset_l <= pos_e && offset_l > pos_e - r) {

tweak_color (mode, SP_STOP(child_prev)->specified_color.v.c, rgb_goal,

force * tweak_profile (fabs (pos_e - offset_l), r),

do_h, do_s, do_l);

child_prev->updateRepr();

}

if (offset_h >= pos_e && offset_h < pos_e + r) {

tweak_color (mode, stop->specified_color.v.c, rgb_goal,

force * tweak_profile (fabs (pos_e - offset_h), r),

do_h, do_s, do_l);

stop->updateRepr();

}

}

}

offset_l = offset_h;

child_prev = child;

}

}

sp_tweak_color_recursive (guint mode, SPItem *item, SPItem *item_at_point,

guint32 fill_goal, bool do_fill,

guint32 stroke_goal, bool do_stroke,

float opacity_goal, bool do_opacity,

bool do_blur, bool reverse,

Geom::Point p, double radius, double force,

bool do_h, bool do_s, bool do_l, bool do_o)

{

bool did = false;

if (SP_IS_GROUP(item)) {

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

if (SP_IS_ITEM(child)) {

if (sp_tweak_color_recursive (mode, SP_ITEM(child), item_at_point,

fill_goal, do_fill,

stroke_goal, do_stroke,

opacity_goal, do_opacity,

do_blur, reverse,

p, radius, force, do_h, do_s, do_l, do_o)) {

did = true;

}

}

}

} else {

SPStyle *style = item->style;

if (!style) {

return false;

}

Geom::OptRect bbox = item->documentGeometricBounds();

if (!bbox) {

return false;

}

Geom::Rect brush(p - Geom::Point(radius, radius), p + Geom::Point(radius, radius));

Geom::Point center = bbox->midpoint();

double this_force;

if (item == item_at_point) {

this_force = force;

} else if (!bbox->intersects(brush)) {

return false;

//} else if (bbox->maxExtent() > 3 * radius) {

//}

} else {

this_force = force * tweak_profile (Geom::L2 (p - center), radius);

}

if (this_force > 0.002) {

if (do_blur) {

Geom::OptRect bbox = item->documentGeometricBounds();

if (!bbox) {

return did;

}

double blur_now = 0;

Geom::Affine i2dt = item->i2dt_affine ();

if (style->filter.set && style->getFilter()) {

//cycle through filter primitives

SPObject *primitive_obj = style->getFilter()->children;

while (primitive_obj) {

if (SP_IS_FILTER_PRIMITIVE(primitive_obj)) {

SPFilterPrimitive *primitive = SP_FILTER_PRIMITIVE(primitive_obj);

//if primitive is gaussianblur

if(SP_IS_GAUSSIANBLUR(primitive)) {

SPGaussianBlur * spblur = SP_GAUSSIANBLUR(primitive);

float num = spblur->stdDeviation.getNumber();

blur_now += num * i2dt.descrim(); // sum all blurs in the filter

}

}

primitive_obj = primitive_obj->next;

}

}

double perimeter = bbox->dimensions()[Geom::X] + bbox->dimensions()[Geom::Y];

blur_now = blur_now / perimeter;

double blur_new;

if (reverse) {

blur_new = blur_now - 0.06 * force;

} else {

blur_new = blur_now + 0.06 * force;

}

if (blur_new < 0.0005 && blur_new < blur_now) {

blur_new = 0;

}

if (blur_new == 0) {

remove_filter(item, false);

} else {

double radius = blur_new * perimeter;

SPFilter *filter = modify_filter_gaussian_blur_from_item(item->document, item, radius);

sp_style_set_property_url(item, "filter", filter, false);

}

return true; // do not do colors, blur is a separate mode

}

if (do_fill) {

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

tweak_colors_in_gradient (item, true, fill_goal, p, radius, this_force, mode, do_h, do_s, do_l, do_o);

did = true;

} else if (style->fill.isColor()) {

tweak_color (mode, style->fill.value.color.v.c, fill_goal, this_force, do_h, do_s, do_l);

item->updateRepr();

did = true;

}

}

if (do_stroke) {

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

tweak_colors_in_gradient (item, false, stroke_goal, p, radius, this_force, mode, do_h, do_s, do_l, do_o);

did = true;

} else if (style->stroke.isColor()) {

tweak_color (mode, style->stroke.value.color.v.c, stroke_goal, this_force, do_h, do_s, do_l);

item->updateRepr();

did = true;

}

}

if (do_opacity && do_o) {

tweak_opacity (mode, &style->opacity, opacity_goal, this_force);

}

}

}

return did;

}

sp_tweak_dilate (SPTweakContext *tc, Geom::Point event_p, Geom::Point p, Geom::Point vector, bool reverse)

{

Inkscape::Selection *selection = sp_desktop_selection(SP_EVENT_CONTEXT(tc)->desktop);

SPDesktop *desktop = SP_EVENT_CONTEXT(tc)->desktop;

if (selection->isEmpty()) {

return false;

}

bool did = false;

double radius = get_dilate_radius(tc);

SPItem *item_at_point = SP_EVENT_CONTEXT(tc)->desktop->getItemAtPoint(event_p, TRUE);

bool do_fill = false, do_stroke = false, do_opacity = false;

guint32 fill_goal = sp_desktop_get_color_tool(desktop, "/tools/tweak", true, &do_fill);

guint32 stroke_goal = sp_desktop_get_color_tool(desktop, "/tools/tweak", false, &do_stroke);

double opacity_goal = sp_desktop_get_master_opacity_tool(desktop, "/tools/tweak", &do_opacity);

if (reverse) {

#if 0

// HSL inversion

float hsv[3];

float rgb[3];

sp_color_rgb_to_hsv_floatv (hsv,

SP_RGBA32_R_F(fill_goal),

SP_RGBA32_G_F(fill_goal),

SP_RGBA32_B_F(fill_goal));

sp_color_hsv_to_rgb_floatv (rgb, hsv[0]<.5? hsv[0]+.5 : hsv[0]-.5, 1 - hsv[1], 1 - hsv[2]);

fill_goal = SP_RGBA32_F_COMPOSE(rgb[0], rgb[1], rgb[2], 1);

sp_color_rgb_to_hsv_floatv (hsv,

SP_RGBA32_R_F(stroke_goal),

SP_RGBA32_G_F(stroke_goal),

SP_RGBA32_B_F(stroke_goal));

sp_color_hsv_to_rgb_floatv (rgb, hsv[0]<.5? hsv[0]+.5 : hsv[0]-.5, 1 - hsv[1], 1 - hsv[2]);

stroke_goal = SP_RGBA32_F_COMPOSE(rgb[0], rgb[1], rgb[2], 1);

#else

// RGB inversion

fill_goal = SP_RGBA32_U_COMPOSE(

(255 - SP_RGBA32_R_U(fill_goal)),

(255 - SP_RGBA32_G_U(fill_goal)),

(255 - SP_RGBA32_B_U(fill_goal)),

(255 - SP_RGBA32_A_U(fill_goal)));

stroke_goal = SP_RGBA32_U_COMPOSE(

(255 - SP_RGBA32_R_U(stroke_goal)),

(255 - SP_RGBA32_G_U(stroke_goal)),

(255 - SP_RGBA32_B_U(stroke_goal)),

(255 - SP_RGBA32_A_U(stroke_goal)));

#endif

opacity_goal = 1 - opacity_goal;

}

double path_force = get_path_force(tc);

if (radius == 0 || path_force == 0) {

return false;

}

double move_force = get_move_force(tc);

double color_force = MIN(sqrt(path_force)/20.0, 1);

for (GSList *items = g_slist_copy((GSList *) selection->itemList());

items != NULL;

items = items->next) {

SPItem *item = (SPItem *) items->data;

if (is_color_mode (tc->mode)) {

if (do_fill || do_stroke || do_opacity) {

if (sp_tweak_color_recursive (tc->mode, item, item_at_point,

fill_goal, do_fill,

stroke_goal, do_stroke,

opacity_goal, do_opacity,

tc->mode == TWEAK_MODE_BLUR, reverse,

p, radius, color_force, tc->do_h, tc->do_s, tc->do_l, tc->do_o)) {

did = true;

}

}

} else if (is_transform_mode(tc->mode)) {

if (sp_tweak_dilate_recursive (selection, item, p, vector, tc->mode, radius, move_force, tc->fidelity, reverse)) {

did = true;

}

} else {

if (sp_tweak_dilate_recursive (selection, item, p, vector, tc->mode, radius, path_force, tc->fidelity, reverse)) {

did = true;

}

}

}

return did;

}

sp_tweak_update_area (SPTweakContext *tc)

{

double radius = get_dilate_radius(tc);

Geom::Affine const sm (Geom::Scale(radius, radius) * Geom::Translate(SP_EVENT_CONTEXT(tc)->desktop->point()));

sp_canvas_item_affine_absolute(tc->dilate_area, sm);

sp_canvas_item_show(tc->dilate_area);

}

sp_tweak_switch_mode (SPTweakContext *tc, gint mode, bool with_shift)

{

SP_EVENT_CONTEXT(tc)->desktop->setToolboxSelectOneValue ("tweak_tool_mode", mode);

// need to set explicitly, because the prefs may not have changed by the previous

tc->mode = mode;

sp_tweak_update_cursor (tc, with_shift);

}

sp_tweak_switch_mode_temporarily (SPTweakContext *tc, gint mode, bool with_shift)

{

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

// Juggling about so that prefs have the old value but tc->mode and the button show new mode:

gint now_mode = prefs->getInt("/tools/tweak/mode", 0);

SP_EVENT_CONTEXT(tc)->desktop->setToolboxSelectOneValue ("tweak_tool_mode", mode);

// button has changed prefs, restore

prefs->setInt("/tools/tweak/mode", now_mode);

// changing prefs changed tc->mode, restore back :)

tc->mode = mode;

sp_tweak_update_cursor (tc, with_shift);

}

sp_tweak_context_root_handler(SPEventContext *event_context,

GdkEvent *event)

{

SPTweakContext *tc = SP_TWEAK_CONTEXT(event_context);

SPDesktop *desktop = event_context->desktop;

gint ret = FALSE;

switch (event->type) {

case GDK_ENTER_NOTIFY:

sp_canvas_item_show(tc->dilate_area);

break;

case GDK_LEAVE_NOTIFY:

sp_canvas_item_hide(tc->dilate_area);

break;

case GDK_BUTTON_PRESS:

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

if (Inkscape::have_viable_layer(desktop, tc->_message_context) == false) {