- line(obj, i->tag, p0, p1, m);
- }
-}
-
-plotxy getPivot(struct swfoutput*obj, SWF_OUTLINE*outline, int dir, double line_width, int end, int trytwo)
-{
- swfoutput_internal*i = (swfoutput_internal*)obj->internal;
- SWF_PATHPOINT next, next2;
- double xv=0,yv=0, xv2=0, yv2=0;
- plotxy p;
- int two = 0;
-
- if(!end) {
- if(outline->type == SWF_PATHTYPE_LINE) {
- next = outline->dest;
- } else {
- next = ((SWF_BEZIERSEGMENT*)outline)->B;
- if(next.x==0 && next.y==0) {
- next = ((SWF_BEZIERSEGMENT*)outline)->C;
- }
- if(next.x==0 && next.y==0) {
- next = ((SWF_BEZIERSEGMENT*)outline)->dest;
- }
- }
- next2 = next;
- if(trytwo && outline->last && outline->last->type != SWF_PATHTYPE_MOVE) {
- if(outline->type == SWF_PATHTYPE_LINE) {
- next2 = outline->last->dest;
- } else {
- SWF_PATHPOINT c = ((SWF_BEZIERSEGMENT*)(outline->last))->C;
- SWF_PATHPOINT b = ((SWF_BEZIERSEGMENT*)(outline->last))->B;
- next2.x = outline->last->dest.x - c.x;
- next2.y = outline->last->dest.y - c.y;
- if(next2.x==0 && next2.y==0) {
- next2.x = outline->last->dest.x - b.x;
- next2.y = outline->last->dest.y - b.y;
- }
- if(next2.x==0 && next2.y==0) {
- next2.x = outline->last->dest.x;
- next2.y = outline->last->dest.y;
- }
- }
- two = 1;
- }
- } else {
- if(outline->type == SWF_PATHTYPE_LINE) {
- next = outline->dest;
- } else {
- SWF_PATHPOINT c = ((SWF_BEZIERSEGMENT*)outline)->C;
- SWF_PATHPOINT b = ((SWF_BEZIERSEGMENT*)outline)->B;
- next.x = outline->dest.x - c.x;
- next.y = outline->dest.y - c.y;
- if(next.x==0 && next.y==0) {
- next.x = outline->dest.x - b.x;
- next.y = outline->dest.y - b.y;
- }
- if(next.x==0 && next.y==0) {
- next.x = outline->dest.x;
- next.y = outline->dest.y;
- }
- }
- next2 = next;
- if(trytwo && outline->link && outline->link->type != SWF_PATHTYPE_MOVE) {
- if(outline->type == SWF_PATHTYPE_LINE) {
- next2 = outline->link->dest;
- } else {
- next2 = ((SWF_BEZIERSEGMENT*)(outline->link))->B;
- if(next2.x==0 && next2.y==0) {
- next2 = ((SWF_BEZIERSEGMENT*)outline->link)->C;
- }
- if(next2.x==0 && next2.y==0) {
- next2 = ((SWF_BEZIERSEGMENT*)outline->link)->dest;
- }
- }
- two = 1;
- }
- }
-
- if(dir) {
- xv = next.y/(float)0xffff;
- yv = -next.x/(float)0xffff;
- } else {
- xv = -next.y/(float)0xffff;
- yv = next.x/(float)0xffff;
- }
-
- double r = (line_width/2)/sqrt(xv*xv+yv*yv);
- xv*=r;
- yv*=r;
-
- if(two) {
- if(dir) {
- xv2 = next2.y/(float)0xffff;
- yv2 = -next2.x/(float)0xffff;
- } else {
- xv2 = -next2.y/(float)0xffff;
- yv2 = next2.x/(float)0xffff;
- }
-
- double r2 = (line_width/2)/sqrt(xv2*xv2+yv2*yv2);
- xv2*=r2;
- yv2*=r2;
- xv = (xv+xv2)/2;
- yv = (yv+yv2)/2;
- double r3 = (line_width/2)/sqrt(xv*xv+yv*yv);
- xv *= r3;
- yv *= r3;
- }
-
- p.x = xv;
- p.y = yv;
- return p;
-}
-
-void drawShortPath(struct swfoutput*obj, double x, double y, struct swfmatrix* m, SWF_OUTLINE*outline)
-{
- swfoutput_internal*i = (swfoutput_internal*)obj->internal;
- double lastx=x, lasty=y;
- while (outline && outline->type != SWF_PATHTYPE_MOVE)
- {
- x += (outline->dest.x/(float)0xffff);
- y += (outline->dest.y/(float)0xffff);
-
- if(outline->type == SWF_PATHTYPE_LINE)
- {
- plotxy p0, p1;
- p0.x=lastx;
- p0.y=lasty;
- p1.x= x;
- p1.y= y;
- line(obj, i->tag, p0, p1, m);
- }
- else if(outline->type == SWF_PATHTYPE_BEZIER)
- {
- plotxy p0,p1,p2,p3;
- SWF_BEZIERSEGMENT*o2 = (SWF_BEZIERSEGMENT*)outline;
- p3.x=lastx;
- p3.y=lasty;
- p1.x=o2->C.x/(float)0xffff+lastx;
- p1.y=o2->C.y/(float)0xffff+lasty;
- p2.x=o2->B.x/(float)0xffff+lastx;
- p2.y=o2->B.y/(float)0xffff+lasty;
- p0.x=x;
- p0.y=y;
- spline(obj, i->tag,p0,p1,p2,p3,m);
- }
- lastx=x;
- lasty=y;
- outline = outline->link;
- }
-}
-
-void drawShortPathWithEnds(struct swfoutput*obj, double x, double y, struct swfmatrix* m, SWF_OUTLINE*outline, int num, int line_cap, int line_join, double line_width)
-{
- swfoutput_internal*i = (swfoutput_internal*)obj->internal;
- plotxy d,d2;
- int back = 0;
-
- if(line_cap == LINE_CAP_BUTT || line_cap == LINE_CAP_SQUARE) {
- endshape(obj,0);
- startshape(obj);
- SWF_OUTLINE *last, *tmp=outline;
- plotxy s,e,p0,p1,p2,p3,m0,m1,m2,m3;
- double x2 = x;
- double y2 = y;
- double lx=x,ly=y;
- double ee = 1.0;
- int nr;
- while(tmp && tmp->type != SWF_PATHTYPE_MOVE) {
- last = tmp;
- lx += (tmp->dest.x/(float)0xffff);
- ly += (tmp->dest.y/(float)0xffff);
- tmp = tmp->link;
- }
- s = getPivot(obj, outline, 0, line_width, 0, 0);
- e = getPivot(obj, last, 0, line_width, 1, 0);
-
- if(line_cap == LINE_CAP_BUTT) {
- /* make the clipping rectangle slighly bigger
- than the line ending, so that it get's clipped
- propertly */
- //ee = 1.01;
- ee=1.0;
- }
-
- p0.x = x2 + s.x*ee;
- p0.y = y2 + s.y*ee;
- p1.x = x2 - s.x*ee;
- p1.y = y2 - s.y*ee;
- p2.x = x2 - s.y - s.x*ee;
- p2.y = y2 + s.x - s.y*ee;
- p3.x = x2 - s.y + s.x*ee;
- p3.y = y2 + s.x + s.y*ee;
- m0.x = lx + e.x*ee;
- m0.y = ly + e.y*ee;
- m1.x = lx - e.x*ee;
- m1.y = ly - e.y*ee;
- m2.x = lx + e.y - e.x*ee;
- m2.y = ly - e.x - e.y*ee;
- m3.x = lx + e.y + e.x*ee;
- m3.y = ly - e.x + e.y*ee;
-
- for(nr=0;nr<2;nr++) {
- int dir=0;
- struct plotxy q0,q1,q2,q3,q4,q5;
-
- startFill(obj);
- if(line_cap == LINE_CAP_BUTT) {
- if(dir) {
- /* FIXME: box should be smaller */
- q0.x = 0; q0.y = 0;
- q1.x = i->max_x; q1.y = 0;
- q2.x = i->max_x; q2.y = i->max_y;
- q3.x = 0; q3.y = i->max_y;
- } else {
- /* FIXME: box should be smaller */
- q0.x = i->max_x; q0.y = i->max_y;
- q1.x = 0; q1.y = i->max_y;
- q2.x = 0; q2.y = 0;
- q3.x = i->max_x; q3.y = 0;
- }
- q4.x = p0.x;
- q4.y = p0.y;
- moveto(obj, i->tag, q0);
- lineto(obj, i->tag, q1);
- lineto(obj, i->tag, q2);
- lineto(obj, i->tag, q3);
- lineto(obj, i->tag, q0);
-
- transform(&q4,m);
- lineto(obj, i->tag, q4);
- }
-
- line(obj, i->tag, p0, p1, m);
- line(obj, i->tag, p1, p2, m);
- line(obj, i->tag, p2, p3, m);
- line(obj, i->tag, p3, p0, m);
-
- if(line_cap == LINE_CAP_BUTT) {
- lineto(obj, i->tag, q0);
- endshape(obj, i->depth+2-nr);
- startshape(obj);
- }
- p0 = m0;
- p1 = m1;
- p2 = m2;
- p3 = m3;
- }
-
- stopFill(obj);
- }
-
- drawShortPath(obj,x,y,m,outline);
-
- if(line_cap == LINE_CAP_BUTT) {
- endshape(obj,0);
- startshape(obj);
- }
-}
-
-void drawT1toRect(struct swfoutput*obj, double x, double y, struct swfmatrix* m, SWF_OUTLINE*outline, int num, int line_cap, int line_join, double line_width)
-{
- swfoutput_internal*i = (swfoutput_internal*)obj->internal;
- plotxy d1,d2,p1,p2,p3,p4;
-
- d1.x = (outline->dest.x/(float)0xffff);
- d1.y = (outline->dest.y/(float)0xffff);
- d2 = getPivot(obj, outline, 0, line_width, 0, 0);
-
- assert(line_cap != LINE_CAP_ROUND);
- if(line_cap == LINE_CAP_SQUARE) {
- x -= +d2.y;
- y -= -d2.x;
- d1.x += +2*d2.y;
- d1.y += -2*d2.x;
- }
-
- p1.x = x + d2.x;
- p1.y = y + d2.y;
- p2.x = x + d2.x + d1.x;
- p2.y = y + d2.y + d1.y;
- p3.x = x - d2.x + d1.x;
- p3.y = y - d2.y + d1.y;
- p4.x = x - d2.x;
- p4.y = y - d2.y;
-
- line(obj, i->tag, p1,p2, m);
- line(obj, i->tag, p2,p3, m);
- line(obj, i->tag, p3,p4, m);
- line(obj, i->tag, p4,p1, m);
-}
-
-void drawShortPathWithStraightEnds(struct swfoutput*obj, double x, double y, struct swfmatrix* m, SWF_OUTLINE*outline, int num, int line_cap, int line_join, double line_width)
-{
- swfoutput_internal*i = (swfoutput_internal*)obj->internal;
- SWF_OUTLINE*tmp=outline;
- double xx=x,yy=y;
- int stop=0;
- assert(i->shapeid>=0);
-
- startFill(obj);
- drawT1toRect(obj, x, y, m,outline, num, line_cap, line_join, line_width);
-
- while(tmp->link && tmp->link->type!=SWF_PATHTYPE_MOVE) {
- xx += (tmp->dest.x/(float)0xffff);
- yy += (tmp->dest.y/(float)0xffff);
- tmp = tmp->link;
- }
-
- assert(tmp->type == SWF_PATHTYPE_LINE);
- assert(outline->type == SWF_PATHTYPE_LINE);
-
- if(tmp!=outline) {
-
- if(outline->link == tmp) {
- /* the two straight line segments (which are everything we
- need to draw) are very likely to overlap. To avoid that
- they cancel each other out at the end points, start a new
- shape for the second one */
- endshape(obj,0);startshape(obj);
- startFill(obj);
- }
-
- drawT1toRect(obj, xx, yy, m, tmp, num, line_cap, line_join, line_width);
-
- if(outline->link != tmp)
- {
- stopFill(obj);stop=1;
- int save= tmp->type;
- tmp->type = SWF_PATHTYPE_MOVE;
- x += (outline->dest.x/(float)0xffff);
- y += (outline->dest.y/(float)0xffff);
- outline = outline->link;
- drawShortPath(obj, x, y, m, outline);
- tmp->type = save;
- }
- }
- if(!stop)
- stopFill(obj);
-}
-
-static int t1len(struct swfoutput*obj, SWF_OUTLINE*line)
-{
- swfoutput_internal*i = (swfoutput_internal*)obj->internal;
- int num=0;
- while(line && line->type != SWF_PATHTYPE_MOVE) {
- num++;
- line = line->link;
- }
- return num;
-}
-
-static float t1linelen(struct swfoutput*obj, SWF_OUTLINE*line)
-{
- swfoutput_internal*i = (swfoutput_internal*)obj->internal;
- float x,y;
- x = (line->dest.x/(float)0xffff);
- y = (line->dest.y/(float)0xffff);
- return sqrt(x*x+y*y);
-}
-
-void drawpath2poly(struct swfoutput *obj, SWF_OUTLINE*outline, struct swfmatrix*m, int log, int line_join, int line_cap, double line_width, double miter_limit)
-{
- swfoutput_internal*i = (swfoutput_internal*)obj->internal;
- if( i->tag->id != ST_DEFINESHAPE &&
- i->tag->id != ST_DEFINESHAPE2 &&
- i->tag->id != ST_DEFINESHAPE3) {
- msg("<error> internal error: drawpath needs a shape tag, not %d\n",i->tag->id);
- exit(1);
- }
- assert(i->shapeid>=0);
- double x=0,y=0;
- double lastx=0,lasty=0;
- int valid = 0;
- int lastwasline = 0;
- SWF_OUTLINE*tmp = outline, *last = 0;
- tmp->last = 0;
-
- while(1) {
- double previousx = x, previousy = y;
- if(tmp) {
- x += (tmp->dest.x/(float)0xffff);
- y += (tmp->dest.y/(float)0xffff);
- }
- if(!tmp || tmp->type == SWF_PATHTYPE_MOVE) {
- if(valid && last) {
- if(fabs(lastx-previousx)<0.001 && fabs(lasty-previousy)<0.001) {
- /* endpoints match- the path is closed.
- Don't bother to draw endings */
- drawShortPath(obj, lastx, lasty, m, last);
- }
- if(last->type == SWF_PATHTYPE_LINE && t1linelen(obj,last)>line_width*2 &&
- lastwasline && line_cap != LINE_CAP_ROUND)
- drawShortPathWithStraightEnds(obj, lastx, lasty, m, last, valid, line_cap, line_join, line_width);
- else
- drawShortPathWithEnds(obj, lastx, lasty, m, last, valid, line_cap, line_join, line_width);
- }
- if(!tmp)
- break;
- valid = 0;
- last = 0;
- lastx = x;
- lasty = y;
- } else {
- if(!last)
- last = tmp; //remember last stroke start (first segment after moveto)
- valid++;
- }
-
- if(tmp && tmp->type == SWF_PATHTYPE_LINE && t1linelen(obj,tmp)>line_width*2)
- lastwasline = 1;
- else
- lastwasline = 0;
-
- if(tmp->link)
- tmp->link->last = tmp; // make sure list is properly linked in both directions
- tmp = tmp->link;