Alexander Nicolaysen Sørnes : kernel32: Implement GetProductInfo on top of ntdll stub.

Alexandre Julliard julliard at winehq.org
Mon Oct 26 10:08:34 CDT 2009


Module: wine
Branch: master
Commit: fca16bc519f55f5c2703b1054d6c5fd8ad9a1871
URL:    http://source.winehq.org/git/wine.git/?a=commit;h=fca16bc519f55f5c2703b1054d6c5fd8ad9a1871

Author: Alexander Nicolaysen Sørnes <alex at thehandofagony.com>
Date:   Sun Oct 25 15:11:28 2009 +0100

kernel32: Implement GetProductInfo on top of ntdll stub.

---

 dlls/kernel32/kernel32.spec |    1 +
 dlls/kernel32/version.c     |   15 +++++++++++++++
 2 files changed, 16 insertions(+), 0 deletions(-)

diff --git a/dlls/kernel32/kernel32.spec b/dlls/kernel32/kernel32.spec
index bf6078e..7e278b5 100644
--- a/dlls/kernel32/kernel32.spec
+++ b/dlls/kernel32/kernel32.spec
@@ -599,6 +599,7 @@
 @ stdcall GetProcessTimes(long ptr ptr ptr ptr)
 @ stdcall GetProcessVersion(long)
 @ stdcall GetProcessWorkingSetSize(long ptr ptr)
+@ stdcall GetProductInfo(long long long long ptr)
 @ stub GetProductName
 @ stdcall GetProfileIntA(str str long)
 @ stdcall GetProfileIntW(wstr wstr long)
diff --git a/dlls/kernel32/version.c b/dlls/kernel32/version.c
index 162da8f..9f21435 100644
--- a/dlls/kernel32/version.c
+++ b/dlls/kernel32/version.c
@@ -186,3 +186,18 @@ DWORD WINAPI SetTermsrvAppInstallMode(BOOL bInstallMode)
     FIXME("(%d): stub\n", bInstallMode);
     return 0;
 }
+
+/***********************************************************************
+ *           GetProductInfo       (KERNEL32.@)
+ *
+ * Gives info about the current Windows product type, in a format compatible
+ * with the given Windows version
+ *
+ * Returns TRUE if the input is valid, FALSE otherwise
+ */
+BOOL WINAPI GetProductInfo(DWORD dwOSMajorVersion, DWORD dwOSMinorVersion, DWORD dwSpMajorVersion,
+                           DWORD dwSpMinorVersion, PDWORD pdwReturnedProductType)
+{
+    return RtlGetProductInfo(dwOSMajorVersion, dwOSMinorVersion,
+                             dwSpMajorVersion, dwSpMinorVersion, pdwReturnedProductType);
+}




More information about the wine-cvs mailing list