	Index	Manual	Download	Source	Macros	Embedded word Case ins.
	Sitemap	Links	Forum	Tests	Projects	Embedded word Case ins.

Test t9675: ELF import module for 32bit Windows from DLL library

Source & expected listing t9675.htm.lst: | | EUROASM AUTOSEGMENT=ON,CPU=386,DUMPWIDTH=25 |7439363735 |%test %SET t9675 | |;; | |;; Create auxilliary DLL library. | |%test PROGRAM FORMAT=DLL,MODEL=FLAT,WIDTH=32,ICONFILE= |[.text] ::::Section changed. |00000000: |Write.W32:: PROC ; Display ASCIIZ string pointed to by ESI using Windows. | | IMPORT GetStdHandle:,WriteFile: ; Declare imported Windows kernel functions. |00000000:6AF5 | PUSH -11 ; %1 Identifier of standard output STD_OUTPUT_HANDLE. |00000002:E8(00000000) | CALL GetStdHandle: ; Stdcall the imported Windows function with 1 argument. |00000007:89C3 | MOV EBX,EAX ; Save the returned StdOutput handle to EBX. |00000009:89F7 | MOV EDI,ESI ; Use EDI to find the end of input string. |0000000B:31C9 | XOR ECX,ECX ; Clear ECX to keep the size of input string. |0000000D:31C0 | XOR EAX,EAX ; Clear AL, the searched NUL character. |0000000F:F7D1 | NOT ECX ; Assume unlimited possible string size. |00000011:F2AE | REPNE SCASB ; Find the zero terminator. |00000013:F7D1 | NOT ECX ; Get string size to ECX. |00000015:52 | PUSH EDX ; Alloc temporary DWORD memory variable on stack. |00000016:89E2 | MOV EDX,ESP ; Get address of this DWORD to EDX. |00000018:50 | PUSH EAX ; %5 No overlap of WriteFile. |00000019:52 | PUSH EDX ; %4 Memory variable for number of bytes. |0000001A: | |0000001A:51 | PUSH ECX ; %3 String size. |0000001B:56 | PUSH ESI ; %2 String address. |0000001C:53 | PUSH EBX ; %1 Standard output file handle. |0000001D:E8(00000000) | CALL WriteFile: ; Stdcall the imported function with 5 arguments. |00000022:5A | POP EDX ; Free and discard the temporary DWORD on stack. |00000023:C3 | RET ; Return to caller. |00000024: | ENDPROC Write.W32: | |;; |00000024: |Beep.W32:: PROC ; Play a sound in 32bit Windows. |00000024:BE[00000000] | MOV ESI,=B"Beeping..." ; Define a literal string in [.rodata]. |00000029:E8D2FFFFFF | CALL Write.W32:: ; Display the notification "Beeping...". | | IMPORT Beep: ; Declare imported Windows kernel function. |0000002E:68C8000000 | PUSH 200 ; %2 Sound duration [ms]. |00000033:68B8010000 | PUSH 440 ; %1 Sound frequency [Hz]. |00000038:E8(00000000) | CALL Beep: ; Stdcall the imported function with 2 arguments. |0000003D:6890010000 | PUSH 400 ; %2 Sound duration [ms]. |00000042:684B020000 | PUSH 587 ; %1 Sound frequency [Hz]. |00000047:E8(00000000) | CALL Beep: ; Stdcall the imported function with 2 arguments. |0000004C:C3 | RET ; Return to caller. |0000004D: | ENDPROC Beep.W32: | |;; |0000004D: |Exit.W32:: PROC ; Display the message "End" and terminate the program. |0000004D:BE[00000000] | MOV ESI,.M: ; Address in segment [.bss] for the message. |00000052:C706456E6400 | MOVD [ESI+0],"End" ; Dynamically define the message "End". |00000058:C746030D0A0000| MOVD [ESI+3],0x0A0D ; CR+LF. |0000005F:E89CFFFFFF | CALL Write.W32:: ; Display the notification "End". | | IMPORT ExitProcess: ; Use imported Windows kernel function. |00000064:6A00 | PUSH 0 ; %1 Terminate with errorlevel 0. |00000066:E9(00000000) | JMP ExitProcess: ; Use imported function with 1 argument. |[.bss] ::::Section changed. |00000000:..............|.M: DB 7*BYTE ; Reserve space for ASCIIZ string "End" in segment [.bss]. |[.text] ::::Section changed. |0000006B: | ENDPROC Exit.W32: | |;; | | EXPORT Write.W32,Beep.W32,Exit.W32 |[@LT1] ====ListLiterals in section [@LT1]. |00000000:42656570696E~~=B"Beeping..." | |ENDPROGRAM %test | **** ListMap "t9675.dll",model=FLAT,groups=0,segments=6,entry=,stack= | [.text],FA=00000400h,VA=10001000h,size=0000006Bh=107,width=32,align=0010h,purpose=CODE | [.rodata],FA=00000600h,VA=10002000h,size=0000000Bh=11,width=32,align=0010h,purpose=RODATA+LITERAL | [.bss],FA=00000800h,VA=10003000h,size=00000007h=7,width=32,align=0010h,purpose=BSS | [.idata],FA=00000800h,VA=10004000h,size=000000ABh=171,width=32,align=8,purpose=IMPORT+IAT | [.edata],FA=00000A00h,VA=10005000h,size=0000006Ch=108,width=0,align=8,purpose=EXPORT | [.reloc],FA=00000C00h,VA=10006000h,size=0000001Ch=28,width=32,align=4,purpose=BASERELOC | **** ListGlobals "t9675.dll",Global=0,Public=0,Extern=0,eXport=3,Import=4 | Beep,[.idata]:0000009Dh,VA=1000409Dh,scope='I',lib="kernel32.dll" | Beep.W32,[.text]:00000024h,VA=10001024h,scope='X' | Exit.W32,[.text]:0000004Dh,VA=1000104Dh,scope='X' | ExitProcess,[.idata]:000000A4h,VA=100040A4h,scope='I',lib="kernel32.dll" | GetStdHandle,[.idata]:0000008Fh,VA=1000408Fh,scope='I',lib="kernel32.dll" | Write.W32,[.text]:00000000h,VA=10001000h,scope='X' | WriteFile,[.idata]:00000096h,VA=10004096h,scope='I',lib="kernel32.dll" | |;; | |;; Create the main ELF import module. | |%test PROGRAM FORMAT=ELF,MODEL=FLAT,WIDTH=32 | | GLOBAL Write.W32,Beep.W32,Exit.W32 | | LINK %test.dll | |ENDPROGRAM %test |# I0561 Linking DLL library ".\t9675.dll". | **** ListMap "t9675.o",model=FLAT,groups=0,segments=5,entry=,stack= | [],FA=00000000h,RVA=00000000h,size=00000000h=0,width=0,align=0,purpose= | [.symtab],FA=00000100h,RVA=00000000h,size=00000080h=128,width=0,align=0010h,purpose=SYMBOLS | [.drectve],FA=00000180h,RVA=00000000h,size=00000074h=116,width=0,align=4,purpose=DRECTVE | [.strtab],FA=000001F4h,RVA=00000000h,size=00000040h=64,width=0,align=1,purpose=STRINGS | [.shstrtab],FA=00000234h,RVA=00000000h,size=00000024h=36,width=0,align=1,purpose=STRINGS | **** ListGlobals "t9675.o",Global=0,Public=0,Extern=0,eXport=0,Import=3 | Beep.W32,[Beep.W32]:00000000h,scope='I',lib="t9675.dll" | Exit.W32,[Exit.W32]:00000000h,scope='I',lib="t9675.dll" | Write.W32,[Write.W32]:00000000h,scope='I',lib="t9675.dll"

