lib/modules/swfaction.c

   1 /* swfaction.c
   2
   3    Actionscript generation and parsing routines
   4
   5    Extension module for the rfxswf library.
   6    Part of the swftools package.
   7
   8    Copyright (c) 2001 Matthias Kramm <kramm@quiss.org>
   9
  10    This file is distributed under the GPL, see file COPYING for details
  11
  12 */
  13
  14 #include "../rfxswf.h"
  15
  16 struct Action
  17 {
  18     int version;
  19     char*name;
  20     U8 op;
  21     char*flags;
  22 } static actions[] =
  23 {
  24 /*
  25 f: frame (word)
  26 u: url (string)
  27 t: target (string)
  28 l: label (string)
  29 C: constant pool header (byte)
  30 c: constant pool entry (string)
  31 s: skip (byte) (number of actions)
  32 m: method (byte) swf_GetUrl2:(0=none, 1=get, 2=post)/GotoFrame2:(1=play)
  33 b: branch (word) (number of bytes)
  34 p (push): type(byte), type=0:string, type=1:double
  35 {: define function (name (string), num (word), params (num strings), codesize (word)
  36 o: object (string)
  37 r: register (byte)
  38  */
  39 {3,"End", 0x00, ""},
  40 {3,"GotoFrame", 0x81, "f"},
  41 {4,"GotoFrame2", 0x9f, "m"}, // -1 (/Movieclip:3)
  42 {3,"GetUrl", 0x83, "ul"},
  43 {4,"GetUrl2", 0x9a, "m"}, //-2
  44 {3,"NextFrame", 0x04, ""},
  45 {3,"PreviousFrame", 0x05, ""},
  46 {3,"Play", 0x06, ""},
  47 {3,"Stop", 0x07, ""},
  48 {3,"ToggleQuality", 0x08, ""},
  49 {3,"StopSounds", 0x09, ""},
  50 {3,"WaitForFrame", 0x8a, "fs"},
  51 {4,"WaitForFrame2", 0x8d, "s"}, // -1
  52 {3,"SetTarget", 0x8b, "t"},
  53 {4,"SetTarget2", 0x20, ""}, //-1
  54 {3,"GotoLabel", 0x8c, "l"},
  55 {4,"Add", 0x0a, ""}, //  -2, +1
  56 {4,"Multiply", 0x0c, ""}, //  -2, +1
  57 {4,"Divide", 0x0d, ""}, //  -2, +1
  58 {4,"Subtract", 0x0b, ""}, //  -2, +1
  59 {4,"Less", 0x0f, ""}, //  -2, +1
  60 {4,"Equals", 0x0e, ""}, //  -2, +1
  61 {4,"And", 0x10, ""}, //  -2, +1
  62 {4,"Or", 0x11, ""}, //  -2, +1
  63 {4,"Not", 0x12, ""}, //  -1, +1
  64 {4,"StringAdd", 0x21, ""}, // -2,+1
  65 {4,"StringLength", 0x14, ""}, // -1, +1
  66 {4,"MBStringLength", 0x31, ""}, // -1, +1
  67 {4,"StringEquals", 0x13, ""}, // -2, +1
  68 {4,"StringLess", 0x29, ""}, //-2, +1
  69 {4,"StringExtract", 0x15, ""}, // -3, +1
  70 {4,"MBStringExtract", 0x35, ""}, //-3 +1
  71 {4,"Push", 0x96, "p"}, //  +1
  72 {4,"Pop", 0x17, ""}, //  -1
  73 {4,"ToInteger", 0x18, ""}, // -1, +1
  74 {4,"CharToAscii", 0x32, ""}, // -1, +1
  75 {4,"AsciiToChar", 0x33, ""}, // -1, +1
  76 {4,"MBCharToAscii", 0x36, ""}, // -1, +1
  77 {4,"MBAsciiToChar", 0x37, ""}, // -1, +1
  78 {4,"Jump", 0x99, "b"},
  79 {4,"If", 0x9d, "b"}, // -1
  80 {4,"Call", 0x9e, ""}, //-1 (frame label/number) (high bit is wrong.)
  81 {4,"GetVariable", 0x1c,""}, // -1, +1
  82 {4,"SetVariable", 0x1d,""}, // -2
  83 {4,"GetProperty", 0x22,""}, //-2, +1
  84 {4,"SetProperty", 0x23, ""}, // -3
  85 {4,"RemoveSprite", 0x25, ""}, //-1
  86 {4,"StartDrag", 0x27, ""}, // -2, -1, (-4)
  87 {4,"EndDrag", 0x28, ""},
  88 {4,"CloneSprite", 0x24, ""}, // -3
  89 {4,"Trace", 0x26, ""}, //-1
  90 {4,"GetTime", 0x34, ""}, //+1
  91 {4,"RandomNumber", 0x30, ""}, //-1,+1
  92 {5,"Modulo", 0x3f,""},
  93 {5,"BitAnd", 0x60,""},
  94 {5,"BitLShift", 0x63,""},
  95 {5,"BitOr", 0x61,""},
  96 {5,"BitRShift", 0x64,""},
  97 {5,"BitURShift", 0x65,""},
  98 {5,"BitXor", 0x62,""},//66?
  99 {5,"Decrement", 0x51,""},
 100 {5,"Increment", 0x50,""},
 101 {5,"PushDuplicate", 0x4c,""},
 102 {5,"StackSwap", 0x4d,""}, //?
 103 {5,"StoreRegister", 0x87,"r"},
 104 {5,"CallFunction", 0x3d,""},
 105 {5,"DefineFunction", 0x9b, "{"},
 106 {5,"Return", 0x3e,""},
 107 {5,"GetMember", 0x4e,""},
 108 {5,"SetMember", 0x4f,""},
 109 {5,"CallMethod", 0x52,""},
 110 {5,"Constantpool", 0x88, "Cc"},
 111 {5,"DefineLocal", 0x3c,""},
 112 {5,"DefineLocal2", 0x41,""},
 113 {5,"Makehash", 0x43, ""}, //??
 114 {5,"Delete", 0x3a,""}, //?
 115 {5,"Delete2", 0x3b,""},
 116 {5,"Enumerate", 0x46,""},
 117 {5,"Equals2", 0x49,""},
 118 {5,"InitArray", 0x42,""}, // InitObject?
 119 {5,"NewMethod", 0x53,""}, //?
 120 {5,"NewObject", 0x40,""},
 121 {5,"TargetPath", 0x45,""}, //?
 122 {5,"With", 0x94, "o"},
 123 {5,"ToNumber", 0x4a,""}, //?
 124 {5,"ToString", 0x4b,""}, //?
 125 {5,"TypeOf", 0x44,""},
 126 {5,"Add2", 0x47,""},
 127 {5,"Less2", 0x48,""}
 128 };
 129 static int definedactions = sizeof(actions)/sizeof(struct Action);
 130
 131 ActionTAG* swf_GetActions(TAG*tag)
 132 {
 133     U8 op = 1;
 134     int length;
 135     ActionTAG tmp;
 136     ActionTAG*action = &tmp;
 137     U8*data;
 138     while(op)
 139     {
 140         action->next = (ActionTAG*)malloc(sizeof(ActionTAG));
 141         action->next->prev = action;
 142         action->next->next = 0;
 143         action = action->next;
 144
 145         op = swf_GetU8(tag);
 146         if(op<0x80)
 147             length = 0;
 148         else
 149             length = swf_GetU16(tag);
 150
 151         if(length) {
 152             int t;
 153             data = malloc(length);
 154             for(t=0;t<length;t++)
 155                 data[t] = swf_GetU8(tag);
 156         } else {
 157           data = 0;
 158         }
 159         action->op = op;
 160         action->len = length;
 161         action->data = data;
 162         action->parent = tag;
 163     }
 164     return tmp.next;
 165 }
 166
 167 void swf_SetActions(TAG*tag, ActionTAG*action)
 168 {
 169     while(action)
 170     {
 171         swf_SetU8(tag, action->op);
 172         if(action->op & 128)
 173           swf_SetU16(tag, action->len);
 174
 175         swf_SetBlock(tag, action->data, action->len);
 176
 177         action = action->next;
 178     }
 179 }
 180
 181 int OpAdvance(char c, char*data)
 182 {
 183     switch (c)
 184     {
 185         case 'f':
 186             return 2;
 187         case 'u':
 188             return strlen(data)+1;
 189         case 't':
 190             return strlen(data)+1;
 191         case 'l':
 192             return strlen(data)+1;
 193         case 'c':
 194             return strlen(data)+1;
 195         case 'C':
 196             return 2;
 197         case 's':
 198             return 1;
 199         case 'm':
 200             return 1;
 201         case 'b':
 202             return 2;
 203         case 'p': {
 204             U8 type = *data++;
 205             if(type == 0) {
 206                 return 1+strlen(data)+1; //string
 207             } else if (type == 1) {
 208                 return 1+4; //float
 209             } else if (type == 2) {
 210                 return 1+0; //NULL
 211             } else if (type == 4) {
 212                 return 1+1; //register
 213             } else if (type == 5) {
 214                 return 1+1; //bool
 215             } else if (type == 6) {
 216                 return 1+8; //double
 217             } else if (type == 7) {
 218                 return 1+4; //int
 219             } else if (type == 8) {
 220                 return 1+1; //lookup
 221             }
 222             break;
 223         }
 224     }
 225     return 0;
 226 }
 227
 228 /* TODO: this should be in swfdump.c */
 229 void swf_DumpActions(ActionTAG*atag, char*prefix)
 230 {
 231     int t;
 232     U8*data;
 233     char* cp;
 234     if(!prefix)
 235         prefix="";
 236     while(atag)
 237     {
 238         U8 poollen = 0;
 239         for(t=0;t<definedactions;t++)
 240             if(actions[t].op == atag->op)
 241                 break;
 242
 243         if(t==definedactions) {
 244             printf("%s (%5d bytes) action: %02x\n", prefix, atag->len, atag->op);
 245             atag = atag->next;
 246             continue;
 247         }
 248         printf("%s (%5d bytes) action: %s", prefix, atag->len, actions[t].name);
 249         cp = actions[t].flags;
 250         data = atag->data;
 251         if(atag->len) //TODO: check for consistency: should we have a length?
 252         while(*cp)
 253         {
 254             switch(*cp)
 255             {
 256                 case 'f': {
 257                     printf(" %d", *(U16*)data); //FIXME: le/be
 258                 } break;
 259                 case 'u': {
 260                     printf(" URL:\"%s\"", data);
 261                 } break;
 262                 case 't': {
 263                     printf(" Target:\"%s\"", data);
 264                 } break;
 265                 case 'l': {
 266                     printf(" Label:\"%s\"", data);
 267                 } break;
 268                 case 'c': {
 269                     printf(" String:\"%s\"", data);
 270                 } break;
 271                 case 'C': {
 272                     poollen = *data;
 273                     printf("(%d entries)", poollen);
 274                 } break;
 275                 case 's': {
 276                     printf(" +%d", *data);
 277                 } break;
 278                 case 'm': {
 279                     //m: method (byte) url:(0=none, 1=get, 2=datat)/gf2:(1=play)
 280                     printf(" %d", *data);
 281                 } break;
 282                 case 'b': {
 283                     printf(" %d", *(U16*)data);
 284                 } break;
 285                 case 'p': {
 286                     U8 type = *data;
 287                     char*value = data+1;
 288                     if(type == 0) {
 289                         printf(" String:\"%s\"", value);
 290                     } else if (type == 1) {
 291                         printf(" Float:\"%f\"", *(float*)value);
 292                     } else if (type == 2) {
 293                         printf(" NULL");
 294                     } else if (type == 4) {
 295                         printf(" register:%d", *value);
 296                     } else if (type == 5) {
 297                         printf(" %s", *value?"true":"false");
 298                     } else if (type == 6) {
 299                         printf(" %f", *(double*)value);
 300                     } else if (type == 7) {
 301                         printf(" %d", *(int*)value);
 302                     } else if (type == 8) {
 303                         printf(" Lookup:%d", *value);
 304                     }
 305                 } break;
 306             }
 307             data += OpAdvance(*cp, data);
 308             if(*cp!='c' || !poollen)
 309                 cp++;
 310             if(poollen)
 311                 poollen--;
 312         }
 313
 314         if(data < atag->data + atag->len)
 315         {
 316             int nl = ((atag->data+atag->len)-data);
 317             int t;
 318             printf(" remainder of %d bytes:\"", nl);
 319             for(t=0;t<nl;t++) {
 320                 if(data[t]<32)
 321                     printf("\\%d",data[t]);
 322                 else
 323                     printf("%c", data[t]);
 324             }
 325             printf("\"");
 326         }
 327         printf("\n");
 328         atag = atag->next;
 329     }
 330 }
 331
 332 static const char TYPE_URL = 1;
 333 static const char TYPE_TARGET = 2;
 334 static const char TYPE_STRING = 4;
 335
 336 int swf_ActionEnumerate(ActionTAG*atag, char*(*callback)(char*), int type)
 337 {
 338     int t;
 339     U8*data;
 340     char* cp;
 341     int count = 0;
 342     while(atag)
 343     {
 344         U8 poollen = 0;
 345         for(t=0;t<definedactions;t++)
 346             if(actions[t].op == atag->op)
 347                 break;
 348
 349         if(t==definedactions) {
 350             // unknown actiontag
 351             atag = atag->next;
 352             count++;
 353             continue;
 354         }
 355         cp = actions[t].flags;
 356         data = atag->data;
 357         if(atag->len) {
 358             while(*cp) {
 359                 U8 * replacepos = 0;
 360                 int replacelen = 0;
 361                 U8 * replacement = 0;
 362                 switch(*cp)
 363                 {
 364                     case 'u': {
 365                         if(type&TYPE_URL)
 366                         {
 367                             replacelen = strlen(data);
 368                             replacepos = data;
 369                             replacement = callback(data); // may be null
 370                         }
 371                     } break;
 372                     case 't': {
 373                         if(type&TYPE_TARGET)
 374                         {
 375                             replacelen = strlen(data);
 376                             replacepos = data;
 377                             replacement = callback(data); // may be null
 378                         }
 379                     } break;
 380                     case 'c': {
 381                         if(type&TYPE_STRING)
 382                         {
 383                             replacelen = strlen(data);
 384                             replacepos = data;
 385                             replacement = callback(data); // may be null
 386                         }
 387                     } break;
 388                     case 'C': {
 389                         poollen = (*data);
 390                     } break;
 391                     case 'o': {
 392                     } break;
 393                     case 'p': {
 394                         U8 datatype = *data;
 395                         char*value = &data[1];
 396                         if(datatype == 0) { //string
 397                             if(type&TYPE_STRING)
 398                             {
 399                                 replacelen = strlen(value);
 400                                 replacepos = value;
 401                                 replacement = callback(value); // may be null
 402                             }
 403                         } else if (datatype == 8) { //lookup
 404                         }
 405                     } break;
 406                 }
 407                 data += OpAdvance(*cp, data);
 408                 if(*cp!='c' || !poollen)
 409                     cp++;
 410                 if(poollen)
 411                     poollen--;
 412
 413                 if(replacement)
 414                 {
 415                     int newlen = strlen(replacement);
 416                     char * newdata = malloc(atag->len - replacelen + newlen);
 417                     int rpos = replacepos - atag->data;
 418                     memcpy(newdata, atag->data, rpos);
 419                     memcpy(&newdata[rpos], replacement, newlen);
 420                     memcpy(&newdata[rpos+newlen], &replacepos[replacelen],
 421                             &data[atag->len] - &replacepos[replacelen]);
 422                     free(atag->data);
 423                     atag->data = newdata;
 424                     data = &atag->data[rpos+newlen+1];
 425                 }
 426             }
 427         }
 428         atag = atag->next;
 429         count ++;
 430     }
 431     return count;
 432 }
 433
 434 void swf_ActionEnumerateTargets(ActionTAG*atag, char*(*callback)(char*))
 435 {
 436     swf_ActionEnumerate(atag, callback, TYPE_TARGET);
 437 }
 438 void swf_ActionEnumerateStrings(ActionTAG*atag, char*(*callback)(char*))
 439 {
 440     swf_ActionEnumerate(atag, callback, TYPE_STRING);
 441 }
 442 void swf_ActionEnumerateURLs(ActionTAG*atag, char*(*callback)(char*))
 443 {
 444     swf_ActionEnumerate(atag, callback, TYPE_URL);
 445 }
 446
 447 static ActionTAG * currentatag;
 448
 449 ActionTAG* swf_ActionStart()
 450 {
 451     currentatag = (ActionTAG*)malloc(sizeof(ActionTAG));
 452     currentatag->prev = 0;
 453     currentatag->parent = 0;
 454     currentatag->data = 0;
 455     currentatag->len = 0;
 456     return currentatag;
 457 }
 458
 459 void swf_ActionEnd()
 460 {
 461     currentatag->prev->next = 0;
 462     free(currentatag);
 463 }
 464
 465 void swf_AddActionTAG(U8 op, U8*data, U16 len)
 466 {
 467     currentatag->next = (ActionTAG*)malloc(sizeof(ActionTAG));
 468     currentatag->next->prev = currentatag;
 469     currentatag->parent = 0;
 470     currentatag->data = data;
 471     currentatag->len = len;
 472     currentatag->op = op;
 473     currentatag = currentatag->next;
 474 }
 475
 476 #define ACTION_END            0x00
 477 #define ACTION_NEXTFRAME      0x04
 478 #define ACTION_PREVIOUSFRAME  0x05
 479 #define ACTION_PLAY           0x06
 480 #define ACTION_STOP           0x07
 481 #define ACTION_TOGGLEQUALITY  0x08
 482 #define ACTION_STOPSOUNDS     0x09
 483 #define ACTION_ADD            0x0a
 484 #define ACTION_SUBTRACT       0x0b
 485 #define ACTION_MULTIPLY       0x0c
 486 #define ACTION_DIVIDE         0x0d
 487 #define ACTION_EQUALS         0x0e
 488 #define ACTION_LESS           0x0f
 489 #define ACTION_AND            0x10
 490 #define ACTION_OR             0x11
 491 #define ACTION_NOT            0x12
 492 #define ACTION_STRINGEQUALS   0x13
 493 #define ACTION_STRINGLENGTH   0x14
 494 #define ACTION_STRINGEXTRACT  0x15
 495 #define ACTION_POP            0x17
 496 #define ACTION_TOINTEGER      0x18
 497 #define ACTION_GETVARIABLE    0x1c
 498 #define ACTION_SETVARIABLE    0x1d
 499 #define ACTION_SETTARGET2     0x20
 500 #define ACTION_STRINGADD      0x21
 501 #define ACTION_GETPROPERTY    0x22
 502 #define ACTION_SETPROPERTY    0x23
 503 #define ACTION_CLONESPRITE    0x24
 504 #define ACTION_REMOVESPRITE   0x25
 505 #define ACTION_TRACE          0x26
 506 #define ACTION_STARTDRAG      0x27
 507 #define ACTION_ENDDRAG        0x28
 508 #define ACTION_STRINGLESS     0x29
 509 #define ACTION_RANDOMNUMBER   0x30
 510 #define ACTION_MBSTRINGLENGTH 0x31
 511 #define ACTION_CHARTOASCII    0x32
 512 #define ACTION_ASCIITOCHAR    0x33
 513 #define ACTION_GETTIME        0x34
 514 #define ACTION_MBSTRINGEXTRACT 0x35
 515 #define ACTION_MBCHARTOASCII  0x36
 516 #define ACTION_MBASCIITOCHAR  0x37
 517 #define ACTION_DELETE         0x3a
 518 #define ACTION_DELETE2        0x3b
 519 #define ACTION_DEFINELOCAL    0x3c
 520 #define ACTION_CALLFUNCTION   0x3d
 521 #define ACTION_RETURN         0x3e
 522 #define ACTION_MODULO         0x3f
 523 #define ACTION_NEWOBJECT      0x40
 524 #define ACTION_DEFINELOCAL2   0x41
 525 #define ACTION_INITARRAY      0x42
 526 #define ACTION_MAKEHASH       0x43
 527 #define ACTION_TYPEOF         0x44
 528 #define ACTION_TARGETPATH     0x45
 529 #define ACTION_ENUMERATE      0x46
 530 #define ACTION_ADD2           0x47
 531 #define ACTION_LESS2          0x48
 532 #define ACTION_EQUALS2        0x49
 533 #define ACTION_TONUMBER       0x4a
 534 #define ACTION_TOSTRING       0x4b
 535 #define ACTION_PUSHDUPLICATE  0x4c
 536 #define ACTION_STACKSWAP      0x4d
 537 #define ACTION_GETMEMBER      0x4e
 538 #define ACTION_SETMEMBER      0x4f
 539 #define ACTION_INCREMENT      0x50
 540 #define ACTION_DECREMENT      0x51
 541 #define ACTION_CALLMETHOD     0x52
 542 #define ACTION_NEWMETHOD      0x53
 543 #define ACTION_BITAND         0x60
 544 #define ACTION_BITOR          0x61
 545 #define ACTION_BITXOR         0x62
 546 #define ACTION_BITLSHIFT      0x63
 547 #define ACTION_BITRSHIFT      0x64
 548 #define ACTION_BITURSHIFT     0x65
 549 #define ACTION_GOTOFRAME      0x81
 550 #define ACTION_GETURL         0x83
 551 #define ACTION_STOREREGISTER  0x87
 552 #define ACTION_CONSTANTPOOL   0x88
 553 #define ACTION_WAITFORFRAME   0x8a
 554 #define ACTION_SETTARGET      0x8b
 555 #define ACTION_GOTOLABEL      0x8c
 556 #define ACTION_WAITFORFRAME2  0x8d
 557 #define ACTION_WITH           0x94
 558 #define ACTION_PUSH           0x96
 559 #define ACTION_JUMP           0x99
 560 #define ACTION_GETURL2        0x9a
 561 #define ACTION_DEFINEFUNCTION 0x9b
 562 #define ACTION_IF             0x9d
 563 #define ACTION_CALL           0x9e
 564 #define ACTION_GOTOFRAME2     0x9f
 565
 566 void action_NextFrame() {swf_AddActionTAG(ACTION_NEXTFRAME, 0, 0);}
 567 void action_PreviousFrame() {swf_AddActionTAG(ACTION_PREVIOUSFRAME, 0, 0);}
 568 void action_Play() {swf_AddActionTAG(ACTION_PLAY, 0, 0);}
 569 void action_Stop() {swf_AddActionTAG(ACTION_STOP, 0, 0);}
 570 void action_ToggleQuality() {swf_AddActionTAG(ACTION_TOGGLEQUALITY, 0, 0);}
 571 void action_StopSounds() {swf_AddActionTAG(ACTION_STOPSOUNDS, 0, 0);}
 572 void action_Add() {swf_AddActionTAG(ACTION_ADD, 0, 0);}
 573 void action_Subtract() {swf_AddActionTAG(ACTION_SUBTRACT, 0, 0);}
 574 void action_Multiply() {swf_AddActionTAG(ACTION_MULTIPLY, 0, 0);}
 575 void action_Divide() {swf_AddActionTAG(ACTION_DIVIDE, 0, 0);}
 576 void action_Equals() {swf_AddActionTAG(ACTION_EQUALS, 0, 0);}
 577 void action_Less() {swf_AddActionTAG(ACTION_LESS, 0, 0);}
 578 void action_And() {swf_AddActionTAG(ACTION_AND, 0, 0);}
 579 void action_Or() {swf_AddActionTAG(ACTION_OR, 0, 0);}
 580 void action_Not() {swf_AddActionTAG(ACTION_NOT, 0, 0);}
 581 void action_StringEquals() {swf_AddActionTAG(ACTION_STRINGEQUALS, 0, 0);}
 582 void action_StringLength() {swf_AddActionTAG(ACTION_STRINGLENGTH, 0, 0);}
 583 void action_StringExtract() {swf_AddActionTAG(ACTION_STRINGEXTRACT, 0, 0);}
 584 void action_Pop() {swf_AddActionTAG(ACTION_POP, 0, 0);}
 585 void action_ToInteger() {swf_AddActionTAG(ACTION_TOINTEGER, 0, 0);}
 586 void action_GetVariable() {swf_AddActionTAG(ACTION_GETVARIABLE, 0, 0);}
 587 void action_SetVariable() {swf_AddActionTAG(ACTION_SETVARIABLE, 0, 0);}
 588 void action_SetTarget2() {swf_AddActionTAG(ACTION_SETTARGET2, 0, 0);}
 589 void action_StringAdd() {swf_AddActionTAG(ACTION_STRINGADD, 0, 0);}
 590 void action_GetProperty() {swf_AddActionTAG(ACTION_GETPROPERTY, 0, 0);}
 591 void action_SetProperty() {swf_AddActionTAG(ACTION_SETPROPERTY, 0, 0);}
 592 void action_CloneSprite() {swf_AddActionTAG(ACTION_CLONESPRITE, 0, 0);}
 593 void action_RemoveSprite() {swf_AddActionTAG(ACTION_REMOVESPRITE, 0, 0);}
 594 void action_Trace() {swf_AddActionTAG(ACTION_TRACE, 0, 0);}
 595 void action_StartDrag() {swf_AddActionTAG(ACTION_STARTDRAG, 0, 0);}
 596 void action_EndDrag() {swf_AddActionTAG(ACTION_ENDDRAG, 0, 0);}
 597 void action_StringLess() {swf_AddActionTAG(ACTION_STRINGLESS, 0, 0);}
 598 void action_RandomNumber() {swf_AddActionTAG(ACTION_RANDOMNUMBER, 0, 0);}
 599 void action_MBStringLength() {swf_AddActionTAG(ACTION_MBSTRINGLENGTH, 0, 0);}
 600 void action_CharToAscii() {swf_AddActionTAG(ACTION_CHARTOASCII, 0, 0);}
 601 void action_AsciiToChar() {swf_AddActionTAG(ACTION_ASCIITOCHAR, 0, 0);}
 602 void action_GetTime() {swf_AddActionTAG(ACTION_GETTIME, 0, 0);}
 603 void action_MBStringExtract() {swf_AddActionTAG(ACTION_MBSTRINGEXTRACT, 0, 0);}
 604 void action_MBCharToAscii() {swf_AddActionTAG(ACTION_MBCHARTOASCII, 0, 0);}
 605 void action_MBAsciiToChar() {swf_AddActionTAG(ACTION_MBASCIITOCHAR, 0, 0);}
 606 void action_Delete() {swf_AddActionTAG(ACTION_DELETE, 0, 0);}
 607 void action_Delete2() {swf_AddActionTAG(ACTION_DELETE2, 0, 0);}
 608 void action_DefineLocal() {swf_AddActionTAG(ACTION_DEFINELOCAL, 0, 0);}
 609 void action_CallFunction() {swf_AddActionTAG(ACTION_CALLFUNCTION, 0, 0);}
 610 void action_Return() {swf_AddActionTAG(ACTION_RETURN, 0, 0);}
 611 void action_Modulo() {swf_AddActionTAG(ACTION_MODULO, 0, 0);}
 612 void action_NewObject() {swf_AddActionTAG(ACTION_NEWOBJECT, 0, 0);}
 613 void action_DefineLocal2() {swf_AddActionTAG(ACTION_DEFINELOCAL2, 0, 0);}
 614 void action_InitArray() {swf_AddActionTAG(ACTION_INITARRAY, 0, 0);}
 615 void action_Makehash() {swf_AddActionTAG(ACTION_MAKEHASH, 0, 0);}
 616 void action_TypeOf() {swf_AddActionTAG(ACTION_TYPEOF, 0, 0);}
 617 void action_TargetPath() {swf_AddActionTAG(ACTION_TARGETPATH, 0, 0);}
 618 void action_Enumerate() {swf_AddActionTAG(ACTION_ENUMERATE, 0, 0);}
 619 void action_Add2() {swf_AddActionTAG(ACTION_ADD2, 0, 0);}
 620 void action_Less2() {swf_AddActionTAG(ACTION_LESS2, 0, 0);}
 621 void action_Equals2() {swf_AddActionTAG(ACTION_EQUALS2, 0, 0);}
 622 void action_ToNumber() {swf_AddActionTAG(ACTION_TONUMBER, 0, 0);}
 623 void action_ToString() {swf_AddActionTAG(ACTION_TOSTRING, 0, 0);}
 624 void action_PushDuplicate() {swf_AddActionTAG(ACTION_PUSHDUPLICATE, 0, 0);}
 625 void action_StackSwap() {swf_AddActionTAG(ACTION_STACKSWAP, 0, 0);}
 626 void action_GetMember() {swf_AddActionTAG(ACTION_GETMEMBER, 0, 0);}
 627 void action_SetMember() {swf_AddActionTAG(ACTION_SETMEMBER, 0, 0);}
 628 void action_Increment() {swf_AddActionTAG(ACTION_INCREMENT, 0, 0);}
 629 void action_Decrement() {swf_AddActionTAG(ACTION_DECREMENT, 0, 0);}
 630 void action_CallMethod() {swf_AddActionTAG(ACTION_CALLMETHOD, 0, 0);}
 631 void action_NewMethod() {swf_AddActionTAG(ACTION_NEWMETHOD, 0, 0);}
 632 void action_BitAnd() {swf_AddActionTAG(ACTION_BITAND, 0, 0);}
 633 void action_BitOr() {swf_AddActionTAG(ACTION_BITOR, 0, 0);}
 634 void action_BitXor() {swf_AddActionTAG(ACTION_BITXOR, 0, 0);}
 635 void action_BitLShift() {swf_AddActionTAG(ACTION_BITLSHIFT, 0, 0);}
 636 void action_BitRShift() {swf_AddActionTAG(ACTION_BITRSHIFT, 0, 0);}
 637 void action_BitURShift() {swf_AddActionTAG(ACTION_BITURSHIFT, 0, 0);}
 638 void action_Call() {swf_AddActionTAG(ACTION_CALL, 0, 0);}
 639 void action_End() {swf_AddActionTAG(ACTION_END, 0, 0);}
 640 void action_GotoFrame(U16 frame)
 641 {
 642     *(U16*)currentatag->tmp = frame;
 643     swf_AddActionTAG(ACTION_GOTOFRAME, (U8*)currentatag->tmp, 2);
 644 }
 645 void action_Jump(U16 branch)
 646 {
 647     *(U16*)currentatag->tmp = branch;
 648     swf_AddActionTAG(ACTION_JUMP, (U8*)currentatag->tmp, 2);
 649 }
 650 void action_If(U16 branch)
 651 {
 652     *(U16*)currentatag->tmp = branch;
 653     swf_AddActionTAG(ACTION_IF, (U8*)currentatag->tmp, 2);
 654 }
 655 void action_StoreRegister(U8 reg)
 656 {
 657     *(U8*)currentatag->tmp = reg;
 658     swf_AddActionTAG(ACTION_STOREREGISTER, (U8*)currentatag->tmp, 1);
 659 }
 660 void action_GotoFrame2(U8 method)
 661 {
 662     *(U8*)currentatag->tmp = method;
 663     swf_AddActionTAG(ACTION_GOTOFRAME2, (U8*)currentatag->tmp, 1);
 664 }
 665 void action_GetUrl2(U8 method)
 666 {
 667     *(U8*)currentatag->tmp = method;
 668     swf_AddActionTAG(ACTION_GETURL2, (U8*)currentatag->tmp, 1);
 669 }
 670 void action_WaitForFrame2(U8 skip)
 671 {
 672     *(U8*)currentatag->tmp = skip;
 673     swf_AddActionTAG(ACTION_WAITFORFRAME2, (U8*)currentatag->tmp, 1);
 674 }
 675 void action_WaitForFrame(U16 frame, U8 skip)
 676 {
 677     *(U16*)currentatag->tmp = frame;
 678     *(U8*)&currentatag->tmp[2] = skip;
 679     swf_AddActionTAG(ACTION_WAITFORFRAME, (U8*)currentatag->tmp, 3);
 680 }
 681 void action_SetTarget(char* target)
 682 {
 683     char*ptr = strdup(target);
 684     swf_AddActionTAG(ACTION_SETTARGET, (U8*)ptr, strlen(ptr)+1);
 685 }
 686 void action_PushNULL()
 687 {
 688     *(U8*)currentatag->tmp = 2; //NULL
 689     swf_AddActionTAG(ACTION_PUSH, (U8*)currentatag->tmp, 1);
 690 }
 691 void action_PushBoolean(char c)
 692 {
 693     *(U8*)currentatag->tmp = 5; //bool
 694     *(U8*)&currentatag->tmp[1] = c;
 695     swf_AddActionTAG(ACTION_PUSH, (U8*)currentatag->tmp, 2);
 696 }
 697 void action_PushRegister(U8 reg)
 698 {
 699     *(U8*)currentatag->tmp = 4; //register
 700     *(U8*)&currentatag->tmp[1] = reg;
 701     swf_AddActionTAG(ACTION_PUSH, (U8*)currentatag->tmp, 2);
 702 }
 703 void action_PushLookup(U8 index)
 704 {
 705     *(U8*)currentatag->tmp = 8; //lookup
 706     *(U8*)&currentatag->tmp[1] = index;
 707     swf_AddActionTAG(ACTION_PUSH, (U8*)currentatag->tmp, 2);
 708 }
 709 void action_PushString(char*str)
 710 {
 711     int l = strlen(str);
 712     char*ptr = (char*)malloc(l+2);
 713     ptr[0] = 0; // string
 714     strcpy(&ptr[1], str);
 715     swf_AddActionTAG(ACTION_PUSH, (U8*)ptr, l+2);
 716 }
 717 void action_PushFloat(float f)
 718 {
 719     char*ptr = (char*)malloc(5);
 720     ptr[0] = 1; //float
 721     *(float*)&ptr[1]  = f;
 722     swf_AddActionTAG(ACTION_PUSH, (U8*)ptr, 5);
 723 }
 724 void action_PushDouble(double d)
 725 {
 726     char*ptr = (char*)malloc(9);
 727     ptr[0] = 6; //double
 728     *(double*)&ptr[1]  = d;
 729     swf_AddActionTAG(ACTION_PUSH, (U8*)ptr, 9);
 730 }
 731 void action_PushInt(int i)
 732 {
 733     *(U8*)currentatag->tmp = 7; //int
 734     *(U8*)&currentatag->tmp[1] = i;
 735     swf_AddActionTAG(ACTION_PUSH, (U8*)currentatag->tmp, 5);
 736 }
 737 void action_GotoLabel(char* label)
 738 {
 739     char*ptr = strdup(label);
 740     swf_AddActionTAG(ACTION_GOTOLABEL, (U8*)ptr, strlen(ptr));
 741 }
 742 void action_GetUrl(char* url, char* label)
 743 {
 744     int l1= strlen(url);
 745     int l2= strlen(label);
 746     char*ptr = malloc(l1+l2+2);
 747     strcpy(ptr, url);
 748     strcat(&ptr[l2+1], label);
 749     swf_AddActionTAG(ACTION_GETURL, ptr, strlen(ptr));
 750 }
 751 //TODO:
 752 void action_DefineFunction(U8*data, int len) {}
 753 void action_Constantpool(char* constantpool) {}
 754 void action_With(char*object) {}