lib/modules/swfshape.c

   1 /* swfshape.c
   2
   3    shape functions
   4
   5    Extension module for the rfxswf library.
   6    Part of the swftools package.
   7
   8    Copyright (c) 2001 Rainer Böhme <rfxswf@reflex-studio.de>
   9
  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.
  14
  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.
  19
  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 */
  23
  24 #define SF_MOVETO       0x01
  25 #define SF_FILL0        0x02
  26 #define SF_FILL1        0x04
  27 #define SF_LINE         0x08
  28 #define SF_NEWSTYLE     0x10
  29
  30 #define FILL_SOLID      0x00
  31 #define FILL_LINEAR     0x10  // Gradient
  32 #define FILL_RADIAL     0x12
  33 #define FILL_TILED      0x40  // Bitmap
  34 #define FILL_CLIPPED    0x41
  35
  36 void swf_ShapeFree(SHAPE * s)
  37 { if (s)
  38   { if (s->linestyle.data) free(s->linestyle.data);
  39     s->linestyle.data = NULL;
  40     s->linestyle.n    = 0;
  41     if (s->fillstyle.data) free(s->fillstyle.data);
  42     s->fillstyle.data = NULL;
  43     s->fillstyle.n    = 0;
  44     if (s->data) free(s->data);
  45     s->data = NULL;
  46   }
  47   free(s);
  48 }
  49
  50 int swf_ShapeNew(SHAPE * * s)
  51 { SHAPE * sh;
  52   if (!s) return -1;
  53   sh = (SHAPE *)malloc(sizeof(SHAPE)); s[0] = sh;
  54   if (sh) memset(sh,0x00,sizeof(SHAPE));
  55   return sh?0:-1;
  56 }
  57
  58 int swf_GetSimpleShape(TAG * t,SHAPE * * s) // without Linestyle/Fillstyle Record
  59 { SHAPE * sh;
  60   int bitl, len;
  61   int end;
  62   U32 pos;
  63
  64   if (FAILED(swf_ShapeNew(s))) return -1;
  65   sh = s[0];
  66
  67   swf_ResetReadBits(t);
  68   sh->bits.fill = (U16)swf_GetBits(t,4);
  69   sh->bits.line = (U16)swf_GetBits(t,4);
  70   bitl = 0; end = 0; pos = swf_GetTagPos(t);
  71
  72   while (!end)
  73   { int edge = swf_GetBits(t,1); bitl+=1;
  74     if (edge)
  75     { bitl+=1;
  76       if (swf_GetBits(t,1))                 // Line
  77       { U16 nbits = swf_GetBits(t,4)+2;
  78         bitl+=5;
  79
  80         if (swf_GetBits(t,1))               // x/y Line
  81         { swf_GetBits(t,nbits);
  82           swf_GetBits(t,nbits);
  83           bitl+=nbits*2;
  84         }
  85         else                            // hline/vline
  86         { swf_GetBits(t,nbits+1);
  87           bitl+=nbits+1;
  88         }
  89       }
  90       else                              // Curve
  91       { U16 nbits = swf_GetBits(t,4)+2;
  92         bitl+=4;
  93
  94         swf_GetBits(t,nbits);
  95         swf_GetBits(t,nbits);
  96         swf_GetBits(t,nbits);
  97         swf_GetBits(t,nbits);
  98
  99         bitl+=4*nbits;
 100       }
 101     }
 102     else
 103     { U16 flags = swf_GetBits(t,5); bitl+=5;
 104       if (flags)
 105       {
 106         if (flags&SF_MOVETO)
 107         { U16 nbits = swf_GetBits(t,5); bitl+=5;
 108           swf_GetBits(t,nbits);
 109           swf_GetBits(t,nbits);
 110           bitl+=2*nbits;
 111         }
 112
 113         if (flags&SF_FILL0)
 114         { swf_GetBits(t,sh->bits.fill);
 115           bitl+=sh->bits.fill;
 116         }
 117
 118         if (flags&SF_FILL1)
 119         { swf_GetBits(t,sh->bits.fill);
 120           bitl+=sh->bits.fill;
 121         }
 122
 123         if (flags&SF_LINE)
 124         { swf_GetBits(t,sh->bits.line);
 125           bitl+=sh->bits.line;
 126         }
 127
 128         if (flags&SF_NEWSTYLE)
 129         { fprintf(stderr,"RFXSWF: Can't process extended styles in shape.\n");
 130         }
 131       }
 132       else end = 1;
 133     }
 134   }
 135   swf_SetTagPos(t,pos);
 136   len = (bitl+7)/8;
 137
 138   if (sh->data) free(sh->data);
 139   sh->data = (U8*)malloc(len);
 140
 141   if (sh->data)
 142   { sh->bitlen = bitl;
 143     swf_GetBlock(t,sh->data,len);
 144   }
 145   else return -1;
 146
 147   return len;
 148 }
 149
 150 int swf_SetSimpleShape(TAG * t,SHAPE * s) // without Linestyle/Fillstyle Record
 151 { int l;
 152
 153   if (!s) return -1;
 154   l = (s->bitlen+7)/8;
 155
 156   if (t)
 157   { swf_ResetWriteBits(t);
 158
 159     swf_SetBits(t,s->bits.fill,4);
 160     swf_SetBits(t,s->bits.line,4);
 161     swf_SetBlock(t,s->data,l);
 162
 163     swf_ResetWriteBits(t);
 164   }
 165   return l+1;
 166 }
 167
 168 int swf_SetFillStyle(TAG * t,FILLSTYLE * f)
 169 { if ((!t)||(!f)) return -1;
 170   swf_SetU8(t,f->type);
 171
 172   // no gradients yet!
 173
 174   switch (f->type)
 175   { case FILL_SOLID:
 176       if (swf_GetTagID(t)!=ST_DEFINESHAPE3) swf_SetRGB(t,&f->color);
 177       else swf_SetRGBA(t,&f->color);
 178       break;
 179
 180     case FILL_TILED:
 181     case FILL_CLIPPED:
 182       swf_SetU16(t,f->id_bitmap);
 183       swf_SetMatrix(t,&f->m);
 184       break;
 185     case FILL_LINEAR:
 186     case FILL_RADIAL:
 187       swf_SetMatrix(t,&f->m);
 188       swf_SetGradient(t,&f->gradient,/*alpha?*/t->id==ST_DEFINESHAPE3?1:0);
 189       break;
 190   }
 191
 192   return 0;
 193 }
 194
 195 int swf_SetLineStyle(TAG * t,LINESTYLE * l)
 196 { if ((!l)||(!t)) return -1;
 197   swf_SetU16(t,l->width);
 198
 199   if (swf_GetTagID(t)!=ST_DEFINESHAPE3) swf_SetRGB(t,&l->color);
 200   else swf_SetRGBA(t,&l->color);
 201
 202   return 0;
 203 }
 204
 205 int swf_SetShapeStyleCount(TAG * t,U16 n)
 206 { if (n>254)
 207   { swf_SetU8(t,0xff);
 208     swf_SetU16(t,n);
 209     return 3;
 210   }
 211   else
 212   { swf_SetU8(t,n);
 213     return 1;
 214   }
 215 }
 216
 217 int swf_SetShapeStyles(TAG * t,SHAPE * s)
 218 { int i,l;
 219   if (!s) return -1;
 220
 221   l = 0;
 222   l += swf_SetShapeStyleCount(t,s->fillstyle.n);
 223
 224   for (i=0;i<s->fillstyle.n;i++)
 225     l+=swf_SetFillStyle(t,&s->fillstyle.data[i]);
 226
 227   l += swf_SetShapeStyleCount(t,s->linestyle.n);
 228
 229   for (i=0;i<s->linestyle.n;i++)
 230     l+=swf_SetLineStyle(t,&s->linestyle.data[i]);
 231
 232   return l;
 233 }
 234
 235 int swf_ShapeCountBits(SHAPE * s,U8 * fbits,U8 * lbits)
 236 { if (!s) return -1;
 237   s->bits.fill = swf_CountUBits(s->fillstyle.n, 0);
 238   s->bits.line = swf_CountUBits(s->linestyle.n, 0);
 239   if (fbits) fbits[0] = s->bits.fill;
 240   if (lbits) lbits[0] = s->bits.line;
 241   return 0;
 242 }
 243
 244 int swf_SetShapeBits(TAG * t,SHAPE * s)
 245 { if ((!t)||(!s)) return -1;
 246   swf_ResetWriteBits(t);
 247   swf_SetBits(t,s->bits.fill,4);
 248   swf_SetBits(t,s->bits.line,4);
 249   return 0;
 250 }
 251
 252 int swf_SetShapeHeader(TAG * t,SHAPE * s)
 253 { int res;
 254   res = swf_SetShapeStyles(t,s);
 255   if (res>=0) res = swf_ShapeCountBits(s,NULL,NULL);
 256   if (res>=0) res = swf_SetShapeBits(t,s);
 257   return res;
 258 }
 259
 260 int swf_ShapeAddFillStyle(SHAPE * s,U8 type,MATRIX * m,RGBA * color,U16 id_bitmap, GRADIENT*gradient)
 261 { RGBA def_c;
 262   MATRIX def_m;
 263   GRADIENT def_g;
 264
 265   // handle defaults
 266
 267   if (!s) return -1;
 268   if (!color)
 269   { color = &def_c;
 270     def_c.a = 0xff;
 271     def_c.r = def_c.g = def_c.b = 0;
 272   }
 273   if (!m)
 274   { m = &def_m;
 275     swf_GetMatrix(NULL,m);
 276   }
 277   if(!gradient)
 278   {
 279     gradient = &def_g;
 280     swf_GetGradient(NULL, gradient, 1);
 281   }
 282
 283   // handle memory
 284
 285   if (s->fillstyle.data)
 286   { FILLSTYLE * new = (FILLSTYLE *)realloc(s->fillstyle.data,(s->fillstyle.n+1)*sizeof(FILLSTYLE));
 287     if (!new) return -1;
 288     s->fillstyle.data = new;
 289   }
 290   else
 291   { s->fillstyle.data = (FILLSTYLE *)malloc(sizeof(FILLSTYLE));
 292     s->fillstyle.n = 0;
 293     if (!s->fillstyle.data) return -1;
 294   }
 295
 296   // set fillstyle
 297
 298   s->fillstyle.data[s->fillstyle.n].type = type;
 299   s->fillstyle.data[s->fillstyle.n].id_bitmap = id_bitmap;
 300   memcpy(&s->fillstyle.data[s->fillstyle.n].m,m,sizeof(MATRIX));
 301   memcpy(&s->fillstyle.data[s->fillstyle.n].color,color,sizeof(RGBA));
 302   memcpy(&s->fillstyle.data[s->fillstyle.n].gradient,gradient,sizeof(GRADIENT));
 303
 304   return (++s->fillstyle.n);
 305 }
 306
 307 int swf_ShapeAddSolidFillStyle(SHAPE * s,RGBA * color)
 308 { return swf_ShapeAddFillStyle(s,FILL_SOLID,NULL,color,0,0);
 309 }
 310
 311 int swf_ShapeAddBitmapFillStyle(SHAPE * s,MATRIX * m,U16 id_bitmap,int clip)
 312 { return swf_ShapeAddFillStyle(s,clip?FILL_CLIPPED:FILL_TILED,m,NULL,id_bitmap,0);
 313 }
 314
 315 int swf_ShapeAddGradientFillStyle(SHAPE * s,MATRIX * m,GRADIENT* gradient,int radial)
 316 { return swf_ShapeAddFillStyle(s,radial?FILL_RADIAL:FILL_LINEAR,m,NULL,0,gradient);
 317 }
 318
 319 int swf_ShapeAddLineStyle(SHAPE * s,U16 width,RGBA * color)
 320 { RGBA def;
 321   if (!s) return -1;
 322   if (!color)
 323   { color = &def;
 324     def.a = 0xff;
 325     def.r = def.g = def.b = 0;
 326   }
 327   if (s->linestyle.data)
 328   { LINESTYLE * new = (LINESTYLE *)realloc(s->linestyle.data,(s->linestyle.n+1)*sizeof(LINESTYLE));
 329     if (!new) return -1;
 330     s->linestyle.data = new;
 331   }
 332   else
 333   { s->linestyle.data = (LINESTYLE *)malloc(sizeof(LINESTYLE));
 334     s->linestyle.n = 0;
 335     if (!s->linestyle.data) return -1;
 336   }
 337
 338   s->linestyle.data[s->linestyle.n].width = width;
 339   memcpy(&s->linestyle.data[s->linestyle.n].color,color,sizeof(RGBA));
 340
 341   return (++s->linestyle.n);
 342 }
 343
 344 int swf_ShapeSetMove(TAG * t,SHAPE * s,S32 x,S32 y)
 345 { U8 b;
 346   if (!t) return -1;
 347   swf_SetBits(t,0,1);
 348   swf_SetBits(t,SF_MOVETO,5);
 349
 350   b = swf_CountBits(x,0);
 351   b = swf_CountBits(y,b);
 352
 353   swf_SetBits(t,b,5);
 354   swf_SetBits(t,x,b);
 355   swf_SetBits(t,y,b);
 356
 357   return 0;
 358 }
 359
 360 int swf_ShapeSetStyle(TAG * t,SHAPE * s,int line,int fill0,int fill1)
 361 { if ((!t)||(!s)) return -1;
 362
 363   swf_SetBits(t,0,1);
 364   swf_SetBits(t,(line?SF_LINE:0)|(fill0?SF_FILL0:0)|(fill1?SF_FILL1:0),5);
 365
 366   if (fill0) swf_SetBits(t,fill0,s->bits.fill);
 367   if (fill1) swf_SetBits(t,fill1,s->bits.fill);
 368   if (line)  swf_SetBits(t,line ,s->bits.line);
 369
 370   return 0;
 371 }
 372
 373 /* TODO: sometimes we want to set fillstyle 0, as that's the empty fill
 374    used for line drawings. At the moment, we can't, as 0 fill be considered
 375    nonexistent and therefore not set.
 376    these defines are a workaround (they also reduce the maximal number of
 377    fill styles to 32768)
 378  */
 379 #define UNDEFINED_COORD 0x7fffffff
 380
 381 int swf_ShapeSetAll(TAG * t,SHAPE * s,S32 x,S32 y,int line,int fill0,int fill1)
 382 { U8 b;
 383   U8 hasmove = 0;
 384   if ((!t)||(!s)) return -1;
 385
 386   if(x!=UNDEFINED_COORD || y!=UNDEFINED_COORD)
 387       hasmove=1;
 388
 389   swf_SetBits(t,0,1);
 390   swf_SetBits(t,(hasmove?SF_MOVETO:0)|(line?SF_LINE:0)|(fill0?SF_FILL0:0)|(fill1?SF_FILL1:0),5);
 391
 392   if(hasmove) {
 393     b = swf_CountBits(x,0);
 394     b = swf_CountBits(y,b);
 395     swf_SetBits(t,b,5);
 396     swf_SetBits(t,x,b);
 397     swf_SetBits(t,y,b);
 398   }
 399
 400   if (fill0) swf_SetBits(t,fill0,s->bits.fill);
 401   if (fill1) swf_SetBits(t,fill1,s->bits.fill);
 402   if (line)  swf_SetBits(t,line ,s->bits.line);
 403
 404   return 0;
 405 }
 406
 407 int swf_ShapeSetEnd(TAG * t)
 408 { if (!t) return -1;
 409   swf_SetBits(t,0,6);
 410   swf_ResetWriteBits(t);
 411   return 0;
 412 }
 413
 414 int swf_ShapeSetLine(TAG * t,SHAPE * s,S32 x,S32 y)
 415 {
 416     U8 b;
 417     if (!t) return -1;
 418
 419     b = swf_CountBits(x,2);
 420     b = swf_CountBits(y,b);
 421     if (b<2) b=2;
 422     if(b >= 18) {
 423         if(b >= 18 + 4) {
 424             /* do not split into more than 16 segments. If the line is *that* long, something's broken */
 425             fprintf(stderr, "Warning: Line to %.2f,%.2f is too long", (double)x,(double)y);
 426             return -1;
 427         } else {
 428             /* split line */
 429             int x1,y1,x2,y2;
 430             if(x>=0) { x1 = x/2;x2 = (x+1)/2;}
 431             else     { x1 = x/2;x2 = (x-1)/2;}
 432             if(y>=0) { y1 = y/2;y2 = (y+1)/2;}
 433             else     { y1 = y/2;y2 = (y-1)/2;}
 434             swf_ShapeSetLine(t, s, x1,y1);
 435             swf_ShapeSetLine(t, s, x2,y2);
 436             return 0;
 437         }
 438     }
 439
 440     if(x!=0 && y!=0) { //(!s)||((x!=0)&&(y!=0)))
 441         swf_SetBits(t,3,2); // Straight Edge
 442         swf_SetBits(t, b-2, 4); //Number of Bits in x/y
 443         swf_SetBits(t,1,1); // Diagonal
 444         swf_SetBits(t,x,b);
 445         swf_SetBits(t,y,b);
 446     } else if (x==0) {
 447         swf_SetBits(t,3,2); // Straight Edge
 448         swf_SetBits(t, b-2, 4); //Number of Bits in y
 449         swf_SetBits(t,1,2); // Vertical
 450         swf_SetBits(t,y,b);
 451     } else {
 452         swf_SetBits(t,3,2); // Straight Edge
 453         swf_SetBits(t, b-2, 4); //Number of Bits in x
 454         swf_SetBits(t,0,2); // Horizontal
 455         swf_SetBits(t,x,b);
 456     }
 457     return 0;
 458 }
 459
 460 int swf_ShapeSetCurve(TAG * t,SHAPE * s,S32 x,S32 y,S32 ax,S32 ay)
 461 {
 462     U8 b;
 463     if (!t) return -1;
 464
 465     b = swf_CountBits(ax,2);
 466     b = swf_CountBits(ay,b);
 467     b = swf_CountBits(x,b);
 468     b = swf_CountBits(y,b);
 469
 470     if(b >= 18) {
 471           fprintf(stderr, "Bit overflow in swf_ShapeSetCurve- %d (%d,%d,%d,%d)\n", b, ax,ay,x,y);
 472           b = 17;
 473     }
 474
 475     swf_SetBits(t,2,2);
 476     swf_SetBits(t,b-2,4);
 477     swf_SetBits(t,x,b);
 478     swf_SetBits(t,y,b);
 479     swf_SetBits(t,ax,b);
 480     swf_SetBits(t,ay,b);
 481     return 0;
 482 }
 483
 484 int swf_ShapeSetCircle(TAG * t,SHAPE * s,S32 x,S32 y,S32 rx,S32 ry)
 485 { double C1 = 0.2930;
 486   double C2 = 0.4140;
 487   double begin = 0.7070;
 488
 489   if (!t) return -1;
 490
 491   swf_ShapeSetMove(t,s,x+begin*rx,y+begin*ry);
 492   swf_ShapeSetCurve(t,s, -C1*rx,  C1*ry, -C2*rx,      0);
 493   swf_ShapeSetCurve(t,s, -C2*rx,      0, -C1*rx, -C1*ry);
 494   swf_ShapeSetCurve(t,s, -C1*rx, -C1*ry,      0, -C2*ry);
 495   swf_ShapeSetCurve(t,s,      0, -C2*ry,  C1*rx, -C1*ry);
 496   swf_ShapeSetCurve(t,s,  C1*rx, -C1*ry,  C2*rx,      0);
 497   swf_ShapeSetCurve(t,s,  C2*rx,      0,  C1*rx,  C1*ry);
 498   swf_ShapeSetCurve(t,s,  C1*rx,  C1*ry,      0,  C2*ry);
 499   swf_ShapeSetCurve(t,s,      0,  C2*ry, -C1*rx,  C1*ry);
 500
 501   return 0;
 502 }
 503
 504 /* todo: merge this with swf_GetSimpleShape */
 505 SHAPELINE* swf_ParseShapeData(U8*data, int bits, int fillbits, int linebits)
 506 {
 507     SHAPELINE _lines;
 508     SHAPELINE*lines = &_lines;
 509
 510     TAG _tag;
 511     TAG* tag = &_tag;
 512     int fill0 = 0;
 513     int fill1 = 0;
 514     int line = 0;
 515     int x=0,y=0;
 516
 517     memset(tag, 0, sizeof(TAG));
 518     tag->data = data;
 519     tag->len = tag->memsize = (bits+7)/8;
 520     tag->pos = 0;
 521
 522     lines->next = 0;
 523     while(1) {
 524         int flags;
 525         flags = swf_GetBits(tag, 1);
 526         if(!flags) { //style change
 527             flags = swf_GetBits(tag, 5);
 528             if(!flags)
 529                 break;
 530             if(flags&1) { //move
 531                 int n = swf_GetBits(tag, 5);
 532                 x = swf_GetSBits(tag, n); //x
 533                 y = swf_GetSBits(tag, n); //y
 534             }
 535             if(flags&2)
 536                 fill0 = swf_GetBits(tag, fillbits);
 537             if(flags&4)
 538                 fill1 = swf_GetBits(tag, fillbits);
 539             if(flags&8)
 540                 line = swf_GetBits(tag, linebits);
 541             if(flags&16) {
 542                 fprintf(stderr, "Additional file styles style change not yet supported\n");
 543                 exit(1);
 544                 //enumerateUsedIDs_styles(tag, callback, callback_data, num);
 545                 fillbits = swf_GetBits(tag, 4);
 546                 linebits = swf_GetBits(tag, 4);
 547             }
 548             if(flags&1) { //move
 549                 lines->next = (SHAPELINE*)malloc(sizeof(SHAPELINE));
 550                 lines = lines->next;
 551                 lines->type = moveTo;
 552                 lines->x = x;
 553                 lines->y = y;
 554                 lines->sx = lines->sy = 0;
 555                 lines->fillstyle0 = fill0;
 556                 lines->fillstyle1 = fill1;
 557                 lines->linestyle = line;
 558                 lines->next = 0;
 559             }
 560         } else {
 561             flags = swf_GetBits(tag, 1);
 562             if(flags) { //straight edge
 563                 int n = swf_GetBits(tag, 4) + 2;
 564                 if(swf_GetBits(tag, 1)) { //line flag
 565                     x += swf_GetSBits(tag, n); //delta x
 566                     y += swf_GetSBits(tag, n); //delta y
 567                 } else {
 568                     int v=swf_GetBits(tag, 1);
 569                     int d;
 570                     d = swf_GetSBits(tag, n); //vert/horz
 571                     if(v) y += d;
 572                     else  x += d;
 573                 }
 574                 lines->next = (SHAPELINE*)malloc(sizeof(SHAPELINE));
 575                 lines = lines->next;
 576                 lines->type = lineTo;
 577                 lines->x = x;
 578                 lines->y = y;
 579                 lines->sx = lines->sy = 0;
 580                 lines->fillstyle0 = fill0;
 581                 lines->fillstyle1 = fill1;
 582                 lines->linestyle = line;
 583                 lines->next = 0;
 584             } else { //curved edge
 585                 int n = swf_GetBits(tag, 4) + 2;
 586                 int x1,y1;
 587                 x += swf_GetSBits(tag, n);
 588                 y += swf_GetSBits(tag, n);
 589                 x1 = x;
 590                 y1 = y;
 591                 x += swf_GetSBits(tag, n);
 592                 y += swf_GetSBits(tag, n);
 593
 594                 lines->next = (SHAPELINE*)malloc(sizeof(SHAPELINE));
 595                 lines = lines->next;
 596                 lines->type = splineTo;
 597                 lines->sx = x1;
 598                 lines->sy = y1;
 599                 lines->x = x;
 600                 lines->y = y;
 601                 lines->fillstyle0 = fill0;
 602                 lines->fillstyle1 = fill1;
 603                 lines->linestyle = line;
 604                 lines->next = 0;
 605             }
 606         }
 607     }
 608     return _lines.next;
 609 }
 610
 611 SRECT swf_GetShapeBoundingBox(SHAPE2*shape2)
 612 {
 613     SRECT r;
 614     SHAPELINE*l = shape2->lines;
 615     int lastx=0,lasty=0;
 616     int valid = 0;
 617     r.xmin = r.ymin = SCOORD_MAX;
 618     r.xmax = r.ymax = SCOORD_MIN;
 619
 620     while(l) {
 621         int t1;
 622         if(l->linestyle>0) {
 623             t1 = shape2->linestyles[l->linestyle - 1].width*3/2;
 624         } else {
 625             t1 = 0;
 626         }
 627
 628         if(l->type == lineTo || l->type == splineTo)
 629         {
 630             valid = 1;
 631             if(lastx - t1 < r.xmin) r.xmin = lastx - t1;
 632             if(lasty - t1 < r.ymin) r.ymin = lasty - t1;
 633             if(lastx + t1 > r.xmax) r.xmax = lastx + t1;
 634             if(lasty + t1 > r.ymax) r.ymax = lasty + t1;
 635             if(l->x - t1 < r.xmin) r.xmin = l->x - t1;
 636             if(l->y - t1 < r.ymin) r.ymin = l->y - t1;
 637             if(l->x + t1 > r.xmax) r.xmax = l->x + t1;
 638             if(l->y + t1 > r.ymax) r.ymax = l->y + t1;
 639             if(l->type == splineTo) {
 640                 if(l->sx - t1 < r.xmin) r.xmin = l->sx - t1;
 641                 if(l->sy - t1 < r.ymin) r.ymin = l->sy - t1;
 642                 if(l->sx + t1 > r.xmax) r.xmax = l->sx + t1;
 643                 if(l->sy + t1 > r.ymax) r.ymax = l->sy + t1;
 644             }
 645         }
 646         lastx = l->x;
 647         lasty = l->y;
 648         l = l->next;
 649     }
 650     if(!valid) memset(&r, 0, sizeof(SRECT));
 651     return r;
 652 }
 653
 654 void swf_Shape2Free(SHAPE2 * s)
 655 {
 656     SHAPELINE*line = s->lines;
 657     while(line) {
 658         SHAPELINE*next = line->next;
 659         free(line);
 660         line = next;
 661     }
 662     if(s->linestyles)
 663         free(s->linestyles);
 664     if(s->fillstyles)
 665         free(s->fillstyles);
 666     if(s->bbox)
 667         free(s->bbox);
 668 }
 669
 670 SHAPE2* swf_ShapeToShape2(SHAPE*shape) {
 671
 672     SHAPE2*shape2 = (SHAPE2*)malloc(sizeof(SHAPE2));
 673
 674     shape2->numlinestyles = shape->linestyle.n;
 675     shape2->linestyles = (LINESTYLE*)malloc(sizeof(LINESTYLE)*shape->linestyle.n);
 676     memcpy(shape2->linestyles, shape->linestyle.data, sizeof(LINESTYLE)*shape->linestyle.n);
 677
 678     shape2->numfillstyles = shape->fillstyle.n;
 679     shape2->fillstyles = (FILLSTYLE*)malloc(sizeof(FILLSTYLE)*shape->fillstyle.n);
 680     memcpy(shape2->fillstyles, shape->fillstyle.data, sizeof(FILLSTYLE)*shape->fillstyle.n);
 681
 682     shape2->lines = swf_ParseShapeData(shape->data, shape->bitlen, shape->bits.fill, shape->bits.line);
 683     shape2->bbox = 0;
 684     return shape2;
 685 };
 686
 687 void swf_ShapeSetBitmapRect(TAG*tag, U16 gfxid, int width, int height)
 688 {
 689     SHAPE*shape;
 690     MATRIX m;
 691     RGBA rgb;
 692     SRECT r;
 693     int lines = 0;
 694     int ls=0,fs;
 695     swf_ShapeNew(&shape);
 696     rgb.b = rgb.g = rgb.r = 0xff;
 697     if(lines)
 698         ls = swf_ShapeAddLineStyle(shape,20,&rgb);
 699     swf_GetMatrix(NULL,&m);
 700     m.sx = 20*65536;
 701     m.sy = 20*65536;
 702
 703     fs = swf_ShapeAddBitmapFillStyle(shape,&m,gfxid,0);
 704     r.xmin = 0;
 705     r.ymin = 0;
 706     r.xmax = width*20;
 707     r.ymax = height*20;
 708     swf_SetRect(tag,&r);
 709
 710     swf_SetShapeStyles(tag,shape);
 711     swf_ShapeCountBits(shape,NULL,NULL);
 712     swf_SetShapeBits(tag,shape);
 713
 714     swf_ShapeSetAll(tag,shape,0,0,lines?ls:0,fs,0);
 715
 716     swf_ShapeSetLine(tag,shape,width*20,0);
 717     swf_ShapeSetLine(tag,shape,0,height*20);
 718     swf_ShapeSetLine(tag,shape,-width*20,0);
 719     swf_ShapeSetLine(tag,shape,0,-height*20);
 720     swf_ShapeSetEnd(tag);
 721     swf_ShapeFree(shape);
 722 }
 723
 724 void swf_Shape2ToShape(SHAPE2*shape2, SHAPE*shape)
 725 {
 726     TAG*tag = swf_InsertTag(0,0);
 727     SHAPELINE*l,*next;
 728     int newx=0,newy=0,lastx=0,lasty=0,oldls=0,oldfs0=0,oldfs1=0;
 729
 730     memset(shape, 0, sizeof(SHAPE));
 731
 732     shape->linestyle.n = shape2->numlinestyles;
 733     shape->linestyle.data = (LINESTYLE*)malloc(sizeof(LINESTYLE)*shape->linestyle.n);
 734     memcpy(shape->linestyle.data, shape2->linestyles, sizeof(LINESTYLE)*shape->linestyle.n);
 735
 736     shape->fillstyle.n =  shape2->numfillstyles;
 737     shape->fillstyle.data = (FILLSTYLE*)malloc(sizeof(FILLSTYLE)*shape->fillstyle.n);
 738     memcpy(shape->fillstyle.data, shape2->fillstyles, sizeof(FILLSTYLE)*shape->fillstyle.n);
 739
 740     swf_ShapeCountBits(shape,NULL,NULL);
 741
 742     l = shape2->lines;
 743
 744     while(l) {
 745         int ls=0,fs0=0,fs1=0;
 746
 747         if(l->type != moveTo) {
 748             if(oldls != l->linestyle) {oldls = ls = l->linestyle;if(!ls) ls=0x8000;}
 749             if(oldfs0 != l->fillstyle0) {oldfs0 = fs0 = l->fillstyle0;if(!fs0) fs0=0x8000;}
 750             if(oldfs1 != l->fillstyle1) {oldfs1 = fs1 = l->fillstyle1;if(!fs1) fs1=0x8000;}
 751
 752             if(ls || fs0 || fs1 || newx!=0x7fffffff || newy!=0x7fffffff) {
 753                 swf_ShapeSetAll(tag,shape,newx,newy,ls,fs0,fs1);
 754                 newx = 0x7fffffff;
 755                 newy = 0x7fffffff;
 756             }
 757         }
 758
 759         if(l->type == lineTo) {
 760             swf_ShapeSetLine(tag,shape,l->x-lastx,l->y-lasty);
 761         } else if(l->type == splineTo) {
 762             swf_ShapeSetCurve(tag,shape, l->sx-lastx,l->sy-lasty, l->x-l->sx,l->y-l->sy);
 763         }
 764         if(l->type == moveTo) {
 765             newx = l->x;
 766             newy = l->y;
 767         }
 768
 769         lastx = l->x;
 770         lasty = l->y;
 771         l = l->next;
 772     }
 773     swf_ShapeSetEnd(tag);
 774     shape->data = tag->data;
 775     shape->bitlen = tag->len*8;
 776 }
 777
 778 void swf_SetShape2(TAG*tag, SHAPE2*shape2)
 779 {
 780     SHAPE shape;
 781     swf_Shape2ToShape(shape2, &shape);
 782
 783     swf_SetRect(tag,shape2->bbox);
 784     swf_SetShapeStyles(tag, &shape);
 785     swf_ShapeCountBits(&shape,NULL,NULL);
 786     swf_SetShapeBits(tag,&shape);
 787
 788     swf_SetBlock(tag, shape.data, (shape.bitlen+7)/8);
 789 }
 790
 791 static void parseFillStyleArray(TAG*tag, SHAPE2*shape)
 792 {
 793     U16 count;
 794     int t;
 795     int num=0;
 796     if(tag->id == ST_DEFINESHAPE)
 797         num = 1;
 798     else if(tag->id == ST_DEFINESHAPE2)
 799         num = 2;
 800     else if(tag->id == ST_DEFINESHAPE3)
 801         num = 3;
 802
 803     count = swf_GetU8(tag);
 804     if(count == 0xff && num>1) // defineshape2,3 only
 805         count = swf_GetU16(tag);
 806
 807     shape->numfillstyles = count;
 808     shape->fillstyles = malloc(sizeof(FILLSTYLE)*count);
 809
 810     for(t=0;t<count;t++)
 811     {
 812         int type;
 813         U8*pos;
 814         FILLSTYLE*dest = &shape->fillstyles[t];
 815         type = swf_GetU8(tag); //type
 816         shape->fillstyles[t].type = type;
 817         if(type == 0) {
 818             /* plain color */
 819             if(num == 3)
 820                 swf_GetRGBA(tag, &dest->color);
 821             else
 822                 swf_GetRGB(tag, &dest->color);
 823         }
 824         else if(type == 0x10 || type == 0x12)
 825         {
 826             /* linear/radial gradient fill */
 827             swf_ResetReadBits(tag);
 828             swf_GetMatrix(tag, &dest->m);
 829             swf_ResetReadBits(tag);
 830             swf_GetGradient(tag, &dest->gradient, num>=3?1:0);
 831         }
 832         else if(type == 0x40 || type == 0x41)
 833         {
 834             /* bitmap fill */
 835             swf_ResetReadBits(tag);
 836             dest->id_bitmap = swf_GetU16(tag); //id
 837             swf_ResetReadBits(tag); //?
 838             swf_GetMatrix(tag, &dest->m);
 839         }
 840         else {
 841             fprintf(stderr, "rfxswf:swftools.c Unknown fillstyle:0x%02x\n",type);
 842         }
 843     }
 844     swf_ResetReadBits(tag);
 845     count = swf_GetU8(tag); // line style array
 846     if(count == 0xff)
 847         count = swf_GetU16(tag);
 848
 849     //if(verbose) printf("lnum: %d\n", count);
 850
 851     shape->numlinestyles = count;
 852     shape->linestyles = malloc(sizeof(LINESTYLE)*count);
 853     /* TODO: should we start with 1 and insert a correct definition of the
 854        "built in" linestyle 0? */
 855     for(t=0;t<count;t++)
 856     {
 857         shape->linestyles[t].width = swf_GetU16(tag);
 858         if(num == 3)
 859             swf_GetRGBA(tag, &shape->linestyles[t].color);
 860         else
 861             swf_GetRGB(tag, &shape->linestyles[t].color);
 862     }
 863     return;
 864 }
 865
 866 void swf_ParseDefineShape(TAG*tag, SHAPE2*shape)
 867 {
 868     int num = 0, id;
 869     U16 fill,line;
 870     SRECT r;
 871     SRECT r2;
 872     SHAPELINE*l;
 873     if(tag->id == ST_DEFINESHAPE)
 874         num = 1;
 875     else if(tag->id == ST_DEFINESHAPE2)
 876         num = 2;
 877     else if(tag->id == ST_DEFINESHAPE3)
 878         num = 3;
 879     else {
 880         fprintf(stderr, "parseDefineShape must be called with a shape tag");
 881     }
 882
 883     id = swf_GetU16(tag); //id
 884     memset(shape, 0, sizeof(SHAPE2));
 885     shape->bbox = malloc(sizeof(SRECT));
 886     swf_GetRect(tag, &r);
 887
 888     memcpy(shape->bbox, &r, sizeof(SRECT));
 889     parseFillStyleArray(tag, shape);
 890
 891     swf_ResetReadBits(tag);
 892     fill = (U16)swf_GetBits(tag,4);
 893     line = (U16)swf_GetBits(tag,4);
 894
 895     shape->lines = swf_ParseShapeData(&tag->data[tag->pos], (tag->len - tag->pos)*8, fill, line);
 896
 897     l = shape->lines;
 898 }
 899