Expected messages t9675.out: I0180 Assembling source file "t9675.htm". I0270 Assembling source "t9675". I0310 Assembling source pass 1. I0330 Assembling source pass 2 - final. I0470 Assembling program "t9675". "t9675.htm"{45} I0510 Assembling program pass 1. "t9675.htm"{45} I0510 Assembling program pass 2. "t9675.htm"{45} I0530 Assembling program pass 3 - final. "t9675.htm"{45} I0660 32bit FLAT DLL file "t9675.dll" created, size=3100. "t9675.htm"{100} I0650 Program "t9675" assembled in 3 passes with errorlevel 0. "t9675.htm"{100} I0470 Assembling program "t9675". "t9675.htm"{118} I0510 Assembling program pass 1. "t9675.htm"{118} I0510 Assembling program pass 2. "t9675.htm"{118} I0530 Assembling program pass 3 - final. "t9675.htm"{118} I0561 Linking DLL library ".\t9675.dll". "t9675.htm"{121} I0660 32bit FLAT ELF file "t9675.o" created, size=600. "t9675.htm"{121} I0650 Program "t9675" assembled in 3 passes with errorlevel 0. "t9675.htm"{121} I0750 Source "t9675" (200 lines) assembled in 2 passes with errorlevel 0. I0860 Listing file "t9675.htm.lst" created, size=7042. I0990 EuroAssembler terminated with errorlevel 0.

Expected output file t9675. o

