implemented QueryWorkingSet()

svn path=/trunk/; revision=13052

reactos/lib/psapi/makefile

@@ -22,7 +22,6 @@ TARGET_PCH = precomp.h
 TARGET_OBJECTS = \
 	misc/dllmain.o \
 	misc/malloc.o \
-	misc/stubs.o \
 	misc/win32.o
 	
 DEP_OBJECTS = $(TARGET_OBJECTS)

reactos/lib/psapi/misc/stubs.c

@@ -1,22 +0,0 @@
-/* $Id$ */
-#include "precomp.h"
-
-#define NDEBUG
-#include <debug.h>
-
-
-/*
- * @unimplemented
- */
-BOOL
-STDCALL
-QueryWorkingSet(HANDLE hProcess,
-                PVOID pv,
-                DWORD cb)
-{
-  DPRINT1("PSAPI: QueryWorkingSet is UNIMPLEMENTED!\n");
-  SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
-  return FALSE;
-}
-
-/* EOF */

reactos/lib/psapi/misc/win32.c

@@ -1365,4 +1365,31 @@ GetProcessMemoryInfo(HANDLE Process,
   return Ret;
 }
 
+
+/*
+ * @implemented
+ */
+BOOL
+STDCALL
+QueryWorkingSet(HANDLE hProcess,
+                PVOID pv,
+                DWORD cb)
+{
+  NTSTATUS Status;
+
+  Status = NtQueryVirtualMemory(hProcess,
+                                NULL,
+                                MemoryWorkingSetList,
+                                pv,
+                                cb,
+                                NULL);
+  if(!NT_SUCCESS(Status))
+  {
+    SetLastErrorByStatus(Status);
+    return FALSE;
+  }
+
+  return TRUE;
+}
+
 /* EOF */