Logo Search packages:      
Sourcecode: inkscape version File versions

splivarot.cpp

#define __SP_LIVAROT_C__
/*
 *  splivarot.cpp
 *  Inkscape
 *
 *  Created by fred on Fri Dec 05 2003.
 *  public domain
 *
 */

/*
 * contains lots of stitched pieces of path-chemistry.c
 */

#ifdef HAVE_CONFIG_H
# include <config.h>
#endif
#include <time.h>
#include <string.h>

#include "xml/repr.h"
#include "svg/svg.h"
#include "svg/stringstream.h"
#include "sp-path.h"
#include "sp-text.h"
#include "sp-item-group.h"
#include "style.h"
#include "inkscape.h"
#include "document.h"
#include "selection.h"
#include "desktop-handles.h"
#include "path-chemistry.h"
#include "desktop.h"
#include "splivarot.h"
#include "display/canvas-bpath.h"
#include "display/curve.h"
#include <glibmm/i18n.h>
#include "view.h"
#include "prefs-utils.h"

#include "libnr/n-art-bpath.h"
#include "libnr/nr-matrix.h"
#include "libnr/nr-point.h"
#include "xml/repr.h"
#include "xml/repr-sorting.h"

#include "livarot/Path.h"
#include "livarot/Shape.h"
#include "livarot/LivarotDefs.h"

Path   *Path_for_item (SPItem * item,bool doTransformation, bool transformFull = true);
bool   Ancetre (SPRepr * a, SPRepr * who);

void sp_selected_path_boolop (bool_op bop);
void sp_selected_path_do_offset (bool expand, double prefOffset);
void sp_selected_path_create_offset_object (int expand,bool updating);

void
sp_selected_path_union ()
{
    sp_selected_path_boolop (bool_op_union);
}

void
sp_selected_path_intersect ()
{
    sp_selected_path_boolop (bool_op_inters);
}

void
sp_selected_path_diff ()
{
    sp_selected_path_boolop (bool_op_diff);
}

void
sp_selected_path_symdiff ()
{
    sp_selected_path_boolop (bool_op_symdiff);
}
void
sp_selected_path_cut ()
{
    sp_selected_path_boolop (bool_op_cut);
}
void
sp_selected_path_slice ()
{
    sp_selected_path_boolop (bool_op_slice);
}


