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

added new routines for ansi

Browse source
This commit is contained in:
eck 1990-01-22 11:14:56 +00:00
parent 90819543f6
commit 68e198f375
27 changed files with 369 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

26
mach/m68k4/libsys/LIST
View file

@ -4,40 +4,60 @@ _exit.s
access.s
acct.s
alarm.s
_alarm.s
chdir.s
chmod.s
chown.s
chroot.s
close.s
_close.s
creat.s
_creat.s
dup.s
_dup.s
dup2.s
_dup2.s
execle.s
execl.s
_execl.s
execv.s
execve.s
_execve.s
fork.s
_fork.s
ftime.s
_ftime.s
getegid.s
getgid.s
getpid.s
_getpid.s
getuid.s
stty.s
_stty.s
gtty.s
_gtty.s
ioctl.s
_ioctl.s
kill.s
_kill.s
link.s
_link.s
lock.s
lseek.s
_lseek.s
mknod.s
mount.s
nice.s
open.s
_open.s
pause.s
_pause.s
pipe.s
_pipe.s
profil.s
ptrace.s
read.s
_read.s
setgid.s
setuid.s
stat.s
@ -45,14 +65,20 @@ stime.s
sync.s
time.s
times.s
_times.s
umask.s
umount.s
unlink.s
_unlink.s
utime.s
write.s
_write.s
brk.s
_brk.s
wait.s
_wait.s
fstat.s
_fstat.s
signal.s
call.s
cleanup.s

12
mach/m68k4/libsys/_alarm.s Normal file
View file

@ -0,0 +1,12 @@
.define __alarm
.extern __alarm
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__alarm: clr.l d0
move.l 4(sp),a0
move.w #0x1B,d0
trap #0
rts

31
mach/m68k4/libsys/_brk.s Normal file
View file

@ -0,0 +1,31 @@
.define __brk
.define __sbrk
.extern __brk
.extern __sbrk
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__sbrk: move.l nd,a0
add.l 4(sp),a0
move.w #0x11,d0
trap #0
bcs lcerror
move.l nd,d0
move.l d0,a0
add.l 4(sp),a0
move.l a0,nd
rts
lcerror: jmp cerror
__brk: move.w #0x11,d0
move.l 4(sp),a0
trap #0
bcs lcerror
move.l 4(sp),nd
clr.l d0
rts
.sect .data
nd:
.data4 endbss
.sect .text

10
mach/m68k4/libsys/_close.s Normal file
View file

@ -0,0 +1,10 @@
.define __close
.extern __close
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__close: move.w #0x6,d0
move.l 4(sp),a0
jmp callc

11
mach/m68k4/libsys/_creat.s Normal file
View file

@ -0,0 +1,11 @@
.define __creat
.extern __creat
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__creat: move.w #0x8,d0
move.l 4(sp),a0
move.l 8(sp),d1
jmp call

10
mach/m68k4/libsys/_dup.s Normal file
View file

@ -0,0 +1,10 @@
.define __dup
.extern __dup
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__dup: move.w #0x29,d0
move.l 4(sp),a0
jmp call

12
mach/m68k4/libsys/_dup2.s Normal file
View file

@ -0,0 +1,12 @@
.define __dup2
.extern __dup2
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__dup2: move.w #0x29,d0
move.l 4(sp),a0
move.l 8(sp),d1
add.l #0x40,a0
jmp call

16
mach/m68k4/libsys/_execl.s Normal file
View file

@ -0,0 +1,16 @@
.define __execl
.extern __execl
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__execl: link a6,#0
tst.b -132(sp)
move.l _environ,-(sp)
pea 12(sp)
move.l 8(a6),-(sp)
jsr _execve
add.l #0xC,sp
unlk a6
rts

12
mach/m68k4/libsys/_execve.s Normal file
View file

@ -0,0 +1,12 @@
.define __execve
.extern __execve
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__execve: move.w #0x3B,d0
move.l 4(sp),a0
move.l 8(sp),d1
move.l 12(sp),a1
jmp calle

17
mach/m68k4/libsys/_fork.s Normal file
View file

@ -0,0 +1,17 @@
.define __fork
.extern __fork
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__fork: move.w #0x2,d0
trap #0
bra 1f
bcc 2f
jmp cerror
1:
!move.l d0,p_uid
clr.l d0
2:
rts

11
mach/m68k4/libsys/_fstat.s Normal file
View file

@ -0,0 +1,11 @@
.define __fstat
.extern __fstat
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__fstat: move.w #0x1C,d0
move.l 4(sp),a0
move.l 8(sp),d1
jmp callc

