#include <cstring>

#include <cmath>

#include <cstdio>

#include "widget-sizes.h"

#include "ruler.h"

#include "unit-constants.h"

#include "round.h"

#include <glibmm/i18n.h>

#define ROUND(x) ((int) ((x) + 0.5))

#define GTK_PARAM_READWRITE G_PARAM_READWRITE|G_PARAM_STATIC_NAME|G_PARAM_STATIC_NICK|G_PARAM_STATIC_BLURB

#define DEFAULT_RULER_FONT_SCALE PANGO_SCALE_X_SMALL

#define MINIMUM_INCR 5

enum {

PROP_0,

PROP_ORIENTATION,

PROP_UNIT,

PROP_LOWER,

PROP_UPPER,

PROP_POSITION,

PROP_MAX_SIZE

};

typedef struct

{

GtkOrientation orientation;

SPMetric unit;

gdouble lower;

gdouble upper;

gdouble position;

gdouble max_size;

GdkWindow *input_window;

cairo_surface_t *backing_store;

PangoLayout *layout;

gdouble font_scale;

gint xsrc;

gint ysrc;

GList *track_widgets;

} SPRulerPrivate;

#define SP_RULER_GET_PRIVATE(ruler) \

G_TYPE_INSTANCE_GET_PRIVATE (ruler, SP_TYPE_RULER, SPRulerPrivate)

struct SPRulerMetric

{

gdouble ruler_scale[16];

gint subdivide[5];

};

static SPRulerMetric const ruler_metric_general = {

{ 1, 2, 5, 10, 25, 50, 100, 250, 500, 1000, 2500, 5000, 10000, 25000, 50000, 100000 },

{ 1, 5, 10, 50, 100 }

};

static SPRulerMetric const ruler_metric_inches = {

{ 1, 2, 4, 8, 16, 32, 64, 128, 256, 512, 1024, 2048, 4096, 8192, 16384, 32768 },

{ 1, 2, 4, 8, 16 }

};

static void sp_ruler_dispose (GObject *object);

static void sp_ruler_set_property (GObject *object,

guint prop_id,

const GValue *value,

GParamSpec *pspec);

static void sp_ruler_get_property (GObject *object,

guint prop_id,

GValue *value,

GParamSpec *pspec);

static void sp_ruler_realize (GtkWidget *widget);

static void sp_ruler_unrealize (GtkWidget *widget);

static void sp_ruler_map (GtkWidget *widget);

static void sp_ruler_unmap (GtkWidget *widget);

static void sp_ruler_size_allocate (GtkWidget *widget,

GtkAllocation *allocation);

#if GTK_CHECK_VERSION(3,0,0)

static void sp_ruler_get_preferred_width (GtkWidget *widget,

gint *minimum_width,

gint *natural_width);

static void sp_ruler_get_preferred_height (GtkWidget *widget,

gint *minimum_height,

gint *natural_height);

static void sp_ruler_style_updated (GtkWidget *widget);

#else

static void sp_ruler_size_request (GtkWidget *widget,

GtkRequisition *requisition);

static void sp_ruler_style_set (GtkWidget *widget,

GtkStyle *prev_style);

#endif

static gboolean sp_ruler_motion_notify (GtkWidget *widget,

GdkEventMotion *event);

static gboolean sp_ruler_draw (GtkWidget *widget,

cairo_t *cr);

#if !GTK_CHECK_VERSION(3,0,0)

static gboolean sp_ruler_expose (GtkWidget *widget,

GdkEventExpose *event);

#endif

static void sp_ruler_draw_ticks (SPRuler *ruler);

static void sp_ruler_draw_pos (SPRuler *ruler);

static void sp_ruler_make_pixmap (SPRuler *ruler);

static PangoLayout * sp_ruler_get_layout (GtkWidget *widget,

const gchar *text);

G_DEFINE_TYPE (SPRuler, sp_ruler, GTK_TYPE_WIDGET)

#define parent_class sp_ruler_parent_class

static void

sp_ruler_class_init (SPRulerClass *klass)

