src/gradient-chemistry.cpp

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