#include <cstring>

#include <cmath>

#include <cstdio>

#include "widget-sizes.h"

#include "desktop-widget.h"

#include "ruler.h"

#include "unit-constants.h"

#include "round.h"

#include <glibmm/i18n.h>

#define GTK_PARAM_READWRITE G_PARAM_READWRITE|G_PARAM_STATIC_NAME|G_PARAM_STATIC_NICK|G_PARAM_STATIC_BLURB

#define MINIMUM_INCR 5

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

typedef struct

{

GtkOrientation orientation;

gdouble lower;

gdouble upper;

gdouble position;

gdouble max_size;

GdkWindow *input_window;

cairo_surface_t *backing_store;

PangoLayout *layout;

SPRulerMetric *metric;

gint xsrc;

gint ysrc;

} SPRulerPrivate;

enum {

PROP_0,

PROP_ORIENTATION,

PROP_LOWER,

PROP_UPPER,

PROP_POSITION,

PROP_MAX_SIZE,

PROP_METRIC

};

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_request (GtkWidget *widget,

GtkRequisition *requisition);

#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);

#endif

static void sp_ruler_size_allocate (GtkWidget *widget,

GtkAllocation *allocation);

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);

#define SP_RULER_GET_PRIVATE(obj) (G_TYPE_INSTANCE_GET_PRIVATE ((obj), SP_TYPE_RULER, SPRulerPrivate))

static SPRulerMetric const sp_ruler_metrics[] = {

// NOTE: the order of records in this struct must correspond to the SPMetric enum.

{1, { 1, 2, 5, 10, 25, 50, 100, 250, 500, 1000 }, { 1, 5, 10, 50, 100 }}, // SP_NONE

{PX_PER_MM, { 1, 2, 5, 10, 25, 50, 100, 250, 500, 1000 }, { 1, 5, 10, 50, 100 }}, // SP_MM

{PX_PER_CM, { 1, 2, 5, 10, 25, 50, 100, 250, 500, 1000 }, { 1, 5, 10, 50, 100 }}, // SP_CM

{PX_PER_IN, { 1, 2, 4, 8, 16, 32, 64, 128, 256, 512 }, { 1, 2, 4, 8, 16 }}, // SP_IN

{PX_PER_FT, { 1, 2, 5, 10, 25, 50, 100, 250, 500, 1000 }, { 1, 5, 10, 50, 100 }}, // SP_FT

{PX_PER_PT, { 1, 2, 5, 10, 25, 50, 100, 250, 500, 1000 }, { 1, 5, 10, 50, 100 }}, // SP_PT

{PX_PER_PC, { 1, 2, 5, 10, 25, 50, 100, 250, 500, 1000 }, { 1, 5, 10, 50, 100 }}, // SP_PC

{PX_PER_PX, { 1, 2, 5, 10, 25, 50, 100, 250, 500, 1000 }, { 1, 5, 10, 50, 100 }}, // SP_PX

{PX_PER_M, { 1, 2, 5, 10, 25, 50, 100, 250, 500, 1000 }, { 1, 5, 10, 50, 100 }}, // SP_M

};

G_DEFINE_TYPE_WITH_CODE (SPRuler, sp_ruler, GTK_TYPE_WIDGET,

G_IMPLEMENT_INTERFACE (GTK_TYPE_ORIENTABLE,

NULL))

static void

sp_ruler_class_init (SPRulerClass *klass)

{

GObjectClass *object_class = G_OBJECT_CLASS (klass);

GtkWidgetClass *widget_class = GTK_WIDGET_CLASS (klass);

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->draw = sp_ruler_draw;

#else

widget_class->size_request = sp_ruler_size_request;

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_override_property (object_class,

PROP_ORIENTATION,

"orientation");

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)));

/**

g_object_class_install_property (object_class,

PROP_METRIC,

g_param_spec_uint("metric",

_("Metric"),

_("The metric used for the ruler"),

0, 8,

SP_PX,

static_cast<GParamFlags>(GTK_PARAM_READWRITE)));

}

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->xsrc = 0;

priv->ysrc = 0;

priv->lower = 0;

priv->upper = 0;

priv->position = 0;

priv->max_size = 0;

priv->backing_store = NULL;

sp_ruler_set_metric(ruler, SP_PX);

}

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_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;

case PROP_METRIC:

sp_ruler_set_metric (ruler, static_cast<SPMetric>(g_value_get_enum (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_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;

case PROP_METRIC:

g_value_set_enum(value, sp_ruler_get_metric(ruler));

break;

default:

G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);

break;

}

}

SPMetric sp_ruler_get_metric(SPRuler *ruler)

{

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

SPRulerPrivate *priv = SP_RULER_GET_PRIVATE (ruler);

for (size_t i = 0; i < G_N_ELEMENTS(sp_ruler_metrics); i++) {

if (priv->metric == &sp_ruler_metrics[i]) {

return static_cast<SPMetric>(i);

}

}

g_assert_not_reached ();

return static_cast<SPMetric>(0);

}

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

}

}

#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);

}

}

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;

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);

upper /= priv->metric->pixels_per_unit; // upper and lower are expressed in ruler units

lower /= priv->metric->pixels_per_unit;

/* "pixels_per_unit" should be "points_per_unit". This is the size of the unit

if ((upper - lower) == 0)

goto out;

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

/* determine the scale

scale = (gint)(ceil(priv->max_size / priv->metric->pixels_per_unit));

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

text_size = strlen (unit_str) * digit_height + 1;

for (scale = 0; scale < G_N_ELEMENTS (priv->metric->ruler_scale); scale++)

if (priv->metric->ruler_scale[scale] * fabs (increment) > 2 * text_size)

break;

if (scale == G_N_ELEMENTS (priv->metric->ruler_scale))

scale = G_N_ELEMENTS (priv->metric->ruler_scale) - 1;

/* drawing starts here */

length = 0;

for (i = G_N_ELEMENTS (priv->metric->subdivide) - 1; i >= 0; i--)

{

gdouble subd_incr = ((gdouble) priv->metric->ruler_scale[scale] /

(gdouble) priv->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)priv->metric->ruler_scale[scale])/priv->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);

}

sp_ruler_set_metric (SPRuler *ruler,

SPMetric metric)

{

g_return_if_fail(ruler != NULL);

g_return_if_fail(SP_IS_RULER (ruler));

g_return_if_fail((unsigned) metric < G_N_ELEMENTS(sp_ruler_metrics));

SPRulerPrivate *priv = SP_RULER_GET_PRIVATE (ruler);

if (metric == 0)

return;

priv->metric = const_cast<SPRulerMetric *>(&sp_ruler_metrics[metric]);

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

gtk_widget_queue_draw (GTK_WIDGET (ruler));

}

static PangoLayout*

sp_ruler_create_layout (GtkWidget *widget,

const gchar *text)

{

PangoLayout *layout;

PangoAttrList *attrs;

PangoAttribute *attr;

layout = gtk_widget_create_pango_layout (widget, text);

attrs = pango_attr_list_new ();

attr = pango_attr_scale_new (PANGO_SCALE_X_SMALL);

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;

}