From 02aa8d50af3aea131a8c2e28a92e32d09650f6c4 Mon Sep 17 00:00:00 2001
From: Thomas Weidenmueller <wine-patches@reactsoft.com>
Date: Fri, 30 Jul 2004 04:22:44 +0000
Subject: [PATCH] Implementation of TouchFileTimes(), thanks to Florian
 Stinglmayr for submitting a rough draft.

---
 dlls/imagehlp/imagehlp_main.c | 19 ++++++++++++-------
 1 file changed, 12 insertions(+), 7 deletions(-)

diff --git a/dlls/imagehlp/imagehlp_main.c b/dlls/imagehlp/imagehlp_main.c
index 078ffe38828..247b9e30139 100644
--- a/dlls/imagehlp/imagehlp_main.c
+++ b/dlls/imagehlp/imagehlp_main.c
@@ -61,12 +61,17 @@ BOOL WINAPI DllMain(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved)
 /***********************************************************************
  *           TouchFileTimes (IMAGEHLP.@)
  */
-BOOL WINAPI TouchFileTimes(
-  HANDLE FileHandle, LPSYSTEMTIME lpSystemTime)
+BOOL WINAPI TouchFileTimes(HANDLE FileHandle, LPSYSTEMTIME lpSystemTime)
 {
-  FIXME("(%p, %p): stub\n",
-    FileHandle, lpSystemTime
-  );
-  SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
-  return FALSE;
+  FILETIME FileTime;
+  SYSTEMTIME SystemTime;
+
+  if(lpSystemTime == NULL)
+  {
+    GetSystemTime(&SystemTime);
+    lpSystemTime = &SystemTime;
+  }
+
+  return (SystemTimeToFileTime(lpSystemTime, &FileTime) &&
+          SetFileTime(FileHandle, NULL, NULL, &FileTime));
 }