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

Test t7217: Compile COFF 32bit Win linking LIBOMF 32bit Win

Description: Test creates linkable 32bit COFF file t7217.obj from linkable 32bit LIBOMF module.
See also: LinkerCombinations
Tested procedures: PfcoffCompile PflibomfLoadPgm

Source & expected listing t7217.htm.lst: | | EUROASM DEBUG=OFF,PROFILE=OFF,AUTOSEGMENT=ON,LIST=ON, \ | | DUMP=ON,DUMPWIDTH=25,DUMPALL=OFF,CPU=386 | |;; | |t7217OW PROGRAM FORMAT=OMF,MODEL=SMALL,WIDTH=32, \ | | LISTMAP=ON,LISTGLOBALS=ON | | PUBLIC Write.W32 |[CODE] ::::Section changed. |00000000: |Write.W32: PROC ; Write ASCIIZ string DS:ESI in 32bit Windows. | | IMPORT GetStdHandle:,WriteFile: ; Use 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 ; Use ECX to keep the size of input string. |0000000D:31C0 | XOR EAX,EAX ; Zero AL, the searched 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 DWORD room to EDX. |00000018:50 | PUSH EAX ; %5 No overlap of WriteFile. |00000019:52 | PUSH EDX ; %4 Memory variable for number of bytes. |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 room on stack. |00000023:C3 | RET ; Return to caller. |00000024: | ENDPROC Write.W32: | |ENDPROGRAM t7217OW | **** ListMap "t7217OW.obj",groups=0,segments=1,entry=,stack= | [CODE],RVA=00000000h,size=00000024h=36,width=32,align=0010h,purpose=CODE | **** ListGlobals "t7217OW.obj",Global=0,Public=1,Extern=0,eXport=0,Import=2 | GetStdHandle,[GetStdHandle]:00000000h,scope='I',lib="kernel32.dll" | Write.W32,[CODE]:00000000h,scope='P' | WriteFile,[WriteFile]:00000000h,scope='I',lib="kernel32.dll" | |;; | |t7217OB PROGRAM FORMAT=OMF,MODEL=SMALL,WIDTH=32, \ | | LISTMAP=ON,LISTGLOBALS=ON | | PUBLIC Beep.W32 |[CODE] ::::Section changed. |00000000: |Beep.W32: PROC ; Play a sound in 32bit Windows. | | IMPORT Beep: ; Use imported Windows kernel function. |00000000:68C8000000 | PUSH 200 ; %2 Sound duration [ms]. |00000005:68B8010000 | PUSH 440 ; %1 Sound frequency [Hz]. |0000000A:E8(00000000) | CALL Beep: ; Stdcall the imported function with 2 arguments. |0000000F:6890010000 | PUSH 400 ; %2 Sound duration [ms]. |00000014:684B020000 | PUSH 587 ; %1 Sound frequency [Hz]. |00000019:E8(00000000) | CALL Beep: ; Stdcall the imported function with 2 arguments. |0000001E:C3 | RET ; Return to caller. |0000001F: | ENDPROC Beep.W32: | |ENDPROGRAM t7217OB | **** ListMap "t7217OB.obj",groups=0,segments=1,entry=,stack= | [CODE],RVA=00000000h,size=0000001Fh=31,width=32,align=0010h,purpose=CODE | **** ListGlobals "t7217OB.obj",Global=0,Public=1,Extern=0,eXport=0,Import=1 | Beep,[Beep]:00000000h,scope='I',lib="kernel32.dll" | Beep.W32,[CODE]:00000000h,scope='P' | |;; | |t7217OE PROGRAM FORMAT=OMF,MODEL=SMALL,WIDTH=32, \ | | LISTMAP=ON,LISTGLOBALS=ON | | PUBLIC Exit.W32 |[CODE] ::::Section changed. |00000000: |Exit.W32: PROC ; Terminate program in 32bit Windows. | | IMPORT ExitProcess: ; Use imported Windows kernel function. |00000000:6A00 | PUSH 0 ; %1 Terminate with errorlevel 0. |00000002:E9(00000000) | JMP ExitProcess: ; Use imported function with 1 argument. |00000007: | ENDPROC Exit.W32: | |ENDPROGRAM t7217OE | **** ListMap "t7217OE.obj",groups=0,segments=1,entry=,stack= | [CODE],RVA=00000000h,size=00000007h=7,width=32,align=0010h,purpose=CODE | **** ListGlobals "t7217OE.obj",Global=0,Public=1,Extern=0,eXport=0,Import=1 | Exit.W32,[CODE]:00000000h,scope='P' | ExitProcess,[ExitProcess]:00000000h,scope='I',lib="kernel32.dll" | |;; | |t7217O PROGRAM FORMAT=LIBOMF,MODEL=SMALL,WIDTH=32, \ | | LISTMAP=OFF,LISTGLOBALS=OFF | | LINK t7217OW.obj, t7217OB.obj, t7217OE.obj | |ENDPROGRAM t7217O |# I0560 Linking OMF module ".\t7217OW.obj". |# I0560 Linking OMF module ".\t7217OB.obj". |# I0560 Linking OMF module ".\t7217OE.obj". | |;; | |t7217 PROGRAM FORMAT=COFF,MODEL=FLAT,WIDTH=32, \ | | LISTMAP=ON,LISTGLOBALS=ON | | GLOBAL Write.W32, Exit.W32 ; Intentionally omitted Beep.W32. | | LINK t7217O.lib | |ENDPROGRAM t7217 |# I0560 Linking LIBOMF module ".\t7217O.lib". | **** ListMap "t7217.obj",groups=0,segments=2,entry=,stack= | [CODE],RVA=00000000h,size=00000057h=87,width=32,align=0010h,purpose=CODE | [.drectve],RVA=00000000h,size=00000048h=72,width=0,align=0,purpose=DRECTVE | **** ListGlobals "t7217.obj",Global=2,Public=1,Extern=0,eXport=0,Import=4 | Beep,[Beep]:00000000h,scope='I',lib="kernel32.dll" | Beep.W32,[CODE]:00000030h,scope='P' | Exit.W32,[CODE]:00000050h,scope='G' | ExitProcess,[ExitProcess]:00000000h,scope='I',lib="kernel32.dll" | GetStdHandle,[GetStdHandle]:00000000h,scope='I',lib="kernel32.dll" | Write.W32,[CODE]:00000000h,scope='G' | WriteFile,[WriteFile]:00000000h,scope='I',lib="kernel32.dll"

