5 Extension module for the rfxswf library.
6 Part of the swftools package.
8 Copyright (c) 2001 Rainer Böhme <rfxswf@reflex-studio.de>
10 This program is free software; you can redistribute it and/or modify
11 it under the terms of the GNU General Public License as published by
12 the Free Software Foundation; either version 2 of the License, or
13 (at your option) any later version.
15 This program is distributed in the hope that it will be useful,
16 but WITHOUT ANY WARRANTY; without even the implied warranty of
17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 GNU General Public License for more details.
20 You should have received a copy of the GNU General Public License
21 along with this program; if not, write to the Free Software
22 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */
24 #define SF_MOVETO 0x01
28 #define SF_NEWSTYLE 0x10
30 void swf_ShapeFree(SHAPE * s)
34 if (s->linestyle.data) free(s->linestyle.data);
35 s->linestyle.data = NULL;
37 if (s->fillstyle.data) free(s->fillstyle.data);
38 s->fillstyle.data = NULL;
40 if (s->data) free(s->data);
45 int swf_ShapeNew(SHAPE * * s)
49 sh = (SHAPE *)malloc(sizeof(SHAPE));
51 memset(sh,0,sizeof(SHAPE));
55 int swf_GetSimpleShape(TAG * t,SHAPE * * s) // without Linestyle/Fillstyle Record
61 if (FAILED(swf_ShapeNew(s))) return -1;
65 sh->bits.fill = (U16)swf_GetBits(t,4);
66 sh->bits.line = (U16)swf_GetBits(t,4);
67 bitl = 0; end = 0; pos = swf_GetTagPos(t);
70 { int edge = swf_GetBits(t,1); bitl+=1;
73 if (swf_GetBits(t,1)) // Line
74 { U16 nbits = swf_GetBits(t,4)+2;
77 if (swf_GetBits(t,1)) // x/y Line
78 { swf_GetBits(t,nbits);
83 { swf_GetBits(t,nbits+1);
88 { U16 nbits = swf_GetBits(t,4)+2;
100 { U16 flags = swf_GetBits(t,5); bitl+=5;
104 { U16 nbits = swf_GetBits(t,5); bitl+=5;
105 swf_GetBits(t,nbits);
106 swf_GetBits(t,nbits);
111 { swf_GetBits(t,sh->bits.fill);
116 { swf_GetBits(t,sh->bits.fill);
121 { swf_GetBits(t,sh->bits.line);
125 if (flags&SF_NEWSTYLE)
126 { fprintf(stderr,"RFXSWF: Can't process extended styles in shape.\n");
132 swf_SetTagPos(t,pos);
135 if (sh->data) free(sh->data);
136 sh->data = (U8*)malloc(len);
140 swf_GetBlock(t,sh->data,len);
147 int swf_SetSimpleShape(TAG * t,SHAPE * s) // without Linestyle/Fillstyle Record
154 { swf_ResetWriteBits(t);
156 swf_SetBits(t,s->bits.fill,4);
157 swf_SetBits(t,s->bits.line,4);
158 swf_SetBlock(t,s->data,l);
160 swf_ResetWriteBits(t);
165 int swf_SetFillStyle(TAG * t,FILLSTYLE * f)
166 { if ((!t)||(!f)) return -1;
167 swf_SetU8(t,f->type);
171 if (swf_GetTagID(t)!=ST_DEFINESHAPE3) swf_SetRGB(t,&f->color);
172 else swf_SetRGBA(t,&f->color);
177 swf_SetU16(t,f->id_bitmap);
178 swf_SetMatrix(t,&f->m);
182 swf_SetMatrix(t,&f->m);
183 swf_SetGradient(t,&f->gradient,/*alpha?*/t->id==ST_DEFINESHAPE3?1:0);
190 int swf_SetLineStyle(TAG * t,LINESTYLE * l)
191 { if ((!l)||(!t)) return -1;
192 swf_SetU16(t,l->width);
194 if (swf_GetTagID(t)!=ST_DEFINESHAPE3) swf_SetRGB(t,&l->color);
195 else swf_SetRGBA(t,&l->color);
200 int swf_SetShapeStyleCount(TAG * t,U16 n)
212 int swf_SetShapeStyles(TAG * t,SHAPE * s)
217 l += swf_SetShapeStyleCount(t,s->fillstyle.n);
219 for (i=0;i<s->fillstyle.n;i++)
220 l+=swf_SetFillStyle(t,&s->fillstyle.data[i]);
222 l += swf_SetShapeStyleCount(t,s->linestyle.n);
224 for (i=0;i<s->linestyle.n;i++)
225 l+=swf_SetLineStyle(t,&s->linestyle.data[i]);
230 int swf_ShapeCountBits(SHAPE * s,U8 * fbits,U8 * lbits)
232 s->bits.fill = swf_CountUBits(s->fillstyle.n, 0);
233 s->bits.line = swf_CountUBits(s->linestyle.n, 0);
234 if (fbits) fbits[0] = s->bits.fill;
235 if (lbits) lbits[0] = s->bits.line;
239 int swf_SetShapeBits(TAG * t,SHAPE * s)
240 { if ((!t)||(!s)) return -1;
241 swf_ResetWriteBits(t);
242 swf_SetBits(t,s->bits.fill,4);
243 swf_SetBits(t,s->bits.line,4);
247 int swf_SetShapeHeader(TAG * t,SHAPE * s)
249 res = swf_SetShapeStyles(t,s);
250 if (res>=0) res = swf_ShapeCountBits(s,NULL,NULL);
251 if (res>=0) res = swf_SetShapeBits(t,s);
255 int swf_ShapeAddFillStyle(SHAPE * s,U8 type,MATRIX * m,RGBA * color,U16 id_bitmap, GRADIENT*gradient)
266 def_c.r = def_c.g = def_c.b = 0;
270 swf_GetMatrix(NULL,m);
275 swf_GetGradient(NULL, gradient, 1);
280 if (s->fillstyle.data)
281 { FILLSTYLE * new = (FILLSTYLE *)realloc(s->fillstyle.data,(s->fillstyle.n+1)*sizeof(FILLSTYLE));
283 s->fillstyle.data = new;
286 { s->fillstyle.data = (FILLSTYLE *)malloc(sizeof(FILLSTYLE));
288 if (!s->fillstyle.data) return -1;
293 s->fillstyle.data[s->fillstyle.n].type = type;
294 s->fillstyle.data[s->fillstyle.n].id_bitmap = id_bitmap;
295 memcpy(&s->fillstyle.data[s->fillstyle.n].m,m,sizeof(MATRIX));
296 memcpy(&s->fillstyle.data[s->fillstyle.n].color,color,sizeof(RGBA));
297 memcpy(&s->fillstyle.data[s->fillstyle.n].gradient,gradient,sizeof(GRADIENT));
299 return (++s->fillstyle.n);
302 int swf_ShapeAddSolidFillStyle(SHAPE * s,RGBA * color)
303 { return swf_ShapeAddFillStyle(s,FILL_SOLID,NULL,color,0,0);
306 int swf_ShapeAddBitmapFillStyle(SHAPE * s,MATRIX * m,U16 id_bitmap,int clip)
307 { return swf_ShapeAddFillStyle(s,clip?FILL_CLIPPED:FILL_TILED,m,NULL,id_bitmap,0);
310 int swf_ShapeAddGradientFillStyle(SHAPE * s,MATRIX * m,GRADIENT* gradient,int radial)
311 { return swf_ShapeAddFillStyle(s,radial?FILL_RADIAL:FILL_LINEAR,m,NULL,0,gradient);
314 int swf_ShapeAddLineStyle(SHAPE * s,U16 width,RGBA * color)
320 def.r = def.g = def.b = 0;
322 if (s->linestyle.data)
323 { LINESTYLE * new = (LINESTYLE *)realloc(s->linestyle.data,(s->linestyle.n+1)*sizeof(LINESTYLE));
325 s->linestyle.data = new;
328 { s->linestyle.data = (LINESTYLE *)malloc(sizeof(LINESTYLE));
330 if (!s->linestyle.data) return -1;
333 s->linestyle.data[s->linestyle.n].width = width;
334 memcpy(&s->linestyle.data[s->linestyle.n].color,color,sizeof(RGBA));
336 return (++s->linestyle.n);
339 int swf_ShapeSetMove(TAG * t,SHAPE * s,S32 x,S32 y)
343 swf_SetBits(t,SF_MOVETO,5);
345 b = swf_CountBits(x,0);
346 b = swf_CountBits(y,b);
355 int swf_ShapeSetStyle(TAG * t,SHAPE * s,int line,int fill0,int fill1)
356 { if ((!t)||(!s)) return -1;
359 swf_SetBits(t,(line?SF_LINE:0)|(fill0?SF_FILL0:0)|(fill1?SF_FILL1:0),5);
361 if (fill0) swf_SetBits(t,fill0,s->bits.fill);
362 if (fill1) swf_SetBits(t,fill1,s->bits.fill);
363 if (line) swf_SetBits(t,line ,s->bits.line);
368 /* TODO: sometimes we want to set fillstyle 0, as that's the empty fill
369 used for line drawings. At the moment, we can't, as 0 fill be considered
370 nonexistent and therefore not set.
371 these defines are a workaround (they also reduce the maximal number of
372 fill styles to 32768)
374 #define UNDEFINED_COORD 0x7fffffff
376 int swf_ShapeSetAll(TAG * t,SHAPE * s,S32 x,S32 y,int line,int fill0,int fill1)
379 if ((!t)||(!s)) return -1;
381 if(x!=UNDEFINED_COORD || y!=UNDEFINED_COORD)
385 swf_SetBits(t,(hasmove?SF_MOVETO:0)|(line?SF_LINE:0)|(fill0?SF_FILL0:0)|(fill1?SF_FILL1:0),5);
388 b = swf_CountBits(x,0);
389 b = swf_CountBits(y,b);
395 if (fill0) swf_SetBits(t,fill0,s->bits.fill);
396 if (fill1) swf_SetBits(t,fill1,s->bits.fill);
397 if (line) swf_SetBits(t,line ,s->bits.line);
402 int swf_ShapeSetEnd(TAG * t)
405 swf_ResetWriteBits(t);
409 int swf_ShapeSetLine(TAG * t,SHAPE * s,S32 x,S32 y)
414 b = swf_CountBits(x,2);
415 b = swf_CountBits(y,b);
419 /* do not split into more than 16 segments. If the line is *that* long, something's broken */
420 fprintf(stderr, "Warning: Line to %.2f,%.2f is too long", (double)x,(double)y);
425 if(x>=0) { x1 = x/2;x2 = (x+1)/2;}
426 else { x1 = x/2;x2 = (x-1)/2;}
427 if(y>=0) { y1 = y/2;y2 = (y+1)/2;}
428 else { y1 = y/2;y2 = (y-1)/2;}
429 swf_ShapeSetLine(t, s, x1,y1);
430 swf_ShapeSetLine(t, s, x2,y2);
435 if(x!=0 && y!=0) { //(!s)||((x!=0)&&(y!=0)))
436 swf_SetBits(t,3,2); // Straight Edge
437 swf_SetBits(t, b-2, 4); //Number of Bits in x/y
438 swf_SetBits(t,1,1); // Diagonal
442 swf_SetBits(t,3,2); // Straight Edge
443 swf_SetBits(t, b-2, 4); //Number of Bits in y
444 swf_SetBits(t,1,2); // Vertical
447 swf_SetBits(t,3,2); // Straight Edge
448 swf_SetBits(t, b-2, 4); //Number of Bits in x
449 swf_SetBits(t,0,2); // Horizontal
455 int swf_ShapeSetCurve(TAG * t,SHAPE * s,S32 x,S32 y,S32 ax,S32 ay)
460 b = swf_CountBits(ax,2);
461 b = swf_CountBits(ay,b);
462 b = swf_CountBits(x,b);
463 b = swf_CountBits(y,b);
466 fprintf(stderr, "Bit overflow in swf_ShapeSetCurve- %d (%d,%d,%d,%d)\n", b, ax,ay,x,y);
471 swf_SetBits(t,b-2,4);
479 int swf_ShapeSetCircle(TAG * t,SHAPE * s,S32 x,S32 y,S32 rx,S32 ry)
480 { double C1 = 0.2930;
482 double begin = 0.7070;
486 swf_ShapeSetMove(t,s,x+begin*rx,y+begin*ry);
487 swf_ShapeSetCurve(t,s, -C1*rx, C1*ry, -C2*rx, 0);
488 swf_ShapeSetCurve(t,s, -C2*rx, 0, -C1*rx, -C1*ry);
489 swf_ShapeSetCurve(t,s, -C1*rx, -C1*ry, 0, -C2*ry);
490 swf_ShapeSetCurve(t,s, 0, -C2*ry, C1*rx, -C1*ry);
491 swf_ShapeSetCurve(t,s, C1*rx, -C1*ry, C2*rx, 0);
492 swf_ShapeSetCurve(t,s, C2*rx, 0, C1*rx, C1*ry);
493 swf_ShapeSetCurve(t,s, C1*rx, C1*ry, 0, C2*ry);
494 swf_ShapeSetCurve(t,s, 0, C2*ry, -C1*rx, C1*ry);
499 /* todo: merge this with swf_GetSimpleShape */
500 SHAPELINE* swf_ParseShapeData(U8*data, int bits, int fillbits, int linebits)
503 SHAPELINE*lines = &_lines;
512 memset(tag, 0, sizeof(TAG));
514 tag->len = tag->memsize = (bits+7)/8;
520 flags = swf_GetBits(tag, 1);
521 if(!flags) { //style change
522 flags = swf_GetBits(tag, 5);
526 int n = swf_GetBits(tag, 5);
527 x = swf_GetSBits(tag, n); //x
528 y = swf_GetSBits(tag, n); //y
531 fill0 = swf_GetBits(tag, fillbits);
533 fill1 = swf_GetBits(tag, fillbits);
535 line = swf_GetBits(tag, linebits);
537 fprintf(stderr, "Additional file styles style change not yet supported\n");
539 //enumerateUsedIDs_styles(tag, callback, callback_data, num);
540 fillbits = swf_GetBits(tag, 4);
541 linebits = swf_GetBits(tag, 4);
544 lines->next = (SHAPELINE*)malloc(sizeof(SHAPELINE));
546 lines->type = moveTo;
549 lines->sx = lines->sy = 0;
550 lines->fillstyle0 = fill0;
551 lines->fillstyle1 = fill1;
552 lines->linestyle = line;
556 flags = swf_GetBits(tag, 1);
557 if(flags) { //straight edge
558 int n = swf_GetBits(tag, 4) + 2;
559 if(swf_GetBits(tag, 1)) { //line flag
560 x += swf_GetSBits(tag, n); //delta x
561 y += swf_GetSBits(tag, n); //delta y
563 int v=swf_GetBits(tag, 1);
565 d = swf_GetSBits(tag, n); //vert/horz
569 lines->next = (SHAPELINE*)malloc(sizeof(SHAPELINE));
571 lines->type = lineTo;
574 lines->sx = lines->sy = 0;
575 lines->fillstyle0 = fill0;
576 lines->fillstyle1 = fill1;
577 lines->linestyle = line;
579 } else { //curved edge
580 int n = swf_GetBits(tag, 4) + 2;
582 x += swf_GetSBits(tag, n);
583 y += swf_GetSBits(tag, n);
586 x += swf_GetSBits(tag, n);
587 y += swf_GetSBits(tag, n);
589 lines->next = (SHAPELINE*)malloc(sizeof(SHAPELINE));
591 lines->type = splineTo;
596 lines->fillstyle0 = fill0;
597 lines->fillstyle1 = fill1;
598 lines->linestyle = line;
606 SRECT swf_GetShapeBoundingBox(SHAPE2*shape2)
609 SHAPELINE*l = shape2->lines;
612 r.xmin = r.ymin = SCOORD_MAX;
613 r.xmax = r.ymax = SCOORD_MIN;
618 t1 = shape2->linestyles[l->linestyle - 1].width*3/2;
623 if(l->type == lineTo || l->type == splineTo)
626 if(lastx - t1 < r.xmin) r.xmin = lastx - t1;
627 if(lasty - t1 < r.ymin) r.ymin = lasty - t1;
628 if(lastx + t1 > r.xmax) r.xmax = lastx + t1;
629 if(lasty + t1 > r.ymax) r.ymax = lasty + t1;
630 if(l->x - t1 < r.xmin) r.xmin = l->x - t1;
631 if(l->y - t1 < r.ymin) r.ymin = l->y - t1;
632 if(l->x + t1 > r.xmax) r.xmax = l->x + t1;
633 if(l->y + t1 > r.ymax) r.ymax = l->y + t1;
634 if(l->type == splineTo) {
635 if(l->sx - t1 < r.xmin) r.xmin = l->sx - t1;
636 if(l->sy - t1 < r.ymin) r.ymin = l->sy - t1;
637 if(l->sx + t1 > r.xmax) r.xmax = l->sx + t1;
638 if(l->sy + t1 > r.ymax) r.ymax = l->sy + t1;
645 if(!valid) memset(&r, 0, sizeof(SRECT));
649 void swf_Shape2Free(SHAPE2 * s)
651 SHAPELINE*line = s->lines;
653 SHAPELINE*next = line->next;
665 SHAPE2* swf_ShapeToShape2(SHAPE*shape) {
667 SHAPE2*shape2 = (SHAPE2*)malloc(sizeof(SHAPE2));
669 shape2->numlinestyles = shape->linestyle.n;
670 shape2->linestyles = (LINESTYLE*)malloc(sizeof(LINESTYLE)*shape->linestyle.n);
671 memcpy(shape2->linestyles, shape->linestyle.data, sizeof(LINESTYLE)*shape->linestyle.n);
673 shape2->numfillstyles = shape->fillstyle.n;
674 shape2->fillstyles = (FILLSTYLE*)malloc(sizeof(FILLSTYLE)*shape->fillstyle.n);
675 memcpy(shape2->fillstyles, shape->fillstyle.data, sizeof(FILLSTYLE)*shape->fillstyle.n);
677 shape2->lines = swf_ParseShapeData(shape->data, shape->bitlen, shape->bits.fill, shape->bits.line);
682 void swf_ShapeSetBitmapRect(TAG*tag, U16 gfxid, int width, int height)
690 swf_ShapeNew(&shape);
691 rgb.b = rgb.g = rgb.r = 0xff;
693 ls = swf_ShapeAddLineStyle(shape,20,&rgb);
694 swf_GetMatrix(NULL,&m);
698 fs = swf_ShapeAddBitmapFillStyle(shape,&m,gfxid,0);
705 swf_SetShapeStyles(tag,shape);
706 swf_ShapeCountBits(shape,NULL,NULL);
707 swf_SetShapeBits(tag,shape);
709 swf_ShapeSetAll(tag,shape,0,0,lines?ls:0,fs,0);
711 swf_ShapeSetLine(tag,shape,width*20,0);
712 swf_ShapeSetLine(tag,shape,0,height*20);
713 swf_ShapeSetLine(tag,shape,-width*20,0);
714 swf_ShapeSetLine(tag,shape,0,-height*20);
715 swf_ShapeSetEnd(tag);
716 swf_ShapeFree(shape);
719 void swf_Shape2ToShape(SHAPE2*shape2, SHAPE*shape)
721 TAG*tag = swf_InsertTag(0,0);
723 int newx=0,newy=0,lastx=0,lasty=0,oldls=0,oldfs0=0,oldfs1=0;
725 memset(shape, 0, sizeof(SHAPE));
727 shape->linestyle.n = shape2->numlinestyles;
728 shape->linestyle.data = (LINESTYLE*)malloc(sizeof(LINESTYLE)*shape->linestyle.n);
729 memcpy(shape->linestyle.data, shape2->linestyles, sizeof(LINESTYLE)*shape->linestyle.n);
731 shape->fillstyle.n = shape2->numfillstyles;
732 shape->fillstyle.data = (FILLSTYLE*)malloc(sizeof(FILLSTYLE)*shape->fillstyle.n);
733 memcpy(shape->fillstyle.data, shape2->fillstyles, sizeof(FILLSTYLE)*shape->fillstyle.n);
735 swf_ShapeCountBits(shape,NULL,NULL);
740 int ls=0,fs0=0,fs1=0;
742 if(l->type != moveTo) {
743 if(oldls != l->linestyle) {oldls = ls = l->linestyle;if(!ls) ls=0x8000;}
744 if(oldfs0 != l->fillstyle0) {oldfs0 = fs0 = l->fillstyle0;if(!fs0) fs0=0x8000;}
745 if(oldfs1 != l->fillstyle1) {oldfs1 = fs1 = l->fillstyle1;if(!fs1) fs1=0x8000;}
747 if(ls || fs0 || fs1 || newx!=0x7fffffff || newy!=0x7fffffff) {
748 swf_ShapeSetAll(tag,shape,newx,newy,ls,fs0,fs1);
754 if(l->type == lineTo) {
755 swf_ShapeSetLine(tag,shape,l->x-lastx,l->y-lasty);
756 } else if(l->type == splineTo) {
757 swf_ShapeSetCurve(tag,shape, l->sx-lastx,l->sy-lasty, l->x-l->sx,l->y-l->sy);
759 if(l->type == moveTo) {
768 swf_ShapeSetEnd(tag);
769 shape->data = tag->data;
770 shape->bitlen = tag->len*8;
773 void swf_SetShape2(TAG*tag, SHAPE2*shape2)
776 swf_Shape2ToShape(shape2, &shape);
778 swf_SetRect(tag,shape2->bbox);
779 swf_SetShapeStyles(tag, &shape);
780 swf_ShapeCountBits(&shape,NULL,NULL);
781 swf_SetShapeBits(tag,&shape);
783 swf_SetBlock(tag, shape.data, (shape.bitlen+7)/8);
786 static void parseFillStyleArray(TAG*tag, SHAPE2*shape)
791 if(tag->id == ST_DEFINESHAPE)
793 else if(tag->id == ST_DEFINESHAPE2)
795 else if(tag->id == ST_DEFINESHAPE3)
798 count = swf_GetU8(tag);
799 if(count == 0xff && num>1) // defineshape2,3 only
800 count = swf_GetU16(tag);
802 shape->numfillstyles = count;
803 shape->fillstyles = malloc(sizeof(FILLSTYLE)*count);
809 FILLSTYLE*dest = &shape->fillstyles[t];
810 type = swf_GetU8(tag); //type
811 shape->fillstyles[t].type = type;
815 swf_GetRGBA(tag, &dest->color);
817 swf_GetRGB(tag, &dest->color);
819 else if(type == 0x10 || type == 0x12)
821 /* linear/radial gradient fill */
822 swf_ResetReadBits(tag);
823 swf_GetMatrix(tag, &dest->m);
824 swf_ResetReadBits(tag);
825 swf_GetGradient(tag, &dest->gradient, num>=3?1:0);
827 else if(type == 0x40 || type == 0x41)
830 swf_ResetReadBits(tag);
831 dest->id_bitmap = swf_GetU16(tag); //id
832 swf_ResetReadBits(tag); //?
833 swf_GetMatrix(tag, &dest->m);
836 fprintf(stderr, "rfxswf:swftools.c Unknown fillstyle:0x%02x\n",type);
839 swf_ResetReadBits(tag);
840 count = swf_GetU8(tag); // line style array
842 count = swf_GetU16(tag);
844 //if(verbose) printf("lnum: %d\n", count);
846 shape->numlinestyles = count;
847 shape->linestyles = malloc(sizeof(LINESTYLE)*count);
848 /* TODO: should we start with 1 and insert a correct definition of the
849 "built in" linestyle 0? */
852 shape->linestyles[t].width = swf_GetU16(tag);
854 swf_GetRGBA(tag, &shape->linestyles[t].color);
856 swf_GetRGB(tag, &shape->linestyles[t].color);
861 void swf_ParseDefineShape(TAG*tag, SHAPE2*shape)
868 if(tag->id == ST_DEFINESHAPE)
870 else if(tag->id == ST_DEFINESHAPE2)
872 else if(tag->id == ST_DEFINESHAPE3)
875 fprintf(stderr, "parseDefineShape must be called with a shape tag");
878 id = swf_GetU16(tag); //id
879 memset(shape, 0, sizeof(SHAPE2));
880 shape->bbox = malloc(sizeof(SRECT));
881 swf_GetRect(tag, &r);
883 memcpy(shape->bbox, &r, sizeof(SRECT));
884 parseFillStyleArray(tag, shape);
886 swf_ResetReadBits(tag);
887 fill = (U16)swf_GetBits(tag,4);
888 line = (U16)swf_GetBits(tag,4);
890 shape->lines = swf_ParseShapeData(&tag->data[tag->pos], (tag->len - tag->pos)*8, fill, line);