start moving beyond PMModelItemInfo
[pspp] / dump-spo2.c
index 971fbab8eacf1b3390c5c51d6709d45b531396ee..9bef78c5668a6674a5567ca4c8d2e4cdeef36188 100644 (file)
@@ -21,6 +21,8 @@ int version;
 
 unsigned int pos;
 
+static int n_dims;
+
 #define XSTR(x) #x
 #define STR(x) XSTR(x)
 #define WHERE __FILE__":" STR(__LINE__)
@@ -465,6 +467,7 @@ parse_heading(const char *name)
   match_u16_assert(0xffff);
   match_u16_assert(0);
   match_string2_assert(name);
+  printf("%#x: %s\n", pos, name);
 }
 
 static void
@@ -502,10 +505,11 @@ put_safe(const char *s)
 
 static void parse_flexible(void);
 
+static int count;
 static void
 parse_DspString(void)
 {
-  printf("%#x: DspString(", pos);
+  printf("%#x: DspString#%d(", pos, count++);
   if (match_byte(2))
     {
       printf("%f, \"", get_double());
@@ -521,6 +525,7 @@ parse_DspString(void)
       put_safe(get_string1());
       printf("\")\n");
     }
+  
 }
 
 static void
@@ -532,10 +537,8 @@ match_DspString(void)
 }
 
 static void
-match_DspSimpleText(void)
-{                               /* 03 80 */
-  match_byte_assert(3);
-  match_byte_assert(0x80);
+parse_DspSimpleText(void)
+{
   match_byte_assert(0);
   if (match_byte(0))
     {
@@ -544,6 +547,15 @@ match_DspSimpleText(void)
         match_byte_assert(0);
       match_zeros_assert(4);
     }
+  /* Followed by DspString or DspNumber. */
+}
+
+static void
+match_DspSimpleText(void)
+{                               /* 03 80 */
+  match_byte_assert(3);
+  match_byte_assert(0x80);
+  parse_DspSimpleText();
 }
 
 static void
@@ -562,12 +574,11 @@ parse_weirdness(void)
 }
 
 static void
-match_NavTreeViewItem(void)
+parse_NavTreeViewItem(void)
 {                               /* 07 80 */
-  match_byte_assert(7);
-  match_byte_assert(0x80);
+  int start_pos = pos;
   match_zeros_assert(1);
-  if (!match_byte(0) && !match_byte(7) && !match_byte(2))
+  if (!match_byte(0) && !match_byte(7) && !match_byte(2) && !match_byte(0xc))
     match_byte_assert(8);
   match_zeros_assert(3);
   pos++;
@@ -630,13 +641,22 @@ match_NavTreeViewItem(void)
         match_zeros_assert(3);
     }
   //fprintf(stderr, "%#x ", pos - 16);
+  hex_dump(stdout, start_pos, pos - start_pos);
+}
+
+static void
+match_NavTreeViewItem(void)
+{
+  match_byte_assert(7);
+  match_byte_assert(0x80);
+  parse_NavTreeViewItem();
 }
 
 static void
 parse_DspNumber(void)
 {
+  printf("%#x: DspNumber#%d(", pos, count++);
   match_byte_assert(1);
-  printf("DspNumber(");
   parse_format();
   match_byte_assert(0x80);
   match_byte(2);
@@ -647,7 +667,8 @@ parse_DspNumber(void)
 static void
 match_DspNumber(void)
 {
-  match_byte_assert(0x2a);
+  if (!match_byte(0x18) && !match_byte(0x19))
+    match_byte_assert(0x2a);
   match_byte_assert(0x80);
   parse_DspNumber();
 }
@@ -656,8 +677,6 @@ static void
 parse_DspCell(void)
 {
   match_byte_assert(0);
-  match_DspSimpleText();
-  parse_flexible();             /* DspString or DspNumber. */
 }
 
 static void
@@ -684,15 +703,122 @@ match_NavLog(void)
 }
 
 static void
