X-Git-Url: https://notaz.gp2x.de/cgi-bin/gitweb.cgi?p=ia32rtools.git;a=blobdiff_plain;f=run_mkpubinc.sh;h=2935d7d5d2582076a5fde6410722f4906cf03fda;hp=a3d085f5d3fd206a7da4acd08eff69be0645523a;hb=HEAD;hpb=7b64f7cd01d7306460b71a63ab78842545c5224f

diff --git a/run_mkpubinc.sh b/run_mkpubinc.sh
index a3d085f..2935d7d 100755
--- a/run_mkpubinc.sh
+++ b/run_mkpubinc.sh
@@ -1,18 +1,48 @@
 #!/bin/sh
+set -e
 
-echo -n > public.inc
+public_inc=$1
+asm=$2
+c_list=$3
 
-cat StarCraft.asm | fromdos | sed -e \
-'1,/^_rdata.*segment/d;/^_data_last/q;/^[[:blank:];]/d;/^;/d;/^_r\?data\>/d;' | awk '{print $1}' | \
+echo -n > $public_inc
+
+cat $asm | fromdos | sed -e \
+'1,/^_rdata.*segment/d;/^_data.*\<ends\>/q;/^[[:blank:];]/d;/^;/d;/^_r\?data\>/d;' | awk '{print $1}' | \
 while read a; do
   test -z "$a" && continue
   case $a in
   __IMPORT_DESCRIPTOR*)
     continue
     ;;
+  _data)
+    continue
+    ;;
   *)
     ;;
   esac
 
-  echo "PUBLIC $a" >> public.inc
+  echo "_$a equ $a" >> $public_inc
+  echo "PUBLIC _$a" >> $public_inc
 done
+
+if test -n "$c_list"; then
+  # make a list of functions in asm
+  grep '\<endp\>' $asm | awk '{print $1}' | grep -v '\<rm_' \
+    > ${asm}_funcs || true
+
+  echo "; funcs called from C" >> $public_inc
+
+  cat $c_list | \
+  while read a; do
+    name=`echo $a | awk -F@ '{print $1}'`
+    n=`grep "\<$name\>" ${asm}_funcs` || \
+    n=`grep "\<_$name\>" ${asm}_funcs` || true
+    if test -z "$n"; then
+      echo "\"$name\" is expected to be in asm, but was not found"
+      rm $public_inc
+      exit 1
+    fi
+    echo "PUBLIC $n" >> $public_inc
+  done
+fi