untested
This commit is contained in:
parent
f8e692b443
commit
c677bf900b
|
|
@ -0,0 +1,17 @@
|
||||||
|
access module
|
||||||
|
|
||||||
|
external
|
||||||
|
_cerror
|
||||||
|
|
||||||
|
global
|
||||||
|
access procedure
|
||||||
|
entry
|
||||||
|
ld r0,r7
|
||||||
|
ld r1,r6
|
||||||
|
xor r4,r4
|
||||||
|
sc #33
|
||||||
|
ld r2,r4
|
||||||
|
ret nc
|
||||||
|
jp cerror
|
||||||
|
end access
|
||||||
|
end access
|
||||||
|
|
@ -0,0 +1,16 @@
|
||||||
|
acct module
|
||||||
|
|
||||||
|
external
|
||||||
|
_cerror
|
||||||
|
|
||||||
|
global
|
||||||
|
acct procedure
|
||||||
|
entry
|
||||||
|
ld r0,r7
|
||||||
|
xor r4,r4
|
||||||
|
sc #51
|
||||||
|
ld r2,r4
|
||||||
|
ret nc
|
||||||
|
jp cerror
|
||||||
|
end acct
|
||||||
|
end acct
|
||||||
|
|
@ -0,0 +1,11 @@
|
||||||
|
alarm module
|
||||||
|
|
||||||
|
global
|
||||||
|
alarm procedure
|
||||||
|
entry
|
||||||
|
ld r0,r7
|
||||||
|
sc #27
|
||||||
|
ld r2,r4
|
||||||
|
ret
|
||||||
|
end alarm
|
||||||
|
end alarm
|
||||||
|
|
@ -0,0 +1,16 @@
|
||||||
|
chdir module
|
||||||
|
|
||||||
|
external
|
||||||
|
_cerror
|
||||||
|
|
||||||
|
global
|
||||||
|
chdir procedure
|
||||||
|
entry
|
||||||
|
ld r0,r7
|
||||||
|
xor r4,r4
|
||||||
|
sc #12
|
||||||
|
ld r2,r4
|
||||||
|
ret nc
|
||||||
|
jp cerror
|
||||||
|
end chdir
|
||||||
|
end chdir
|
||||||
|
|
@ -0,0 +1,17 @@
|
||||||
|
chmod module
|
||||||
|
|
||||||
|
external
|
||||||
|
_cerror
|
||||||
|
|
||||||
|
global
|
||||||
|
chmod procedure
|
||||||
|
entry
|
||||||
|
ld r0,r7
|
||||||
|
ld r1,r6
|
||||||
|
xor r4,r4
|
||||||
|
sc #15
|
||||||
|
ld r2,r4
|
||||||
|
ret nc
|
||||||
|
jp cerror
|
||||||
|
end chmod
|
||||||
|
end chmod
|
||||||
|
|
@ -0,0 +1,18 @@
|
||||||
|
chown module
|
||||||
|
|
||||||
|
external
|
||||||
|
_cerror
|
||||||
|
|
||||||
|
global
|
||||||
|
chown procedure
|
||||||
|
entry
|
||||||
|
ld r0,r7
|
||||||
|
ld r1,r6
|
||||||
|
ld r2,r5
|
||||||
|
xor r4,r4
|
||||||
|
sc #16
|
||||||
|
ld r2,r4
|
||||||
|
ret nc
|
||||||
|
jp cerror
|
||||||
|
end chown
|
||||||
|
end chown
|
||||||
|
|
@ -0,0 +1,16 @@
|
||||||
|
close module
|
||||||
|
|
||||||
|
external
|
||||||
|
_cerror
|
||||||
|
|
||||||
|
global
|
||||||
|
close procedure
|
||||||
|
entry
|
||||||
|
ld r0,r7
|
||||||
|
xor r4,r4
|
||||||
|
sc #6
|
||||||
|
ld r2,r4
|
||||||
|
ret nc
|
||||||
|
jp cerror
|
||||||
|
end close
|
||||||
|
end close
|
||||||
|
|
@ -0,0 +1,16 @@
|
||||||
|
creat module
|
||||||
|
|
||||||
|
external
|
||||||
|
_cerror
|
||||||
|
|
||||||
|
global
|
||||||
|
creat procedure
|
||||||
|
entry
|
||||||
|
ld r0,r7
|
||||||
|
ld r1,r6
|
||||||
|
sc #8
|
||||||
|
ld r2,r4
|
||||||
|
ret nc
|
||||||
|
jp cerror
|
||||||
|
end creat
|
||||||
|
end creat
|
||||||
|
|
@ -0,0 +1,16 @@
|
||||||
|
dup module
|
||||||
|
|
||||||
|
external
|
||||||
|
_cerror
|
||||||
|
|
||||||
|
global
|
||||||
|
dup procedure
|
||||||
|
entry
|
||||||
|
ld r0,r7
|
||||||
|
ld r1,r6
|
||||||
|
sc #41
|
||||||
|
ld r2,r4
|
||||||
|
ret nc
|
||||||
|
jp cerror
|
||||||
|
end dup
|
||||||
|
end dup
|
||||||
|
|
@ -0,0 +1,26 @@
|
||||||
|
execl module
|
||||||
|
|
||||||
|
external
|
||||||
|
_environ
|
||||||
|
_cerror
|
||||||
|
|
||||||
|
global
|
||||||
|
execl procedure
|
||||||
|
entry
|
||||||
|
ld r0,@r15
|
||||||
|
ex r0,r7
|
||||||
|
ld @r15,r2
|
||||||
|
push @r15,r3
|
||||||
|
push @r15,r4
|
||||||
|
push @r15,r5
|
||||||
|
push @r15,r6
|
||||||
|
ld r1,r15
|
||||||
|
ld r2,_environ
|
||||||
|
sc #59
|
||||||
|
ld r2,r4
|
||||||
|
inc r15,#8
|
||||||
|
ld @r15,r7
|
||||||
|
jp cerror
|
||||||
|
end execl
|
||||||
|
end execl
|
||||||
|
|
||||||
|
|
@ -0,0 +1,28 @@
|
||||||
|
execle module
|
||||||
|
|
||||||
|
external
|
||||||
|
_cerror
|
||||||
|
|
||||||
|
global
|
||||||
|
execle procedure
|
||||||
|
entry
|
||||||
|
ld r0,@r15
|
||||||
|
ex r0,r7
|
||||||
|
ld @r15,r2
|
||||||
|
push @r15,r3
|
||||||
|
push @r15,r4
|
||||||
|
push @r15,r5
|
||||||
|
push @r15,r6
|
||||||
|
ld r1,r15
|
||||||
|
ld r2,r1
|
||||||
|
ld r3,#%8000
|
||||||
|
xor r4,r4
|
||||||
|
cpir r4,@r2,r3,z
|
||||||
|
ld r2,@r2
|
||||||
|
sc #59
|
||||||
|
ld r2,r4
|
||||||
|
inc r15,#8
|
||||||
|
ld @r15,r7
|
||||||
|
jp cerror
|
||||||
|
end execle
|
||||||
|
end execle
|
||||||
|
|
@ -0,0 +1,17 @@
|
||||||
|
execv module
|
||||||
|
|
||||||
|
external
|
||||||
|
_environ
|
||||||
|
_cerror
|
||||||
|
|
||||||
|
global
|
||||||
|
execv procedure
|
||||||
|
entry
|
||||||
|
ld r0,r7
|
||||||
|
ld r1,r6
|
||||||
|
ld r2,_environ
|
||||||
|
sc #59
|
||||||
|
ld r2,r4
|
||||||
|
jp cerror
|
||||||
|
end execv
|
||||||
|
end execv
|
||||||
|
|
@ -0,0 +1,16 @@
|
||||||
|
execve module
|
||||||
|
|
||||||
|
external
|
||||||
|
_cerror
|
||||||
|
|
||||||
|
global
|
||||||
|
execve procedure
|
||||||
|
entry
|
||||||
|
ld r0,r7
|
||||||
|
ld r1,r6
|
||||||
|
ld r2,r5
|
||||||
|
sc #59
|
||||||
|
ld r2,r4
|
||||||
|
jp cerror
|
||||||
|
end execve
|
||||||
|
end execve
|
||||||
|
|
@ -0,0 +1,13 @@
|
||||||
|
exit module
|
||||||
|
|
||||||
|
external
|
||||||
|
_cerror
|
||||||
|
|
||||||
|
global
|
||||||
|
exit procedure
|
||||||
|
entry
|
||||||
|
ld r0,r7
|
||||||
|
sc #1
|
||||||
|
ld r2,r4
|
||||||
|
end exit
|
||||||
|
end exit
|
||||||
|
|
@ -0,0 +1,9 @@
|
||||||
|
pause module
|
||||||
|
|
||||||
|
global
|
||||||
|
pause procedure
|
||||||
|
entry
|
||||||
|
sc #29
|
||||||
|
ret
|
||||||
|
end pause
|
||||||
|
end pause
|
||||||
Loading…
Reference in New Issue