#ifdef HAVE_CONFIG_H

# include <config.h>

#endif

#include <gdk/gdkkeysyms.h>

#include "macros.h"

#include <glibmm/i18n.h>

#include "display/sp-canvas.h"

#include "sp-ellipse.h"

#include "document.h"

#include "document-undo.h"

#include "sp-namedview.h"

#include "selection.h"

#include "desktop-handles.h"

#include "snap.h"

#include "pixmaps/cursor-ellipse.xpm"

#include "sp-metrics.h"

#include "xml/repr.h"

#include "xml/node-event-vector.h"

#include "preferences.h"

#include "message-context.h"

#include "desktop.h"

#include "desktop-style.h"

#include "context-fns.h"

#include "verbs.h"

#include "shape-editor.h"

#include "event-context.h"

#include "arc-context.h"

#include "display/sp-canvas-item.h"

using Inkscape::DocumentUndo;

#include "tool-factory.h"

namespace {

SPEventContext* createArcContext() {

return new SPArcContext();

}

bool arcContextRegistered = ToolFactory::instance().registerObject("/tools/shapes/arc", createArcContext);

}

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

return SPArcContext::prefsPath;

}

const std::string SPArcContext::prefsPath = "/tools/shapes/arc";

SPArcContext::SPArcContext() : SPEventContext() {

this->_message_context = 0;

this->cursor_shape = cursor_ellipse_xpm;

this->hot_x = 4;

this->hot_y = 4;

this->xp = 0;

this->yp = 0;

this->tolerance = 0;

this->within_tolerance = false;

this->item_to_select = NULL;

//this->tool_url = "/tools/shapes/arc";

this->arc = NULL;

}

void SPArcContext::finish() {

sp_canvas_item_ungrab(SP_CANVAS_ITEM(desktop->acetate), GDK_CURRENT_TIME);

this->finishItem();

this->sel_changed_connection.disconnect();

SPEventContext::finish();

}

SPArcContext::~SPArcContext() {

this->enableGrDrag(false);

this->sel_changed_connection.disconnect();

delete this->shape_editor;

this->shape_editor = NULL;

/* fixme: This is necessary because we do not grab */

if (this->arc) {

this->finishItem();

}

delete this->_message_context;

}

void SPArcContext::selection_changed(Inkscape::Selection* selection) {

this->shape_editor->unset_item(SH_KNOTHOLDER);

this->shape_editor->set_item(selection->singleItem(), SH_KNOTHOLDER);

}

void SPArcContext::setup() {

SPEventContext::setup();

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

this->shape_editor = new ShapeEditor(this->desktop);

SPItem *item = sp_desktop_selection(this->desktop)->singleItem();

if (item) {

this->shape_editor->set_item(item, SH_KNOTHOLDER);

}

this->sel_changed_connection.disconnect();

this->sel_changed_connection = selection->connectChanged(

sigc::mem_fun(this, &SPArcContext::selection_changed)

);

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

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

this->enableSelectionCue();

}

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

this->enableGrDrag();

}

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

}

bool SPArcContext::item_handler(SPItem* item, GdkEvent* event) {

gint ret = FALSE;

switch (event->type) {

case GDK_BUTTON_PRESS:

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

Inkscape::setup_for_drag_start(desktop, this, event);

ret = TRUE;

}

break;

// motion and release are always on root (why?)

default:

break;

}

// CPPIFY: ret is overwritten...

ret = SPEventContext::item_handler(item, event);

return ret;

}