// boolean operations
// take the source paths from the file, do the operation, delete the originals and add the results
void
sp_selected_path_boolop (bool_op bop)
{
    SPDesktop *desktop = SP_ACTIVE_DESKTOP;
    if (!SP_IS_DESKTOP (desktop))
        return;

    SPSelection *selection = SP_DT_SELECTION (desktop);
  
    GSList *il = (GSList *) selection->itemList();
  
    if (g_slist_length (il) < 2) {
        desktop->messageStack()->flash(Inkscape::ERROR_MESSAGE, _("Select <b>at least 2 paths</b> to perform a boolean operation."));
        return;
    }
  
    if (g_slist_length (il) > 2) {
        if (bop == bool_op_diff || bop == bool_op_symdiff || bop == bool_op_cut || bop == bool_op_slice ) {
            desktop->messageStack()->flash(Inkscape::ERROR_MESSAGE, _("Select <b>exactly 2 paths</b> to perform difference, XOR, division, or path cut."));
            return;
        }
    }
  
    // reverseOrderForOp marks whether the order of the list is the top->down order 
    // it's only used when there are 2 objects, and for operations who need to know the
    // topmost object (differences, cuts)
    bool reverseOrderForOp = false;

    // mettre les elements de la liste dans l'ordre pour ces operations
    if (bop == bool_op_diff || bop == bool_op_symdiff || bop == bool_op_cut || bop == bool_op_slice) {
        // check in the tree to find which element of the selection list is topmost (for 2-operand commands only)
        SPRepr *a = SP_OBJECT_REPR (il->data);
        SPRepr *b = SP_OBJECT_REPR (il->next->data);

        if (a == NULL || b == NULL) {
            desktop->messageStack()->flash(Inkscape::ERROR_MESSAGE, _("Unable to determine the <b>z-order</b> of the objects selected for difference, XOR, division, or path cut."));
            return;
        }

        if (Ancetre (a, b)) {
            // a is the parent of b, already in the proper order
        } else if (Ancetre (b, a)) {
            // reverse order
            reverseOrderForOp = true;
        } else {

            // objects are not in parent/child relationship;
            // find their lowest common ancestor
            SPRepr *dad = LCA (a, b);
            if (dad == NULL) {
                desktop->messageStack()->flash(Inkscape::ERROR_MESSAGE, _("Unable to determine the <b>z-order</b> of the objects selected for difference, XOR, division, or path cut."));
                return;
            }

            // find the children of the LCA that lead from it to the a and b
            SPRepr *as = AncetreFils (a, dad);
            SPRepr *bs = AncetreFils (b, dad);

            // find out which comes first
            for (SPRepr * child = dad->firstChild(); child; child = child->next()) {
                if (child == as) {
                    // a en premier->mauvais sens
                    reverseOrderForOp = true;
                    break;
                }
                if (child == bs)
                    break;
            }
        }
    }
  
    il = g_slist_copy (il);
  
    // first check if all the input objects have shapes
    // otherwise bail out
    for (GSList *l = il; l != NULL; l = l->next)
    {
        SPItem *item = SP_ITEM (l->data);
        if (!SP_IS_SHAPE (item) && !SP_IS_TEXT (item))
        {
            desktop->messageStack()->flash(Inkscape::ERROR_MESSAGE, _("One of the objects is <b>not a path</b>, cannot perform boolean operation."));
            g_slist_free (il);
            return;
        }
    }
  
    // extract the livarot Paths from the source objects
    // also get the winding rule specified in the style
    int nbOriginaux = g_slist_length (il);
    Path *originaux[nbOriginaux];
    FillRule  origWind[nbOriginaux];
    int curOrig;
    {
        curOrig = 0;
        for (GSList *l = il; l != NULL; l = l->next)
        {
            SPCSSAttr *css;
            const gchar *val;
            css = sp_repr_css_attr (SP_OBJECT_REPR (il->data), "style");
            val = sp_repr_css_property (css, "fill-rule", NULL);
            if (val && strcmp (val, "nonzero") == 0) {
                origWind[curOrig]= fill_nonZero;
            } else if (val && strcmp (val, "evenodd") == 0) {
                origWind[curOrig]= fill_oddEven;
            } else {
                origWind[curOrig]= fill_nonZero;
            }

            originaux[curOrig] = Path_for_item ((SPItem *) l->data, true, true);
            if (originaux[curOrig] == NULL || originaux[curOrig]->descr_cmd.size() <= 1)
            {
                for (int i = curOrig; i >= 0; i--) delete originaux[i];
                g_slist_free (il);
                return;
            }
            curOrig++;
        }
    }
    // reverse if needed
    // note that the selection list keeps its order
    if ( reverseOrderForOp ) {
        Path* swap=originaux[0];originaux[0]=originaux[1];originaux[1]=swap;
        FillRule swai=origWind[0]; origWind[0]=origWind[1]; origWind[1]=swai;
    }
  
    // and work
    // some temporary instances, first
    Shape *theShapeA = new Shape;
    Shape *theShapeB = new Shape;
    Shape *theShape = new Shape;
    Path *res = new Path;
    res->SetBackData (false);
    Path::cut_position  *toCut=NULL;
    int                  nbToCut=0;
  
    if ( bop == bool_op_inters || bop == bool_op_union || bop == bool_op_diff || bop == bool_op_symdiff ) {
        // true boolean op
        // get the polygons of each path, with the winding rule specified, and apply the operation iteratively
        originaux[0]->ConvertWithBackData (1.0);
     
        originaux[0]->Fill (theShape, 0);

        theShapeA->ConvertToShape (theShape, origWind[0]);
    
        curOrig = 1;
        for (GSList *l = il->next; l != NULL; l = l->next) {    
            originaux[curOrig]->ConvertWithBackData (1.0);
      
            originaux[curOrig]->Fill (theShape, curOrig);
      
            theShapeB->ConvertToShape (theShape, origWind[curOrig]);
      
            // les elements arrivent en ordre inverse dans la liste
            theShape->Booleen (theShapeB, theShapeA, bop);
      
            {
                Shape *swap = theShape;
                theShape = theShapeA;
                theShapeA = swap;
            }
            curOrig++;
        }

        {
            Shape *swap = theShape;
            theShape = theShapeA;
            theShapeA = swap;
        }

    } else if ( bop == bool_op_cut ) {
        // cuts= sort of a bastard boolean operation, thus not the axact same modus operandi
        // technically, the cut path is not necessarily a polygon (thus has no winding rule)
        // it is just uncrossed, and cleaned from duplicate edges and points
        // then it's fed to Booleen() which will uncross it against the other path
        // then comes the trick: each edge of the cut path is duplicated (one in each direction),
        // thus making a polygon. the weight of the edges of the cut are all 0, but 
        // the Booleen need to invert the ones inside the source polygon (for the subsequent 
        // ConvertToForme)
    
        // the cut path needs to have the highest pathID in the back data
        // that's how the Booleen() function knows it's an edge of the cut
        {
            Path* swap=originaux[0];originaux[0]=originaux[1];originaux[1]=swap;
            int   swai=origWind[0];origWind[0]=origWind[1];origWind[1]=(fill_typ)swai;
        }
        originaux[0]->ConvertWithBackData (1.0);
    
        originaux[0]->Fill (theShape, 0);
    
        theShapeA->ConvertToShape (theShape, origWind[0]);

        originaux[1]->ConvertWithBackData (1.0);
    
        originaux[1]->Fill (theShape, 1,false,false,false); //do not closeIfNeeded
    
        theShapeB->ConvertToShape (theShape, fill_justDont); // fill_justDont doesn't computes winding numbers
    
        // les elements arrivent en ordre inverse dans la liste
        theShape->Booleen (theShapeB, theShapeA, bool_op_cut,1);
    
    } else if ( bop == bool_op_slice ) {
        // slice is not really a boolean operation
        // you just put the 2 shapes in a single polygon, uncross it
        // the points where the degree is > 2 are intersections
        // just check it's an intersection on the path you want to cut, and keep it
        // the intersections you have found are then fed to ConvertPositionsToMoveTo() which will
        // make new subpath at each one of these positions
        // inversion pour l'opŽration
        {
            Path* swap=originaux[0];originaux[0]=originaux[1];originaux[1]=swap;
            int   swai=origWind[0];origWind[0]=origWind[1];origWind[1]=(fill_typ)swai;
        }
        originaux[0]->ConvertWithBackData (1.0);
    
        originaux[0]->Fill (theShapeA, 0,false,false,false); // don't closeIfNeeded
        
        originaux[1]->ConvertWithBackData (1.0);
    
        originaux[1]->Fill (theShapeA, 1,true,false,false);// don't closeIfNeeded and just dump in the shape, don't reset it
    
        theShape->ConvertToShape (theShapeA, fill_justDont);
  
        if ( theShape->hasBackData() ) {
            // should always be the case, but ya never know
            {
                for (int i = 0; i < theShape->numberOfPoints(); i++) {
                    if ( theShape->getPoint(i).totalDegree() > 2 ) { 
                        // possibly an intersection
                        // we need to check that at least one edge from the source path is incident to it
                        // before we declare it's an intersection
                        int cb = theShape->getPoint(i).incidentEdge[FIRST];
                        int   nbOrig=0;
                        int   nbOther=0;
                        int   piece=-1;
                        float t=0.0;
                        while ( cb >= 0 && cb < theShape->numberOfEdges() ) {
                            if ( theShape->ebData[cb].pathID == 0 ) {
                                // the source has an edge incident to the point, get its position on the path
                                piece=theShape->ebData[cb].pieceID;
                                if ( theShape->getEdge(cb).st == i ) {
                                    t=theShape->ebData[cb].tSt;
                                } else {
                                    t=theShape->ebData[cb].tEn;
                                }
                                nbOrig++;
                            }
                            if ( theShape->ebData[cb].pathID == 1 ) nbOther++; // the cut is incident to this point
                            cb=theShape->NextAt(i,cb);
                        }
                        if ( nbOrig > 0 && nbOther > 0 ) {
                            // point incident to both path and cut: an intersection
                            // note that you only keep one position on the source; you could have degenerate
                            // cases where the source crosses itself at this point, and you wouyld miss an intersection
                            toCut=(Path::cut_position*)realloc(toCut,(nbToCut+1)*sizeof(Path::cut_position));
                            toCut[nbToCut].piece=piece;
                            toCut[nbToCut].t=t;
                            nbToCut++;
                        }
                    }
                }
            }
            {
                // i think it's useless now
                int i = theShape->numberOfEdges() - 1;
                for (;i>=0;i--) {
                    if ( theShape->ebData[i].pathID == 1 ) {
                        theShape->SubEdge(i);
                    }
                }
            }
      
        }
    }
  
    int*    nesting=NULL;
    int*    conts=NULL;
    int     nbNest=0;
    // pour compenser le swap juste avant
    if ( bop == bool_op_slice ) {
//    theShape->ConvertToForme (res, nbOriginaux, originaux,true);
//    res->ConvertForcedToMoveTo();
        res->Copy(originaux[0]);
        res->ConvertPositionsToMoveTo(nbToCut,toCut); // cut where you found intersections
        free(toCut);
    } else if ( bop == bool_op_cut ) {
        // il faut appeler pour desallouer PointData (pas vital, mais bon)
        // the Booleen() function did not deallocated the point_data array in theShape, because this 
        // function needs it.
        // this function uses the point_data to get the winding number of each path (ie: is a hole or not)
        // for later reconstruction in objects, you also need to extract which path is parent of holes (nesting info)
        theShape->ConvertToFormeNested (res,nbOriginaux, originaux, 1,nbNest,nesting,conts);
    } else {
        theShape->ConvertToForme (res, nbOriginaux, originaux);
    }
  
    delete theShape;
    delete theShapeA;
    delete theShapeB;
    for (int i = 0; i < nbOriginaux; i++)  delete originaux[i];
 
    if (res->descr_cmd.size() <= 1)
    {
        // only one command, presumably a moveto: it isn't a path
        for (GSList *l = il; l != NULL; l = l->next)
        {
            SP_OBJECT (l->data)->deleteObject();
        }
        sp_document_done (SP_DT_DOCUMENT (desktop));
        selection->clear();
    
        delete res;
        g_slist_free (il);
        return;
    }
  
    // remember important aspects of the source path, to be restored
    SPRepr *repr_source;
    if ( bop == bool_op_diff || bop == bool_op_symdiff || bop == bool_op_cut || bop == bool_op_slice ) {
        if (reverseOrderForOp) {
             repr_source = SP_OBJECT_REPR (il->data);
        } else {
             repr_source = SP_OBJECT_REPR (il->next->data);
        }
    } else {
        // find out the bottom object
        GSList *sorted =      g_slist_copy ((GSList *) selection->reprList());

        sorted = g_slist_sort (sorted, (GCompareFunc) sp_repr_compare_position);
        repr_source = ((SPRepr *) sorted->data);
        g_slist_free (sorted);
    }
    gint pos = sp_repr_position (repr_source);
    SPRepr *parent = sp_repr_parent (repr_source);
    const char *id = sp_repr_attr (repr_source, "id");
    const char *style = sp_repr_attr (repr_source, "style");
    

    // remove source paths
    selection->clear();
    for (GSList *l = il; l != NULL; l = l->next) {
        // if this is the bottommost object,
        if (!strcmp (sp_repr_attr (SP_OBJECT_REPR (l->data), "id"), id)) {
            // delete it so that its clones don't get alerted; this object will be restored shortly, with the same id
            SP_OBJECT (l->data)->deleteObject(false);
        } else {
            // delete the object for real, so that its clones can take appropriate action
            SP_OBJECT (l->data)->deleteObject();
        }
    }
    g_slist_free (il);

    // premultiply by the inverse of parent's repr
    SPItem *parent_item = SP_ITEM(SP_DT_DOCUMENT(desktop)->getObjectByRepr(parent));
    NR::Matrix local = sp_item_i2doc_affine(parent_item);
    gchar affinestr[80];
    gchar *transform = NULL;
    if (!local.test_identity() && sp_svg_transform_write(affinestr, 79, local.inverse())) {
        transform = affinestr;
    }

    // now that we have the result, add it on the canvas
    if ( bop == bool_op_cut || bop == bool_op_slice ) {
        int    nbRP=0;
        Path** resPath;
        if ( bop == bool_op_slice ) {
            // there are moveto's at each intersection, but it's still one unique path
            // so break it down and add each subpath independently
            // we could call break_apart to do this, but while we have the description...
            resPath=res->SubPaths(nbRP, false);
        } else {
            // cut operation is a bit wicked: you need to keep holes
            // that's why you needed the nesting
            // ConvertToFormeNested() dumped all the subpath in a single Path "res", so we need
            // to get the path for each part of the polygon. that's why you need the nesting info:
            // to know in wich subpath to add a subpath
            resPath=res->SubPathsWithNesting(nbRP, true, nbNest, nesting, conts);
      
            // cleaning
            if ( conts ) free (conts);
            if ( nesting ) free (nesting);
        }

        // add all the pieces resulting from cut or slice
        for (int i=0;i<nbRP;i++) {
            gchar *d = resPath[i]->svg_dump_path ();
      
            SPRepr *repr = sp_repr_new ("svg:path");
            sp_repr_set_attr (repr, "style", style);
            sp_repr_set_attr (repr, "d", d);
            g_free (d);

            // for slice, remove fill
            if (bop == bool_op_slice) {
                SPCSSAttr *css;        
        
                css = sp_repr_css_attr_new ();
                sp_repr_css_set_property (css, "fill", "none");
 
                sp_repr_css_change (repr, css, "style");
        
                sp_repr_css_attr_unref (css);
            }

            // we assign the same id on all pieces, but it on adding to document, it will be changed on all except one
            // this means it's basically random which of the pieces inherits the original's id and clones
            // a better algorithm might figure out e.g. the biggest piece
            sp_repr_set_attr (repr, "id", id);

            sp_repr_set_attr (repr, "transform", transform);

            // add the new repr to the parent
            sp_repr_append_child (parent, repr);

            // move to the saved position 
            sp_repr_set_position_absolute (repr, pos > 0 ? pos : 0);
  
            selection->addRepr(repr);
            sp_repr_unref (repr);

            delete resPath[i];
        }
        if ( resPath ) free(resPath);

    } else {
        gchar *d = res->svg_dump_path ();

        SPRepr *repr = sp_repr_new ("svg:path");
        sp_repr_set_attr (repr, "style", style);

        sp_repr_set_attr (repr, "d", d);
        g_free (d);

        sp_repr_set_attr (repr, "transform", transform);

        sp_repr_set_attr (repr, "id", id);
        sp_repr_append_child (parent, repr);
        sp_repr_set_position_absolute (repr, pos > 0 ? pos : 0);
     
        selection->addRepr(repr);
        sp_repr_unref (repr);
    }

    sp_document_done (SP_DT_DOCUMENT (desktop));

    delete res;
}


