97003a8aca
GCC has -mrtd but the args are pushed in reverse versus PASCAL. So asm routines have to use macros to obtain the stack arguments. For the complex call_nls assembly, revert the arguments in C using a preprocessor macro.
97 lines
2.8 KiB
NASM
97 lines
2.8 KiB
NASM
;
|
|
; File:
|
|
; execrh.asm
|
|
; Description:
|
|
; request handler for calling device drivers
|
|
;
|
|
; Copyright (c) 1995, 1998
|
|
; Pasquale J. Villani
|
|
; All Rights Reserved
|
|
;
|
|
; This file is part of DOS-C.
|
|
;
|
|
; DOS-C is free software; you can redistribute it and/or
|
|
; modify it under the terms of the GNU General Public License
|
|
; as published by the Free Software Foundation; either version
|
|
; 2, or (at your option) any later version.
|
|
;
|
|
; DOS-C is distributed in the hope that it will be useful, but
|
|
; WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See
|
|
; the GNU General Public License for more details.
|
|
;
|
|
; You should have received a copy of the GNU General Public
|
|
; License along with DOS-C; see the file COPYING. If not,
|
|
; write to the Free Software Foundation, 675 Mass Ave,
|
|
; Cambridge, MA 02139, USA.
|
|
;
|
|
; $Id: execrh.asm 1184 2006-05-20 20:49:59Z mceric $
|
|
;
|
|
|
|
%include "segs.inc"
|
|
%include "stacks.inc"
|
|
|
|
segment HMA_TEXT
|
|
; EXECRH
|
|
; Execute Device Request
|
|
;
|
|
; execrh(rhp, dhp)
|
|
; request far *rhp;
|
|
; struct dhdr far *dhp;
|
|
;
|
|
;
|
|
; The stack is very critical in here.
|
|
;
|
|
global EXECRH
|
|
global INIT_EXECRH
|
|
|
|
%macro EXECRHM 0
|
|
push bp ; perform c entry
|
|
mov bp,sp
|
|
push si
|
|
push ds ; sp=bp-8
|
|
|
|
arg {rhp,4}, {dhp,4}
|
|
lds si,[.dhp] ; ds:si = device header
|
|
les bx,[.rhp] ; es:bx = request header
|
|
|
|
|
|
mov ax, [si+6] ; construct strategy address
|
|
mov [.dhp], ax
|
|
|
|
push si ; the bloody fucking RTSND.DOS
|
|
push di ; driver destroys SI,DI (tom 14.2.03)
|
|
|
|
call far[.dhp] ; call far the strategy
|
|
|
|
pop di
|
|
pop si
|
|
|
|
; Protect386Registers ; old free-EMM386 versions destroy regs in their INIT method
|
|
|
|
mov ax,[si+8] ; construct 'interrupt' address
|
|
mov [.dhp],ax ; construct interrupt address
|
|
call far[.dhp] ; call far the interrupt
|
|
|
|
; Restore386Registers ; less stack load and better performance...
|
|
|
|
sti ; damm driver turn off ints
|
|
cld ; has gone backwards
|
|
pop ds
|
|
pop si
|
|
pop bp
|
|
ret 8
|
|
%endmacro
|
|
|
|
EXECRH:
|
|
EXECRHM
|
|
|
|
%ifndef WATCOM
|
|
|
|
segment INIT_TEXT
|
|
|
|
INIT_EXECRH:
|
|
EXECRHM
|
|
|
|
%endif
|