{

GObjectClass *object_class = G_OBJECT_CLASS (klass);

GtkWidgetClass *widget_class = GTK_WIDGET_CLASS (klass);

object_class->dispose = sp_ruler_dispose;

object_class->set_property = sp_ruler_set_property;

object_class->get_property = sp_ruler_get_property;

widget_class->realize = sp_ruler_realize;

widget_class->unrealize = sp_ruler_unrealize;

widget_class->map = sp_ruler_map;

widget_class->unmap = sp_ruler_unmap;

widget_class->size_allocate = sp_ruler_size_allocate;

#if GTK_CHECK_VERSION(3,0,0)

widget_class->get_preferred_width = sp_ruler_get_preferred_width;

widget_class->get_preferred_height = sp_ruler_get_preferred_height;

widget_class->style_updated = sp_ruler_style_updated;

widget_class->draw = sp_ruler_draw;

#else

widget_class->size_request = sp_ruler_size_request;

widget_class->style_set = sp_ruler_style_set;

widget_class->expose_event = sp_ruler_expose;

#endif

widget_class->motion_notify_event = sp_ruler_motion_notify;

g_type_class_add_private (object_class, sizeof (SPRulerPrivate));

g_object_class_install_property (object_class,

PROP_ORIENTATION,

g_param_spec_enum ("orientation",

_("Orientation"),

_("The orientation of the ruler"),

GTK_TYPE_ORIENTATION,

GTK_ORIENTATION_HORIZONTAL,

static_cast<GParamFlags>(GTK_PARAM_READWRITE)));

/* FIXME: Should probably use g_param_spec_enum */

g_object_class_install_property (object_class,

PROP_UNIT,

g_param_spec_uint ("unit",

_("Unit"),

_("Unit of the ruler"),

0, 8,

SP_PX,

static_cast<GParamFlags>(GTK_PARAM_READWRITE)));

g_object_class_install_property (object_class,

PROP_LOWER,

g_param_spec_double ("lower",

_("Lower"),

_("Lower limit of ruler"),

-G_MAXDOUBLE,

G_MAXDOUBLE,

0.0,

static_cast<GParamFlags>(GTK_PARAM_READWRITE)));

g_object_class_install_property (object_class,

PROP_UPPER,

g_param_spec_double ("upper",

_("Upper"),

_("Upper limit of ruler"),

-G_MAXDOUBLE,

G_MAXDOUBLE,

0.0,

static_cast<GParamFlags>(GTK_PARAM_READWRITE)));

g_object_class_install_property (object_class,

PROP_POSITION,

g_param_spec_double ("position",

_("Position"),

_("Position of mark on the ruler"),

-G_MAXDOUBLE,

G_MAXDOUBLE,

0.0,

static_cast<GParamFlags>(GTK_PARAM_READWRITE)));

g_object_class_install_property (object_class,

PROP_MAX_SIZE,

g_param_spec_double ("max-size",

_("Max Size"),

_("Maximum size of the ruler"),

-G_MAXDOUBLE,

G_MAXDOUBLE,

0.0,

static_cast<GParamFlags>(GTK_PARAM_READWRITE)));

gtk_widget_class_install_style_property (widget_class,

g_param_spec_double ("font-scale",

NULL, NULL,

0.0,

G_MAXDOUBLE,

DEFAULT_RULER_FONT_SCALE,

G_PARAM_READABLE));

}

static void

sp_ruler_init (SPRuler *ruler)

{

SPRulerPrivate *priv = SP_RULER_GET_PRIVATE (ruler);

gtk_widget_set_has_window (GTK_WIDGET (ruler), FALSE);

priv->orientation = GTK_ORIENTATION_HORIZONTAL;

priv->unit = SP_PX;

priv->lower = 0;

priv->upper = 0;

priv->position = 0;

priv->max_size = 0;

priv->backing_store = NULL;

priv->font_scale = DEFAULT_RULER_FONT_SCALE;

}

static void

sp_ruler_dispose (GObject *object)

{

SPRuler *ruler = SP_RULER (object);

SPRulerPrivate *priv = SP_RULER_GET_PRIVATE (ruler);

while (priv->track_widgets)

sp_ruler_remove_track_widget (ruler, GTK_WIDGET(priv->track_widgets->data));

G_OBJECT_CLASS (parent_class)->dispose (object);

}

sp_ruler_set_range (SPRuler *ruler,

gdouble lower,

gdouble upper,

gdouble max_size)

{

SPRulerPrivate *priv;

g_return_if_fail (SP_IS_RULER (ruler));

priv = SP_RULER_GET_PRIVATE (ruler);

g_object_freeze_notify (G_OBJECT (ruler));

if (priv->lower != lower)

{

priv->lower = lower;

g_object_notify (G_OBJECT (ruler), "lower");

}

if (priv->upper != upper)

{

priv->upper = upper;

g_object_notify (G_OBJECT (ruler), "upper");

}

if (priv->max_size != max_size)

{

priv->max_size = max_size;

g_object_notify (G_OBJECT (ruler), "max-size");

}

g_object_thaw_notify (G_OBJECT (ruler));

gtk_widget_queue_draw (GTK_WIDGET (ruler));

}

sp_ruler_get_range (SPRuler *ruler,

gdouble *lower,

gdouble *upper,

gdouble *max_size)

{

SPRulerPrivate *priv;

g_return_if_fail (SP_IS_RULER (ruler));

priv = SP_RULER_GET_PRIVATE (ruler);

if (lower)

*lower = priv->lower;

if (upper)

*upper = priv->upper;

if (max_size)

*max_size = priv->max_size;

}

static void

sp_ruler_set_property (GObject *object,

guint prop_id,

const GValue *value,

GParamSpec *pspec)