void
sp_selected_path_outline ()
{
    SPDesktop *desktop = SP_ACTIVE_DESKTOP;
    if (!SP_IS_DESKTOP (desktop))
        return;

    SPSelection *selection = SP_DT_SELECTION (desktop);

    if (selection->isEmpty()) {
        // TRANSLATORS: "to outline" means "to convert stroke to path"
        desktop->messageStack()->flash(Inkscape::WARNING_MESSAGE, _("Select <b>path(s)</b> to outline."));
        return;
    }

    bool did = false;

    for (GSList *items = g_slist_copy((GSList *) selection->itemList());
         items != NULL;
         items = items->next) {

        SPItem *item = (SPItem *) items->data;

        if (!SP_IS_SHAPE (item) && !SP_IS_TEXT (item))
            continue;

        SPCurve *curve = NULL;
        if (SP_IS_SHAPE (item)) {
            curve = sp_shape_get_curve (SP_SHAPE (item));
            if (curve == NULL)
                continue;
        }
        if (SP_IS_TEXT (item)) {
            curve = sp_text_normalized_bpath (SP_TEXT (item));
            if (curve == NULL)
                continue;
        }

        {   // pas de stroke pas de chocolat
            SPCSSAttr *css;
            const gchar *val;
    
            css = sp_repr_css_attr (SP_OBJECT_REPR (item), "style");
            val = sp_repr_css_property (css, "stroke", NULL);
    
            if (val == NULL || strcmp (val, "none") == 0) {
                sp_curve_unref (curve);
                continue;
            }
        }

        // remember old stroke style, to be set on fill
        SPCSSAttr *ncss;
        {
            SPCSSAttr *ocss;
            const gchar *val;
            const gchar *opac;
      
            ocss = sp_repr_css_attr (SP_OBJECT_REPR (item), "style");
            val = sp_repr_css_property (ocss, "stroke", NULL);
            opac = sp_repr_css_property (ocss, "stroke-opacity", NULL);
      
            ncss = sp_repr_css_attr_new ();
      
            sp_repr_css_set_property (ncss, "stroke", "none");
            sp_repr_css_set_property (ncss, "stroke-opacity", "1.0");
            sp_repr_css_set_property (ncss, "fill", val);
            if ( opac ) {
                sp_repr_css_set_property (ncss, "fill-opacity", opac);
            } else {
                sp_repr_css_set_property (ncss, "fill-opacity", "1.0");
            }
        }

        NR::Matrix const transform(item->transform);
        gchar *style = g_strdup (sp_repr_attr (SP_OBJECT_REPR (item), "style"));

        float o_width, o_miter;
        JoinType o_join;
        ButtType o_butt;
     
        {
            SPStyle *i_style = SP_OBJECT (item)->style;
            int jointype, captype;

            jointype = i_style->stroke_linejoin.value;
            captype = i_style->stroke_linecap.value;
            o_width = i_style->stroke_width.computed;

            switch (jointype) {
            case SP_STROKE_LINEJOIN_MITER:
                o_join = join_pointy;
                break;
            case SP_STROKE_LINEJOIN_ROUND:
                o_join = join_round;
                break;
            default:
                o_join = join_straight;
                break;
            }

            switch (captype) {
            case SP_STROKE_LINECAP_SQUARE:
                o_butt = butt_square;
                break;
            case SP_STROKE_LINECAP_ROUND:
                o_butt = butt_round;
                break;
            default:
                o_butt = butt_straight;
                break;
            }

            if (o_width < 0.1)
                o_width = 0.1;
            o_miter = i_style->stroke_miterlimit.value * o_width;
        }

        Path *orig = Path_for_item (item, false);
        if (orig == NULL) {
            g_free (style);
            sp_curve_unref (curve);
            continue;
        }

        Path *res = new Path;
        res->SetBackData (false);


        {
            orig->Outline (res, 0.5 * o_width, o_join, o_butt, 0.5 * o_miter);
    
            orig->Coalesce (0.5 * o_width);
        
            Shape *theShape = new Shape;
            Shape *theRes = new Shape;
    
            res->ConvertWithBackData (1.0);
            res->Fill (theShape, 0);
            theRes->ConvertToShape (theShape, fill_positive);
    
            Path *originaux[1];
            originaux[0] = res;
            theRes->ConvertToForme (orig, 1, originaux);
    
            delete theShape;
            delete theRes;
        }

        if (orig->descr_cmd.size() <= 1) {
            // ca a merdŽ, ou bien le resultat est vide
            delete res;
            delete orig;
            g_free (style);
            continue;
        }

        did = true;

        sp_curve_unref (curve);
        // remember the position of the item
        gint pos = sp_repr_position (SP_OBJECT_REPR (item));
        // remember parent
        SPRepr *parent = SP_OBJECT_REPR (item)->parent();
        // remember id
        const char *id = sp_repr_attr (SP_OBJECT_REPR (item), "id");

        selection->removeItem (item);
        SP_OBJECT (item)->deleteObject(false);

        if (res->descr_cmd.size() > 1) { // if there's 0 or 1 node left, drop this path altogether

            SPRepr *repr = sp_repr_new ("svg:path");

            // restore old style
            sp_repr_set_attr (repr, "style", style);

            // set old stroke style on fill
            sp_repr_css_change (repr, ncss, "style");
     
            sp_repr_css_attr_unref (ncss);

            gchar *str = orig->svg_dump_path ();
            sp_repr_set_attr (repr, "d", str);
            g_free (str);

            // add the new repr to the parent
            sp_repr_append_child (parent, repr);

            // move to the saved position 
            sp_repr_set_position_absolute (repr, pos > 0 ? pos : 0);

            sp_repr_set_attr (repr, "id", id);

            SPItem *newitem = (SPItem *) SP_DT_DOCUMENT (desktop)->getObjectByRepr(repr);
            sp_item_write_transform (newitem, repr, transform);

            selection->addRepr (repr);

            sp_repr_unref (repr);
        }

        delete res;
        delete orig;
        g_free (style);

    }
  
    if (did) {
        sp_document_done (SP_DT_DOCUMENT (desktop));
    } else {
        // TRANSLATORS: "to outline" means "to convert stroke to path"
        desktop->messageStack()->flash(Inkscape::ERROR_MESSAGE, _("<b>No stroked paths</b> to outline in the selection."));
        return;
    } 
}