Expected messages t7217.out: I0180 Assembling source file "t7217.htm". I0270 Assembling source "t7217". I0310 Assembling source pass 1. I0330 Assembling source pass 2 - final. I0470 Assembling program "t7217OW". "t7217.htm"{62} I0510 Assembling program pass 1. "t7217.htm"{62} I0510 Assembling program pass 2. "t7217.htm"{62} I0530 Assembling program pass 3 - final. "t7217.htm"{62} I0660 32bit SMALL OMF file "t7217OW.obj" created, size=263. "t7217.htm"{88} I0650 Program "t7217OW" assembled in 3 passes with errorlevel 0. "t7217.htm"{88} I0470 Assembling program "t7217OB". "t7217.htm"{96} I0510 Assembling program pass 1. "t7217.htm"{96} I0510 Assembling program pass 2. "t7217.htm"{96} I0530 Assembling program pass 3 - final. "t7217.htm"{96} I0660 32bit SMALL OMF file "t7217OB.obj" created, size=177. "t7217.htm"{110} I0650 Program "t7217OB" assembled in 3 passes with errorlevel 0. "t7217.htm"{110} I0470 Assembling program "t7217OE". "t7217.htm"{117} I0510 Assembling program pass 1. "t7217.htm"{117} I0510 Assembling program pass 2. "t7217.htm"{117} I0530 Assembling program pass 3 - final. "t7217.htm"{117} I0660 32bit SMALL OMF file "t7217OE.obj" created, size=170. "t7217.htm"{126} I0650 Program "t7217OE" assembled in 3 passes with errorlevel 0. "t7217.htm"{126} I0470 Assembling program "t7217O". "t7217.htm"{133} I0510 Assembling program pass 1. "t7217.htm"{133} I0530 Assembling program pass 2 - final. "t7217.htm"{133} I0560 Linking OMF module ".\t7217OW.obj". "t7217.htm"{136} I0560 Linking OMF module ".\t7217OB.obj". "t7217.htm"{136} I0560 Linking OMF module ".\t7217OE.obj". "t7217.htm"{136} I0660 32bit SMALL LIBOMF file "t7217O.lib" created, size=2048. "t7217.htm"{136} I0650 Program "t7217O" assembled in 2 passes with errorlevel 0. "t7217.htm"{136} I0470 Assembling program "t7217". "t7217.htm"{141} I0510 Assembling program pass 1. "t7217.htm"{141} I0510 Assembling program pass 2. "t7217.htm"{141} I0530 Assembling program pass 3 - final. "t7217.htm"{141} I0560 Linking LIBOMF module ".\t7217O.lib". "t7217.htm"{145} I0660 32bit FLAT COFF file "t7217.obj" created, size=593. "t7217.htm"{145} I0650 Program "t7217" assembled in 3 passes with errorlevel 0. "t7217.htm"{145} I0750 Source "t7217" (245 lines) assembled in 2 passes with errorlevel 0. I0860 Listing file "t7217.htm.lst" created, size=6854. I0990 EuroAssembler terminated with errorlevel 0.

Expected output file t7217. obj

