ReactOS  0.4.13-dev-479-gec9c8fd
xmlview.c
Go to the documentation of this file.
1 /*
2  * Copyright 2012 Piotr Caban for CodeWeavers
3  *
4  * This library is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU Lesser General Public
6  * License as published by the Free Software Foundation; either
7  * version 2.1 of the License, or (at your option) any later version.
8  *
9  * This library is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12  * Lesser General Public License for more details.
13  *
14  * You should have received a copy of the GNU Lesser General Public
15  * License along with this library; if not, write to the Free Software
16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
17  */
18 #define COBJMACROS
19 #define CONST_VTABLE
20 
21 #include <stdio.h>
22 #include <assert.h>
23 
24 #include "windows.h"
25 #include "ole2.h"
26 #include "mshtml.h"
27 #include "mshtmdid.h"
28 #include "initguid.h"
29 #include "perhist.h"
30 #include "docobj.h"
31 #include "urlmon.h"
32 #include "xmlparser.h"
33 
34 #include "wine/test.h"
35 
36 HRESULT (WINAPI *pCreateURLMoniker)(IMoniker*, LPCWSTR, IMoniker**);
37 
38 static const char xmlview_html[] =
39 "\r\n"
40 "<BODY><H2>Generated HTML</H2>\r\n"
41 "<TABLE>\r\n"
42 "<TBODY>\r\n"
43 "<TR bgColor=green>\r\n"
44 "<TH>Title</TH>\r\n"
45 "<TH>Value</TH></TR>\r\n"
46 "<TR>\r\n"
47 "<TD>title1</TD>\r\n"
48 "<TD>value1</TD></TR>\r\n"
49 "<TR>\r\n"
50 "<TD>title2</TD>\r\n"
51 "<TD>value2</TD></TR></TBODY></TABLE></BODY>";
52 
53 IHTMLDocument2 *html_doc;
55 
56 static int html_src_compare(LPCWSTR strw, const char *stra)
57 {
58  char buf[2048], *p1;
59  const char *p2;
60 
61  WideCharToMultiByte(CP_ACP, 0, strw, -1, buf, sizeof(buf), NULL, NULL);
62 
63  p1 = buf;
64  p2 = stra;
65  while(1) {
66  while(*p1=='\r' || *p1=='\n' || *p1=='\"') p1++;
67  while(*p2=='\r' || *p2=='\n') p2++;
68 
69  if(!*p1 || !*p2 || tolower(*p1)!=tolower(*p2))
70  break;
71 
72  p1++;
73  p2++;
74  }
75 
76  return *p1 != *p2;
77 }
78 
80 {
82  *ppv = iface;
83  return S_OK;
84  }
85 
86  ok(0, "Unexpected call\n");
87  return E_NOINTERFACE;
88 }
89 
91 {
92  return 2;
93 }
94 
96 {
97  return 1;
98 }
99 
101 {
102  ok(0, "unexpected call\n");
103  return E_NOTIMPL;
104 }
105 
107  ITypeInfo **ppTInfo)
108 {
109  ok(0, "unexpected call\n");
110  return E_NOTIMPL;
111 }
112 
114  UINT cNames, LCID lcid, DISPID *rgDispId)
115 {
116  ok(0, "unexpected call\n");
117  return E_NOTIMPL;
118 }
119 
121  LCID lcid, WORD wFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult,
122  EXCEPINFO *pExcepInfo, UINT *puArgErr)
123 {
125  static const WCHAR completeW[] = {'c','o','m','p','l','e','t','e',0};
126  HRESULT hr;
127  BSTR state;
128 
129  hr = IHTMLDocument2_get_readyState(html_doc, &state);
130  ok(hr == S_OK, "got 0x%08x\n", hr);
131  if(!memcmp(state, completeW, sizeof(completeW)))
132  loaded = TRUE;
134  }
135 
136  return S_OK;
137 }
138 
139 static const IDispatchVtbl HTMLEventsVtbl = {
147 };
148 
150 
151 static void test_QueryInterface(void)
152 {
153  IUnknown *xmlview, *unk;
154  IHTMLDocument *htmldoc;
155  HRESULT hres;
156 
157  hres = CoCreateInstance(&CLSID_XMLView, NULL, CLSCTX_INPROC_SERVER|CLSCTX_INPROC_HANDLER,
158  &IID_IUnknown, (void**)&xmlview);
159  if(FAILED(hres)) {
160  win_skip("Failed to create XMLView instance\n");
161  return;
162  }
163  ok(hres == S_OK, "CoCreateInstance returned %x, expected S_OK\n", hres);
164 
165  hres = IUnknown_QueryInterface(xmlview, &IID_IPersistMoniker, (void**)&unk);
166  ok(hres == S_OK, "QueryInterface(IID_IPersistMoniker) returned %x, expected S_OK\n", hres);
167  IUnknown_Release(unk);
168 
169  hres = IUnknown_QueryInterface(xmlview, &IID_IPersistHistory, (void**)&unk);
170  ok(hres == S_OK, "QueryInterface(IID_IPersistHistory) returned %x, expected S_OK\n", hres);
171  IUnknown_Release(unk);
172 
173  hres = IUnknown_QueryInterface(xmlview, &IID_IOleCommandTarget, (void**)&unk);
174  ok(hres == S_OK, "QueryInterface(IID_IOleCommandTarget) returned %x, expected S_OK\n", hres);
175  IUnknown_Release(unk);
176 
177  hres = IUnknown_QueryInterface(xmlview, &IID_IOleObject, (void**)&unk);
178  ok(hres == S_OK, "QueryInterface(IID_IOleObject) returned %x, expected S_OK\n", hres);
179  IUnknown_Release(unk);
180 
181  hres = IUnknown_QueryInterface(xmlview, &IID_IHTMLDocument, (void**)&htmldoc);
182  ok(hres == S_OK, "QueryInterface(IID_IHTMLDocument) returned %x, expected S_OK\n", hres);
183  hres = IHTMLDocument_QueryInterface(htmldoc, &IID_IUnknown, (void**)&unk);
184  ok(hres == S_OK, "QueryInterface(IID_IUnknown) returned %x, expected S_OK\n", hres);
185  ok(unk == xmlview, "Aggregation is not working as expected\n");
186  IUnknown_Release(unk);
187  IHTMLDocument_Release(htmldoc);
188 
189  IUnknown_Release(xmlview);
190 }
191 
192 static void test_Load(void)
193 {
194  static const WCHAR xmlview_xmlW[] = {'/','x','m','l','/','x','m','l','v','i','e','w','.','x','m','l',0};
195  static const WCHAR res[] = {'r','e','s',':','/','/',0};
196 
197  WCHAR buf[1024];
198  IPersistMoniker *pers_mon;
201  IMoniker *mon;
202  IBindCtx *bctx;
203  IHTMLElement *elem;
204  HRESULT hres;
205  MSG msg;
206  BSTR source;
207 
208  lstrcpyW(buf, res);
210  lstrcatW(buf, xmlview_xmlW);
211 
212  if(!pCreateURLMoniker) {
213  win_skip("CreateURLMoniker not available\n");
214  return;
215  }
216 
217  hres = CoCreateInstance(&CLSID_XMLView, NULL, CLSCTX_INPROC_SERVER|CLSCTX_INPROC_HANDLER,
218  &IID_IPersistMoniker, (void**)&pers_mon);
219  if(FAILED(hres)) {
220  win_skip("Failed to create XMLView instance\n");
221  return;
222  }
223  ok(hres == S_OK, "CoCreateInstance returned %x, expected S_OK\n", hres);
224 
225  hres = IPersistMoniker_QueryInterface(pers_mon, &IID_IHTMLDocument2, (void**)&html_doc);
226  ok(hres == S_OK, "QueryInterface(HTMLDocument2) returned %x, expected S_OK\n", hres);
227  hres = IPersistMoniker_QueryInterface(pers_mon, &IID_IConnectionPointContainer, (void**)&cpc);
228  ok(hres == S_OK, "QueryInterface(IConnectionPointContainer) returned %x, expected S_OK\n", hres);
229  hres = IConnectionPointContainer_FindConnectionPoint(cpc, &IID_IDispatch, &cp);
230  ok(hres == S_OK, "FindConnectionPoint returned %x, expected S_OK\n", hres);
231  hres = IConnectionPoint_Advise(cp, (IUnknown*)&HTMLEvents, NULL);
232  ok(hres == S_OK, "Advise returned %x, expected S_OK\n", hres);
233  IConnectionPoint_Release(cp);
234  IConnectionPointContainer_Release(cpc);
235 
236  hres = CreateBindCtx(0, &bctx);
237  ok(hres == S_OK, "CreateBindCtx returned %x, expected S_OK\n", hres);
238  hres = pCreateURLMoniker(NULL, buf, &mon);
239  ok(hres == S_OK, "CreateUrlMoniker returned %x, expected S_OK\n", hres);
240  loaded = FALSE;
241  hres = IPersistMoniker_Load(pers_mon, TRUE, mon, bctx, 0);
242  ok(hres == S_OK, "Load returned %x, expected S_OK\n", hres);
243  IBindCtx_Release(bctx);
244  IMoniker_Release(mon);
245 
246  while(!loaded && GetMessageA(&msg, NULL, 0, 0)) {
249  }
250 
251  hres = IHTMLDocument2_get_body(html_doc, &elem);
252  ok(hres == S_OK, "get_body returned %x, expected S_OK\n", hres);
253  hres = IHTMLElement_get_outerHTML(elem, &source);
254  ok(hres == S_OK, "get_outerHTML returned %x, expected S_OK\n", hres);
255  ok(!html_src_compare(source, xmlview_html), "Incorrect HTML source: %s\n", wine_dbgstr_w(source));
256  IHTMLElement_Release(elem);
258 
259  IHTMLDocument2_Release(html_doc);
260  html_doc = NULL;
261  IPersistMoniker_Release(pers_mon);
262 }
263 
264 START_TEST(xmlview)
265 {
266  HMODULE urlmon = LoadLibraryA("urlmon.dll");
267  pCreateURLMoniker = (void*)GetProcAddress(urlmon, "CreateURLMoniker");
268 
271  test_Load();
272  CoUninitialize();
273 }
DWORD WINAPI GetModuleFileNameW(HINSTANCE hModule, LPWSTR lpFilename, DWORD nSize)
Definition: loader.c:607
HRESULT(WINAPI *pCreateURLMoniker)(IMoniker *
BOOL WINAPI TranslateMessage(_In_ const MSG *)
LRESULT WINAPI DispatchMessageA(_In_ const MSG *)
#define REFIID
Definition: guiddef.h:113
#define TRUE
Definition: types.h:120
#define E_NOINTERFACE
Definition: winerror.h:2364
int memcmp(void *Buffer1, void *Buffer2, ACPI_SIZE Count)
Definition: utclib.c:112
static void test_QueryInterface(void)
Definition: xmlview.c:151
#define WideCharToMultiByte
Definition: compat.h:101
HRESULT hr
Definition: shlfolder.c:183
const WCHAR * LPCWSTR
Definition: xmlstorage.h:185
static ULONG WINAPI HTMLEvents_Release(IDispatch *iface)
Definition: xmlview.c:95
GLenum GLuint GLenum GLsizei const GLchar * buf
Definition: glext.h:7751
REFIID riid
Definition: precomp.h:44
#define CP_ACP
Definition: compat.h:99
TW_UINT32 TW_UINT16 TW_UINT16 MSG
Definition: twain.h:1827
REFIID LPVOID * ppv
Definition: atlbase.h:39
const GUID IID_IConnectionPointContainer
#define wine_dbgstr_w
Definition: kernel32.h:34
BOOL WINAPI GetMessageA(_Out_ LPMSG, _In_opt_ HWND, _In_ UINT, _In_ UINT)
DWORD LCID
Definition: nls.h:13
OLECHAR * BSTR
Definition: compat.h:1934
static HRESULT WINAPI HTMLEvents_QueryInterface(IDispatch *iface, REFIID riid, void **ppv)
Definition: xmlview.c:79
static LPOLESTR
Definition: stg_prop.c:27
#define lstrlenW
Definition: compat.h:407
unsigned int BOOL
Definition: ntddk_ex.h:94
HINSTANCE WINAPI DECLSPEC_HOTPATCH LoadLibraryA(LPCSTR lpLibFileName)
Definition: loader.c:111
static size_t elem
Definition: string.c:68
#define ok(value,...)
smooth NULL
Definition: ftsmooth.c:416
static HRESULT WINAPI HTMLEvents_GetTypeInfo(IDispatch *iface, UINT iTInfo, LCID lcid, ITypeInfo **ppTInfo)
Definition: xmlview.c:106
const GUID IID_IOleObject
#define DISPID_HTMLDOCUMENTEVENTS2_ONREADYSTATECHANGE
Definition: mshtmdid.h:910
HRESULT hres
Definition: protocol.c:465
HRESULT WINAPI CreateBindCtx(DWORD reserved, LPBC *ppbc)
Definition: bindctx.c:556
__wchar_t WCHAR
Definition: xmlstorage.h:180
LONG HRESULT
Definition: typedefs.h:77
const GUID IID_IUnknown
#define WINAPI
Definition: msvc.h:8
unsigned short WORD
Definition: ntddk_ex.h:93
START_TEST(xmlview)
Definition: xmlview.c:264
BOOL loaded
Definition: xmlview.c:54
LPCWSTR
Definition: xmlview.c:36
const GUID IID_IDispatch
IHTMLDocument2 * html_doc
Definition: xmlview.c:53
static int state
Definition: maze.c:121
static IDispatch HTMLEvents
Definition: xmlview.c:149
static HRESULT WINAPI HTMLEvents_GetIDsOfNames(IDispatch *iface, REFIID riid, LPOLESTR *rgszNames, UINT cNames, LCID lcid, DISPID *rgDispId)
Definition: xmlview.c:113
HRESULT WINAPI DECLSPEC_HOTPATCH CoCreateInstance(REFCLSID rclsid, LPUNKNOWN pUnkOuter, DWORD dwClsContext, REFIID iid, LPVOID *ppv)
Definition: compobj.c:3234
_In_ DWORD _Out_ _In_ WORD wFlags
Definition: wincon.h:519
static int html_src_compare(LPCWSTR strw, const char *stra)
Definition: xmlview.c:56
struct stdole::EXCEPINFO EXCEPINFO
static VARIANTARG static DISPID
Definition: ordinal.c:49
#define S_OK
Definition: intsafe.h:59
static HRESULT WINAPI HTMLEvents_GetTypeInfoCount(IDispatch *iface, UINT *pctinfo)
Definition: xmlview.c:100
#define lstrcpyW
Definition: compat.h:406
void WINAPI DECLSPEC_HOTPATCH CoUninitialize(void)
Definition: compobj.c:1991
GLsizei GLsizei GLchar * source
Definition: glext.h:6048
#define ARRAY_SIZE(a)
Definition: main.h:24
IMoniker **static const char xmlview_html[]
Definition: xmlview.c:38
#define E_NOTIMPL
Definition: ddrawi.h:99
void WINAPI DECLSPEC_HOTPATCH SysFreeString(BSTR str)
Definition: oleaut.c:274
unsigned int UINT
Definition: ndis.h:50
BOOL WINAPI IsEqualGUID(REFGUID rguid1, REFGUID rguid2)
Definition: compobj.c:4021
HRESULT WINAPI CoInitialize(LPVOID lpReserved)
Definition: compobj.c:1897
#define msg(x)
Definition: auth_time.c:54
static const IDispatchVtbl HTMLEventsVtbl
Definition: xmlview.c:139
POINT cp
Definition: magnifier.c:59
GLuint res
Definition: glext.h:9613
struct stdole::DISPPARAMS DISPPARAMS
static ULONG WINAPI HTMLEvents_AddRef(IDispatch *iface)
Definition: xmlview.c:90
static HRESULT WINAPI HTMLEvents_Invoke(IDispatch *iface, DISPID dispIdMember, REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
Definition: xmlview.c:120
unsigned int ULONG
Definition: retypes.h:1
#define GetProcAddress(x, y)
Definition: compat.h:410
LPWSTR WINAPI lstrcatW(LPWSTR lpString1, LPCWSTR lpString2)
Definition: lstring.c:274
int tolower(int c)
Definition: utclib.c:902
static const char * strw(LPCWSTR x)
Definition: actctx.c:49
#define win_skip
Definition: test.h:141
static void test_Load(void)
Definition: xmlview.c:192