{

SPRuler *ruler = SP_RULER (object);

SPRulerPrivate *priv = SP_RULER_GET_PRIVATE (ruler);

switch (prop_id)

{

case PROP_ORIENTATION:

priv->orientation = static_cast<GtkOrientation>(g_value_get_enum (value));

gtk_widget_queue_resize (GTK_WIDGET (ruler));

break;

case PROP_UNIT:

sp_ruler_set_unit (ruler, static_cast<SPMetric>(g_value_get_int (value)));

break;

case PROP_LOWER:

sp_ruler_set_range (ruler,

g_value_get_double (value),

priv->upper,

priv->max_size);

break;

case PROP_UPPER:

sp_ruler_set_range (ruler,

priv->lower,

g_value_get_double (value),

priv->max_size);

break;

case PROP_POSITION:

sp_ruler_set_position (ruler, g_value_get_double (value));

break;

case PROP_MAX_SIZE:

sp_ruler_set_range (ruler,

priv->lower,

priv->upper,

g_value_get_double (value));

break;

default:

G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);

break;

}

}

static void

sp_ruler_get_property (GObject *object,

guint prop_id,

GValue *value,

GParamSpec *pspec)

{

SPRuler *ruler = SP_RULER (object);

SPRulerPrivate *priv = SP_RULER_GET_PRIVATE (ruler);

switch (prop_id)

{

case PROP_ORIENTATION:

g_value_set_enum (value, priv->orientation);

break;

case PROP_UNIT:

g_value_set_int (value, priv->unit);

break;

case PROP_LOWER:

g_value_set_double (value, priv->lower);

break;

case PROP_UPPER:

g_value_set_double (value, priv->upper);

break;

case PROP_POSITION:

g_value_set_double (value, priv->position);

break;

case PROP_MAX_SIZE:

g_value_set_double (value, priv->max_size);

break;

default:

G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);

break;

}

}

static void

sp_ruler_realize (GtkWidget *widget)

{

SPRuler *ruler = SP_RULER (widget);

SPRulerPrivate *priv = SP_RULER_GET_PRIVATE (ruler);

GtkAllocation allocation;

GdkWindowAttr attributes;

gint attributes_mask;

GTK_WIDGET_CLASS (sp_ruler_parent_class)->realize (widget);

gtk_widget_get_allocation (widget, &allocation);

attributes.window_type = GDK_WINDOW_CHILD;

attributes.x = allocation.x;

attributes.y = allocation.y;

attributes.width = allocation.width;

attributes.height = allocation.height;

attributes.wclass = GDK_INPUT_ONLY;

#if GTK_CHECK_VERSION(3,0,0)

attributes.event_mask = (gtk_widget_get_events (widget) |

GDK_EXPOSURE_MASK |

GDK_POINTER_MOTION_MASK |

GDK_POINTER_MOTION_HINT_MASK);

#else

attributes.event_mask = (gtk_widget_get_events (widget) |

GDK_EXPOSURE_MASK |

GDK_POINTER_MOTION_MASK);

#endif

attributes_mask = GDK_WA_X | GDK_WA_Y;

priv->input_window = gdk_window_new (gtk_widget_get_parent_window (widget),

&attributes, attributes_mask);

gdk_window_set_user_data (priv->input_window, ruler);

sp_ruler_make_pixmap (ruler);

}

static void

sp_ruler_unrealize(GtkWidget *widget)

{

SPRuler *ruler = SP_RULER (widget);

SPRulerPrivate *priv = SP_RULER_GET_PRIVATE (ruler);

if (priv->backing_store)

{

cairo_surface_destroy (priv->backing_store);

priv->backing_store = NULL;

}

if (priv->layout)

{

g_object_unref (priv->layout);

priv->layout = NULL;

}

if (priv->input_window)

{

gdk_window_destroy (priv->input_window);

priv->input_window = NULL;

}

GTK_WIDGET_CLASS (sp_ruler_parent_class)->unrealize (widget);

}

static void

sp_ruler_map (GtkWidget *widget)

{

SPRulerPrivate *priv = SP_RULER_GET_PRIVATE (widget);

GTK_WIDGET_CLASS (sp_ruler_parent_class)->map (widget);

if (priv->input_window)

gdk_window_show (priv->input_window);

}

static void

sp_ruler_unmap (GtkWidget *widget)

{

SPRulerPrivate *priv = SP_RULER_GET_PRIVATE (widget);

if (priv->input_window)

gdk_window_hide (priv->input_window);

GTK_WIDGET_CLASS (sp_ruler_parent_class)->unmap (widget);

}

static void

sp_ruler_size_allocate (GtkWidget *widget,

GtkAllocation *allocation)

