Changeset 4347 for trunk/src/win32k/ldr/mytkExecPgm.asm
- Timestamp:
- Oct 1, 2000, 4:58:21 AM (25 years ago)
- Location:
- trunk/src/win32k/ldr
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/src/win32k/ldr
-
Property svn:ignore
set to
calltaba.asm
-
Property svn:ignore
set to
-
trunk/src/win32k/ldr/mytkExecPgm.asm
r4164 r4347 1 ; $Id: mytkExecPgm.asm,v 1.1 1 2000-09-02 21:08:10bird Exp $1 ; $Id: mytkExecPgm.asm,v 1.12 2000-10-01 02:58:19 bird Exp $ 2 2 ; 3 3 ; mytkExecPgm - tkExecPgm overload … … 25 25 ; Imported Functions and variables. 26 26 ; 27 extrn _g_tkExecPgm:PROC27 extrn g_tkExecPgm:PROC 28 28 29 29 ; Scans strings until empy-string is reached. … … 32 32 ; return: cx size - CF clear 33 33 ; ax error- CF set 34 extrn _f_FuStrLenZ:PROC34 extrn f_FuStrLenZ:PROC 35 35 36 36 ; Stringlength … … 39 39 ; return: cx size - CF clear 40 40 ; ax error- CF set 41 extrn _f_FuStrLen:PROC41 extrn f_FuStrLen:PROC 42 42 43 43 ;memcpy … … 48 48 ;return: success CF clear 49 49 ; failure CF set 50 extrn _f_FuBuff:PROC50 extrn f_FuBuff:PROC 51 51 52 52 … … 85 85 ; Exported symbols 86 86 ; 87 public my tkExecPgm87 public myg_tkExecPgm 88 88 public tkExecPgmCopyEnv 89 89 … … 130 130 ; 131 131 ; 132 my tkExecPgm PROC FAR132 myg_tkExecPgm PROC FAR 133 133 cchFilename = -4h 134 134 cchArgs = -08h … … 176 176 mov di, dx ; bx:di is now filename address 177 177 push cs ; Problem calling far into the calltab segement. 178 call near ptr FLAT: _f_FuStrLen178 call near ptr FLAT:f_FuStrLen 179 179 jc tkepgm_backout ; If the FuStrLen call failed we bail out! 180 180 … … 195 195 mov di, [ebp + OffArg] ; bx:di -> arguments 196 196 push cs ; Problem calling far into the calltab segement. 197 call near ptr FLAT: _f_FuStrLenZ197 call near ptr FLAT:f_FuStrLenZ 198 198 jc tkepgm_backout 199 199 … … 269 269 mov cx, [ebp + cchFilename] ; cx = length of area to copy 270 270 push cs ; Problem calling far into the calltab segement. 271 call near ptr FLAT: _f_FuBuff271 call near ptr FLAT:f_FuBuff 272 272 jc tkepgm_backout2 ; In case of error back (quite unlikely). 273 273 … … 290 290 mov cx, [ebp + cchArgs] ; cx = length of area to copy 291 291 push cs ; Problem calling far into the calltab segement. 292 call near ptr FLAT: _f_FuBuff292 call near ptr FLAT:f_FuBuff 293 293 jc tkepgm_backout2 ; In case of error back (quite unlikely). 294 294 295 295 296 296 ; 297 ; Setup new input parameters (call _g_tkExecPgm)297 ; Setup new input parameters (call g_tkExecPgm) 298 298 ; 299 299 ; ds:dx is to become &achTkExecPgmFilename[0] … … 312 312 313 313 ; 314 ; Call _g_tkExecPgm314 ; Call g_tkExecPgm 315 315 ; 316 316 tkepgm_callbehind: 317 317 push cs ; Problem calling far into the calltab segement. 318 call near ptr FLAT: _g_tkExecPgm318 call near ptr FLAT:g_tkExecPgm 319 319 pushfd ; preserve flags 320 320 push eax ; preserve result. … … 409 409 mov si, [ebp + OffArg] 410 410 411 my tkExecPgm_CalltkExecPgm:412 push cs ; Problem calling far into the calltab segement. 413 call near ptr FLAT: _g_tkExecPgm411 myg_tkExecPgm_CalltkExecPgm: 412 push cs ; Problem calling far into the calltab segement. 413 call near ptr FLAT:g_tkExecPgm 414 414 leave 415 415 retf 416 my tkExecPgm ENDP416 myg_tkExecPgm ENDP 417 417 418 418 … … 543 543 xor ecx, ecx 544 544 push cs ; Problem calling far into the calltab segement. 545 call near ptr FLAT: _f_FuStrLenZ545 call near ptr FLAT:f_FuStrLenZ 546 546 jc tkepel_err_ret 547 547 movzx eax, cx
Note:
See TracChangeset
for help on using the changeset viewer.