#define match_byte_assert(b) match_byte_assert(b, WHERE)
static char *
-get_string(void)
+get_string(const char *where)
{
if (data[pos + 1] == 0 && data[pos + 2] == 0 && data[pos + 3] == 0
/*&& all_ascii(&data[pos + 4], data[pos])*/)
}
else
{
- fprintf(stderr, "0x%x: expected string\n", pos);
+ fprintf(stderr, "%s: 0x%x: expected string\n", where, pos);
exit(1);
}
}
+#define get_string() get_string(WHERE)
static void
dump_value(int level)
for (int i = 0; i <= level; i++)
printf (" ");
+ match_byte (0);
if (match_byte (3))
{
get_string();
if (match_byte (0x31))
{
- match_u32 (1);
- printf("(footnote %d) ", get_u32());
- match_byte_assert (0);
- match_byte_assert (0);
+ if (match_u32 (1))
+ {
+ printf("(footnote %d) ", get_u32());
+ match_byte_assert (0);
+ match_byte_assert (0);
+ }
+ else
+ {
+ match_u32_assert (2);
+ printf("(special 2)");
+ match_byte_assert(0);
+ match_byte_assert(0);
+ match_u32_assert(1);
+ match_byte_assert(0);
+ match_byte_assert(0);
+ }
int subn = get_u32 ();
printf ("nested %d bytes", subn);
pos += subn;
get_string();
printf("string \"%s\"", get_string());
match_byte (0);
- match_byte_assert (1);
+ match_byte (0);
+ match_byte (0);
+ match_byte (1);
match_byte (0);
match_byte (0);
match_byte (0);
if (!match_u32 (3))
match_u32_assert (2);
match_byte (0);
+ match_byte (0);
+ match_byte (0);
+ match_byte (0);
+ }
+ else if (match_byte (4))
+ {
+ unsigned int format;
+ char *var, *vallab, *value;
+
+ match_byte_assert (0x58);
+ format = get_u32 ();
+ vallab = get_string ();
+ var = get_string ();
+ match_byte_assert (2);
+ value = get_string ();
+ printf ("value \"%s\" format %d(%d.%d) var \"%s\" vallab \"%s\"",
+ value, format >> 16, (format >> 8) & 0xff, format & 0xff, var, vallab);
+ match_byte (0);
+ match_byte (0);
+ match_byte (0);
+ match_byte (0);
}
else if (match_byte (1))
{
match_byte (0);
match_byte (1);
}
- else
+ else if (match_byte (0x31))
{
int subn;
int total_subs = 1;
- match_byte (0);
- match_byte_assert (0x31);
match_u32_assert (0);
match_u32_assert (0);
subn = get_u32 ();
total_subs *= n_subst;
}
+ for (int i = 0; i < total_subs; i++)
+ {
+ putc ('\n', stdout);
+ dump_value (level + 1);
+ }
+ }
+ else
+ {
+ int total_subs = 1;
+
+ match_byte_assert (0x58);
+ printf ("\"%s\" with substitutions:", get_string());
+ for (;;)
+ {
+ int n_subst = get_u32();
+ if (!n_subst)
+ break;
+ printf (" %d", n_subst);
+ total_subs *= n_subst;
+ }
+
for (int i = 0; i < total_subs; i++)
{
putc ('\n', stdout);
match_byte (0);
get_u32 ();
}
+ else if (match_byte (1))
+ {
+ match_byte (0);
+ match_u32_assert (1);
+ match_byte (0);
+ get_u32();
+ }
else
{
match_u32_assert (0);