lib/modules/swftools.c

   1 /* swftools.c
   2
   3    Math and matrix functions, misc tools
   4
   5    Extension module for the rfxswf library.
   6    Part of the swftools package.
   7
   8    Copyright (c) 2000, 2001 Rainer Böhme <rfxswf@reflex-studio.de>
   9
  10    This file is distributed under the GPL, see file COPYING for details
  11
  12 */
  13
  14 // Matrix & Math tools for SWF files
  15
  16 #define S64 long long
  17 SFIXED RFXSWF_SP(SFIXED a1,SFIXED a2,SFIXED b1,SFIXED b2)
  18 { S64 a;
  19   a = (S64)a1*(S64)b1+(S64)a2*(S64)b2;
  20   return (SFIXED)(a>>16);
  21 }
  22 SFIXED RFXSWF_QFIX(int zaehler,int nenner) // bildet Quotient von zwei INTs in SFIXED
  23 { S64 z = zaehler<<16;
  24   S64 a = z/(S64)nenner;
  25   return (SFIXED)a;
  26 }
  27 #undef S64
  28
  29 MATRIX * swf_MatrixJoin(MATRIX * d,MATRIX * s1,MATRIX * s2)
  30 {
  31   if (!d) return NULL;
  32   if (!s1) return (s2)?(MATRIX *)memcpy(d,s2,sizeof(MATRIX)):NULL;
  33   if (!s2) return (MATRIX *)memcpy(d,s1,sizeof(MATRIX));
  34
  35   d->tx = s1->tx + s2->tx;
  36   d->ty = s1->ty + s2->ty;
  37
  38   d->sx = RFXSWF_SP(s1->sx,s1->r1,s2->sx,s2->r0);
  39   d->sy = RFXSWF_SP(s1->r0,s1->sy,s2->r1,s2->sy);
  40   d->r0 = RFXSWF_SP(s1->r0,s1->sy,s2->sx,s2->r0);
  41   d->r1 = RFXSWF_SP(s1->sx,s1->r1,s2->r1,s2->sy);
  42
  43   //DumpMatrix(NULL,d);
  44
  45   return d;
  46 }
  47
  48 MATRIX * swf_MatrixMapTriangle(MATRIX * m,int dx,int dy,int x0,int y0,
  49                                int x1,int y1,int x2,int y2)
  50 { int dx1 = x1 - x0;
  51   int dy1 = y1 - y0;
  52   int dx2 = x2 - x0;
  53   int dy2 = y2 - y0;
  54
  55   if (!m) return NULL;
  56   if ((!dx)||(!dy)) return NULL; // check DIV by zero
  57
  58   m->tx = x0;
  59   m->ty = y0;
  60   m->sx = RFXSWF_QFIX(dx1,dx);
  61   m->sy = RFXSWF_QFIX(dy2,dy);
  62   m->r0 = RFXSWF_QFIX(dy1,dx);
  63   m->r1 = RFXSWF_QFIX(dx2,dy);
  64
  65   return m;
  66 }
  67
  68 void swf_SetDefineID(TAG * tag, U16 newid)
  69 {
  70   int oldlen = tag->len;
  71   tag->len = 0;
  72   swf_SetU16(tag, newid); /* set defining ID */
  73   tag->len = oldlen;
  74 }
  75
  76 U16 swf_GetDefineID(TAG * t)
  77 // up to SWF 4.0
  78 { U32 oldTagPos;
  79   U16 id = 0;
  80
  81   oldTagPos = swf_GetTagPos(t);
  82   swf_SetTagPos(t,0);
  83
  84   switch (swf_GetTagID(t))
  85   { case ST_DEFINESHAPE:
  86     case ST_DEFINESHAPE2:
  87     case ST_DEFINESHAPE3:
  88     case ST_DEFINEMORPHSHAPE:
  89     case ST_DEFINEEDITTEXT:
  90     case ST_DEFINEBITS:
  91     case ST_DEFINEBITSJPEG2:
  92     case ST_DEFINEBITSJPEG3:
  93     case ST_DEFINEBITSLOSSLESS:
  94     case ST_DEFINEBITSLOSSLESS2:
  95     case ST_DEFINEBUTTON:
  96     case ST_DEFINEBUTTON2:
  97     case ST_DEFINEBUTTONCXFORM: //pseudodefine
  98     case ST_DEFINEBUTTONSOUND: //pseudodefine
  99     case ST_DEFINEFONT:
 100     case ST_DEFINEFONT2:
 101     case ST_DEFINEFONTINFO: //pseudodefine
 102     case ST_DEFINETEXT:
 103     case ST_DEFINETEXT2:
 104     case ST_DEFINESOUND:
 105     case ST_DEFINESPRITE:
 106     case ST_NAMECHARACTER: //pseudodefine
 107       id = swf_GetU16(t);
 108       break;
 109   }
 110
 111   swf_SetTagPos(t,oldTagPos);
 112
 113   return id;
 114 }
 115
 116 U16 swf_GetPlaceID(TAG * t)
 117 // up to SWF 4.0
 118 { U32 oldTagPos;
 119   U16 id = 0;
 120
 121   oldTagPos = swf_GetTagPos(t);
 122   swf_SetTagPos(t,0);
 123
 124   switch (swf_GetTagID(t))
 125   { case ST_PLACEOBJECT:
 126     case ST_REMOVEOBJECT:
 127     case ST_FREECHARACTER:
 128     case ST_STARTSOUND:
 129       id = swf_GetU16(t);
 130       break;
 131
 132     case ST_PLACEOBJECT2:
 133     { U8 flags = swf_GetU8(t);
 134       U16 d = swf_GetU16(t);
 135       id = (flags&PF_CHAR)?swf_GetU16(t):id;
 136     } break;
 137
 138   }
 139
 140   swf_SetTagPos(t,oldTagPos);
 141
 142   return id;
 143 }
 144
 145 static int swf_definingtagids[] =
 146 {ST_DEFINESHAPE,
 147  ST_DEFINESHAPE2,
 148  ST_DEFINESHAPE3,
 149  ST_DEFINEMORPHSHAPE,
 150  ST_DEFINEFONT,
 151  ST_DEFINEFONT2,
 152  ST_DEFINETEXT,
 153  ST_DEFINETEXT2,
 154  ST_DEFINEEDITTEXT,
 155  ST_DEFINEBITS,
 156  ST_DEFINEBITSJPEG2,
 157  ST_DEFINEBITSJPEG3,
 158  ST_DEFINEBITSLOSSLESS,
 159  ST_DEFINEBITSLOSSLESS2,
 160  ST_DEFINEMOVIE,
 161  ST_DEFINESPRITE,
 162  ST_DEFINEBUTTON,
 163  ST_DEFINEBUTTON2,
 164  ST_DEFINESOUND,
 165  -1
 166 };
 167
 168 // tags which may be used inside a sprite definition
 169 static int swf_spritetagids[] =
 170 {ST_SHOWFRAME,
 171  ST_PLACEOBJECT,
 172  ST_PLACEOBJECT2,
 173  ST_REMOVEOBJECT,
 174  ST_REMOVEOBJECT2, //?
 175  ST_DOACTION,
 176  ST_STARTSOUND,
 177  ST_FRAMELABEL,
 178  ST_SOUNDSTREAMHEAD,
 179  ST_SOUNDSTREAMHEAD2,
 180  ST_SOUNDSTREAMBLOCK,
 181  ST_END,
 182  -1
 183 };
 184
 185 static int swf_pseudodefiningtagids[] =
 186 {
 187  ST_DEFINEFONTINFO,
 188  ST_DEFINEBUTTONCXFORM,
 189  ST_DEFINEBUTTONSOUND,
 190  ST_NAMECHARACTER,
 191  -1
 192 };
 193
 194 U8 swf_isAllowedSpriteTag(TAG * tag)
 195 {
 196     int id = tag->id;
 197     int t=0;
 198     while(swf_spritetagids[t]>=0)
 199     {
 200         if(swf_spritetagids[t] == id)
 201             return 1;
 202         t++;
 203     }
 204     return 0;
 205 }
 206
 207 U8 swf_isDefiningTag(TAG * tag)
 208 {
 209     int id = tag->id;
 210     int t=0;
 211     while(swf_definingtagids[t]>=0)
 212     {
 213         if(swf_definingtagids[t] == id)
 214             return 1;
 215         t++;
 216     }
 217     return 0;
 218 }
 219
 220 U8 swf_isPseudoDefiningTag(TAG * tag)
 221 {
 222     int id = tag->id;
 223     int t=0;
 224     while(swf_pseudodefiningtagids[t]>=0)
 225     {
 226         if(swf_pseudodefiningtagids[t] == id)
 227             return 1;
 228         t++;
 229     }
 230     return 0;
 231 }
 232
 233 U16 swf_GetDepth(TAG * t)
 234 // up to SWF 4.0
 235 {
 236   U16 depth = 0;
 237   U32 oldTagPos;
 238   oldTagPos = swf_GetTagPos(t);
 239   swf_SetTagPos(t,0);
 240
 241   switch (swf_GetTagID(t))
 242   { case ST_PLACEOBJECT:
 243     case ST_REMOVEOBJECT:
 244       swf_GetU16(t); //id
 245       depth = swf_GetU16(t);
 246       break;
 247     case ST_REMOVEOBJECT2:
 248       depth = swf_GetU16(t);
 249       break;
 250     case ST_PLACEOBJECT2:
 251     { U8 flags = swf_GetU8(t);
 252       depth = swf_GetU16(t);
 253     } break;
 254   }
 255   swf_SetTagPos(t,oldTagPos);
 256   return depth;
 257 }
 258
 259 char* swf_GetName(TAG * t)
 260 {
 261     char* name = 0;
 262     U32 oldTagPos;
 263     MATRIX m;
 264     CXFORM c;
 265     oldTagPos = swf_GetTagPos(t);
 266     swf_SetTagPos(t,0);
 267     switch(swf_GetTagID(t))
 268     {
 269         case ST_FRAMELABEL:
 270             name = &t->data[swf_GetTagPos(t)];
 271         break;
 272         case ST_PLACEOBJECT2: {
 273             U8 flags = swf_GetU8(t);
 274             swf_GetU16(t); //depth;
 275             if(flags&PF_CHAR)
 276               swf_GetU16(t); //id
 277             if(flags&PF_MATRIX)
 278               swf_GetMatrix(t, &m);
 279             if(flags&PF_CXFORM)
 280               swf_GetCXForm(t, &c, 1);
 281             if(flags&PF_RATIO)
 282               swf_GetU16(t);
 283             if(flags&PF_NAME) {
 284               swf_ResetReadBits(t);
 285               name = &t->data[swf_GetTagPos(t)];
 286             }
 287         }
 288         break;
 289     }
 290     swf_SetTagPos(t,oldTagPos);
 291     return name;
 292 }
 293
 294 #define DEBUG_ENUMERATE if(0)
 295
 296 static void enumerateUsedIDs_styles(TAG * tag, void (*callback)(TAG*, int, void*), void*callback_data, int num, int morph)
 297 {
 298     U16 count;
 299     int t;
 300     count = swf_GetU8(tag);
 301     if(count == 0xff && num>1) // defineshape2,3 only
 302         count = swf_GetU16(tag);
 303
 304     for(t=0;t<count;t++)
 305     {
 306         int type;
 307         U8*pos;
 308         swf_ResetReadBits(tag);
 309         type = swf_GetU8(tag); //type
 310         if(type == 0) {
 311             if(num == 3)
 312                 {swf_GetRGBA(tag, NULL);if(morph) swf_GetRGBA(tag, NULL);}
 313             else
 314                 {swf_GetRGB(tag, NULL);if(morph) swf_GetRGB(tag, NULL);}
 315         }
 316         else if(type == 0x10 || type == 0x12)
 317         {
 318             swf_ResetReadBits(tag);
 319             swf_GetMatrix(tag, NULL);
 320             if(morph)
 321                 swf_GetMatrix(tag, NULL);
 322             swf_ResetReadBits(tag);
 323             if(morph)
 324                 swf_GetMorphGradient(tag, NULL, NULL);
 325             else
 326                 swf_GetGradient(tag, NULL, /*alpha*/ num>=3?1:0);
 327         }
 328         else if(type == 0x40 || type == 0x41)
 329         {
 330             swf_ResetReadBits(tag);
 331             // we made it.
 332             if(tag->data[tag->pos] != 0xff ||
 333                tag->data[tag->pos+1] != 0xff)
 334             (callback)(tag, tag->pos, callback_data);
 335
 336             swf_GetU16(tag);
 337             swf_ResetReadBits(tag);
 338             swf_GetMatrix(tag, NULL);
 339             if(morph)
 340                 swf_GetMatrix(tag, NULL);
 341         }
 342         else {
 343             fprintf(stderr, "rfxswf:swftools.c Unknown fillstyle:0x%02x\n",type);
 344         }
 345     }
 346     swf_ResetReadBits(tag);
 347     count = swf_GetU8(tag); // line style array
 348     if(count == 0xff)
 349         count = swf_GetU16(tag);
 350     for(t=0;t<count;t++)
 351     {
 352         swf_GetU16(tag);
 353         if(morph)
 354             swf_GetU16(tag);
 355         if(num == 3)
 356             {swf_GetRGBA(tag, NULL);if(morph) swf_GetRGBA(tag, NULL);}
 357         else
 358             {swf_GetRGB(tag, NULL);if(morph) swf_GetRGB(tag, NULL);}
 359     }
 360 }
 361
 362 void enumerateUsedIDs(TAG * tag, int base, void (*callback)(TAG*, int, void*), void*callback_data)
 363 {
 364     int num = 1;
 365     swf_ResetReadBits(tag);
 366     tag->pos = 0;
 367     switch(tag->id)
 368     {
 369         case ST_DEFINEBUTTONCXFORM: {
 370             int t;
 371             callback(tag, tag->pos + base, callback_data);
 372             for(t=0;t<4;t++) {
 373                 int flags;
 374                 callback(tag, tag->pos + base, callback_data);
 375                 swf_GetU16(tag); //sound id
 376                 flags = swf_GetU8(tag);
 377                 if(flags&1)
 378                     swf_GetU32(tag); // in point
 379                 if(flags&2)
 380                     swf_GetU32(tag); // out points
 381                 if(flags&4)
 382                     swf_GetU16(tag); // loop count
 383                 if(flags&8)
 384                 {
 385                     int npoints = swf_GetU8(tag);
 386                     int s;
 387                     for(s=0;s<npoints;s++)
 388                     {
 389                         swf_GetU32(tag);
 390                         swf_GetU16(tag);
 391                         swf_GetU16(tag);
 392                     }
 393                 }
 394             }
 395         } break;
 396         case ST_DEFINEBUTTONSOUND:
 397             callback(tag, tag->pos + base, callback_data); //button id
 398         break;
 399
 400         case ST_EXPORTASSETS: {
 401             int num =  swf_GetU16(tag);
 402             int t;
 403             for(t=0;t<num;t++) {
 404                 callback(tag, tag->pos + base, callback_data); //button id
 405                 swf_GetU16(tag); //id
 406                 while(swf_GetU8(tag)); //name
 407             }
 408         } break;
 409
 410         case ST_FREECHARACTER: /* unusual tags, which all start with an ID */
 411         case ST_NAMECHARACTER:
 412         case ST_GENERATORTEXT:
 413         case ST_MX3:
 414             callback(tag, tag->pos + base, callback_data);
 415         break;
 416         case ST_PLACEOBJECT:
 417             callback(tag, tag->pos + base, callback_data);
 418         break;
 419         case ST_PLACEOBJECT2:
 420             // only if placeflaghascharacter
 421             if(!(tag->data[0]&2))
 422                 break;
 423             callback(tag, 3 + base, callback_data);
 424         break;
 425         case ST_REMOVEOBJECT:
 426             callback(tag, tag->pos + base, callback_data);
 427         break;
 428         case ST_STARTSOUND:
 429             callback(tag, tag->pos + base, callback_data);
 430         break;
 431         case ST_DEFINESPRITE: {
 432             if(tag->len <= 4)
 433                 break; // sprite is expanded
 434
 435             swf_GetU16(tag); // id
 436             swf_GetU16(tag); // framenum
 437
 438             while(1) {
 439                 U16 flags = swf_GetU16(tag);
 440                 U32 len;
 441                 U16 id = flags>>6;
 442                 TAG *tag2 = swf_InsertTag(NULL, id);
 443                 len = flags&0x3f;
 444                 if(len == 63)
 445                     len = swf_GetU32(tag);
 446                 if(id == ST_END)
 447                     break;
 448                 tag2->len = tag2->memsize = len;
 449                 tag2->data = malloc(len);
 450                 memcpy(tag2->data, &tag->data[tag->pos], len);
 451                 /* I never saw recursive sprites, but they are (theoretically)
 452                    possible, so better add base here again */
 453                 enumerateUsedIDs(tag2, tag->pos + base, callback, callback_data);
 454                 swf_DeleteTag(tag2);
 455                 swf_GetBlock(tag, NULL, len);
 456             }
 457         }
 458         break;
 459         case ST_DEFINEBUTTON2: // has some font ids in the button records
 460             num++;
 461         //fallthrough
 462         case ST_DEFINEBUTTON: {
 463             swf_GetU16(tag); //button id
 464             if(num>1)
 465             {
 466                 int offset;
 467                 swf_GetU8(tag); //flag
 468                 offset = swf_GetU16(tag); //offset
 469             }
 470             while(1)
 471             {
 472                 U16 charid;
 473                 if(!swf_GetU8(tag)) //flags
 474                     break;
 475                 callback(tag, tag->pos + base, callback_data);
 476                 swf_GetU16(tag); //char
 477                 swf_GetU16(tag); //layer
 478                 swf_ResetReadBits(tag);
 479                 swf_GetMatrix(tag, NULL);
 480                 if(num>1) {
 481                   swf_ResetReadBits(tag);
 482                   swf_GetCXForm(tag, NULL, 1);
 483                 }
 484             }
 485             // ...
 486         }
 487         break;
 488         case ST_DEFINEEDITTEXT:  {
 489             U8 flags1,flags2;
 490             swf_GetU16(tag); //id
 491             swf_GetRect(tag, NULL); //bounding box
 492             swf_ResetReadBits(tag);
 493             flags1 = swf_GetU8(tag);
 494             flags2 = swf_GetU8(tag);
 495             if(flags1 & 1)
 496                 callback(tag, tag->pos + base, callback_data);
 497         }
 498         break;
 499         case ST_DEFINETEXT2:
 500             num ++;
 501         case ST_DEFINETEXT: {
 502             int glyphbits, advancebits;
 503             int id;
 504             id = swf_GetU16(tag); //id
 505             swf_GetRect(tag, NULL); //bounding box
 506             swf_ResetReadBits(tag);
 507             swf_GetMatrix(tag, NULL); //matrix
 508             swf_ResetReadBits(tag);
 509             glyphbits = swf_GetU8(tag); //glyphbits
 510             advancebits = swf_GetU8(tag); //advancebits
 511             while(1) {
 512                 U16 flags;
 513                 swf_ResetReadBits(tag);
 514                 flags = swf_GetBits(tag, 8);
 515                 if(!flags) break;
 516                 if(flags & 128) // text style record
 517                 {
 518                     swf_ResetReadBits(tag);
 519                     if(flags & 8) { // hasfont
 520                         callback(tag, tag->pos + base, callback_data);
 521                         id = swf_GetU16(tag);
 522                     }
 523                     if(flags & 4) { // hascolor
 524                         if(num==1) swf_GetRGB(tag, NULL);
 525                         else       swf_GetRGBA(tag, NULL);
 526                     }
 527                     if(flags & 2) { //has x offset
 528                         swf_ResetReadBits(tag);
 529                         swf_GetU16(tag);
 530                     }
 531                     if(flags & 1) { //has y offset
 532                         swf_ResetReadBits(tag);
 533                         swf_GetU16(tag);
 534                     }
 535                     if(flags & 8) { //has height
 536                         swf_ResetReadBits(tag);
 537                         swf_GetU16(tag);
 538                     }
 539                 } else { // glyph record
 540                     int t;
 541                     swf_ResetReadBits(tag);
 542                     for(t=0;t<flags;t++) {
 543                         swf_GetBits(tag, glyphbits);
 544                         swf_GetBits(tag, advancebits);
 545                     }
 546                 }
 547             }
 548             break;
 549         }
 550         case ST_DEFINEFONTINFO:
 551             callback(tag, tag->pos + base, callback_data);
 552         break;
 553
 554         //case ST_DEFINEMORPHSHAPE: /* disabled for now (doesn't work) */
 555
 556         case ST_DEFINESHAPE3: // these thingies might have bitmap ids in their fillstyles
 557         num++; //fallthrough
 558         case ST_DEFINESHAPE2:
 559         num++; //fallthrough
 560         case ST_DEFINESHAPE: {
 561             int fillbits;
 562             int linebits;
 563             int id;
 564             int morph = 0;
 565             if(tag->id == ST_DEFINEMORPHSHAPE)
 566                 morph = 1;
 567
 568             id = swf_GetU16(tag); // id;
 569             swf_GetRect(tag, NULL); // bounds
 570             if(morph) {
 571                 swf_GetRect(tag, NULL); // bounds2
 572                 swf_GetU32(tag); //offset to endedges
 573             }
 574
 575             DEBUG_ENUMERATE printf("Tag:%d Name:%s ID:%d\n", tag->id, swf_TagGetName(tag), id);
 576
 577             enumerateUsedIDs_styles(tag, callback, callback_data, num, morph);
 578             DEBUG_ENUMERATE printf("-------\n");
 579             while(--morph>=0) /* morph shapes define two shapes */
 580             {
 581                 fillbits = swf_GetBits(tag, 4);
 582                 linebits = swf_GetBits(tag, 4);
 583                 DEBUG_ENUMERATE printf("%d %d\n", fillbits, linebits);
 584                 swf_ResetReadBits(tag);
 585                 while(1) {
 586                     int flags;
 587                     flags = swf_GetBits(tag, 1);
 588                     if(!flags) { //style change
 589                         flags = swf_GetBits(tag, 5);
 590                         if(!flags)
 591                             break;
 592                         if(flags&1) { //move
 593                             int n = swf_GetBits(tag, 5);
 594                             int x,y;
 595                             x = swf_GetBits(tag, n); //x
 596                             y = swf_GetBits(tag, n); //y
 597                             DEBUG_ENUMERATE printf("move %f %f\n",x/20.0,y/20.0);
 598                         }
 599                         if(flags&2) { //fill0
 600                             int fill0;
 601                             fill0 = swf_GetBits(tag, fillbits);
 602                             DEBUG_ENUMERATE printf("fill0 %d\n", fill0);
 603                         }
 604                         if(flags&4) { //fill1
 605                             int fill1;
 606                             fill1 = swf_GetBits(tag, fillbits);
 607                             DEBUG_ENUMERATE printf("fill1 %d\n", fill1);
 608                         }
 609                         if(flags&8) { //linestyle
 610                             int line;
 611                             line = swf_GetBits(tag, linebits);
 612                             DEBUG_ENUMERATE printf("linestyle %d\n",line);
 613                         }
 614                         if(flags&16) {
 615                             DEBUG_ENUMERATE printf("more fillstyles\n");
 616                             enumerateUsedIDs_styles(tag, callback, callback_data, num, 0);
 617                             fillbits = swf_GetBits(tag, 4);
 618                             linebits = swf_GetBits(tag, 4);
 619                         }
 620                     } else {
 621                         flags = swf_GetBits(tag, 1);
 622                         if(flags) { //straight edge
 623                             int n = swf_GetBits(tag, 4) + 2;
 624                             if(swf_GetBits(tag, 1)) { //line flag
 625                                 int x,y;
 626                                 x = swf_GetSBits(tag, n); //delta x
 627                                 y = swf_GetSBits(tag, n); //delta y
 628                                 DEBUG_ENUMERATE printf("line %f %f\n",x/20.0,y/20.0);
 629                             } else {
 630                                 int v=swf_GetBits(tag, 1);
 631                                 int d;
 632                                 d = swf_GetSBits(tag, n); //vert/horz
 633                                 DEBUG_ENUMERATE printf("%s %f\n",v?"vertical":"horizontal", d/20.0);
 634                             }
 635                         } else { //curved edge
 636                             int n = swf_GetBits(tag, 4) + 2;
 637                             int x1,y1,x2,y2;
 638                             x1 = swf_GetSBits(tag, n);
 639                             y1 = swf_GetSBits(tag, n);
 640                             x2 = swf_GetSBits(tag, n);
 641                             y2 = swf_GetSBits(tag, n);
 642                             DEBUG_ENUMERATE printf("curve %f %f %f %f\n", x1/20.0, y1/20.0, x2/20.0, y2/20.0);
 643                         }
 644                     }
 645                 }
 646             }
 647         }
 648         break;
 649         default:
 650         break;
 651     }
 652 }
 653
 654 void callbackCount(TAG * t,int pos, void*ptr)
 655 {
 656     (*(int*)ptr)++;
 657     DEBUG_ENUMERATE printf("callback(%d) %d\n", pos, *(U16*)&t->data[pos]);
 658 }
 659
 660 void callbackFillin(TAG * t,int pos, void*ptr)
 661 {
 662     **(int**)ptr = pos;
 663     (*(int**)ptr)++;
 664     DEBUG_ENUMERATE printf("callback(%d) %d\n", pos, *(U16*)&t->data[pos]);
 665 }
 666
 667 int swf_GetNumUsedIDs(TAG * t)
 668 {
 669     int num = 0;
 670     enumerateUsedIDs(t, 0, callbackCount, &num);
 671     return num;
 672 }
 673
 674 void swf_GetUsedIDs(TAG * t, int * positions)
 675 {
 676     int * ptr = positions;
 677     enumerateUsedIDs(t, 0, callbackFillin, &ptr);
 678 }
 679
 680 void swf_Relocate (SWF*swf, char*bitmap)
 681 {
 682     TAG*tag;
 683     int slaveids[65536];
 684     memset(slaveids, -1, sizeof(slaveids));
 685     tag = swf->firstTag;
 686     while(tag)
 687     {
 688         int num;
 689         int *ptr;
 690         int t;
 691
 692         if(swf_isDefiningTag(tag))
 693         {
 694             int newid;
 695             int id;
 696
 697             id = swf_GetDefineID(tag); //own id
 698
 699             if(!bitmap[id]) { //free
 700                 newid = id;
 701             }
 702             else {
 703                 newid = 0;
 704                 for (t=1;t<65536;t++)
 705                 {
 706                     if(!bitmap[t])
 707                     {
 708                         newid = t;
 709                         break;
 710                     }
 711                 }
 712             }
 713             bitmap[newid] = 1;
 714             slaveids[id] = newid;
 715
 716             swf_SetDefineID(tag, newid);
 717         }
 718
 719         num = swf_GetNumUsedIDs(tag);
 720         ptr = malloc(sizeof(int)*num);
 721         swf_GetUsedIDs(tag, ptr);
 722
 723         for(t=0;t<num;t++) {
 724             int id = GET16(&tag->data[ptr[t]]);
 725             if(slaveids[id]<0) {
 726                 fprintf(stderr, "swf_Relocate: Mapping id never encountered before: %d\n", id);
 727                 return ;
 728             }
 729             id = slaveids[id];
 730             PUT16(&tag->data[ptr[t]], id);
 731         }
 732         tag=tag->next;
 733     }
 734 }
 735