*** empty log message ***
This commit is contained in:
parent
6bdc39213b
commit
bc759a2903
63 changed files with 1214 additions and 0 deletions
8
mach/ns/libsys/_exit.s
Normal file
8
mach/ns/libsys/_exit.s
Normal file
|
@ -0,0 +1,8 @@
|
|||
.define __exit
|
||||
.extern __exit
|
||||
.text
|
||||
__exit:
|
||||
enter[], 0
|
||||
movd 8(fp),tos
|
||||
movd 1,tos
|
||||
jsr @.mon
|
20
mach/ns/libsys/access.s
Normal file
20
mach/ns/libsys/access.s
Normal file
|
@ -0,0 +1,20 @@
|
|||
.define _access
|
||||
.extern _access
|
||||
.text
|
||||
_access:
|
||||
enter[], 0
|
||||
movd 12(fp),tos
|
||||
movd 8(fp),tos
|
||||
movd 33,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
bne I0011
|
||||
movd 0,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
19
mach/ns/libsys/acct.s
Normal file
19
mach/ns/libsys/acct.s
Normal file
|
@ -0,0 +1,19 @@
|
|||
.define _acct
|
||||
.extern _acct
|
||||
.text
|
||||
_acct:
|
||||
enter[], 0
|
||||
movd 8(fp),tos
|
||||
movd 51,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
bne I0011
|
||||
movd 0,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
12
mach/ns/libsys/alarm.s
Normal file
12
mach/ns/libsys/alarm.s
Normal file
|
@ -0,0 +1,12 @@
|
|||
.define _alarm
|
||||
.extern _alarm
|
||||
.text
|
||||
_alarm:
|
||||
enter[], 0
|
||||
movd 8(fp),tos
|
||||
movd 27,tos
|
||||
jsr @.mon
|
||||
movd tos,r7
|
||||
movd r7,r4
|
||||
exit []
|
||||
ret 0
|
9
mach/ns/libsys/brk.s
Normal file
9
mach/ns/libsys/brk.s
Normal file
|
@ -0,0 +1,9 @@
|
|||
.define _brk
|
||||
.extern _brk
|
||||
.text
|
||||
_brk:
|
||||
enter[], 0
|
||||
movd 8(fp),@.reghp
|
||||
movd 0,r4
|
||||
exit []
|
||||
ret 0
|
19
mach/ns/libsys/chdir.s
Normal file
19
mach/ns/libsys/chdir.s
Normal file
|
@ -0,0 +1,19 @@
|
|||
.define _chdir
|
||||
.extern _chdir
|
||||
.text
|
||||
_chdir:
|
||||
enter[], 0
|
||||
movd 8(fp),tos
|
||||
movd 12,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
bne I0011
|
||||
movd 0,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
20
mach/ns/libsys/chmod.s
Normal file
20
mach/ns/libsys/chmod.s
Normal file
|
@ -0,0 +1,20 @@
|
|||
.define _chmod
|
||||
.extern _chmod
|
||||
.text
|
||||
_chmod:
|
||||
enter[], 0
|
||||
movd 12(fp),tos
|
||||
movd 8(fp),tos
|
||||
movd 15,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
bne I0011
|
||||
movd 0,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
25
mach/ns/libsys/chown.s
Normal file
25
mach/ns/libsys/chown.s
Normal file
|
@ -0,0 +1,25 @@
|
|||
.define _chown
|
||||
.extern _chown
|
||||
.text
|
||||
_chown:
|
||||
enter[], 0
|
||||
addr 8(fp),r7
|
||||
movd 12,r0
|
||||
addd r0,r7
|
||||
1:
|
||||
subd 4,r7
|
||||
movd 0(r7),tos
|
||||
acbd -4,r0,1b
|
||||
movd 16,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
bne I0011
|
||||
movd 0,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
19
mach/ns/libsys/chroot.s
Normal file
19
mach/ns/libsys/chroot.s
Normal file
|
@ -0,0 +1,19 @@
|
|||
.define _chroot
|
||||
.extern _chroot
|
||||
.text
|
||||
_chroot:
|
||||
enter[], 0
|
||||
movd 8(fp),tos
|
||||
movd 61,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
bne I0011
|
||||
movd 0,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
7
mach/ns/libsys/cleanup.s
Normal file
7
mach/ns/libsys/cleanup.s
Normal file
|
@ -0,0 +1,7 @@
|
|||
.define __cleanup
|
||||
.extern __cleanup
|
||||
.text
|
||||
__cleanup:
|
||||
enter[], 0
|
||||
exit []
|
||||
ret 0
|
6
mach/ns/libsys/close.s
Normal file
6
mach/ns/libsys/close.s
Normal file
|
@ -0,0 +1,6 @@
|
|||
.define _close
|
||||
.extern _close
|
||||
.text
|
||||
_close:
|
||||
movd 0, r4
|
||||
ret 0
|
19
mach/ns/libsys/creat.s
Normal file
19
mach/ns/libsys/creat.s
Normal file
|
@ -0,0 +1,19 @@
|
|||
.define _creat
|
||||
.extern _creat
|
||||
.text
|
||||
_creat:
|
||||
enter[], 0
|
||||
movd 12(fp),tos
|
||||
movd 8(fp),tos
|
||||
movd 8,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
beq I0011
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,tos
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,r4
|
||||
exit []
|
||||
ret 0
|
19
mach/ns/libsys/dup.s
Normal file
19
mach/ns/libsys/dup.s
Normal file
|
@ -0,0 +1,19 @@
|
|||
.define _dup
|
||||
.extern _dup
|
||||
.text
|
||||
_dup:
|
||||
enter[], 0
|
||||
movd 8(fp),tos
|
||||
movd 8(fp),tos
|
||||
movd 41,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
beq I0011
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,tos
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,r4
|
||||
exit []
|
||||
ret 0
|
21
mach/ns/libsys/dup2.s
Normal file
21
mach/ns/libsys/dup2.s
Normal file
|
@ -0,0 +1,21 @@
|
|||
.define _dup2
|
||||
.extern _dup2
|
||||
.text
|
||||
_dup2:
|
||||
enter[], 0
|
||||
movd 8(fp),r7
|
||||
ord 64,r7
|
||||
movd 12(fp),tos
|
||||
movd r7,tos
|
||||
movd 41,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
beq I0011
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,tos
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,r4
|
||||
exit []
|
||||
ret 0
|
5
mach/ns/libsys/errno.s
Normal file
5
mach/ns/libsys/errno.s
Normal file
|
@ -0,0 +1,5 @@
|
|||
.define _errno
|
||||
.extern _errno
|
||||
.bss
|
||||
_errno:.space 4
|
||||
.text
|
15
mach/ns/libsys/execl.s
Normal file
15
mach/ns/libsys/execl.s
Normal file
|
@ -0,0 +1,15 @@
|
|||
.define _execl
|
||||
.extern _execl
|
||||
.text
|
||||
_execl:
|
||||
enter[], 0
|
||||
movd @__penvp,tos
|
||||
addr 12(fp),tos
|
||||
movd 8(fp),tos
|
||||
movd 59,tos
|
||||
jsr @.mon
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
26
mach/ns/libsys/execle.s
Normal file
26
mach/ns/libsys/execle.s
Normal file
|
@ -0,0 +1,26 @@
|
|||
.define _execle
|
||||
.extern _execle
|
||||
.text
|
||||
_execle:
|
||||
enter[], 0
|
||||
addr 12(fp),tos
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,tos
|
||||
cmpd 0(r7),0
|
||||
beq I0012
|
||||
movd tos,r7
|
||||
addr 4(r7),tos
|
||||
br I0011
|
||||
I0012:
|
||||
movd tos,r7
|
||||
movd 4(r7),tos
|
||||
addr 12(fp),tos
|
||||
movd 8(fp),tos
|
||||
movd 59,tos
|
||||
jsr @.mon
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
15
mach/ns/libsys/execv.s
Normal file
15
mach/ns/libsys/execv.s
Normal file
|
@ -0,0 +1,15 @@
|
|||
.define _execv
|
||||
.extern _execv
|
||||
.text
|
||||
_execv:
|
||||
enter[], 0
|
||||
movd @__penvp,tos
|
||||
movd 12(fp),tos
|
||||
movd 8(fp),tos
|
||||
movd 59,tos
|
||||
jsr @.mon
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
19
mach/ns/libsys/execve.s
Normal file
19
mach/ns/libsys/execve.s
Normal file
|
@ -0,0 +1,19 @@
|
|||
.define _execve
|
||||
.extern _execve
|
||||
.text
|
||||
_execve:
|
||||
enter[], 0
|
||||
addr 8(fp),r7
|
||||
movd 12,r0
|
||||
addd r0,r7
|
||||
1:
|
||||
subd 4,r7
|
||||
movd 0(r7),tos
|
||||
acbd -4,r0,1b
|
||||
movd 59,tos
|
||||
jsr @.mon
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
11
mach/ns/libsys/exit.s
Normal file
11
mach/ns/libsys/exit.s
Normal file
|
@ -0,0 +1,11 @@
|
|||
.define _exit
|
||||
.extern _exit
|
||||
.text
|
||||
_exit:
|
||||
enter[], 0
|
||||
jsr @__cleanup
|
||||
movd 8(fp),tos
|
||||
jsr @__exit
|
||||
adjspd -4
|
||||
exit []
|
||||
ret 0
|
29
mach/ns/libsys/fork.s
Normal file
29
mach/ns/libsys/fork.s
Normal file
|
@ -0,0 +1,29 @@
|
|||
.define _fork
|
||||
.define _par_uid
|
||||
.extern _par_uid
|
||||
.bss
|
||||
_par_uid:.space 4
|
||||
.extern _fork
|
||||
.text
|
||||
_fork:
|
||||
enter[], 0
|
||||
movd 2,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
beq I0011
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0011:
|
||||
cmpqd 0,tos
|
||||
beq I0012
|
||||
movd tos,r7
|
||||
movd r7,@_par_uid
|
||||
movd 0,tos
|
||||
I0012:
|
||||
movd tos,r7
|
||||
movd r7,r4
|
||||
exit []
|
||||
ret 0
|
20
mach/ns/libsys/fstat.s
Normal file
20
mach/ns/libsys/fstat.s
Normal file
|
@ -0,0 +1,20 @@
|
|||
.define _fstat
|
||||
.extern _fstat
|
||||
.text
|
||||
_fstat:
|
||||
enter[], 0
|
||||
movd 12(fp),tos
|
||||
movd 8(fp),tos
|
||||
movd 28,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
bne I0011
|
||||
movd 0,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
10
mach/ns/libsys/ftime.s
Normal file
10
mach/ns/libsys/ftime.s
Normal file
|
@ -0,0 +1,10 @@
|
|||
.define _ftime
|
||||
.extern _ftime
|
||||
.text
|
||||
_ftime:
|
||||
enter[], 0
|
||||
movd 8(fp),tos
|
||||
movd 35,tos
|
||||
jsr @.mon
|
||||
exit []
|
||||
ret 0
|
11
mach/ns/libsys/getegid.s
Normal file
11
mach/ns/libsys/getegid.s
Normal file
|
@ -0,0 +1,11 @@
|
|||
.define _getegid
|
||||
.extern _getegid
|
||||
.text
|
||||
_getegid:
|
||||
enter[], 0
|
||||
movd 47,tos
|
||||
jsr @.mon
|
||||
movd tos,r7
|
||||
movd r7,r4
|
||||
exit []
|
||||
ret 0
|
11
mach/ns/libsys/geteuid.s
Normal file
11
mach/ns/libsys/geteuid.s
Normal file
|
@ -0,0 +1,11 @@
|
|||
.define _geteuid
|
||||
.extern _geteuid
|
||||
.text
|
||||
_geteuid:
|
||||
enter[], 0
|
||||
movd 24,tos
|
||||
jsr @.mon
|
||||
movd tos,r7
|
||||
movd r7,r4
|
||||
exit []
|
||||
ret 0
|
12
mach/ns/libsys/getgid.s
Normal file
12
mach/ns/libsys/getgid.s
Normal file
|
@ -0,0 +1,12 @@
|
|||
.define _getgid
|
||||
.extern _getgid
|
||||
.text
|
||||
_getgid:
|
||||
enter[], 0
|
||||
movd 47,tos
|
||||
jsr @.mon
|
||||
adjspd -4
|
||||
movd tos,r7
|
||||
movd r7,r4
|
||||
exit []
|
||||
ret 0
|
11
mach/ns/libsys/getpid.s
Normal file
11
mach/ns/libsys/getpid.s
Normal file
|
@ -0,0 +1,11 @@
|
|||
.define _getpid
|
||||
.extern _getpid
|
||||
.text
|
||||
_getpid:
|
||||
enter[], 0
|
||||
movd 20,tos
|
||||
jsr @.mon
|
||||
movd tos,r7
|
||||
movd r7,r4
|
||||
exit []
|
||||
ret 0
|
12
mach/ns/libsys/getuid.s
Normal file
12
mach/ns/libsys/getuid.s
Normal file
|
@ -0,0 +1,12 @@
|
|||
.define _getuid
|
||||
.extern _getuid
|
||||
.text
|
||||
_getuid:
|
||||
enter[], 0
|
||||
movd 24,tos
|
||||
jsr @.mon
|
||||
adjspd -4
|
||||
movd tos,r7
|
||||
movd r7,r4
|
||||
exit []
|
||||
ret 0
|
12
mach/ns/libsys/gtty.s
Normal file
12
mach/ns/libsys/gtty.s
Normal file
|
@ -0,0 +1,12 @@
|
|||
.define _gtty
|
||||
.extern _gtty
|
||||
.text
|
||||
_gtty:
|
||||
enter[], 0
|
||||
movd 12(fp),tos
|
||||
movd 29704,tos
|
||||
movd 8(fp),tos
|
||||
jsr @_ioctl
|
||||
adjspd -12
|
||||
exit []
|
||||
ret 0
|
25
mach/ns/libsys/ioctl.s
Normal file
25
mach/ns/libsys/ioctl.s
Normal file
|
@ -0,0 +1,25 @@
|
|||
.define _ioctl
|
||||
.extern _ioctl
|
||||
.text
|
||||
_ioctl:
|
||||
enter[], 0
|
||||
addr 8(fp),r7
|
||||
movd 12,r0
|
||||
addd r0,r7
|
||||
1:
|
||||
subd 4,r7
|
||||
movd 0(r7),tos
|
||||
acbd -4,r0,1b
|
||||
movd 54,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
bne I0011
|
||||
movd 0,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
20
mach/ns/libsys/kill.s
Normal file
20
mach/ns/libsys/kill.s
Normal file
|
@ -0,0 +1,20 @@
|
|||
.define _kill
|
||||
.extern _kill
|
||||
.text
|
||||
_kill:
|
||||
enter[], 0
|
||||
movd 12(fp),tos
|
||||
movd 8(fp),tos
|
||||
movd 37,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
bne I0011
|
||||
movd 0,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
20
mach/ns/libsys/link.s
Normal file
20
mach/ns/libsys/link.s
Normal file
|
@ -0,0 +1,20 @@
|
|||
.define _link
|
||||
.extern _link
|
||||
.text
|
||||
_link:
|
||||
enter[], 0
|
||||
movd 12(fp),tos
|
||||
movd 8(fp),tos
|
||||
movd 9,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
bne I0011
|
||||
movd 0,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
19
mach/ns/libsys/lock.s
Normal file
19
mach/ns/libsys/lock.s
Normal file
|
@ -0,0 +1,19 @@
|
|||
.define _lock
|
||||
.extern _lock
|
||||
.text
|
||||
_lock:
|
||||
enter[], 0
|
||||
movd 8(fp),tos
|
||||
movd 53,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
bne I0011
|
||||
movd 0,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
24
mach/ns/libsys/lseek.s
Normal file
24
mach/ns/libsys/lseek.s
Normal file
|
@ -0,0 +1,24 @@
|
|||
.define _lseek
|
||||
.extern _lseek
|
||||
.text
|
||||
_lseek:
|
||||
enter[], 0
|
||||
addr 8(fp),r7
|
||||
movd 16,r0
|
||||
addd r0,r7
|
||||
1:
|
||||
subd 4,r7
|
||||
movd 0(r7),tos
|
||||
acbd -4,r0,1b
|
||||
movd 19,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
beq I0011
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,tos
|
||||
I0011:
|
||||
movd tos,r4
|
||||
movd tos,r5
|
||||
exit []
|
||||
ret 0
|
25
mach/ns/libsys/mknod.s
Normal file
25
mach/ns/libsys/mknod.s
Normal file
|
@ -0,0 +1,25 @@
|
|||
.define _mknod
|
||||
.extern _mknod
|
||||
.text
|
||||
_mknod:
|
||||
enter[], 0
|
||||
addr 8(fp),r7
|
||||
movd 12,r0
|
||||
addd r0,r7
|
||||
1:
|
||||
subd 4,r7
|
||||
movd 0(r7),tos
|
||||
acbd -4,r0,1b
|
||||
movd 14,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
bne I0011
|
||||
movd 0,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
25
mach/ns/libsys/mount.s
Normal file
25
mach/ns/libsys/mount.s
Normal file
|
@ -0,0 +1,25 @@
|
|||
.define _mount
|
||||
.extern _mount
|
||||
.text
|
||||
_mount:
|
||||
enter[], 0
|
||||
addr 8(fp),r7
|
||||
movd 12,r0
|
||||
addd r0,r7
|
||||
1:
|
||||
subd 4,r7
|
||||
movd 0(r7),tos
|
||||
acbd -4,r0,1b
|
||||
movd 21,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
bne I0011
|
||||
movd 0,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
20
mach/ns/libsys/mpxcall.s
Normal file
20
mach/ns/libsys/mpxcall.s
Normal file
|
@ -0,0 +1,20 @@
|
|||
.define _mpxcall
|
||||
.extern _mpxcall
|
||||
.text
|
||||
_mpxcall:
|
||||
enter[], 0
|
||||
movd 12(fp),tos
|
||||
movd 8(fp),tos
|
||||
movd 56,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
bne I0011
|
||||
movd 0,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
10
mach/ns/libsys/nice.s
Normal file
10
mach/ns/libsys/nice.s
Normal file
|
@ -0,0 +1,10 @@
|
|||
.define _nice
|
||||
.extern _nice
|
||||
.text
|
||||
_nice:
|
||||
enter[], 0
|
||||
movd 8(fp),tos
|
||||
movd 34,tos
|
||||
jsr @.mon
|
||||
exit []
|
||||
ret 0
|
19
mach/ns/libsys/open.s
Normal file
19
mach/ns/libsys/open.s
Normal file
|
@ -0,0 +1,19 @@
|
|||
.define _open
|
||||
.extern _open
|
||||
.text
|
||||
_open:
|
||||
enter[], 0
|
||||
movd 12(fp),tos
|
||||
movd 8(fp),tos
|
||||
movd 5,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
beq I0011
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,tos
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,r4
|
||||
exit []
|
||||
ret 0
|
9
mach/ns/libsys/pause.s
Normal file
9
mach/ns/libsys/pause.s
Normal file
|
@ -0,0 +1,9 @@
|
|||
.define _pause
|
||||
.extern _pause
|
||||
.text
|
||||
_pause:
|
||||
enter[], 0
|
||||
movd 29,tos
|
||||
jsr @.mon
|
||||
exit []
|
||||
ret 0
|
23
mach/ns/libsys/pipe.s
Normal file
23
mach/ns/libsys/pipe.s
Normal file
|
@ -0,0 +1,23 @@
|
|||
.define _pipe
|
||||
.extern _pipe
|
||||
.text
|
||||
_pipe:
|
||||
enter[], 0
|
||||
movd 42,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
beq I0011
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0011:
|
||||
movd 8(fp),r7
|
||||
movd tos,r6
|
||||
movd r6,4(r7)
|
||||
movd tos,r6
|
||||
movd r6,0(8(fp))
|
||||
movd 0,r4
|
||||
exit []
|
||||
ret 0
|
16
mach/ns/libsys/prof.s
Normal file
16
mach/ns/libsys/prof.s
Normal file
|
@ -0,0 +1,16 @@
|
|||
.define _profil
|
||||
.extern _profil
|
||||
.text
|
||||
_profil:
|
||||
enter[], 0
|
||||
addr 8(fp),r7
|
||||
movd 16,r0
|
||||
addd r0,r7
|
||||
1:
|
||||
subd 4,r7
|
||||
movd 0(r7),tos
|
||||
acbd -4,r0,1b
|
||||
movd 44,tos
|
||||
jsr @.mon
|
||||
exit []
|
||||
ret 0
|
25
mach/ns/libsys/ptrace.s
Normal file
25
mach/ns/libsys/ptrace.s
Normal file
|
@ -0,0 +1,25 @@
|
|||
.define _ptrace
|
||||
.extern _ptrace
|
||||
.text
|
||||
_ptrace:
|
||||
enter[], 0
|
||||
xord @_errno,@_errno
|
||||
addr 8(fp),r7
|
||||
movd 16,r0
|
||||
addd r0,r7
|
||||
1:
|
||||
subd 4,r7
|
||||
movd 0(r7),tos
|
||||
acbd -4,r0,1b
|
||||
movd 26,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
beq I0011
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,tos
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,r4
|
||||
exit []
|
||||
ret 0
|
15
mach/ns/libsys/read.s
Normal file
15
mach/ns/libsys/read.s
Normal file
|
@ -0,0 +1,15 @@
|
|||
.define _read
|
||||
.extern _read
|
||||
.text
|
||||
_read:
|
||||
enter[], 0
|
||||
save [r0,r1,r2,r3]
|
||||
movd 3,r0
|
||||
movd 12(fp),r1
|
||||
movd 16(fp),r2
|
||||
movd 0,r3
|
||||
svc
|
||||
movd 16(fp),r4
|
||||
restore [r0,r1,r2,r3]
|
||||
exit[]
|
||||
ret 0
|
11
mach/ns/libsys/sbrk.s
Normal file
11
mach/ns/libsys/sbrk.s
Normal file
|
@ -0,0 +1,11 @@
|
|||
.define _sbrk
|
||||
.extern _sbrk
|
||||
.text
|
||||
_sbrk:
|
||||
enter[], 0
|
||||
movd @.reghp,r7
|
||||
addd 8(fp),r7
|
||||
movd r7,@.reghp
|
||||
movd @.reghp,r4
|
||||
exit []
|
||||
ret 0
|
19
mach/ns/libsys/setgid.s
Normal file
19
mach/ns/libsys/setgid.s
Normal file
|
@ -0,0 +1,19 @@
|
|||
.define _setgid
|
||||
.extern _setgid
|
||||
.text
|
||||
_setgid:
|
||||
enter[], 0
|
||||
movd 8(fp),tos
|
||||
movd 46,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
bne I0011
|
||||
movd 0,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
39
mach/ns/libsys/setsig.s
Normal file
39
mach/ns/libsys/setsig.s
Normal file
|
@ -0,0 +1,39 @@
|
|||
.define __setsig
|
||||
.bss
|
||||
_save:.space 4
|
||||
_trf:.space 4
|
||||
.extern __setsig
|
||||
.text
|
||||
__setsig:
|
||||
enter[], 0
|
||||
movd 8(fp),@_trf
|
||||
movd @.trpreg,r0
|
||||
movd _catchit,@.trpreg
|
||||
movd r0,@_save
|
||||
exit []
|
||||
ret 0
|
||||
_catchit:
|
||||
enter[], 0
|
||||
movd @.trpreg,r0
|
||||
movd _catchit,@.trpreg
|
||||
movd r0,tos
|
||||
adjspd -4
|
||||
movd @_trf,r7
|
||||
movd 8(fp),tos
|
||||
jsr r7
|
||||
cmpqd 0,r4
|
||||
bne I0021
|
||||
movd @.trpreg,r0
|
||||
movd @_save,@.trpreg
|
||||
movd r0,tos
|
||||
adjspd -4
|
||||
jsr @.trp
|
||||
movd @.trpreg,r0
|
||||
movd _catchit,@.trpreg
|
||||
movd r0,tos
|
||||
adjspd -4
|
||||
movd tos,r7
|
||||
movd r7,@_save
|
||||
I0021:
|
||||
exit []
|
||||
ret 0
|
19
mach/ns/libsys/setuid.s
Normal file
19
mach/ns/libsys/setuid.s
Normal file
|
@ -0,0 +1,19 @@
|
|||
.define _setuid
|
||||
.extern _setuid
|
||||
.text
|
||||
_setuid:
|
||||
enter[], 0
|
||||
movd 8(fp),tos
|
||||
movd 23,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
bne I0011
|
||||
movd 0,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
159
mach/ns/libsys/signal.s
Normal file
159
mach/ns/libsys/signal.s
Normal file
|
@ -0,0 +1,159 @@
|
|||
.define _signal
|
||||
.data
|
||||
_vector:
|
||||
.long 0
|
||||
.long 0
|
||||
.long 0
|
||||
.long 0
|
||||
.long 0
|
||||
.long 0
|
||||
.long 0
|
||||
.long 0
|
||||
.long 0
|
||||
.long 0
|
||||
.long 0
|
||||
.long 0
|
||||
.long 0
|
||||
.long 0
|
||||
.long 0
|
||||
.long 0
|
||||
_mapvec:
|
||||
.long 0
|
||||
.long 134219784
|
||||
.long 2048
|
||||
.long 0
|
||||
.long 2827
|
||||
.long 658176
|
||||
.long 3072
|
||||
firsttim:
|
||||
.extern _signal
|
||||
.long 1
|
||||
.text
|
||||
_signal:
|
||||
enter[], 16
|
||||
movd 8(fp),r7
|
||||
addd -1,r7
|
||||
movd r7,-4(fp)
|
||||
cmpqd 0,-4(fp)
|
||||
bgt I0014
|
||||
cmpd -4(fp),16
|
||||
blt I0013
|
||||
I0014:
|
||||
movd -1,tos
|
||||
br I0011
|
||||
I0013:
|
||||
cmpqd 0,@firsttim
|
||||
beq I0015
|
||||
xord @firsttim,@firsttim
|
||||
movd catchtrp,tos
|
||||
jsr @__setsig
|
||||
adjspd -4
|
||||
I0015:
|
||||
movd -4(fp),r7
|
||||
ashd 2,r7
|
||||
movd _vector(r7),-12(fp)
|
||||
cmpd -12(fp),12(fp)
|
||||
beq I0016
|
||||
movd -4(fp),r7
|
||||
ashd 2,r7
|
||||
movd 12(fp),_vector(r7)
|
||||
cmpd 12(fp),1
|
||||
bne I0017
|
||||
movd -3,-16(fp)
|
||||
br I0018
|
||||
I0017:
|
||||
cmpqd 0,12(fp)
|
||||
bne I0019
|
||||
movd -2,-16(fp)
|
||||
br I0018
|
||||
I0019:
|
||||
addr 128(8(fp)),-16(fp)
|
||||
I0018:
|
||||
movd 8(fp),tos
|
||||
movd -16(fp),tos
|
||||
jsr @_sigtrp
|
||||
adjspd -8
|
||||
cmpd r4,-1
|
||||
bne I0016
|
||||
movd -1,tos
|
||||
br I0011
|
||||
I0016:
|
||||
movd -12(fp),tos
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,r4
|
||||
exit []
|
||||
ret 0
|
||||
catchtrp:
|
||||
enter[], 0
|
||||
cmpd 8(fp),128
|
||||
ble I0023
|
||||
cmpd 8(fp),144
|
||||
bgt I0023
|
||||
movd 8(fp),r7
|
||||
subd 128,r7
|
||||
movd r7,tos
|
||||
jsr @procesig
|
||||
adjspd -4
|
||||
movd r4,tos
|
||||
br I0021
|
||||
I0023:
|
||||
cmpqd 0,8(fp)
|
||||
bgt I0024
|
||||
cmpd 8(fp),28
|
||||
bge I0024
|
||||
movd _mapvec,r7
|
||||
addd 8(fp),r7
|
||||
movzbd 0(r7),r6
|
||||
cmpqd 0,r6
|
||||
beq I0024
|
||||
movd _mapvec,r7
|
||||
addd 8(fp),r7
|
||||
movzbd 0(r7),tos
|
||||
jsr @procesig
|
||||
adjspd -4
|
||||
movd r4,tos
|
||||
br I0021
|
||||
I0024:
|
||||
movd 0,tos
|
||||
I0021:
|
||||
movd tos,r7
|
||||
movd r7,r4
|
||||
exit []
|
||||
ret 0
|
||||
procesig:
|
||||
enter[], 8
|
||||
movd 8(fp),r7
|
||||
addd -1,r7
|
||||
movd r7,-4(fp)
|
||||
movd -4(fp),r6
|
||||
ashd 2,r6
|
||||
movd _vector(r6),-8(fp)
|
||||
cmpd -8(fp),1
|
||||
bne I0033
|
||||
movd 1,tos
|
||||
br I0031
|
||||
I0033:
|
||||
cmpd 8(fp),4
|
||||
beq I0034
|
||||
cmpd 8(fp),5
|
||||
beq I0034
|
||||
movd -4(fp),r7
|
||||
ashd 2,r7
|
||||
movd 1,_vector(r7)
|
||||
I0034:
|
||||
cmpqd 0,-8(fp)
|
||||
bne I0035
|
||||
movd 0,tos
|
||||
br I0031
|
||||
I0035:
|
||||
movd -8(fp),r7
|
||||
movd 8(fp),tos
|
||||
jsr r7
|
||||
adjspd -4
|
||||
movd 1,tos
|
||||
I0031:
|
||||
movd tos,r7
|
||||
movd r7,r4
|
||||
exit []
|
||||
ret 0
|
19
mach/ns/libsys/sigtrp.s
Normal file
19
mach/ns/libsys/sigtrp.s
Normal file
|
@ -0,0 +1,19 @@
|
|||
.define _sigtrp
|
||||
.extern _sigtrp
|
||||
.text
|
||||
_sigtrp:
|
||||
enter[], 0
|
||||
movd 12(fp),tos
|
||||
movd 8(fp),tos
|
||||
movd 48,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
beq I0011
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,tos
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,r4
|
||||
exit []
|
||||
ret 0
|
20
mach/ns/libsys/stat.s
Normal file
20
mach/ns/libsys/stat.s
Normal file
|
@ -0,0 +1,20 @@
|
|||
.define _stat
|
||||
.extern _stat
|
||||
.text
|
||||
_stat:
|
||||
enter[], 0
|
||||
movd 12(fp),tos
|
||||
movd 8(fp),tos
|
||||
movd 18,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
bne I0011
|
||||
movd 0,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
19
mach/ns/libsys/stime.s
Normal file
19
mach/ns/libsys/stime.s
Normal file
|
@ -0,0 +1,19 @@
|
|||
.define _stime
|
||||
.extern _stime
|
||||
.text
|
||||
_stime:
|
||||
enter[], 0
|
||||
movd 0(8(fp)),tos
|
||||
movd 25,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
bne I0011
|
||||
movd 0,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
12
mach/ns/libsys/stty.s
Normal file
12
mach/ns/libsys/stty.s
Normal file
|
@ -0,0 +1,12 @@
|
|||
.define _stty
|
||||
.extern _stty
|
||||
.text
|
||||
_stty:
|
||||
enter[], 0
|
||||
movd 12(fp),tos
|
||||
movd 29705,tos
|
||||
movd 8(fp),tos
|
||||
jsr @_ioctl
|
||||
adjspd -12
|
||||
exit []
|
||||
ret 0
|
9
mach/ns/libsys/sync.s
Normal file
9
mach/ns/libsys/sync.s
Normal file
|
@ -0,0 +1,9 @@
|
|||
.define _sync
|
||||
.extern _sync
|
||||
.text
|
||||
_sync:
|
||||
enter[], 0
|
||||
movd 36,tos
|
||||
jsr @.mon
|
||||
exit []
|
||||
ret 0
|
12
mach/ns/libsys/tell.s
Normal file
12
mach/ns/libsys/tell.s
Normal file
|
@ -0,0 +1,12 @@
|
|||
.define _tell
|
||||
.extern _tell
|
||||
.text
|
||||
_tell:
|
||||
enter[], 0
|
||||
movd 1,tos
|
||||
movd 0,tos
|
||||
movd 8(fp),tos
|
||||
jsr @_lseek
|
||||
adjspd -12
|
||||
exit []
|
||||
ret 0
|
15
mach/ns/libsys/time.s
Normal file
15
mach/ns/libsys/time.s
Normal file
|
@ -0,0 +1,15 @@
|
|||
.define _time
|
||||
.extern _time
|
||||
.text
|
||||
_time:
|
||||
enter[], 12
|
||||
addr -12(fp),tos
|
||||
jsr @_ftime
|
||||
adjspd -4
|
||||
cmpqd 0,8(fp)
|
||||
beq I0013
|
||||
movd -12(fp),0(8(fp))
|
||||
I0013:
|
||||
movd -12(fp),r4
|
||||
exit []
|
||||
ret 0
|
10
mach/ns/libsys/times.s
Normal file
10
mach/ns/libsys/times.s
Normal file
|
@ -0,0 +1,10 @@
|
|||
.define _times
|
||||
.extern _times
|
||||
.text
|
||||
_times:
|
||||
enter[], 0
|
||||
movd 8(fp),tos
|
||||
movd 43,tos
|
||||
jsr @.mon
|
||||
exit []
|
||||
ret 0
|
12
mach/ns/libsys/umask.s
Normal file
12
mach/ns/libsys/umask.s
Normal file
|
@ -0,0 +1,12 @@
|
|||
.define _umask
|
||||
.extern _umask
|
||||
.text
|
||||
_umask:
|
||||
enter[], 0
|
||||
movd 8(fp),tos
|
||||
movd 60,tos
|
||||
jsr @.mon
|
||||
movd tos,r7
|
||||
movd r7,r4
|
||||
exit []
|
||||
ret 0
|
19
mach/ns/libsys/umount.s
Normal file
19
mach/ns/libsys/umount.s
Normal file
|
@ -0,0 +1,19 @@
|
|||
.define _umount
|
||||
.extern _umount
|
||||
.text
|
||||
_umount:
|
||||
enter[], 0
|
||||
movd 8(fp),tos
|
||||
movd 22,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
bne I0011
|
||||
movd 0,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
19
mach/ns/libsys/unlink.s
Normal file
19
mach/ns/libsys/unlink.s
Normal file
|
@ -0,0 +1,19 @@
|
|||
.define _unlink
|
||||
.extern _unlink
|
||||
.text
|
||||
_unlink:
|
||||
enter[], 0
|
||||
movd 8(fp),tos
|
||||
movd 10,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
bne I0011
|
||||
movd 0,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
20
mach/ns/libsys/utime.s
Normal file
20
mach/ns/libsys/utime.s
Normal file
|
@ -0,0 +1,20 @@
|
|||
.define _utime
|
||||
.extern _utime
|
||||
.text
|
||||
_utime:
|
||||
enter[], 0
|
||||
movd 12(fp),tos
|
||||
movd 8(fp),tos
|
||||
movd 30,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
bne I0011
|
||||
movd 0,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
29
mach/ns/libsys/wait.s
Normal file
29
mach/ns/libsys/wait.s
Normal file
|
@ -0,0 +1,29 @@
|
|||
.define _wait
|
||||
.extern _wait
|
||||
.text
|
||||
_wait:
|
||||
enter[], 0
|
||||
movd 7,tos
|
||||
jsr @.mon
|
||||
cmpqd 0,tos
|
||||
bne I0011
|
||||
cmpqd 0,8(fp)
|
||||
beq I0012
|
||||
movd tos,r7
|
||||
movd r7,0(8(fp))
|
||||
movd tos,r6
|
||||
movd r6,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0012:
|
||||
adjspd -4
|
||||
movd tos,r7
|
||||
movd r7,r4
|
||||
exit []
|
||||
ret 0
|
||||
I0011:
|
||||
movd tos,r7
|
||||
movd r7,@_errno
|
||||
movd -1,r4
|
||||
exit []
|
||||
ret 0
|
15
mach/ns/libsys/write.s
Normal file
15
mach/ns/libsys/write.s
Normal file
|
@ -0,0 +1,15 @@
|
|||
.define _write
|
||||
.extern _write
|
||||
.text
|
||||
_write:
|
||||
enter[], 0
|
||||
save [r0,r1,r2,r3]
|
||||
movd 4,r0
|
||||
movd 12(fp),r1
|
||||
movd 16(fp),r2
|
||||
movd 0,r3
|
||||
svc
|
||||
movd 16(fp),r4
|
||||
restore [r0,r1,r2,r3]
|
||||
exit[]
|
||||
ret 0
|
Loading…
Reference in a new issue