[3/3] oledb32: Implement DataConvert DBTYPE_BSTR->DBTYPE_I8

[Alistair Leslie-Hughes]

Hi,


Changelog:
     oledb32: Implement DataConvert DBTYPE_BSTR->DBTYPE_I8


Best Regards
  Alistair Leslie-Hughes
-------------- next part --------------
>From 2f741cf658b65192b1e04987dffa797c1b7d0827 Mon Sep 17 00:00:00 2001
From: Alistair Leslie-Hughes <leslie_alistair at hotmail.com>
Date: Tue, 16 Apr 2013 11:23:59 +1000
Subject: [PATCH] Implement DataConvert DBTYPE_BSTR->DBTYPE_I8
To: wine-patches <wine-patches at winehq.org>

---
 dlls/oledb32/convert.c       |    1 +
 dlls/oledb32/tests/convert.c |   13 +++++++++++++
 2 files changed, 14 insertions(+)

diff --git a/dlls/oledb32/convert.c b/dlls/oledb32/convert.c
index 9a82956..d23c944 100644
--- a/dlls/oledb32/convert.c
+++ b/dlls/oledb32/convert.c
@@ -292,6 +292,7 @@ static HRESULT WINAPI convert_DataConvert(IDataConvert* iface,
         LONGLONG *d = dst;
         switch(src_type)
         {
+        case DBTYPE_BSTR:        hr = VarI8FromStr(*(WCHAR**)src, LOCALE_USER_DEFAULT, 0, d); break;
         case DBTYPE_I8:          *d = *(LONGLONG*)src; hr = S_OK;              break;
         default: FIXME("Unimplemented conversion %04x -> I8\n", src_type); return E_NOTIMPL;
         }
diff --git a/dlls/oledb32/tests/convert.c b/dlls/oledb32/tests/convert.c
index ef05c40..a2b1366 100644
--- a/dlls/oledb32/tests/convert.c
+++ b/dlls/oledb32/tests/convert.c
@@ -925,6 +925,8 @@ static void test_converttoi8(void)
     BYTE src[20];
     DBSTATUS dst_status;
     DBLENGTH dst_len;
+    static const WCHAR ten[] = {'1','0',0};
+    BSTR b;
 
     hr = CoCreateInstance(&CLSID_OLEDB_CONVERSIONLIBRARY, NULL, CLSCTX_INPROC_SERVER, &IID_IDataConvert, (void**)&convert);
     if(FAILED(hr))
@@ -942,6 +944,17 @@ static void test_converttoi8(void)
     ok(dst_len == sizeof(dst), "got %ld\n", dst_len);
     ok(dst.QuadPart == 1234, "got %d\n", (int)dst.QuadPart);
 
+    dst.QuadPart = 0xcc;
+    ((ULARGE_INTEGER*)src)->QuadPart = 1234;
+    b = SysAllocString(ten);
+    *(BSTR *)src = b;
+    hr = IDataConvert_DataConvert(convert, DBTYPE_BSTR, DBTYPE_I8, 0, &dst_len, src, &dst, sizeof(dst), 0, &dst_status, 0, 0, 0);
+    ok(hr == S_OK, "got %08x\n", hr);
+    ok(dst_status == DBSTATUS_S_OK, "got %08x\n", dst_status);
+    ok(dst_len == sizeof(dst), "got %ld\n", dst_len);
+    ok(dst.QuadPart == 10, "got %d\n", (int)dst.QuadPart);
+    SysFreeString(b);
+
     IDataConvert_Release(convert);
 }
 
-- 
1.7.10.4