{

SPRuler *ruler = SP_RULER(widget);

SPRulerPrivate *priv = SP_RULER_GET_PRIVATE (ruler);

GtkAllocation widget_allocation;

gboolean resized;

gtk_widget_get_allocation (widget, &widget_allocation);

resized = (widget_allocation.width != allocation->width ||

widget_allocation.height != allocation->height);

gtk_widget_set_allocation(widget, allocation);

if (gtk_widget_get_realized (widget))

{

gdk_window_move_resize (priv->input_window,

allocation->x, allocation->y,

allocation->width, allocation->height);

if (resized)

sp_ruler_make_pixmap (ruler);

}

}

static void

sp_ruler_size_request (GtkWidget *widget,

GtkRequisition *requisition)

{

SPRulerPrivate *priv = SP_RULER_GET_PRIVATE (widget);

PangoLayout *layout;

PangoRectangle ink_rect;

gint size;

layout = sp_ruler_get_layout (widget, "0123456789");

pango_layout_get_pixel_extents (layout, &ink_rect, NULL);

size = 2 + ink_rect.height * 1.7;

#if GTK_CHECK_VERSION(3,0,0)

GtkStyleContext *context = gtk_widget_get_style_context (widget);

GtkBorder border;

gtk_style_context_get_border (context, static_cast<GtkStateFlags>(0), &border);

requisition->width = border.left + border.right;

requisition->height = border.top + border.bottom;

#else

GtkStyle *style = gtk_widget_get_style(widget);

#endif

if (priv->orientation == GTK_ORIENTATION_HORIZONTAL)

{

#if GTK_CHECK_VERSION(3,0,0)

requisition->width += 1;

requisition->height += size;

#else

requisition->width = style->xthickness * 2 + 1;

requisition->height = style->ythickness * 2 + size;

#endif

}

else

{

#if GTK_CHECK_VERSION(3,0,0)

requisition->width += size;

requisition->height += 1;

#else

requisition->width = style->xthickness * 2 + size;

requisition->height = style->ythickness * 2 + 1;

#endif

}

}

static void

#if GTK_CHECK_VERSION(3,0,0)

sp_ruler_style_updated (GtkWidget *widget)

#else

sp_ruler_style_set (GtkWidget *widget,

GtkStyle *prev_style)

#endif

{

SPRulerPrivate *priv = SP_RULER_GET_PRIVATE (widget);

#if GTK_CHECK_VERSION(3,0,0)

GTK_WIDGET_CLASS (sp_ruler_parent_class)->style_updated (widget);

#else

GTK_WIDGET_CLASS (sp_ruler_parent_class)->style_set (widget, prev_style);

#endif

gtk_widget_style_get (widget,

"font-scale", &priv->font_scale,

NULL);

if (priv->layout)

{

g_object_unref (priv->layout);

priv->layout = NULL;

}

}

#if GTK_CHECK_VERSION(3,0,0)

static void

sp_ruler_get_preferred_width (GtkWidget *widget,

gint *minimum_width,

gint *natural_width)

{

GtkRequisition requisition;

sp_ruler_size_request (widget, &requisition);

*minimum_width = *natural_width = requisition.width;

}

static void

sp_ruler_get_preferred_height (GtkWidget *widget,

gint *minimum_height,

gint *natural_height)

{

GtkRequisition requisition;

sp_ruler_size_request(widget, &requisition);

*minimum_height = *natural_height = requisition.height;

}

#else

static gboolean

sp_ruler_expose (GtkWidget *widget,

GdkEventExpose *event)

{

cairo_t *cr = gdk_cairo_create(gtk_widget_get_window(widget));

GtkAllocation allocation;

gdk_cairo_region (cr, event->region);

cairo_clip (cr);

gtk_widget_get_allocation (widget, &allocation);

cairo_translate (cr, allocation.x, allocation.y);

gboolean result = sp_ruler_draw (widget, cr);

cairo_destroy (cr);

return result;

}

#endif

static gboolean

sp_ruler_draw (GtkWidget *widget,

cairo_t *cr)

{

SPRuler *ruler = SP_RULER (widget);

SPRulerPrivate *priv = SP_RULER_GET_PRIVATE (ruler);

sp_ruler_draw_ticks (ruler);

cairo_set_source_surface(cr, priv->backing_store, 0, 0);

cairo_paint(cr);

sp_ruler_draw_pos (ruler);

return FALSE;

}

static void

sp_ruler_make_pixmap (SPRuler *ruler)

{

GtkWidget *widget = GTK_WIDGET (ruler);

SPRulerPrivate *priv = SP_RULER_GET_PRIVATE (ruler);

GtkAllocation allocation;

gtk_widget_get_allocation(widget, &allocation);

if (priv->backing_store)

cairo_surface_destroy (priv->backing_store);

priv->backing_store =

gdk_window_create_similar_surface (gtk_widget_get_window (widget),

CAIRO_CONTENT_COLOR,

allocation.width,

allocation.height);

}

static void

sp_ruler_draw_pos (SPRuler *ruler)

