X-Git-Url: https://git.ozlabs.org/?a=blobdiff_plain;f=ccan%2Fcdump%2Ftest%2Frun-qualifiers.c;fp=ccan%2Fcdump%2Ftest%2Frun-qualifiers.c;h=964047b1bb54eb8d6d22ee9c8f4a29ccb481454c;hb=158691ae36fe1da78ec54dbcc0006f603398dae2;hp=0000000000000000000000000000000000000000;hpb=17aa322abd7b785330ab49e348144be940b3d1d8;p=ccan

diff --git a/ccan/cdump/test/run-qualifiers.c b/ccan/cdump/test/run-qualifiers.c
new file mode 100644
index 00000000..964047b1
--- /dev/null
+++ b/ccan/cdump/test/run-qualifiers.c
@@ -0,0 +1,130 @@
+#include <ccan/cdump/cdump.h>
+/* Include the C files directly. */
+#include <ccan/cdump/cdump.c>
+#include <ccan/tap/tap.h>
+
+int main(void)
+{
+	struct cdump_definitions *defs;
+	const struct cdump_type *t, *p;
+	char *ctx = tal(NULL, char), *problems;
+
+	/* This is how many tests you plan to run */
+	plan_tests(63);
+
+	defs = cdump_extract(ctx,
+			     "struct foo {\n"
+			     "	long l;\n"
+			     "	long int li;\n"
+			     "	unsigned long *ulp;\n"
+			     "	unsigned long int *ulip;\n"
+			     "};", &problems);
+	ok1(defs);
+	ok1(tal_parent(defs) == ctx);
+	ok1(!problems);
+
+	ok1(strmap_empty(&defs->enums));
+	ok1(strmap_empty(&defs->unions));
+	t = strmap_get(&defs->structs, "foo");
+	ok1(t);
+	ok1(t->kind == CDUMP_STRUCT);
+	ok1(streq(t->name, "foo"));
+	ok1(tal_count(t->u.members) == 4);
+
+	ok1(streq(t->u.members[0].name, "l"));
+	p = t->u.members[0].type;
+	ok1(p->kind == CDUMP_UNKNOWN);
+	ok1(streq(p->name, "long"));
+
+	ok1(streq(t->u.members[1].name, "li"));
+	p = t->u.members[1].type;
+	ok1(p->kind == CDUMP_UNKNOWN);
+	ok1(streq(p->name, "long int"));
+
+	ok1(streq(t->u.members[2].name, "ulp"));
+	p = t->u.members[2].type;
+	ok1(p->kind == CDUMP_POINTER);
+	p = p->u.ptr;
+	ok1(p->kind == CDUMP_UNKNOWN);
+	ok1(streq(p->name, "unsigned long"));
+
+	ok1(streq(t->u.members[3].name, "ulip"));
+	p = t->u.members[3].type;
+	ok1(p->kind == CDUMP_POINTER);
+	p = p->u.ptr;
+	ok1(p->kind == CDUMP_UNKNOWN);
+	ok1(streq(p->name, "unsigned long int"));
+
+	defs = cdump_extract(ctx,
+			     "struct foo {\n"
+			     "	volatile long vl;\n"
+			     "	const long cl;\n"
+			     "	volatile const long long int *vclli;\n"
+			     "};", &problems);
+	ok1(defs);
+	ok1(tal_parent(defs) == ctx);
+	ok1(!problems);
+
+	ok1(strmap_empty(&defs->enums));
+	ok1(strmap_empty(&defs->unions));
+	t = strmap_get(&defs->structs, "foo");
+	ok1(t);
+	ok1(t->kind == CDUMP_STRUCT);
+	ok1(streq(t->name, "foo"));
+	ok1(tal_count(t->u.members) == 3);
+
+	ok1(streq(t->u.members[0].name, "vl"));
+	ok1(streq(t->u.members[0].qualifiers, "volatile"));
+	p = t->u.members[0].type;
+	ok1(p->kind == CDUMP_UNKNOWN);
+	ok1(streq(p->name, "long"));
+
+	ok1(streq(t->u.members[1].name, "cl"));
+	ok1(streq(t->u.members[1].qualifiers, "const"));
+	p = t->u.members[1].type;
+	ok1(p->kind == CDUMP_UNKNOWN);
+	ok1(streq(p->name, "long"));
+
+	ok1(streq(t->u.members[2].name, "vclli"));
+	ok1(streq(t->u.members[2].qualifiers, "volatile const"));
+	p = t->u.members[2].type;
+	ok1(p->kind == CDUMP_POINTER);
+	p = p->u.ptr;
+	ok1(p->kind == CDUMP_UNKNOWN);
+	ok1(streq(p->name, "long long int"));
+
+	defs = cdump_extract(ctx,
+			     "struct foo {\n"
+			     "	volatile struct bar *a, b;\n"
+			     "};", &problems);
+	ok1(defs);
+	ok1(tal_parent(defs) == ctx);
+	ok1(!problems);
+
+	ok1(strmap_empty(&defs->enums));
+	ok1(strmap_empty(&defs->unions));
+	t = strmap_get(&defs->structs, "foo");
+	ok1(t);
+	ok1(t->kind == CDUMP_STRUCT);
+	ok1(streq(t->name, "foo"));
+	ok1(tal_count(t->u.members) == 2);
+
+	ok1(streq(t->u.members[0].name, "a"));
+	ok1(streq(t->u.members[0].qualifiers, "volatile"));
+	p = t->u.members[0].type;
+	ok1(p->kind == CDUMP_POINTER);
+	p = p->u.ptr;
+	ok1(p->kind == CDUMP_STRUCT);
+	ok1(streq(p->name, "bar"));
+
+	ok1(streq(t->u.members[1].name, "b"));
+	ok1(streq(t->u.members[1].qualifiers, "volatile"));
+	p = t->u.members[1].type;
+	ok1(p->kind == CDUMP_STRUCT);
+	ok1(streq(p->name, "bar"));
+
+	tal_free(ctx);
+
+	/* This exits depending on whether all tests passed */
+	return exit_status();
+}