1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
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
|