{

GtkWidget *widget = GTK_WIDGET (ruler);

#if GTK_CHECK_VERSION(3,0,0)

GtkStyleContext *context = gtk_widget_get_style_context (widget);

GtkBorder border;

GdkRGBA color;

#else

GtkStyle *style = gtk_widget_get_style (widget);

GtkStateType state = gtk_widget_get_state (widget);

gint xthickness;

gint ythickness;

#endif

SPRulerPrivate *priv = SP_RULER_GET_PRIVATE (ruler);

GtkAllocation allocation;

gint x, y;

gint width, height;

gint bs_width, bs_height;

if (! gtk_widget_is_drawable (widget))

return;

gtk_widget_get_allocation(widget, &allocation);

#if GTK_CHECK_VERSION(3,0,0)

gtk_style_context_get_border (context, static_cast<GtkStateFlags>(0), &border);

#else

xthickness = style->xthickness;

ythickness = style->ythickness;

#endif

if (priv->orientation == GTK_ORIENTATION_HORIZONTAL)

{

width = allocation.width;

#if GTK_CHECK_VERSION(3,0,0)

height = allocation.height - (border.top + border.bottom);

#else

height = allocation.height - ythickness * 2;

#endif

bs_width = height / 2 + 2;

bs_width |= 1; /* make sure it's odd */

bs_height = bs_width / 2 + 1;

}

else

{

#if GTK_CHECK_VERSION(3,0,0)

width = allocation.width - (border.left + border.right);

#else

width = allocation.width - xthickness * 2;

#endif

height = allocation.height;

bs_height = width / 2 + 2;

bs_height |= 1; /* make sure it's odd */

bs_width = bs_height / 2 + 1;

}

if ((bs_width > 0) && (bs_height > 0))

{

cairo_t *cr = gdk_cairo_create (gtk_widget_get_window (widget));

gdouble lower;

gdouble upper;

gdouble position;

gdouble increment;

cairo_rectangle (cr,

allocation.x, allocation.y,

allocation.width, allocation.height);

cairo_clip (cr);

cairo_translate (cr, allocation.x, allocation.y);

/* If a backing store exists, restore the ruler */

if (priv->backing_store)

{

cairo_set_source_surface (cr, priv->backing_store, 0, 0);

cairo_rectangle (cr, priv->xsrc, priv->ysrc, bs_width, bs_height);

cairo_fill (cr);

}

position = sp_ruler_get_position (ruler);

sp_ruler_get_range (ruler, &lower, &upper, NULL);

if (priv->orientation == GTK_ORIENTATION_HORIZONTAL)

{

increment = (gdouble) width / (upper - lower);

#if GTK_CHECK_VERSION(3,0,0)

x = ROUND ((position - lower) * increment) + (border.left - bs_width) / 2 - 1;

y = (height + bs_height) / 2 + border.top;

#else

x = ROUND ((position - lower) * increment) + (xthickness - bs_width) / 2 - 1;

y = (height + bs_height) / 2 + ythickness;

#endif

}

else

{

increment = (gdouble) height / (upper - lower);

#if GTK_CHECK_VERSION(3,0,0)

x = (width + bs_width) / 2 + border.left;

y = ROUND ((position - lower) * increment) + (border.top - bs_height) / 2 - 1;

#else

x = (width + bs_width) / 2 + xthickness;

y = ROUND ((position - lower) * increment) + (ythickness - bs_height) / 2 - 1;

#endif

}

#if GTK_CHECK_VERSION(3,0,0)

gtk_style_context_get_color (context, gtk_widget_get_state_flags (widget),

&color);

gdk_cairo_set_source_rgba (cr, &color);

#else

gdk_cairo_set_source_color (cr, &style->fg[state]);

#endif

cairo_move_to (cr, x, y);

if (priv->orientation == GTK_ORIENTATION_HORIZONTAL)

{

cairo_line_to (cr, x + bs_width / 2.0, y + bs_height);

cairo_line_to (cr, x + bs_width, y);

}

else

{

cairo_line_to (cr, x + bs_width, y + bs_height / 2.0);

cairo_line_to (cr, x, y + bs_height);

}

cairo_fill (cr);

cairo_destroy (cr);

priv->xsrc = x;

priv->ysrc = y;

}

}

GtkWidget *

sp_ruler_new (GtkOrientation orientation)

{

return GTK_WIDGET (g_object_new (SP_TYPE_RULER,

"orientation", orientation,

NULL));

}

static void

sp_ruler_update_position (SPRuler *ruler,

gdouble x,

gdouble y)

{

SPRulerPrivate *priv = SP_RULER_GET_PRIVATE (ruler);

GtkAllocation allocation;

gdouble lower;

gdouble upper;

gtk_widget_get_allocation (GTK_WIDGET (ruler), &allocation);

sp_ruler_get_range (ruler, &lower, &upper, NULL);

if (priv->orientation == GTK_ORIENTATION_HORIZONTAL)

{

sp_ruler_set_position (ruler,

lower +

(upper - lower) * x / allocation.width);

}

else

{

sp_ruler_set_position (ruler,

lower +

(upper - lower) * y / allocation.height);

}

}

