FreeBSD/Linux Kernel Cross Reference
sys/kern/genassym.sh
1 #!/bin/sh
2 # $FreeBSD: src/sys/kern/genassym.sh,v 1.5 2008/01/18 17:02:14 julian Exp $
3
4 usage()
5 {
6 echo "usage: genassym [-o outfile] objfile"
7 exit 1
8 }
9
10
11 work()
12 {
13 ${NM:='nm'} "$1" | ${AWK:='awk'} '
14 / C .*sign$/ {
15 sign = substr($1, length($1) - 3, 4)
16 sub("^0*", "", sign)
17 if (sign != "")
18 sign = "-"
19 }
20 / C .*w0$/ {
21 w0 = substr($1, length($1) - 3, 4)
22 }
23 / C .*w1$/ {
24 w1 = substr($1, length($1) - 3, 4)
25 }
26 / C .*w2$/ {
27 w2 = substr($1, length($1) - 3, 4)
28 }
29 / C .*w3$/ {
30 w3 = substr($1, length($1) - 3, 4)
31 w = w3 w2 w1 w0
32 sub("^0*", "", w)
33 if (w == "")
34 w = "0"
35 sub("w3$", "", $3)
36 # This still has minor problems representing INT_MIN, etc.
37 # E.g.,
38 # with 32-bit 2''s complement ints, this prints -0x80000000,
39 # which has the wrong type (unsigned int).
40 printf("#define\t%s\t%s0x%s\n", $3, sign, w)
41 } '
42 }
43
44
45 #
46 #MAIN PROGGRAM
47 #
48 use_outfile="no"
49 while getopts "o:" option
50 do
51 case "$option" in
52 o) outfile="$OPTARG"
53 use_outfile="yes";;
54 *) usage;;
55 esac
56 done
57 shift $(($OPTIND - 1))
58 case $# in
59 1) ;;
60 *) usage;;
61 esac
62
63 if [ "$use_outfile" = "yes" ]
64 then
65 work $1 3>"$outfile" >&3 3>&-
66 else
67 work $1
68 fi
69
|