-parse_PMModelItemInfo(void)
-{                               /* 54 80 */
+parse_category(int level, int j, int *n_leaves)
+{
+  for (size_t k = 0; k < level; k++)
+    putchar('\t');
+  get_u16(); match_byte_assert(0);
+  get_u16(); match_byte_assert(0);
+  int leaf_idx = get_u32();
+  printf("%d ", leaf_idx);
+  match_u32_assert(0);
+  if (get_u16() == 0xffff)
+    match_u16_assert(0xffff);
+  else if (!match_u16(0))
+    match_u16_assert(0x0e74);
   match_byte_assert(0);
-  pos += 1;                     /* Counter */
-  match_zeros_assert(7);
-  pos += 3;
-  if (!match_byte(0))
-    match_byte_assert(0xe);
+  match_DspSimpleText();
+  if (match_u16(0x8018))
+    {
+      printf("18 80(%02x %02x %02x) ",
+             data[pos], data[pos + 1], data[pos + 2]);
+      pos += 3;
+    }
+  if (match_u16(0x8011))
+    {
+      printf("11 80(");
+      pos += 2;
+      for (size_t i = 0; i < 16; i++)
+        printf("%s%02x", i > 0 ? " " : "", data[pos++]);
+      printf(") ");
+    }
+  match_DspString();
+
+  int n_subcategories = get_u32();
+  if (n_subcategories)
+    assert (leaf_idx == 0);
+  else
+    {
+      assert (leaf_idx == *n_leaves);
+      ++*n_leaves;
+    }
+  for (int k = 0; k < n_subcategories; k++)
+    parse_category(level + 1, k, n_leaves);
+}
+
+static void
+parse_dimension(int i)
+{
+  printf ("%#x: dimension %d\n", pos, i);
+  if (i == 0)
+    {
+      match_zeros_assert(5);
+    }
+  else
+    {
+      match_zeros_assert(6);
+
+      int n_units16 = get_u32();
+      match_u16_assert(1);
+      for (int j = 0; j < n_units16; j++)
+        get_u16();
+
+      match_byte_assert(0);
+
+      int n_units32 = get_u32();
+      match_u16_assert(0);
+      for (int j = 0; j < n_units32; j++)
+        get_u32();
+
+      get_u16(); match_byte_assert(0);
+
+      get_u16(); match_byte_assert(0);
+      get_u16(); match_byte_assert(0);
+      match_u32_assert(0);
+    }
+
+  if (!match_u32(0))
+    match_u32_assert(1);
+
+  get_u16();
+  if (!match_u16(0xffff))
+    match_u16_assert(0x0e74);
+  match_byte_assert(0);
+  match_DspSimpleText();
+  match_DspString();
+
+  int n_leaves = 0;
+  int n_categories = get_u32();
+  for (int j = 0; j < n_categories; j++)
+    parse_category(1, j, &n_leaves);
+}
+
+static void skip_item(const char *name);
+
+static void
+parse_PMModelItemInfo(void)
+{
+  for (int i = 0; i < n_dims; i++)
+    parse_dimension(i);
+  printf("%#x: end of model\n", pos);
+
+  int n_units16 = get_u32();
+  match_u16_assert(0);
+  for (int j = 0; j < n_units16; j++)
+    get_u16();
+
+  n_units16 = get_u32();
+  match_u16_assert(1);
+  for (int j = 0; j < n_units16; j++)
+    get_u16();
+
   match_byte_assert(0);
+  int n_units32 = get_u32();
+  match_u16_assert(0);
+  for (int j = 0; j < n_units32; j++)
+    match_u32_assert(j);
+
+  skip_item("end of PMModelItemInfo");
 }
 
 static void
@@ -701,8 +827,8 @@ match_PMModelItemInfo(void)
   match_byte_assert(0x54);
   match_byte_assert(0x80);
   parse_PMModelItemInfo();
-  match_DspSimpleText();
-  match_DspString();
+  /* DspSimpleText */
+  /* DspString */
 }
 
 static void
