mirror of https://github.com/lianthony/NT4.0
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
82 lines
1.3 KiB
82 lines
1.3 KiB
; Set the Library initiailization point to the named function
|
|
|
|
|
|
.model medium,pascal
|
|
.data
|
|
|
|
_hInstanceDLL dw ?
|
|
public _hInstanceDLL
|
|
|
|
.code LOAD
|
|
|
|
extrn LocalInit:far
|
|
extrn LocalAlloc:far, LocalFree:far
|
|
|
|
;; extrn InitializeClientDLL:far
|
|
|
|
LibEntry proc FAR
|
|
|
|
; rhInstance di // libary handle
|
|
; rDSeg ds // library data segment
|
|
; rcbDSeg cx // size of heap
|
|
; rsmdLine es // pointer to command line - far pointer
|
|
; roCmdLine si
|
|
|
|
mov _hInstanceDLL, ds
|
|
|
|
push ds
|
|
xor ax,ax
|
|
push ax
|
|
push cx
|
|
call LocalInit
|
|
|
|
;; call InitializeClientDLL
|
|
mov ax, 1 ;return value - success
|
|
ret
|
|
LibEntry endp
|
|
|
|
WEP proc FAR ;; nParm
|
|
|
|
push bp
|
|
mov bp,sp
|
|
nParm equ <word ptr [bp-4]>
|
|
|
|
mov ax,1
|
|
|
|
pop bp
|
|
ret 2
|
|
|
|
WEP endp
|
|
|
|
.code _TEXT
|
|
|
|
int3 proc near C
|
|
|
|
int 3
|
|
ret
|
|
|
|
int3 endp
|
|
|
|
if 0
|
|
RPCNSBINDINGLOOKUPNEXT:
|
|
RPCNSBINDINGLOOKUPDONE:
|
|
RPCNSBINDINGIMPORTBEGIN:
|
|
RPCNSBINDINGIMPORTNEXT:
|
|
RPCNSBINDINGIMPORTDONE:
|
|
RPCNSBINDINGSELECT:
|
|
I_RPCNSBINDINGLOOKUPBEGIN:
|
|
I_RPCNSBINDINGIMPORTBEGIN:
|
|
int 3
|
|
|
|
|
|
public RPCNSBINDINGLOOKUPNEXT
|
|
public RPCNSBINDINGLOOKUPDONE
|
|
public RPCNSBINDINGIMPORTBEGIN
|
|
public RPCNSBINDINGIMPORTNEXT
|
|
public RPCNSBINDINGIMPORTDONE
|
|
public RPCNSBINDINGSELECT
|
|
public I_RPCNSBINDINGLOOKUPBEGIN
|
|
public I_RPCNSBINDINGIMPORTBEGIN
|
|
|
|
endif
|
|
end LIBENTRY
|