From: kramm <kramm>
Date: Mon, 22 Apr 2002 09:25:46 +0000 (+0000)
Subject: added DefineFunction and With parsing.
X-Git-Tag: xpdf-0-92~18
X-Git-Url: http://git.asbjorn.it/?a=commitdiff_plain;h=b0c5cc4e16532f813228c88d6dbdfee37999bd2a;p=swftools.git

added DefineFunction and With parsing.
---

diff --git a/lib/modules/swfaction.c b/lib/modules/swfaction.c
index 85fab91..48087ab 100644
--- a/lib/modules/swfaction.c
+++ b/lib/modules/swfaction.c
@@ -35,7 +35,7 @@ m: method (byte) swf_GetUrl2:(0=none, 1=get, 2=post)/GotoFrame2:(1=play)
 b: branch (word) (number of bytes)
 p (push): type(byte), type=0:string, type=1:double
 {: define function (name (string), num (word), params (num strings), codesize (word)
-o: object (string)
+o: codesize (word) object (string)
 r: register (byte)
  */
 {3,"End", 0x00, ""},
@@ -126,7 +126,8 @@ r: register (byte)
 {5,"ToString", 0x4b,""}, //?
 {5,"TypeOf", 0x44,""},
 {5,"Add2", 0x47,""},
-{5,"Less2", 0x48,""}
+{5,"Less2", 0x48,""},
+{5/*6?*/,"Less3", 0x67,""}
 };
 static int definedactions = sizeof(actions)/sizeof(struct Action);
 
@@ -191,7 +192,7 @@ void swf_ActionSet(TAG*tag, ActionTAG*action)
     }
 }
 
-int OpAdvance(char c, char*data)
+int OpAdvance(char c, U8*data)
 {
     switch (c)
     {
@@ -234,10 +235,28 @@ int OpAdvance(char c, char*data)
 	    } else return 1;
 	    break;
 	}
+	case 'o': {
+	    return 2;
+	}
+	case '{': {
+	    U16 num;
+	    U16 codesize;
+	    U8* odata = data;
+	    int t;
+	    while(*data++); //name
+	    num = (*data++)*256; //num
+	    num += (*data++);
+	    for(t=0;t<num;t++)
+		while(*data++); //param
+	    codesize = (*data++)*256; //num
+	    codesize += (*data++);
+	    return data-odata;
+	}
     }
     return 0;
 }