0000: 7F 45 4C 46 01 01 01 00 00 00 00 00 00 00 00 00  ¤ELF···°°°°°°°°°
0010: 01 00 03 00 01 00 00 00 00 00 00 00 00 00 00 00  ·°·°·°°°°°°°°°°°
0020: 38 00 00 00 00 00 00 00 34 00 20 00 00 00 28 00  8°°°°°°°4°¯°°°(°
0030: 05 00 04 00 00 00 00 00 00 00 00 00 00 00 00 00  ·°·°°°°°°°°°°°°°
0040: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  °°°°°°°°°°°°°°°°
0050: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  °°°°°°°°°°°°°°°°
0060: 01 00 00 00 02 00 00 00 00 00 00 00 00 00 00 00  ·°°°·°°°°°°°°°°°
0070: 00 01 00 00 80 00 00 00 03 00 00 00 05 00 00 00  °·°°¤°°°·°°°·°°°
0080: 10 00 00 00 10 00 00 00 09 00 00 00 07 00 00 00  ·°°°·°°°·°°°·°°°
0090: 00 00 00 00 00 00 00 00 80 01 00 00 74 00 00 00  °°°°°°°°¤·°°t°°°
00A0: 00 00 00 00 00 00 00 00 04 00 00 00 00 00 00 00  °°°°°°°°·°°°°°°°
00B0: 12 00 00 00 03 00 00 00 00 00 00 00 00 00 00 00  ·°°°·°°°°°°°°°°°
00C0: F4 01 00 00 40 00 00 00 00 00 00 00 00 00 00 00  ¤·°°@°°°°°°°°°°°
00D0: 01 00 00 00 00 00 00 00 1A 00 00 00 03 00 00 00  ·°°°°°°°·°°°·°°°
00E0: 00 00 00 00 00 00 00 00 34 02 00 00 24 00 00 00  °°°°°°°°4·°°$°°°
00F0: 00 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00  °°°°°°°°·°°°°°°°
0100: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  °°°°°°°°°°°°°°°°
0110: 01 00 00 00 00 00 00 00 00 00 00 00 04 00 F1 FF  ·°°°°°°°°°°°·°¤¤
0120: 0B 00 00 00 00 00 00 00 00 00 00 00 03 00 02 00  ·°°°°°°°°°°°·°·°
0130: 14 00 00 00 00 00 00 00 00 00 00 00 03 00 03 00  ·°°°°°°°°°°°·°·°
0140: 1C 00 00 00 00 00 00 00 00 00 00 00 03 00 01 00  ·°°°°°°°°°°°·°·°
0150: 24 00 00 00 00 00 00 00 00 00 00 00 10 00 00 00  $°°°°°°°°°°°·°°°
0160: 2D 00 00 00 00 00 00 00 00 00 00 00 10 00 00 00  -°°°°°°°°°°°·°°°
0170: 36 00 00 00 00 00 00 00 00 00 00 00 10 00 00 00  6°°°°°°°°°°°·°°°
0180: 0D 00 00 00 58 00 00 00 EA 00 00 00 45 75 72 6F  ·°°°X°°°¤°°°Euro
0190: 41 73 73 65 6D 62 6C 65 72 00 00 00 20 2F 49 4D  Assembler°°°¯/IM
01A0: 50 4F 52 54 3A 42 65 65 70 2E 57 33 32 3A 22 74  PORT:Beep.W32:"t
01B0: 39 36 37 35 2E 64 6C 6C 22 20 2F 49 4D 50 4F 52  9675.dll"¯/IMPOR
01C0: 54 3A 45 78 69 74 2E 57 33 32 3A 22 74 39 36 37  T:Exit.W32:"t967
01D0: 35 2E 64 6C 6C 22 20 2F 49 4D 50 4F 52 54 3A 57  5.dll"¯/IMPORT:W
01E0: 72 69 74 65 2E 57 33 32 3A 22 74 39 36 37 35 2E  rite.W32:"t9675.
01F0: 64 6C 6C 22 00 74 39 36 37 35 2E 68 74 6D 00 2E  dll"°t9675.htm°.
0200: 64 72 65 63 74 76 65 00 2E 73 74 72 74 61 62 00  drectve°.strtab°
0210: 2E 73 79 6D 74 61 62 00 42 65 65 70 2E 57 33 32  .symtab°Beep.W32
0220: 00 45 78 69 74 2E 57 33 32 00 57 72 69 74 65 2E  °Exit.W32°Write.
0230: 57 33 32 00 00 2E 73 79 6D 74 61 62 00 2E 64 72  W32°°.symtab°.dr
0240: 65 63 74 76 65 00 2E 73 74 72 74 61 62 00 2E 73  ectve°.strtab°.s
0250: 68 73 74 72 74 61 62 00                          hstrtab°

▲Back to the top▲