Import Dev86src-0.13.5.tar.gzv0.13.5

1 files changed, 83 insertions, 0 deletions

diff --git a/libc/syscall/mkentry.sh b/libc/syscall/mkentry.sh
new file mode 100644
index 0000000..aae4904
--- /dev/null
+++ b/libc/syscall/mkentry.sh
@@ -0,0 +1,83 @@
+#!/bin/sh -
+#
+# This program generates entry.c from syscall.dat
+
+cat << \Trailer
+/* Switched to V7 system call layout... Chad - 1/5/96
+*/
+#asm
+*
+*	The call table - autogenerated from syscall.dat
+*
+	.data
+sys_call_table:
+Trailer
+
+tr '[A-Z]' '[a-z]' < syscall.dat | \
+awk '/^#/{next;}
+/^[	 ]$/{next;}
+{
+   callno = 0+$2;
+   if( $4 != "-" )
+      assigned_to[callno] = $1;
+
+   if( $3 == "x" || $3 == "" ) next;
+   else if( $4 == "@" || $4 == "-" ) next;
+
+   # Not implemented yet
+   if( substr($2, 1, 1) != "+" ) next;
+
+   if( maxno < callno ) maxno = callno;
+
+   str = "\t.word _sys_" $1;
+   line[callno] = sprintf("%-25s ! %d", str, callno);
+}
+END{
+   for(callno=0; callno<=maxno; callno++)
+   {
+      if( assigned_to[callno] == "fork" )
+         gsub("_sys_fork", "_do_fork ", line[callno]);
+
+      if( callno in line )
+         print line[callno];
+      else
+      {
+         if( assigned_to[callno] == "" )
+            assigned_to[callno] = "unassigned";
+         if( assigned_to[callno] == "vfork" )
+	 {
+            str = "\t.word _do_fork";
+	 }
+	 else
+            str = "\t.word _no_syscall";
+         printf "%-25s ! %d - %s\n", str, callno, assigned_to[callno];
+      }
+   }
+}
+'
+
+cat <<\Trailer
+sys_call_table_end:
+
+*
+*	Despatch a syscall (called from syscall_int)
+*	Entry: ax=function code, stack contains parameters
+*
+	.text
+	.globl _syscall
+_syscall:
+	cmp  ax,#((sys_call_table_end - sys_call_table)/2)
+	ja   _no_syscall
+	! look up address and jump to function
+	mov  bx,ax
+	shl  bx,#1		! multiply by 2
+	add  bx,#sys_call_table
+	j    [bx]
+*
+*	Unimplemented calls
+*	
+_no_syscall:
+	mov	ax,#-38
+	ret
+#endasm
+Trailer