kernel32: Implement K32GetProcessImageFileNameA().

[Francois Gouget]

---
 dlls/kernel32/process.c       |    3 +--
 dlls/psapi/tests/psapi_main.c |    6 +++---
 2 files changed, 4 insertions(+), 5 deletions(-)

diff --git a/dlls/kernel32/process.c b/dlls/kernel32/process.c
index 9bc5070..b0eba7c 100644
--- a/dlls/kernel32/process.c
+++ b/dlls/kernel32/process.c
@@ -3479,8 +3479,7 @@ cleanup:
  */
 DWORD WINAPI K32GetProcessImageFileNameA( HANDLE process, LPSTR file, DWORD size )
 {
-    FIXME("(%p, %p, %d) stub\n", process, file, size );
-    return 0;
+    return QueryFullProcessImageNameA(process, PROCESS_NAME_NATIVE, file, &size) ? size : 0;
 }
 
 /***********************************************************************
diff --git a/dlls/psapi/tests/psapi_main.c b/dlls/psapi/tests/psapi_main.c
index b855250..c4c129b 100644
--- a/dlls/psapi/tests/psapi_main.c
+++ b/dlls/psapi/tests/psapi_main.c
@@ -222,15 +222,15 @@ static void test_GetProcessImageFileName(void)
 
     SetLastError(0xdeadbeef);
     pGetProcessImageFileNameA(NULL, szImgPath, sizeof(szImgPath));
-    todo_wine ok(GetLastError() == ERROR_INVALID_HANDLE, "expected error=ERROR_INVALID_HANDLE but got %d\n", GetLastError());
+    ok(GetLastError() == ERROR_INVALID_HANDLE, "expected error=ERROR_INVALID_HANDLE but got %d\n", GetLastError());
 
     SetLastError(0xdeadbeef);
     pGetProcessImageFileNameA(hpSR, szImgPath, sizeof(szImgPath));
-    todo_wine ok(GetLastError() == ERROR_ACCESS_DENIED, "expected error=ERROR_ACCESS_DENIED but got %d\n", GetLastError());
+    ok(GetLastError() == ERROR_ACCESS_DENIED, "expected error=ERROR_ACCESS_DENIED but got %d\n", GetLastError());
 
     SetLastError(0xdeadbeef);
     pGetProcessImageFileNameA(hpQI, szImgPath, 0);
-    todo_wine ok(GetLastError() == ERROR_INSUFFICIENT_BUFFER, "expected error=ERROR_INSUFFICIENT_BUFFER but got %d\n", GetLastError());
+    ok(GetLastError() == ERROR_INSUFFICIENT_BUFFER, "expected error=ERROR_INSUFFICIENT_BUFFER but got %d\n", GetLastError());
 
     ret = pGetProcessImageFileNameA(hpQI, szImgPath, sizeof(szImgPath));
     ret1 = pGetMappedFileNameA(hpQV, hMod, szMapPath, sizeof(szMapPath));
-- 
1.7.5.4