run_mkpubinc.sh

   1 #!/bin/sh
   2 set -e
   3
   4 echo -n > $2
   5
   6 cat $1 | fromdos | sed -e \
   7 '1,/^_rdata.*segment/d;/^_data_last/q;/^[[:blank:];]/d;/^;/d;/^_r\?data\>/d;' | awk '{print $1}' | \
   8 while read a; do
   9   test -z "$a" && continue
  10   case $a in
  11   __IMPORT_DESCRIPTOR*)
  12     continue
  13     ;;
  14   *)
  15     ;;
  16   esac
  17
  18   echo "PUBLIC $a" >> $2
  19 done