@@ -724,8 +850,7 @@ parse_NavHead(void)
   if (!match_byte(1))
     match_byte_assert(0);
   match_zeros_assert(3);
-  match_DspSimpleText();
-  parse_flexible();
+  /* DspSimpleText */
 }
 
 static void
@@ -787,7 +912,8 @@ parse_NavNote(void)
   if (!match_u32(0) && !match_u32(0xffffff4b))
     match_u32_assert(-40);
   pos += 8;
-  match_u32_assert(2);
+  if (!match_u32(1))
+    match_u32_assert(2);
   if (!match_u32(2))
     match_u32_assert(1);
 }
@@ -807,29 +933,30 @@ static void
 parse_PVPivotView(void)
 {
   match_byte_assert(5);
-  match_zeros_assert(4);
+  printf ("PVPivotView(%d)\n", get_u32());
 }
 
 static void
 parse_NDimensional__DspCell(void)
 {
   match_byte_assert(0);
-  match_u32_assert(1);
+  n_dims = get_u32();
+  printf ("NDimensional__DspCell(n_dims=%d)\n", n_dims);
 }
 
 static void
 parse_IndexedCollection(void)
 {
-  match_byte_assert(0);
-  if (match_byte(0))
+  printf("IndexedCollection");
+  for (size_t i = 0; ; i++)
     {
-      match_zeros_assert(12);
-    }
-  else
-    {
-      get_u32();
+      match_byte_assert(0);
+      printf("%c%d", i ? 'x' : '(', get_u32());
       match_u16_assert(1);
+      if (!match_u16(0x8011))
+        break;
     }
+  printf(")\n");
 }
 
 static void
@@ -883,6 +1010,43 @@ parse_PVCellStyle(void)
   match_zeros_assert(2);
 }
 