static gboolean

gtk_widget_get_translation_to_window (GtkWidget *widget,

GdkWindow *window,

int *x,

int *y)

{

GdkWindow *w, *widget_window;

if (! gtk_widget_get_has_window (widget))

{

GtkAllocation allocation;

gtk_widget_get_allocation (widget, &allocation);

*x = -allocation.x;

*y = -allocation.y;

}

else

{

*x = 0;

*y = 0;

}

widget_window = gtk_widget_get_window (widget);

for (w = window;

w && w != widget_window;

w = gdk_window_get_effective_parent (w))

{

gdouble px, py;

gdk_window_coords_to_parent (w, *x, *y, &px, &py);

*x += px;

*y += px;

}

if (w == NULL)

{

*x = 0;

*y = 0;

return FALSE;

}

return TRUE;

}

static void

sp_ruler_event_to_widget_coords (GtkWidget *widget,

GdkWindow *window,

gdouble event_x,

gdouble event_y,

gint *widget_x,

gint *widget_y)

{

gint tx, ty;

if (gtk_widget_get_translation_to_window (widget, window, &tx, &ty))

{

event_x += tx;

event_y += ty;

}

*widget_x = event_x;

*widget_y = event_y;

}

static gboolean

sp_ruler_track_widget_motion_notify (GtkWidget *widget,

GdkEventMotion *mevent,

SPRuler *ruler)

{

gint widget_x;

gint widget_y;

gint ruler_x;

gint ruler_y;

widget = gtk_get_event_widget (reinterpret_cast<GdkEvent *>(mevent));

sp_ruler_event_to_widget_coords (widget, mevent->window,

mevent->x, mevent->y,

&widget_x, &widget_y);

if (gtk_widget_translate_coordinates (widget, GTK_WIDGET (ruler),

widget_x, widget_y,

&ruler_x, &ruler_y))

{

sp_ruler_update_position (ruler, ruler_x, ruler_y);

}

return FALSE;

}

sp_ruler_add_track_widget (SPRuler *ruler,

GtkWidget *widget)

{

SPRulerPrivate *priv;

g_return_if_fail (SP_IS_RULER (ruler));

g_return_if_fail (GTK_IS_WIDGET (ruler));

priv = SP_RULER_GET_PRIVATE (ruler);

g_return_if_fail (g_list_find (priv->track_widgets, widget) == NULL);

priv->track_widgets = g_list_prepend (priv->track_widgets, widget);

g_signal_connect (widget, "motion-notify-event",

G_CALLBACK (sp_ruler_track_widget_motion_notify),

ruler);

g_signal_connect (widget, "destroy",

G_CALLBACK (sp_ruler_remove_track_widget),

ruler);

}

sp_ruler_remove_track_widget (SPRuler *ruler,

GtkWidget *widget)

{

SPRulerPrivate *priv;

g_return_if_fail (SP_IS_RULER (ruler));

g_return_if_fail (GTK_IS_WIDGET (ruler));

priv = SP_RULER_GET_PRIVATE (ruler);

g_return_if_fail (g_list_find (priv->track_widgets, widget) != NULL);

priv->track_widgets = g_list_remove (priv->track_widgets, widget);

g_signal_handlers_disconnect_by_func (widget,

(gpointer) G_CALLBACK (sp_ruler_track_widget_motion_notify),

ruler);

g_signal_handlers_disconnect_by_func (widget,

(gpointer) G_CALLBACK (sp_ruler_remove_track_widget),

ruler);

}

sp_ruler_set_unit (SPRuler *ruler,

SPMetric unit)

{

SPRulerPrivate *priv = SP_RULER_GET_PRIVATE (ruler);

g_return_if_fail (SP_IS_RULER (ruler));

if (priv->unit != unit)

{

priv->unit = unit;

g_object_notify(G_OBJECT(ruler), "unit");

gtk_widget_queue_draw (GTK_WIDGET (ruler));

}

}

sp_ruler_get_unit (SPRuler *ruler)

{

g_return_val_if_fail(SP_IS_RULER(ruler), static_cast<SPMetric>(0));

return SP_RULER_GET_PRIVATE (ruler)->unit;

}

sp_ruler_set_position (SPRuler *ruler,

gdouble position)

{

SPRulerPrivate *priv;

g_return_if_fail (SP_IS_RULER (ruler));

priv = SP_RULER_GET_PRIVATE (ruler);

if (priv->position != position)

{

priv->position = position;

g_object_notify (G_OBJECT (ruler), "position");

sp_ruler_draw_pos (ruler);

}

}

sp_ruler_get_position (SPRuler *ruler)

{

g_return_val_if_fail (SP_IS_RULER (ruler), 0.0);

return SP_RULER_GET_PRIVATE (ruler)->position;

}

static gboolean

sp_ruler_motion_notify (GtkWidget *widget,

GdkEventMotion *event)

