/*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions are met:
* Redistributions of source code must retain the above copyright notice, this
* list of conditions and the following disclaimer.
* Redistributions in binary form must reproduce the above copyright notice,
* this list of conditions and the following disclaimer in the documentation
* and/or other materials provided with the distribution.
* The name of the author may not be used to endorse or promote products
* derived from this software without specific prior written permission.
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
* WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
* MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO
* EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
* SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
* PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
* OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
* WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
* OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
* ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/
#include "pfaeditui.h"
#include <math.h>
#if defined(KNIFE_CONTINUOUS) /* Use this code to do cuts as we move along. Probably a bad idea, let's wait till the end */
static void ProcessKnife(CharView *cv, PressedOn *p) {
real dx, dy;
SplinePoint *n;
/* If we've already made a cut, don't make another cut too close to it */
/* ie. if the hand shakes over a cut let's not get about six tiny cut */
/* segments adjacent to one another */
if ( (dx=cv->info.x-cv->lastknife.x)<0 ) dx=-dx;
if ( (dy=cv->info.y-cv->lastknife.y)<0 ) dy=-dy;
if ( (dx+dy)/cv->scale <= 6 )
return;
if ( p->sp==NULL && p->spline==NULL )
return; /* Nothing to cut */
if ( p->spline!=NULL )
p->sp = SplineBisect(p->spline,p->t);
if ( p->spl==NULL ) /* Kanou says this can happen. It doesn't hurt to check for it */
return;
if ( p->spl->first!=p->spl->last )
if ( p->sp==p->spl->first || p->sp==p->spl->last )
return; /* Already cut here */
n = chunkalloc(sizeof(SplinePoint));
p->sp->pointtype = pt_corner;
*n = *p->sp;
n->hintmask = NULL;
p->sp->next = NULL;
n->prev = NULL;
n->next->from = n;
if ( p->spl->first==p->spl->last ) {
p->spl->first = n;
p->spl->last = p->sp;
} else {
SplinePointList *nspl = chunkalloc(sizeof(SplinePointList));
nspl->next = p->spl->next;
p->spl->next = nspl;
nspl->first = n;
nspl->last = p->spl->last;
p->spl->last = p->sp;
}
cv->lastknife.x = cv->info.x;
cv->lastknife.y = cv->info.y;
CVSetCharChanged(cv,true);
SCUpdateAll(cv->b.sc);
}
/* When the user tries to add a point (by doing a mouse down with a point tool
selected) there are several cases to be looked at:
If there is a single point selected and it is at the begining/end of an open spline set
if we clicked on another point which is the begining/end of an open splineset
draw a spline connecting the two spline sets and merge them
(or if it's the same spline set, then close it)
else
create a new point where we clicked
draw a spline between the selected point and the new one
deselect the old point
select the new one
endif
else if they clicked on a spline
split the spline into two bits at the point where they clicked
else
create a new point where they clicked
put it on a new splineset
select it
endif
and, if the old point is a tangent, we may need to adjust its control pt
With the introduction of spiro mode (Raph Levien's clothoid splines)
we've got to worry about all the above cases for spiro points too.
*/
void CVMouseDownPoint(CharView *cv, GEvent *event) {
SplineSet *sel, *ss;
SplinePoint *sp, *base = NULL;
SplineChar *sc = cv->b.sc;
enum pointtype ptype = (cv->active_tool==cvt_curve?pt_curve:
cv->active_tool==cvt_hvcurve?pt_hvcurve:
cv->active_tool==cvt_corner?pt_corner:
cv->active_tool==cvt_tangent?pt_tangent:
/*cv->active_tool==cvt_pen?*/pt_corner);
int order2 = cv->b.layerheads[cv->b.drawmode]->order2;
int order2_style = (order2 && !(event->u.mouse.state&ksm_meta)) ||
(!order2 && (event->u.mouse.state&ksm_meta));
cv->active_spl = NULL;
cv->active_sp = NULL;
if ( cv->b.sc->inspiro && hasspiro()) {
CVMouseDownSpiroPoint(cv, event);
return;
}
sel = CVAnySelPointList(cv);
if ( sel!=NULL ) {
if ( sel->first->selected ) base = sel->first;
else base = sel->last;
if ( base==cv->p.sp )
return; /* We clicked on the active point, that's a no-op */
}
CVPreserveState(&cv->b);
CVClearSel(cv);
if ( sel!=NULL ) {
sp = cv->p.sp;
cv->lastselpt = base;
ss = sel;
if ( base->next!=NULL )
SplineSetReverse(sel);
if ( base->next!=NULL )
IError("Base point not at end of splineset in CVMouseDownPoint");
if ( sp==NULL || (sp->next!=NULL && sp->prev!=NULL) || sp==base ) {
/* Add a new point */
SplineSetSpirosClear(sel);
sp = SplinePointCreate( cv->p.cx, cv->p.cy );
sp->noprevcp = sp->nonextcp = 1;
sp->nextcpdef = sp->prevcpdef = 1;
sp->pointtype = ptype;
sp->selected = true;
if ( !base->nonextcp && order2_style &&
cv->active_tool==cvt_pen ) {
sp->prevcp = base->nextcp;
sp->noprevcp = false;
sp->me.x = ( sp->prevcp.x + sp->nextcp.x )/2;
sp->me.y = ( sp->prevcp.y + sp->nextcp.y )/2;
sp->nonextcp = false;
sp->pointtype = pt_curve;
} else if ( order2 && !base->nonextcp ) {
sp->prevcp = base->nextcp;
sp->noprevcp = false;
if ( cv->active_tool==cvt_pen ) {
sp->nextcp.x = sp->me.x - (sp->prevcp.x-sp->me.x);
sp->nextcp.y = sp->me.y - (sp->prevcp.y-sp->me.y);
sp->nonextcp = false;
sp->pointtype = pt_curve;
}
}
if ( base->nonextcp )
base->nextcpdef = true;
SplineMake(base,sp,order2);
if ( cv->active_tool!=cvt_pen ) {
SplineCharDefaultNextCP(base);
SplineCharDefaultPrevCP(sp);
}
ss->last = sp;
} else if ( cv->p.spl==sel ) {
/* Close the current spline set */
SplineSetSpirosClear(sel);
cv->joinvalid = true;
cv->joinpos = *sp; cv->joinpos.selected = false;
if ( order2 ) {
if ( base->nonextcp || sp->noprevcp ) {
base->nonextcp = sp->noprevcp = true;
base->nextcp = base->me;
sp->prevcp = sp->me;
} else {
base->nextcp.x = sp->prevcp.x = (base->nextcp.x+sp->prevcp.x)/2;
base->nextcp.y = sp->prevcp.y = (base->nextcp.y+sp->prevcp.y)/2;
}
base->nextcpdef = sp->prevcpdef = true;
}
SplineMake(base,sp,order2);
if ( cv->active_tool!=cvt_pen )
SplineCharDefaultNextCP(base);
SplineCharDefaultPrevCP(sp);
ss->last = sp;
if ( sp->pointtype==pt_tangent ) {
SplineCharTangentNextCP(sp);
if ( sp->next ) SplineRefigure(sp->next );
}
} else {
/* Merge two spline sets */
SplineSetSpirosClear(sel);
CVMergeSPLS(cv,sel, base,sp);
}
sp->selected = true;
if ( base->pointtype==pt_tangent ) {
SplineCharTangentPrevCP(base);
if ( base->prev!=NULL )
SplineRefigure(base->prev);
}
} else if ( cv->p.spline!=NULL ) {
sp = SplineBisect(cv->p.spline,cv->p.t);
cv->joinvalid = true;
cv->joinpos = *sp; cv->joinpos.selected = false;
if ( cv->active_tool==cvt_pen )
ptype = pt_curve;
sp->pointtype = ptype;
if ( ptype==pt_hvcurve ) {
SPHVCurveForce(sp);
}
sp->selected = true;
ss = cv->p.spl;
} else {
ss = chunkalloc(sizeof(SplineSet));
sp = SplinePointCreate( cv->p.cx, cv->p.cy );
ss->first = ss->last = sp;
ss->next = cv->b.layerheads[cv->b.drawmode]->splines;
cv->b.layerheads[cv->b.drawmode]->splines = ss;
sp->nonextcp = sp->noprevcp = 1;
sp->nextcpdef = sp->prevcpdef = 1;
sp->pointtype = ptype;
sp->selected = true;
}
cv->active_spl = ss;
cv->active_sp = sp;
CVSetCharChanged(cv,true);
CVInfoDraw(cv,cv->gw);
SCUpdateAll(sc);
if ( cv->active_tool == cvt_pen )
cv->p.constrain = sp->me;
}
void CVMouseUpKnife(CharView *cv, GEvent *event) {
#if !defined(KNIFE_CONTINUOUS)
/* draw a line from (cv->p.cx,cv->p.cy) to (cv->info.x,cv->info.y) */
/* and cut anything intersected by it */
SplineSet *spl, *spl2;
Spline *s, *nexts;
Spline dummy;
SplinePoint dummyfrom, dummyto, *mid, *mid2;
BasePoint inters[9];
extended t1s[10], t2s[10];
int foundsomething = true, ever = false;
int i;
int spiro_index = 0;
memset(&dummy,0,sizeof(dummy));
memset(&dummyfrom,0,sizeof(dummyfrom));
memset(&dummyto,0,sizeof(dummyto));
dummyfrom.me.x = cv->p.cx;
dummyfrom.me.y = cv->p.cy;
dummyto.me.x = cv->info.x;
dummyto.me.y = cv->info.y;
dummyfrom.nextcp = dummyfrom.prevcp = dummyfrom.me;
dummyto.nextcp = dummyto.prevcp = dummyto.me;
dummyfrom.nonextcp = dummyfrom.noprevcp = dummyto.nonextcp = dummyto.noprevcp = true;
dummy.splines[0].d = cv->p.cx;
dummy.splines[0].c = cv->info.x-cv->p.cx;
dummy.splines[1].d = cv->p.cy;
dummy.splines[1].c = cv->info.y-cv->p.cy;
dummy.from = &dummyfrom;
dummy.to = &dummyto;
dummy.islinear = dummy.knownlinear = true;
dummyfrom.next = dummyto.prev = &dummy;
for ( spl = cv->b.layerheads[cv->b.drawmode]->splines; spl!=NULL ; spl = spl->next )
spl->ticked = false;
while ( foundsomething ) {
foundsomething = false;
for ( spl = cv->b.layerheads[cv->b.drawmode]->splines; spl!=NULL && !foundsomething; spl = spl->next ) {
for ( s = spl->first->next; s!=NULL ; ) {
nexts = NULL;
if ( s->to!=spl->first )
nexts = s->to->next;
if ( SplinesIntersect(s,&dummy,inters,t1s,t2s)>0 ) {
if ( event->u.mouse.state&ksm_meta ) {
for ( i=0; i<4 && t1s[i]!=-1 && (t1s[i]<.0001 || t1s[i]>1-.0001); ++i );
if ( i<4 && t1s[i]!=-1 ) {
/* With meta down we just remove the spline rather than */
/* cutting it */
foundsomething = true;
nexts = NULL;
if ( !ever )
CVPreserveState(&cv->b);
ever = true;
if ( spl->first==spl->last ) {
spl->first = s->to;
spl->last = s->from;
} else {
spl2 = chunkalloc(sizeof(SplineSet));
spl2->next = spl->next;
spl->next = spl2;
spl2->first = s->to;
spl2->last = spl->last;
spl->last = s->from;
}
s->to->prev = s->from->next = NULL;
SplineFree(s);
SplineSetSpirosClear(spl);
}
} else {
for ( i=0; i<4 && t1s[i]!=-1 &&
(( t1s[i]<.001 && s->from->prev==NULL ) ||
( t1s[i]>1-.001 && s->to->next == NULL ));
++i );
if ( i<4 && t1s[i]!=-1 ) {
foundsomething = true;
nexts = NULL;
if ( !ever )
CVPreserveState(&cv->b);
ever = true;
spiro_index = -1;
if ( cv->b.sc->inspiro && hasspiro()) {
if ( spl->spiro_cnt!=0 )
spiro_index = SplineT2SpiroIndex(s,t1s[i],spl);
} else
SplineSetSpirosClear(spl);
if ( t1s[i]<.001 ) {
mid = s->from;
} else if ( t1s[i]>1-.001 ) {
mid = s->to;
} else
mid = SplineBisect(s,t1s[i]);
/* if the intersection is close to an end point */
/* cut at the end point, else break in the middle */
/* Cut here, and then */
/* start all over again (we may need to alter the */
/* splineset structure so drastically that we just */
/* can't continue these loops) */
mid->pointtype = pt_corner;
mid2 = chunkalloc(sizeof(SplinePoint));
*mid2 = *mid;
mid2->hintmask = NULL;
mid->next = NULL;
mid2->prev = NULL;
mid2->next->from = mid2;
spl->ticked = true;
if ( spl->first==spl->last ) {
spl->first = mid2;
spl->last = mid;
if ( spiro_index!=-1 )
ReorderSpirosAndAddAndCut(spl,spiro_index);
} else {
spl2 = chunkalloc(sizeof(SplineSet));
spl2->next = spl->next;
spl->next = spl2;
spl2->first = mid2;
spl2->last = spl->last;
spl->last = mid;
if ( spiro_index!=-1 )
SplitSpirosAndAddAndCut(spl,spl2,spiro_index);
spl2->ticked = true;
}
}
}
}
s = nexts;
}
}
}
if ( ever ) {
for ( spl = cv->b.layerheads[cv->b.drawmode]->splines; spl!=NULL ; spl = spl->next ) {
if ( spl->ticked && spl->spiros!=NULL && cv->b.sc->inspiro && hasspiro())
SSRegenerateFromSpiros(spl);
spl->ticked = false;
}
CVCharChangedUpdate(&cv->b);
}
#endif
}
