58 lines
911 B
ArmAsm
58 lines
911 B
ArmAsm
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
|
|
.define _shmdt
|
|
.define _shmat
|
|
.define _shmctl
|
|
.define _shmget
|
|
shm = 52
|
|
.extern _shmdt
|
|
.extern _shmat
|
|
.extern _shmctl
|
|
.extern _shmget
|
|
.extern _syscall
|
|
|
|
_shmat:
|
|
link a6,#0
|
|
tst.b -32(sp)
|
|
move.l 16(a6),-(sp)
|
|
move.l 12(a6),-(sp)
|
|
move.l 8(a6),-(sp)
|
|
clr.l -(sp)
|
|
move.l #shm,-(sp)
|
|
jsr _syscall
|
|
add #0x14,sp
|
|
unlk a6
|
|
rts
|
|
_shmctl:
|
|
link a6,#0
|
|
tst.b -32(sp)
|
|
move.l 16(a6),-(sp)
|
|
move.l 12(a6),-(sp)
|
|
move.l 8(a6),-(sp)
|
|
move.l #1,-(sp)
|
|
move.l #shm,-(sp)
|
|
jsr _syscall
|
|
add #0x14,sp
|
|
unlk a6
|
|
rts
|
|
_shmdt:
|
|
link a6,#0
|
|
tst.b -144(sp)
|
|
move.l 8(a6),-(sp)
|
|
move.l #2,-(sp)
|
|
move.l #shm,-(sp)
|
|
jsr _syscall
|
|
add #0xC,sp
|
|
unlk a6
|
|
rts
|
|
_shmget:
|
|
link a6,#0
|
|
tst.b -32(sp)
|
|
move.l 16(a6),-(sp)
|
|
move.l 12(a6),-(sp)
|
|
move.l 8(a6),-(sp)
|
|
move.l #3,-(sp)
|
|
move.l #shm,-(sp)
|
|
jsr _syscall
|
|
add #0x14,sp
|
|
unlk a6
|
|
rts
|