{

SPRuler *ruler = SP_RULER(widget);

sp_ruler_update_position (ruler, event->x, event->y);

return FALSE;

}

static void

sp_ruler_draw_ticks (SPRuler *ruler)

{

GtkWidget *widget = GTK_WIDGET (ruler);

#if GTK_CHECK_VERSION(3,0,0)

GtkStyleContext *context = gtk_widget_get_style_context (widget);

GtkBorder border;

GdkRGBA color;

#else

GtkStyle *style = gtk_widget_get_style (widget);

GtkStateType state = gtk_widget_get_state (widget);

gint xthickness;

gint ythickness;

#endif

SPRulerPrivate *priv = SP_RULER_GET_PRIVATE (ruler);

GtkAllocation allocation;

cairo_t *cr;

gint i;

gint width, height;

gint length, ideal_length;

gdouble lower, upper; /* Upper and lower limits, in ruler units */

gdouble increment; /* Number of pixels per unit */

guint scale; /* Number of units per major unit */

gdouble start, end, cur;

gchar unit_str[32];

gint digit_height;

gint digit_offset;

gchar digit_str[2] = { '\0', '\0' };

gint text_size;

gint pos;

gdouble max_size;

SPMetric unit;

SPRulerMetric ruler_metric = ruler_metric_general; /* The metric to use for this unit system */

PangoLayout *layout;

PangoRectangle logical_rect, ink_rect;

if (! gtk_widget_is_drawable (widget))

return;

gtk_widget_get_allocation (widget, &allocation);

#if GTK_CHECK_VERSION(3,0,0)

gtk_style_context_get_border (context, static_cast<GtkStateFlags>(0), &border);

#else

xthickness = style->xthickness;

ythickness = style->ythickness;

#endif

layout = sp_ruler_get_layout (widget, "0123456789");

pango_layout_get_extents (layout, &ink_rect, &logical_rect);

digit_height = PANGO_PIXELS (ink_rect.height) + 2;

digit_offset = ink_rect.y;

if (priv->orientation == GTK_ORIENTATION_HORIZONTAL)

{

width = allocation.width;

#if GTK_CHECK_VERSION(3,0,0)

height = allocation.height - (border.top + border.bottom);

#else

height = allocation.height - ythickness * 2;

#endif

}

else

{

width = allocation.height;

#if GTK_CHECK_VERSION(3,0,0)

height = allocation.width - (border.top + border.bottom);

#else

height = allocation.width - ythickness * 2;

#endif

}

cr = cairo_create (priv->backing_store);

#if GTK_CHECK_VERSION(3,0,0)

gtk_render_background (context, cr, 0, 0, allocation.width, allocation.height);

gtk_render_frame (context, cr, 0, 0, allocation.width, allocation.height);

gtk_style_context_get_color (context, gtk_widget_get_state_flags (widget),

&color);

gdk_cairo_set_source_rgba (cr, &color);

if (priv->orientation == GTK_ORIENTATION_HORIZONTAL)

{

cairo_rectangle (cr,

border.left,

height + border.top,

allocation.width - (border.left + border.right),

1);

}

else

{

cairo_rectangle (cr,

height + border.left,

border.top,

1,

allocation.height - (border.top + border.bottom));

}

#else

gdk_cairo_set_source_color (cr, &style->bg[state]);

cairo_paint (cr);

gdk_cairo_set_source_color(cr, &style->fg[state]);

if (priv->orientation == GTK_ORIENTATION_HORIZONTAL)

{

cairo_rectangle (cr,

xthickness,

height + ythickness,

allocation.width - 2 * xthickness,

1);

}

else

{

cairo_rectangle (cr,

height + xthickness,

ythickness,

1,

allocation.height - 2 * ythickness);

}

#endif

sp_ruler_get_range (ruler, &lower, &upper, &max_size);

if ((upper - lower) == 0)

goto out;

increment = (gdouble) width / (upper - lower);

/* determine the scale

scale = ceil (priv->max_size);

sprintf (unit_str, "%d", scale);

text_size = strlen (unit_str) * digit_height + 1;

/* Inkscape change to ruler: Use a 1,2,4,8... scale for inches

if (sp_ruler_get_unit (ruler) == SP_IN)

ruler_metric = ruler_metric_inches;

for (scale = 0; scale < G_N_ELEMENTS (ruler_metric.ruler_scale); scale++)

if (ruler_metric.ruler_scale[scale] * fabs (increment) > 2 * text_size)

break;

if (scale == G_N_ELEMENTS (ruler_metric.ruler_scale))

scale = G_N_ELEMENTS (ruler_metric.ruler_scale) - 1;

unit = sp_ruler_get_unit (ruler);

/* drawing starts here */

length = 0;

for (i = G_N_ELEMENTS (ruler_metric.subdivide) - 1; i >= 0; i--)

{

gdouble subd_incr;

/* hack to get proper subdivisions at full pixels */

if (unit == SP_PX && scale == 1 && i == 1)

subd_incr = 1.0;

else

subd_incr = ((gdouble) ruler_metric.ruler_scale[scale] /

(gdouble) ruler_metric.subdivide[i]);

if (subd_incr * fabs (increment) <= MINIMUM_INCR)

continue;

/* Calculate the length of the tickmarks. Make sure that

ideal_length = height / (i + 1) - 1;

if (ideal_length > ++length)

length = ideal_length;

if (lower < upper)

{

start = floor (lower / subd_incr) * subd_incr;

end = ceil (upper / subd_incr) * subd_incr;

}

else

{

start = floor (upper / subd_incr) * subd_incr;

end = ceil (lower / subd_incr) * subd_incr;

}

gint tick_index = 0;

for (cur = start; cur <= end; cur += subd_incr)

{

// due to the typical values for cur, lower and increment, pos will often end up to

// be e.g. 641.50000000000; rounding behaviour is not defined in such a case (see round.h)

// and jitter will be apparent (upon redrawing some of the lines on the ruler might jump a

// by a pixel, and jump back on the next redraw). This is suppressed by adding 1e-9 (that's only one nanopixel ;-))

pos = gint(Inkscape::round((cur - lower) * increment + 1e-12));

#if GTK_CHECK_VERSION(3,0,0)

if (priv->orientation == GTK_ORIENTATION_HORIZONTAL)

{

cairo_rectangle (cr,

pos, height + border.top - length,

1, length);

}

else

{

cairo_rectangle (cr,

height + border.left - length, pos,

length, 1);

}

#else

if (priv->orientation == GTK_ORIENTATION_HORIZONTAL)

{

cairo_rectangle (cr,

pos, height + ythickness - length,

1, length);

}

else

{

cairo_rectangle (cr,

height + xthickness - length, pos,

length, 1);

}

#endif

/* draw label */

double label_spacing_px = fabs(increment*(double)ruler_metric.ruler_scale[scale]/ruler_metric.subdivide[i]);

if (i == 0 &&

(label_spacing_px > 6*digit_height || tick_index%2 == 0 || cur == 0) &&

(label_spacing_px > 3*digit_height || tick_index%4 == 0 || cur == 0))

{

if (fabs((int)cur) >= 2000 && (((int) cur)/1000)*1000 == ((int) cur))

sprintf (unit_str, "%dk", ((int) cur)/1000);

else

sprintf (unit_str, "%d", (int) cur);

if (priv->orientation == GTK_ORIENTATION_HORIZONTAL)

{

pango_layout_set_text (layout, unit_str, -1);

pango_layout_get_extents (layout, &logical_rect, NULL);

#if GTK_CHECK_VERSION(3,0,0)

cairo_move_to (cr,

pos + 2,

border.top + PANGO_PIXELS (logical_rect.y - digit_offset));

#else

cairo_move_to (cr,

pos + 2,

ythickness + PANGO_PIXELS (logical_rect.y - digit_offset));

#endif

pango_cairo_show_layout(cr, layout);

}

else

{

gint j;

for (j = 0; j < (int) strlen (unit_str); j++)

{

digit_str[0] = unit_str[j];

pango_layout_set_text (layout, digit_str, 1);

pango_layout_get_extents (layout, NULL, &logical_rect);

#if GTK_CHECK_VERSION(3,0,0)

cairo_move_to (cr,

border.left + 1,

pos + digit_height * j + 2 + PANGO_PIXELS (logical_rect.y - digit_offset));

#else

cairo_move_to (cr,

xthickness + 1,

pos + digit_height * j + 2 + PANGO_PIXELS (logical_rect.y - digit_offset));

#endif

pango_cairo_show_layout (cr, layout);

}

}

}

++tick_index;

}

}

cairo_fill (cr);

out:

cairo_destroy (cr);

}

static PangoLayout*

sp_ruler_create_layout (GtkWidget *widget,

const gchar *text)

{

SPRulerPrivate *priv = SP_RULER_GET_PRIVATE (widget);

PangoLayout *layout;

PangoAttrList *attrs;

PangoAttribute *attr;

layout = gtk_widget_create_pango_layout (widget, text);

attrs = pango_attr_list_new ();

attr = pango_attr_scale_new (priv->font_scale);

attr->start_index = 0;

attr->end_index = -1;

pango_attr_list_insert (attrs, attr);

pango_layout_set_attributes (layout, attrs);

pango_attr_list_unref (attrs);

return layout;

}

static PangoLayout *

sp_ruler_get_layout (GtkWidget *widget,

const gchar *text)

{

SPRulerPrivate *priv = SP_RULER_GET_PRIVATE (widget);

if (priv->layout)

{

pango_layout_set_text (priv->layout, text, -1);

return priv->layout;

}

priv->layout = sp_ruler_create_layout (widget, text);

return priv->layout;

}