Add qemu 2.4.0
[kvmfornfv.git] / qemu / dtc / tests / dtbs_equal_ordered.c
diff --git a/qemu/dtc/tests/dtbs_equal_ordered.c b/qemu/dtc/tests/dtbs_equal_ordered.c
new file mode 100644 (file)
index 0000000..12495de
--- /dev/null
@@ -0,0 +1,173 @@
+/*
+ * libfdt - Flat Device Tree manipulation
+ *     Tests if two given dtbs are structurally equal (including order)
+ * Copyright (C) 2007 David Gibson, IBM Corporation.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public License
+ * as published by the Free Software Foundation; either version 2.1 of
+ * the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+#include <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+#include <stdint.h>
+
+#include <libfdt.h>
+
+#include "tests.h"
+#include "testdata.h"
+
+int notequal; /* = 0 */
+
+#define MISMATCH(fmt, ...)                     \
+       do { \
+               if (notequal) \
+                       PASS(); \
+               else \
+                       FAIL(fmt, ##__VA_ARGS__);       \
+       } while (0)
+
+#define MATCH()                        \
+       do { \
+               if (!notequal) \
+                       PASS(); \
+               else \
+                       FAIL("Trees match which shouldn't");    \
+       } while (0)
+
+#define CHECK(code) \
+       { \
+               err = (code); \
+               if (err) \
+                       FAIL(#code ": %s", fdt_strerror(err)); \
+       }
+
+static void compare_mem_rsv(const void *fdt1, const void *fdt2)
+{
+       int i;
+       uint64_t addr1, size1, addr2, size2;
+       int err;
+
+       if (fdt_num_mem_rsv(fdt1) != fdt_num_mem_rsv(fdt2))
+               MISMATCH("Trees have different number of reserve entries");
+       for (i = 0; i < fdt_num_mem_rsv(fdt1); i++) {
+               CHECK(fdt_get_mem_rsv(fdt1, i, &addr1, &size1));
+               CHECK(fdt_get_mem_rsv(fdt2, i, &addr2, &size2));
+
+               if ((addr1 != addr2) || (size1 != size2))
+                       MISMATCH("Mismatch in reserve entry %d: "
+                                "(0x%llx, 0x%llx) != (0x%llx, 0x%llx)", i,
+                                (unsigned long long)addr1,
+                                (unsigned long long)size1,
+                                (unsigned long long)addr2,
+                                (unsigned long long)size2);
+       }
+}
+
+static void compare_structure(const void *fdt1, const void *fdt2)
+{
+       int nextoffset1 = 0, nextoffset2 = 0;
+       int offset1, offset2;
+       uint32_t tag1, tag2;
+       const char *name1, *name2;
+       int err;
+       const struct fdt_property *prop1, *prop2;
+       int len1, len2;
+
+       while (1) {
+               do {
+                       offset1 = nextoffset1;
+                       tag1 = fdt_next_tag(fdt1, offset1, &nextoffset1);
+               } while (tag1 == FDT_NOP);
+               do {
+                       offset2 = nextoffset2;
+                       tag2 = fdt_next_tag(fdt2, offset2, &nextoffset2);
+               } while (tag2 == FDT_NOP);
+
+               if (tag1 != tag2)
+                       MISMATCH("Tag mismatch (%d != %d) at (%d, %d)",
+                            tag1, tag2, offset1, offset2);
+
+               switch (tag1) {
+               case FDT_BEGIN_NODE:
+                       name1 = fdt_get_name(fdt1, offset1, &err);
+                       if (!name1)
+                               FAIL("fdt_get_name(fdt1, %d, ..): %s",
+                                    offset1, fdt_strerror(err));
+                       name2 = fdt_get_name(fdt2, offset2, NULL);
+                       if (!name2)
+                               FAIL("fdt_get_name(fdt2, %d, ..): %s",
+                                    offset2, fdt_strerror(err));
+
+                       if (!streq(name1, name2))
+                           MISMATCH("Name mismatch (\"%s\" != \"%s\") at (%d, %d)",
+                                    name1, name2, offset1, offset2);
+                       break;
+
+               case FDT_PROP:
+                       prop1 = fdt_offset_ptr(fdt1, offset1, sizeof(*prop1));
+                       if (!prop1)
+                               FAIL("Could get fdt1 property at %d", offset1);
+                       prop2 = fdt_offset_ptr(fdt2, offset2, sizeof(*prop2));
+                       if (!prop2)
+                               FAIL("Could get fdt2 property at %d", offset2);
+
+                       name1 = fdt_string(fdt1, fdt32_to_cpu(prop1->nameoff));
+                       name2 = fdt_string(fdt2, fdt32_to_cpu(prop2->nameoff));
+                       if (!streq(name1, name2))
+                               MISMATCH("Property name mismatch \"%s\" != \"%s\" "
+                                        "at (%d, %d)", name1, name2, offset1, offset2);
+                       len1 = fdt32_to_cpu(prop1->len);
+                       len2 = fdt32_to_cpu(prop2->len);
+                       if (len1 != len2)
+                               MISMATCH("Property length mismatch %u != %u "
+                                        "at (%d, %d)", len1, len2, offset1, offset2);
+
+                       if (memcmp(prop1->data, prop2->data, len1) != 0)
+                               MISMATCH("Property value mismatch at (%d, %d)",
+                                        offset1, offset2);
+                       break;
+
+               case FDT_END:
+                       return;
+               }
+       }
+}
+
+int main(int argc, char *argv[])
+{
+       void *fdt1, *fdt2;
+       uint32_t cpuid1, cpuid2;
+
+       test_init(argc, argv);
+       if ((argc != 3)
+           && ((argc != 4) || !streq(argv[1], "-n")))
+               CONFIG("Usage: %s [-n] <dtb file> <dtb file>", argv[0]);
+       if (argc == 4)
+               notequal = 1;
+
+       fdt1 = load_blob(argv[argc-2]);
+       fdt2 = load_blob(argv[argc-1]);
+
+       compare_mem_rsv(fdt1, fdt2);
+       compare_structure(fdt1, fdt2);
+
+       cpuid1 = fdt_boot_cpuid_phys(fdt1);
+       cpuid2 = fdt_boot_cpuid_phys(fdt2);
+       if (cpuid1 != cpuid2)
+               MISMATCH("boot_cpuid_phys mismatch 0x%x != 0x%x",
+                        cpuid1, cpuid2);
+
+       MATCH();
+}