-
+#define ATAG_FULLLENGTH(atag) ((atag)->len + 1 + ((atag)->op&0x80?2:0))
+#define MAX_LEVELS 16
 /* TODO: * this should be in swfdump.c */
 void swf_DumpActions(ActionTAG*atag, char*prefix) 
 {
@@ -245,119 +264,173 @@ void swf_DumpActions(ActionTAG*atag, char*prefix)
     U8*data;
     char* cp;
     int entry = 0;
-
+    char spaces[MAX_LEVELS*4+1];
+    struct {
+	char*text;
+	int count;
+    } counter[MAX_LEVELS];
+    int countpos = 0;
 #ifdef MAX_LOOKUP
-
     char * lookup[MAX_LOOKUP];
     memset(lookup,0x00,sizeof(lookup));
-
 #endif
+    memset(spaces, 32, sizeof(spaces));
+    spaces[sizeof(spaces)-1] = 0;
 
    if (!prefix)
         prefix="";
 
     while(atag)
     {
+	char*indent = &spaces[sizeof(spaces)-1-countpos*4];
 	U8 poollen = 0;
 	for(t=0;t<definedactions;t++)
 	    if(actions[t].op == atag->op)
 		break;
 
 	if(t==definedactions) {
-	    printf("%s (%5d bytes) action: %02x\n", prefix, atag->len, atag->op);
-	    atag = atag->next;
-	    continue;
+	    printf("%s (%5d bytes) action:%s unknown[%02x]", prefix, atag->len, indent, atag->op);
+	} else {
+	    printf("%s (%5d bytes) action:%s %s", prefix, atag->len, indent, actions[t].name);
 	}
-	printf("%s (%5d bytes) action: %s", prefix, atag->len, actions[t].name);
-	cp = actions[t].flags;
 	data = atag->data;
-	if(atag->len) //TODO: check for consistency: should we have a length?
-	while(*cp)
+	if(atag->len && t!=definedactions) //TODO: check for consistency: should we have a length?
 	{
-	    switch(*cp)
-	    {
-		case 'f': { //frame
-		    printf(" %d", data[0]+256*data[1]);
-		} break;
-		case 'u': {
-		    printf(" URL:\"%s\"", data);
-		} break;
-		case 't': {
-		    printf(" Target:\"%s\"", data);
-		} break;
-		case 'l': {
-		    printf(" Label:\"%s\"", data);
-		} break;
-		case 'c': {
-		    printf(" String:\"%s\"", data);
+	  cp = actions[t].flags;
+	  while(*cp)
+	  {
+	      switch(*cp)
+	      {
+		  case 'f': { //frame
+		      printf(" %d", data[0]+256*data[1]);
+		  } break;
+		  case 'u': {
+		      printf(" URL:\"%s\"", data);
+		  } break;
+		  case 't': {
+		      printf(" Target:\"%s\"", data);
+		  } break;
+		  case 'l': {
+		      printf(" Label:\"%s\"", data);
+		  } break;
+		  case 'c': {
+		      printf(" String:\"%s\"", data);
 #ifdef MAX_LOOKUP
-                    if (entry<MAX_LOOKUP)
-		      lookup[entry++] = strdup(data);
+		      if (entry<MAX_LOOKUP)
+			lookup[entry++] = strdup(data);
 #endif
-	        } break;
-		case 'C': {
-		    poollen = *data;
-                    entry = 0;
-		    printf("(%d entries)", poollen);
-	    	} break;
-		case 's': {
-		    printf(" +%d", *data);
-		} break;
-		case 'm': {
-		    //m: method (byte) url:(0=none, 1=get, 2=datat)/gf2:(1=play)
-		    printf(" %d", *data);
-		} break;
-		case 'b': {
-		    printf(" %d", data[0]+256*(signed char)data[1]);
-		} break;
-		case 'p': {
-		    U8 type = *data;
-		    unsigned char*value = data+1;
-		    if(type == 0) {
-			printf(" String:\"%s\"", value);
-		    } else if (type == 1) {
-			U32 f = value[0]+(value[1]<<8)+
-				(value[2]<<16)+(value[3]<<24);
-			printf(" Float:%f", *(float*)&f);
-		    } else if (type == 2) {
-			printf(" NULL");
-		    } else if (type == 4) {
-			printf(" register:%d", *value);
-		    } else if (type == 5) {
-			printf(" bool:%s", *value?"true":"false");
-		    } else if (type == 6) {
-			U8 a[8];
-			int t;
-			memcpy(&a[4],value,4);
-			memcpy(a,&value[4],4);
+		  } break;
+		  case 'C': {
+		      poollen = *data;
+		      entry = 0;
+		      printf("(%d entries)", poollen);
+		  } break;
+		  case 's': {
+		      printf(" +%d", *data);
+		  } break;
+		  case 'm': {
+		      //m: method (byte) url:(0=none, 1=get, 2=datat)/gf2:(1=play)
+		      printf(" %d", *data);
+		  } break;
+		  case '{': {
+		      U16 num;
+		      U16 codesize;
+		      int t;
+		      printf(" %s(", data);
+		      while(*data++); //name
+		      num = (*data++); //num
+		      num += (*data++)*256;
+		      for(t=0;t<num;t++) {
+			  printf("%s",data);
+			  if(t<num-1)
+			      printf(", ");
+			  while(*data++); //param
+		      }
+		      printf(")");
+		      codesize = (*data++); //num
+		      codesize += (*data++)*256;
+		      printf(" codesize:%d ",codesize);
+		      printf("\n%s                       %s{", prefix, indent);
+		      if(countpos>=15) {
+			  printf("Error: nested too deep\n");
+			  continue;
+		      }
+		      counter[countpos].text = "}";
+		      counter[countpos].count = codesize + ATAG_FULLLENGTH(atag);
+		      countpos++;
+		  } break;
+		  case 'o': {
+		      int t;
+		      U16 codesize = data[0]+256*data[1];
+		      printf(" codesize:%d ", codesize);
+
+		      /* the following tries to find the "string"
+			 the flash documentation speaks of- I've
+			 never actually seen one yet. -mk */
+		      for(t=2;t<atag->len;t++)
+			  printf("[%02x]", atag->data[t]);
+
+		      printf("\n%s                       %s{", prefix, indent);
+		      if(countpos>=15) {
+			  printf("Error: nested too deep\n");
+			  continue;
+		      }
+		      counter[countpos].text = "}";
+		      counter[countpos].count = codesize + ATAG_FULLLENGTH(atag);
+		      countpos++;
+		  } break;
+		  case 'b': {
+		      printf(" %d", data[0]+256*(signed char)data[1]);
+		  } break;
+		  case 'p': {
+		      U8 type = *data;
+		      unsigned char*value = data+1;
+		      if(type == 0) {
+			  printf(" String:\"%s\"", value);
+		      } else if (type == 1) {
+			  U32 f = value[0]+(value[1]<<8)+
+				  (value[2]<<16)+(value[3]<<24);
+			  printf(" Float:%f", *(float*)&f);
+		      } else if (type == 2) {
+			  printf(" NULL");
+		      } else if (type == 4) {
+			  printf(" register:%d", *value);
+		      } else if (type == 5) {
+			  printf(" bool:%s", *value?"true":"false");
+		      } else if (type == 6) {
+			  U8 a[8];
+			  int t;
+			  memcpy(&a[4],value,4);
+			  memcpy(a,&value[4],4);
 #ifdef WORDS_BIGENDIAN
-			for(t=0;t<4;t++) {
-			    U8 tmp = a[t];
-			    a[t]=a[7-t];
-			    a[7-t] = tmp;
-			}
+			  for(t=0;t<4;t++) {
+			      U8 tmp = a[t];
+			      a[t]=a[7-t];
+			      a[7-t] = tmp;
+			  }
 #endif
-			printf(" double:%f", *(double*)a);
-		    } else if (type == 7) {
-			printf(" int:%d", value[0]+(value[1]<<8)+
-					  (value[2]<<16)+(value[3]<<24));
-		    } else if (type == 8) {
-			printf(" Lookup:%d", *value);
+			  printf(" double:%f", *(double*)a);
+		      } else if (type == 7) {
+			  printf(" int:%d", value[0]+(value[1]<<8)+
+					    (value[2]<<16)+(value[3]<<24));
+		      } else if (type == 8) {
+			  printf(" Lookup:%d", *value);
 #ifdef MAX_LOOKUP
-			if (lookup[*value])
-			  printf(" (\"%s\")",lookup[*value]);
+			  if (lookup[*value])
+			    printf(" (\"%s\")",lookup[*value]);
 #endif
-		    } else {
-			printf(" UNKNOWN[%02x]",type);
-		    }
-		} break;
-	    }
-	    data += OpAdvance(*cp, data);
-	    if((*cp!='c' || !poollen) &&
-	       (*cp!='p' || !(data<&atag->data[atag->len])))
-		cp++;
-	    if(poollen)
-		poollen--;
+		      } else {
+			  printf(" UNKNOWN[%02x]",type);
+		      }
+		  } break;
+	      }
+	      data += OpAdvance(*cp, data);
+	      if((*cp!='c' || !poollen) &&
+		 (*cp!='p' || !(data<&atag->data[atag->len])))
+		  cp++;
+	      if(poollen)
+		  poollen--;
+	  }
 	}
 
 	if(data < atag->data + atag->len)
@@ -374,6 +447,24 @@ void swf_DumpActions(ActionTAG*atag, char*prefix)
 	    printf("\")");
 	}
 	printf("\n");
+
+	for(t=0;t<countpos;t++) {
+	    counter[t].count -= ATAG_FULLLENGTH(atag);
+	    if(counter[t].count < 0) {
+		printf("===== Error: Oplength errors =====\n");
+		countpos = 0;
+		break;
+	    }
+	}
+
+	while(countpos && !counter[countpos-1].count)
+	{
+	    printf("%s                   %s%s\n", 
+		prefix, indent, counter[countpos-1].text);
+	    indent += 4;
+	    countpos--;
+	}
+
 	atag = atag->next;
     }