src/gradient-chemistry.cpp

   1 /*
   2  * Various utility methods for gradients
   3  *
   4  * Authors:
   5  *   Lauris Kaplinski <lauris@kaplinski.com>
   6  *   bulia byak
   7  *   Johan Engelen <j.b.c.engelen@ewi.utwente.nl>
   8  *   Jon A. Cruz <jon@joncruz.org>
   9  *
  10  * Copyright (C) 2010 Authors
  11  * Copyright (C) 2007 Johan Engelen
  12  * Copyright (C) 2001-2005 authors
  13  * Copyright (C) 2001 Ximian, Inc.
  14  *
  15  * Released under GNU GPL, read the file 'COPYING' for more information
  16  */
  17
  18
  19 #include "style.h"
  20 #include "document-private.h"
  21 #include "desktop-style.h"
  22
  23 #include "sp-gradient-reference.h"
  24 #include "sp-gradient-vector.h"
  25 #include "sp-linear-gradient.h"
  26 #include "sp-radial-gradient.h"
  27 #include "sp-stop.h"
  28 #include "widgets/gradient-vector.h"
  29
  30 #include "sp-text.h"
  31 #include "sp-tspan.h"
  32 #include <libnr/nr-matrix-fns.h>
  33 #include <libnr/nr-point-fns.h>
  34 #include <libnr/nr-matrix-ops.h>
  35 #include <libnr/nr-rotate-ops.h>
  36 #include <2geom/transforms.h>
  37 #include "xml/repr.h"
  38 #include "svg/svg.h"
  39 #include "svg/svg-color.h"
  40 #include "svg/css-ostringstream.h"
  41 #include "preferences.h"
  42
  43
  44 // Terminology:
  45 //
  46 // "vector" is a gradient that has stops but not position coords. It can be referenced by one or
  47 // more privates. Objects should not refer to it directly. It has no radial/linear distinction.
  48 //
  49 // "private" is a gradient that has no stops but has position coords (e.g. center, radius etc for a
  50 // radial). It references a vector for the actual colors. Each private is only used by one
  51 // object. It is either linear or radial.
  52
  53 static void sp_gradient_repr_set_link(Inkscape::XML::Node *repr, SPGradient *gr);
  54
  55 SPGradient *
  56 sp_gradient_ensure_vector_normalized(SPGradient *gr)
  57 {
  58     g_return_val_if_fail(gr != NULL, NULL);
  59     g_return_val_if_fail(SP_IS_GRADIENT(gr), NULL);
  60
  61     /* If we are already normalized vector, just return */
  62     if (gr->state == SP_GRADIENT_STATE_VECTOR) return gr;
  63     /* Fail, if we have wrong state set */
  64     if (gr->state != SP_GRADIENT_STATE_UNKNOWN) {
  65         g_warning("file %s: line %d: Cannot normalize private gradient to vector (%s)", __FILE__, __LINE__, gr->getId());
  66         return NULL;
  67     }
  68
  69     /* First make sure we have vector directly defined (i.e. gr has its own stops) */
  70     if ( !gr->hasStops() ) {
  71         /* We do not have stops ourselves, so flatten stops as well */
  72         gr->ensureVector();
  73         g_assert(gr->vector.built);
  74         // this adds stops from gr->vector as children to gr
  75         sp_gradient_repr_write_vector (gr);
  76     }
  77
  78     /* If gr hrefs some other gradient, remove the href */
  79     if (gr->ref->getObject()) {
  80         /* We are hrefing someone, so require flattening */
  81         SP_OBJECT(gr)->updateRepr(SP_OBJECT_WRITE_EXT | SP_OBJECT_WRITE_ALL);
  82         sp_gradient_repr_set_link(SP_OBJECT_REPR(gr), NULL);
  83     }
  84
  85     /* Everything is OK, set state flag */
  86     gr->state = SP_GRADIENT_STATE_VECTOR;
  87     return gr;
  88 }
  89
  90 /**
  91  * Creates new private gradient for the given vector
  92  */
  93
  94 static SPGradient *
  95 sp_gradient_get_private_normalized(SPDocument *document, SPGradient *vector, SPGradientType type)
  96 {
  97     g_return_val_if_fail(document != NULL, NULL);
  98     g_return_val_if_fail(vector != NULL, NULL);
  99     g_return_val_if_fail(SP_IS_GRADIENT(vector), NULL);
 100     g_return_val_if_fail(vector->hasStops(), NULL);
 101
 102     SPDefs *defs = (SPDefs *) SP_DOCUMENT_DEFS(document);
 103
 104     Inkscape::XML::Document *xml_doc = sp_document_repr_doc(document);
 105     // create a new private gradient of the requested type
 106     Inkscape::XML::Node *repr;
 107     if (type == SP_GRADIENT_TYPE_LINEAR) {
 108         repr = xml_doc->createElement("svg:linearGradient");
 109     } else {
 110         repr = xml_doc->createElement("svg:radialGradient");
 111     }
 112
 113     // privates are garbage-collectable
 114     repr->setAttribute("inkscape:collect", "always");
 115
 116     // link to vector
 117     sp_gradient_repr_set_link(repr, vector);
 118
 119     /* Append the new private gradient to defs */
 120     SP_OBJECT_REPR(defs)->appendChild(repr);
 121     Inkscape::GC::release(repr);
 122
 123     // get corresponding object
 124     SPGradient *gr = (SPGradient *) document->getObjectByRepr(repr);
 125     g_assert(gr != NULL);
 126     g_assert(SP_IS_GRADIENT(gr));
 127
 128     return gr;
 129 }
 130
 131 /**
 132 Count how many times gr is used by the styles of o and its descendants
 133 */
 134 guint
 135 count_gradient_hrefs(SPObject *o, SPGradient *gr)
 136 {
 137     if (!o)
 138         return 1;
 139
 140     guint i = 0;
 141
 142     SPStyle *style = SP_OBJECT_STYLE(o);
 143     if (style
 144         && style->fill.isPaintserver()
 145         && SP_IS_GRADIENT(SP_STYLE_FILL_SERVER(style))
 146         && SP_GRADIENT(SP_STYLE_FILL_SERVER(style)) == gr)
 147     {
 148         i ++;
 149     }
 150     if (style
 151         && style->stroke.isPaintserver()
 152         && SP_IS_GRADIENT(SP_STYLE_STROKE_SERVER(style))
 153         && SP_GRADIENT(SP_STYLE_STROKE_SERVER(style)) == gr)
 154     {
 155         i ++;
 156     }
 157
 158     for (SPObject *child = o->first_child();
 159          child != NULL; child = SP_OBJECT_NEXT(child)) {
 160         i += count_gradient_hrefs(child, gr);
 161     }
 162
 163     return i;
 164 }
 165
 166
 167 /**
 168  * If gr has other users, create a new private; also check if gr links to vector, relink if not
 169  */
 170 SPGradient *
 171 sp_gradient_fork_private_if_necessary(SPGradient *gr, SPGradient *vector,
 172                                       SPGradientType type, SPObject *o)
 173 {
 174     g_return_val_if_fail(gr != NULL, NULL);
 175     g_return_val_if_fail(SP_IS_GRADIENT(gr), NULL);
 176
 177     // Orphaned gradient, no vector with stops at the end of the line; this used to be an assert
 178     // but i think we should not abort on this - maybe just write a validity warning into some sort
 179     // of log
 180     if ( !vector || !vector->hasStops() ) {
 181         return (gr);
 182     }
 183
 184     // user is the object that uses this gradient; normally it's item but for tspans, we
 185     // check its ancestor text so that tspans don't get different gradients from their
 186     // texts.
 187     SPObject *user = o;
 188     while (SP_IS_TSPAN(user)) {
 189         user = SP_OBJECT_PARENT(user);
 190     }
 191
 192     // Check the number of uses of the gradient within this object;
 193     // if we are private and there are no other users,
 194     if (!vector->isSwatch() && (SP_OBJECT_HREFCOUNT(gr) <= count_gradient_hrefs(user, gr))) {
 195         // check vector
 196         if ( gr != vector && gr->ref->getObject() != vector ) {
 197             /* our href is not the vector, and vector is different from gr; relink */
 198             sp_gradient_repr_set_link(SP_OBJECT_REPR(gr), vector);
 199         }
 200         return gr;
 201     }
 202
 203     SPDocument *doc = SP_OBJECT_DOCUMENT(gr);
 204     SPObject *defs = SP_DOCUMENT_DEFS(doc);
 205
 206     if ((gr->hasStops()) ||
 207         (gr->state != SP_GRADIENT_STATE_UNKNOWN) ||
 208         (SP_OBJECT_PARENT(gr) != SP_OBJECT(defs)) ||
 209         (SP_OBJECT_HREFCOUNT(gr) > 1)) {
 210         // we have to clone a fresh new private gradient for the given vector
 211
 212         // create an empty one
 213         SPGradient *gr_new = sp_gradient_get_private_normalized(doc, vector, type);
 214
 215         // copy all the attributes to it
 216         Inkscape::XML::Node *repr_new = SP_OBJECT_REPR(gr_new);
 217         Inkscape::XML::Node *repr = SP_OBJECT_REPR(gr);
 218         repr_new->setAttribute("gradientUnits", repr->attribute("gradientUnits"));
 219         repr_new->setAttribute("gradientTransform", repr->attribute("gradientTransform"));
 220         repr_new->setAttribute("spreadMethod", repr->attribute("spreadMethod"));
 221         if (SP_IS_RADIALGRADIENT(gr)) {
 222             repr_new->setAttribute("cx", repr->attribute("cx"));
 223             repr_new->setAttribute("cy", repr->attribute("cy"));
 224             repr_new->setAttribute("fx", repr->attribute("fx"));
 225             repr_new->setAttribute("fy", repr->attribute("fy"));
 226             repr_new->setAttribute("r", repr->attribute("r"));
 227         } else {
 228             repr_new->setAttribute("x1", repr->attribute("x1"));
 229             repr_new->setAttribute("y1", repr->attribute("y1"));
 230             repr_new->setAttribute("x2", repr->attribute("x2"));
 231             repr_new->setAttribute("y2", repr->attribute("y2"));
 232         }
 233
 234         return gr_new;
 235     } else {
 236         return gr;
 237     }
 238 }
 239
 240 SPGradient *
 241 sp_gradient_fork_vector_if_necessary (SPGradient *gr)
 242 {
 243     // Some people actually prefer their gradient vectors to be shared...
 244     Inkscape::Preferences *prefs = Inkscape::Preferences::get();
 245     if (!prefs->getBool("/options/forkgradientvectors/value", true))
 246         return gr;
 247
 248     if (SP_OBJECT_HREFCOUNT(gr) > 1) {
 249         SPDocument *doc = SP_OBJECT_DOCUMENT(gr);
 250         Inkscape::XML::Document *xml_doc = sp_document_repr_doc(doc);
 251
 252         Inkscape::XML::Node *repr = SP_OBJECT_REPR (gr)->duplicate(xml_doc);
 253         SP_OBJECT_REPR (SP_DOCUMENT_DEFS (doc))->addChild(repr, NULL);
 254         SPGradient *gr_new = (SPGradient *) doc->getObjectByRepr(repr);
 255         gr_new = sp_gradient_ensure_vector_normalized (gr_new);
 256         Inkscape::GC::release(repr);
 257         return gr_new;
 258     }
 259     return gr;
 260 }
 261
 262 /**
 263  *  Obtain the vector from the gradient. A forked vector will be created and linked to this gradient if another gradient uses it.
 264  */
 265 SPGradient *
 266 sp_gradient_get_forked_vector_if_necessary(SPGradient *gradient, bool force_vector)
 267 {
 268     SPGradient *vector = gradient->getVector(force_vector);
 269     vector = sp_gradient_fork_vector_if_necessary (vector);
 270     if ( gradient != vector && gradient->ref->getObject() != vector ) {
 271         sp_gradient_repr_set_link(SP_OBJECT_REPR(gradient), vector);
 272     }
 273     return vector;
 274 }
 275
 276
 277 /**
 278  * Convert an item's gradient to userspace _without_ preserving coords, setting them to defaults
 279  * instead. No forking or reapplying is done because this is only called for newly created privates.
 280  * @return The new gradient.
 281  */
 282 SPGradient *
 283 sp_gradient_reset_to_userspace (SPGradient *gr, SPItem *item)
 284 {
 285     Inkscape::XML::Node *repr = SP_OBJECT_REPR(gr);
 286
 287     // calculate the bbox of the item
 288     SP_OBJECT_DOCUMENT(item)->ensure_up_to_date();
 289     Geom::OptRect bbox = item->getBounds(Geom::identity()); // we need "true" bbox without item_i2d_affine
 290
 291     if (!bbox)
 292         return gr;
 293
 294     Geom::Coord const width = bbox->dimensions()[Geom::X];
 295     Geom::Coord const height = bbox->dimensions()[Geom::Y];
 296
 297     Geom::Point const center = bbox->midpoint();
 298
 299     if (SP_IS_RADIALGRADIENT(gr)) {
 300         sp_repr_set_svg_double(repr, "cx", center[Geom::X]);
 301         sp_repr_set_svg_double(repr, "cy", center[Geom::Y]);
 302         sp_repr_set_svg_double(repr, "fx", center[Geom::X]);
 303         sp_repr_set_svg_double(repr, "fy", center[Geom::Y]);
 304         sp_repr_set_svg_double(repr, "r", width/2);
 305
 306         // we want it to be elliptic, not circular
 307         Geom::Matrix squeeze = Geom::Translate (-center) *
 308             Geom::Scale(1, height/width) *
 309             Geom::Translate (center);
 310
 311         gr->gradientTransform = squeeze;
 312         {
 313             gchar *c=sp_svg_transform_write(gr->gradientTransform);
 314             SP_OBJECT_REPR(gr)->setAttribute("gradientTransform", c);
 315             g_free(c);
 316         }
 317     } else {
 318         sp_repr_set_svg_double(repr, "x1", (center - Geom::Point(width/2, 0))[Geom::X]);
 319         sp_repr_set_svg_double(repr, "y1", (center - Geom::Point(width/2, 0))[Geom::Y]);
 320         sp_repr_set_svg_double(repr, "x2", (center + Geom::Point(width/2, 0))[Geom::X]);
 321         sp_repr_set_svg_double(repr, "y2", (center + Geom::Point(width/2, 0))[Geom::Y]);
 322     }
 323
 324     // set the gradientUnits
 325     repr->setAttribute("gradientUnits", "userSpaceOnUse");
 326
 327     return gr;
 328 }
 329
 330 /**
 331  * Convert an item's gradient to userspace if necessary, also fork it if necessary.
 332  * @return The new gradient.
 333  */
 334 SPGradient *
 335 sp_gradient_convert_to_userspace(SPGradient *gr, SPItem *item, gchar const *property)
 336 {
 337     g_return_val_if_fail(SP_IS_GRADIENT(gr), NULL);
 338
 339     // First, fork it if it is shared
 340     gr = sp_gradient_fork_private_if_necessary(gr, gr->getVector(),
 341                                                SP_IS_RADIALGRADIENT(gr) ? SP_GRADIENT_TYPE_RADIAL : SP_GRADIENT_TYPE_LINEAR, SP_OBJECT(item));
 342
 343     if (gr->getUnits() == SP_GRADIENT_UNITS_OBJECTBOUNDINGBOX) {
 344
 345         Inkscape::XML::Node *repr = SP_OBJECT_REPR(gr);
 346
 347         // calculate the bbox of the item
 348         SP_OBJECT_DOCUMENT(item)->ensure_up_to_date();
 349         Geom::Matrix bbox2user;
 350         Geom::OptRect bbox = item->getBounds(Geom::identity()); // we need "true" bbox without item_i2d_affine
 351         if ( bbox ) {
 352             bbox2user = Geom::Matrix(bbox->dimensions()[Geom::X], 0,
 353                                    0, bbox->dimensions()[Geom::Y],
 354                                    bbox->min()[Geom::X], bbox->min()[Geom::Y]);
 355         } else {
 356             // would be degenerate otherwise
 357             bbox2user = Geom::identity();
 358         }
 359
 360         /* skew is the additional transform, defined by the proportions of the item, that we need
 361          * to apply to the gradient in order to work around this weird bit from SVG 1.1
 362          * (http://www.w3.org/TR/SVG11/pservers.html#LinearGradients):
 363          *
 364          *   When gradientUnits="objectBoundingBox" and gradientTransform is the identity
 365          *   matrix, the stripes of the linear gradient are perpendicular to the gradient
 366          *   vector in object bounding box space (i.e., the abstract coordinate system where
 367          *   (0,0) is at the top/left of the object bounding box and (1,1) is at the
 368          *   bottom/right of the object bounding box). When the object's bounding box is not
 369          *   square, the stripes that are conceptually perpendicular to the gradient vector
 370          *   within object bounding box space will render non-perpendicular relative to the
 371          *   gradient vector in user space due to application of the non-uniform scaling
 372          *   transformation from bounding box space to user space.
 373          */
 374         Geom::Matrix skew = bbox2user;
 375         double exp = skew.descrim();
 376         skew[0] /= exp;
 377         skew[1] /= exp;
 378         skew[2] /= exp;
 379         skew[3] /= exp;
 380         skew[4] = 0;
 381         skew[5] = 0;
 382
 383         // apply skew to the gradient
 384         gr->gradientTransform = skew;
 385         {
 386             gchar *c=sp_svg_transform_write(gr->gradientTransform);
 387             SP_OBJECT_REPR(gr)->setAttribute("gradientTransform", c);
 388             g_free(c);
 389         }
 390
 391         // Matrix to convert points to userspace coords; postmultiply by inverse of skew so
 392         // as to cancel it out when it's applied to the gradient during rendering
 393         Geom::Matrix point_convert = bbox2user * skew.inverse();
 394
 395         if (SP_IS_RADIALGRADIENT(gr)) {
 396             SPRadialGradient *rg = SP_RADIALGRADIENT(gr);
 397
 398             // original points in the bbox coords
 399             Geom::Point c_b = Geom::Point(rg->cx.computed, rg->cy.computed);
 400             Geom::Point f_b = Geom::Point(rg->fx.computed, rg->fy.computed);
 401             double r_b = rg->r.computed;
 402
 403             // converted points in userspace coords
 404             Geom::Point c_u = c_b * point_convert;
 405             Geom::Point f_u = f_b * point_convert;
 406             double r_u = r_b * point_convert.descrim();
 407
 408             sp_repr_set_svg_double(repr, "cx", c_u[Geom::X]);
 409             sp_repr_set_svg_double(repr, "cy", c_u[Geom::Y]);
 410             sp_repr_set_svg_double(repr, "fx", f_u[Geom::X]);
 411             sp_repr_set_svg_double(repr, "fy", f_u[Geom::Y]);
 412             sp_repr_set_svg_double(repr, "r", r_u);
 413
 414         } else {
 415             SPLinearGradient *lg = SP_LINEARGRADIENT(gr);
 416
 417             Geom::Point p1_b = Geom::Point(lg->x1.computed, lg->y1.computed);
 418             Geom::Point p2_b = Geom::Point(lg->x2.computed, lg->y2.computed);
 419
 420             Geom::Point p1_u = p1_b * point_convert;
 421             Geom::Point p2_u = p2_b * point_convert;
 422
 423             sp_repr_set_svg_double(repr, "x1", p1_u[Geom::X]);
 424             sp_repr_set_svg_double(repr, "y1", p1_u[Geom::Y]);
 425             sp_repr_set_svg_double(repr, "x2", p2_u[Geom::X]);
 426             sp_repr_set_svg_double(repr, "y2", p2_u[Geom::Y]);
 427         }
 428
 429         // set the gradientUnits
 430         repr->setAttribute("gradientUnits", "userSpaceOnUse");
 431     }
 432
 433     // apply the gradient to the item (may be necessary if we forked it); not recursive
 434     // generally because grouped items will be taken care of later (we're being called
 435     // from sp_item_adjust_paint_recursive); however text and all its children should all
 436     // refer to one gradient, hence the recursive call for text (because we can't/don't
 437     // want to access tspans and set gradients on them separately)
 438     if (SP_IS_TEXT(item))
 439         sp_style_set_property_url(SP_OBJECT(item), property, SP_OBJECT(gr), true);
 440     else
 441         sp_style_set_property_url(SP_OBJECT(item), property, SP_OBJECT(gr), false);
 442
 443     return gr;
 444 }
 445
 446 void
 447 sp_gradient_transform_multiply(SPGradient *gradient, Geom::Matrix postmul, bool set)
 448 {
 449     if (set) {
 450         gradient->gradientTransform = postmul;
 451     } else {
 452         gradient->gradientTransform *= postmul; // fixme: get gradient transform by climbing to hrefs?
 453     }
 454     gradient->gradientTransform_set = TRUE;
 455
 456     gchar *c=sp_svg_transform_write(gradient->gradientTransform);
 457     SP_OBJECT_REPR(gradient)->setAttribute("gradientTransform", c);
 458     g_free(c);
 459 }
 460
 461 SPGradient *
 462 sp_item_gradient (SPItem *item, bool fill_or_stroke)
 463 {
 464     SPStyle *style = SP_OBJECT_STYLE (item);
 465     SPGradient *gradient = NULL;
 466
 467     if (fill_or_stroke) {
 468         if (style && (style->fill.isPaintserver())) {
 469             SPObject *server = SP_OBJECT_STYLE_FILL_SERVER(item);
 470             if (SP_IS_GRADIENT (server)) {
 471                 gradient = SP_GRADIENT (server);
 472             }
 473         }
 474     } else {
 475         if (style && (style->stroke.isPaintserver())) {
 476             SPObject *server = SP_OBJECT_STYLE_STROKE_SERVER(item);
 477             if (SP_IS_GRADIENT (server)) {
 478                 gradient = SP_GRADIENT (server);
 479             }
 480         }
 481     }
 482
 483    return gradient;
 484 }
 485
 486 SPStop* sp_last_stop(SPGradient *gradient)
 487 {
 488     for (SPStop *stop = gradient->getFirstStop(); stop != NULL; stop = stop->getNextStop()) {
 489         if (stop->getNextStop() == NULL)
 490             return stop;
 491     }
 492     return NULL;
 493 }
 494
 495 SPStop*
 496 sp_get_stop_i(SPGradient *gradient, guint stop_i)
 497 {
 498     SPStop *stop = gradient->getFirstStop();
 499
 500     // if this is valid but weird gradient without an offset-zero stop element,
 501     // inkscape has created a handle for the start of gradient anyway,
 502     // so when it asks for stop N that corresponds to stop element N-1
 503     if (stop->offset != 0)
 504         stop_i --;
 505
 506     for (guint i = 0; i < stop_i; i++) {
 507         if (!stop) {
 508             return NULL;
 509         }
 510         stop = stop->getNextStop();
 511     }
 512
 513     return stop;
 514 }
 515
 516 guint32
 517 average_color (guint32 c1, guint32 c2, gdouble p)
 518 {
 519     guint32 r = (guint32) (SP_RGBA32_R_U (c1) * (1 - p) + SP_RGBA32_R_U (c2) * p);
 520     guint32 g = (guint32) (SP_RGBA32_G_U (c1) * (1 - p) + SP_RGBA32_G_U (c2) * p);
 521     guint32 b = (guint32) (SP_RGBA32_B_U (c1) * (1 - p) + SP_RGBA32_B_U (c2) * p);
 522     guint32 a = (guint32) (SP_RGBA32_A_U (c1) * (1 - p) + SP_RGBA32_A_U (c2) * p);
 523
 524     return SP_RGBA32_U_COMPOSE (r, g, b, a);
 525 }
 526
 527 SPStop *
 528 sp_vector_add_stop (SPGradient *vector, SPStop* prev_stop, SPStop* next_stop, gfloat offset)
 529 {
 530     Inkscape::XML::Node *new_stop_repr = NULL;
 531     new_stop_repr = SP_OBJECT_REPR(prev_stop)->duplicate(SP_OBJECT_REPR(vector)->document());
 532     SP_OBJECT_REPR(vector)->addChild(new_stop_repr, SP_OBJECT_REPR(prev_stop));
 533
 534     SPStop *newstop = (SPStop *) SP_OBJECT_DOCUMENT(vector)->getObjectByRepr(new_stop_repr);
 535     newstop->offset = offset;
 536     sp_repr_set_css_double( SP_OBJECT_REPR(newstop), "offset", (double)offset);
 537     guint32 const c1 = sp_stop_get_rgba32(prev_stop);
 538     guint32 const c2 = sp_stop_get_rgba32(next_stop);
 539     guint32 cnew = average_color (c1, c2, (offset - prev_stop->offset) / (next_stop->offset - prev_stop->offset));
 540     Inkscape::CSSOStringStream os;
 541     gchar c[64];
 542     sp_svg_write_color (c, sizeof(c), cnew);
 543     gdouble opacity = (gdouble) SP_RGBA32_A_F (cnew);
 544     os << "stop-color:" << c << ";stop-opacity:" << opacity <<";";
 545     SP_OBJECT_REPR (newstop)->setAttribute("style", os.str().c_str());
 546     Inkscape::GC::release(new_stop_repr);
 547
 548     return newstop;
 549 }
 550
 551 void
 552 sp_item_gradient_edit_stop (SPItem *item, guint point_type, guint point_i, bool fill_or_stroke)
 553 {
 554     SPGradient *gradient = sp_item_gradient (item, fill_or_stroke);
 555
 556     if (!gradient || !SP_IS_GRADIENT(gradient))
 557         return;
 558
 559     SPGradient *vector = gradient->getVector();
 560     switch (point_type) {
 561         case POINT_LG_BEGIN:
 562         case POINT_RG_CENTER:
 563         case POINT_RG_FOCUS:
 564         {
 565             GtkWidget *dialog = sp_gradient_vector_editor_new (vector, vector->getFirstStop());
 566             gtk_widget_show (dialog);
 567         }
 568         break;
 569
 570         case POINT_LG_END:
 571         case POINT_RG_R1:
 572         case POINT_RG_R2:
 573         {
 574             GtkWidget *dialog = sp_gradient_vector_editor_new (vector, sp_last_stop (vector));
 575             gtk_widget_show (dialog);
 576         }
 577         break;
 578
 579         case POINT_LG_MID:
 580         case POINT_RG_MID1:
 581         case POINT_RG_MID2:
 582         {
 583             GtkWidget *dialog = sp_gradient_vector_editor_new (vector, sp_get_stop_i (vector, point_i));
 584             gtk_widget_show (dialog);
 585         }
 586         break;
 587         default:
 588             break;
 589     }
 590 }
 591
 592 guint32
 593 sp_item_gradient_stop_query_style (SPItem *item, guint point_type, guint point_i, bool fill_or_stroke)
 594 {
 595     SPGradient *gradient = sp_item_gradient (item, fill_or_stroke);
 596
 597     if (!gradient || !SP_IS_GRADIENT(gradient))
 598         return 0;
 599
 600     SPGradient *vector = gradient->getVector();
 601
 602     if (!vector) // orphan!
 603         return 0; // what else to do?
 604
 605     switch (point_type) {
 606         case POINT_LG_BEGIN:
 607         case POINT_RG_CENTER:
 608         case POINT_RG_FOCUS:
 609         {
 610             SPStop *first = vector->getFirstStop();
 611             if (first) {
 612                 return sp_stop_get_rgba32(first);
 613             }
 614         }
 615         break;
 616
 617         case POINT_LG_END:
 618         case POINT_RG_R1:
 619         case POINT_RG_R2:
 620         {
 621             SPStop *last = sp_last_stop (vector);
 622             if (last) {
 623                 return sp_stop_get_rgba32(last);
 624             }
 625         }
 626         break;
 627
 628         case POINT_LG_MID:
 629         case POINT_RG_MID1:
 630         case POINT_RG_MID2:
 631         {
 632             SPStop *stopi = sp_get_stop_i (vector, point_i);
 633             if (stopi) {
 634                 return sp_stop_get_rgba32(stopi);
 635             }
 636         }
 637         break;
 638
 639         default:
 640             break;
 641     }
 642     return 0;
 643 }
 644
 645 void
 646 sp_item_gradient_stop_set_style (SPItem *item, guint point_type, guint point_i, bool fill_or_stroke, SPCSSAttr *stop)
 647 {
 648     SPGradient *gradient = sp_item_gradient (item, fill_or_stroke);
 649
 650     if (!gradient || !SP_IS_GRADIENT(gradient))
 651         return;
 652
 653     SPGradient *vector = gradient->getVector();
 654
 655     if (!vector) // orphan!
 656         return;
 657
 658     vector = sp_gradient_fork_vector_if_necessary (vector);
 659     if ( gradient != vector && gradient->ref->getObject() != vector ) {
 660         sp_gradient_repr_set_link(SP_OBJECT_REPR(gradient), vector);
 661     }
 662
 663     switch (point_type) {
 664         case POINT_LG_BEGIN:
 665         case POINT_RG_CENTER:
 666         case POINT_RG_FOCUS:
 667         {
 668             SPStop *first = vector->getFirstStop();
 669             if (first) {
 670                 sp_repr_css_change (SP_OBJECT_REPR (first), stop, "style");
 671             }
 672         }
 673         break;
 674
 675         case POINT_LG_END:
 676         case POINT_RG_R1:
 677         case POINT_RG_R2:
 678         {
 679             SPStop *last = sp_last_stop (vector);
 680             if (last) {
 681                 sp_repr_css_change (SP_OBJECT_REPR (last), stop, "style");
 682             }
 683         }
 684         break;
 685
 686         case POINT_LG_MID:
 687         case POINT_RG_MID1:
 688         case POINT_RG_MID2:
 689         {
 690             SPStop *stopi = sp_get_stop_i (vector, point_i);
 691             if (stopi) {
 692                 sp_repr_css_change (SP_OBJECT_REPR (stopi), stop, "style");
 693             }
 694         }
 695         break;
 696
 697         default:
 698             break;
 699     }
 700 }
 701
 702 void
 703 sp_item_gradient_reverse_vector (SPItem *item, bool fill_or_stroke)
 704 {
 705     SPGradient *gradient = sp_item_gradient (item, fill_or_stroke);
 706     if (!gradient || !SP_IS_GRADIENT(gradient))
 707         return;
 708
 709     SPGradient *vector = gradient->getVector();
 710     if (!vector) // orphan!
 711         return;
 712
 713     vector = sp_gradient_fork_vector_if_necessary (vector);
 714     if ( gradient != vector && gradient->ref->getObject() != vector ) {
 715         sp_gradient_repr_set_link(SP_OBJECT_REPR(gradient), vector);
 716     }
 717
 718     GSList *child_reprs = NULL;
 719     GSList *child_objects = NULL;
 720     std::vector<double> offsets;
 721     for (SPObject *child = vector->first_child();
 722          child != NULL; child = SP_OBJECT_NEXT(child)) {
 723         child_reprs = g_slist_prepend (child_reprs, SP_OBJECT_REPR(child));
 724         child_objects = g_slist_prepend (child_objects, child);
 725         offsets.push_back(sp_repr_get_double_attribute(SP_OBJECT_REPR(child), "offset", 0));
 726     }
 727
 728     GSList *child_copies = NULL;
 729     for (GSList *i = child_reprs; i != NULL; i = i->next) {
 730         Inkscape::XML::Node *repr = (Inkscape::XML::Node *) i->data;
 731         Inkscape::XML::Document *xml_doc = SP_OBJECT_REPR(vector)->document();
 732         child_copies = g_slist_append (child_copies, repr->duplicate(xml_doc));
 733     }
 734
 735
 736     for (GSList *i = child_objects; i != NULL; i = i->next) {
 737         SPObject *child = SP_OBJECT (i->data);
 738         child->deleteObject();
 739     }
 740
 741     std::vector<double>::iterator iter = offsets.end() - 1;
 742     for (GSList *i = child_copies; i != NULL; i = i->next) {
 743         Inkscape::XML::Node *copy = (Inkscape::XML::Node *) i->data;
 744         vector->appendChildRepr(copy);
 745         sp_repr_set_svg_double (copy, "offset", 1 - *iter);
 746         iter --;
 747         Inkscape::GC::release(copy);
 748     }
 749
 750     g_slist_free (child_reprs);
 751     g_slist_free (child_copies);
 752     g_slist_free (child_objects);
 753 }
 754
 755
 756 /**
 757 Set the position of point point_type of the gradient applied to item (either fill_or_stroke) to
 758 p_w (in desktop coordinates). Write_repr if you want the change to become permanent.
 759 */
 760 void
 761 sp_item_gradient_set_coords (SPItem *item, guint point_type, guint point_i, Geom::Point p_w, bool fill_or_stroke, bool write_repr, bool scale)
 762 {
 763     SPGradient *gradient = sp_item_gradient (item, fill_or_stroke);
 764
 765     if (!gradient || !SP_IS_GRADIENT(gradient))
 766         return;
 767
 768     gradient = sp_gradient_convert_to_userspace (gradient, item, fill_or_stroke? "fill" : "stroke");
 769
 770     Geom::Matrix i2d (item->i2d_affine ());
 771     Geom::Point p = p_w * i2d.inverse();
 772     p *= (gradient->gradientTransform).inverse();
 773     // now p is in gradient's original coordinates
 774
 775     Inkscape::XML::Node *repr = SP_OBJECT_REPR(gradient);
 776
 777     if (SP_IS_LINEARGRADIENT(gradient)) {
 778         SPLinearGradient *lg = SP_LINEARGRADIENT(gradient);
 779         switch (point_type) {
 780             case POINT_LG_BEGIN:
 781                 if (scale) {
 782                     lg->x2.computed += (lg->x1.computed - p[Geom::X]);
 783                     lg->y2.computed += (lg->y1.computed - p[Geom::Y]);
 784                 }
 785                 lg->x1.computed = p[Geom::X];
 786                 lg->y1.computed = p[Geom::Y];
 787                 if (write_repr) {
 788                     if (scale) {
 789                         sp_repr_set_svg_double(repr, "x2", lg->x2.computed);
 790                         sp_repr_set_svg_double(repr, "y2", lg->y2.computed);
 791                     }
 792                     sp_repr_set_svg_double(repr, "x1", lg->x1.computed);
 793                     sp_repr_set_svg_double(repr, "y1", lg->y1.computed);
 794                 } else {
 795                     SP_OBJECT (gradient)->requestModified(SP_OBJECT_MODIFIED_FLAG);
 796                 }
 797                 break;
 798             case POINT_LG_END:
 799                 if (scale) {
 800                     lg->x1.computed += (lg->x2.computed - p[Geom::X]);
 801                     lg->y1.computed += (lg->y2.computed - p[Geom::Y]);
 802                 }
 803                 lg->x2.computed = p[Geom::X];
 804                 lg->y2.computed = p[Geom::Y];
 805                 if (write_repr) {
 806                     if (scale) {
 807                         sp_repr_set_svg_double(repr, "x1", lg->x1.computed);
 808                         sp_repr_set_svg_double(repr, "y1", lg->y1.computed);
 809                     }
 810                     sp_repr_set_svg_double(repr, "x2", lg->x2.computed);
 811                     sp_repr_set_svg_double(repr, "y2", lg->y2.computed);
 812                 } else {
 813                     SP_OBJECT (gradient)->requestModified(SP_OBJECT_MODIFIED_FLAG);
 814                 }
 815                 break;
 816             case POINT_LG_MID:
 817             {
 818                 // using X-coordinates only to determine the offset, assuming p has been snapped to the vector from begin to end.
 819                 double offset = get_offset_between_points (p, Geom::Point(lg->x1.computed, lg->y1.computed), Geom::Point(lg->x2.computed, lg->y2.computed));
 820                 SPGradient *vector = sp_gradient_get_forked_vector_if_necessary (lg, false);
 821                 lg->ensureVector();
 822                 lg->vector.stops.at(point_i).offset = offset;
 823                 SPStop* stopi = sp_get_stop_i(vector, point_i);
 824                 stopi->offset = offset;
 825                 if (write_repr) {
 826                     sp_repr_set_css_double(SP_OBJECT_REPR(stopi), "offset", stopi->offset);
 827                 } else {
 828                     SP_OBJECT (stopi)->requestModified(SP_OBJECT_MODIFIED_FLAG | SP_OBJECT_STYLE_MODIFIED_FLAG);
 829                 }
 830             }
 831             break;
 832             default:
 833                 break;
 834         }
 835     } else if (SP_IS_RADIALGRADIENT(gradient)) {
 836         SPRadialGradient *rg = SP_RADIALGRADIENT(gradient);
 837         Geom::Point c (rg->cx.computed, rg->cy.computed);
 838         Geom::Point c_w = c * gradient->gradientTransform * i2d; // now in desktop coords
 839         if ((point_type == POINT_RG_R1 || point_type == POINT_RG_R2) && Geom::L2 (p_w - c_w) < 1e-3) {
 840             // prevent setting a radius too close to the center
 841             return;
 842         }
 843         Geom::Matrix new_transform;
 844         bool transform_set = false;
 845
 846         switch (point_type) {
 847             case POINT_RG_CENTER:
 848                 rg->fx.computed = p[Geom::X] + (rg->fx.computed - rg->cx.computed);
 849                 rg->fy.computed = p[Geom::Y] + (rg->fy.computed - rg->cy.computed);
 850                 rg->cx.computed = p[Geom::X];
 851                 rg->cy.computed = p[Geom::Y];
 852                 if (write_repr) {
 853                     sp_repr_set_svg_double(repr, "fx", rg->fx.computed);
 854                     sp_repr_set_svg_double(repr, "fy", rg->fy.computed);
 855                     sp_repr_set_svg_double(repr, "cx", rg->cx.computed);
 856                     sp_repr_set_svg_double(repr, "cy", rg->cy.computed);
 857                 } else {
 858                     SP_OBJECT (gradient)->requestModified(SP_OBJECT_MODIFIED_FLAG);
 859                 }
 860                 break;
 861             case POINT_RG_FOCUS:
 862                 rg->fx.computed = p[Geom::X];
 863                 rg->fy.computed = p[Geom::Y];
 864                 if (write_repr) {
 865                     sp_repr_set_svg_double(repr, "fx", rg->fx.computed);
 866                     sp_repr_set_svg_double(repr, "fy", rg->fy.computed);
 867                 } else {
 868                     SP_OBJECT (gradient)->requestModified(SP_OBJECT_MODIFIED_FLAG);
 869                 }
 870                 break;
 871             case POINT_RG_R1:
 872             {
 873                 Geom::Point r1_w = (c + Geom::Point(rg->r.computed, 0)) * gradient->gradientTransform * i2d;
 874                 double r1_angle = Geom::atan2(r1_w - c_w);
 875                 double move_angle = Geom::atan2(p_w - c_w) - r1_angle;
 876                 double move_stretch = Geom::L2(p_w - c_w) / Geom::L2(r1_w - c_w);
 877
 878                 Geom::Matrix move = Geom::Matrix (Geom::Translate (-c_w)) *
 879                     Geom::Matrix (Geom::Rotate(-r1_angle)) *
 880                     Geom::Matrix (Geom::Scale(move_stretch, scale? move_stretch : 1)) *
 881                     Geom::Matrix (Geom::Rotate(r1_angle)) *
 882                     Geom::Matrix (Geom::Rotate(move_angle)) *
 883                     Geom::Matrix (Geom::Translate (c_w));
 884
 885                 new_transform = gradient->gradientTransform * i2d * move * i2d.inverse();
 886                 transform_set = true;
 887
 888                 break;
 889             }
 890             case POINT_RG_R2:
 891             {
 892                 Geom::Point r2_w = (c + Geom::Point(0, -rg->r.computed)) * gradient->gradientTransform * i2d;
 893                 double r2_angle = Geom::atan2(r2_w - c_w);
 894                 double move_angle = Geom::atan2(p_w - c_w) - r2_angle;
 895                 double move_stretch = Geom::L2(p_w - c_w) / Geom::L2(r2_w - c_w);
 896
 897                 Geom::Matrix move = Geom::Matrix (Geom::Translate (-c_w)) *
 898                     Geom::Matrix (Geom::Rotate(-r2_angle)) *
 899                     Geom::Matrix (Geom::Scale(move_stretch, scale? move_stretch : 1)) *
 900                     Geom::Matrix (Geom::Rotate(r2_angle)) *
 901                     Geom::Matrix (Geom::Rotate(move_angle)) *
 902                     Geom::Matrix (Geom::Translate (c_w));
 903
 904                 new_transform = gradient->gradientTransform * i2d * move * i2d.inverse();
 905                 transform_set = true;
 906
 907                 break;
 908             }
 909         case POINT_RG_MID1:
 910             {
 911                 Geom::Point start = Geom::Point (rg->cx.computed, rg->cy.computed);
 912                  Geom::Point end   = Geom::Point (rg->cx.computed + rg->r.computed, rg->cy.computed);
 913                 double offset = get_offset_between_points (p, start, end);
 914                 SPGradient *vector = sp_gradient_get_forked_vector_if_necessary (rg, false);
 915                 rg->ensureVector();
 916                 rg->vector.stops.at(point_i).offset = offset;
 917                 SPStop* stopi = sp_get_stop_i(vector, point_i);
 918                 stopi->offset = offset;
 919                 if (write_repr) {
 920                     sp_repr_set_css_double(SP_OBJECT_REPR(stopi), "offset", stopi->offset);
 921                 } else {
 922                     SP_OBJECT (stopi)->requestModified(SP_OBJECT_MODIFIED_FLAG | SP_OBJECT_STYLE_MODIFIED_FLAG);
 923                 }
 924                 break;
 925             }
 926         case POINT_RG_MID2:
 927                 Geom::Point start = Geom::Point (rg->cx.computed, rg->cy.computed);
 928                 Geom::Point end   = Geom::Point (rg->cx.computed, rg->cy.computed - rg->r.computed);
 929                 double offset = get_offset_between_points (p, start, end);
 930                 SPGradient *vector = sp_gradient_get_forked_vector_if_necessary(rg, false);
 931                 rg->ensureVector();
 932                 rg->vector.stops.at(point_i).offset = offset;
 933                 SPStop* stopi = sp_get_stop_i(vector, point_i);
 934                 stopi->offset = offset;
 935                 if (write_repr) {
 936                     sp_repr_set_css_double(SP_OBJECT_REPR(stopi), "offset", stopi->offset);
 937                 } else {
 938                     SP_OBJECT (stopi)->requestModified(SP_OBJECT_MODIFIED_FLAG | SP_OBJECT_STYLE_MODIFIED_FLAG);
 939                 }
 940                 break;
 941         }
 942
 943         if (transform_set) {
 944             gradient->gradientTransform = new_transform;
 945             gradient->gradientTransform_set = TRUE;
 946             if (write_repr) {
 947                 gchar *s=sp_svg_transform_write(gradient->gradientTransform);
 948                 SP_OBJECT_REPR(gradient)->setAttribute("gradientTransform", s);
 949                 g_free(s);
 950             } else {
 951                 SP_OBJECT (gradient)->requestModified(SP_OBJECT_MODIFIED_FLAG);
 952             }
 953         }
 954     }
 955 }
 956
 957 SPGradient *
 958 sp_item_gradient_get_vector (SPItem *item, bool fill_or_stroke)
 959 {
 960     SPGradient *gradient = sp_item_gradient (item, fill_or_stroke);
 961
 962     if (gradient) {
 963         return gradient->getVector();
 964     }
 965     return NULL;
 966 }
 967
 968 SPGradientSpread
 969 sp_item_gradient_get_spread (SPItem *item, bool fill_or_stroke)
 970 {
 971     SPGradientSpread spread = SP_GRADIENT_SPREAD_PAD;
 972     SPGradient *gradient = sp_item_gradient (item, fill_or_stroke);
 973
 974     if (gradient) {
 975         spread = gradient->fetchSpread();
 976     }
 977     return spread;
 978 }
 979
 980
 981 /**
 982 Returns the position of point point_type of the gradient applied to item (either fill_or_stroke),
 983 in desktop coordinates.
 984 */
 985
 986 Geom::Point
 987 sp_item_gradient_get_coords (SPItem *item, guint point_type, guint point_i, bool fill_or_stroke)
 988 {
 989     SPGradient *gradient = sp_item_gradient (item, fill_or_stroke);
 990
 991     Geom::Point p (0, 0);
 992
 993     if (!gradient)
 994         return from_2geom(p);
 995
 996     if (SP_IS_LINEARGRADIENT(gradient)) {
 997         SPLinearGradient *lg = SP_LINEARGRADIENT(gradient);
 998         switch (point_type) {
 999             case POINT_LG_BEGIN:
1000                 p = Geom::Point (lg->x1.computed, lg->y1.computed);
1001                 break;
1002             case POINT_LG_END:
1003                 p = Geom::Point (lg->x2.computed, lg->y2.computed);
1004                 break;
1005             case POINT_LG_MID:
1006                 {
1007                     gdouble offset = lg->vector.stops.at(point_i).offset;
1008                     p = (1-offset) * Geom::Point(lg->x1.computed, lg->y1.computed) + offset * Geom::Point(lg->x2.computed, lg->y2.computed);
1009                 }
1010                 break;
1011         }
1012     } else     if (SP_IS_RADIALGRADIENT(gradient)) {
1013         SPRadialGradient *rg = SP_RADIALGRADIENT(gradient);
1014         switch (point_type) {
1015             case POINT_RG_CENTER:
1016                 p = Geom::Point (rg->cx.computed, rg->cy.computed);
1017                 break;
1018             case POINT_RG_FOCUS:
1019                 p = Geom::Point (rg->fx.computed, rg->fy.computed);
1020                 break;
1021             case POINT_RG_R1:
1022                 p = Geom::Point (rg->cx.computed + rg->r.computed, rg->cy.computed);
1023                 break;
1024             case POINT_RG_R2:
1025                 p = Geom::Point (rg->cx.computed, rg->cy.computed - rg->r.computed);
1026                 break;
1027             case POINT_RG_MID1:
1028                 {
1029                     gdouble offset = rg->vector.stops.at(point_i).offset;
1030                     p = (1-offset) * Geom::Point (rg->cx.computed, rg->cy.computed) + offset * Geom::Point(rg->cx.computed + rg->r.computed, rg->cy.computed);
1031                 }
1032                 break;
1033             case POINT_RG_MID2:
1034                 {
1035                     gdouble offset = rg->vector.stops.at(point_i).offset;
1036                     p = (1-offset) * Geom::Point (rg->cx.computed, rg->cy.computed) + offset * Geom::Point(rg->cx.computed, rg->cy.computed - rg->r.computed);
1037                 }
1038                 break;
1039         }
1040     }
1041
1042     if (SP_GRADIENT(gradient)->getUnits() == SP_GRADIENT_UNITS_OBJECTBOUNDINGBOX) {
1043         SP_OBJECT_DOCUMENT(item)->ensure_up_to_date();
1044         Geom::OptRect bbox = item->getBounds(Geom::identity()); // we need "true" bbox without item_i2d_affine
1045         if (bbox) {
1046             p *= Geom::Matrix(bbox->dimensions()[Geom::X], 0,
1047                             0, bbox->dimensions()[Geom::Y],
1048                             bbox->min()[Geom::X], bbox->min()[Geom::Y]);
1049         }
1050     }
1051     p *= Geom::Matrix(gradient->gradientTransform) * (Geom::Matrix)item->i2d_affine();
1052     return from_2geom(p);
1053 }
1054
1055
1056 /**
1057  * Sets item fill or stroke to the gradient of the specified type with given vector, creating
1058  * new private gradient, if needed.
1059  * gr has to be a normalized vector.
1060  */
1061
1062 SPGradient *
1063 sp_item_set_gradient(SPItem *item, SPGradient *gr, SPGradientType type, bool is_fill)
1064 {
1065     g_return_val_if_fail(item != NULL, NULL);
1066     g_return_val_if_fail(SP_IS_ITEM(item), NULL);
1067     g_return_val_if_fail(gr != NULL, NULL);
1068     g_return_val_if_fail(SP_IS_GRADIENT(gr), NULL);
1069     g_return_val_if_fail(gr->state == SP_GRADIENT_STATE_VECTOR, NULL);
1070
1071     SPStyle *style = SP_OBJECT_STYLE(item);
1072     g_assert(style != NULL);
1073
1074     SPPaintServer *ps = NULL;
1075     if (is_fill? style->fill.isPaintserver() : style->stroke.isPaintserver())
1076         ps = is_fill? SP_STYLE_FILL_SERVER(style) : SP_STYLE_STROKE_SERVER(style);
1077
1078     if (ps
1079         && ( (type == SP_GRADIENT_TYPE_LINEAR && SP_IS_LINEARGRADIENT(ps)) ||
1080              (type == SP_GRADIENT_TYPE_RADIAL && SP_IS_RADIALGRADIENT(ps))   ) )
1081     {
1082
1083         /* Current fill style is the gradient of the required type */
1084         SPGradient *current = SP_GRADIENT(ps);
1085
1086         //g_message("hrefcount %d   count %d\n", SP_OBJECT_HREFCOUNT(current), count_gradient_hrefs(SP_OBJECT(item), current));
1087
1088         if (!current->isSwatch()
1089             && (SP_OBJECT_HREFCOUNT(current) == 1 ||
1090             SP_OBJECT_HREFCOUNT(current) == count_gradient_hrefs(SP_OBJECT(item), current))) {
1091
1092             // current is private and it's either used once, or all its uses are by children of item;
1093             // so just change its href to vector
1094
1095             if ( current != gr && current->getVector() != gr ) {
1096                 /* href is not the vector */
1097                 sp_gradient_repr_set_link(SP_OBJECT_REPR(current), gr);
1098             }
1099             SP_OBJECT(item)->requestDisplayUpdate(SP_OBJECT_MODIFIED_FLAG | SP_OBJECT_STYLE_MODIFIED_FLAG);
1100             return current;
1101
1102         } else {
1103
1104             // the gradient is not private, or it is shared with someone else;
1105             // normalize it (this includes creating new private if necessary)
1106             SPGradient *normalized = sp_gradient_fork_private_if_necessary(current, gr, type, item);
1107
1108             g_return_val_if_fail(normalized != NULL, NULL);
1109
1110             if (normalized != current) {
1111
1112                 /* We have to change object style here; recursive because this is used from
1113                  * fill&stroke and must work for groups etc. */
1114                 sp_style_set_property_url(SP_OBJECT(item), is_fill? "fill" : "stroke", SP_OBJECT(normalized), true);
1115             }
1116             SP_OBJECT(item)->requestDisplayUpdate(SP_OBJECT_MODIFIED_FLAG | SP_OBJECT_STYLE_MODIFIED_FLAG);
1117             return normalized;
1118         }
1119
1120     } else {
1121         /* Current fill style is not a gradient or wrong type, so construct everything */
1122         SPGradient *constructed = sp_gradient_get_private_normalized(SP_OBJECT_DOCUMENT(item), gr, type);
1123         constructed = sp_gradient_reset_to_userspace(constructed, item);
1124         sp_style_set_property_url(SP_OBJECT(item), ( is_fill ? "fill" : "stroke" ), SP_OBJECT(constructed), true);
1125         SP_OBJECT(item)->requestDisplayUpdate(( SP_OBJECT_MODIFIED_FLAG |
1126                                                 SP_OBJECT_STYLE_MODIFIED_FLAG ));
1127         return constructed;
1128     }
1129 }
1130
1131 static void sp_gradient_repr_set_link(Inkscape::XML::Node *repr, SPGradient *link)
1132 {
1133     g_return_if_fail(repr != NULL);
1134     if (link) {
1135         g_return_if_fail(SP_IS_GRADIENT(link));
1136     }
1137
1138     if (link) {
1139         Glib::ustring ref("#");
1140         ref += link->getId();
1141         repr->setAttribute("xlink:href", ref.c_str());
1142     } else {
1143         repr->setAttribute("xlink:href", 0);
1144     }
1145 }
1146
1147 /*
1148  * Get default normalized gradient vector of document, create if there is none
1149  */
1150
1151 SPGradient *
1152 sp_document_default_gradient_vector(SPDocument *document, guint32 color)
1153 {
1154     SPDefs *defs = (SPDefs *) SP_DOCUMENT_DEFS(document);
1155     Inkscape::XML::Document *xml_doc = sp_document_repr_doc(document);
1156
1157     Inkscape::XML::Node *repr = xml_doc->createElement("svg:linearGradient");
1158
1159     repr->setAttribute("inkscape:collect", "always");
1160     // set here, but removed when it's edited in the gradient editor
1161     // to further reduce clutter, we could
1162     // (1) here, search gradients by color and return what is found without duplication
1163     // (2) in fill & stroke, show only one copy of each gradient in list
1164
1165     Inkscape::XML::Node *stop = xml_doc->createElement("svg:stop");
1166
1167     gchar b[64];
1168     sp_svg_write_color(b, sizeof(b), color);
1169
1170     {
1171         gchar *t = g_strdup_printf("stop-color:%s;stop-opacity:1;", b);
1172         stop->setAttribute("style", t);
1173         g_free(t);
1174     }
1175
1176     stop->setAttribute("offset", "0");
1177
1178     repr->appendChild(stop);
1179     Inkscape::GC::release(stop);
1180
1181     stop = xml_doc->createElement("svg:stop");
1182
1183     {
1184         gchar *t = g_strdup_printf("stop-color:%s;stop-opacity:0;", b);
1185         stop->setAttribute("style", t);
1186         g_free(t);
1187     }
1188
1189     stop->setAttribute("offset", "1");
1190
1191     repr->appendChild(stop);
1192     Inkscape::GC::release(stop);
1193
1194     SP_OBJECT_REPR(defs)->addChild(repr, NULL);
1195     Inkscape::GC::release(repr);
1196
1197     /* fixme: This does not look like nice */
1198     SPGradient *gr;
1199     gr = (SPGradient *) document->getObjectByRepr(repr);
1200     g_assert(gr != NULL);
1201     g_assert(SP_IS_GRADIENT(gr));
1202     /* fixme: Maybe add extra sanity check here */
1203     gr->state = SP_GRADIENT_STATE_VECTOR;
1204
1205     return gr;
1206 }
1207
1208 /**
1209 Return the preferred vector for \a o, made from (in order of preference) its current vector,
1210 current fill or stroke color, or from desktop style if \a o is NULL or doesn't have style.
1211 */
1212 SPGradient *
1213 sp_gradient_vector_for_object(SPDocument *const doc, SPDesktop *const desktop,
1214                               SPObject *const o, bool const is_fill)
1215 {
1216     guint32 rgba = 0;
1217     if (o == NULL || SP_OBJECT_STYLE(o) == NULL) {
1218         rgba = sp_desktop_get_color(desktop, is_fill);
1219     } else {
1220         // take the color of the object
1221         SPStyle const &style = *SP_OBJECT_STYLE(o);
1222         SPIPaint const &paint = ( is_fill
1223                                   ? style.fill
1224                                   : style.stroke );
1225         if (paint.isPaintserver()) {
1226             SPObject *server = is_fill? SP_OBJECT_STYLE_FILL_SERVER(o) : SP_OBJECT_STYLE_STROKE_SERVER(o);
1227             if (SP_IS_GRADIENT (server)) {
1228                 return SP_GRADIENT(server)->getVector(true);
1229             } else {
1230                 rgba = sp_desktop_get_color(desktop, is_fill);
1231             }
1232         } else if (paint.isColor()) {
1233             rgba = paint.value.color.toRGBA32( 0xff );
1234         } else {
1235             // if o doesn't use flat color, then take current color of the desktop.
1236             rgba = sp_desktop_get_color(desktop, is_fill);
1237         }
1238     }
1239
1240     return sp_document_default_gradient_vector(doc, rgba);
1241 }
1242
1243
1244 /*
1245   Local Variables:
1246   mode:c++
1247   c-file-style:"stroustrup"
1248   c-file-offsets:((innamespace . 0)(inline-open . 0)(case-label . +))
1249   indent-tabs-mode:nil
1250   fill-column:99
1251   End:
1252 */
1253 // vim: filetype=cpp:expandtab:shiftwidth=4:tabstop=8:softtabstop=4:encoding=utf-8:textwidth=99 :