0000: 4C 01 02 00 00 00 00 00 36 01 00 00 0D 00 00 00  L··°°°°°6·°°·°°°
0010: 00 00 00 01 43 4F 44 45 00 00 00 00 00 00 00 00  °°°·CODE°°°°°°°°
0020: 00 00 00 00 57 00 00 00 64 00 00 00 BC 00 00 00  °°°°W°°°d°°°¤°°°
0030: 00 00 00 00 05 00 00 00 20 00 50 60 2E 64 72 65  °°°°·°°°¯°P`.dre
0040: 63 74 76 65 00 00 00 00 00 00 00 00 48 00 00 00  ctve°°°°°°°°H°°°
0050: EE 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  ¤°°°°°°°°°°°°°°°
0060: 00 0A 10 02 6A F5 E8 00 00 00 00 89 C3 89 F7 31  °¬··j¤¤°°°°¤¤¤¤1
0070: C9 31 C0 F7 D1 F2 AE F7 D1 52 89 E2 50 52 51 56  ¤1¤¤¤¤¤¤¤R¤¤PRQV
0080: 53 E8 00 00 00 00 5A C3 90 90 90 90 90 90 90 90  S¤°°°°Z¤¤¤¤¤¤¤¤¤
0090: 90 90 90 90 68 C8 00 00 00 68 B8 01 00 00 E8 00  ¤¤¤¤h¤°°°h¤·°°¤°
00A0: 00 00 00 68 90 01 00 00 68 4B 02 00 00 E8 00 00  °°°h¤·°°hK·°°¤°°
00B0: 00 00 C3 90 6A 00 E9 00 00 00 00 00 03 00 00 00  °°¤¤j°¤°°°°°·°°°
00C0: 06 00 00 00 14 00 1E 00 00 00 07 00 00 00 14 00  ·°°°·°·°°°·°°°·°
00D0: 3B 00 00 00 09 00 00 00 14 00 4A 00 00 00 09 00  ;°°°·°°°·°J°°°·°
00E0: 00 00 14 00 53 00 00 00 0B 00 00 00 14 00 20 2F  °°·°S°°°·°°°·°¯/
00F0: 49 4D 50 4F 52 54 3A 47 65 74 53 74 64 48 61 6E  IMPORT:GetStdHan
0100: 64 6C 65 20 2F 49 4D 50 4F 52 54 3A 57 72 69 74  dle¯/IMPORT:Writ
0110: 65 46 69 6C 65 20 2F 49 4D 50 4F 52 54 3A 42 65  eFile¯/IMPORT:Be
0120: 65 70 20 2F 49 4D 50 4F 52 54 3A 45 78 69 74 50  ep¯/IMPORT:ExitP
0130: 72 6F 63 65 73 73 2E 66 69 6C 65 00 00 00 00 00  rocess.file°°°°°
0140: 00 00 FE FF 00 00 67 01 74 37 32 31 37 2E 68 74  °°¤¤°°g·t7217.ht
0150: 6D 00 00 00 00 00 00 00 00 00 43 4F 44 45 00 00  m°°°°°°°°°CODE°°
0160: 00 00 00 00 00 00 01 00 00 00 03 01 57 00 00 00  °°°°°°·°°°··W°°°
0170: 05 00 00 00 00 00 00 00 00 00 00 00 00 00 2E 64  ·°°°°°°°°°°°°°.d
0180: 72 65 63 74 76 65 00 00 00 00 02 00 00 00 03 01  rectve°°°°·°°°··
0190: 48 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  H°°°°°°°°°°°°°°°
01A0: 00 00 00 00 00 00 04 00 00 00 00 00 00 00 00 00  °°°°°°·°°°°°°°°°
01B0: 01 01 02 00 00 00 00 00 11 00 00 00 00 00 00 00  ···°°°°°·°°°°°°°
01C0: 00 00 01 01 02 00 00 00 00 00 1B 00 00 00 00 00  °°···°°°°°·°°°°°
01D0: 00 00 01 00 00 00 02 00 42 65 65 70 00 00 00 00  °°·°°°·°Beep°°°°
01E0: 00 00 00 00 00 00 01 01 02 00 42 65 65 70 2E 57  °°°°°°···°Beep.W
01F0: 33 32 30 00 00 00 01 00 00 00 02 00 00 00 00 00  320°°°·°°°·°°°°°
0200: 25 00 00 00 00 00 00 00 00 00 01 01 02 00 45 78  %°°°°°°°°°···°Ex
0210: 69 74 2E 57 33 32 50 00 00 00 01 00 00 00 02 00  it.W32P°°°·°°°·°
0220: 31 00 00 00 47 65 74 53 74 64 48 61 6E 64 6C 65  1°°°GetStdHandle
0230: 00 57 72 69 74 65 46 69 6C 65 00 57 72 69 74 65  °WriteFile°Write
0240: 2E 57 33 32 00 45 78 69 74 50 72 6F 63 65 73 73  .W32°ExitProcess
0250: 00                                               °

▲Back to the top▲