propsys: Add an initial implementation of PropVariantChangeType.

dlls/propsys/Makefile.in

@@ -6,7 +6,8 @@ MODULE    = propsys.dll
 IMPORTS   = kernel32
 
 C_SRCS = \
-	propsys_main.c
+	propsys_main.c \
+	propvar.c
 
 @MAKE_DLL_RULES@
 

dlls/propsys/propsys.spec

@@ -93,7 +93,7 @@
 @ stub PSSetPropertyValue
 @ stub PSStringFromPropertyKey
 @ stub PSUnregisterPropertySchema
-@ stub PropVariantChangeType
+@ stdcall PropVariantChangeType(ptr ptr long long)
 @ stub PropVariantCompareEx
 @ stub PropVariantGetBooleanElem
 @ stub PropVariantGetDoubleElem

dlls/propsys/propvar.c

@@ -0,0 +1,88 @@
+/*
+ * PropVariant implementation
+ *
+ * Copyright 2008 James Hawkins for CodeWeavers
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2.1 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
+ */
+
+#include <stdarg.h>
+#include <stdio.h>
+
+#define NONAMELESSUNION
+
+#include "windef.h"
+#include "winbase.h"
+#include "winerror.h"
+#include "winreg.h"
+#include "winuser.h"
+#include "shlobj.h"
+#include "propvarutil.h"
+
+#include "wine/debug.h"
+
+WINE_DEFAULT_DEBUG_CHANNEL(propsys);
+
+static HRESULT PROPVAR_ConvertFILETIME(PROPVARIANT *ppropvarDest,
+                                       REFPROPVARIANT propvarSrc, VARTYPE vt)
+{
+    SYSTEMTIME time;
+
+    FileTimeToSystemTime(&propvarSrc->u.filetime, &time);
+
+    switch (vt)
+    {
+        case VT_LPSTR:
+        {
+            static const char format[] = "%04d/%02d/%02d:%02d:%02d:%02d.%03d";
+
+            ppropvarDest->u.pszVal = HeapAlloc(GetProcessHeap(), 0,
+                                             lstrlenA(format) + 1);
+            if (!ppropvarDest->u.pszVal)
+                return E_OUTOFMEMORY;
+
+            sprintf(ppropvarDest->u.pszVal, format, time.wYear, time.wMonth,
+                    time.wDay, time.wHour, time.wMinute,
+                    time.wSecond, time.wMilliseconds);
+
+            return S_OK;
+        }
+
+        default:
+            FIXME("Unhandled target type: %d\n", vt);
+    }
+
+    return E_FAIL;
+}
+
+/******************************************************************
+ *  PropVariantChangeType   (PROPSYS.@)
+ */
+HRESULT WINAPI PropVariantChangeType(PROPVARIANT *ppropvarDest, REFPROPVARIANT propvarSrc,
+                                     PROPVAR_CHANGE_FLAGS flags, VARTYPE vt)
+{
+    FIXME("(%p, %p, %d, %d, %d): semi-stub!\n", ppropvarDest, propvarSrc,
+          propvarSrc->vt, flags, vt);
+
+    switch (propvarSrc->vt)
+    {
+        case VT_FILETIME:
+            return PROPVAR_ConvertFILETIME(ppropvarDest, propvarSrc, vt);
+        default:
+            FIXME("Unhandled source type: %d\n", propvarSrc->vt);
+    }
+
+    return E_FAIL;
+}

include/Makefile.in

@@ -326,6 +326,7 @@ SRCDIR_INCLUDES = \
 	poppack.h \
 	powrprof.h \
 	profinfo.h \
+	propvarutil.h \
 	prsht.h \
 	psapi.h \
 	pshpack1.h \

include/propidl.idl

@@ -206,6 +206,8 @@ interface IPropertyStorage : IUnknown
 
   typedef struct tagPROPVARIANT *LPPROPVARIANT;
 
+  cpp_quote("#define REFPROPVARIANT const PROPVARIANT *")
+
   cpp_quote("#define PIDDI_THUMBNAIL 0x00000002L /* VT_BLOB */")
   cpp_quote("")
   cpp_quote("#define PIDSI_TITLE        0x00000002L /* VT_LPSTR */")

include/propvarutil.h

@@ -0,0 +1,41 @@
+/*
+ * Copyright 2008 James Hawkins for CodeWeavers
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2.1 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
+ */
+
+#ifndef __WINE_PROPVARUTIL_H
+#define __WINE_PROPVARUTIL_H
+
+#include <propidl.h>
+#include <shtypes.h>
+#include <shlwapi.h>
+
+enum tagPROPVAR_CHANGE_FLAGS
+{
+    PVCHF_DEFAULT           = 0x00000000,
+    PVCHF_NOVALUEPROP       = 0x00000001,
+    PVCHF_ALPHABOOL         = 0x00000002,
+    PVCHF_NOUSEROVERRIDE    = 0x00000004,
+    PVCHF_LOCALBOOL         = 0x00000008,
+    PVCHF_NOHEXSTRING       = 0x00000010,
+};
+
+typedef int PROPVAR_CHANGE_FLAGS;
+
+HRESULT WINAPI PropVariantChangeType(PROPVARIANT *ppropvarDest, REFPROPVARIANT propvarSrc,
+                                     PROPVAR_CHANGE_FLAGS flags, VARTYPE vt);
+
+#endif /* __WINE_PROPVARUTIL_H */