+static void
+skip_item(const char *name)
+{
+  int start_pos = pos;
+  printf("%#x: skipping %s bytes...", pos, name);
+  while (pos < n
+         && data[pos + 1] != 0x80
+         && !(data[pos] == 0xff && data[pos + 1] == 0xff
+              && data[pos + 2] == 0 && data[pos + 3] == 0))
+    {
+      pos++;
+    }
+  printf("until %#x:", pos);
+  hex_dump(stdout, start_pos, pos - start_pos);
+}
+
+static void
+parse_DspAnnotation(void)
+{
+  match_zeros_assert(10);
+  match_u32_assert(1);
+}
+
+static void
+parse_DspTextComponentHandle(void)
+{
+  match_byte_assert(0);
+  match_DspString();
+  printf("after DspTextComponentHandle: ");
+  for (int i = 0; ; i++)
+    if (!memcmp(&data[pos + 6 + i], "PVView", 6))
+      {
+        hex_dump(stdout, pos, i);
+        exit(0);
+      }
+}
+
 static void
 parse_flexible(void)
 {
@@ -891,14 +1055,34 @@ parse_flexible(void)
     {
       match_u16_assert(0);
       char *heading = get_string2();
-      if (!strcmp(heading, "DspCell"))
+      printf("%#x: %s\n", pos, heading);
+      if (!strcmp(heading, "NavRoot"))
+        {
+          match_byte_assert(2);
+          match_zeros_assert(32);
+        }
+      else if (!strcmp(heading, "NavPivot"))
+        {
+          hex_dump(stdout, pos, 021);
+          pos += 0x21;
+        }
+      else if (!strcmp(heading, "DspCell"))
         parse_DspCell();
+      else if (!strcmp(heading, "DspSimpleText"))
+        parse_DspSimpleText();
       else if (!strcmp(heading, "DspNumber"))
         parse_DspNumber();
       else if (!strcmp(heading, "DspString"))
         parse_DspString();
       else if (!strcmp(heading, "NavHead"))
         parse_NavHead();
+      else if (!strcmp(heading, "NavTreeViewItem"))
+        {
+          if (0)
+            parse_NavTreeViewItem();
+          else
+            skip_item(heading);
+        }
       else if (!strcmp(heading, "IndexedCollection"))
         parse_IndexedCollection();
       else if (!strcmp(heading, "NavOleItem"))
@@ -929,6 +1113,12 @@ parse_flexible(void)
         parse_PVSeparatorStyle();
       else if (!strcmp(heading, "PVCellStyle"))
         parse_PVCellStyle();
+      else if (!strcmp(heading, "PVTextStyle"))
+        exit(0);
+      else if (!strcmp(heading, "DspAnnotation"))
+        parse_DspAnnotation();
+      else if (!strcmp(heading, "DspTextComponentHandle"))
+        parse_DspTextComponentHandle();
       else
         {
           fprintf(stderr, "don't know %s at offset 0x%x: ", heading, start);
@@ -938,14 +1128,22 @@ parse_flexible(void)
     }
   else if (data[pos + 1] == 0x80)
     {
-      if (data[pos] == 0x2a && data[pos + 1] == 0x80)
+      if ((data[pos] == 0x2a || data[pos] == 0x18 || data[pos] == 0x19) && data[pos + 1] == 0x80)
         match_DspNumber();
       else if (data[pos] == 0x27 && data[pos + 1] == 0x80)
         match_DspCell();
       else if (data[pos] == 0x5 && data[pos + 1] == 0x80)
         match_DspString();
       else if (data[pos] == 0x7 && data[pos + 1] == 0x80)
-        match_NavTreeViewItem();
+        {
+          if (0)
+            match_NavTreeViewItem();
+          else
+            {
+              pos += 2;
+              skip_item("NavTreeViewItem");
+            }
+        }
       else if (data[pos] == 0x3 && data[pos + 1] == 0x80)
         match_DspSimpleText();
       else if ((data[pos] == 0x3c || data[pos] == 0x39)
@@ -953,20 +1151,24 @@ parse_flexible(void)
         {
           /* 3c 80 */
           /* 39 80 */
+          printf("%#x: %02x %02x ", pos, data[pos], data[pos + 1]);
           pos += 2;
           parse_format();
+          printf ("\n");
 /*      match_byte_assert(0x01);
         match_byte_assert(0x02);
         match_byte_assert(0x0d); */
         }
-      else if (data[pos] == 0x15 && data[pos + 1] == 0x80)
+      else if ((data[pos] == 0x15 || data[pos] == 0x14)
+               && data[pos + 1] == 0x80)
         {
+          /* 14 80 */
           /* 15 80 */
           pos += 2;
           if (match_byte(2))
             {
-              printf ("15 80(%f", get_double());
-              printf (" %s)\n", get_string1());
+              printf ("%02x 80(%f", data[pos - 2], get_double());
+              printf (" \"%s\")\n", get_string1());
               if (match_byte(1))
                 {
                   match_byte_assert(0);
@@ -985,12 +1187,15 @@ parse_flexible(void)
           else
             {
               match_byte_assert(0);
-              if (match_u32(0xc))
-                match_u16_assert(1);
-              else
-                match_zeros_assert(13);
             }
         }
+      else if (data[pos] == 0x17 || data[pos] == 0x25)
+        {
+          printf("%02x %02x(%02x %02x %02x)\n",
+                 data[pos], data[pos + 1],
+                 data[pos + 2], data[pos + 3], data[pos + 4]);
+          pos += 5;
+        }
       else if (data[pos] == 0x9 && data[pos + 1] == 0x80)
         {
           match_NavLog();
@@ -999,10 +1204,21 @@ parse_flexible(void)
         match_NavOleItem();
       else if (data[pos] == 0x11 || data[pos] == 0x13)
         {
+          int type = data[pos];
           pos += 2;
           match_byte_assert(0);
-          if (match_u32(0xc) || match_u32(0xd))
-            match_u16_assert(1);
+          if (data[pos] != 0)
+            {
+              int x = get_u32();
+              int y = get_u16();
+              if (y == 0)
+                {
+                  int index = get_u32();
+                  printf("%02x 80(footnote %d)\n", type, index);
+                }
+              else
+                printf("%02x 80(%d %d)\n", type, x, y);
+            }
           else
             match_zeros_assert(13);
         }
@@ -1058,17 +1274,17 @@ parse_flexible(void)
                data[pos] == 0x3e ||
                data[pos] == 0x46)
         {
+          printf ("%#x: %02x %02x(%02x %02x %02x)\n",
+                  pos, data[pos], data[pos + 1],
+                  data[pos + 2], data[pos + 3], data[pos + 4]);
           pos += 2;
-          parse_format();
+          pos += 3;
         }
       else
         {
-#if 0
-          fprintf (stderr, "bad record 0x%02x at offset %x: ",
-                   data[pos], pos);
-#endif
+          fprintf (stderr, "%#x: unknown record", pos);
           hex_dump (stderr, pos, 64);
-          assert(0);
+          exit(1);
         }
     }
   else if (match_byte(0xa)) 
@@ -1129,15 +1345,22 @@ parse_flexible(void)
         }
     }
 #endif
-  else //if (match_u16(2) || match_u16(3) || match_u16(4) || match_u16(5) || match_u16(6) || match_u16(7) || match_u16(8) || match_u16(9))
+  else if (match_u16(1))
     {
-      while (data[pos + 1] != 0x80
-             && (data[pos] != 0xff || data[pos + 1] != 0xff))
-        {
-          assert(pos < n);
-          pos++;
-        }
+      int start_pos = pos;
+      char *title = get_string1();
+      printf("%#x: title(\"%s\", ", start_pos, title);
+      if (!match_u32(2))
+        match_u32_assert(0);
+      char *id = get_string1();
+      printf("\"%s\")\n", id);
+      match_byte_assert(0);
+      if (!match_u32(2))
+        match_u32_assert(3);
+      match_u16_assert(1);
     }
+  else //if (match_u16(2) || match_u16(3) || match_u16(4) || match_u16(5) || match_u16(6) || match_u16(7) || match_u16(8) || match_u16(9))
+    skip_item("unknown");
 #if 0
   else if (match_byte(7) || match_byte(4) || match_byte(5) || match_byte(6) || match_byte(8) || match_byte(9) || match_byte(0xb) || match_byte(0xc) || match_byte(0x15) || match_byte(0x16) || match_byte(0x17) || match_byte(0x18) || match_byte(0x1e)  || match_byte(0x1a))
     {
@@ -1268,7 +1491,7 @@ main(int argc, char *argv[])
     data[n + i] = i % 2 ? 0xaa : 0x55;
   close(fd);
 
-  setvbuf (stdout, NULL, _IOLBF, 0);
+  setvbuf (stdout, NULL, _IONBF, 0);
 
   match_byte_assert(4);
   match_u32_assert(0);
@@ -1276,6 +1499,18 @@ main(int argc, char *argv[])
   match_u32_assert(1);
   match_byte_assert(0x63);
 
+  while (pos < n)
+    {
+      if (data[pos] == 0)
+        {
+          //printf("zero\n");
+          pos++;
+        }
+      else
+        parse_flexible();
+    }
+  exit(0);
+
   parse_heading("NavRoot");
   match_byte_assert(2);
   match_zeros_assert(32);
@@ -1343,7 +1578,10 @@ main(int argc, char *argv[])
   for (;;)
     {
       if (data[pos] == 0)
-        pos++;
+        {
+          //printf("zero\n");
+          pos++;
+        }
       else
         parse_flexible();
     }
@@ -1424,10 +1662,13 @@ main(int argc, char *argv[])
   match_byte_assert(0);
   match_zeros_assert(7);
 
-  while (data[pos] != 1)
+  while (pos < n)
     {
       if (data[pos] == 0)
-        pos++;
+        {
+          printf("zero\n");
+          pos++;
+        }
       else
         parse_flexible();
     }