d0p1/ack
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

*** empty log message ***

Browse source
This commit is contained in:
keie 1985-02-07 22:59:50 +00:00
parent c0085c2dd4
commit 0122bc2dd7
36 changed files with 435 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

36
mach/pmds4/libsys/LIST Normal file
View file

@ -0,0 +1,36 @@
tail_mon
chmod.s
close.s
creat.s
exec.s
fork.s
fstat.s
getgid.s
getpid.s
getuid.s
ioctl.s
kill.s
link.s
lseek.s
open.s
pipe.s
read.s
sbrk.s
stat.s
unlink.s
wait.s
write.s
cerror.s
access.s
alarm.s
chown.s
dup.s
mknod.s
mount.s
nice.s
profil.s
signal.s
exit1.s
exit2.s
time.s
cleanup.s

10
mach/pmds4/libsys/access.s Normal file
View file

@ -0,0 +1,10 @@
.define _access
.extern _access
rts
_access: trap #0
.short 0x21
bcc 1f
jmp cerror
1:
clr.l d0
rts

6
mach/pmds4/libsys/alarm.s Normal file
View file

@ -0,0 +1,6 @@
.define _alarm
.extern _alarm
.text
_alarm: trap #0
.short 0x1B
rts

9
mach/pmds4/libsys/cerror.s Normal file
View file

@ -0,0 +1,9 @@
.define cerror
.extern cerror
cerror: move.l d0,_errno
move.l #-1,d0
rts
.bss
_errno:
.space 4
.text

9
mach/pmds4/libsys/chmod.s Normal file
View file

@ -0,0 +1,9 @@
.define _chmod
.extern _chmod
_chmod: trap #0
.short 0xF
bcc 1f
jmp cerror
1:
clr.l d0
rts

10
mach/pmds4/libsys/chown.s Normal file
View file

@ -0,0 +1,10 @@
.define _chown
.extern _chown
.text
_chown: trap #0
.short 0x10
bcc 1f
jmp cerror
1:
clr.l d0
rts

5
mach/pmds4/libsys/cleanup.s Normal file
View file

@ -0,0 +1,5 @@
.define __cleanup
.extern __cleanup
.text
__cleanup:
rts

9
mach/pmds4/libsys/close.s Normal file
View file

@ -0,0 +1,9 @@
.define _close
.extern _close
_close: trap #0
.short 0x6
bcc 1f
jmp cerror
1:
clr.l d0
rts

8
mach/pmds4/libsys/creat.s Normal file
View file

@ -0,0 +1,8 @@
.define _creat
.extern _creat
_creat: trap #0
.short 0x8
bcc 1f
jmp cerror
1:
rts

13
mach/pmds4/libsys/dup.s Normal file
View file

@ -0,0 +1,13 @@
.define _dup
.define _dup2
.extern _dup
.text
.extern _dup2
_dup2: or.l #64,4(sp)
_dup: trap #0
.short 0x29
bcc 1f
jmp cerror
1:
rts

13
mach/pmds4/libsys/exec.s Normal file
View file

@ -0,0 +1,13 @@
.define _execl
.define _execve
.extern _execl
.extern _execve
_execl: tst.b -48(sp)
link a6,#0
move.l _environ,-(sp)
pea 12(a6)
move.l 8(a6),-(sp)
jsr _execve
_execve: trap #0
.short 59
jmp cerror

12
mach/pmds4/libsys/exit1.s Normal file
View file

@ -0,0 +1,12 @@
.define _exit
.extern _exit
.text
_exit:
tst.b -40(sp)
link a6,#-0
jsr __cleanup
move.l 8(a6),-(sp)
jsr __exit
add.l #4,sp
unlk a6
rts

4
mach/pmds4/libsys/exit2.s Normal file
View file

@ -0,0 +1,4 @@
.define __exit
.extern __exit
__exit: trap #0
.short 0x1

11
mach/pmds4/libsys/fork.s Normal file
View file

@ -0,0 +1,11 @@
.define _fork
.extern _fork
_fork: trap #0
.short 0x2
bra 1f
bcc 2f
jmp cerror
2:
clr.l d0
1:
rts

9
mach/pmds4/libsys/fstat.s Normal file
View file

@ -0,0 +1,9 @@
.define _fstat
.extern _fstat
_fstat: trap #0
.short 0x1C
bcc 1f
jmp cerror
1:
clr.l d0
rts

12
mach/pmds4/libsys/getgid.s Normal file
View file

@ -0,0 +1,12 @@
.define _getgid
.define _getegid
.extern _getgid
.extern _getegid
_getgid: trap #0
.short 0x2F
rts
_getegid: trap #0
.short 0x2F
move.l d1,d0
rts

5
mach/pmds4/libsys/getpid.s Normal file
View file

@ -0,0 +1,5 @@
.define _getpid
.extern _getpid
_getpid: trap #0
.short 0x14
rts

12
mach/pmds4/libsys/getuid.s Normal file
View file

@ -0,0 +1,12 @@
.define _getuid
.define _geteuid
.extern _getuid
.extern _geteuid
_getuid: trap #0
.short 0x18
rts
_geteuid: trap #0
.short 0x18
move.l d1,d0
rts

9
mach/pmds4/libsys/ioctl.s Normal file
View file

@ -0,0 +1,9 @@
.define _ioctl
.extern _ioctl
_ioctl: trap #0
.short 0x36
bcc 1f
jmp cerror
1:
clr.l d0
rts

9
mach/pmds4/libsys/kill.s Normal file
View file

@ -0,0 +1,9 @@
.define _kill
.extern _kill
_kill: trap #0
.short 0x25
bcc 1f
jmp cerror
1:
clr.l d0
rts

