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