run_mkpubinc.sh

   1 #!/bin/sh
   2 set -e
   3
   4 echo -n > $3
   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 "_$a equ $a" >> $3
  19   echo "PUBLIC _$a" >> $3
  20 done
  21
  22 echo "; funcs called from C" >> $3
  23
  24 cat $2 | \
  25 while read a; do
  26 #  echo "_$a equ $a" >> $3
  27 #  echo "PUBLIC _$a" >> $3
  28   echo "PUBLIC $a" >> $3
  29 done