bool SPArcContext::root_handler(GdkEvent* event) {

static bool dragging;

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

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

this->tolerance = prefs->getIntLimited("/options/dragtolerance/value", 0, 0, 100);

gint ret = FALSE;

switch (event->type) {

case GDK_BUTTON_PRESS:

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

dragging = true;

this->center = Inkscape::setup_for_drag_start(desktop, this, event);

/* Snap center */

SnapManager &m = desktop->namedview->snap_manager;

m.setup(desktop);

m.freeSnapReturnByRef(this->center, Inkscape::SNAPSOURCE_NODE_HANDLE);

sp_canvas_item_grab(SP_CANVAS_ITEM(desktop->acetate),

GDK_KEY_PRESS_MASK | GDK_BUTTON_RELEASE_MASK |

GDK_POINTER_MOTION_MASK | GDK_POINTER_MOTION_HINT_MASK | GDK_BUTTON_PRESS_MASK,

NULL, event->button.time);

ret = TRUE;

m.unSetup();

}

break;

case GDK_MOTION_NOTIFY:

if (dragging && (event->motion.state & GDK_BUTTON1_MASK) && !this->space_panning) {

if ( this->within_tolerance

&& ( abs( (gint) event->motion.x - this->xp ) < this->tolerance )

&& ( abs( (gint) event->motion.y - this->yp ) < this->tolerance ) ) {

break; // do not drag if we're within tolerance from origin

}

// Once the user has moved farther than tolerance from the original location

// (indicating they intend to draw, not click), then always process the

// motion notify coordinates as given (no snapping back to origin)

this->within_tolerance = false;

Geom::Point const motion_w(event->motion.x, event->motion.y);

Geom::Point motion_dt(desktop->w2d(motion_w));

this->drag(motion_dt, event->motion.state);

gobble_motion_events(GDK_BUTTON1_MASK);

ret = TRUE;

} else if (!sp_event_context_knot_mouseover(this)){

SnapManager &m = desktop->namedview->snap_manager;

m.setup(desktop);

Geom::Point const motion_w(event->motion.x, event->motion.y);

Geom::Point motion_dt(desktop->w2d(motion_w));

m.preSnap(Inkscape::SnapCandidatePoint(motion_dt, Inkscape::SNAPSOURCE_NODE_HANDLE));

m.unSetup();

}

break;

case GDK_BUTTON_RELEASE:

this->xp = this->yp = 0;

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

dragging = false;

sp_event_context_discard_delayed_snap_event(this);

if (!this->within_tolerance) {

// we've been dragging, finish the arc

this->finishItem();

} else if (this->item_to_select) {

// no dragging, select clicked item if any

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

selection->toggle(this->item_to_select);

} else {

selection->set(this->item_to_select);

}

} else {

// click in an empty space

selection->clear();

}

this->xp = 0;

this->yp = 0;

this->item_to_select = NULL;

ret = TRUE;

}

sp_canvas_item_ungrab(SP_CANVAS_ITEM(desktop->acetate), event->button.time);

break;

case GDK_KEY_PRESS:

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

case GDK_KEY_Alt_L:

case GDK_KEY_Alt_R:

case GDK_KEY_Control_L:

case GDK_KEY_Control_R:

case GDK_KEY_Shift_L:

case GDK_KEY_Shift_R:

case GDK_KEY_Meta_L: // Meta is when you press Shift+Alt (at least on my machine)

case GDK_KEY_Meta_R:

if (!dragging) {

sp_event_show_modifier_tip(this->defaultMessageContext(), event,

_("<b>Ctrl</b>: make circle or integer-ratio ellipse, snap arc/segment angle"),

_("<b>Shift</b>: draw around the starting point"),

NULL);

}

break;

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_x:

case GDK_KEY_X:

if (MOD__ALT_ONLY(event)) {

desktop->setToolboxFocusTo ("altx-arc");

ret = TRUE;

}

break;

case GDK_KEY_Escape:

if (dragging) {

dragging = false;

sp_event_context_discard_delayed_snap_event(this);

// if drawing, cancel, otherwise pass it up for deselecting

this->cancel();

ret = TRUE;

}

break;

case GDK_KEY_space:

if (dragging) {

sp_canvas_item_ungrab(SP_CANVAS_ITEM(desktop->acetate), event->button.time);

dragging = false;

sp_event_context_discard_delayed_snap_event(this);

if (!this->within_tolerance) {

// we've been dragging, finish the arc

this->finishItem();

}

// do not return true, so that space would work switching to selector

}

break;

case GDK_KEY_Delete:

case GDK_KEY_KP_Delete:

case GDK_KEY_BackSpace:

ret = this->deleteSelectedDrag(MOD__CTRL_ONLY(event));

break;

default:

break;

}

break;

case GDK_KEY_RELEASE:

switch (event->key.keyval) {

case GDK_KEY_Alt_L:

case GDK_KEY_Alt_R:

case GDK_KEY_Control_L:

case GDK_KEY_Control_R:

case GDK_KEY_Shift_L:

case GDK_KEY_Shift_R:

case GDK_KEY_Meta_L: // Meta is when you press Shift+Alt

case GDK_KEY_Meta_R:

this->defaultMessageContext()->clear();

break;

default:

break;

}

break;

default:

break;

}

if (!ret) {

ret = SPEventContext::root_handler(event);

}

return ret;

}

