#ifdef HAVE_CONFIG_H

# include "config.h"

#endif

#include "dash-selector.h"

#include <cstring>

#include <string>

#include <glibmm/i18n.h>

#include <gtkmm/adjustment.h>

#include <2geom/coord.h>

#include "style.h"

#include "dialogs/dialog-events.h"

#include "preferences.h"

#include "ui/widget/spinbutton.h"

#include "display/cairo-utils.h"

gchar const *const SPDashSelector::_prefs_path = "/palette/dashes";

static double dash_0[] = {-1.0};

static double dash_1_1[] = {1.0, 1.0, -1.0};

static double dash_2_1[] = {2.0, 1.0, -1.0};

static double dash_4_1[] = {4.0, 1.0, -1.0};

static double dash_1_2[] = {1.0, 2.0, -1.0};

static double dash_1_4[] = {1.0, 4.0, -1.0};

static double *builtin_dashes[] = {dash_0, dash_1_1, dash_2_1, dash_4_1, dash_1_2, dash_1_4, NULL};

static double **dashes = NULL;

SPDashSelector::SPDashSelector()

: preview_width(80),

preview_height(16),

preview_lineheight(2)

{

// TODO: find something more sensible here!!

init_dashes();

dash_store = Gtk::ListStore::create(dash_columns);

dash_combo.set_model(dash_store);

dash_combo.pack_start(image_renderer);

dash_combo.set_cell_data_func(image_renderer, sigc::mem_fun(*this, &SPDashSelector::prepareImageRenderer));

dash_combo.set_tooltip_text(_("Dash pattern"));

dash_combo.show();

dash_combo.signal_changed().connect( sigc::mem_fun(*this, &SPDashSelector::on_selection) );

this->pack_start(dash_combo, false, false, 0);

offset = new Gtk::Adjustment(0.0, 0.0, 10.0, 0.1, 1.0, 0.0);

offset->signal_value_changed().connect(sigc::mem_fun(*this, &SPDashSelector::offset_value_changed));

Inkscape::UI::Widget::SpinButton *sb = new Inkscape::UI::Widget::SpinButton(*offset, 0.1, 2);

sb->set_tooltip_text(_("Pattern offset"));

sp_dialog_defocus_on_enter_cpp(sb);

sb->show();

this->pack_start(*sb, false, false, 0);

for (int i = 0; dashes[i]; i++) {

// Add the dashes to the combobox

Gtk::TreeModel::Row row = *(dash_store->append());

row[dash_columns.dash] = dashes[i];

row[dash_columns.pixbuf] = Glib::wrap(sp_dash_to_pixbuf(dashes[i]));

}

this->set_data("pattern", dashes[0]);

}

SPDashSelector::~SPDashSelector() {

// FIXME: for some reason this doesn't get called; does the call to manage() in

// sp_stroke_style_line_widget_new() not processed correctly?

delete offset;

}

void SPDashSelector::prepareImageRenderer( Gtk::TreeModel::const_iterator const &row ) {

Glib::RefPtr<Gdk::Pixbuf> pixbuf = (*row)[dash_columns.pixbuf];

image_renderer.property_pixbuf() = pixbuf;

}

void SPDashSelector::init_dashes() {

if (!dashes) {

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

std::vector<Glib::ustring> dash_prefs = prefs->getAllDirs(_prefs_path);

if (!dash_prefs.empty()) {

int pos = 0;

SPStyle *style = sp_style_new (NULL);

dashes = g_new (double *, dash_prefs.size() + 1);

for (std::vector<Glib::ustring>::iterator i = dash_prefs.begin(); i != dash_prefs.end(); ++i) {

sp_style_read_from_prefs(style, *i);

if (style->stroke_dash.n_dash > 0) {

dashes[pos] = g_new (double, style->stroke_dash.n_dash + 1);

double *d = dashes[pos];

int i = 0;

for (; i < style->stroke_dash.n_dash; i++) {

d[i] = style->stroke_dash.dash[i];

}

d[i] = -1;

} else {

dashes[pos] = dash_0;

}

pos += 1;

}

dashes[pos] = NULL;

} else {

dashes = builtin_dashes;

}

}

}

void SPDashSelector::set_dash (int ndash, double *dash, double o)

{

int pos = 0;

if (ndash > 0) {

double delta = 0.0;

for (int i = 0; i < ndash; i++)

delta += dash[i];

delta /= 1000.0;

for (int i = 0; dashes[i]; i++) {

double *pattern = dashes[i];

int np = 0;

while (pattern[np] >= 0.0)

np += 1;

if (np == ndash) {

int j;

for (j = 0; j < ndash; j++) {

if (!Geom::are_near(dash[j], pattern[j], delta))

break;

}

if (j == ndash) {

pos = i;

break;

}

}

}

}

this->set_data("pattern", dashes[pos]);

this->dash_combo.set_active(pos);

this->offset->set_value(o);

}

void SPDashSelector::get_dash(int *ndash, double **dash, double *off)

{

double *pattern = (double*) this->get_data("pattern");

int nd = 0;

while (pattern[nd] >= 0.0)

nd += 1;

if (nd > 0) {

if (ndash)

*ndash = nd;

if (dash) {

*dash = g_new (double, nd);

memcpy (*dash, pattern, nd * sizeof (double));

}

if (off)

*off = offset->get_value();

} else {

if (ndash)

*ndash = 0;

if (dash)

*dash = NULL;

if (off)

*off = 0.0;

}

}

GdkPixbuf* SPDashSelector::sp_dash_to_pixbuf(double *pattern) {

int n_dashes;

for (n_dashes = 0; pattern[n_dashes] >= 0.0; n_dashes ++) ;

cairo_surface_t *s = cairo_image_surface_create(CAIRO_FORMAT_ARGB32, preview_width, preview_height);

cairo_t *ct = cairo_create(s);

cairo_set_line_width (ct, preview_lineheight);

cairo_scale (ct, preview_lineheight, 1);

//cairo_set_source_rgb (ct, 0, 0, 0);

cairo_move_to (ct, 0, preview_height/2);

cairo_line_to (ct, preview_width, preview_height/2);

cairo_set_dash(ct, pattern, n_dashes, 0);

cairo_stroke (ct);

cairo_destroy(ct);

cairo_surface_flush(s);

GdkPixbuf* pixbuf = gdk_pixbuf_new_from_data( cairo_image_surface_get_data(s),

GDK_COLORSPACE_RGB, TRUE, 8,

preview_width, preview_height, cairo_image_surface_get_stride(s),

ink_cairo_pixbuf_cleanup, s);

convert_pixbuf_argb32_to_normal(pixbuf);

return pixbuf;

}

void SPDashSelector::on_selection ()

{

double *pattern = dash_combo.get_active()->get_value(dash_columns.dash);

this->set_data ("pattern", pattern);

changed_signal.emit();

}

void SPDashSelector::offset_value_changed()

{

changed_signal.emit();

}