src/swfdump.c

   1 /* swfdump.c\r
   2    Shows the structure of a swf file\r
   3 \r
   4    Part of the swftools package.\r
   5    \r
   6    Copyright (c) 2001 Matthias Kramm <kramm@quiss.org>\r
   7 \r
   8    This file is distributed under the GPL, see file COPYING for details */\r
   9 \r
  10 #define HAVE_STAT\r
  11 \r
  12 #ifdef HAVE_SYS_STAT_H\r
  13 #include <sys/stat.h>\r
  14 #else\r
  15 #undef HAVE_STAT\r
  16 #endif\r
  17 \r
  18 #ifdef HAVE_SYS_TYPES_H\r
  19 #include <sys/types.h>\r
  20 #else\r
  21 #undef HAVE_STAT\r
  22 #endif\r
  23 \r
  24 #include <unistd.h>\r
  25 #include <stdio.h>\r
  26 #include <fcntl.h>\r
  27 #include "../lib/rfxswf.h"\r
  28 #include "../lib/args.h"\r
  29 \r
  30 char * filename = 0;\r
  31 \r
  32 /* idtab stores the ids which are defined in the file. This allows us\r
  33    to detect errors in the file. (i.e. ids which are defined more than \r
  34    once */\r
  35 char idtab[65536];\r
  36 int action = 0;\r
  37 \r
  38 struct options_t options[] =\r
  39 {\r
  40  {"a","action"},\r
  41  {"v","verbose"},\r
  42  {"V","version"},\r
  43  {0,0}\r
  44 };\r
  45 \r
  46 \r
  47 int args_callback_option(char*name,char*val)\r
  48 {\r
  49     if(!strcmp(name, "V")) {\r
  50         printf("swfdump - part of %s %s\n", PACKAGE, VERSION);\r
  51         exit(0);\r
  52     } \r
  53     else if(name[0]=='a') {\r
  54         action = 1;\r
  55         return 0;\r
  56     }\r
  57 }\r
  58 int args_callback_longoption(char*name,char*val)\r
  59 {\r
  60     return args_long2shortoption(options, name, val);\r
  61 }\r
  62 void args_callback_usage(char*name)\r
  63 {    \r
  64     printf("Usage: %s [-a] file.swf\n", name);\r
  65     printf("-h , --help\t\t\t Print help and exit\n");\r
  66     printf("-a , --action\t\t\t Disassemble action tags\n");\r
  67     printf("-V , --version\t\t\t Print program version and exit\n");\r
  68 }\r
  69 int args_callback_command(char*name,char*val)\r
  70 {\r
  71     if(filename) {\r
  72         fprintf(stderr, "Only one file allowed. You supplied at least two. (%s and %s)\n",\r
  73                  filename, name);\r
  74     }\r
  75     filename = name;\r
  76     return 0;\r
  77 }\r
  78 \r
  79 struct Action\r
  80 {\r
  81     int version;\r
  82     char*name;\r
  83     U8 op;\r
  84     char*flags;\r
  85 } actions[] =\r
  86 {\r
  87 /*\r
  88 f: frame (word)\r
  89 u: url (string)\r
  90 t: target (string)\r
  91 l: label (string)\r
  92 c: constant pool (string)\r
  93 s: skip (byte) (number of actions)\r
  94 m: method (byte) url:(0=none, 1=get, 2=post)/gf2:(1=play)\r
  95 b: branch (word) (number of bytes)\r
  96 p: type(byte), type=0:string, type=1:double\r
  97 {: define function (name (string), num (word), params (num strings), codesize (word)\r
  98 o: object (string)\r
  99 r: register (byte)\r
 100  */\r
 101 {3,"GotoFrame", 0x81, "f"},\r
 102 {4,"GotoFrame2", 0x9f, "m"}, // -1 (/Movieclip:3)\r
 103 {3,"GetUrl", 0x83, "ul"},\r
 104 {4,"GetUrl2", 0x9a, "m"}, //-2\r
 105 {3,"NextFrame", 0x04, ""},\r
 106 {3,"PreviousFrame", 0x05, ""},\r
 107 {3,"Play", 0x06, ""},\r
 108 {3,"Stop", 0x07, ""},\r
 109 {3,"ToggleQuality", 0x08, ""},\r
 110 {3,"StopSounds", 0x09, ""},\r
 111 {3,"WaitForFrame", 0x8a, "fs"},\r
 112 {4,"WaitForFrame2", 0x8d, "s"}, // -1\r
 113 {3,"SetTarget", 0x8b, "t"},\r
 114 {4,"SetTarget2", 0x20, ""}, //-1\r
 115 {3,"GotoLabel", 0x8c, "l"},\r
 116 {4,"Add", 0x0a, ""}, //  -2, +1\r
 117 {4,"Multiply", 0x0c, ""}, //  -2, +1\r
 118 {4,"Divide", 0x0d, ""}, //  -2, +1\r
 119 {4,"Subtract", 0x0b, ""}, //  -2, +1\r
 120 {4,"Less", 0x0f, ""}, //  -2, +1\r
 121 {4,"Equals", 0x0e, ""}, //  -2, +1\r
 122 {4,"And", 0x10, ""}, //  -2, +1\r
 123 {4,"Or", 0x11, ""}, //  -2, +1\r
 124 {4,"Not", 0x12, ""}, //  -1, +1\r
 125 {4,"StringAdd", 0x21, ""}, // -2,+1\r
 126 {4,"StringLength", 0x14, ""}, // -1, +1\r
 127 {4,"MBStringLength", 0x31}, // -1, +1\r
 128 {4,"StringEquals", 0x13, ""}, // -2, +1\r
 129 {4,"StringLess", 0x29, ""}, //-2, +1\r
 130 {4,"StringExtract", 0x15, ""}, // -3, +1\r
 131 {4,"MBStringExtract", 0x35, ""}, //-3 +1\r
 132 {4,"Push", 0x96, "p"}, //  +1\r
 133 {4,"Pop", 0x17, ""}, //  -1\r
 134 {4,"ToInteger", 0x18, ""}, // -1, +1\r
 135 {4,"CharToAscii", 0x32, ""}, // -1, +1\r
 136 {4,"AsciiToChar", 0x33, ""}, // -1, +1\r
 137 {4,"MBCharToAscii", 0x36, ""}, // -1, +1\r
 138 {4,"MBAsciiToChar", 0x37, ""}, // -1, +1\r
 139 {4,"Jump", 0x99, "b"},\r
 140 {4,"If", 0x9d, "b"}, // -1\r
 141 {4,"Call", 0x9e, ""}, //-1 (frame label/number)\r
 142 {4,"GetVariable", 0x1c,""}, // -1, +1\r
 143 {4,"SetVariable", 0x1d,""}, // -2\r
 144 {4,"GetProperty", 0x22,""}, //-2, +1\r
 145 {4,"SetProperty", 0x23, ""}, // -3\r
 146 {4,"RemoveSprite", 0x25, ""}, //-1\r
 147 {4,"StartDrag", 0x27, ""}, // -2, -1, (-4)\r
 148 {4,"EndDrag", 0x28, ""}, \r
 149 {4,"CloneSprite", 0x24}, // -3\r
 150 {4,"Trace", 0x26, ""}, //-1\r
 151 {4,"GetTime", 0x34, ""}, //+1\r
 152 {4,"RandomNumber", 0x30, ""}, //-1,+1\r
 153 \r
 154 {5,"Modulo", 0x3f,""},\r
 155 {5,"BitAnd", 0x60,""},\r
 156 {5,"BitLShift", 0x63,""},\r
 157 {5,"BitOr", 0x61,""},\r
 158 {5,"BitRShift", 0x64,""},\r
 159 {5,"BitURShift", 0x65,""},\r
 160 {5,"BitXor", 0x62,""},//66?\r
 161 {5,"Decrement", 0x51,""},\r
 162 {5,"Increment", 0x50,""},\r
 163 {5,"PushDuplicate", 0x4c,""},\r
 164 {5,"StackSwap", 0x4d,""}, //?\r
 165 {5,"StoreRegister", 0x87,"r"},\r
 166 {5,"CallFunction", 0x3d,""},\r
 167 {5,"DefineFunction", 0x9b, "{"},\r
 168 {5,"Return", 0x3e,""},\r
 169 {5,"GetMember", 0x4e,""},\r
 170 {5,"SetMember", 0x4f,""},\r
 171 {5,"CallMethod", 0x52,""},\r
 172 {5,"Constantpool", 0x88, "c"},\r
 173 {5,"DefineLocal", 0x3c,""},\r
 174 {5,"DefineLocal2", 0x41,""},\r
 175 {5,"Makehash", 0x43, ""}, //??\r
 176 {5,"Delete", 0x3a,""}, //?\r
 177 {5,"Delete2", 0x3b,""},\r
 178 {5,"Enumerate", 0x46,""},\r
 179 {5,"Equals2", 0x49,""},\r
 180 {5,"InitArray", 0x42,""}, // InitObject?\r
 181 {5,"NewMethod", 0x53,""}, //?\r
 182 {5,"NewObject", 0x40,""},\r
 183 {5,"TargetPath", 0x45,""}, //?\r
 184 {5,"With", 0x94, "o"},\r
 185 {5,"ToNumber", 0x4a,""}, //?\r
 186 {5,"ToString", 0x4b,""}, //?\r
 187 {5,"TypeOf", 0x44,""},\r
 188 {5,"Add2", 0x47,""},\r
 189 {5,"Less2", 0x48,""}\r
 190 };\r
 191 \r
 192 int definedactions = sizeof(actions)/sizeof(struct Action);\r
 193 \r
 194 \r
 195 struct _ActionTAG {\r
 196   U8            op;\r
 197   U16           len;\r
 198   U8 *          data;\r
 199 \r
 200   struct _ActionTAG * next;\r
 201   struct _ActionTAG * prev;\r
 202 \r
 203 } ;\r
 204 typedef struct _ActionTAG ActionTAG;\r
 205 \r
 206 ActionTAG* showdoaction(TAG*tag, char*prefix) \r
 207 {\r
 208     U8 op;\r
 209     int length;\r
 210     int t;\r
 211     ActionTAG tmp;\r
 212     ActionTAG*atag = &tmp;\r
 213     U8*data;\r
 214     char* cp;\r
 215     while(1)\r
 216     {\r
 217         int pos;\r
 218         atag->next = (ActionTAG*)malloc(sizeof(ActionTAG));\r
 219         atag->next->prev = atag;\r
 220         atag->next->next = 0;\r
 221 \r
 222         op = GetU8(tag);\r
 223         if(op<0x80)\r
 224             length = 0;\r
 225         else\r
 226             length = GetU16(tag);\r
 227 \r
 228         if(length) {\r
 229             data = malloc(length);\r
 230             for(t=0;t<length;t++)\r
 231                 data[t] = GetU8(tag);\r
 232         } else {\r
 233           data = 0;\r
 234         }\r
 235         atag->op = op;\r
 236         atag->len = length;\r
 237         atag->data = data;\r
 238 \r
 239         if(!op) \r
 240             break;\r
 241 \r
 242         for(t=0;t<definedactions;t++)\r
 243             if(actions[t].op == op)\r
 244                 break;\r
 245 \r
 246         if(t==definedactions) {\r
 247             printf("%s (%5d bytes) action: %02x\n", prefix, length, op);\r
 248             continue;\r
 249         }\r
 250         printf("%s (%5d bytes) action: %s", prefix, length, actions[t].name);\r
 251         cp = actions[t].flags;\r
 252         pos = 0;\r
 253         if(length) //TODO: check for consistency: should we have a length?\r
 254         while(*cp)\r
 255         {\r
 256             switch(*cp)\r
 257             {\r
 258                 case 'f': {\r
 259                     printf(" %d", *(U16*)&data[pos]);pos+=2; //FIXME: le/be\r
 260                 } break;\r
 261                 case 'u': {\r
 262                     printf(" URL:\"%s\"", &data[pos]);pos+=strlen(&data[pos])+1;\r
 263                 } break;\r
 264                 case 't': {\r
 265                     printf(" Target:\"%s\"", &data[pos]);pos+=strlen(&data[pos])+1;\r
 266                 } break;\r
 267                 case 'l': {\r
 268                     printf(" Label:\"%s\"", &data[pos]);pos+=strlen(&data[pos])+1;\r
 269                 } break;\r
 270                 case 'c': {\r
 271                     printf(" Constant Pool:\"%s\"", &data[pos]);pos+=strlen(&data[pos])+1;\r
 272                 } break;\r
 273                 case 's': {\r
 274                     printf(" +%d", data[pos]);pos+=1;\r
 275                 } break;\r
 276                 case 'm': {\r
 277 //m: method (byte) url:(0=none, 1=get, 2=post)/gf2:(1=play)\r
 278                     printf(" %d", data[pos]);pos+=1;\r
 279                 } break;\r
 280                 case 'b': {\r
 281                     printf(" %d", *(U16*)&data[pos]);pos+=2;\r
 282                 } break;\r
 283                 case 'p': {\r
 284                     U8 type = data[pos++];\r
 285                     if(type == 0) {\r
 286                         printf(" String:\"%s\"", &data[pos]);pos+=strlen(&data[pos])+1;\r
 287                     } else if (type == 1) {\r
 288                         printf(" Double:\"%f\"", *(float*)&data[pos]);pos+=4;\r
 289                     } else if (type == 2) {\r
 290                         printf(" NULL");\r
 291                     } else if (type == 4) {\r
 292                         printf(" register:%d", data[pos++]);\r
 293                     } else if (type == 5) {\r
 294                         printf(" %s", data[pos++]?"true":"false");\r
 295                     } else if (type == 6) {\r
 296                         printf(" %f", *(double*)&data[pos]);  pos+=8;\r
 297                     } else if (type == 7) {\r
 298                         printf(" %d", *(int*)&data[pos]); pos+=4;\r
 299                     } else if (type == 8) {\r
 300                         printf(" Lookup:%d", data[pos++]);\r
 301                     }\r
 302                 } break;\r
 303             \r
 304             }\r
 305             cp++;\r
 306         }\r
 307 \r
 308         printf("\n");\r
 309     }\r
 310     printf("%s (%5d bytes) action: End\n", prefix, 0);\r
 311     return tmp.next;\r
 312 }\r
 313   \r
 314 int main (int argc,char ** argv)\r
 315 { \r
 316     SWF swf;\r
 317     TAG*tag;\r
 318 #ifdef HAVE_STAT\r
 319     struct stat statbuf;\r
 320 #endif\r
 321     int f;\r
 322     char prefix[128];\r
 323     prefix[0] = 0;\r
 324     memset(idtab,0,65536);\r
 325 \r
 326     processargs(argc, argv);\r
 327 \r
 328     f = open(filename,O_RDONLY);\r
 329 \r
 330     if (f<0)\r
 331     { \r
 332         perror("Couldn't open file: ");\r
 333         exit(1);\r
 334     }\r
 335     if FAILED(ReadSWF(f,&swf))\r
 336     { \r
 337         fprintf(stderr,"%s is not a valid SWF file or contains errors.\n",filename);\r
 338         close(f);\r
 339         exit(1);\r
 340     }\r
 341 \r
 342 #ifdef HAVE_STAT\r
 343     fstat(f, &statbuf);\r
 344     if(statbuf.st_size != swf.FileSize)\r
 345         fprintf(stderr, "Error: Real Filesize (%d) doesn't match header Filesize (%d)",\r
 346                 statbuf.st_size, swf.FileSize);\r
 347 #endif\r
 348 \r
 349     close(f);\r
 350 \r
 351     printf("[HEADER]        File version: %d\n", swf.FileVersion);\r
 352     printf("[HEADER]        File size: %d\n", swf.FileSize);\r
 353     printf("[HEADER]        Frame rate: %f\n",swf.FrameRate/256.0);\r
 354     printf("[HEADER]        Frame count: %d\n",swf.FrameCount);\r
 355     printf("[HEADER]        Movie width: %.3f\n",(swf.MovieSize.xmax-swf.MovieSize.xmin)/20.0);\r
 356     printf("[HEADER]        Movie height: %.3f\n",(swf.MovieSize.ymax-swf.MovieSize.ymin)/20.0);\r
 357 \r
 358     tag = swf.FirstTag;\r
 359 \r
 360     while(tag) {\r
 361         char*name = getTagName(tag);\r
 362         if(!name) {\r
 363             fprintf(stderr, "Error: Unknown tag:0x%03x\n", tag->id);\r
 364             tag = tag->next;\r
 365             continue;\r
 366         }\r
 367         printf("[%03x] %9d %s%s", tag->id, tag->len, prefix, getTagName(tag));\r
 368 \r
 369         if(isDefiningTag(tag)) {\r
 370             U16 id = GetDefineID(tag);\r
 371             printf(" defines id %04x", id);\r
 372             if(idtab[id])\r
 373                 fprintf(stderr, "Error: Id %04x is defined more than once.\n", id);\r
 374             idtab[id] = 1;\r
 375         }\r
 376         else if(tag->id == ST_PLACEOBJECT || \r
 377                 tag->id == ST_PLACEOBJECT2) {\r
 378             printf(" places id %04x at depth %04x", GetPlaceID(tag), GetDepth(tag));\r
 379             if(GetName(tag))\r
 380                 printf(" name \"%s\"",GetName(tag));\r
 381         }\r
 382         else if(tag->id == ST_REMOVEOBJECT) {\r
 383             printf(" removes id %04x from depth %04x", GetPlaceID(tag), GetDepth(tag));\r
 384         }\r
 385         else if(tag->id == ST_REMOVEOBJECT2) {\r
 386             printf(" removes object from depth %04x", GetDepth(tag));\r
 387         }\r
 388         \r
 389         printf("\n");\r
 390 \r
 391         if(tag->id == ST_DEFINESPRITE) {\r
 392             sprintf(prefix, "         ");\r
 393         }\r
 394         else if(tag->id == ST_END) {\r
 395             sprintf(prefix, "");\r
 396         }\r
 397         else if(tag->id == ST_DOACTION && action) {\r
 398             char myprefix[128];\r
 399             sprintf(myprefix, "                %s", prefix);\r
 400             showdoaction(tag, myprefix);\r
 401         }\r
 402         tag = tag->next;\r
 403     }\r
 404 \r
 405     FreeTags(&swf);\r
 406     return 0;\r
 407 }\r
 408 \r