| Current Path : /sys/amd64/compile/hs32/modules/usr/src/sys/modules/mlx/@/amd64/compile/hs32/modules/usr/src/sys/modules/usb/umoscom/@/kern/ |
FreeBSD hs32.drive.ne.jp 9.1-RELEASE FreeBSD 9.1-RELEASE #1: Wed Jan 14 12:18:08 JST 2015 root@hs32.drive.ne.jp:/sys/amd64/compile/hs32 amd64 |
| Current File : //sys/amd64/compile/hs32/modules/usr/src/sys/modules/mlx/@/amd64/compile/hs32/modules/usr/src/sys/modules/usb/umoscom/@/kern/genassym.sh |
#!/bin/sh
# $FreeBSD: release/9.1.0/sys/kern/genassym.sh 175449 2008-01-18 17:02:14Z julian $
usage()
{
echo "usage: genassym [-o outfile] objfile"
exit 1
}
work()
{
${NM:='nm'} "$1" | ${AWK:='awk'} '
/ C .*sign$/ {
sign = substr($1, length($1) - 3, 4)
sub("^0*", "", sign)
if (sign != "")
sign = "-"
}
/ C .*w0$/ {
w0 = substr($1, length($1) - 3, 4)
}
/ C .*w1$/ {
w1 = substr($1, length($1) - 3, 4)
}
/ C .*w2$/ {
w2 = substr($1, length($1) - 3, 4)
}
/ C .*w3$/ {
w3 = substr($1, length($1) - 3, 4)
w = w3 w2 w1 w0
sub("^0*", "", w)
if (w == "")
w = "0"
sub("w3$", "", $3)
# This still has minor problems representing INT_MIN, etc.
# E.g.,
# with 32-bit 2''s complement ints, this prints -0x80000000,
# which has the wrong type (unsigned int).
printf("#define\t%s\t%s0x%s\n", $3, sign, w)
} '
}
#
#MAIN PROGGRAM
#
use_outfile="no"
while getopts "o:" option
do
case "$option" in
o) outfile="$OPTARG"
use_outfile="yes";;
*) usage;;
esac
done
shift $(($OPTIND - 1))
case $# in
1) ;;
*) usage;;
esac
if [ "$use_outfile" = "yes" ]
then
work $1 3>"$outfile" >&3 3>&-
else
work $1
fi