dlls/psapi/tests/psapi_main.c

   1 /*
   2  * Unit test suite for PSAPI
   3  *
   4  * Copyright (C) 2005 Felix Nawothnig
   5  * Copyright (C) 2012 Dmitry Timoshkov
   6  *
   7  * This library is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * This library is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with this library; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  20  */
  21
  22 #include <stdarg.h>
  23
  24 #include "ntstatus.h"
  25 #define WIN32_NO_STATUS
  26
  27 #include "windef.h"
  28 #include "winbase.h"
  29 #include "winreg.h"
  30 #include "winnt.h"
  31 #include "winternl.h"
  32 #include "winnls.h"
  33 #include "winuser.h"
  34 #define PSAPI_VERSION 1
  35 #include "psapi.h"
  36 #include "wine/test.h"
  37
  38 static NTSTATUS (WINAPI *pNtQuerySystemInformation)(SYSTEM_INFORMATION_CLASS, PVOID, ULONG, PULONG);
  39 static NTSTATUS (WINAPI *pNtQueryVirtualMemory)(HANDLE, LPCVOID, MEMORY_INFORMATION_CLASS, PVOID, SIZE_T, SIZE_T *);
  40 static BOOL  (WINAPI *pIsWow64Process)(HANDLE, BOOL *);
  41 static BOOL  (WINAPI *pWow64DisableWow64FsRedirection)(void **);
  42 static BOOL  (WINAPI *pWow64RevertWow64FsRedirection)(void *);
  43 static BOOL  (WINAPI *pQueryWorkingSetEx)(HANDLE, PVOID, DWORD);
  44
  45 static BOOL wow64;
  46
  47 static BOOL init_func_ptrs(void)
  48 {
  49     pNtQuerySystemInformation = (void *)GetProcAddress(GetModuleHandleA("ntdll.dll"), "NtQuerySystemInformation");
  50     pNtQueryVirtualMemory = (void *)GetProcAddress(GetModuleHandleA("ntdll.dll"), "NtQueryVirtualMemory");
  51     pIsWow64Process = (void *)GetProcAddress(GetModuleHandleA("kernel32.dll"), "IsWow64Process");
  52     pWow64DisableWow64FsRedirection = (void *)GetProcAddress(GetModuleHandleA("kernel32.dll"), "Wow64DisableWow64FsRedirection");
  53     pWow64RevertWow64FsRedirection = (void *)GetProcAddress(GetModuleHandleA("kernel32.dll"), "Wow64RevertWow64FsRedirection");
  54     pQueryWorkingSetEx = (void *)GetProcAddress(GetModuleHandleA("psapi.dll"), "QueryWorkingSetEx");
  55     return TRUE;
  56 }
  57
  58 static HANDLE hpSR, hpQI, hpVR, hpQV;
  59 static const HANDLE hBad = (HANDLE)0xdeadbeef;
  60
  61 static void test_EnumProcesses(void)
  62 {
  63     DWORD pid, ret, cbUsed = 0xdeadbeef;
  64
  65     SetLastError(0xdeadbeef);
  66     ret = EnumProcesses(NULL, 0, &cbUsed);
  67     ok(ret == 1, "failed with %d\n", GetLastError());
  68     ok(cbUsed == 0, "cbUsed=%d\n", cbUsed);
  69
  70     SetLastError(0xdeadbeef);
  71     ret = EnumProcesses(&pid, 4, &cbUsed);
  72     ok(ret == 1, "failed with %d\n", GetLastError());
  73     ok(cbUsed == 4, "cbUsed=%d\n", cbUsed);
  74 }
  75
  76 static void test_EnumProcessModules(void)
  77 {
  78     char buffer[200] = "C:\\windows\\system32\\notepad.exe";
  79     PROCESS_INFORMATION pi = {0};
  80     STARTUPINFOA si = {0};
  81     void *cookie;
  82     HMODULE hMod;
  83     DWORD ret, cbNeeded = 0xdeadbeef;
  84
  85     SetLastError(0xdeadbeef);
  86     EnumProcessModules(NULL, NULL, 0, &cbNeeded);
  87     ok(GetLastError() == ERROR_INVALID_HANDLE, "expected error=ERROR_INVALID_HANDLE but got %d\n", GetLastError());
  88
  89     SetLastError(0xdeadbeef);
  90     EnumProcessModules(hpQI, NULL, 0, &cbNeeded);
  91     ok(GetLastError() == ERROR_ACCESS_DENIED, "expected error=ERROR_ACCESS_DENIED but got %d\n", GetLastError());
  92
  93     SetLastError(0xdeadbeef);
  94     hMod = (void *)0xdeadbeef;
  95     ret = EnumProcessModules(hpQI, &hMod, sizeof(HMODULE), NULL);
  96     ok(!ret, "succeeded\n");
  97     ok(GetLastError() == ERROR_ACCESS_DENIED, "expected error=ERROR_ACCESS_DENIED but got %d\n", GetLastError());
  98
  99     SetLastError(0xdeadbeef);
 100     hMod = (void *)0xdeadbeef;
 101     ret = EnumProcessModules(hpQV, &hMod, sizeof(HMODULE), NULL);
 102     ok(!ret, "succeeded\n");
 103     ok(GetLastError() == ERROR_NOACCESS, "expected error=ERROR_NOACCESS but got %d\n", GetLastError());
 104     ok(hMod == GetModuleHandleA(NULL),
 105        "hMod=%p GetModuleHandleA(NULL)=%p\n", hMod, GetModuleHandleA(NULL));
 106
 107     SetLastError(0xdeadbeef);
 108     ret = EnumProcessModules(hpQV, NULL, 0, &cbNeeded);
 109     ok(ret == 1, "failed with %d\n", GetLastError());
 110
 111     SetLastError(0xdeadbeef);
 112     ret = EnumProcessModules(hpQV, NULL, sizeof(HMODULE), &cbNeeded);
 113     ok(!ret, "succeeded\n");
 114     ok(GetLastError() == ERROR_NOACCESS, "expected error=ERROR_NOACCESS but got %d\n", GetLastError());
 115
 116     SetLastError(0xdeadbeef);
 117     hMod = (void *)0xdeadbeef;
 118     ret = EnumProcessModules(hpQV, &hMod, sizeof(HMODULE), &cbNeeded);
 119     ok(ret == 1, "got %d, failed with %d\n", ret, GetLastError());
 120     ok(hMod == GetModuleHandleA(NULL),
 121        "hMod=%p GetModuleHandleA(NULL)=%p\n", hMod, GetModuleHandleA(NULL));
 122     ok(cbNeeded % sizeof(hMod) == 0, "not a multiple of sizeof(HMODULE) cbNeeded=%d\n", cbNeeded);
 123
 124     ret = CreateProcessA(NULL, buffer, NULL, NULL, FALSE, 0, NULL, NULL, &si, &pi);
 125     ok(ret, "CreateProcess failed: %u\n", GetLastError());
 126
 127     ret = WaitForInputIdle(pi.hProcess, 5000);
 128     ok(!ret, "wait timed out\n");
 129
 130     SetLastError(0xdeadbeef);
 131     hMod = NULL;
 132     ret = EnumProcessModules(pi.hProcess, &hMod, sizeof(HMODULE), &cbNeeded);
 133     ok(ret == 1, "got %d, error %u\n", ret, GetLastError());
 134     ok(!!hMod, "expected non-NULL module\n");
 135     ok(cbNeeded % sizeof(hMod) == 0, "got %u\n", cbNeeded);
 136
 137     TerminateProcess(pi.hProcess, 0);
 138
 139     if (sizeof(void *) == 8)
 140     {
 141         MODULEINFO info;
 142         char name[40];
 143
 144         strcpy(buffer, "C:\\windows\\syswow64\\notepad.exe");
 145         ret = CreateProcessA(NULL, buffer, NULL, NULL, FALSE, 0, NULL, NULL, &si, &pi);
 146         ok(ret, "CreateProcess failed: %u\n", GetLastError());
 147
 148         ret = WaitForInputIdle(pi.hProcess, 5000);
 149         ok(!ret, "wait timed out\n");
 150
 151         SetLastError(0xdeadbeef);
 152         hMod = NULL;
 153         ret = EnumProcessModules(pi.hProcess, &hMod, sizeof(HMODULE), &cbNeeded);
 154         ok(ret == 1, "got %d, error %u\n", ret, GetLastError());
 155         ok(!!hMod, "expected non-NULL module\n");
 156         ok(cbNeeded % sizeof(hMod) == 0, "got %u\n", cbNeeded);
 157
 158         ret = GetModuleBaseNameA(pi.hProcess, hMod, name, sizeof(name));
 159         ok(ret, "got error %u\n", GetLastError());
 160         ok(!strcmp(name, "notepad.exe"), "got %s\n", name);
 161
 162         ret = GetModuleFileNameExA(pi.hProcess, hMod, name, sizeof(name));
 163         ok(ret, "got error %u\n", GetLastError());
 164         ok(!strcmp(name, buffer), "got %s\n", name);
 165
 166         ret = GetModuleInformation(pi.hProcess, hMod, &info, sizeof(info));
 167         ok(ret, "got error %u\n", GetLastError());
 168         ok(info.lpBaseOfDll == hMod, "expected %p, got %p\n", hMod, info.lpBaseOfDll);
 169         ok(info.SizeOfImage, "image size was 0\n");
 170         ok(info.EntryPoint >= info.lpBaseOfDll, "got entry point %p\n", info.EntryPoint);
 171
 172         TerminateProcess(pi.hProcess, 0);
 173     }
 174     else if (wow64)
 175     {
 176         pWow64DisableWow64FsRedirection(&cookie);
 177         ret = CreateProcessA(NULL, buffer, NULL, NULL, FALSE, 0, NULL, NULL, &si, &pi);
 178         pWow64RevertWow64FsRedirection(cookie);
 179         ok(ret, "CreateProcess failed: %u\n", GetLastError());
 180
 181         ret = WaitForInputIdle(pi.hProcess, 5000);
 182         ok(!ret, "wait timed out\n");
 183
 184         SetLastError(0xdeadbeef);
 185         ret = EnumProcessModules(pi.hProcess, &hMod, sizeof(HMODULE), &cbNeeded);
 186         ok(!ret, "got %d\n", ret);
 187 todo_wine
 188         ok(GetLastError() == ERROR_PARTIAL_COPY, "got error %u\n", GetLastError());
 189
 190         TerminateProcess(pi.hProcess, 0);
 191     }
 192 }
 193
 194 static void test_GetModuleInformation(void)
 195 {
 196     HMODULE hMod = GetModuleHandleA(NULL);
 197     MODULEINFO info;
 198     DWORD ret;
 199
 200     SetLastError(0xdeadbeef);
 201     GetModuleInformation(NULL, hMod, &info, sizeof(info));
 202     ok(GetLastError() == ERROR_INVALID_HANDLE, "expected error=ERROR_INVALID_HANDLE but got %d\n", GetLastError());
 203
 204     SetLastError(0xdeadbeef);
 205     GetModuleInformation(hpQI, hMod, &info, sizeof(info));
 206     ok(GetLastError() == ERROR_ACCESS_DENIED, "expected error=ERROR_ACCESS_DENIED but got %d\n", GetLastError());
 207
 208     SetLastError(0xdeadbeef);
 209     GetModuleInformation(hpQV, hBad, &info, sizeof(info));
 210     ok(GetLastError() == ERROR_INVALID_HANDLE, "expected error=ERROR_INVALID_HANDLE but got %d\n", GetLastError());
 211
 212     SetLastError(0xdeadbeef);
 213     GetModuleInformation(hpQV, hMod, &info, sizeof(info)-1);
 214     ok(GetLastError() == ERROR_INSUFFICIENT_BUFFER, "expected error=ERROR_INSUFFICIENT_BUFFER but got %d\n", GetLastError());
 215
 216     SetLastError(0xdeadbeef);
 217     ret = GetModuleInformation(hpQV, hMod, &info, sizeof(info));
 218     ok(ret == 1, "failed with %d\n", GetLastError());
 219     ok(info.lpBaseOfDll == hMod, "lpBaseOfDll=%p hMod=%p\n", info.lpBaseOfDll, hMod);
 220 }
 221
 222 static BOOL check_with_margin(SIZE_T perf, SIZE_T sysperf, int margin)
 223 {
 224     return (perf >= max(sysperf, margin) - margin && perf <= sysperf + margin);
 225 }
 226
 227 static void test_GetPerformanceInfo(void)
 228 {
 229     PERFORMANCE_INFORMATION info;
 230     NTSTATUS status;
 231     DWORD size;
 232     BOOL ret;
 233
 234     SetLastError(0xdeadbeef);
 235     ret = GetPerformanceInfo(&info, sizeof(info)-1);
 236     ok(!ret, "GetPerformanceInfo unexpectedly succeeded\n");
 237     ok(GetLastError() == ERROR_BAD_LENGTH, "expected error=ERROR_BAD_LENGTH but got %d\n", GetLastError());
 238
 239     if (!pNtQuerySystemInformation)
 240         win_skip("NtQuerySystemInformation not found, skipping tests\n");
 241     else
 242     {
 243         char performance_buffer[sizeof(SYSTEM_PERFORMANCE_INFORMATION) + 16]; /* larger on w2k8/win7 */
 244         SYSTEM_PERFORMANCE_INFORMATION *sys_performance_info = (SYSTEM_PERFORMANCE_INFORMATION *)performance_buffer;
 245         SYSTEM_PROCESS_INFORMATION *sys_process_info = NULL, *spi;
 246         SYSTEM_BASIC_INFORMATION sys_basic_info;
 247         DWORD process_count, handle_count, thread_count;
 248
 249         /* compare with values from SYSTEM_PERFORMANCE_INFORMATION */
 250         size = 0;
 251         status = pNtQuerySystemInformation(SystemPerformanceInformation, sys_performance_info, sizeof(performance_buffer), &size);
 252         ok(status == STATUS_SUCCESS, "expected STATUS_SUCCESS, got %08x\n", status);
 253         ok(size >= sizeof(SYSTEM_PERFORMANCE_INFORMATION), "incorrect length %d\n", size);
 254
 255         SetLastError(0xdeadbeef);
 256         ret = GetPerformanceInfo(&info, sizeof(info));
 257         ok(ret, "GetPerformanceInfo failed with %d\n", GetLastError());
 258         ok(info.cb == sizeof(PERFORMANCE_INFORMATION), "got %d\n", info.cb);
 259
 260         ok(check_with_margin(info.CommitTotal,          sys_performance_info->TotalCommittedPages,  2048),
 261            "expected approximately %ld but got %d\n", info.CommitTotal, sys_performance_info->TotalCommittedPages);
 262
 263         ok(check_with_margin(info.CommitLimit,          sys_performance_info->TotalCommitLimit,     32),
 264            "expected approximately %ld but got %d\n", info.CommitLimit, sys_performance_info->TotalCommitLimit);
 265
 266         ok(check_with_margin(info.CommitPeak,           sys_performance_info->PeakCommitment,       32),
 267            "expected approximately %ld but got %d\n", info.CommitPeak, sys_performance_info->PeakCommitment);
 268
 269         ok(check_with_margin(info.PhysicalAvailable,    sys_performance_info->AvailablePages,       2048),
 270            "expected approximately %ld but got %d\n", info.PhysicalAvailable, sys_performance_info->AvailablePages);
 271
 272         /* TODO: info.SystemCache not checked yet - to which field(s) does this value correspond to? */
 273
 274         ok(check_with_margin(info.KernelTotal, sys_performance_info->PagedPoolUsage + sys_performance_info->NonPagedPoolUsage, 256),
 275            "expected approximately %ld but got %d\n", info.KernelTotal,
 276            sys_performance_info->PagedPoolUsage + sys_performance_info->NonPagedPoolUsage);
 277
 278         ok(check_with_margin(info.KernelPaged,          sys_performance_info->PagedPoolUsage,       256),
 279            "expected approximately %ld but got %d\n", info.KernelPaged, sys_performance_info->PagedPoolUsage);
 280
 281         ok(check_with_margin(info.KernelNonpaged,       sys_performance_info->NonPagedPoolUsage,    16),
 282            "expected approximately %ld but got %d\n", info.KernelNonpaged, sys_performance_info->NonPagedPoolUsage);
 283
 284         /* compare with values from SYSTEM_BASIC_INFORMATION */
 285         size = 0;
 286         status = pNtQuerySystemInformation(SystemBasicInformation, &sys_basic_info, sizeof(sys_basic_info), &size);
 287         ok(status == STATUS_SUCCESS, "expected STATUS_SUCCESS, got %08x\n", status);
 288         ok(size >= sizeof(SYSTEM_BASIC_INFORMATION), "incorrect length %d\n", size);
 289
 290         ok(info.PhysicalTotal == sys_basic_info.MmNumberOfPhysicalPages,
 291            "expected info.PhysicalTotal=%u but got %u\n",
 292            sys_basic_info.MmNumberOfPhysicalPages, (ULONG)info.PhysicalTotal);
 293
 294         ok(info.PageSize == sys_basic_info.PageSize,
 295            "expected info.PageSize=%u but got %u\n",
 296            sys_basic_info.PageSize, (ULONG)info.PageSize);
 297
 298         /* compare with values from SYSTEM_PROCESS_INFORMATION */
 299         size = 0;
 300         status = pNtQuerySystemInformation(SystemProcessInformation, NULL, 0, &size);
 301         ok(status == STATUS_INFO_LENGTH_MISMATCH, "expected STATUS_INFO_LENGTH_MISMATCH, got %08x\n", status);
 302         ok(size > 0, "incorrect length %d\n", size);
 303         while (status == STATUS_INFO_LENGTH_MISMATCH)
 304         {
 305             sys_process_info = HeapAlloc(GetProcessHeap(), 0, size);
 306             ok(sys_process_info != NULL, "failed to allocate memory\n");
 307             status = pNtQuerySystemInformation(SystemProcessInformation, sys_process_info, size, &size);
 308             if (status == STATUS_SUCCESS) break;
 309             HeapFree(GetProcessHeap(), 0, sys_process_info);
 310         }
 311         ok(status == STATUS_SUCCESS, "expected STATUS_SUCCESS, got %08x\n", status);
 312
 313         process_count = handle_count = thread_count = 0;
 314         for (spi = sys_process_info;; spi = (SYSTEM_PROCESS_INFORMATION *)(((char *)spi) + spi->NextEntryOffset))
 315         {
 316             process_count++;
 317             handle_count += spi->HandleCount;
 318             thread_count += spi->dwThreadCount;
 319             if (spi->NextEntryOffset == 0) break;
 320         }
 321         HeapFree(GetProcessHeap(), 0, sys_process_info);
 322
 323         ok(check_with_margin(info.HandleCount,  handle_count,  512),
 324            "expected approximately %d but got %d\n", info.HandleCount, handle_count);
 325
 326         ok(check_with_margin(info.ProcessCount, process_count, 4),
 327            "expected approximately %d but got %d\n", info.ProcessCount, process_count);
 328
 329         ok(check_with_margin(info.ThreadCount,  thread_count,  4),
 330            "expected approximately %d but got %d\n", info.ThreadCount, thread_count);
 331     }
 332 }
 333
 334
 335 static void test_GetProcessMemoryInfo(void)
 336 {
 337     PROCESS_MEMORY_COUNTERS pmc;
 338     DWORD ret;
 339
 340     SetLastError(0xdeadbeef);
 341     ret = GetProcessMemoryInfo(NULL, &pmc, sizeof(pmc));
 342     ok(!ret, "GetProcessMemoryInfo should fail\n");
 343     ok(GetLastError() == ERROR_INVALID_HANDLE, "expected error=ERROR_INVALID_HANDLE but got %d\n", GetLastError());
 344
 345     SetLastError(0xdeadbeef);
 346     ret = GetProcessMemoryInfo(hpSR, &pmc, sizeof(pmc));
 347     ok(!ret, "GetProcessMemoryInfo should fail\n");
 348     ok(GetLastError() == ERROR_ACCESS_DENIED, "expected error=ERROR_ACCESS_DENIED but got %d\n", GetLastError());
 349
 350     SetLastError(0xdeadbeef);
 351     ret = GetProcessMemoryInfo(hpQI, &pmc, sizeof(pmc)-1);
 352     ok(!ret, "GetProcessMemoryInfo should fail\n");
 353     ok(GetLastError() == ERROR_INSUFFICIENT_BUFFER, "expected error=ERROR_INSUFFICIENT_BUFFER but got %d\n", GetLastError());
 354
 355     SetLastError(0xdeadbeef);
 356     ret = GetProcessMemoryInfo(hpQI, &pmc, sizeof(pmc));
 357     ok(ret == 1, "failed with %d\n", GetLastError());
 358 }
 359
 360 static BOOL nt_get_mapped_file_name(HANDLE process, LPVOID addr, LPWSTR name, DWORD len)
 361 {
 362     MEMORY_SECTION_NAME *section_name;
 363     WCHAR *buf;
 364     SIZE_T buf_len, ret_len;
 365     NTSTATUS status;
 366
 367     if (!pNtQueryVirtualMemory) return FALSE;
 368
 369     buf_len = len * sizeof(WCHAR) + sizeof(MEMORY_SECTION_NAME);
 370     buf = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, buf_len);
 371
 372     ret_len = 0xdeadbeef;
 373     status = pNtQueryVirtualMemory(process, addr, MemoryMappedFilenameInformation, buf, buf_len, &ret_len);
 374     ok(!status, "NtQueryVirtualMemory error %x\n", status);
 375
 376     section_name = (MEMORY_SECTION_NAME *)buf;
 377     ok(ret_len == section_name->SectionFileName.MaximumLength + sizeof(*section_name), "got %lu, %u\n",
 378        ret_len, section_name->SectionFileName.MaximumLength);
 379     ok((char *)section_name->SectionFileName.Buffer == (char *)section_name + sizeof(*section_name), "got %p, %p\n",
 380        section_name, section_name->SectionFileName.Buffer);
 381     ok(section_name->SectionFileName.MaximumLength == section_name->SectionFileName.Length + sizeof(WCHAR), "got %u, %u\n",
 382        section_name->SectionFileName.MaximumLength, section_name->SectionFileName.Length);
 383     ok(section_name->SectionFileName.Length == lstrlenW(section_name->SectionFileName.Buffer) * sizeof(WCHAR), "got %u, %u\n",
 384        section_name->SectionFileName.Length, lstrlenW(section_name->SectionFileName.Buffer));
 385
 386     memcpy(name, section_name->SectionFileName.Buffer, section_name->SectionFileName.MaximumLength);
 387     HeapFree(GetProcessHeap(), 0, buf);
 388     return TRUE;
 389 }
 390
 391 static void test_GetMappedFileName(void)
 392 {
 393     HMODULE hMod = GetModuleHandleA(NULL);
 394     char szMapPath[MAX_PATH], szModPath[MAX_PATH], *szMapBaseName;
 395     DWORD ret;
 396     char *base;
 397     char temp_path[MAX_PATH], file_name[MAX_PATH], map_name[MAX_PATH], device_name[MAX_PATH], drive[3];
 398     WCHAR map_nameW[MAX_PATH], nt_map_name[MAX_PATH];
 399     HANDLE hfile, hmap;
 400
 401     SetLastError(0xdeadbeef);
 402     ret = GetMappedFileNameA(NULL, hMod, szMapPath, sizeof(szMapPath));
 403     ok(!ret, "GetMappedFileName should fail\n");
 404     ok(GetLastError() == ERROR_INVALID_HANDLE, "expected error=ERROR_INVALID_HANDLE but got %d\n", GetLastError());
 405
 406     SetLastError(0xdeadbeef);
 407     ret = GetMappedFileNameA(hpSR, hMod, szMapPath, sizeof(szMapPath));
 408     ok(!ret, "GetMappedFileName should fail\n");
 409     ok(GetLastError() == ERROR_ACCESS_DENIED, "expected error=ERROR_ACCESS_DENIED but got %d\n", GetLastError());
 410
 411     SetLastError( 0xdeadbeef );
 412     ret = GetMappedFileNameA(hpQI, hMod, szMapPath, sizeof(szMapPath));
 413     ok( ret || broken(GetLastError() == ERROR_UNEXP_NET_ERR), /* win2k */
 414         "GetMappedFileNameA failed with error %u\n", GetLastError() );
 415     if (ret)
 416     {
 417         ok(ret == strlen(szMapPath), "szMapPath=\"%s\" ret=%d\n", szMapPath, ret);
 418         ok(szMapPath[0] == '\\', "szMapPath=\"%s\"\n", szMapPath);
 419         szMapBaseName = strrchr(szMapPath, '\\'); /* That's close enough for us */
 420         ok(szMapBaseName && *szMapBaseName, "szMapPath=\"%s\"\n", szMapPath);
 421         if (szMapBaseName)
 422         {
 423             GetModuleFileNameA(NULL, szModPath, sizeof(szModPath));
 424             ok(!strcmp(strrchr(szModPath, '\\'), szMapBaseName),
 425                "szModPath=\"%s\" szMapBaseName=\"%s\"\n", szModPath, szMapBaseName);
 426         }
 427     }
 428
 429     GetTempPathA(MAX_PATH, temp_path);
 430     GetTempFileNameA(temp_path, "map", 0, file_name);
 431
 432     drive[0] = file_name[0];
 433     drive[1] = ':';
 434     drive[2] = 0;
 435     SetLastError(0xdeadbeef);
 436     ret = QueryDosDeviceA(drive, device_name, sizeof(device_name));
 437     ok(ret, "QueryDosDeviceA error %d\n", GetLastError());
 438     trace("%s -> %s\n", drive, device_name);
 439
 440     SetLastError(0xdeadbeef);
 441     hfile = CreateFileA(file_name, GENERIC_READ | GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, 0, 0);
 442     ok(hfile != INVALID_HANDLE_VALUE, "CreateFileA(%s) error %d\n", file_name, GetLastError());
 443     SetFilePointer(hfile, 0x4000, NULL, FILE_BEGIN);
 444     SetEndOfFile(hfile);
 445
 446     SetLastError(0xdeadbeef);
 447     hmap = CreateFileMappingA(hfile, NULL, PAGE_READONLY | SEC_COMMIT, 0, 0, NULL);
 448     ok(hmap != 0, "CreateFileMappingA error %d\n", GetLastError());
 449
 450     SetLastError(0xdeadbeef);
 451     base = MapViewOfFile(hmap, FILE_MAP_READ, 0, 0, 0);
 452     ok(base != NULL, "MapViewOfFile error %d\n", GetLastError());
 453
 454     SetLastError(0xdeadbeef);
 455     ret = GetMappedFileNameA(GetCurrentProcess(), base, map_name, 0);
 456     ok(!ret, "GetMappedFileName should fail\n");
 457     ok(GetLastError() == ERROR_INVALID_PARAMETER || GetLastError() == ERROR_INSUFFICIENT_BUFFER,
 458        "wrong error %d\n", GetLastError());
 459
 460     SetLastError(0xdeadbeef);
 461     ret = GetMappedFileNameA(GetCurrentProcess(), base, 0, sizeof(map_name));
 462     ok(!ret, "GetMappedFileName should fail\n");
 463     ok(GetLastError() == ERROR_INVALID_PARAMETER, "expected ERROR_INVALID_PARAMETER, got %d\n", GetLastError());
 464
 465     SetLastError(0xdeadbeef);
 466     ret = GetMappedFileNameA(GetCurrentProcess(), base, map_name, 1);
 467     ok(ret == 1, "GetMappedFileName error %d\n", GetLastError());
 468     ok(!map_name[0] || broken(map_name[0] == device_name[0]) /* before win2k */, "expected 0, got %c\n", map_name[0]);
 469
 470     SetLastError(0xdeadbeef);
 471     ret = GetMappedFileNameA(GetCurrentProcess(), base, map_name, sizeof(map_name));
 472     ok(ret, "GetMappedFileName error %d\n", GetLastError());
 473     ok(ret > strlen(device_name), "map_name should be longer than device_name\n");
 474     todo_wine
 475     ok(memcmp(map_name, device_name, strlen(device_name)) == 0, "map name does not start with a device name: %s\n", map_name);
 476
 477     SetLastError(0xdeadbeef);
 478     ret = GetMappedFileNameW(GetCurrentProcess(), base, map_nameW, ARRAY_SIZE(map_nameW));
 479     ok(ret, "GetMappedFileNameW error %d\n", GetLastError());
 480     ok(ret > strlen(device_name), "map_name should be longer than device_name\n");
 481     if (nt_get_mapped_file_name(GetCurrentProcess(), base, nt_map_name, ARRAY_SIZE(nt_map_name)))
 482     {
 483         ok(memcmp(map_nameW, nt_map_name, lstrlenW(map_nameW)) == 0, "map name does not start with a device name: %s\n", map_name);
 484         WideCharToMultiByte(CP_ACP, 0, map_nameW, -1, map_name, MAX_PATH, NULL, NULL);
 485         todo_wine
 486         ok(memcmp(map_name, device_name, strlen(device_name)) == 0, "map name does not start with a device name: %s\n", map_name);
 487     }
 488
 489     SetLastError(0xdeadbeef);
 490     ret = GetMappedFileNameA(GetCurrentProcess(), base + 0x2000, map_name, sizeof(map_name));
 491     ok(ret, "GetMappedFileName error %d\n", GetLastError());
 492     ok(ret > strlen(device_name), "map_name should be longer than device_name\n");
 493     todo_wine
 494     ok(memcmp(map_name, device_name, strlen(device_name)) == 0, "map name does not start with a device name: %s\n", map_name);
 495
 496     SetLastError(0xdeadbeef);
 497     ret = GetMappedFileNameA(GetCurrentProcess(), base + 0x4000, map_name, sizeof(map_name));
 498     ok(!ret, "GetMappedFileName should fail\n");
 499     ok(GetLastError() == ERROR_UNEXP_NET_ERR, "expected ERROR_UNEXP_NET_ERR, got %d\n", GetLastError());
 500
 501     SetLastError(0xdeadbeef);
 502     ret = GetMappedFileNameA(GetCurrentProcess(), NULL, map_name, sizeof(map_name));
 503     ok(!ret, "GetMappedFileName should fail\n");
 504     ok(GetLastError() == ERROR_UNEXP_NET_ERR, "expected ERROR_UNEXP_NET_ERR, got %d\n", GetLastError());
 505
 506     SetLastError(0xdeadbeef);
 507     ret = GetMappedFileNameA(0, base, map_name, sizeof(map_name));
 508     ok(!ret, "GetMappedFileName should fail\n");
 509     ok(GetLastError() == ERROR_INVALID_HANDLE, "expected ERROR_INVALID_HANDLE, got %d\n", GetLastError());
 510
 511     UnmapViewOfFile(base);
 512     CloseHandle(hmap);
 513     CloseHandle(hfile);
 514     DeleteFileA(file_name);
 515
 516     SetLastError(0xdeadbeef);
 517     hmap = CreateFileMappingA(INVALID_HANDLE_VALUE, NULL, PAGE_READONLY | SEC_COMMIT, 0, 4096, NULL);
 518     ok(hmap != 0, "CreateFileMappingA error %d\n", GetLastError());
 519
 520     SetLastError(0xdeadbeef);
 521     base = MapViewOfFile(hmap, FILE_MAP_READ, 0, 0, 0);
 522     ok(base != NULL, "MapViewOfFile error %d\n", GetLastError());
 523
 524     SetLastError(0xdeadbeef);
 525     ret = GetMappedFileNameA(GetCurrentProcess(), base, map_name, sizeof(map_name));
 526     ok(!ret, "GetMappedFileName should fail\n");
 527     ok(GetLastError() == ERROR_FILE_INVALID, "expected ERROR_FILE_INVALID, got %d\n", GetLastError());
 528
 529     UnmapViewOfFile(base);
 530     CloseHandle(hmap);
 531 }
 532
 533 static void test_GetProcessImageFileName(void)
 534 {
 535     HMODULE hMod = GetModuleHandleA(NULL);
 536     char szImgPath[MAX_PATH], szMapPath[MAX_PATH];
 537     WCHAR szImgPathW[MAX_PATH];
 538     DWORD ret, ret1;
 539
 540     /* This function is available on WinXP+ only */
 541     SetLastError(0xdeadbeef);
 542     if(!GetProcessImageFileNameA(hpQI, szImgPath, sizeof(szImgPath)))
 543     {
 544         if(GetLastError() == ERROR_INVALID_FUNCTION) {
 545             win_skip("GetProcessImageFileName not implemented\n");
 546             return;
 547         }
 548         ok(0, "failed with %d\n", GetLastError());
 549     }
 550
 551     SetLastError(0xdeadbeef);
 552     GetProcessImageFileNameA(NULL, szImgPath, sizeof(szImgPath));
 553     ok(GetLastError() == ERROR_INVALID_HANDLE, "expected error=ERROR_INVALID_HANDLE but got %d\n", GetLastError());
 554
 555     SetLastError(0xdeadbeef);
 556     GetProcessImageFileNameA(hpSR, szImgPath, sizeof(szImgPath));
 557     ok(GetLastError() == ERROR_ACCESS_DENIED, "expected error=ERROR_ACCESS_DENIED but got %d\n", GetLastError());
 558
 559     SetLastError(0xdeadbeef);
 560     GetProcessImageFileNameA(hpQI, szImgPath, 0);
 561     ok(GetLastError() == ERROR_INSUFFICIENT_BUFFER, "expected error=ERROR_INSUFFICIENT_BUFFER but got %d\n", GetLastError());
 562
 563     ret = GetProcessImageFileNameA(hpQI, szImgPath, sizeof(szImgPath));
 564     ret1 = GetMappedFileNameA(hpQV, hMod, szMapPath, sizeof(szMapPath));
 565     if(ret && ret1)
 566     {
 567         /* Windows returns 2*strlen-1 */
 568         ok(ret >= strlen(szImgPath), "szImgPath=\"%s\" ret=%d\n", szImgPath, ret);
 569         todo_wine ok(!strcmp(szImgPath, szMapPath), "szImgPath=\"%s\" szMapPath=\"%s\"\n", szImgPath, szMapPath);
 570     }
 571
 572     SetLastError(0xdeadbeef);
 573     GetProcessImageFileNameW(NULL, szImgPathW, ARRAY_SIZE(szImgPathW));
 574     ok(GetLastError() == ERROR_INVALID_HANDLE, "expected error=ERROR_INVALID_HANDLE but got %d\n", GetLastError());
 575
 576     /* no information about correct buffer size returned: */
 577     SetLastError(0xdeadbeef);
 578     GetProcessImageFileNameW(hpQI, szImgPathW, 0);
 579     ok(GetLastError() == ERROR_INSUFFICIENT_BUFFER, "expected error=ERROR_INSUFFICIENT_BUFFER but got %d\n", GetLastError());
 580
 581     SetLastError(0xdeadbeef);
 582     GetProcessImageFileNameW(hpQI, NULL, 0);
 583     ok(GetLastError() == ERROR_INSUFFICIENT_BUFFER, "expected error=ERROR_INSUFFICIENT_BUFFER but got %d\n", GetLastError());
 584
 585     /* correct call */
 586     memset(szImgPathW, 0xff, sizeof(szImgPathW));
 587     ret = GetProcessImageFileNameW(hpQI, szImgPathW, ARRAY_SIZE(szImgPathW));
 588     ok(ret > 0, "GetProcessImageFileNameW should have succeeded.\n");
 589     ok(szImgPathW[0] == '\\', "GetProcessImageFileNameW should have returned an NT path.\n");
 590     ok(lstrlenW(szImgPathW) == ret, "Expected length to be %d, got %d\n", ret, lstrlenW(szImgPathW));
 591
 592     /* boundary values of 'size' */
 593     SetLastError(0xdeadbeef);
 594     GetProcessImageFileNameW(hpQI, szImgPathW, ret);
 595     ok(GetLastError() == ERROR_INSUFFICIENT_BUFFER, "expected error=ERROR_INSUFFICIENT_BUFFER but got %d\n", GetLastError());
 596
 597     memset(szImgPathW, 0xff, sizeof(szImgPathW));
 598     ret = GetProcessImageFileNameW(hpQI, szImgPathW, ret + 1);
 599     ok(ret > 0, "GetProcessImageFileNameW should have succeeded.\n");
 600     ok(szImgPathW[0] == '\\', "GetProcessImageFileNameW should have returned an NT path.\n");
 601     ok(lstrlenW(szImgPathW) == ret, "Expected length to be %d, got %d\n", ret, lstrlenW(szImgPathW));
 602 }
 603
 604 static void test_GetModuleFileNameEx(void)
 605 {
 606     HMODULE hMod = GetModuleHandleA(NULL);
 607     char szModExPath[MAX_PATH+1], szModPath[MAX_PATH+1];
 608     WCHAR buffer[MAX_PATH];
 609     DWORD ret;
 610
 611     SetLastError(0xdeadbeef);
 612     ret = GetModuleFileNameExA(NULL, hMod, szModExPath, sizeof(szModExPath));
 613     ok( !ret, "GetModuleFileNameExA succeeded\n" );
 614     ok(GetLastError() == ERROR_INVALID_HANDLE, "expected error=ERROR_INVALID_HANDLE but got %d\n", GetLastError());
 615
 616     SetLastError(0xdeadbeef);
 617     ret = GetModuleFileNameExA(hpQI, hMod, szModExPath, sizeof(szModExPath));
 618     ok( !ret, "GetModuleFileNameExA succeeded\n" );
 619     ok(GetLastError() == ERROR_ACCESS_DENIED, "expected error=ERROR_ACCESS_DENIED but got %d\n", GetLastError());
 620
 621     SetLastError(0xdeadbeef);
 622     ret = GetModuleFileNameExA(hpQV, hBad, szModExPath, sizeof(szModExPath));
 623     ok( !ret, "GetModuleFileNameExA succeeded\n" );
 624     ok(GetLastError() == ERROR_INVALID_HANDLE, "expected error=ERROR_INVALID_HANDLE but got %d\n", GetLastError());
 625
 626     ret = GetModuleFileNameExA(hpQV, NULL, szModExPath, sizeof(szModExPath));
 627     if(!ret)
 628             return;
 629     ok(ret == strlen(szModExPath), "szModExPath=\"%s\" ret=%d\n", szModExPath, ret);
 630     GetModuleFileNameA(NULL, szModPath, sizeof(szModPath));
 631     ok(!strncmp(szModExPath, szModPath, MAX_PATH),
 632        "szModExPath=\"%s\" szModPath=\"%s\"\n", szModExPath, szModPath);
 633
 634     SetLastError(0xdeadbeef);
 635     memset( szModExPath, 0xcc, sizeof(szModExPath) );
 636     ret = GetModuleFileNameExA(hpQV, NULL, szModExPath, 4 );
 637     ok( ret == 4 || ret == strlen(szModExPath), "wrong length %u\n", ret );
 638     ok( broken(szModExPath[3]) /*w2kpro*/ || strlen(szModExPath) == 3,
 639         "szModExPath=\"%s\" ret=%d\n", szModExPath, ret );
 640     ok(GetLastError() == 0xdeadbeef, "got error %d\n", GetLastError());
 641
 642     if (0) /* crashes on Windows 10 */
 643     {
 644         SetLastError(0xdeadbeef);
 645         ret = GetModuleFileNameExA(hpQV, NULL, szModExPath, 0 );
 646         ok( ret == 0, "wrong length %u\n", ret );
 647         ok(GetLastError() == ERROR_INVALID_PARAMETER, "got error %d\n", GetLastError());
 648     }
 649
 650     SetLastError(0xdeadbeef);
 651     memset( buffer, 0xcc, sizeof(buffer) );
 652     ret = GetModuleFileNameExW(hpQV, NULL, buffer, 4 );
 653     ok( ret == 4 || ret == lstrlenW(buffer), "wrong length %u\n", ret );
 654     ok( broken(buffer[3]) /*w2kpro*/ || lstrlenW(buffer) == 3,
 655         "buffer=%s ret=%d\n", wine_dbgstr_w(buffer), ret );
 656     ok(GetLastError() == 0xdeadbeef, "got error %d\n", GetLastError());
 657
 658     if (0) /* crashes on Windows 10 */
 659     {
 660         SetLastError(0xdeadbeef);
 661         buffer[0] = 0xcc;
 662         ret = GetModuleFileNameExW(hpQV, NULL, buffer, 0 );
 663         ok( ret == 0, "wrong length %u\n", ret );
 664         ok(GetLastError() == 0xdeadbeef, "got error %d\n", GetLastError());
 665         ok( buffer[0] == 0xcc, "buffer modified %s\n", wine_dbgstr_w(buffer) );
 666     }
 667 }
 668
 669 static void test_GetModuleBaseName(void)
 670 {
 671     HMODULE hMod = GetModuleHandleA(NULL);
 672     char szModPath[MAX_PATH], szModBaseName[MAX_PATH];
 673     DWORD ret;
 674
 675     SetLastError(0xdeadbeef);
 676     GetModuleBaseNameA(NULL, hMod, szModBaseName, sizeof(szModBaseName));
 677     ok(GetLastError() == ERROR_INVALID_HANDLE, "expected error=ERROR_INVALID_HANDLE but got %d\n", GetLastError());
 678
 679     SetLastError(0xdeadbeef);
 680     GetModuleBaseNameA(hpQI, hMod, szModBaseName, sizeof(szModBaseName));
 681     ok(GetLastError() == ERROR_ACCESS_DENIED, "expected error=ERROR_ACCESS_DENIED but got %d\n", GetLastError());
 682
 683     SetLastError(0xdeadbeef);
 684     GetModuleBaseNameA(hpQV, hBad, szModBaseName, sizeof(szModBaseName));
 685     ok(GetLastError() == ERROR_INVALID_HANDLE, "expected error=ERROR_INVALID_HANDLE but got %d\n", GetLastError());
 686
 687     ret = GetModuleBaseNameA(hpQV, NULL, szModBaseName, sizeof(szModBaseName));
 688     if(!ret)
 689         return;
 690     ok(ret == strlen(szModBaseName), "szModBaseName=\"%s\" ret=%d\n", szModBaseName, ret);
 691     GetModuleFileNameA(NULL, szModPath, sizeof(szModPath));
 692     ok(!strcmp(strrchr(szModPath, '\\') + 1, szModBaseName),
 693        "szModPath=\"%s\" szModBaseName=\"%s\"\n", szModPath, szModBaseName);
 694 }
 695
 696 static void test_ws_functions(void)
 697 {
 698     PSAPI_WS_WATCH_INFORMATION wswi[4096];
 699     HANDLE ws_handle;
 700     char *addr;
 701     unsigned int i;
 702     BOOL ret;
 703
 704     ws_handle = OpenProcess(PROCESS_QUERY_INFORMATION | PROCESS_SET_QUOTA |
 705         PROCESS_SET_INFORMATION, FALSE, GetCurrentProcessId());
 706     ok(!!ws_handle, "got error %u\n", GetLastError());
 707
 708     SetLastError(0xdeadbeef);
 709     EmptyWorkingSet(NULL);
 710     todo_wine ok(GetLastError() == ERROR_INVALID_HANDLE, "expected error=ERROR_INVALID_HANDLE but got %d\n", GetLastError());
 711
 712     SetLastError(0xdeadbeef);
 713     EmptyWorkingSet(hpSR);
 714     todo_wine ok(GetLastError() == ERROR_ACCESS_DENIED, "expected error=ERROR_ACCESS_DENIED but got %d\n", GetLastError());
 715
 716     SetLastError(0xdeadbeef);
 717     ret = EmptyWorkingSet(ws_handle);
 718     ok(ret == 1, "failed with %d\n", GetLastError());
 719
 720     SetLastError( 0xdeadbeef );
 721     ret = InitializeProcessForWsWatch( NULL );
 722     todo_wine ok( !ret, "InitializeProcessForWsWatch succeeded\n" );
 723     if (!ret)
 724     {
 725         if (GetLastError() == ERROR_INVALID_FUNCTION)  /* not supported on xp in wow64 mode */
 726         {
 727             trace( "InitializeProcessForWsWatch not supported\n" );
 728             return;
 729         }
 730         ok( GetLastError() == ERROR_INVALID_HANDLE, "wrong error %u\n", GetLastError() );
 731     }
 732     SetLastError(0xdeadbeef);
 733     ret = InitializeProcessForWsWatch(ws_handle);
 734     ok(ret == 1, "failed with %d\n", GetLastError());
 735
 736     addr = VirtualAlloc(NULL, 1, MEM_COMMIT, PAGE_READWRITE);
 737     if(!addr)
 738         return;
 739
 740     *addr = 0; /* make sure it's paged in (needed on wow64) */
 741     if(!VirtualLock(addr, 1))
 742     {
 743         trace("locking failed (error=%d) - skipping test\n", GetLastError());
 744         goto free_page;
 745     }
 746
 747     SetLastError(0xdeadbeef);
 748     ret = GetWsChanges(hpQI, wswi, sizeof(wswi));
 749     todo_wine ok(ret == 1, "failed with %d\n", GetLastError());
 750     if(ret == 1)
 751     {
 752         for(i = 0; wswi[i].FaultingVa; i++)
 753             if(((ULONG_PTR)wswi[i].FaultingVa & ~0xfffL) == (ULONG_PTR)addr)
 754             {
 755                 todo_wine ok(ret == 1, "GetWsChanges found our page\n");
 756                 goto free_page;
 757             }
 758
 759         todo_wine ok(0, "GetWsChanges didn't find our page\n");
 760     }
 761
 762 free_page:
 763     VirtualFree(addr, 0, MEM_RELEASE);
 764 }
 765
 766 static void check_QueryWorkingSetEx(PVOID addr, const char *desc, DWORD expected_valid,
 767                                     DWORD expected_protection, DWORD expected_shared, BOOL todo)
 768 {
 769     PSAPI_WORKING_SET_EX_INFORMATION info;
 770     BOOL ret;
 771
 772     memset(&info, 0x41, sizeof(info));
 773     info.VirtualAddress = addr;
 774     ret = pQueryWorkingSetEx(GetCurrentProcess(), &info, sizeof(info));
 775     ok(ret, "QueryWorkingSetEx failed with %d\n", GetLastError());
 776
 777     todo_wine_if(todo)
 778     ok(info.VirtualAttributes.Valid == expected_valid, "%s expected Valid=%u but got %u\n",
 779         desc, expected_valid, info.VirtualAttributes.Valid);
 780
 781     todo_wine_if(todo)
 782     ok(info.VirtualAttributes.Win32Protection == expected_protection, "%s expected Win32Protection=%u but got %u\n",
 783         desc, expected_protection, info.VirtualAttributes.Win32Protection);
 784
 785     ok(info.VirtualAttributes.Node == 0, "%s expected Node=0 but got %u\n",
 786         desc, info.VirtualAttributes.Node);
 787     ok(info.VirtualAttributes.LargePage == 0, "%s expected LargePage=0 but got %u\n",
 788         desc, info.VirtualAttributes.LargePage);
 789
 790     ok(info.VirtualAttributes.Shared == expected_shared || broken(!info.VirtualAttributes.Valid) /* w2003 */,
 791         "%s expected Shared=%u but got %u\n", desc, expected_shared, info.VirtualAttributes.Shared);
 792     if (info.VirtualAttributes.Valid && info.VirtualAttributes.Shared)
 793         ok(info.VirtualAttributes.ShareCount > 0, "%s expected ShareCount > 0 but got %u\n",
 794             desc, info.VirtualAttributes.ShareCount);
 795     else
 796         ok(info.VirtualAttributes.ShareCount == 0, "%s expected ShareCount == 0 but got %u\n",
 797             desc, info.VirtualAttributes.ShareCount);
 798 }
 799
 800 static void test_QueryWorkingSetEx(void)
 801 {
 802     PVOID addr;
 803     DWORD prot;
 804     BOOL ret;
 805
 806     if (pQueryWorkingSetEx == NULL)
 807     {
 808         win_skip("QueryWorkingSetEx not found, skipping tests\n");
 809         return;
 810     }
 811
 812     addr = GetModuleHandleA(NULL);
 813     check_QueryWorkingSetEx(addr, "exe", 1, PAGE_READONLY, 1, FALSE);
 814
 815     ret = VirtualProtect(addr, 0x1000, PAGE_NOACCESS, &prot);
 816     ok(ret, "VirtualProtect failed with %d\n", GetLastError());
 817     check_QueryWorkingSetEx(addr, "exe,noaccess", 0, 0, 1, FALSE);
 818
 819     ret = VirtualProtect(addr, 0x1000, prot, &prot);
 820     ok(ret, "VirtualProtect failed with %d\n", GetLastError());
 821     check_QueryWorkingSetEx(addr, "exe,readonly1", 0, 0, 1, TRUE);
 822
 823     *(volatile char *)addr;
 824     ok(ret, "VirtualProtect failed with %d\n", GetLastError());
 825     check_QueryWorkingSetEx(addr, "exe,readonly2", 1, PAGE_READONLY, 1, FALSE);
 826
 827     addr = VirtualAlloc(NULL, 0x1000, MEM_COMMIT | MEM_RESERVE, PAGE_READWRITE);
 828     ok(addr != NULL, "VirtualAlloc failed with %d\n", GetLastError());
 829     check_QueryWorkingSetEx(addr, "valloc", 0, 0, 0, FALSE);
 830
 831     *(volatile char *)addr;
 832     check_QueryWorkingSetEx(addr, "valloc,read", 1, PAGE_READWRITE, 0, FALSE);
 833
 834     *(volatile char *)addr = 0x42;
 835     check_QueryWorkingSetEx(addr, "valloc,write", 1, PAGE_READWRITE, 0, FALSE);
 836
 837     ret = VirtualProtect(addr, 0x1000, PAGE_NOACCESS, &prot);
 838     ok(ret, "VirtualProtect failed with %d\n", GetLastError());
 839     check_QueryWorkingSetEx(addr, "valloc,noaccess", 0, 0, 0, FALSE);
 840
 841     ret = VirtualProtect(addr, 0x1000, prot, &prot);
 842     ok(ret, "VirtualProtect failed with %d\n", GetLastError());
 843     check_QueryWorkingSetEx(addr, "valloc,readwrite1", 0, 0, 0, TRUE);
 844
 845     *(volatile char *)addr;
 846     check_QueryWorkingSetEx(addr, "valloc,readwrite2", 1, PAGE_READWRITE, 0, FALSE);
 847
 848     ret = VirtualFree(addr, 0, MEM_RELEASE);
 849     ok(ret, "VirtualFree failed with %d\n", GetLastError());
 850     check_QueryWorkingSetEx(addr, "valloc,free", FALSE, 0, 0, FALSE);
 851 }
 852
 853 START_TEST(psapi_main)
 854 {
 855     DWORD pid = GetCurrentProcessId();
 856
 857     init_func_ptrs();
 858
 859     if (pIsWow64Process)
 860         IsWow64Process(GetCurrentProcess(), &wow64);
 861
 862     hpSR = OpenProcess(STANDARD_RIGHTS_REQUIRED, FALSE, pid);
 863     ok(!!hpSR, "got error %u\n", GetLastError());
 864     hpQI = OpenProcess(PROCESS_QUERY_INFORMATION, FALSE, pid);
 865     ok(!!hpQI, "got error %u\n", GetLastError());
 866     hpVR = OpenProcess(PROCESS_VM_READ, FALSE, pid);
 867     ok(!!hpVR, "got error %u\n", GetLastError());
 868     hpQV = OpenProcess(PROCESS_QUERY_INFORMATION | PROCESS_VM_READ, FALSE, pid);
 869     ok(!!hpQV, "got error %u\n", GetLastError());
 870
 871     test_EnumProcesses();
 872     test_EnumProcessModules();
 873     test_GetModuleInformation();
 874     test_GetPerformanceInfo();
 875     test_GetProcessMemoryInfo();
 876     test_GetMappedFileName();
 877     test_GetProcessImageFileName();
 878     test_GetModuleFileNameEx();
 879     test_GetModuleBaseName();
 880     test_QueryWorkingSetEx();
 881     test_ws_functions();
 882
 883     CloseHandle(hpSR);
 884     CloseHandle(hpQI);
 885     CloseHandle(hpVR);
 886     CloseHandle(hpQV);
 887 }