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