Intravision/reactos
1
0
Fork 0
mirror of https://github.com/reactos/reactos.git synced 2024-12-29 02:25:17 +00:00
Code Issues Projects Releases Packages Wiki Activity

[OLEAUT32] Sync with Wine Staging 4.18. CORE-16441

Browse source
This commit is contained in:
Amine Khaldi 2019-11-23 12:05:03 +01:00
parent 1431ca4c75
commit ae24453e12
12 changed files with 763 additions and 671 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
dll/win32/oleaut32/dispatch.c
View file

@ -19,8 +19,6 @@
* *
*/ */
#include "config.h"
#include <stdlib.h> #include <stdlib.h>
#include <string.h> #include <string.h>
#include <stdarg.h> #include <stdarg.h>

176
dll/win32/oleaut32/oleaut.c
View file

@ -18,8 +18,6 @@
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
*/ */
#include "config.h"
#include <stdarg.h> #include <stdarg.h>
#include <stdio.h> #include <stdio.h>
#include <string.h> #include <string.h>
@ -41,7 +39,6 @@
#include "oleaut32_oaidl.h" #include "oleaut32_oaidl.h"
#include "wine/debug.h" #include "wine/debug.h"
#include "wine/unicode.h"
WINE_DEFAULT_DEBUG_CHANNEL(ole); WINE_DEFAULT_DEBUG_CHANNEL(ole);
WINE_DECLARE_DEBUG_CHANNEL(heap); WINE_DECLARE_DEBUG_CHANNEL(heap);
@ -877,7 +874,7 @@ static HRESULT reg_get_typelib_module(REFIID iid, WCHAR *module, DWORD len)
sprintf(typelibkey, "Typelib\\%s\\%s\\0\\win%u", tlguid, ver, sizeof(void *) == 8 ? 64 : 32); sprintf(typelibkey, "Typelib\\%s\\%s\\0\\win%u", tlguid, ver, sizeof(void *) == 8 ? 64 : 32);
#else #else
snprintf(typelibkey, sizeof(typelibkey), "Typelib\\%s\\%s\\0\\win%u", tlguid, ver, sizeof(void *) == 8 ? 64 : 32); snprintf(typelibkey, sizeof(typelibkey), "Typelib\\%s\\%s\\0\\win%u", tlguid, ver, sizeof(void *) == 8 ? 64 : 32);
#endif // __REACTOS__ #endif /* __REACTOS__ */
tlfnlen = sizeof(tlfn); tlfnlen = sizeof(tlfn);
if (RegQueryValueA(HKEY_CLASSES_ROOT, typelibkey, tlfn, &tlfnlen)) if (RegQueryValueA(HKEY_CLASSES_ROOT, typelibkey, tlfn, &tlfnlen))
{ {
@ -927,7 +924,7 @@ static HRESULT get_typeinfo_for_iid(REFIID iid, ITypeInfo **typeinfo)
return hr; return hr;
} }
static HRESULT WINAPI typelib_ps_QueryInterface(IPSFactoryBuffer *iface, REFIID iid, void **out) static HRESULT WINAPI dispatch_typelib_ps_QueryInterface(IPSFactoryBuffer *iface, REFIID iid, void **out)
{ {
if (IsEqualIID(iid, &IID_IPSFactoryBuffer) || IsEqualIID(iid, &IID_IUnknown)) if (IsEqualIID(iid, &IID_IPSFactoryBuffer) || IsEqualIID(iid, &IID_IUnknown))
{ {
@ -940,136 +937,122 @@ static HRESULT WINAPI typelib_ps_QueryInterface(IPSFactoryBuffer *iface, REFIID
return E_NOINTERFACE; return E_NOINTERFACE;
} }
static ULONG WINAPI typelib_ps_AddRef(IPSFactoryBuffer *iface) static ULONG WINAPI dispatch_typelib_ps_AddRef(IPSFactoryBuffer *iface)
{ {
return 2; return 2;
} }
static ULONG WINAPI typelib_ps_Release(IPSFactoryBuffer *iface) static ULONG WINAPI dispatch_typelib_ps_Release(IPSFactoryBuffer *iface)
{ {
return 1; return 1;
} }
static HRESULT WINAPI typelib_ps_CreateProxy(IPSFactoryBuffer *iface, static HRESULT dispatch_create_proxy(IUnknown *outer, IRpcProxyBuffer **proxy, void **out)
{
IPSFactoryBuffer *factory;
HRESULT hr;
hr = OLEAUTPS_DllGetClassObject(&CLSID_PSFactoryBuffer, &IID_IPSFactoryBuffer, (void **)&factory);
if (FAILED(hr)) return hr;
hr = IPSFactoryBuffer_CreateProxy(factory, outer, &IID_IDispatch, proxy, out);
IPSFactoryBuffer_Release(factory);
return hr;
}
static HRESULT WINAPI dispatch_typelib_ps_CreateProxy(IPSFactoryBuffer *iface,
IUnknown *outer, REFIID iid, IRpcProxyBuffer **proxy, void **out) IUnknown *outer, REFIID iid, IRpcProxyBuffer **proxy, void **out)
{ {
ITypeInfo *typeinfo; ITypeInfo *typeinfo;
TYPEATTR *attr;
HRESULT hr; HRESULT hr;
if (IsEqualGUID(iid, &IID_IDispatch))
return dispatch_create_proxy(outer, proxy, out);
hr = get_typeinfo_for_iid(iid, &typeinfo); hr = get_typeinfo_for_iid(iid, &typeinfo);
if (FAILED(hr)) return hr; if (FAILED(hr)) return hr;
hr = CreateProxyFromTypeInfo(typeinfo, outer, iid, proxy, out); hr = ITypeInfo_GetTypeAttr(typeinfo, &attr);
if (FAILED(hr))
{
ITypeInfo_Release(typeinfo);
return hr;
}
if (attr->typekind == TKIND_INTERFACE || (attr->wTypeFlags & TYPEFLAG_FDUAL))
hr = CreateProxyFromTypeInfo(typeinfo, outer, iid, proxy, out);
else
hr = dispatch_create_proxy(outer, proxy, out);
if (FAILED(hr)) if (FAILED(hr))
ERR("Failed to create proxy, hr %#x.\n", hr); ERR("Failed to create proxy, hr %#x.\n", hr);
ITypeInfo_ReleaseTypeAttr(typeinfo, attr);
ITypeInfo_Release(typeinfo); ITypeInfo_Release(typeinfo);
return hr; return hr;
} }
static HRESULT WINAPI typelib_ps_CreateStub(IPSFactoryBuffer *iface, REFIID iid, static HRESULT dispatch_create_stub(IUnknown *server, IRpcStubBuffer **stub)
IUnknown *server, IRpcStubBuffer **stub) {
IPSFactoryBuffer *factory;
HRESULT hr;
hr = OLEAUTPS_DllGetClassObject(&CLSID_PSFactoryBuffer, &IID_IPSFactoryBuffer, (void **)&factory);
if (FAILED(hr)) return hr;
hr = IPSFactoryBuffer_CreateStub(factory, &IID_IDispatch, server, stub);
IPSFactoryBuffer_Release(factory);
return hr;
}
static HRESULT WINAPI dispatch_typelib_ps_CreateStub(IPSFactoryBuffer *iface,
REFIID iid, IUnknown *server, IRpcStubBuffer **stub)
{ {
ITypeInfo *typeinfo; ITypeInfo *typeinfo;
TYPEATTR *attr;
HRESULT hr; HRESULT hr;
if (IsEqualGUID(iid, &IID_IDispatch))
return dispatch_create_stub(server, stub);
hr = get_typeinfo_for_iid(iid, &typeinfo); hr = get_typeinfo_for_iid(iid, &typeinfo);
if (FAILED(hr)) return hr; if (FAILED(hr)) return hr;
hr = CreateStubFromTypeInfo(typeinfo, iid, server, stub); hr = ITypeInfo_GetTypeAttr(typeinfo, &attr);
if (FAILED(hr)) if (FAILED(hr))
ERR("Failed to create stub, hr %#x.\n", hr); {
ITypeInfo_Release(typeinfo);
return hr;
}
if (attr->typekind == TKIND_INTERFACE || (attr->wTypeFlags & TYPEFLAG_FDUAL))
hr = CreateStubFromTypeInfo(typeinfo, iid, server, stub);
else
hr = dispatch_create_stub(server, stub);
if (FAILED(hr))
ERR("Failed to create proxy, hr %#x.\n", hr);
ITypeInfo_ReleaseTypeAttr(typeinfo, attr);
ITypeInfo_Release(typeinfo); ITypeInfo_Release(typeinfo);
return hr; return hr;
} }
static const IPSFactoryBufferVtbl typelib_ps_vtbl = static const IPSFactoryBufferVtbl dispatch_typelib_ps_vtbl =
{ {
typelib_ps_QueryInterface, dispatch_typelib_ps_QueryInterface,
typelib_ps_AddRef, dispatch_typelib_ps_AddRef,
typelib_ps_Release, dispatch_typelib_ps_Release,
typelib_ps_CreateProxy, dispatch_typelib_ps_CreateProxy,
typelib_ps_CreateStub, dispatch_typelib_ps_CreateStub,
}; };
static IPSFactoryBuffer typelib_ps = { &typelib_ps_vtbl }; static IPSFactoryBuffer dispatch_typelib_ps = { &dispatch_typelib_ps_vtbl };
extern void _get_STDFONT_CF(LPVOID *); extern void _get_STDFONT_CF(LPVOID *);
extern void _get_STDPIC_CF(LPVOID *); extern void _get_STDPIC_CF(LPVOID *);
static HRESULT WINAPI PSDispatchFacBuf_QueryInterface(IPSFactoryBuffer *iface, REFIID riid, void **ppv)
{
if (IsEqualIID(riid, &IID_IUnknown) ||
IsEqualIID(riid, &IID_IPSFactoryBuffer))
{
IPSFactoryBuffer_AddRef(iface);
*ppv = iface;
return S_OK;
}
return E_NOINTERFACE;
}
static ULONG WINAPI PSDispatchFacBuf_AddRef(IPSFactoryBuffer *iface)
{
return 2;
}
static ULONG WINAPI PSDispatchFacBuf_Release(IPSFactoryBuffer *iface)
{
return 1;
}
static HRESULT WINAPI PSDispatchFacBuf_CreateProxy(IPSFactoryBuffer *iface,
IUnknown *outer, REFIID iid, IRpcProxyBuffer **proxy, void **obj)
{
IPSFactoryBuffer *factory;
HRESULT hr;
if (IsEqualIID(iid, &IID_IDispatch))
{
hr = OLEAUTPS_DllGetClassObject(&CLSID_PSFactoryBuffer, &IID_IPSFactoryBuffer, (void **)&factory);
if (FAILED(hr)) return hr;
hr = IPSFactoryBuffer_CreateProxy(factory, outer, iid, proxy, obj);
IPSFactoryBuffer_Release(factory);
return hr;
}
else
return IPSFactoryBuffer_CreateProxy(&typelib_ps, outer, iid, proxy, obj);
}
static HRESULT WINAPI PSDispatchFacBuf_CreateStub(IPSFactoryBuffer *iface,
REFIID iid, IUnknown *server, IRpcStubBuffer **stub)
{
IPSFactoryBuffer *factory;
HRESULT hr;
if (IsEqualIID(iid, &IID_IDispatch))
{
hr = OLEAUTPS_DllGetClassObject(&CLSID_PSFactoryBuffer, &IID_IPSFactoryBuffer, (void **)&factory);
if (FAILED(hr)) return hr;
hr = IPSFactoryBuffer_CreateStub(factory, iid, server, stub);
IPSFactoryBuffer_Release(factory);
return hr;
}
else
return IPSFactoryBuffer_CreateStub(&typelib_ps, iid, server, stub);
}
static const IPSFactoryBufferVtbl PSDispatchFacBuf_Vtbl =
{
PSDispatchFacBuf_QueryInterface,
PSDispatchFacBuf_AddRef,
PSDispatchFacBuf_Release,
PSDispatchFacBuf_CreateProxy,
PSDispatchFacBuf_CreateStub
};
/* This is the whole PSFactoryBuffer object, just the vtableptr */
static const IPSFactoryBufferVtbl *pPSDispatchFacBuf = &PSDispatchFacBuf_Vtbl;
/*********************************************************************** /***********************************************************************
* DllGetClassObject (OLEAUT32.@) * DllGetClassObject (OLEAUT32.@)
*/ */
@ -1090,14 +1073,9 @@ HRESULT WINAPI DllGetClassObject(REFCLSID rclsid, REFIID iid, LPVOID *ppv)
return S_OK; return S_OK;
} }
} }
if (IsEqualCLSID(rclsid, &CLSID_PSDispatch) && IsEqualIID(iid, &IID_IPSFactoryBuffer)) {
*ppv = &pPSDispatchFacBuf;
IPSFactoryBuffer_AddRef((IPSFactoryBuffer *)*ppv);
return S_OK;
}
if (IsEqualGUID(rclsid, &CLSID_PSOAInterface)) if (IsEqualGUID(rclsid, &CLSID_PSDispatch) || IsEqualGUID(rclsid, &CLSID_PSOAInterface))
return IPSFactoryBuffer_QueryInterface(&typelib_ps, iid, ppv); return IPSFactoryBuffer_QueryInterface(&dispatch_typelib_ps, iid, ppv);
if (IsEqualCLSID(rclsid, &CLSID_PSTypeComp) || if (IsEqualCLSID(rclsid, &CLSID_PSTypeComp) ||
IsEqualCLSID(rclsid, &CLSID_PSTypeInfo) || IsEqualCLSID(rclsid, &CLSID_PSTypeInfo) ||

13
dll/win32/oleaut32/olefont.c
View file

@ -35,7 +35,6 @@
#include "wingdi.h" #include "wingdi.h"
#include "winuser.h" #include "winuser.h"
#include "wine/list.h" #include "wine/list.h"
#include "wine/unicode.h"
#include "objbase.h" #include "objbase.h"
#include "oleauto.h" /* for SysAllocString(....) */ #include "oleauto.h" /* for SysAllocString(....) */
#include "ole2.h" #include "ole2.h"
@ -230,7 +229,7 @@ static HRESULT dec_ext_ref(HFONT hfont)
static WCHAR *strdupW(const WCHAR* str) static WCHAR *strdupW(const WCHAR* str)
{ {
WCHAR *ret; WCHAR *ret;
DWORD size = (strlenW(str) + 1) * sizeof(WCHAR); DWORD size = (lstrlenW(str) + 1) * sizeof(WCHAR);
ret = HeapAlloc(GetProcessHeap(), 0, size); ret = HeapAlloc(GetProcessHeap(), 0, size);
if(ret) if(ret)
@ -1063,8 +1062,8 @@ static HRESULT WINAPI OLEFontImpl_IsEqual(
return S_FALSE; return S_FALSE;
/* Check from string */ /* Check from string */
left_len = strlenW(left->description.lpstrName); left_len = lstrlenW(left->description.lpstrName);
right_len = strlenW(right->description.lpstrName); right_len = lstrlenW(right->description.lpstrName);
ret = CompareStringW(0,0,left->description.lpstrName, left_len, ret = CompareStringW(0,0,left->description.lpstrName, left_len,
right->description.lpstrName, right_len); right->description.lpstrName, right_len);
if (ret != CSTR_EQUAL) if (ret != CSTR_EQUAL)
@ -1727,7 +1726,7 @@ static HRESULT WINAPI OLEFontImpl_Save(
/* FontName */ /* FontName */
if (this->description.lpstrName) if (this->description.lpstrName)
string_size = WideCharToMultiByte( CP_ACP, 0, this->description.lpstrName, string_size = WideCharToMultiByte( CP_ACP, 0, this->description.lpstrName,
strlenW(this->description.lpstrName), NULL, 0, NULL, NULL ); lstrlenW(this->description.lpstrName), NULL, 0, NULL, NULL );
else else
string_size = 0; string_size = 0;
@ -1738,7 +1737,7 @@ static HRESULT WINAPI OLEFontImpl_Save(
{ {
if (!(writeBuffer = HeapAlloc( GetProcessHeap(), 0, string_size ))) return E_OUTOFMEMORY; if (!(writeBuffer = HeapAlloc( GetProcessHeap(), 0, string_size ))) return E_OUTOFMEMORY;
WideCharToMultiByte( CP_ACP, 0, this->description.lpstrName, WideCharToMultiByte( CP_ACP, 0, this->description.lpstrName,
strlenW(this->description.lpstrName), lstrlenW(this->description.lpstrName),
writeBuffer, string_size, NULL, NULL ); writeBuffer, string_size, NULL, NULL );
IStream_Write(pOutStream, writeBuffer, string_size, &written); IStream_Write(pOutStream, writeBuffer, string_size, &written);
@ -1774,7 +1773,7 @@ static HRESULT WINAPI OLEFontImpl_GetSizeMax(
if (this->description.lpstrName!=0) if (this->description.lpstrName!=0)
pcbSize->u.LowPart += WideCharToMultiByte( CP_ACP, 0, this->description.lpstrName, pcbSize->u.LowPart += WideCharToMultiByte( CP_ACP, 0, this->description.lpstrName,
strlenW(this->description.lpstrName), lstrlenW(this->description.lpstrName),
NULL, 0, NULL, NULL ); NULL, 0, NULL, NULL );
return S_OK; return S_OK;

10
dll/win32/oleaut32/olepicture.c
View file

@ -36,12 +36,6 @@
* *
*/ */
#include "config.h"
#include "wine/port.h"
#ifdef HAVE_UNISTD_H
# include <unistd.h>
#endif
#include <stdarg.h> #include <stdarg.h>
#include <stdio.h> #include <stdio.h>
#include <string.h> #include <string.h>
@ -62,8 +56,6 @@
#include "initguid.h" #include "initguid.h"
#include "wincodec.h" #include "wincodec.h"
#include "wine/debug.h" #include "wine/debug.h"
#include "wine/unicode.h"
#include "wine/library.h"
WINE_DEFAULT_DEBUG_CHANNEL(olepicture); WINE_DEFAULT_DEBUG_CHANNEL(olepicture);
@ -2522,7 +2514,7 @@ HRESULT WINAPI OleLoadPicturePath( LPOLESTR szURLorPath, LPUNKNOWN punkCaller,
*ppvRet = NULL; *ppvRet = NULL;
/* Convert file URLs to DOS paths. */ /* Convert file URLs to DOS paths. */
if (strncmpW(szURLorPath, file, 5) == 0) { if (wcsncmp(szURLorPath, file, 5) == 0) {
DWORD size; DWORD size;
hRes = CoInternetParseUrl(szURLorPath, PARSE_PATH_FROM_URL, 0, path_buf, hRes = CoInternetParseUrl(szURLorPath, PARSE_PATH_FROM_URL, 0, path_buf,
ARRAY_SIZE(path_buf), &size, 0); ARRAY_SIZE(path_buf), &size, 0);

4
dll/win32/oleaut32/precomp.h
View file

@ -2,8 +2,6 @@
#ifndef _OLEAUT32_PCH_ #ifndef _OLEAUT32_PCH_
#define _OLEAUT32_PCH_ #define _OLEAUT32_PCH_
#include <config.h>
#include <stdarg.h> #include <stdarg.h>
#include <stdio.h> #include <stdio.h>
@ -18,12 +16,12 @@
#include <winbase.h> #include <winbase.h>
#include <wingdi.h> #include <wingdi.h>
#include <winreg.h> #include <winreg.h>
#include <winnls.h>
#include <ole2.h> #include <ole2.h>
#include <olectl.h> #include <olectl.h>
#include <wine/debug.h> #include <wine/debug.h>
#include <wine/list.h> #include <wine/list.h>
#include <wine/unicode.h>
#include "connpt.h" #include "connpt.h"
#include "variant.h" #include "variant.h"

9
dll/win32/oleaut32/recinfo.c
View file

@ -28,7 +28,6 @@
#include "oleauto.h" #include "oleauto.h"
#include "variant.h" #include "variant.h"
#include "wine/unicode.h"
#include "wine/debug.h" #include "wine/debug.h"
WINE_DEFAULT_DEBUG_CHANNEL(ole); WINE_DEFAULT_DEBUG_CHANNEL(ole);
@ -402,7 +401,7 @@ static HRESULT WINAPI IRecordInfoImpl_GetField(IRecordInfo *iface, PVOID pvData,
return E_INVALIDARG; return E_INVALIDARG;
for(i=0; i<This->n_vars; i++) for(i=0; i<This->n_vars; i++)
if(!strcmpW(This->fields[i].name, szFieldName)) if(!wcscmp(This->fields[i].name, szFieldName))
break; break;
if(i == This->n_vars) if(i == This->n_vars)
return TYPE_E_FIELDNOTFOUND; return TYPE_E_FIELDNOTFOUND;
@ -424,7 +423,7 @@ static HRESULT WINAPI IRecordInfoImpl_GetFieldNoCopy(IRecordInfo *iface, PVOID p
return E_INVALIDARG; return E_INVALIDARG;
for(i=0; i<This->n_vars; i++) for(i=0; i<This->n_vars; i++)
if(!strcmpW(This->fields[i].name, szFieldName)) if(!wcscmp(This->fields[i].name, szFieldName))
break; break;
if(i == This->n_vars) if(i == This->n_vars)
return TYPE_E_FIELDNOTFOUND; return TYPE_E_FIELDNOTFOUND;
@ -455,7 +454,7 @@ static HRESULT WINAPI IRecordInfoImpl_PutField(IRecordInfo *iface, ULONG wFlags,
} }
for(i=0; i<This->n_vars; i++) for(i=0; i<This->n_vars; i++)
if(!strcmpW(This->fields[i].name, szFieldName)) if(!wcscmp(This->fields[i].name, szFieldName))
break; break;
if(i == This->n_vars) if(i == This->n_vars)
return TYPE_E_FIELDNOTFOUND; return TYPE_E_FIELDNOTFOUND;
@ -477,7 +476,7 @@ static HRESULT WINAPI IRecordInfoImpl_PutFieldNoCopy(IRecordInfo *iface, ULONG w
return E_INVALIDARG; return E_INVALIDARG;
for(i=0; i<This->n_vars; i++) for(i=0; i<This->n_vars; i++)
if(!strcmpW(This->fields[i].name, szFieldName)) if(!wcscmp(This->fields[i].name, szFieldName))
break; break;
if(i == This->n_vars) if(i == This->n_vars)
return TYPE_E_FIELDNOTFOUND; return TYPE_E_FIELDNOTFOUND;

18
dll/win32/oleaut32/safearray.c
View file

@ -31,8 +31,6 @@
* 0x10: SAFEARRAYBOUNDS[0...] * 0x10: SAFEARRAYBOUNDS[0...]
*/ */
#include "config.h"
#include <string.h> #include <string.h>
#include <stdarg.h> #include <stdarg.h>
#include <stdio.h> #include <stdio.h>
@ -525,8 +523,8 @@ HRESULT WINAPI SafeArrayAllocDescriptorEx(VARTYPE vt, UINT cDims, SAFEARRAY **pp
ULONG cbElements; ULONG cbElements;
HRESULT hRet; HRESULT hRet;
TRACE("(%d->%s,%d,%p)\n", vt, debugstr_vt(vt), cDims, ppsaOut); TRACE("(%s,%u,%p)\n", debugstr_vt(vt), cDims, ppsaOut);
cbElements = SAFEARRAY_GetVTSize(vt); cbElements = SAFEARRAY_GetVTSize(vt);
if (!cbElements) if (!cbElements)
WARN("Creating a descriptor with an invalid VARTYPE!\n"); WARN("Creating a descriptor with an invalid VARTYPE!\n");
@ -601,7 +599,7 @@ HRESULT WINAPI SafeArrayAllocData(SAFEARRAY *psa)
*/ */
SAFEARRAY* WINAPI SafeArrayCreate(VARTYPE vt, UINT cDims, SAFEARRAYBOUND *rgsabound) SAFEARRAY* WINAPI SafeArrayCreate(VARTYPE vt, UINT cDims, SAFEARRAYBOUND *rgsabound)
{ {
TRACE("(%d->%s,%d,%p)\n", vt, debugstr_vt(vt), cDims, rgsabound); TRACE("(%s,%u,%p)\n", debugstr_vt(vt), cDims, rgsabound);
if (vt == VT_RECORD) if (vt == VT_RECORD)
return NULL; return NULL;
@ -633,7 +631,7 @@ SAFEARRAY* WINAPI SafeArrayCreateEx(VARTYPE vt, UINT cDims, SAFEARRAYBOUND *rgsa
IRecordInfo* iRecInfo = pvExtra; IRecordInfo* iRecInfo = pvExtra;
SAFEARRAY* psa; SAFEARRAY* psa;
TRACE("(%d->%s,%d,%p,%p)\n", vt, debugstr_vt(vt), cDims, rgsabound, pvExtra); TRACE("(%s,%u,%p,%p)\n", debugstr_vt(vt), cDims, rgsabound, pvExtra);
if (vt == VT_RECORD) if (vt == VT_RECORD)
{ {
@ -678,8 +676,8 @@ SAFEARRAY* WINAPI SafeArrayCreateEx(VARTYPE vt, UINT cDims, SAFEARRAYBOUND *rgsa
*/ */
SAFEARRAY* WINAPI SafeArrayCreateVector(VARTYPE vt, LONG lLbound, ULONG cElements) SAFEARRAY* WINAPI SafeArrayCreateVector(VARTYPE vt, LONG lLbound, ULONG cElements)
{ {
TRACE("(%d->%s,%d,%d\n", vt, debugstr_vt(vt), lLbound, cElements); TRACE("(%s,%d,%u)\n", debugstr_vt(vt), lLbound, cElements);
if (vt == VT_RECORD) if (vt == VT_RECORD)
return NULL; return NULL;
@ -710,8 +708,8 @@ SAFEARRAY* WINAPI SafeArrayCreateVectorEx(VARTYPE vt, LONG lLbound, ULONG cEleme
IRecordInfo* iRecInfo = pvExtra; IRecordInfo* iRecInfo = pvExtra;
SAFEARRAY* psa; SAFEARRAY* psa;
TRACE("(%d->%s,%d,%d,%p\n", vt, debugstr_vt(vt), lLbound, cElements, pvExtra); TRACE("(%s,%d,%u,%p)\n", debugstr_vt(vt), lLbound, cElements, pvExtra);
if (vt == VT_RECORD) if (vt == VT_RECORD)
{ {
if (!iRecInfo) if (!iRecInfo)

1089
dll/win32/oleaut32/typelib.c
View file

File diff suppressed because it is too large Load diff

53
dll/win32/oleaut32/varformat.c
View file

@ -25,8 +25,6 @@
* Please submit a test case if you find a difference. * Please submit a test case if you find a difference.
*/ */
#include "config.h"
#include <string.h> #include <string.h>
#include <stdlib.h> #include <stdlib.h>
#include <stdarg.h> #include <stdarg.h>
@ -34,7 +32,6 @@
#include "windef.h" #include "windef.h"
#include "winbase.h" #include "winbase.h"
#include "wine/unicode.h"
#include "winerror.h" #include "winerror.h"
#include "variant.h" #include "variant.h"
#include "wine/debug.h" #include "wine/debug.h"
@ -438,9 +435,9 @@ static const NAMED_FORMAT VARIANT_NamedFormats[] =
}; };
typedef const NAMED_FORMAT *LPCNAMED_FORMAT; typedef const NAMED_FORMAT *LPCNAMED_FORMAT;
static int FormatCompareFn(const void *l, const void *r) static int __cdecl FormatCompareFn(const void *l, const void *r)
{ {
return strcmpiW(((LPCNAMED_FORMAT)l)->name, ((LPCNAMED_FORMAT)r)->name); return wcsicmp(((LPCNAMED_FORMAT)l)->name, ((LPCNAMED_FORMAT)r)->name);
} }
static inline const BYTE *VARIANT_GetNamedFormat(LPCWSTR lpszFormat) static inline const BYTE *VARIANT_GetNamedFormat(LPCWSTR lpszFormat)
@ -763,7 +760,7 @@ HRESULT WINAPI VarTokenizeFormatString(LPOLESTR lpszFormat, LPBYTE rgbTok,
TRACE("time sep\n"); TRACE("time sep\n");
} }
else if ((*pFormat == 'a' || *pFormat == 'A') && else if ((*pFormat == 'a' || *pFormat == 'A') &&
!strncmpiW(pFormat, szAMPM, ARRAY_SIZE(szAMPM))) !_wcsnicmp(pFormat, szAMPM, ARRAY_SIZE(szAMPM)))
{ {
/* Date formats: System AM/PM designation /* Date formats: System AM/PM designation
* Other formats: Literal * Other formats: Literal
@ -772,7 +769,7 @@ HRESULT WINAPI VarTokenizeFormatString(LPOLESTR lpszFormat, LPBYTE rgbTok,
header->type = FMT_TYPE_DATE; header->type = FMT_TYPE_DATE;
NEED_SPACE(sizeof(BYTE)); NEED_SPACE(sizeof(BYTE));
pFormat += ARRAY_SIZE(szAMPM); pFormat += ARRAY_SIZE(szAMPM);
if (!strncmpW(pFormat, szampm, ARRAY_SIZE(szampm))) if (!wcsncmp(pFormat, szampm, ARRAY_SIZE(szampm)))
*pOut++ = FMT_DATE_AMPM_SYS2; *pOut++ = FMT_DATE_AMPM_SYS2;
else else
*pOut++ = FMT_DATE_AMPM_SYS1; *pOut++ = FMT_DATE_AMPM_SYS1;
@ -810,7 +807,7 @@ HRESULT WINAPI VarTokenizeFormatString(LPOLESTR lpszFormat, LPBYTE rgbTok,
*pLastHours = *pLastHours + 2; *pLastHours = *pLastHours + 2;
TRACE("A/P\n"); TRACE("A/P\n");
} }
else if (*pFormat == 'a' && !strncmpW(pFormat, szamSlashpm, ARRAY_SIZE(szamSlashpm))) else if (*pFormat == 'a' && !wcsncmp(pFormat, szamSlashpm, ARRAY_SIZE(szamSlashpm)))
{ {
/* Date formats: lowercase AM or PM designation /* Date formats: lowercase AM or PM designation
* Other formats: Literal * Other formats: Literal
@ -824,7 +821,7 @@ HRESULT WINAPI VarTokenizeFormatString(LPOLESTR lpszFormat, LPBYTE rgbTok,
*pLastHours = *pLastHours + 2; *pLastHours = *pLastHours + 2;
TRACE("AM/PM\n"); TRACE("AM/PM\n");
} }
else if (*pFormat == 'A' && !strncmpW(pFormat, szAMSlashPM, ARRAY_SIZE(szAMSlashPM))) else if (*pFormat == 'A' && !wcsncmp(pFormat, szAMSlashPM, ARRAY_SIZE(szAMSlashPM)))
{ {
/* Date formats: Uppercase AM or PM designation /* Date formats: Uppercase AM or PM designation
* Other formats: Literal * Other formats: Literal
@ -986,7 +983,7 @@ HRESULT WINAPI VarTokenizeFormatString(LPOLESTR lpszFormat, LPBYTE rgbTok,
fmt_state &= ~FMT_STATE_OPEN_COPY; fmt_state &= ~FMT_STATE_OPEN_COPY;
} }
else if ((*pFormat == 't' || *pFormat == 'T') && else if ((*pFormat == 't' || *pFormat == 'T') &&
!strncmpiW(pFormat, szTTTTT, ARRAY_SIZE(szTTTTT))) !_wcsnicmp(pFormat, szTTTTT, ARRAY_SIZE(szTTTTT)))
{ {
/* Date formats: System time specifier /* Date formats: System time specifier
* Other formats: Literal * Other formats: Literal
@ -1376,7 +1373,7 @@ VARIANT_FormatNumber_Bool:
hRes = VarBstrFromBool(V_BOOL(&vBool), lcid, boolFlag, &boolStr); hRes = VarBstrFromBool(V_BOOL(&vBool), lcid, boolFlag, &boolStr);
if (SUCCEEDED(hRes)) if (SUCCEEDED(hRes))
{ {
strcpyW(pBuff, boolStr); lstrcpyW(pBuff, boolStr);
SysFreeString(boolStr); SysFreeString(boolStr);
while (*pBuff) while (*pBuff)
pBuff++; pBuff++;
@ -1418,13 +1415,13 @@ VARIANT_FormatNumber_Bool:
if (exponent < 0) if (exponent < 0)
{ {
*pBuff++ = '-'; *pBuff++ = '-';
sprintfW(pBuff, szPercentZeroStar_d, pToken[1], -exponent); swprintf(pBuff, szPercentZeroStar_d, pToken[1], -exponent);
} }
else else
{ {
if (*pToken == FMT_NUM_EXP_POS_L || *pToken == FMT_NUM_EXP_POS_U) if (*pToken == FMT_NUM_EXP_POS_L || *pToken == FMT_NUM_EXP_POS_U)
*pBuff++ = '+'; *pBuff++ = '+';
sprintfW(pBuff, szPercentZeroStar_d, pToken[1], exponent); swprintf(pBuff, szPercentZeroStar_d, pToken[1], exponent);
} }
while (*pBuff) while (*pBuff)
pBuff++; pBuff++;
@ -1897,7 +1894,7 @@ static HRESULT VARIANT_FormatDate(LPVARIANT pVarIn, LPOLESTR lpszFormat,
} }
else if (szPrintFmt) else if (szPrintFmt)
{ {
sprintfW(pBuff, szPrintFmt, dwVal); swprintf(pBuff, szPrintFmt, dwVal);
while (*pBuff) while (*pBuff)
pBuff++; pBuff++;
} }
@ -1956,7 +1953,7 @@ static HRESULT VARIANT_FormatString(LPVARIANT pVarIn, LPOLESTR lpszFormat,
pSrc = V_BSTR(&vStr); pSrc = V_BSTR(&vStr);
if ((strHeader->flags & (FMT_FLAG_LT|FMT_FLAG_GT)) == FMT_FLAG_GT) if ((strHeader->flags & (FMT_FLAG_LT|FMT_FLAG_GT)) == FMT_FLAG_GT)
bUpper = TRUE; bUpper = TRUE;
blanks_first = strHeader->copy_chars - strlenW(pSrc); blanks_first = strHeader->copy_chars - lstrlenW(pSrc);
pToken = (const BYTE*)strHeader + sizeof(FMT_DATE_HEADER); pToken = (const BYTE*)strHeader + sizeof(FMT_DATE_HEADER);
while (*pToken != FMT_GEN_END) while (*pToken != FMT_GEN_END)
@ -1997,9 +1994,9 @@ static HRESULT VARIANT_FormatString(LPVARIANT pVarIn, LPOLESTR lpszFormat,
while (dwCount > 0 && *pSrc) while (dwCount > 0 && *pSrc)
{ {
if (bUpper) if (bUpper)
*pBuff++ = toupperW(*pSrc); *pBuff++ = towupper(*pSrc);
else else
*pBuff++ = tolowerW(*pSrc); *pBuff++ = towlower(*pSrc);
dwCount--; dwCount--;
pSrc++; pSrc++;
} }
@ -2025,9 +2022,9 @@ VARIANT_FormatString_Exit:
while (*pSrc) while (*pSrc)
{ {
if (bUpper) if (bUpper)
*pBuff++ = toupperW(*pSrc); *pBuff++ = towupper(*pSrc);
else else
*pBuff++ = tolowerW(*pSrc); *pBuff++ = towlower(*pSrc);
pSrc++; pSrc++;
} }
VariantClear(&vStr); VariantClear(&vStr);
@ -2284,9 +2281,9 @@ HRESULT WINAPI VarFormatNumber(LPVARIANT pVarIn, INT nDigits, INT nLeading, INT
if (nGrouping == -2) if (nGrouping == -2)
{ {
WCHAR grouping[16]; WCHAR grouping[10];
grouping[2] = '\0'; grouping[2] = '\0';
GetLocaleInfoW(LOCALE_USER_DEFAULT, LOCALE_SDECIMAL, grouping, ARRAY_SIZE(grouping)); GetLocaleInfoW(LOCALE_USER_DEFAULT, LOCALE_SGROUPING, grouping, ARRAY_SIZE(grouping));
numfmt.Grouping = grouping[2] == '2' ? 32 : grouping[0] - '0'; numfmt.Grouping = grouping[2] == '2' ? 32 : grouping[0] - '0';
} }
else if (nGrouping == -1) else if (nGrouping == -1)
@ -2380,12 +2377,12 @@ HRESULT WINAPI VarFormatPercent(LPVARIANT pVarIn, INT nDigits, INT nLeading, INT
if (SUCCEEDED(hRet)) if (SUCCEEDED(hRet))
{ {
DWORD dwLen = strlenW(*pbstrOut); DWORD dwLen = lstrlenW(*pbstrOut);
BOOL bBracket = (*pbstrOut)[dwLen] == ')'; BOOL bBracket = (*pbstrOut)[dwLen] == ')';
dwLen -= bBracket; dwLen -= bBracket;
memcpy(buff, *pbstrOut, dwLen * sizeof(WCHAR)); memcpy(buff, *pbstrOut, dwLen * sizeof(WCHAR));
strcpyW(buff + dwLen, bBracket ? szPercentBracket : szPercent); lstrcpyW(buff + dwLen, bBracket ? szPercentBracket : szPercent);
SysFreeString(*pbstrOut); SysFreeString(*pbstrOut);
*pbstrOut = SysAllocString(buff); *pbstrOut = SysAllocString(buff);
if (!*pbstrOut) if (!*pbstrOut)
@ -2443,7 +2440,7 @@ HRESULT WINAPI VarFormatCurrency(LPVARIANT pVarIn, INT nDigits, INT nLeading,
if (SUCCEEDED(hRet)) if (SUCCEEDED(hRet))
{ {
WCHAR buff[256], decimal[8], thousands[8], currency[8]; WCHAR buff[256], decimal[8], thousands[4], currency[13];
CURRENCYFMTW numfmt; CURRENCYFMTW numfmt;
if (nDigits < 0) if (nDigits < 0)
@ -2460,9 +2457,9 @@ HRESULT WINAPI VarFormatCurrency(LPVARIANT pVarIn, INT nDigits, INT nLeading,
if (nGrouping == -2) if (nGrouping == -2)
{ {
WCHAR grouping[16]; WCHAR grouping[10];
grouping[2] = '\0'; grouping[2] = '\0';
GetLocaleInfoW(LOCALE_USER_DEFAULT, LOCALE_SDECIMAL, grouping, ARRAY_SIZE(grouping)); GetLocaleInfoW(LOCALE_USER_DEFAULT, LOCALE_SGROUPING, grouping, ARRAY_SIZE(grouping));
numfmt.Grouping = grouping[2] == '2' ? 32 : grouping[0] - '0'; numfmt.Grouping = grouping[2] == '2' ? 32 : grouping[0] - '0';
} }
else if (nGrouping == -1) else if (nGrouping == -1)
@ -2482,9 +2479,9 @@ HRESULT WINAPI VarFormatCurrency(LPVARIANT pVarIn, INT nDigits, INT nLeading,
numfmt.lpDecimalSep = decimal; numfmt.lpDecimalSep = decimal;
GetLocaleInfoW(LOCALE_USER_DEFAULT, LOCALE_SDECIMAL, decimal, ARRAY_SIZE(decimal)); GetLocaleInfoW(LOCALE_USER_DEFAULT, LOCALE_SDECIMAL, decimal, ARRAY_SIZE(decimal));
numfmt.lpThousandSep = thousands; numfmt.lpThousandSep = thousands;
GetLocaleInfoW(LOCALE_USER_DEFAULT, LOCALE_SDECIMAL, thousands, ARRAY_SIZE(thousands)); GetLocaleInfoW(LOCALE_USER_DEFAULT, LOCALE_STHOUSAND, thousands, ARRAY_SIZE(thousands));
numfmt.lpCurrencySymbol = currency; numfmt.lpCurrencySymbol = currency;
GetLocaleInfoW(LOCALE_USER_DEFAULT, LOCALE_SDECIMAL, currency, ARRAY_SIZE(currency)); GetLocaleInfoW(LOCALE_USER_DEFAULT, LOCALE_SCURRENCY, currency, ARRAY_SIZE(currency));
/* use NLS as per VarFormatNumber() */ /* use NLS as per VarFormatNumber() */
if (GetCurrencyFormatW(LOCALE_USER_DEFAULT, 0, V_BSTR(&vStr), &numfmt, buff, ARRAY_SIZE(buff))) if (GetCurrencyFormatW(LOCALE_USER_DEFAULT, 0, V_BSTR(&vStr), &numfmt, buff, ARRAY_SIZE(buff)))

23
dll/win32/oleaut32/variant.c
View file

@ -25,8 +25,6 @@
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
*/ */
#include "config.h"
#include <string.h> #include <string.h>
#include <stdlib.h> #include <stdlib.h>
#include <stdarg.h> #include <stdarg.h>
@ -37,7 +35,6 @@
#include "windef.h" #include "windef.h"
#include "winbase.h" #include "winbase.h"
#include "wine/unicode.h"
#include "winerror.h" #include "winerror.h"
#include "variant.h" #include "variant.h"
#include "resource.h" #include "resource.h"
@ -1635,14 +1632,14 @@ HRESULT WINAPI VarParseNumFromStr(OLECHAR *lpszStr, LCID lcid, ULONG dwFlags,
/* First consume all the leading symbols and space from the string */ /* First consume all the leading symbols and space from the string */
while (1) while (1)
{ {
if (pNumprs->dwInFlags & NUMPRS_LEADING_WHITE && isspaceW(*lpszStr)) if (pNumprs->dwInFlags & NUMPRS_LEADING_WHITE && iswspace(*lpszStr))
{ {
pNumprs->dwOutFlags |= NUMPRS_LEADING_WHITE; pNumprs->dwOutFlags |= NUMPRS_LEADING_WHITE;
do do
{ {
cchUsed++; cchUsed++;
lpszStr++; lpszStr++;
} while (isspaceW(*lpszStr)); } while (iswspace(*lpszStr));
} }
else if (pNumprs->dwInFlags & NUMPRS_LEADING_PLUS && else if (pNumprs->dwInFlags & NUMPRS_LEADING_PLUS &&
*lpszStr == chars.cPositiveSymbol && *lpszStr == chars.cPositiveSymbol &&
@ -1717,14 +1714,14 @@ HRESULT WINAPI VarParseNumFromStr(OLECHAR *lpszStr, LCID lcid, ULONG dwFlags,
while (*lpszStr) while (*lpszStr)
{ {
if (isdigitW(*lpszStr)) if (iswdigit(*lpszStr))
{ {
if (dwState & B_PROCESSING_EXPONENT) if (dwState & B_PROCESSING_EXPONENT)
{ {
int exponentSize = 0; int exponentSize = 0;
if (dwState & B_EXPONENT_START) if (dwState & B_EXPONENT_START)
{ {
if (!isdigitW(*lpszStr)) if (!iswdigit(*lpszStr))
break; /* No exponent digits - invalid */ break; /* No exponent digits - invalid */
while (*lpszStr == '0') while (*lpszStr == '0')
{ {
@ -1734,7 +1731,7 @@ HRESULT WINAPI VarParseNumFromStr(OLECHAR *lpszStr, LCID lcid, ULONG dwFlags,
} }
} }
while (isdigitW(*lpszStr)) while (iswdigit(*lpszStr))
{ {
exponentSize *= 10; exponentSize *= 10;
exponentSize += *lpszStr - '0'; exponentSize += *lpszStr - '0';
@ -1906,14 +1903,14 @@ HRESULT WINAPI VarParseNumFromStr(OLECHAR *lpszStr, LCID lcid, ULONG dwFlags,
/* Consume any trailing symbols and space */ /* Consume any trailing symbols and space */
while (1) while (1)
{ {
if ((pNumprs->dwInFlags & NUMPRS_TRAILING_WHITE) && isspaceW(*lpszStr)) if ((pNumprs->dwInFlags & NUMPRS_TRAILING_WHITE) && iswspace(*lpszStr))
{ {
pNumprs->dwOutFlags |= NUMPRS_TRAILING_WHITE; pNumprs->dwOutFlags |= NUMPRS_TRAILING_WHITE;
do do
{ {
cchUsed++; cchUsed++;
lpszStr++; lpszStr++;
} while (isspaceW(*lpszStr)); } while (iswspace(*lpszStr));
} }
else if (pNumprs->dwInFlags & NUMPRS_TRAILING_PLUS && else if (pNumprs->dwInFlags & NUMPRS_TRAILING_PLUS &&
!(pNumprs->dwOutFlags & NUMPRS_LEADING_PLUS) && !(pNumprs->dwOutFlags & NUMPRS_LEADING_PLUS) &&
@ -5138,7 +5135,9 @@ HRESULT WINAPI VarRound(LPVARIANT pVarIn, int deci, LPVARIANT pVarOut)
{ {
double dbl; double dbl;
VarR8FromDec(&V_DECIMAL(pVarIn), &dbl); hRet = VarR8FromDec(&V_DECIMAL(pVarIn), &dbl);
if (FAILED(hRet))
break;
if (dbl>0.0f) if (dbl>0.0f)
dbl = floor(dbl*pow(10,deci)+0.5); dbl = floor(dbl*pow(10,deci)+0.5);
@ -5146,7 +5145,7 @@ HRESULT WINAPI VarRound(LPVARIANT pVarIn, int deci, LPVARIANT pVarOut)
dbl = ceil(dbl*pow(10,deci)-0.5); dbl = ceil(dbl*pow(10,deci)-0.5);
V_VT(pVarOut)=VT_DECIMAL; V_VT(pVarOut)=VT_DECIMAL;
VarDecFromR8(dbl, &V_DECIMAL(pVarOut)); hRet = VarDecFromR8(dbl, &V_DECIMAL(pVarOut));
break; break;
} }
/* cases we don't know yet */ /* cases we don't know yet */

35
dll/win32/oleaut32/vartype.c
View file

@ -22,8 +22,9 @@
#define NONAMELESSUNION #define NONAMELESSUNION
#define NONAMELESSSTRUCT #define NONAMELESSSTRUCT
#include <wchar.h>
#include "wine/debug.h" #include "wine/debug.h"
#include "wine/unicode.h"
#include "winbase.h" #include "winbase.h"
#include "winuser.h" #include "winuser.h"
#include "winnt.h" #include "winnt.h"
@ -6150,13 +6151,13 @@ VarBoolFromStr_CheckLocalised:
if (VARIANT_GetLocalisedText(langId, IDS_TRUE, szBuff)) if (VARIANT_GetLocalisedText(langId, IDS_TRUE, szBuff))
{ {
/* Compare against localised strings, ignoring case */ /* Compare against localised strings, ignoring case */
if (!strcmpiW(strIn, szBuff)) if (!wcsicmp(strIn, szBuff))
{ {
*pBoolOut = VARIANT_TRUE; /* Matched localised 'true' text */ *pBoolOut = VARIANT_TRUE; /* Matched localised 'true' text */
return hRes; return hRes;
} }
VARIANT_GetLocalisedText(langId, IDS_FALSE, szBuff); VARIANT_GetLocalisedText(langId, IDS_FALSE, szBuff);
if (!strcmpiW(strIn, szBuff)) if (!wcsicmp(strIn, szBuff))
{ {
*pBoolOut = VARIANT_FALSE; /* Matched localised 'false' text */ *pBoolOut = VARIANT_FALSE; /* Matched localised 'false' text */
return hRes; return hRes;
@ -6171,9 +6172,9 @@ VarBoolFromStr_CheckLocalised:
} }
/* All checks against localised text have failed, try #TRUE#/#FALSE# */ /* All checks against localised text have failed, try #TRUE#/#FALSE# */
if (!strcmpW(strIn, szFalse)) if (!wcscmp(strIn, szFalse))
*pBoolOut = VARIANT_FALSE; *pBoolOut = VARIANT_FALSE;
else if (!strcmpW(strIn, szTrue)) else if (!wcscmp(strIn, szTrue))
*pBoolOut = VARIANT_TRUE; *pBoolOut = VARIANT_TRUE;
else else
{ {
@ -6356,7 +6357,7 @@ static BSTR VARIANT_MakeBstr(LCID lcid, DWORD dwFlags, WCHAR *szOut)
szOut, NULL, szConverted, ARRAY_SIZE(szConverted)); szOut, NULL, szConverted, ARRAY_SIZE(szConverted));
szOut = szConverted; szOut = szConverted;
} }
return SysAllocStringByteLen((LPCSTR)szOut, strlenW(szOut) * sizeof(WCHAR)); return SysAllocStringByteLen((LPCSTR)szOut, lstrlenW(szOut) * sizeof(WCHAR));
} }
/* Create a (possibly localised) BSTR from a UI8 and sign */ /* Create a (possibly localised) BSTR from a UI8 and sign */
@ -6487,8 +6488,8 @@ static BSTR VARIANT_BstrReplaceDecimal(const WCHAR * buff, LCID lcid, ULONG dwFl
minFormat.NegativeOrder = 1; /* NLS_NEG_LEFT */ minFormat.NegativeOrder = 1; /* NLS_NEG_LEFT */
/* count number of decimal digits in string */ /* count number of decimal digits in string */
p = strchrW( buff, '.' ); p = wcschr( buff, '.' );
if (p) minFormat.NumDigits = strlenW(p + 1); if (p) minFormat.NumDigits = lstrlenW(p + 1);
numbuff[0] = '\0'; numbuff[0] = '\0';
if (!GetNumberFormatW(lcid, 0, buff, &minFormat, numbuff, ARRAY_SIZE(numbuff))) if (!GetNumberFormatW(lcid, 0, buff, &minFormat, numbuff, ARRAY_SIZE(numbuff)))
@ -6513,7 +6514,7 @@ static HRESULT VARIANT_BstrFromReal(DOUBLE dblIn, LCID lcid, ULONG dwFlags,
if (!pbstrOut) if (!pbstrOut)
return E_INVALIDARG; return E_INVALIDARG;
sprintfW( buff, lpszFormat, dblIn ); swprintf( buff, lpszFormat, dblIn );
/* Negative zeroes are disallowed (some applications depend on this). /* Negative zeroes are disallowed (some applications depend on this).
If buff starts with a minus, and then nothing follows but zeroes If buff starts with a minus, and then nothing follows but zeroes
@ -6523,7 +6524,7 @@ static HRESULT VARIANT_BstrFromReal(DOUBLE dblIn, LCID lcid, ULONG dwFlags,
if (buff[0] == '-') if (buff[0] == '-')
{ {
static const WCHAR szAccept[] = {'0', '.', '\0'}; static const WCHAR szAccept[] = {'0', '.', '\0'};
if (strlenW(buff + 1) == strspnW(buff + 1, szAccept)) if (lstrlenW(buff + 1) == wcsspn(buff + 1, szAccept))
{ buff[0] = '0'; buff[1] = '\0'; } { buff[0] = '0'; buff[1] = '\0'; }
} }
@ -6814,7 +6815,7 @@ HRESULT WINAPI VarBstrFromDate(DATE dateIn, LCID lcid, ULONG dwFlags, BSTR* pbst
if (!(dwFlags & VAR_DATEVALUEONLY)) if (!(dwFlags & VAR_DATEVALUEONLY))
{ {
time = date + strlenW(date); time = date + lstrlenW(date);
if (time != date) if (time != date)
*time++ = ' '; *time++ = ' ';
if (!GetTimeFormatW(lcid, dwFormatFlags, &st, NULL, time, ARRAY_SIZE(date)-(time-date))) if (!GetTimeFormatW(lcid, dwFormatFlags, &st, NULL, time, ARRAY_SIZE(date)-(time-date)))
@ -7658,25 +7659,25 @@ HRESULT WINAPI VarDateFromStr(OLECHAR* strIn, LCID lcid, ULONG dwFlags, DATE* pd
/* Parse the string into our structure */ /* Parse the string into our structure */
while (*strIn) while (*strIn)
{ {
if (isdigitW(*strIn)) if (iswdigit(*strIn))
{ {
if (dp.dwCount >= 6) if (dp.dwCount >= 6)
{ {
hRet = DISP_E_TYPEMISMATCH; hRet = DISP_E_TYPEMISMATCH;
break; break;
} }
dp.dwValues[dp.dwCount] = strtoulW(strIn, &strIn, 10); dp.dwValues[dp.dwCount] = wcstoul(strIn, &strIn, 10);
dp.dwCount++; dp.dwCount++;
strIn--; strIn--;
} }
else if (isalphaW(*strIn)) else if (iswalpha(*strIn))
{ {
BOOL bFound = FALSE; BOOL bFound = FALSE;
for (i = 0; i < ARRAY_SIZE(tokens); i++) for (i = 0; i < ARRAY_SIZE(tokens); i++)
{ {
DWORD dwLen = strlenW(tokens[i]); DWORD dwLen = lstrlenW(tokens[i]);
if (dwLen && !strncmpiW(strIn, tokens[i], dwLen)) if (dwLen && !_wcsnicmp(strIn, tokens[i], dwLen))
{ {
if (i <= 25) if (i <= 25)
{ {
@ -7755,7 +7756,7 @@ HRESULT WINAPI VarDateFromStr(OLECHAR* strIn, LCID lcid, ULONG dwFlags, DATE* pd
else else
dp.dwFlags[dp.dwCount - 1] |= DP_DATESEP; dp.dwFlags[dp.dwCount - 1] |= DP_DATESEP;
} }
else if (*strIn == ',' || isspaceW(*strIn)) else if (*strIn == ',' || iswspace(*strIn))
{ {
if (*strIn == ',' && !strIn[1]) if (*strIn == ',' && !strIn[1])
hRet = DISP_E_TYPEMISMATCH; hRet = DISP_E_TYPEMISMATCH;

2
media/doc/README.WINE
View file

@ -142,7 +142,7 @@ dll/win32/odbc32 # Synced to WineStaging-4.18. Depends on port of L
dll/win32/odbccp32 # Synced to WineStaging-4.18 dll/win32/odbccp32 # Synced to WineStaging-4.18
dll/win32/ole32 # Synced to WineStaging-4.18 dll/win32/ole32 # Synced to WineStaging-4.18
dll/win32/oleacc # Synced to WineStaging-4.18 dll/win32/oleacc # Synced to WineStaging-4.18
dll/win32/oleaut32 # Synced to WineStaging-4.0 dll/win32/oleaut32 # Synced to WineStaging-4.18
dll/win32/olecli32 # Synced to WineStaging-3.3 dll/win32/olecli32 # Synced to WineStaging-3.3
dll/win32/oledlg # Synced to WineStaging-4.0 dll/win32/oledlg # Synced to WineStaging-4.0
dll/win32/olepro32 # Synced to WineStaging-3.3 dll/win32/olepro32 # Synced to WineStaging-3.3