void
sp_selected_path_offset ()
{
    double prefOffset = prefs_get_double_attribute ("options.defaultoffsetwidth", "value", 1.0);

    sp_selected_path_do_offset (true, prefOffset);
}
void
sp_selected_path_inset ()
{
    double prefOffset = prefs_get_double_attribute ("options.defaultoffsetwidth", "value", 1.0);

    sp_selected_path_do_offset (false, prefOffset);
}

void
sp_selected_path_offset_screen (double pixels)
{
    sp_selected_path_do_offset (true,  pixels / SP_DESKTOP_ZOOM (SP_ACTIVE_DESKTOP));
}

void
sp_selected_path_inset_screen (double pixels)
{
    sp_selected_path_do_offset (false,  pixels / SP_DESKTOP_ZOOM (SP_ACTIVE_DESKTOP));
}


void sp_selected_path_create_offset_object_zero ()
{
    sp_selected_path_create_offset_object (0, false);
}

void sp_selected_path_create_offset ()
{
    sp_selected_path_create_offset_object (1, false);
}
void sp_selected_path_create_inset ()
{
    sp_selected_path_create_offset_object (-1, false);
}

void sp_selected_path_create_updating_offset_object_zero ()
{
    sp_selected_path_create_offset_object (0, true);
}

void sp_selected_path_create_updating_offset ()
{
    sp_selected_path_create_offset_object (1,true);
}
void sp_selected_path_create_updating_inset ()
{
    sp_selected_path_create_offset_object (-1,true);
}

