mkioctls revision 179308 
1#!/bin/sh
2#
3# $FreeBSD: head/usr.bin/kdump/mkioctls 179308 2008-05-25 22:11:40Z rwatson $
4
5set -e
6
7if [ "x$1" = "x-s" ]; then
8	use_switch=1
9	shift
10else
11	use_switch=0
12fi
13
14if [ -z "$1" ]; then
15	echo "usage: sh $0 [-s] include-dir"
16	exit 1
17fi
18
19LC_ALL=C; export LC_ALL
20
21# Build a list of headers that have ioctls in them.
22# XXX should we use an ANSI cpp?
23ioctl_includes=`
24	cd $1
25	find -H -s * -name '*.h' |
26		xargs egrep -l \
27'^#[ 	]*define[ 	]+[A-Za-z_][A-Za-z0-9_]*[ 	]+_IO[^a-z0-9_]' |
28		awk '{printf("#include <%s>\\\\n", $1)}'
29`
30
31awk -v x="$ioctl_includes" 'BEGIN {print x}' |
32	gcc -E -I$1 -dM - |
33	awk -v ioctl_includes="$ioctl_includes" -v use_switch="$use_switch" '
34BEGIN {
35	print "/* XXX obnoxious prerequisites. */"
36	print "#define COMPAT_43"
37	print "#include <sys/param.h>"
38	print "#include <sys/devicestat.h>"
39	print "#include <sys/disklabel.h>"
40	print "#include <sys/socket.h>"
41	print "#include <sys/time.h>"
42	print "#include <sys/tty.h>"
43	print "#include <bsm/audit.h>"
44	print "#include <net/ethernet.h>"
45	print "#include <net/if.h>"
46	print "#include <net/if_var.h>"
47	print "#include <net/pfvar.h>"
48	print "#include <net/route.h>"
49	print "#include <netinet/in.h>"
50	print "#include <netinet/ip_mroute.h>"
51	print "#include <netinet6/in6_var.h>"
52	print "#include <netinet6/nd6.h>"
53	print "#include <netinet6/ip6_mroute.h>"
54	print "#include <stdio.h>"
55	print "#include <cam/cam.h>"
56	print ""
57	print "const char *ioctlname(u_long val);"
58	print ""
59	print ioctl_includes
60	print ""
61	print "const char *"
62	print "ioctlname(u_long val)"
63	print "{"
64	print ""
65	if (use_switch)
66		print "\tswitch(val) {"
67}
68
69/^#[ 	]*define[ 	]+[A-Za-z_][A-Za-z0-9_]*[ 	]+_IO/ {
70
71	# find where the name starts
72	for (i = 1; i <= NF; i++)
73		if ($i ~ /define/)
74			break;
75	++i;
76	#
77	if (use_switch)
78		printf("\tcase %s:\n\t\treturn(\"%s\");\n", $i, $i);
79	else
80		printf("\tif (val ==  %s)\n\t\treturn(\"%s\");\n", $i, $i);
81
82}
83END {
84	if (use_switch)
85		print "\t}"
86	print "\n\treturn(NULL);"
87	print "}"
88}
89'
90