| Line | |
|---|
| 1 | ; $Id: $
|
|---|
| 2 | ;; @file
|
|---|
| 3 | ;
|
|---|
| 4 | ; kLdr - OS/2 Loader Stub.
|
|---|
| 5 | ;
|
|---|
| 6 | ; This file contains a 64kb code/data/stack segment which is used to kick off
|
|---|
| 7 | ; the loader dll that loads the process.
|
|---|
| 8 | ;
|
|---|
| 9 | ; Copyright (c) 2006 Knut St. Osmundsen <bird-source-spam@anduin.net>
|
|---|
| 10 | ;
|
|---|
| 11 | ; GPL
|
|---|
| 12 | ;
|
|---|
| 13 |
|
|---|
| 14 | struc KLDRARGS
|
|---|
| 15 | .fFlags resd 260
|
|---|
| 16 | .szExecutable resb 260
|
|---|
| 17 | .szLibPath resb (4096 - 260 - 260 - 8)
|
|---|
| 18 | endstruc
|
|---|
| 19 |
|
|---|
| 20 | extern _kLdrLoadExe
|
|---|
| 21 |
|
|---|
| 22 |
|
|---|
| 23 | segment DATA32 stack CLASS=DATA align=16 use32
|
|---|
| 24 | ..start:
|
|---|
| 25 | push args
|
|---|
| 26 | jmp _kLdrLoadExe
|
|---|
| 27 |
|
|---|
| 28 | ;
|
|---|
| 29 | ; Argument structure.
|
|---|
| 30 | ;
|
|---|
| 31 | align 4
|
|---|
| 32 | args:
|
|---|
| 33 | istruc KLDRARGS
|
|---|
| 34 | at KLDRARGS.fFlags, dd 0
|
|---|
| 35 | at KLDRARGS.szExecutable, db 'hello.lx'
|
|---|
| 36 | at KLDRARGS.szLibPath, db ''
|
|---|
| 37 | iend
|
|---|
| 38 |
|
|---|
| 39 | segment STACK32 stack CLASS=STACK align=16 use32
|
|---|
| 40 | ; pad up to 64KB.
|
|---|
| 41 | resb 60*1024
|
|---|
| 42 |
|
|---|
| 43 | global WEAK$ZERO
|
|---|
| 44 | WEAK$ZERO EQU 0
|
|---|
| 45 | group DGROUP, DATA32 STACK32
|
|---|
| 46 |
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.