void SPArcContext::drag(Geom::Point pt, guint state) {

if (!this->arc) {

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

return;

}

// Create object

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

Inkscape::XML::Node *repr = xml_doc->createElement("svg:path");

repr->setAttribute("sodipodi:type", "arc");

// Set style

sp_desktop_apply_style_tool(desktop, repr, "/tools/shapes/arc", false);

this->arc = SP_ARC(desktop->currentLayer()->appendChildRepr(repr));

Inkscape::GC::release(repr);

this->arc->transform = SP_ITEM(desktop->currentLayer())->i2doc_affine().inverse();

this->arc->updateRepr();

desktop->canvas->forceFullRedrawAfterInterruptions(5);

}

bool ctrl_save = false;

if ((state & GDK_MOD1_MASK) && (state & GDK_CONTROL_MASK) && !(state & GDK_SHIFT_MASK)) {

// if Alt is pressed without Shift in addition to Control, temporarily drop the CONTROL mask

// so that the ellipse is not constrained to integer ratios

ctrl_save = true;

state = state ^ GDK_CONTROL_MASK;

}

Geom::Rect r = Inkscape::snap_rectangular_box(desktop, this->arc, pt, this->center, state);

if (ctrl_save) {

state = state ^ GDK_CONTROL_MASK;

}

Geom::Point dir = r.dimensions() / 2;

if (state & GDK_MOD1_MASK) {

/* With Alt let the ellipse pass through the mouse pointer */

Geom::Point c = r.midpoint();

if (!ctrl_save) {

if (fabs(dir[Geom::X]) > 1E-6 && fabs(dir[Geom::Y]) > 1E-6) {

Geom::Affine const i2d ( (this->arc)->i2dt_affine() );

Geom::Point new_dir = pt * i2d - c;

new_dir[Geom::X] *= dir[Geom::Y] / dir[Geom::X];

double lambda = new_dir.length() / dir[Geom::Y];

r = Geom::Rect (c - lambda*dir, c + lambda*dir);

}

} else {

/* with Alt+Ctrl (without Shift) we generate a perfect circle

double l = dir.length();

Geom::Point d (l, l);

r = Geom::Rect (c - d, c + d);

}

}

sp_arc_position_set(SP_ARC(this->arc),

r.midpoint()[Geom::X], r.midpoint()[Geom::Y],

r.dimensions()[Geom::X] / 2, r.dimensions()[Geom::Y] / 2);

double rdimx = r.dimensions()[Geom::X];

double rdimy = r.dimensions()[Geom::Y];

GString *xs = SP_PX_TO_METRIC_STRING(rdimx, desktop->namedview->getDefaultMetric());

GString *ys = SP_PX_TO_METRIC_STRING(rdimy, desktop->namedview->getDefaultMetric());

if (state & GDK_CONTROL_MASK) {

int ratio_x, ratio_y;

if (fabs (rdimx) > fabs (rdimy)) {

ratio_x = (int) rint (rdimx / rdimy);

ratio_y = 1;

} else {

ratio_x = 1;

ratio_y = (int) rint (rdimy / rdimx);

}

this->_message_context->setF(Inkscape::IMMEDIATE_MESSAGE, _("<b>Ellipse</b>: %s &#215; %s (constrained to ratio %d:%d); with <b>Shift</b> to draw around the starting point"), xs->str, ys->str, ratio_x, ratio_y);

} else {

this->_message_context->setF(Inkscape::IMMEDIATE_MESSAGE, _("<b>Ellipse</b>: %s &#215; %s; with <b>Ctrl</b> to make square or integer-ratio ellipse; with <b>Shift</b> to draw around the starting point"), xs->str, ys->str);

}

g_string_free(xs, FALSE);

g_string_free(ys, FALSE);

}

void SPArcContext::finishItem() {

this->_message_context->clear();

if (this->arc != NULL) {

if (this->arc->rx.computed == 0 || this->arc->ry.computed == 0) {

this->cancel(); // Don't allow the creating of zero sized arc, for example when the start and and point snap to the snap grid point

return;

}

this->arc->updateRepr();

desktop->canvas->endForcedFullRedraws();

sp_desktop_selection(desktop)->set(this->arc);

DocumentUndo::done(sp_desktop_document(desktop), SP_VERB_CONTEXT_ARC, _("Create ellipse"));

this->arc = NULL;

}

}

void SPArcContext::cancel() {

sp_desktop_selection(desktop)->clear();

sp_canvas_item_ungrab(SP_CANVAS_ITEM(desktop->acetate), 0);

if (this->arc != NULL) {

this->arc->deleteObject();

this->arc = NULL;

}

this->within_tolerance = false;

this->xp = 0;

this->yp = 0;

this->item_to_select = NULL;

desktop->canvas->endForcedFullRedraws();

DocumentUndo::cancel(sp_desktop_document(desktop));

}