1 files changed, 145 insertions, 0 deletions
diff --git a/src/ioctlsort.c b/src/ioctlsort.c
new file mode 100644
index 000000000..b92cbecce
--- /dev/null
+++ b/src/ioctlsort.c
@@ -0,0 +1,145 @@
+/*
+ * Copyright (c) 2001 Wichert Akkerman <wichert@cistron.nl>
+ * Copyright (c) 2004-2015 Dmitry V. Levin <ldv@strace.io>
+ * Copyright (c) 1999-2018 The strace developers.
+ * All rights reserved.
+ *
+ * SPDX-License-Identifier: LGPL-2.1-or-later
+ */
+
+#ifdef HAVE_CONFIG_H
+# include "config.h"
+#endif
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+#include "ioctl_iocdef.h"
+
+struct ioctlent {
+	const char *info;
+	const char *name;
+	unsigned int dir;
+	unsigned int type_nr;
+	unsigned int size;
+};
+
+static int
+is_prefix(const char *s1, const char *s2)
+{
+	size_t len = strlen(s1);
+
+	if (len > strlen(s2))
+		return 0;
+	return !memcmp(s1, s2, len);
+}
+
+static int
+compare_name_info(const void *a, const void *b)
+{
+	int rc;
+
+	const char *name1 = ((struct ioctlent *) a)->name;
+	const char *name2 = ((struct ioctlent *) b)->name;
+	const char *info1 = ((struct ioctlent *) a)->info;
+	const char *info2 = ((struct ioctlent *) b)->info;
+
+	rc = strcmp(name1, name2);
+	if (rc)
+		return rc;
+
+	/*
+	 * exception from lexicographical order:
+	 * "asm/" < "asm-generic/"
+	 */
+	if (is_prefix("asm/", info1) &&
+	    is_prefix("asm-generic/", info2))
+		return -1;
+
+	if (is_prefix("asm/", info2) &&
+	    is_prefix("asm-generic/", info1))
+		return 1;
+
+	return strcmp(info1, info2);
+}
+
+static unsigned int
+code(const struct ioctlent *e)
+{
+	return e->type_nr |
+		(e->size << _IOC_SIZESHIFT) |
+		(e->dir << _IOC_DIRSHIFT);
+}
+
+static int
+compare_code_name(const void *a, const void *b)
+{
+	unsigned int code1 = code((struct ioctlent *) a);
+	unsigned int code2 = code((struct ioctlent *) b);
+	const char *name1 = ((struct ioctlent *) a)->name;
+	const char *name2 = ((struct ioctlent *) b)->name;
+	return (code1 > code2) ?
+		1 : (code1 < code2) ? -1 : strcmp(name1, name2);
+}
+
+static void
+ioctlsort(struct ioctlent *ioctls, size_t nioctls)
+{
+	size_t i;
+
+	qsort(ioctls, nioctls, sizeof(ioctls[0]), compare_name_info);
+
+	for (i = 1; i < nioctls; ++i)
+		if (!strcmp(ioctls[i-1].name, ioctls[i].name)) {
+			/*
+			 * If there are multiple definitions for the same
+			 * name, keep the first one and mark all the rest
+			 * for deletion.
+			 */
+			ioctls[i].info = NULL;
+		}
+
+	for (i = 1; i < nioctls; ++i)
+		if (!ioctls[i].info) {
+			/*
+			 * Change ioctl code of marked elements
+			 * to make them sorted to the end of array.
+			 */
+			ioctls[i].dir =
+			ioctls[i].type_nr =
+			ioctls[i].size = 0xffffffffu;
+		}
+
+	qsort(ioctls, nioctls, sizeof(ioctls[0]), compare_code_name);
+
+	puts("/* Generated by ioctlsort. */");
+	for (i = 0; i < nioctls; ++i) {
+		if (!ioctls[i].info) {
+			/*
+			 * We've reached the first element marked for deletion.
+			 */
+			break;
+		}
+		if (i == 0 || code(&ioctls[i-1]) != code(&ioctls[i]) ||
+		    !is_prefix(ioctls[i-1].name, ioctls[i].name))
+			printf("{ \"%s\", %#010x },\n",
+				ioctls[i].name, code(ioctls+i));
+	}
+}
+
+static struct ioctlent ioctls[] = {
+#ifdef IOCTLSORT_INC
+# include IOCTLSORT_INC
+#else
+# include "ioctls_arch.h"
+# include "ioctls_inc.h"
+#endif
+};
+
+int
+main(void)
+{
+	ioctlsort(ioctls, sizeof(ioctls) / sizeof(ioctls[0]));
+	return 0;
+}