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  (no gradients yet!)
 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 { U8 b;
 416   if (!t) return -1;
 417   swf_SetBits(t,3,2); // Straight Edge
 418
 419   if ((!s)||((x!=0)&&(y!=0)))
 420   { b = swf_CountBits(x,2);
 421     b = swf_CountBits(y,b);
 422     if (b<2) b=2;
 423     if(b-2 >= 16) {
 424         fprintf(stderr, "Bit overflow in swf_ShapeSetLine(1)- %d\n", b);
 425         fflush(stdout);
 426         b = 17;
 427     }
 428     swf_SetBits(t, b-2, 4);
 429     swf_SetBits(t,1,1);
 430     swf_SetBits(t,x,b);
 431     swf_SetBits(t,y,b);
 432     return 0;
 433   }
 434
 435   if (x==0)
 436   { b = swf_CountBits(y,2);
 437     if(b<2)
 438         b=2;
 439     if(b-2 >= 16) {
 440         fprintf(stderr, "Bit overflow in swf_ShapeSetLine(2)- %d\n", b);
 441         b = 17;
 442     }
 443     swf_SetBits(t, b-2, 4);
 444     swf_SetBits(t,1,2);
 445     swf_SetBits(t,y,b);
 446   }
 447   else
 448   { b = swf_CountBits(x,2);
 449     if(b<2)
 450         b=2;
 451     if(b-2 >= 16) {
 452         fprintf(stderr, "Bit overflow in swf_ShapeSetLine(3)- %d\n", b);
 453         b = 17;
 454     }
 455     swf_SetBits(t, b-2, 4);
 456     swf_SetBits(t,0,2);
 457     swf_SetBits(t,x,b);
 458   }
 459   return 0;
 460 }
 461
 462 int swf_ShapeSetCurve(TAG * t,SHAPE * s,S32 x,S32 y,S32 ax,S32 ay)
 463 { U8 b;
 464   if (!t) return -1;
 465
 466   swf_SetBits(t,2,2);
 467
 468   b = swf_CountBits(ax,2);
 469   b = swf_CountBits(ay,b);
 470   b = swf_CountBits(x,b);
 471   b = swf_CountBits(y,b);
 472
 473   swf_SetBits(t,b-2,4);
 474   swf_SetBits(t,x,b);
 475   swf_SetBits(t,y,b);
 476   swf_SetBits(t,ax,b);
 477   swf_SetBits(t,ay,b);
 478
 479   return 0;
 480 }
 481
 482 int swf_ShapeSetCircle(TAG * t,SHAPE * s,S32 x,S32 y,S32 rx,S32 ry)
 483 { double C1 = 0.2930;
 484   double C2 = 0.4140;
 485   double begin = 0.7070;
 486
 487   if (!t) return -1;
 488
 489   swf_ShapeSetMove(t,s,x+begin*rx,y+begin*ry);
 490   swf_ShapeSetCurve(t,s, -C1*rx,  C1*ry, -C2*rx,      0);
 491   swf_ShapeSetCurve(t,s, -C2*rx,      0, -C1*rx, -C1*ry);
 492   swf_ShapeSetCurve(t,s, -C1*rx, -C1*ry,      0, -C2*ry);
 493   swf_ShapeSetCurve(t,s,      0, -C2*ry,  C1*rx, -C1*ry);
 494   swf_ShapeSetCurve(t,s,  C1*rx, -C1*ry,  C2*rx,      0);
 495   swf_ShapeSetCurve(t,s,  C2*rx,      0,  C1*rx,  C1*ry);
 496   swf_ShapeSetCurve(t,s,  C1*rx,  C1*ry,      0,  C2*ry);
 497   swf_ShapeSetCurve(t,s,      0,  C2*ry, -C1*rx,  C1*ry);
 498
 499   return 0;
 500 }
 501
 502 /* todo: merge this with swf_GetSimpleShape */
 503 SHAPELINE* swf_ParseShapeData(U8*data, int bits, int fillbits, int linebits)
 504 {
 505     SHAPELINE _lines;
 506     SHAPELINE*lines = &_lines;
 507
 508     TAG _tag;
 509     TAG* tag = &_tag;
 510     int fill0 = 0;
 511     int fill1 = 0;
 512     int line = 0;
 513     int x=0,y=0;
 514
 515     memset(tag, 0, sizeof(TAG));
 516     tag->data = data;
 517     tag->len = tag->memsize = (bits+7)/8;
 518     tag->pos = 0;
 519
 520     lines->next = 0;
 521     while(1) {
 522         int flags;
 523         flags = swf_GetBits(tag, 1);
 524         if(!flags) { //style change
 525             flags = swf_GetBits(tag, 5);
 526             if(!flags)
 527                 break;
 528             if(flags&1) { //move
 529                 int n = swf_GetBits(tag, 5);
 530                 x = swf_GetSBits(tag, n); //x
 531                 y = swf_GetSBits(tag, n); //y
 532             }
 533             if(flags&2)
 534                 fill0 = swf_GetBits(tag, fillbits);
 535             if(flags&4)
 536                 fill1 = swf_GetBits(tag, fillbits);
 537             if(flags&8)
 538                 line = swf_GetBits(tag, linebits);
 539             if(flags&16) {
 540                 fprintf(stderr, "Additional file styles style change not yet supported\n");
 541                 exit(1);
 542                 //enumerateUsedIDs_styles(tag, callback, callback_data, num);
 543                 fillbits = swf_GetBits(tag, 4);
 544                 linebits = swf_GetBits(tag, 4);
 545             }
 546             if(flags&1) { //move
 547                 lines->next = (SHAPELINE*)malloc(sizeof(SHAPELINE));
 548                 lines = lines->next;
 549                 lines->type = moveTo;
 550                 lines->x = x;
 551                 lines->y = y;
 552                 lines->sx = lines->sy = 0;
 553                 lines->fillstyle0 = fill0;
 554                 lines->fillstyle1 = fill1;
 555                 lines->linestyle = line;
 556                 lines->next = 0;
 557             }
 558         } else {
 559             flags = swf_GetBits(tag, 1);
 560             if(flags) { //straight edge
 561                 int n = swf_GetBits(tag, 4) + 2;
 562                 if(swf_GetBits(tag, 1)) { //line flag
 563                     x += swf_GetSBits(tag, n); //delta x
 564                     y += swf_GetSBits(tag, n); //delta y
 565                 } else {
 566                     int v=swf_GetBits(tag, 1);
 567                     int d;
 568                     d = swf_GetSBits(tag, n); //vert/horz
 569                     if(v) y += d;
 570                     else  x += d;
 571                 }
 572                 lines->next = (SHAPELINE*)malloc(sizeof(SHAPELINE));
 573                 lines = lines->next;
 574                 lines->type = lineTo;
 575                 lines->x = x;
 576                 lines->y = y;
 577                 lines->sx = lines->sy = 0;
 578                 lines->fillstyle0 = fill0;
 579                 lines->fillstyle1 = fill1;
 580                 lines->linestyle = line;
 581                 lines->next = 0;
 582             } else { //curved edge
 583                 int n = swf_GetBits(tag, 4) + 2;
 584                 int x1,y1;
 585                 x += swf_GetSBits(tag, n);
 586                 y += swf_GetSBits(tag, n);
 587                 x1 = x;
 588                 y1 = y;
 589                 x += swf_GetSBits(tag, n);
 590                 y += swf_GetSBits(tag, n);
 591
 592                 lines->next = (SHAPELINE*)malloc(sizeof(SHAPELINE));
 593                 lines = lines->next;
 594                 lines->type = splineTo;
 595                 lines->sx = x1;
 596                 lines->sy = y1;
 597                 lines->x = x;
 598                 lines->y = y;
 599                 lines->fillstyle0 = fill0;
 600                 lines->fillstyle1 = fill1;
 601                 lines->linestyle = line;
 602                 lines->next = 0;
 603             }
 604         }
 605     }
 606     return _lines.next;
 607 }
 608
 609 SRECT swf_GetShapeBoundingBox(SHAPE2*shape2)
 610 {
 611     SRECT r;
 612     SHAPELINE*l = shape2->lines;
 613     int lastx=0,lasty=0;
 614     int valid = 0;
 615     r.xmin = r.ymin = SCOORD_MAX;
 616     r.xmax = r.ymax = SCOORD_MIN;
 617
 618     while(l) {
 619         int t1;
 620         if(l->linestyle>0) {
 621             t1 = shape2->linestyles[l->linestyle - 1].width*3/2;
 622         } else {
 623             t1 = 0;
 624         }
 625
 626         if(l->type == lineTo || l->type == splineTo)
 627         {
 628             valid = 1;
 629             if(lastx - t1 < r.xmin) r.xmin = lastx - t1;
 630             if(lasty - t1 < r.ymin) r.ymin = lasty - t1;
 631             if(lastx + t1 > r.xmax) r.xmax = lastx + t1;
 632             if(lasty + t1 > r.ymax) r.ymax = lasty + t1;
 633             if(l->x - t1 < r.xmin) r.xmin = l->x - t1;
 634             if(l->y - t1 < r.ymin) r.ymin = l->y - t1;
 635             if(l->x + t1 > r.xmax) r.xmax = l->x + t1;
 636             if(l->y + t1 > r.ymax) r.ymax = l->y + t1;
 637             if(l->type == splineTo) {
 638                 if(l->sx - t1 < r.xmin) r.xmin = l->sx - t1;
 639                 if(l->sy - t1 < r.ymin) r.ymin = l->sy - t1;
 640                 if(l->sx + t1 > r.xmax) r.xmax = l->sx + t1;
 641                 if(l->sy + t1 > r.ymax) r.ymax = l->sy + t1;
 642             }
 643         }
 644         lastx = l->x;
 645         lasty = l->y;
 646         l = l->next;
 647     }
 648     if(!valid) memset(&r, 0, sizeof(SRECT));
 649     return r;
 650 }
 651
 652 void swf_Shape2Free(SHAPE2 * s)
 653 {
 654     SHAPELINE*line = s->lines;
 655     while(line) {
 656         SHAPELINE*next = line->next;
 657         free(line);
 658         line = next;
 659     }
 660     if(s->linestyles)
 661         free(s->linestyles);
 662     if(s->fillstyles)
 663         free(s->fillstyles);
 664     if(s->bbox)
 665         free(s->bbox);
 666 }
 667
 668 SHAPE2* swf_ShapeToShape2(SHAPE*shape) {
 669
 670     SHAPE2*shape2 = (SHAPE2*)malloc(sizeof(SHAPE2));
 671
 672     shape2->numlinestyles = shape->linestyle.n;
 673     shape2->linestyles = (LINESTYLE*)malloc(sizeof(LINESTYLE)*shape->linestyle.n);
 674     memcpy(shape2->linestyles, shape->linestyle.data, sizeof(LINESTYLE)*shape->linestyle.n);
 675
 676     shape2->numfillstyles = shape->fillstyle.n;
 677     shape2->fillstyles = (FILLSTYLE*)malloc(sizeof(FILLSTYLE)*shape->fillstyle.n);
 678     memcpy(shape2->fillstyles, shape->fillstyle.data, sizeof(FILLSTYLE)*shape->fillstyle.n);
 679
 680     shape2->lines = swf_ParseShapeData(shape->data, shape->bitlen, shape->bits.fill, shape->bits.line);
 681     shape2->bbox = 0;
 682     return shape2;
 683 };
 684
 685 void swf_ShapeSetBitmapRect(TAG*tag, U16 gfxid, int width, int height)
 686 {
 687     SHAPE*shape;
 688     MATRIX m;
 689     RGBA rgb;
 690     SRECT r;
 691     int lines = 0;
 692     int ls=0,fs;
 693     swf_ShapeNew(&shape);
 694     rgb.b = rgb.g = rgb.r = 0xff;
 695     if(lines)
 696         ls = swf_ShapeAddLineStyle(shape,20,&rgb);
 697     swf_GetMatrix(NULL,&m);
 698     m.sx = 20*65536;
 699     m.sy = 20*65536;
 700
 701     fs = swf_ShapeAddBitmapFillStyle(shape,&m,gfxid,0);
 702     r.xmin = 0;
 703     r.ymin = 0;
 704     r.xmax = width*20;
 705     r.ymax = height*20;
 706     swf_SetRect(tag,&r);
 707
 708     swf_SetShapeStyles(tag,shape);
 709     swf_ShapeCountBits(shape,NULL,NULL);
 710     swf_SetShapeBits(tag,shape);
 711
 712     swf_ShapeSetAll(tag,shape,0,0,lines?ls:0,fs,0);
 713
 714     swf_ShapeSetLine(tag,shape,width*20,0);
 715     swf_ShapeSetLine(tag,shape,0,height*20);
 716     swf_ShapeSetLine(tag,shape,-width*20,0);
 717     swf_ShapeSetLine(tag,shape,0,-height*20);
 718     swf_ShapeSetEnd(tag);
 719     swf_ShapeFree(shape);
 720 }
 721
 722 void swf_Shape2ToShape(SHAPE2*shape2, SHAPE*shape)
 723 {
 724     TAG*tag = swf_InsertTag(0,0);
 725     SHAPELINE*l,*next;
 726     int newx=0,newy=0,lastx=0,lasty=0,oldls=0,oldfs0=0,oldfs1=0;
 727
 728     memset(shape, 0, sizeof(SHAPE));
 729
 730     shape->linestyle.n = shape2->numlinestyles;
 731     shape->linestyle.data = (LINESTYLE*)malloc(sizeof(LINESTYLE)*shape->linestyle.n);
 732     memcpy(shape->linestyle.data, shape2->linestyles, sizeof(LINESTYLE)*shape->linestyle.n);
 733
 734     shape->fillstyle.n =  shape2->numfillstyles;
 735     shape->fillstyle.data = (FILLSTYLE*)malloc(sizeof(FILLSTYLE)*shape->fillstyle.n);
 736     memcpy(shape->fillstyle.data, shape2->fillstyles, sizeof(FILLSTYLE)*shape->fillstyle.n);
 737
 738     swf_ShapeCountBits(shape,NULL,NULL);
 739
 740     l = shape2->lines;
 741
 742     while(l) {
 743         int ls=0,fs0=0,fs1=0;
 744
 745         if(l->type != moveTo) {
 746             if(oldls != l->linestyle) {oldls = ls = l->linestyle;if(!ls) ls=0x8000;}
 747             if(oldfs0 != l->fillstyle0) {oldfs0 = fs0 = l->fillstyle0;if(!fs0) fs0=0x8000;}
 748             if(oldfs1 != l->fillstyle1) {oldfs1 = fs1 = l->fillstyle1;if(!fs1) fs1=0x8000;}
 749
 750             if(ls || fs0 || fs1 || newx!=0x7fffffff || newy!=0x7fffffff) {
 751                 swf_ShapeSetAll(tag,shape,newx,newy,ls,fs0,fs1);
 752                 newx = 0x7fffffff;
 753                 newy = 0x7fffffff;
 754             }
 755         }
 756
 757         if(l->type == lineTo) {
 758             swf_ShapeSetLine(tag,shape,l->x-lastx,l->y-lasty);
 759         } else if(l->type == splineTo) {
 760             swf_ShapeSetCurve(tag,shape, l->sx-lastx,l->sy-lasty, l->x-l->sx,l->y-l->sy);
 761         }
 762         if(l->type == moveTo) {
 763             newx = l->x;
 764             newy = l->y;
 765         }
 766
 767         lastx = l->x;
 768         lasty = l->y;
 769         l = l->next;
 770     }
 771     swf_ShapeSetEnd(tag);
 772     shape->data = tag->data;
 773     shape->bitlen = tag->len*8;
 774 }
 775
 776 void swf_SetShape2(TAG*tag, SHAPE2*shape2)
 777 {
 778     SHAPE shape;
 779     swf_Shape2ToShape(shape2, &shape);
 780
 781     swf_SetRect(tag,shape2->bbox);
 782     swf_SetShapeStyles(tag, &shape);
 783     swf_ShapeCountBits(&shape,NULL,NULL);
 784     swf_SetShapeBits(tag,&shape);
 785
 786     swf_SetBlock(tag, shape.data, (shape.bitlen+7)/8);
 787 }
 788
 789 static void parseFillStyleArray(TAG*tag, SHAPE2*shape)
 790 {
 791     U16 count;
 792     int t;
 793     int num=0;
 794     if(tag->id == ST_DEFINESHAPE)
 795         num = 1;
 796     else if(tag->id == ST_DEFINESHAPE2)
 797         num = 2;
 798     else if(tag->id == ST_DEFINESHAPE3)
 799         num = 3;
 800
 801     count = swf_GetU8(tag);
 802     if(count == 0xff && num>1) // defineshape2,3 only
 803         count = swf_GetU16(tag);
 804
 805     shape->numfillstyles = count;
 806     shape->fillstyles = malloc(sizeof(FILLSTYLE)*count);
 807
 808     for(t=0;t<count;t++)
 809     {
 810         int type;
 811         U8*pos;
 812         FILLSTYLE*dest = &shape->fillstyles[t];
 813         type = swf_GetU8(tag); //type
 814         shape->fillstyles[t].type = type;
 815         if(type == 0) {
 816             /* plain color */
 817             if(num == 3)
 818                 swf_GetRGBA(tag, &dest->color);
 819             else
 820                 swf_GetRGB(tag, &dest->color);
 821         }
 822         else if(type == 0x10 || type == 0x12)
 823         {
 824             /* linear/radial gradient fill */
 825             swf_ResetReadBits(tag);
 826             swf_GetMatrix(tag, &dest->m);
 827             swf_ResetReadBits(tag);
 828             swf_GetGradient(tag, &dest->gradient, num>=3?1:0);
 829         }
 830         else if(type == 0x40 || type == 0x41)
 831         {
 832             /* bitmap fill */
 833             swf_ResetReadBits(tag);
 834             dest->id_bitmap = swf_GetU16(tag); //id
 835             swf_ResetReadBits(tag); //?
 836             swf_GetMatrix(tag, &dest->m);
 837         }
 838         else {
 839             fprintf(stderr, "rfxswf:swftools.c Unknown fillstyle:0x%02x\n",type);
 840         }
 841     }
 842     swf_ResetReadBits(tag);
 843     count = swf_GetU8(tag); // line style array
 844     if(count == 0xff)
 845         count = swf_GetU16(tag);
 846
 847     //if(verbose) printf("lnum: %d\n", count);
 848
 849     shape->numlinestyles = count;
 850     shape->linestyles = malloc(sizeof(LINESTYLE)*count);
 851     /* TODO: should we start with 1 and insert a correct definition of the
 852        "built in" linestyle 0? */
 853     for(t=0;t<count;t++)
 854     {
 855         shape->linestyles[t].width = swf_GetU16(tag);
 856         if(num == 3)
 857             swf_GetRGBA(tag, &shape->linestyles[t].color);
 858         else
 859             swf_GetRGB(tag, &shape->linestyles[t].color);
 860     }
 861     return;
 862 }
 863
 864 void swf_ParseDefineShape(TAG*tag, SHAPE2*shape)
 865 {
 866     int num = 0, id;
 867     U16 fill,line;
 868     SRECT r;
 869     SRECT r2;
 870     SHAPELINE*l;
 871     if(tag->id == ST_DEFINESHAPE)
 872         num = 1;
 873     else if(tag->id == ST_DEFINESHAPE2)
 874         num = 2;
 875     else if(tag->id == ST_DEFINESHAPE3)
 876         num = 3;
 877     else {
 878         fprintf(stderr, "parseDefineShape must be called with a shape tag");
 879     }
 880
 881     id = swf_GetU16(tag); //id
 882     memset(shape, 0, sizeof(SHAPE2));
 883     shape->bbox = malloc(sizeof(SRECT));
 884     swf_GetRect(tag, &r);
 885
 886     memcpy(shape->bbox, &r, sizeof(SRECT));
 887     parseFillStyleArray(tag, shape);
 888
 889     swf_ResetReadBits(tag);
 890     fill = (U16)swf_GetBits(tag,4);
 891     line = (U16)swf_GetBits(tag,4);
 892
 893     shape->lines = swf_ParseShapeData(&tag->data[tag->pos], (tag->len - tag->pos)*8, fill, line);
 894
 895     l = shape->lines;
 896 }
 897