void
sp_selected_path_create_offset_object (int expand, bool updating)
{
    SPSelection *selection;
    SPRepr *repr;
    SPItem *item;
    SPCurve *curve;
    gchar *style, *str;
    SPDesktop *desktop;
    float o_width, o_miter;
    JoinType o_join;
    ButtType o_butt;
  
    curve = NULL;
  
    desktop = SP_ACTIVE_DESKTOP;
    if (!SP_IS_DESKTOP (desktop))
        return;
  
    selection = SP_DT_SELECTION (desktop);
  
    item = selection->singleItem();
  
    if (item == NULL || ( !SP_IS_SHAPE (item) && !SP_IS_TEXT (item) ) ) {
        desktop->messageStack()->flash(Inkscape::ERROR_MESSAGE, _("Selected object is <b>not a path</b>, cannot inset/outset."));
        return;
    }
    if (SP_IS_SHAPE (item))
    {
        curve = sp_shape_get_curve (SP_SHAPE (item));
        if (curve == NULL)
            return;
    }
    if (SP_IS_TEXT (item))
    {
        curve = sp_text_normalized_bpath (SP_TEXT (item));
        if (curve == NULL)
            return;
    }
  
    NR::Matrix const transform(item->transform);

    sp_item_write_transform(item, SP_OBJECT_REPR(item), NR::identity());

    style = g_strdup (sp_repr_attr (SP_OBJECT (item)->repr, "style"));

    // remember the position of the item
    gint pos = sp_repr_position (SP_OBJECT_REPR (item));
    // remember parent
    SPRepr *parent = SP_OBJECT_REPR (item)->parent();
  
    {
        SPStyle *i_style = SP_OBJECT (item)->style;
        int jointype, captype;
    
        jointype = i_style->stroke_linejoin.value;
        captype = i_style->stroke_linecap.value;
        o_width = i_style->stroke_width.computed;
        if (jointype == SP_STROKE_LINEJOIN_MITER)
        {
            o_join = join_pointy;
        }
        else if (jointype == SP_STROKE_LINEJOIN_ROUND)
        {
            o_join = join_round;
        }
        else
        {
            o_join = join_straight;
        }
        if (captype == SP_STROKE_LINECAP_SQUARE)
        {
            o_butt = butt_square;
        }
        else if (captype == SP_STROKE_LINECAP_ROUND)
        {
            o_butt = butt_round;
        }
        else
        {
            o_butt = butt_straight;
        }
    
        {
            double    prefOffset=1.0;
            prefOffset=prefs_get_double_attribute("options.defaultoffsetwidth","value",prefOffset);
            o_width=prefOffset;
        }
    
        if (o_width < 0.01)
            o_width = 0.01;               
        o_miter = i_style->stroke_miterlimit.value * o_width;
    }
  
    Path *orig = Path_for_item (item, true, false);
    if (orig == NULL)
    {
        g_free (style);
        sp_curve_unref (curve);
        return;
    }
  
    Path *res = new Path;
    res->SetBackData (false);
  
    {
        SPCSSAttr *css;
        const gchar *val;
    
        Shape *theShape = new Shape;
        Shape *theRes = new Shape;
    
        orig->ConvertWithBackData (1.0);
        orig->Fill (theShape, 0);
    
        css = sp_repr_css_attr (SP_OBJECT_REPR (item), "style");
        val = sp_repr_css_property (css, "fill-rule", NULL);
        if (val && strcmp (val, "nonzero") == 0)
        {
            theRes->ConvertToShape (theShape, fill_nonZero);
        }
        else if (val && strcmp (val, "evenodd") == 0)
        {
            theRes->ConvertToShape (theShape, fill_oddEven);
        }
        else
        {
            theRes->ConvertToShape (theShape, fill_nonZero);
        }
    
        Path *originaux[1];
        originaux[0] = orig;
        theRes->ConvertToForme (res, 1, originaux);
    
        delete theShape;
        delete theRes;
    }
  
    sp_curve_unref (curve);
  
    if (res->descr_cmd.size() <= 1)
    {
        // pas vraiment de points sur le resultat
        // donc il ne reste rien
        sp_document_done (SP_DT_DOCUMENT (desktop));
        selection->clear();
    
        delete res;
        delete orig;
        g_free (style);
        return;
    }
  
    {
        //              SPCSSAttr *css;
        //              const gchar *val;
        gchar tstr[80];
    
        tstr[79] = '\0';
    
        repr = sp_repr_new ("svg:path");
        sp_repr_set_attr (repr, "sodipodi:type", "inkscape:offset");
        if (expand > 0)
        {
            sp_repr_set_double (repr, "inkscape:radius", o_width);
        }
        else if (expand < 0)
        {
            sp_repr_set_double (repr, "inkscape:radius", -o_width);
        }
        else 
        {
            sp_repr_set_double (repr, "inkscape:radius",  0);
        }

        str = res->svg_dump_path ();
        sp_repr_set_attr (repr, "inkscape:original", str);
        g_free (str);
    
        if ( updating ) {
            const char *id = sp_repr_attr(SP_OBJECT(item)->repr,"id");
            const char *uri = g_strdup_printf ("#%s", id);
            sp_repr_set_attr (repr, "xlink:href", uri);
            g_free ((void *) uri);
        } else {
            sp_repr_set_attr (repr, "inkscape:href", NULL);
        }
      
        sp_repr_set_attr (repr, "style", style);

        // add the new repr to the parent
        sp_repr_append_child (parent, repr);

        // move to the saved position 
        sp_repr_set_position_absolute (repr, pos > 0 ? pos : 0);

        SPItem *nitem = (SPItem *) SP_DT_DOCUMENT (desktop)->getObjectByRepr(repr);

        if ( updating ) {
            // on conserve l'original
            // we reapply the transform to the original (offset will feel it)
            sp_item_write_transform (item, SP_OBJECT_REPR(item), transform);
        } else {
            // delete original, apply the transform to the offset
            SP_OBJECT (item)->deleteObject(false);
            sp_item_write_transform (nitem, repr, transform);
        }

        // The object just created from a temporary repr is only a seed. 
        // We need to invoke its write which will update its real repr (in particular adding d=)
        SP_OBJECT (nitem)->updateRepr();

        sp_repr_unref (repr);

        selection->setItem (nitem);
    }
  
    sp_document_done (SP_DT_DOCUMENT (desktop));
  
    delete res;
    delete orig;
  
    g_free (style);
}











                  
void
sp_selected_path_do_offset (bool expand, double prefOffset)
{
    SPDesktop *desktop = SP_ACTIVE_DESKTOP;
    if (!SP_IS_DESKTOP (desktop))
        return;

    SPSelection *selection = SP_DT_SELECTION (desktop);

    if (selection->isEmpty()) {
        desktop->messageStack()->flash(Inkscape::WARNING_MESSAGE, _("Select <b>path(s)</b> to inset/outset."));
        return;
    }

    bool did = false;

    for (GSList *items = g_slist_copy((GSList *) selection->itemList());
         items != NULL;
         items = items->next) {

        SPItem *item = (SPItem *) items->data;

        if (!SP_IS_SHAPE (item) && !SP_IS_TEXT (item))
            continue;

        SPCurve *curve = NULL;
        if (SP_IS_SHAPE (item)) {
            curve = sp_shape_get_curve (SP_SHAPE (item));
            if (curve == NULL)
                continue;
        }
        if (SP_IS_TEXT (item)) {
            curve = sp_text_normalized_bpath (SP_TEXT (item));
            if (curve == NULL)
                continue;
        }

        NR::Matrix const transform(item->transform);

        sp_item_write_transform(item, SP_OBJECT_REPR(item), NR::identity());

        gchar *style = g_strdup (sp_repr_attr (SP_OBJECT_REPR (item), "style"));

        float o_width, o_miter;
        JoinType o_join;
        ButtType o_butt;
     
        {
            SPStyle *i_style = SP_OBJECT (item)->style;
            int jointype, captype;

            jointype = i_style->stroke_linejoin.value;
            captype = i_style->stroke_linecap.value;
            o_width = i_style->stroke_width.computed;

            switch (jointype) {
            case SP_STROKE_LINEJOIN_MITER:
                o_join = join_pointy;
                break;
            case SP_STROKE_LINEJOIN_ROUND:
                o_join = join_round;
                break;
            default:
                o_join = join_straight;
                break;
            }

            switch (captype) {
            case SP_STROKE_LINECAP_SQUARE:
                o_butt = butt_square;
                break;
            case SP_STROKE_LINECAP_ROUND:
                o_butt = butt_round;
                break;
            default:
                o_butt = butt_straight;
                break;
            }

            o_width = prefOffset;

            if (o_width < 0.1)
                o_width = 0.1;
            o_miter = i_style->stroke_miterlimit.value * o_width;
        }

        Path *orig = Path_for_item (item, false);
        if (orig == NULL) {
            g_free (style);
            sp_curve_unref (curve);
            continue;
        }

        Path *res = new Path;
        res->SetBackData (false);

        {
            SPCSSAttr *css;
            const gchar *val;

            Shape *theShape = new Shape;
            Shape *theRes = new Shape;

            orig->ConvertWithBackData (1.0);
            orig->Fill (theShape, 0);

            css = sp_repr_css_attr (SP_OBJECT_REPR (item), "style");
            val = sp_repr_css_property (css, "fill-rule", NULL);
            if (val && strcmp (val, "nonzero") == 0)
            {
                theRes->ConvertToShape (theShape, fill_nonZero);
            }
            else if (val && strcmp (val, "evenodd") == 0)
            {
                theRes->ConvertToShape (theShape, fill_oddEven);
            }
            else
            {
                theRes->ConvertToShape (theShape, fill_nonZero);
            }

            // et maintenant: offset
            // methode inexacte
/*                Path *originaux[1];
                  originaux[0] = orig;
                  theRes->ConvertToForme (res, 1, originaux);

                  if (expand) {
                        res->OutsideOutline (orig, 0.5 * o_width, o_join, o_butt, o_miter);
                  } else {
                        res->OutsideOutline (orig, -0.5 * o_width, o_join, o_butt, o_miter);
                  }
    
                  orig->ConvertWithBackData (1.0);
                  orig->Fill (theShape, 0);
                  theRes->ConvertToShape (theShape, fill_positive);
                  originaux[0] = orig;
                  theRes->ConvertToForme (res, 1, originaux);
    
                  if (o_width >= 0.5) {
                        //     res->Coalesce (1.0);
                        res->ConvertEvenLines (1.0);
                        res->Simplify (1.0);
                  } else {
                        //      res->Coalesce (o_width);
                        res->ConvertEvenLines (1.0*o_width);
                        res->Simplify (1.0 * o_width);
                  }    */
            // methode par makeoffset

            if (expand)
            {
                theShape->MakeOffset(theRes, o_width, o_join, o_miter);
            }
            else
            {
                theShape->MakeOffset(theRes, -o_width, o_join, o_miter);
            }
            theRes->ConvertToShape(theShape,fill_positive);
                        
            res->Reset();
            theRes->ConvertToForme (res);

            if (o_width >= 1.0)
            {
                res->ConvertEvenLines (1.0);
                res->Simplify (1.0);
            }
            else
            {
                res->ConvertEvenLines (1.0*o_width);
                res->Simplify (1.0 * o_width);
            }      

            delete theShape;
            delete theRes;
        }           

        did = true;

        sp_curve_unref (curve);
        // remember the position of the item
        gint pos = sp_repr_position (SP_OBJECT_REPR (item));
        // remember parent
        SPRepr *parent = SP_OBJECT_REPR (item)->parent();
        // remember id
        const char *id = sp_repr_attr (SP_OBJECT_REPR (item), "id");

        selection->removeItem (item);
        SP_OBJECT (item)->deleteObject(false);

        if (res->descr_cmd.size() > 1) { // if there's 0 or 1 node left, drop this path altogether

            gchar tstr[80];

            tstr[79] = '\0';

            SPRepr *repr = sp_repr_new ("svg:path");

            sp_repr_set_attr (repr, "style", style);

            gchar *str = res->svg_dump_path ();
            sp_repr_set_attr (repr, "d", str);
            g_free (str);

            // add the new repr to the parent
            sp_repr_append_child (parent, repr);

            // move to the saved position 
            sp_repr_set_position_absolute (repr, pos > 0 ? pos : 0);

            SPItem *newitem = (SPItem *) SP_DT_DOCUMENT (desktop)->getObjectByRepr(repr);

            // reapply the transform
            sp_item_write_transform (newitem, repr, transform);

            sp_repr_set_attr (repr, "id", id);

            selection->addRepr (repr);

            sp_repr_unref (repr);
        }
    }
  
    if (did) {
        sp_document_done (SP_DT_DOCUMENT (desktop));
    } else {
        desktop->messageStack()->flash(Inkscape::ERROR_MESSAGE, _("<b>No paths</b> to inset/outset in the selection."));
        return;
    } 
}