9
mach/pmds4/libsys/link.s Normal file
View file

@ -0,0 +1,9 @@
.define _link
.extern _link
_link: trap #0
.short 0x9
bcc 1f
jmp cerror
1:
clr.l d0
rts

8
mach/pmds4/libsys/lseek.s Normal file
View file

@ -0,0 +1,8 @@
.define _lseek
.extern _lseek
_lseek: trap #0
.short 0x13
bcc 1f
jmp cerror
1:
rts

10
mach/pmds4/libsys/mknod.s Normal file
View file

@ -0,0 +1,10 @@
.define _mknod
.extern _mknod
.text
_mknod: trap #0
.short 0xE
bcc 1f
jmp cerror
1:
clr.l d0
rts

10
mach/pmds4/libsys/mount.s Normal file
View file

@ -0,0 +1,10 @@
.define _mount
.extern _mount
.text
_mount: trap #0
.short 0x15
bcc 1f
jmp cerror
1:
clr.l d0
rts

10
mach/pmds4/libsys/nice.s Normal file
View file

@ -0,0 +1,10 @@
.define _nice
.extern _nice
.text
_nice: trap #0
.short 0x22
bcc 1f
jmp cerror
1:
clr.l d0
rts

8
mach/pmds4/libsys/open.s Normal file
View file

@ -0,0 +1,8 @@
.define _open
.extern _open
_open: trap #0
.short 0x5
bcc 1f
jmp cerror
1:
rts

12
mach/pmds4/libsys/pipe.s Normal file
View file

@ -0,0 +1,12 @@
.define _pipe
.extern _pipe
_pipe: trap #0
.short 0x2A
bcc 1f
jmp cerror
1:
move.l 4(sp),a0
move.l d0,(a0)+
move.l d1,(a0)
clr.l d0
rts

6
mach/pmds4/libsys/profil.s Normal file
View file

@ -0,0 +1,6 @@
.define _profil
.extern _profil
.text
_profil: trap #0
.short 0x2C
rts

8
mach/pmds4/libsys/read.s Normal file
View file

@ -0,0 +1,8 @@
.define _read
.extern _read
_read: trap #0
.short 0x3
bcc 1f
jmp cerror
1:
rts

31
mach/pmds4/libsys/sbrk.s Normal file
View file

@ -0,0 +1,31 @@
.define _sbrk
.define _brk
.extern _sbrk
.extern _brk
_sbrk: tst.b -8(sp)
move.l 4(sp),d0
beq 1f
add.l nd,d0
move.l d0,-(sp)
clr.l -(sp)
trap #0
.short 0x11
add.l #8,sp
bcc 1f
jmp cerror
1:
move.l nd,d0
move.l 4(sp),d1
add.l d1,nd
rts
_brk: trap #0
.short 0x11
bcc 1f
jmp cerror
1:
move.l 4(sp),nd
clr.l d0
rts
.data
nd: .long endbss
.text

52
mach/pmds4/libsys/signal.s Normal file
View file

@ -0,0 +1,52 @@
.define _signal
.extern _signal
NSIG=32
_signal:
move.w 4(sp), d0
ext.l d0
cmp.l #NSIG,d0
bcc 1f
move.l 6(sp),d1
move.l d0,a0
add.l a0,a0
add.l a0,a0
add.l #dvect,a0
move.l (a0),a1
move.l d1,(a0)
beq 2f
btst #0,d1
bne 2f
move.l #enter,d1
2:
move.l d1,-(sp)
move.l d0,-(sp)
clr.l -(sp)
trap #0
.short 48
add.l #12,sp
bcs 3f
btst #0,d0
bne 4f
move.l a1,d0
4:
rts
1:
move.l #22,d0
3:
jmp cerror
enter:
movem.l d0/d1/a0/a1,-(sp)
move.l 16(sp),a0
move.l a0,-(sp)
add.l a0,a0
add.l a0,a0
add.l #dvect,a0
move.l (a0),a0
jsr (a0)
add.l #4,sp
movem.l (sp)+,d0/d1/a0/a1
add.l #4,sp
rtr
.bss
dvect: .space 4*NSIG

9
mach/pmds4/libsys/stat.s Normal file
View file

@ -0,0 +1,9 @@
.define _stat
.extern _stat
_stat: trap #0
.short 0x12
bcc 1f
jmp cerror
1:
clr.l d0
rts

21
mach/pmds4/libsys/time.s Normal file
View file

@ -0,0 +1,21 @@
.define _time
.define _ftime
.extern _time
_time:
trap #0
.short 0xD
tst.l 4(sp)
beq 1f
move.l 4(sp),a0
move.l d0,(a0)
1:
rts
.extern _ftime
_ftime:
trap #0
.short 0x23
bcc 1f
jmp cerror
1:
clr.l d0
rts

9
mach/pmds4/libsys/unlink.s Normal file
View file

@ -0,0 +1,9 @@
.define _unlink
.extern _unlink
_unlink: trap #0
.short 0xA
bcc 1f
jmp cerror
1:
clr.l d0
rts

13
mach/pmds4/libsys/wait.s Normal file
View file

@ -0,0 +1,13 @@
.define _wait
.extern _wait
_wait: trap #0
.short 0x7
bcc 1f
jmp cerror
1:
tst.l 4(sp)
beq 2f
move.l 4(sp),a0
move.l d1,(a0)
2:
rts

8
mach/pmds4/libsys/write.s Normal file
View file

@ -0,0 +1,8 @@
.define _write
.extern _write
_write: trap #0
.short 0x4
bcc 1f
jmp cerror
1:
rts