10
mach/m68k4/libsys/_ftime.s Normal file
View file

@ -0,0 +1,10 @@
.define __ftime
.extern __ftime
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__ftime: move.w #0x23,d0
move.l 4(sp),a0
jmp callc

10
mach/m68k4/libsys/_getpid.s Normal file
View file

@ -0,0 +1,10 @@
.define __getpid
.extern __getpid
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__getpid: move.w #0x14,d0
trap #0
rts

17
mach/m68k4/libsys/_gtty.s Normal file
View file

@ -0,0 +1,17 @@
.define __gtty
.extern __gtty
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__gtty:
tst.b -40(sp)
link a6,#-0
move.l 12(a6),-(sp)
move.l #29704,-(sp)
move.l 8(a6),-(sp)
jsr _ioctl
add.l #12,sp
unlk a6
rts

12
mach/m68k4/libsys/_ioctl.s Normal file
View file

@ -0,0 +1,12 @@
.define __ioctl
.extern __ioctl
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__ioctl: move.w #0x36,d0
move.l 4(sp),a0
move.l 8(sp),d1
move.l 12(sp),a1
jmp callc

11
mach/m68k4/libsys/_kill.s Normal file
View file

@ -0,0 +1,11 @@
.define __kill
.extern __kill
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__kill: move.w #0x25,d0
move.l 4(sp),a0
move.l 6(sp),d1
jmp callc

11
mach/m68k4/libsys/_link.s Normal file
View file

@ -0,0 +1,11 @@
.define __link
.extern __link
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__link: move.w #0x9,d0
move.l 4(sp),a0
move.l 8(sp),d1
jmp callc

12
mach/m68k4/libsys/_lseek.s Normal file
View file

@ -0,0 +1,12 @@
.define __lseek
.extern __lseek
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__lseek: move.w #0x13,d0
move.l 4(sp),a0
move.l 8(sp),d1
move.l 12(sp),a1
jmp call

11
mach/m68k4/libsys/_open.s Normal file
View file

@ -0,0 +1,11 @@
.define __open
.extern __open
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__open: move.w #0x5,d0
move.l 4(sp),a0
move.l 8(sp),d1
jmp call

10
mach/m68k4/libsys/_pause.s Normal file
View file

@ -0,0 +1,10 @@
.define __pause
.extern __pause
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__pause: move.w #0x1D,d0
trap #0
rts

18
mach/m68k4/libsys/_pipe.s Normal file
View file

@ -0,0 +1,18 @@
.define __pipe
.extern __pipe
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__pipe:
move.w #0x2A,d0
trap #0
bcc 1f
jmp cerror
1:
move.l 4(sp),a0
move.l d0,(a0)+
move.l d1,(a0)
clr.l d0
rts

12
mach/m68k4/libsys/_read.s Normal file
View file

@ -0,0 +1,12 @@
.define __read
.extern __read
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__read: move.w #0x3,d0
move.l 4(sp),a0
move.l 8(sp),d1
move.l 12(sp),a1
jmp call

17
mach/m68k4/libsys/_stty.s Normal file
View file

@ -0,0 +1,17 @@
.define __stty
.extern __stty
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__stty:
tst.b -40(sp)
link a6,#-0
move.l 12(a6),-(sp)
move.l #29705,-(sp)
move.l 8(a6),-(sp)
jsr _ioctl
add.l #12,sp
unlk a6
rts

11
mach/m68k4/libsys/_times.s Normal file
View file

@ -0,0 +1,11 @@
.define __times
.extern __times
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__times: move.w #0x2B,d0
move.l 4(sp),a0
trap #0
rts

10
mach/m68k4/libsys/_unlink.s Normal file
View file

@ -0,0 +1,10 @@
.define __unlink
.extern __unlink
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__unlink: move.w #0xA,d0
move.l 4(sp),a0
jmp callc

17
mach/m68k4/libsys/_wait.s Normal file
View file

@ -0,0 +1,17 @@
.define __wait
.extern __wait
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__wait: move.w #0x7,d0
move.l 4(sp),a0
trap #0
bcs cerror
tst.l 4(sp)
beq 1f
move.l 4(sp),a0
move.l d1,(a0)
1:
rts

12
mach/m68k4/libsys/_write.s Normal file
View file

@ -0,0 +1,12 @@
.define __write
.extern __write
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
__write: move.w #0x4,d0
move.l 4(sp),a0
move.l 8(sp),d1
move.l 12(sp),a1
jmp call