//return true if we changed something, else false
bool
sp_selected_path_simplify_item(SPDesktop *desktop, SPSelection *selection, SPItem *item,
                 float threshold,  bool justCoalesce,
                 float angleLimit, bool breakableAngles,
                 gdouble size,     bool modifySelection)
{
    if (!(SP_IS_GROUP(item) || SP_IS_SHAPE (item) || SP_IS_TEXT (item)))
        return false;

    //If this is a group, do the children instead
    if (SP_IS_GROUP (item)) {
    
        bool didSomething = false;

        for ( GSList *children = sp_item_group_item_list (SP_GROUP (item));
                 children  ; children = children->next) {
                 
            SPItem *child = (SPItem *) children->data;
            didSomething |= sp_selected_path_simplify_item(desktop, selection, child, threshold, justCoalesce,
                   angleLimit, breakableAngles, size, false);
        }
        
        return didSomething;
    }
        

    SPCurve *curve = NULL;
    
    if (SP_IS_SHAPE (item)) {
        curve = sp_shape_get_curve (SP_SHAPE (item));
        if (!curve)
            return false;
    }

    if (SP_IS_TEXT (item)) {
        curve = sp_text_normalized_bpath (SP_TEXT (item));
        if (!curve)
            return false;
    }

    // save the transform, to re-apply it after simplification
    NR::Matrix const transform(item->transform);

    /*
       reset the transform, effectively transforming the item by transform.inverse();
       this is necessary so that the item is transformed twice back and forth,
       allowing all compensations to cancel out regardless of the preferences
    */
    sp_item_write_transform(item, SP_OBJECT_REPR(item), NR::identity());

    gchar *style = g_strdup (sp_repr_attr (SP_OBJECT_REPR (item), "style"));

    Path *orig = Path_for_item (item, false);
    if (orig == NULL) {
        g_free (style);
        sp_curve_unref (curve);
        return false;
    }

    sp_curve_unref (curve);
    // remember the position of the item
    gint pos = sp_repr_position (SP_OBJECT_REPR (item));
    // remember parent
    SPRepr *parent = SP_OBJECT_REPR (item)->parent();
    // remember id
    const char *id = sp_repr_attr (SP_OBJECT_REPR (item), "id");

    //If a group was selected, to not change the selection list
    if (modifySelection)
        selection->removeItem (item);
        
    SP_OBJECT (item)->deleteObject(false);

    if ( justCoalesce ) {
        orig->Coalesce (threshold * size);
    } else {
        orig->ConvertEvenLines (threshold * size);
        orig->Simplify (threshold * size);
    }

    SPRepr *repr = sp_repr_new ("svg:path");

    sp_repr_set_attr (repr, "style", style);

    gchar *str = orig->svg_dump_path ();
    sp_repr_set_attr (repr, "d", str);
    g_free (str);

    // restore id
    sp_repr_set_attr (repr, "id", id);

    // add the new repr to the parent
    sp_repr_append_child (parent, repr);

    // move to the saved position 
    sp_repr_set_position_absolute (repr, pos > 0 ? pos : 0);

    SPItem *newitem = (SPItem *) SP_DT_DOCUMENT (desktop)->getObjectByRepr(repr);

    // reapply the transform
    sp_item_write_transform (newitem, repr, transform);

    //If we are not in a selected group
    if (modifySelection)
        selection->addRepr (repr);

    sp_repr_unref (repr);

    // clean up
    if (orig) delete orig;

    return true;
}


