?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
kernel32/tests: Get rid of unneeded function typedefs.
[wine/multimedia.git] / dlls / kernel32 / tests / loader.c
blobe98ebc1bde3d987248ad9c29251f064a78dcf420
1 /*
2 * Unit test suite for the PE loader.
3 *
4 * Copyright 2006,2011 Dmitry Timoshkov
5 *
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
10 *
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
15 *
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19 */
20
21 #include <stdarg.h>
22 #include <assert.h>
23
24 #include "ntstatus.h"
25 #define WIN32_NO_STATUS
26 #include "windef.h"
27 #include "winbase.h"
28 #include "winternl.h"
29 #include "wine/test.h"
30
31 #define ALIGN_SIZE(size, alignment) (((size) + (alignment - 1)) & ~((alignment - 1)))
32
33 static NTSTATUS (WINAPI *pNtMapViewOfSection)(HANDLE, HANDLE, PVOID *, ULONG, SIZE_T, const LARGE_INTEGER *, SIZE_T *, ULONG, ULONG, ULONG);
34 static NTSTATUS (WINAPI *pNtUnmapViewOfSection)(HANDLE, PVOID);
35
36 static PVOID RVAToAddr(DWORD_PTR rva, HMODULE module)
37 {
38 if (rva == 0)
39 return NULL;
40 return ((char*) module) + rva;
41 }
42
43 static const struct
44 {
45 WORD e_magic; /* 00: MZ Header signature */
46 WORD unused[29];
47 DWORD e_lfanew; /* 3c: Offset to extended header */
48 } dos_header =
49 {
50 IMAGE_DOS_SIGNATURE, { 0 }, sizeof(dos_header)
51 };
52
53 static IMAGE_NT_HEADERS nt_header =
54 {
55 IMAGE_NT_SIGNATURE, /* Signature */
56 {
57 #if defined __i386__
58 IMAGE_FILE_MACHINE_I386, /* Machine */
59 #elif defined __x86_64__
60 IMAGE_FILE_MACHINE_AMD64, /* Machine */
61 #elif defined __powerpc__
62 IMAGE_FILE_MACHINE_POWERPC, /* Machine */
63 #elif defined __sparc__
64 IMAGE_FILE_MACHINE_SPARC, /* Machine */
65 #elif defined __arm__
66 IMAGE_FILE_MACHINE_ARMV7, /* Machine */
67 #else
68 # error You must specify the machine type
69 #endif
70 1, /* NumberOfSections */
71 0, /* TimeDateStamp */
72 0, /* PointerToSymbolTable */
73 0, /* NumberOfSymbols */
74 sizeof(IMAGE_OPTIONAL_HEADER), /* SizeOfOptionalHeader */
75 IMAGE_FILE_EXECUTABLE_IMAGE | IMAGE_FILE_DLL /* Characteristics */
76 },
77 { IMAGE_NT_OPTIONAL_HDR_MAGIC, /* Magic */
78 1, /* MajorLinkerVersion */
79 0, /* MinorLinkerVersion */
80 0, /* SizeOfCode */
81 0, /* SizeOfInitializedData */
82 0, /* SizeOfUninitializedData */
83 0, /* AddressOfEntryPoint */
84 0x10, /* BaseOfCode, also serves as e_lfanew in the truncated MZ header */
85 #ifndef _WIN64
86 0, /* BaseOfData */
87 #endif
88 0x10000000, /* ImageBase */
89 0, /* SectionAlignment */
90 0, /* FileAlignment */
91 4, /* MajorOperatingSystemVersion */
92 0, /* MinorOperatingSystemVersion */
93 1, /* MajorImageVersion */
94 0, /* MinorImageVersion */
95 4, /* MajorSubsystemVersion */
96 0, /* MinorSubsystemVersion */
97 0, /* Win32VersionValue */
98 sizeof(dos_header) + sizeof(nt_header) + sizeof(IMAGE_SECTION_HEADER) + 0x1000, /* SizeOfImage */
99 sizeof(dos_header) + sizeof(nt_header), /* SizeOfHeaders */
100 0, /* CheckSum */
101 IMAGE_SUBSYSTEM_WINDOWS_CUI, /* Subsystem */
102 0, /* DllCharacteristics */
103 0, /* SizeOfStackReserve */
104 0, /* SizeOfStackCommit */
105 0, /* SizeOfHeapReserve */
106 0, /* SizeOfHeapCommit */
107 0, /* LoaderFlags */
108 0, /* NumberOfRvaAndSizes */
109 { { 0 } } /* DataDirectory[IMAGE_NUMBEROF_DIRECTORY_ENTRIES] */
110 }
111 };
112
113 static IMAGE_SECTION_HEADER section =
114 {
115 ".rodata", /* Name */
116 { 0x10 }, /* Misc */
117 0, /* VirtualAddress */
118 0x0a, /* SizeOfRawData */
119 0, /* PointerToRawData */
120 0, /* PointerToRelocations */
121 0, /* PointerToLinenumbers */
122 0, /* NumberOfRelocations */
123 0, /* NumberOfLinenumbers */
124 IMAGE_SCN_CNT_INITIALIZED_DATA | IMAGE_SCN_MEM_READ, /* Characteristics */
125 };
126
127 static void test_Loader(void)
128 {
129 static const struct test_data
130 {
131 const void *dos_header;
132 DWORD size_of_dos_header;
133 WORD number_of_sections, size_of_optional_header;
134 DWORD section_alignment, file_alignment;
135 DWORD size_of_image, size_of_headers;
136 DWORD errors[4]; /* 0 means LoadLibrary should succeed */
137 } td[] =
138 {
139 { &dos_header, sizeof(dos_header),
140 1, 0, 0, 0, 0, 0,
141 { ERROR_BAD_EXE_FORMAT }
142 },
143 { &dos_header, sizeof(dos_header),
144 1, sizeof(IMAGE_OPTIONAL_HEADER), 0x1000, 0x1000,
145 sizeof(dos_header) + sizeof(nt_header) + sizeof(IMAGE_SECTION_HEADER) + 0xe00,
146 sizeof(dos_header) + sizeof(nt_header) + sizeof(IMAGE_SECTION_HEADER),
147 { ERROR_BAD_EXE_FORMAT } /* XP doesn't like too small image size */
148 },
149 { &dos_header, sizeof(dos_header),
150 1, sizeof(IMAGE_OPTIONAL_HEADER), 0x1000, 0x1000,
151 sizeof(dos_header) + sizeof(nt_header) + sizeof(IMAGE_SECTION_HEADER) + 0x1000,
152 sizeof(dos_header) + sizeof(nt_header) + sizeof(IMAGE_SECTION_HEADER),
153 { ERROR_SUCCESS }
154 },
155 { &dos_header, sizeof(dos_header),
156 1, sizeof(IMAGE_OPTIONAL_HEADER), 0x1000, 0x1000,
157 0x1f00,
158 0x1000,
159 { ERROR_SUCCESS }
160 },
161 { &dos_header, sizeof(dos_header),
162 1, sizeof(IMAGE_OPTIONAL_HEADER), 0x200, 0x200,
163 sizeof(dos_header) + sizeof(nt_header) + sizeof(IMAGE_SECTION_HEADER) + 0x200,
164 sizeof(dos_header) + sizeof(nt_header) + sizeof(IMAGE_SECTION_HEADER),
165 { ERROR_SUCCESS, ERROR_INVALID_ADDRESS } /* vista is more strict */
166 },
167 { &dos_header, sizeof(dos_header),
168 1, sizeof(IMAGE_OPTIONAL_HEADER), 0x200, 0x1000,
169 sizeof(dos_header) + sizeof(nt_header) + sizeof(IMAGE_SECTION_HEADER) + 0x1000,
170 sizeof(dos_header) + sizeof(nt_header) + sizeof(IMAGE_SECTION_HEADER),
171 { ERROR_BAD_EXE_FORMAT } /* XP doesn't like alignments */
172 },
173 { &dos_header, sizeof(dos_header),
174 1, sizeof(IMAGE_OPTIONAL_HEADER), 0x1000, 0x200,
175 sizeof(dos_header) + sizeof(nt_header) + sizeof(IMAGE_SECTION_HEADER) + 0x1000,
176 sizeof(dos_header) + sizeof(nt_header) + sizeof(IMAGE_SECTION_HEADER),
177 { ERROR_SUCCESS }
178 },
179 { &dos_header, sizeof(dos_header),
180 1, sizeof(IMAGE_OPTIONAL_HEADER), 0x1000, 0x200,
181 sizeof(dos_header) + sizeof(nt_header) + sizeof(IMAGE_SECTION_HEADER) + 0x1000,
182 0x200,
183 { ERROR_SUCCESS }
184 },
185 /* Mandatory are all fields up to SizeOfHeaders, everything else
186 * is really optional (at least that's true for XP).
187 */
188 { &dos_header, sizeof(dos_header),
189 1, FIELD_OFFSET(IMAGE_OPTIONAL_HEADER, CheckSum), 0x200, 0x200,
190 sizeof(dos_header) + sizeof(DWORD) + sizeof(IMAGE_FILE_HEADER) + FIELD_OFFSET(IMAGE_OPTIONAL_HEADER, CheckSum) + sizeof(IMAGE_SECTION_HEADER) + 0x10,
191 sizeof(dos_header) + sizeof(DWORD) + sizeof(IMAGE_FILE_HEADER) + FIELD_OFFSET(IMAGE_OPTIONAL_HEADER, CheckSum) + sizeof(IMAGE_SECTION_HEADER),
192 { ERROR_SUCCESS, ERROR_BAD_EXE_FORMAT, ERROR_INVALID_ADDRESS,
193 ERROR_NOACCESS }
194 },
195 { &dos_header, sizeof(dos_header),
196 0, FIELD_OFFSET(IMAGE_OPTIONAL_HEADER, CheckSum), 0x200, 0x200,
197 0xd0, /* beyond of the end of file */
198 0xc0, /* beyond of the end of file */
199 { ERROR_SUCCESS, ERROR_BAD_EXE_FORMAT } /* vista is more strict */
200 },
201 { &dos_header, sizeof(dos_header),
202 0, FIELD_OFFSET(IMAGE_OPTIONAL_HEADER, CheckSum), 0x200, 0x200,
203 0x1000,
204 0,
205 { ERROR_SUCCESS, ERROR_BAD_EXE_FORMAT } /* vista is more strict */
206 },
207 { &dos_header, sizeof(dos_header),
208 0, FIELD_OFFSET(IMAGE_OPTIONAL_HEADER, CheckSum), 0x200, 0x200,
209 1,
210 0,
211 { ERROR_SUCCESS, ERROR_BAD_EXE_FORMAT } /* vista is more strict */
212 },
213 #if 0 /* not power of 2 alignments need more test cases */
214 { &dos_header, sizeof(dos_header),
215 0, FIELD_OFFSET(IMAGE_OPTIONAL_HEADER, CheckSum), 0x300, 0x300,
216 1,
217 0,
218 { ERROR_BAD_EXE_FORMAT } /* alignment is not power of 2 */
219 },
220 #endif
221 { &dos_header, sizeof(dos_header),
222 0, FIELD_OFFSET(IMAGE_OPTIONAL_HEADER, CheckSum), 4, 4,
223 1,
224 0,
225 { ERROR_SUCCESS, ERROR_BAD_EXE_FORMAT } /* vista is more strict */
226 },
227 { &dos_header, sizeof(dos_header),
228 0, FIELD_OFFSET(IMAGE_OPTIONAL_HEADER, CheckSum), 1, 1,
229 1,
230 0,
231 { ERROR_SUCCESS, ERROR_BAD_EXE_FORMAT } /* vista is more strict */
232 },
233 { &dos_header, sizeof(dos_header),
234 0, FIELD_OFFSET(IMAGE_OPTIONAL_HEADER, CheckSum), 0x200, 0x200,
235 0,
236 0,
237 { ERROR_BAD_EXE_FORMAT } /* image size == 0 -> failure */
238 },
239 /* the following data mimics the PE image which upack creates */
240 { &dos_header, 0x10,
241 1, 0x148, 0x1000, 0x200,
242 sizeof(dos_header) + sizeof(nt_header) + sizeof(IMAGE_SECTION_HEADER) + 0x1000,
243 0x200,
244 { ERROR_SUCCESS }
245 },
246 /* Minimal PE image that XP is able to load: 92 bytes */
247 { &dos_header, 0x04,
248 0, FIELD_OFFSET(IMAGE_OPTIONAL_HEADER, CheckSum),
249 0x04 /* also serves as e_lfanew in the truncated MZ header */, 0x04,
250 1,
251 0,
252 { ERROR_SUCCESS, ERROR_BAD_EXE_FORMAT } /* vista is more strict */
253 }
254 };
255 static const char filler[0x1000];
256 static const char section_data[0x10] = "section data";
257 int i;
258 DWORD dummy, file_size, file_align;
259 HANDLE hfile;
260 HMODULE hlib, hlib_as_data_file;
261 SYSTEM_INFO si;
262 char temp_path[MAX_PATH];
263 char dll_name[MAX_PATH];
264 SIZE_T size;
265 BOOL ret;
266
267 GetSystemInfo(&si);
268 trace("system page size 0x%04x\n", si.dwPageSize);
269
270 /* prevent displaying of the "Unable to load this DLL" message box */
271 SetErrorMode(SEM_FAILCRITICALERRORS);
272
273 GetTempPath(MAX_PATH, temp_path);
274
275 for (i = 0; i < sizeof(td)/sizeof(td[0]); i++)
276 {
277 GetTempFileName(temp_path, "ldr", 0, dll_name);
278
279 /*trace("creating %s\n", dll_name);*/
280 hfile = CreateFileA(dll_name, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, 0, 0);
281 if (hfile == INVALID_HANDLE_VALUE)
282 {
283 ok(0, "could not create %s\n", dll_name);
284 break;
285 }
286
287 SetLastError(0xdeadbeef);
288 ret = WriteFile(hfile, td[i].dos_header, td[i].size_of_dos_header, &dummy, NULL);
289 ok(ret, "WriteFile error %d\n", GetLastError());
290
291 nt_header.FileHeader.NumberOfSections = td[i].number_of_sections;
292 nt_header.FileHeader.SizeOfOptionalHeader = td[i].size_of_optional_header;
293
294 nt_header.OptionalHeader.SectionAlignment = td[i].section_alignment;
295 nt_header.OptionalHeader.FileAlignment = td[i].file_alignment;
296 nt_header.OptionalHeader.SizeOfImage = td[i].size_of_image;
297 nt_header.OptionalHeader.SizeOfHeaders = td[i].size_of_headers;
298 SetLastError(0xdeadbeef);
299 ret = WriteFile(hfile, &nt_header, sizeof(DWORD) + sizeof(IMAGE_FILE_HEADER), &dummy, NULL);
300 ok(ret, "WriteFile error %d\n", GetLastError());
301
302 if (nt_header.FileHeader.SizeOfOptionalHeader)
303 {
304 SetLastError(0xdeadbeef);
305 ret = WriteFile(hfile, &nt_header.OptionalHeader,
306 min(nt_header.FileHeader.SizeOfOptionalHeader, sizeof(IMAGE_OPTIONAL_HEADER)),
307 &dummy, NULL);
308 ok(ret, "WriteFile error %d\n", GetLastError());
309 if (nt_header.FileHeader.SizeOfOptionalHeader > sizeof(IMAGE_OPTIONAL_HEADER))
310 {
311 file_align = nt_header.FileHeader.SizeOfOptionalHeader - sizeof(IMAGE_OPTIONAL_HEADER);
312 assert(file_align < sizeof(filler));
313 SetLastError(0xdeadbeef);
314 ret = WriteFile(hfile, filler, file_align, &dummy, NULL);
315 ok(ret, "WriteFile error %d\n", GetLastError());
316 }
317 }
318
319 assert(nt_header.FileHeader.NumberOfSections <= 1);
320 if (nt_header.FileHeader.NumberOfSections)
321 {
322 if (nt_header.OptionalHeader.SectionAlignment >= si.dwPageSize)
323 {
324 section.PointerToRawData = td[i].size_of_dos_header;
325 section.VirtualAddress = nt_header.OptionalHeader.SectionAlignment;
326 section.Misc.VirtualSize = section.SizeOfRawData * 10;
327 }
328 else
329 {
330 section.PointerToRawData = nt_header.OptionalHeader.SizeOfHeaders;
331 section.VirtualAddress = nt_header.OptionalHeader.SizeOfHeaders;
332 section.Misc.VirtualSize = 5;
333 }
334
335 SetLastError(0xdeadbeef);
336 ret = WriteFile(hfile, &section, sizeof(section), &dummy, NULL);
337 ok(ret, "WriteFile error %d\n", GetLastError());
338
339 /* section data */
340 SetLastError(0xdeadbeef);
341 ret = WriteFile(hfile, section_data, sizeof(section_data), &dummy, NULL);
342 ok(ret, "WriteFile error %d\n", GetLastError());
343 }
344
345 file_size = GetFileSize(hfile, NULL);
346 CloseHandle(hfile);
347
348 SetLastError(0xdeadbeef);
349 hlib = LoadLibrary(dll_name);
350 if (hlib)
351 {
352 MEMORY_BASIC_INFORMATION info;
353
354 ok( td[i].errors[0] == ERROR_SUCCESS, "%d: should have failed\n", i );
355
356 SetLastError(0xdeadbeef);
357 size = VirtualQuery(hlib, &info, sizeof(info));
358 ok(size == sizeof(info),
359 "%d: VirtualQuery error %d\n", i, GetLastError());
360 ok(info.BaseAddress == hlib, "%d: %p != %p\n", i, info.BaseAddress, hlib);
361 ok(info.AllocationBase == hlib, "%d: %p != %p\n", i, info.AllocationBase, hlib);
362 ok(info.AllocationProtect == PAGE_EXECUTE_WRITECOPY, "%d: %x != PAGE_EXECUTE_WRITECOPY\n", i, info.AllocationProtect);
363 ok(info.RegionSize == ALIGN_SIZE(nt_header.OptionalHeader.SizeOfImage, si.dwPageSize), "%d: got %lx != expected %x\n",
364 i, info.RegionSize, ALIGN_SIZE(nt_header.OptionalHeader.SizeOfImage, si.dwPageSize));
365 ok(info.State == MEM_COMMIT, "%d: %x != MEM_COMMIT\n", i, info.State);
366 if (nt_header.OptionalHeader.SectionAlignment < si.dwPageSize)
367 ok(info.Protect == PAGE_EXECUTE_WRITECOPY, "%d: %x != PAGE_EXECUTE_WRITECOPY\n", i, info.Protect);
368 else
369 ok(info.Protect == PAGE_READONLY, "%d: %x != PAGE_READONLY\n", i, info.Protect);
370 ok(info.Type == SEC_IMAGE, "%d: %x != SEC_IMAGE\n", i, info.Type);
371
372 SetLastError(0xdeadbeef);
373 size = VirtualQuery((char *)hlib + info.RegionSize, &info, sizeof(info));
374 ok(size == sizeof(info),
375 "%d: VirtualQuery error %d\n", i, GetLastError());
376 if (nt_header.OptionalHeader.SectionAlignment == si.dwPageSize ||
377 nt_header.OptionalHeader.SectionAlignment == nt_header.OptionalHeader.FileAlignment)
378 {
379 ok(info.BaseAddress == (char *)hlib + ALIGN_SIZE(nt_header.OptionalHeader.SizeOfImage, si.dwPageSize), "%d: got %p != expected %p\n",
380 i, info.BaseAddress, (char *)hlib + ALIGN_SIZE(nt_header.OptionalHeader.SizeOfImage, si.dwPageSize));
381 ok(info.AllocationBase == 0, "%d: %p != 0\n", i, info.AllocationBase);
382 ok(info.AllocationProtect == 0, "%d: %x != 0\n", i, info.AllocationProtect);
383 /*ok(info.RegionSize == not_practical_value, "%d: %lx != not_practical_value\n", i, info.RegionSize);*/
384 ok(info.State == MEM_FREE, "%d: %x != MEM_FREE\n", i, info.State);
385 ok(info.Type == 0, "%d: %x != 0\n", i, info.Type);
386 ok(info.Protect == PAGE_NOACCESS, "%d: %x != PAGE_NOACCESS\n", i, info.Protect);
387 }
388 else
389 {
390 ok(info.Protect == PAGE_EXECUTE_WRITECOPY, "%d: %x != PAGE_EXECUTE_WRITECOPY\n", i, info.Protect);
391 ok(info.BaseAddress == hlib, "%d: got %p != expected %p\n", i, info.BaseAddress, hlib);
392 ok(info.AllocationBase == hlib, "%d: %p != %p\n", i, info.AllocationBase, hlib);
393 ok(info.AllocationProtect == PAGE_EXECUTE_WRITECOPY, "%d: %x != PAGE_EXECUTE_WRITECOPY\n", i, info.AllocationProtect);
394 ok(info.RegionSize == ALIGN_SIZE(file_size, si.dwPageSize), "%d: got %lx != expected %x\n",
395 i, info.RegionSize, ALIGN_SIZE(file_size, si.dwPageSize));
396 ok(info.State == MEM_COMMIT, "%d: %x != MEM_COMMIT\n", i, info.State);
397 ok(info.Protect == PAGE_READONLY, "%d: %x != PAGE_READONLY\n", i, info.Protect);
398 ok(info.Type == SEC_IMAGE, "%d: %x != SEC_IMAGE\n", i, info.Type);
399 }
400
401 /* header: check the zeroing of alignment */
402 if (nt_header.OptionalHeader.SectionAlignment >= si.dwPageSize)
403 {
404 const char *start;
405 int size;
406
407 start = (const char *)hlib + nt_header.OptionalHeader.SizeOfHeaders;
408 size = ALIGN_SIZE((ULONG_PTR)start, si.dwPageSize) - (ULONG_PTR)start;
409 ok(!memcmp(start, filler, size), "%d: header alignment is not cleared\n", i);
410 }
411
412 if (nt_header.FileHeader.NumberOfSections)
413 {
414 SetLastError(0xdeadbeef);
415 size = VirtualQuery((char *)hlib + section.VirtualAddress, &info, sizeof(info));
416 ok(size == sizeof(info),
417 "%d: VirtualQuery error %d\n", i, GetLastError());
418 if (nt_header.OptionalHeader.SectionAlignment < si.dwPageSize)
419 {
420 ok(info.BaseAddress == hlib, "%d: got %p != expected %p\n", i, info.BaseAddress, hlib);
421 ok(info.RegionSize == ALIGN_SIZE(nt_header.OptionalHeader.SizeOfImage, si.dwPageSize), "%d: got %lx != expected %x\n",
422 i, info.RegionSize, ALIGN_SIZE(nt_header.OptionalHeader.SizeOfImage, si.dwPageSize));
423 ok(info.Protect == PAGE_EXECUTE_WRITECOPY, "%d: %x != PAGE_EXECUTE_WRITECOPY\n", i, info.Protect);
424 }
425 else
426 {
427 ok(info.BaseAddress == (char *)hlib + section.VirtualAddress, "%d: got %p != expected %p\n", i, info.BaseAddress, (char *)hlib + section.VirtualAddress);
428 ok(info.RegionSize == ALIGN_SIZE(section.Misc.VirtualSize, si.dwPageSize), "%d: got %lx != expected %x\n",
429 i, info.RegionSize, ALIGN_SIZE(section.Misc.VirtualSize, si.dwPageSize));
430 ok(info.Protect == PAGE_READONLY, "%d: %x != PAGE_READONLY\n", i, info.Protect);
431 }
432 ok(info.AllocationBase == hlib, "%d: %p != %p\n", i, info.AllocationBase, hlib);
433 ok(info.AllocationProtect == PAGE_EXECUTE_WRITECOPY, "%d: %x != PAGE_EXECUTE_WRITECOPY\n", i, info.AllocationProtect);
434 ok(info.State == MEM_COMMIT, "%d: %x != MEM_COMMIT\n", i, info.State);
435 ok(info.Type == SEC_IMAGE, "%d: %x != SEC_IMAGE\n", i, info.Type);
436
437 if (nt_header.OptionalHeader.SectionAlignment >= si.dwPageSize)
438 ok(!memcmp((const char *)hlib + section.VirtualAddress + section.PointerToRawData, &nt_header, section.SizeOfRawData), "wrong section data\n");
439 else
440 ok(!memcmp((const char *)hlib + section.PointerToRawData, section_data, section.SizeOfRawData), "wrong section data\n");
441
442 /* check the zeroing of alignment */
443 if (nt_header.OptionalHeader.SectionAlignment >= si.dwPageSize)
444 {
445 const char *start;
446 int size;
447
448 start = (const char *)hlib + section.VirtualAddress + section.PointerToRawData + section.SizeOfRawData;
449 size = ALIGN_SIZE((ULONG_PTR)start, si.dwPageSize) - (ULONG_PTR)start;
450 ok(memcmp(start, filler, size), "%d: alignment should not be cleared\n", i);
451 }
452 }
453
454 SetLastError(0xdeadbeef);
455 hlib_as_data_file = LoadLibraryEx(dll_name, 0, LOAD_LIBRARY_AS_DATAFILE);
456 ok(hlib_as_data_file != 0, "LoadLibraryEx error %u\n", GetLastError());
457 ok(hlib_as_data_file == hlib, "hlib_as_file and hlib are different\n");
458
459 SetLastError(0xdeadbeef);
460 ret = FreeLibrary(hlib);
461 ok(ret, "FreeLibrary error %d\n", GetLastError());
462
463 SetLastError(0xdeadbeef);
464 hlib = GetModuleHandle(dll_name);
465 ok(hlib != 0, "GetModuleHandle error %u\n", GetLastError());
466
467 SetLastError(0xdeadbeef);
468 ret = FreeLibrary(hlib_as_data_file);
469 ok(ret, "FreeLibrary error %d\n", GetLastError());
470
471 hlib = GetModuleHandle(dll_name);
472 ok(!hlib, "GetModuleHandle should fail\n");
473
474 SetLastError(0xdeadbeef);
475 hlib_as_data_file = LoadLibraryEx(dll_name, 0, LOAD_LIBRARY_AS_DATAFILE);
476 ok(hlib_as_data_file != 0, "LoadLibraryEx error %u\n", GetLastError());
477 ok((ULONG_PTR)hlib_as_data_file & 1, "hlib_as_data_file is even\n");
478
479 hlib = GetModuleHandle(dll_name);
480 ok(!hlib, "GetModuleHandle should fail\n");
481
482 SetLastError(0xdeadbeef);
483 ret = FreeLibrary(hlib_as_data_file);
484 ok(ret, "FreeLibrary error %d\n", GetLastError());
485 }
486 else
487 {
488 BOOL error_match;
489 int error_index;
490
491 error_match = FALSE;
492 for (error_index = 0;
493 ! error_match && error_index < sizeof(td[i].errors) / sizeof(DWORD);
494 error_index++)
495 {
496 error_match = td[i].errors[error_index] == GetLastError();
497 }
498 ok(error_match, "%d: unexpected error %d\n", i, GetLastError());
499 }
500
501 SetLastError(0xdeadbeef);
502 ret = DeleteFile(dll_name);
503 ok(ret, "DeleteFile error %d\n", GetLastError());
504 }
505 }
506
507 /* Verify linking style of import descriptors */
508 static void test_ImportDescriptors(void)
509 {
510 HMODULE kernel32_module = NULL;
511 PIMAGE_DOS_HEADER d_header;
512 PIMAGE_NT_HEADERS nt_headers;
513 DWORD import_dir_size;
514 DWORD_PTR dir_offset;
515 PIMAGE_IMPORT_DESCRIPTOR import_chunk;
516
517 /* Load kernel32 module */
518 kernel32_module = GetModuleHandleA("kernel32.dll");
519 assert( kernel32_module != NULL );
520
521 /* Get PE header info from module image */
522 d_header = (PIMAGE_DOS_HEADER) kernel32_module;
523 nt_headers = (PIMAGE_NT_HEADERS) (((char*) d_header) +
524 d_header->e_lfanew);
525
526 /* Get size of import entry directory */
527 import_dir_size = nt_headers->OptionalHeader.DataDirectory[IMAGE_DIRECTORY_ENTRY_IMPORT].Size;
528 if (!import_dir_size)
529 {
530 skip("Unable to continue testing due to missing import directory.\n");
531 return;
532 }
533
534 /* Get address of first import chunk */
535 dir_offset = nt_headers->OptionalHeader.DataDirectory[IMAGE_DIRECTORY_ENTRY_IMPORT].VirtualAddress;
536 import_chunk = RVAToAddr(dir_offset, kernel32_module);
537 ok(import_chunk != 0, "Invalid import_chunk: %p\n", import_chunk);
538 if (!import_chunk) return;
539
540 /* Iterate through import descriptors and verify set name,
541 * OriginalFirstThunk, and FirstThunk. Core Windows DLLs, such as
542 * kernel32.dll, don't use Borland-style linking, where the table of
543 * imported names is stored directly in FirstThunk and overwritten
544 * by the relocation, instead of being stored in OriginalFirstThunk.
545 * */
546 for (; import_chunk->FirstThunk; import_chunk++)
547 {
548 LPCSTR module_name = RVAToAddr(import_chunk->Name, kernel32_module);
549 PIMAGE_THUNK_DATA name_table = RVAToAddr(
550 U(*import_chunk).OriginalFirstThunk, kernel32_module);
551 PIMAGE_THUNK_DATA iat = RVAToAddr(
552 import_chunk->FirstThunk, kernel32_module);
553 ok(module_name != NULL, "Imported module name should not be NULL\n");
554 ok(name_table != NULL,
555 "Name table for imported module %s should not be NULL\n",
556 module_name);
557 ok(iat != NULL, "IAT for imported module %s should not be NULL\n",
558 module_name);
559 }
560 }
561
562 static void test_image_mapping(const char *dll_name, DWORD scn_page_access, BOOL is_dll)
563 {
564 HANDLE hfile, hmap;
565 NTSTATUS status;
566 LARGE_INTEGER offset;
567 SIZE_T size;
568 void *addr1, *addr2;
569 MEMORY_BASIC_INFORMATION info;
570 SYSTEM_INFO si;
571
572 if (!pNtMapViewOfSection) return;
573
574 GetSystemInfo(&si);
575
576 SetLastError(0xdeadbeef);
577 hfile = CreateFile(dll_name, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, 0, 0);
578 ok(hfile != INVALID_HANDLE_VALUE, "CreateFile error %d\n", GetLastError());
579
580 SetLastError(0xdeadbeef);
581 hmap = CreateFileMapping(hfile, NULL, PAGE_READONLY | SEC_IMAGE, 0, 0, 0);
582 ok(hmap != 0, "CreateFileMapping error %d\n", GetLastError());
583
584 offset.u.LowPart = 0;
585 offset.u.HighPart = 0;
586
587 addr1 = NULL;
588 size = 0;
589 status = pNtMapViewOfSection(hmap, GetCurrentProcess(), &addr1, 0, 0, &offset,
590 &size, 1 /* ViewShare */, 0, PAGE_READONLY);
591 ok(status == STATUS_SUCCESS, "NtMapViewOfSection error %x\n", status);
592 ok(addr1 != 0, "mapped address should be valid\n");
593
594 SetLastError(0xdeadbeef);
595 size = VirtualQuery((char *)addr1 + section.VirtualAddress, &info, sizeof(info));
596 ok(size == sizeof(info), "VirtualQuery error %d\n", GetLastError());
597 ok(info.BaseAddress == (char *)addr1 + section.VirtualAddress, "got %p != expected %p\n", info.BaseAddress, (char *)addr1 + section.VirtualAddress);
598 ok(info.RegionSize == si.dwPageSize, "got %#lx != expected %#x\n", info.RegionSize, si.dwPageSize);
599 ok(info.Protect == scn_page_access, "got %#x != expected %#x\n", info.Protect, scn_page_access);
600 ok(info.AllocationBase == addr1, "%p != %p\n", info.AllocationBase, addr1);
601 ok(info.AllocationProtect == PAGE_EXECUTE_WRITECOPY, "%#x != PAGE_EXECUTE_WRITECOPY\n", info.AllocationProtect);
602 ok(info.State == MEM_COMMIT, "%#x != MEM_COMMIT\n", info.State);
603 ok(info.Type == SEC_IMAGE, "%#x != SEC_IMAGE\n", info.Type);
604
605 addr2 = NULL;
606 size = 0;
607 status = pNtMapViewOfSection(hmap, GetCurrentProcess(), &addr2, 0, 0, &offset,
608 &size, 1 /* ViewShare */, 0, PAGE_READONLY);
609 /* FIXME: remove once Wine is fixed */
610 if (status != STATUS_IMAGE_NOT_AT_BASE)
611 {
612 todo_wine {
613 ok(status == STATUS_IMAGE_NOT_AT_BASE, "expected STATUS_IMAGE_NOT_AT_BASE, got %x\n", status);
614 ok(addr2 != 0, "mapped address should be valid\n");
615 }
616 goto wine_is_broken;
617 }
618 ok(status == STATUS_IMAGE_NOT_AT_BASE, "expected STATUS_IMAGE_NOT_AT_BASE, got %x\n", status);
619 ok(addr2 != 0, "mapped address should be valid\n");
620 ok(addr2 != addr1, "mapped addresses should be different\n");
621
622 SetLastError(0xdeadbeef);
623 size = VirtualQuery((char *)addr2 + section.VirtualAddress, &info, sizeof(info));
624 ok(size == sizeof(info), "VirtualQuery error %d\n", GetLastError());
625 ok(info.BaseAddress == (char *)addr2 + section.VirtualAddress, "got %p != expected %p\n", info.BaseAddress, (char *)addr2 + section.VirtualAddress);
626 ok(info.RegionSize == si.dwPageSize, "got %#lx != expected %#x\n", info.RegionSize, si.dwPageSize);
627 ok(info.Protect == scn_page_access, "got %#x != expected %#x\n", info.Protect, scn_page_access);
628 ok(info.AllocationBase == addr2, "%p != %p\n", info.AllocationBase, addr2);
629 ok(info.AllocationProtect == PAGE_EXECUTE_WRITECOPY, "%#x != PAGE_EXECUTE_WRITECOPY\n", info.AllocationProtect);
630 ok(info.State == MEM_COMMIT, "%#x != MEM_COMMIT\n", info.State);
631 ok(info.Type == SEC_IMAGE, "%#x != SEC_IMAGE\n", info.Type);
632
633 status = pNtUnmapViewOfSection(GetCurrentProcess(), addr2);
634 ok(status == STATUS_SUCCESS, "NtUnmapViewOfSection error %x\n", status);
635
636 addr2 = MapViewOfFile(hmap, 0, 0, 0, 0);
637 ok(addr2 != 0, "mapped address should be valid\n");
638 ok(addr2 != addr1, "mapped addresses should be different\n");
639
640 SetLastError(0xdeadbeef);
641 size = VirtualQuery((char *)addr2 + section.VirtualAddress, &info, sizeof(info));
642 ok(size == sizeof(info), "VirtualQuery error %d\n", GetLastError());
643 ok(info.BaseAddress == (char *)addr2 + section.VirtualAddress, "got %p != expected %p\n", info.BaseAddress, (char *)addr2 + section.VirtualAddress);
644 ok(info.RegionSize == si.dwPageSize, "got %#lx != expected %#x\n", info.RegionSize, si.dwPageSize);
645 ok(info.Protect == scn_page_access, "got %#x != expected %#x\n", info.Protect, scn_page_access);
646 ok(info.AllocationBase == addr2, "%p != %p\n", info.AllocationBase, addr2);
647 ok(info.AllocationProtect == PAGE_EXECUTE_WRITECOPY, "%#x != PAGE_EXECUTE_WRITECOPY\n", info.AllocationProtect);
648 ok(info.State == MEM_COMMIT, "%#x != MEM_COMMIT\n", info.State);
649 ok(info.Type == SEC_IMAGE, "%#x != SEC_IMAGE\n", info.Type);
650
651 UnmapViewOfFile(addr2);
652
653 SetLastError(0xdeadbeef);
654 addr2 = LoadLibrary(dll_name);
655 if (is_dll)
656 {
657 ok(!addr2, "LoadLibrary should fail, is_dll %d\n", is_dll);
658 ok(GetLastError() == ERROR_INVALID_ADDRESS, "expected ERROR_INVALID_ADDRESS, got %d\n", GetLastError());
659 }
660 else
661 {
662 BOOL ret;
663 ok(addr2 != 0, "LoadLibrary error %d, is_dll %d\n", GetLastError(), is_dll);
664 ok(addr2 != addr1, "mapped addresses should be different\n");
665
666 SetLastError(0xdeadbeef);
667 ret = FreeLibrary(addr2);
668 ok(ret, "FreeLibrary error %d\n", GetLastError());
669 }
670
671 wine_is_broken:
672 status = pNtUnmapViewOfSection(GetCurrentProcess(), addr1);
673 ok(status == STATUS_SUCCESS, "NtUnmapViewOfSection error %x\n", status);
674
675 CloseHandle(hmap);
676 CloseHandle(hfile);
677 }
678
679 static BOOL is_mem_writable(DWORD prot)
680 {
681 switch (prot & 0xff)
682 {
683 case PAGE_READWRITE:
684 case PAGE_WRITECOPY:
685 case PAGE_EXECUTE_READWRITE:
686 case PAGE_EXECUTE_WRITECOPY:
687 return TRUE;
688
689 default:
690 return FALSE;
691 }
692 }
693
694 static void test_VirtualProtect(void *base, void *section)
695 {
696 static const struct test_data
697 {
698 DWORD prot_set, prot_get;
699 } td[] =
700 {
701 { 0, 0 }, /* 0x00 */
702 { PAGE_NOACCESS, PAGE_NOACCESS }, /* 0x01 */
703 { PAGE_READONLY, PAGE_READONLY }, /* 0x02 */
704 { PAGE_READONLY | PAGE_NOACCESS, 0 }, /* 0x03 */
705 { PAGE_READWRITE, PAGE_WRITECOPY }, /* 0x04 */
706 { PAGE_READWRITE | PAGE_NOACCESS, 0 }, /* 0x05 */
707 { PAGE_READWRITE | PAGE_READONLY, 0 }, /* 0x06 */
708 { PAGE_READWRITE | PAGE_READONLY | PAGE_NOACCESS, 0 }, /* 0x07 */
709 { PAGE_WRITECOPY, PAGE_WRITECOPY }, /* 0x08 */
710 { PAGE_WRITECOPY | PAGE_NOACCESS, 0 }, /* 0x09 */
711 { PAGE_WRITECOPY | PAGE_READONLY, 0 }, /* 0x0a */
712 { PAGE_WRITECOPY | PAGE_NOACCESS | PAGE_READONLY, 0 }, /* 0x0b */
713 { PAGE_WRITECOPY | PAGE_READWRITE, 0 }, /* 0x0c */
714 { PAGE_WRITECOPY | PAGE_READWRITE | PAGE_NOACCESS, 0 }, /* 0x0d */
715 { PAGE_WRITECOPY | PAGE_READWRITE | PAGE_READONLY, 0 }, /* 0x0e */
716 { PAGE_WRITECOPY | PAGE_READWRITE | PAGE_READONLY | PAGE_NOACCESS, 0 }, /* 0x0f */
717
718 { PAGE_EXECUTE, PAGE_EXECUTE }, /* 0x10 */
719 { PAGE_EXECUTE_READ, PAGE_EXECUTE_READ }, /* 0x20 */
720 { PAGE_EXECUTE_READ | PAGE_EXECUTE, 0 }, /* 0x30 */
721 { PAGE_EXECUTE_READWRITE, PAGE_EXECUTE_WRITECOPY }, /* 0x40 */
722 { PAGE_EXECUTE_READWRITE | PAGE_EXECUTE, 0 }, /* 0x50 */
723 { PAGE_EXECUTE_READWRITE | PAGE_EXECUTE_READ, 0 }, /* 0x60 */
724 { PAGE_EXECUTE_READWRITE | PAGE_EXECUTE_READ | PAGE_EXECUTE, 0 }, /* 0x70 */
725 { PAGE_EXECUTE_WRITECOPY, PAGE_EXECUTE_WRITECOPY }, /* 0x80 */
726 { PAGE_EXECUTE_WRITECOPY | PAGE_EXECUTE, 0 }, /* 0x90 */
727 { PAGE_EXECUTE_WRITECOPY | PAGE_EXECUTE_READ, 0 }, /* 0xa0 */
728 { PAGE_EXECUTE_WRITECOPY | PAGE_EXECUTE_READ | PAGE_EXECUTE, 0 }, /* 0xb0 */
729 { PAGE_EXECUTE_WRITECOPY | PAGE_EXECUTE_READWRITE, 0 }, /* 0xc0 */
730 { PAGE_EXECUTE_WRITECOPY | PAGE_EXECUTE_READWRITE | PAGE_EXECUTE, 0 }, /* 0xd0 */
731 { PAGE_EXECUTE_WRITECOPY | PAGE_EXECUTE_READWRITE | PAGE_EXECUTE_READ, 0 }, /* 0xe0 */
732 { PAGE_EXECUTE_WRITECOPY | PAGE_EXECUTE_READWRITE | PAGE_EXECUTE_READ | PAGE_EXECUTE, 0 } /* 0xf0 */
733 };
734 DWORD ret, orig_prot, old_prot, rw_prot, exec_prot, i, j;
735 MEMORY_BASIC_INFORMATION info;
736 SYSTEM_INFO si;
737
738 GetSystemInfo(&si);
739 trace("system page size %#x\n", si.dwPageSize);
740
741 SetLastError(0xdeadbeef);
742 ret = VirtualProtect(section, si.dwPageSize, PAGE_NOACCESS, &old_prot);
743 ok(ret, "VirtualProtect error %d\n", GetLastError());
744
745 orig_prot = old_prot;
746
747 for (i = 0; i < sizeof(td)/sizeof(td[0]); i++)
748 {
749 SetLastError(0xdeadbeef);
750 ret = VirtualQuery(section, &info, sizeof(info));
751 ok(ret, "VirtualQuery failed %d\n", GetLastError());
752 ok(info.BaseAddress == section, "%d: got %p != expected %p\n", i, info.BaseAddress, section);
753 ok(info.RegionSize == si.dwPageSize, "%d: got %#lx != expected %#x\n", i, info.RegionSize, si.dwPageSize);
754 ok(info.Protect == PAGE_NOACCESS, "%d: got %#x != expected PAGE_NOACCESS\n", i, info.Protect);
755 ok(info.AllocationBase == base, "%d: %p != %p\n", i, info.AllocationBase, base);
756 ok(info.AllocationProtect == PAGE_EXECUTE_WRITECOPY, "%d: %#x != PAGE_EXECUTE_WRITECOPY\n", i, info.AllocationProtect);
757 ok(info.State == MEM_COMMIT, "%d: %#x != MEM_COMMIT\n", i, info.State);
758 ok(info.Type == SEC_IMAGE, "%d: %#x != SEC_IMAGE\n", i, info.Type);
759
760 old_prot = 0xdeadbeef;
761 SetLastError(0xdeadbeef);
762 ret = VirtualProtect(section, si.dwPageSize, td[i].prot_set, &old_prot);
763 if (td[i].prot_get)
764 {
765 ok(ret, "%d: VirtualProtect error %d, requested prot %#x\n", i, GetLastError(), td[i].prot_set);
766 ok(old_prot == PAGE_NOACCESS, "%d: got %#x != expected PAGE_NOACCESS\n", i, old_prot);
767
768 SetLastError(0xdeadbeef);
769 ret = VirtualQuery(section, &info, sizeof(info));
770 ok(ret, "VirtualQuery failed %d\n", GetLastError());
771 ok(info.BaseAddress == section, "%d: got %p != expected %p\n", i, info.BaseAddress, section);
772 ok(info.RegionSize == si.dwPageSize, "%d: got %#lx != expected %#x\n", i, info.RegionSize, si.dwPageSize);
773 ok(info.Protect == td[i].prot_get, "%d: got %#x != expected %#x\n", i, info.Protect, td[i].prot_get);
774 ok(info.AllocationBase == base, "%d: %p != %p\n", i, info.AllocationBase, base);
775 ok(info.AllocationProtect == PAGE_EXECUTE_WRITECOPY, "%d: %#x != PAGE_EXECUTE_WRITECOPY\n", i, info.AllocationProtect);
776 ok(info.State == MEM_COMMIT, "%d: %#x != MEM_COMMIT\n", i, info.State);
777 ok(info.Type == SEC_IMAGE, "%d: %#x != SEC_IMAGE\n", i, info.Type);
778 }
779 else
780 {
781 ok(!ret, "%d: VirtualProtect should fail\n", i);
782 ok(GetLastError() == ERROR_INVALID_PARAMETER, "%d: expected ERROR_INVALID_PARAMETER, got %d\n", i, GetLastError());
783 }
784
785 old_prot = 0xdeadbeef;
786 SetLastError(0xdeadbeef);
787 ret = VirtualProtect(section, si.dwPageSize, PAGE_NOACCESS, &old_prot);
788 ok(ret, "%d: VirtualProtect error %d\n", i, GetLastError());
789 if (td[i].prot_get)
790 ok(old_prot == td[i].prot_get, "%d: got %#x != expected %#x\n", i, old_prot, td[i].prot_get);
791 else
792 ok(old_prot == PAGE_NOACCESS, "%d: got %#x != expected PAGE_NOACCESS\n", i, old_prot);
793 }
794
795 exec_prot = 0;
796
797 for (i = 0; i <= 4; i++)
798 {
799 rw_prot = 0;
800
801 for (j = 0; j <= 4; j++)
802 {
803 DWORD prot = exec_prot | rw_prot;
804
805 SetLastError(0xdeadbeef);
806 ret = VirtualProtect(section, si.dwPageSize, prot, &old_prot);
807 if ((rw_prot && exec_prot) || (!rw_prot && !exec_prot))
808 {
809 ok(!ret, "VirtualProtect(%02x) should fail\n", prot);
810 ok(GetLastError() == ERROR_INVALID_PARAMETER, "expected ERROR_INVALID_PARAMETER, got %d\n", GetLastError());
811 }
812 else
813 ok(ret, "VirtualProtect(%02x) error %d\n", prot, GetLastError());
814
815 rw_prot = 1 << j;
816 }
817
818 exec_prot = 1 << (i + 4);
819 }
820
821 SetLastError(0xdeadbeef);
822 ret = VirtualProtect(section, si.dwPageSize, orig_prot, &old_prot);
823 ok(ret, "VirtualProtect error %d\n", GetLastError());
824 }
825
826 static void test_section_access(void)
827 {
828 static const struct test_data
829 {
830 DWORD scn_file_access, scn_page_access, scn_page_access_after_write;
831 } td[] =
832 {
833 { 0, PAGE_NOACCESS, 0 },
834 { IMAGE_SCN_MEM_READ, PAGE_READONLY, 0 },
835 { IMAGE_SCN_MEM_WRITE, PAGE_WRITECOPY, PAGE_READWRITE },
836 { IMAGE_SCN_MEM_EXECUTE, PAGE_EXECUTE, 0 },
837 { IMAGE_SCN_MEM_READ | IMAGE_SCN_MEM_WRITE, PAGE_WRITECOPY, PAGE_READWRITE },
838 { IMAGE_SCN_MEM_READ | IMAGE_SCN_MEM_EXECUTE, PAGE_EXECUTE_READ },
839 { IMAGE_SCN_MEM_WRITE | IMAGE_SCN_MEM_EXECUTE, PAGE_EXECUTE_WRITECOPY, PAGE_EXECUTE_READWRITE },
840 { IMAGE_SCN_MEM_READ | IMAGE_SCN_MEM_WRITE | IMAGE_SCN_MEM_EXECUTE, PAGE_EXECUTE_WRITECOPY, PAGE_EXECUTE_READWRITE },
841
842 { IMAGE_SCN_CNT_INITIALIZED_DATA, PAGE_NOACCESS, 0 },
843 { IMAGE_SCN_CNT_INITIALIZED_DATA | IMAGE_SCN_MEM_READ, PAGE_READONLY, 0 },
844 { IMAGE_SCN_CNT_INITIALIZED_DATA | IMAGE_SCN_MEM_WRITE, PAGE_WRITECOPY, PAGE_READWRITE },
845 { IMAGE_SCN_CNT_INITIALIZED_DATA | IMAGE_SCN_MEM_EXECUTE, PAGE_EXECUTE, 0 },
846 { IMAGE_SCN_CNT_INITIALIZED_DATA | IMAGE_SCN_MEM_READ | IMAGE_SCN_MEM_WRITE, PAGE_WRITECOPY, PAGE_READWRITE },
847 { IMAGE_SCN_CNT_INITIALIZED_DATA | IMAGE_SCN_MEM_READ | IMAGE_SCN_MEM_EXECUTE, PAGE_EXECUTE_READ, 0 },
848 { IMAGE_SCN_CNT_INITIALIZED_DATA | IMAGE_SCN_MEM_WRITE | IMAGE_SCN_MEM_EXECUTE, PAGE_EXECUTE_WRITECOPY, PAGE_EXECUTE_READWRITE },
849 { IMAGE_SCN_CNT_INITIALIZED_DATA | IMAGE_SCN_MEM_READ | IMAGE_SCN_MEM_WRITE | IMAGE_SCN_MEM_EXECUTE, PAGE_EXECUTE_WRITECOPY, PAGE_EXECUTE_READWRITE },
850
851 { IMAGE_SCN_CNT_UNINITIALIZED_DATA, PAGE_NOACCESS, 0 },
852 { IMAGE_SCN_CNT_UNINITIALIZED_DATA | IMAGE_SCN_MEM_READ, PAGE_READONLY, 0 },
853 { IMAGE_SCN_CNT_UNINITIALIZED_DATA | IMAGE_SCN_MEM_WRITE, PAGE_WRITECOPY, PAGE_READWRITE },
854 { IMAGE_SCN_CNT_UNINITIALIZED_DATA | IMAGE_SCN_MEM_EXECUTE, PAGE_EXECUTE, 0 },
855 { IMAGE_SCN_CNT_UNINITIALIZED_DATA | IMAGE_SCN_MEM_READ | IMAGE_SCN_MEM_WRITE, PAGE_WRITECOPY, PAGE_READWRITE },
856 { IMAGE_SCN_CNT_UNINITIALIZED_DATA | IMAGE_SCN_MEM_READ | IMAGE_SCN_MEM_EXECUTE, PAGE_EXECUTE_READ, 0 },
857 { IMAGE_SCN_CNT_UNINITIALIZED_DATA | IMAGE_SCN_MEM_WRITE | IMAGE_SCN_MEM_EXECUTE, PAGE_EXECUTE_WRITECOPY, PAGE_EXECUTE_READWRITE },
858 { IMAGE_SCN_CNT_UNINITIALIZED_DATA | IMAGE_SCN_MEM_READ | IMAGE_SCN_MEM_WRITE | IMAGE_SCN_MEM_EXECUTE, PAGE_EXECUTE_WRITECOPY, PAGE_EXECUTE_READWRITE }
859 };
860 static const char filler[0x1000];
861 static const char section_data[0x10] = "section data";
862 char buf[256];
863 int i;
864 DWORD dummy, file_align;
865 HANDLE hfile;
866 HMODULE hlib;
867 SYSTEM_INFO si;
868 char temp_path[MAX_PATH];
869 char dll_name[MAX_PATH];
870 SIZE_T size;
871 MEMORY_BASIC_INFORMATION info;
872 STARTUPINFO sti;
873 PROCESS_INFORMATION pi;
874 DWORD ret;
875
876 GetSystemInfo(&si);
877 trace("system page size %#x\n", si.dwPageSize);
878
879 /* prevent displaying of the "Unable to load this DLL" message box */
880 SetErrorMode(SEM_FAILCRITICALERRORS);
881
882 GetTempPath(MAX_PATH, temp_path);
883
884 for (i = 0; i < sizeof(td)/sizeof(td[0]); i++)
885 {
886 GetTempFileName(temp_path, "ldr", 0, dll_name);
887
888 /*trace("creating %s\n", dll_name);*/
889 hfile = CreateFileA(dll_name, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, 0, 0);
890 if (hfile == INVALID_HANDLE_VALUE)
891 {
892 ok(0, "could not create %s\n", dll_name);
893 return;
894 }
895
896 SetLastError(0xdeadbeef);
897 ret = WriteFile(hfile, &dos_header, sizeof(dos_header), &dummy, NULL);
898 ok(ret, "WriteFile error %d\n", GetLastError());
899
900 nt_header.FileHeader.NumberOfSections = 1;
901 nt_header.FileHeader.SizeOfOptionalHeader = sizeof(IMAGE_OPTIONAL_HEADER);
902 nt_header.FileHeader.Characteristics = IMAGE_FILE_EXECUTABLE_IMAGE | IMAGE_FILE_DLL | IMAGE_FILE_RELOCS_STRIPPED;
903
904 nt_header.OptionalHeader.SectionAlignment = si.dwPageSize;
905 nt_header.OptionalHeader.FileAlignment = 0x200;
906 nt_header.OptionalHeader.SizeOfImage = sizeof(dos_header) + sizeof(nt_header) + sizeof(IMAGE_SECTION_HEADER) + si.dwPageSize;
907 nt_header.OptionalHeader.SizeOfHeaders = sizeof(dos_header) + sizeof(nt_header) + sizeof(IMAGE_SECTION_HEADER);
908 SetLastError(0xdeadbeef);
909 ret = WriteFile(hfile, &nt_header, sizeof(DWORD) + sizeof(IMAGE_FILE_HEADER), &dummy, NULL);
910 ok(ret, "WriteFile error %d\n", GetLastError());
911 SetLastError(0xdeadbeef);
912 ret = WriteFile(hfile, &nt_header.OptionalHeader, sizeof(IMAGE_OPTIONAL_HEADER), &dummy, NULL);
913 ok(ret, "WriteFile error %d\n", GetLastError());
914
915 section.SizeOfRawData = sizeof(section_data);
916 section.PointerToRawData = nt_header.OptionalHeader.FileAlignment;
917 section.VirtualAddress = nt_header.OptionalHeader.SectionAlignment;
918 section.Misc.VirtualSize = section.SizeOfRawData;
919 section.Characteristics = td[i].scn_file_access;
920 SetLastError(0xdeadbeef);
921 ret = WriteFile(hfile, &section, sizeof(section), &dummy, NULL);
922 ok(ret, "WriteFile error %d\n", GetLastError());
923
924 file_align = nt_header.OptionalHeader.FileAlignment - nt_header.OptionalHeader.SizeOfHeaders;
925 assert(file_align < sizeof(filler));
926 SetLastError(0xdeadbeef);
927 ret = WriteFile(hfile, filler, file_align, &dummy, NULL);
928 ok(ret, "WriteFile error %d\n", GetLastError());
929
930 /* section data */
931 SetLastError(0xdeadbeef);
932 ret = WriteFile(hfile, section_data, sizeof(section_data), &dummy, NULL);
933 ok(ret, "WriteFile error %d\n", GetLastError());
934
935 CloseHandle(hfile);
936
937 SetLastError(0xdeadbeef);
938 hlib = LoadLibrary(dll_name);
939 ok(hlib != 0, "LoadLibrary error %d\n", GetLastError());
940
941 SetLastError(0xdeadbeef);
942 size = VirtualQuery((char *)hlib + section.VirtualAddress, &info, sizeof(info));
943 ok(size == sizeof(info),
944 "%d: VirtualQuery error %d\n", i, GetLastError());
945 ok(info.BaseAddress == (char *)hlib + section.VirtualAddress, "%d: got %p != expected %p\n", i, info.BaseAddress, (char *)hlib + section.VirtualAddress);
946 ok(info.RegionSize == si.dwPageSize, "%d: got %#lx != expected %#x\n", i, info.RegionSize, si.dwPageSize);
947 ok(info.Protect == td[i].scn_page_access, "%d: got %#x != expected %#x\n", i, info.Protect, td[i].scn_page_access);
948 ok(info.AllocationBase == hlib, "%d: %p != %p\n", i, info.AllocationBase, hlib);
949 ok(info.AllocationProtect == PAGE_EXECUTE_WRITECOPY, "%d: %#x != PAGE_EXECUTE_WRITECOPY\n", i, info.AllocationProtect);
950 ok(info.State == MEM_COMMIT, "%d: %#x != MEM_COMMIT\n", i, info.State);
951 ok(info.Type == SEC_IMAGE, "%d: %#x != SEC_IMAGE\n", i, info.Type);
952 if (info.Protect != PAGE_NOACCESS)
953 ok(!memcmp((const char *)info.BaseAddress, section_data, section.SizeOfRawData), "wrong section data\n");
954
955 test_VirtualProtect(hlib, (char *)hlib + section.VirtualAddress);
956
957 /* Windows changes the WRITECOPY to WRITE protection on an image section write (for a changed page only) */
958 if (is_mem_writable(info.Protect))
959 {
960 char *p = info.BaseAddress;
961 *p = 0xfe;
962 SetLastError(0xdeadbeef);
963 size = VirtualQuery((char *)hlib + section.VirtualAddress, &info, sizeof(info));
964 ok(size == sizeof(info), "%d: VirtualQuery error %d\n", i, GetLastError());
965 /* FIXME: remove the condition below once Wine is fixed */
966 if (info.Protect == PAGE_WRITECOPY || info.Protect == PAGE_EXECUTE_WRITECOPY)
967 todo_wine ok(info.Protect == td[i].scn_page_access_after_write, "%d: got %#x != expected %#x\n", i, info.Protect, td[i].scn_page_access_after_write);
968 else
969 ok(info.Protect == td[i].scn_page_access_after_write, "%d: got %#x != expected %#x\n", i, info.Protect, td[i].scn_page_access_after_write);
970 }
971
972 SetLastError(0xdeadbeef);
973 ret = FreeLibrary(hlib);
974 ok(ret, "FreeLibrary error %d\n", GetLastError());
975
976 test_image_mapping(dll_name, td[i].scn_page_access, TRUE);
977
978 /* reset IMAGE_FILE_DLL otherwise CreateProcess fails */
979 nt_header.FileHeader.Characteristics = IMAGE_FILE_EXECUTABLE_IMAGE | IMAGE_FILE_RELOCS_STRIPPED;
980 SetLastError(0xdeadbeef);
981 hfile = CreateFile(dll_name, GENERIC_WRITE, 0, NULL, OPEN_EXISTING, 0, 0);
982 /* LoadLibrary called on an already memory-mapped file in
983 * test_image_mapping() above leads to a file handle leak
984 * under nt4, and inability to overwrite and delete the file
985 * due to sharing violation error. Ignore it and skip the test,
986 * but leave a not deletable temporary file.
987 */
988 ok(hfile != INVALID_HANDLE_VALUE || broken(hfile == INVALID_HANDLE_VALUE) /* nt4 */,
989 "CreateFile error %d\n", GetLastError());
990 if (hfile == INVALID_HANDLE_VALUE) goto nt4_is_broken;
991 SetFilePointer(hfile, sizeof(dos_header), NULL, FILE_BEGIN);
992 SetLastError(0xdeadbeef);
993 ret = WriteFile(hfile, &nt_header, sizeof(DWORD) + sizeof(IMAGE_FILE_HEADER), &dummy, NULL);
994 ok(ret, "WriteFile error %d\n", GetLastError());
995 CloseHandle(hfile);
996
997 memset(&sti, 0, sizeof(sti));
998 sti.cb = sizeof(sti);
999 SetLastError(0xdeadbeef);
1000 ret = CreateProcess(dll_name, NULL, NULL, NULL, FALSE, CREATE_SUSPENDED, NULL, NULL, &sti, &pi);
1001 ok(ret, "CreateProcess() error %d\n", GetLastError());
1002
1003 SetLastError(0xdeadbeef);
1004 size = VirtualQueryEx(pi.hProcess, (char *)hlib + section.VirtualAddress, &info, sizeof(info));
1005 ok(size == sizeof(info),
1006 "%d: VirtualQuery error %d\n", i, GetLastError());
1007 ok(info.BaseAddress == (char *)hlib + section.VirtualAddress, "%d: got %p != expected %p\n", i, info.BaseAddress, (char *)hlib + section.VirtualAddress);
1008 ok(info.RegionSize == si.dwPageSize, "%d: got %#lx != expected %#x\n", i, info.RegionSize, si.dwPageSize);
1009 ok(info.Protect == td[i].scn_page_access, "%d: got %#x != expected %#x\n", i, info.Protect, td[i].scn_page_access);
1010 ok(info.AllocationBase == hlib, "%d: %p != %p\n", i, info.AllocationBase, hlib);
1011 ok(info.AllocationProtect == PAGE_EXECUTE_WRITECOPY, "%d: %#x != PAGE_EXECUTE_WRITECOPY\n", i, info.AllocationProtect);
1012 ok(info.State == MEM_COMMIT, "%d: %#x != MEM_COMMIT\n", i, info.State);
1013 ok(info.Type == SEC_IMAGE, "%d: %#x != SEC_IMAGE\n", i, info.Type);
1014 if (info.Protect != PAGE_NOACCESS)
1015 {
1016 SetLastError(0xdeadbeef);
1017 ret = ReadProcessMemory(pi.hProcess, info.BaseAddress, buf, section.SizeOfRawData, NULL);
1018 ok(ret, "ReadProcessMemory() error %d\n", GetLastError());
1019 ok(!memcmp(buf, section_data, section.SizeOfRawData), "wrong section data\n");
1020 }
1021
1022 SetLastError(0xdeadbeef);
1023 ret = TerminateProcess(pi.hProcess, 0);
1024 ok(ret, "TerminateProcess() error %d\n", GetLastError());
1025 ret = WaitForSingleObject(pi.hProcess, 3000);
1026 ok(ret == WAIT_OBJECT_0, "WaitForSingleObject failed: %x\n", ret);
1027
1028 CloseHandle(pi.hThread);
1029 CloseHandle(pi.hProcess);
1030
1031 test_image_mapping(dll_name, td[i].scn_page_access, FALSE);
1032
1033 nt4_is_broken:
1034 SetLastError(0xdeadbeef);
1035 ret = DeleteFile(dll_name);
1036 ok(ret || broken(!ret) /* nt4 */, "DeleteFile error %d\n", GetLastError());
1037 }
1038 }
1039
1040 START_TEST(loader)
1041 {
1042 pNtMapViewOfSection = (void *)GetProcAddress(GetModuleHandle("ntdll.dll"), "NtMapViewOfSection");
1043 pNtUnmapViewOfSection = (void *)GetProcAddress(GetModuleHandle("ntdll.dll"), "NtUnmapViewOfSection");
1044
1045 test_Loader();
1046 test_ImportDescriptors();
1047 test_section_access();
1048 }
Maarten's multimedia branch