67 lines
1.5 KiB
Plaintext
67 lines
1.5 KiB
Plaintext
|
! Two system calls (gtty and stty) in the m68000 tail_mon library
|
||
|
|
! were not really system calls but they used _ioctl. The m68020 machine
|
||
|
|
! the table was tested on used real system calls, and we'll use
|
||
|
|
! them here.
|
||
|
|
! There were also three calls (ftime, lock and dup2) that were in the
|
||
|
|
! m68000 library, but were not included in the list of system calls
|
||
|
|
! for the m68020 that was given to me. We'll include them anyway.
|
||
|
|
! The original gtty and stty files are included here.
|
||
|
|
! Note however that the 68000 machine (the Mantra) needs the parameters
|
||
|
|
! to system calls in registers, while the m68020 machine this table was
|
||
|
|
! tested on wanted the parameters on the stack
|
||
|
|
!
|
||
|
|
! Also read the comments in the signal.s file!
|
||
|
|
! ------------------- dup2.s
|
||
|
|
! .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)
|
||
|
|
!
|
||
|
|
!
|
||
|
|
! ! ------------------- gtty.s
|
||
|
|
! .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
|
||
|
|
!
|
||
|
|
!
|
||
|
|
! ! ------------------- stty.s
|
||
|
|
! .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
|