void
sp_selected_path_simplify_selection (float threshold, bool justCoalesce,
                       float angleLimit, bool breakableAngles)
{
    SPDesktop *desktop = SP_ACTIVE_DESKTOP;
    if (!SP_IS_DESKTOP (desktop))
        return;

    SPSelection *selection = SP_DT_SELECTION (desktop);

    if (selection->isEmpty()) {
        desktop->messageStack()->flash(Inkscape::WARNING_MESSAGE,
                         _("Select <b>path(s)</b> to simplify."));
        return;
    }

    // remember selection size
    NR::Rect bbox = selection->bounds();
    gdouble size  = L2(bbox.dimensions());

    bool didSomething = false;

    //Loop through all of the items in the selection
    for (GSList *items = g_slist_copy((GSList *) selection->itemList());
                        items != NULL; items = items->next) {

        SPItem *item = (SPItem *) items->data;

        if (!(SP_IS_GROUP(item) || SP_IS_SHAPE (item) || SP_IS_TEXT (item)))
            continue;

        didSomething |= sp_selected_path_simplify_item(desktop, selection, item,
                           threshold, justCoalesce, angleLimit, breakableAngles, size, true);
    }
        

    if (didSomething)
        sp_document_done (SP_DT_DOCUMENT (desktop));
    else
        desktop->messageStack()->flash(Inkscape::ERROR_MESSAGE, _("<b>No paths</b> to simplify in the selection."));

}


