sys/kern/genassym.sh

   1 #!/bin/sh
   2 # $FreeBSD$
   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