// globals for keeping track of accelerated simplify
static double previousTime      = 0.0;
static gdouble simplifyMultiply = 1.0;

void
sp_selected_path_simplify (void)
{
    gdouble simplifyThreshold =
        prefs_get_double_attribute ("options.simplifythreshold","value", 0.003);
    bool simplifyJustCoalesce = 
        (bool) prefs_get_int_attribute ("options.simplifyjustcoalesce","value", 0);

    //Get the current time
    GTimeVal currentTimeVal;
    g_get_current_time (&currentTimeVal);
    double currentTime = currentTimeVal.tv_sec * 1000000 +
                currentTimeVal.tv_usec;

    //Was the previous call to this function recent? (<0.5 sec)
    if (previousTime > 0.0 && currentTime - previousTime < 500000.0) { 

        // add to the threshold 1/2 of its original value
        simplifyMultiply  += 0.5;
        simplifyThreshold *= simplifyMultiply;

    } else {
        // reset to the default
        simplifyMultiply = 1;
    }

    //remember time for next call
    previousTime = currentTime;

    //g_print ("%g\n", simplify_threshold);

    //Make the actual call
    sp_selected_path_simplify_selection(simplifyThreshold,
                      simplifyJustCoalesce, 0.0, false);
}



// fonctions utilitaires

bool
Ancetre (SPRepr * a, SPRepr * who)
{
    if (who == NULL || a == NULL)
        return false;
    if (who == a)
        return true;
    return Ancetre (sp_repr_parent (a), who);
}

Path *
Path_for_item (SPItem * item, bool doTransformation, bool transformFull)
{
    SPCurve *curve;
  
    if (!item)
        return NULL;
  
    if (SP_IS_SHAPE (item))
    {
        curve = sp_shape_get_curve (SP_SHAPE (item));
    }
    else if (SP_IS_TEXT (item))
    {
        curve = sp_text_normalized_bpath (SP_TEXT (item));
    }
    else
    {
        curve = NULL;
    }
  
    if (!curve)
        return NULL;
    NArtBpath *bpath = curve->bpath;
    if (bpath == NULL)
        return NULL;
  
    if ( doTransformation ) {
        if (transformFull)
            bpath = nr_artpath_affine (curve->bpath, sp_item_i2doc_affine (item));
        else 
            bpath = nr_artpath_affine (curve->bpath, item->transform);
        sp_curve_unref (curve);
        curve=NULL;
    } else {
        bpath=curve->bpath;
    }

    Path *dest = new Path;
    dest->SetBackData (false);
    {
        int   i;
        bool  closed = false;
        float lastX  = 0.0;
        float lastY  = 0.0;
    
        for (i = 0; bpath[i].code != NR_END; i++)
        {
            switch (bpath[i].code)
            {
            case NR_LINETO:
                lastX = bpath[i].x3;
                lastY = bpath[i].y3;
                {
                    NR::Point  tmp(lastX,lastY);
                    dest->LineTo (tmp);
                }
                break;
          
            case NR_CURVETO:
            {
                NR::Point  tmp,tms,tme;
                tmp[0]=bpath[i].x3;
                tmp[1]=bpath[i].y3;
                tms[0]=3 * (bpath[i].x1 - lastX);
                tms[1]=3 * (bpath[i].y1 - lastY);
                tme[0]=3 * (bpath[i].x3 - bpath[i].x2);
                tme[1]=3 * (bpath[i].y3 - bpath[i].y2);
                dest->CubicTo (tmp,tms,tme);
            }
            lastX = bpath[i].x3;
            lastY = bpath[i].y3;
            break;
          
            case NR_MOVETO_OPEN:
            case NR_MOVETO:
                if (closed)
                    dest->Close ();
                closed = (bpath[i].code == NR_MOVETO);
                lastX = bpath[i].x3;
                lastY = bpath[i].y3;
                {
                    NR::Point  tmp(lastX,lastY);
                    dest->MoveTo (tmp);
                }
                break;
            default:
                break;
            }
        }
        if (closed)
            dest->Close ();
    }
  
    if ( doTransformation ) {
        if ( bpath ) nr_free (bpath);
    } else {
        sp_curve_unref(curve);
    }
    return dest;
}

/*
  Local Variables:
  mode:c++
  c-file-style:"stroustrup"
  c-file-offsets:((innamespace . 0)(inline-open . 0))
  indent-tabs-mode:nil
  fill-column:99
  End:
*/
// vim: filetype=c++:expandtab:shiftwidth=4:tabstop=8:softtabstop=4 :

Generated by  Doxygen 1.6.0   Back to index