df/dbf/modules_2rostests_2winetests_2msxml3_2xmlview_8c_source.html

/*

 * Copyright 2012 Piotr Caban 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

 */

#define COBJMACROS

#define CONST_VTABLE


#include <stdio.h>

#include <assert.h>


#include "windows.h"

#include "ole2.h"

#include "mshtml.h"

#include "mshtmdid.h"

#include "initguid.h"

#include "perhist.h"

#include "docobj.h"

#include "urlmon.h"

#include "xmlparser.h"


#include "wine/test.h"


HRESULT (WINAPI *pCreateURLMoniker)(IMoniker*, LPCWSTR, IMoniker**);


static const char xmlview_html[] =

"\r\n"

"<BODY><H2>Generated HTML</H2>\r\n"

"<TABLE>\r\n"

"<TBODY>\r\n"

"<TR bgColor=green>\r\n"

"<TH>Title</TH>\r\n"

"<TH>Value</TH></TR>\r\n"

"<TR>\r\n"

"<TD>title1</TD>\r\n"

"<TD>value1</TD></TR>\r\n"

"<TR>\r\n"

"<TD>title2</TD>\r\n"

"<TD>value2</TD></TR></TBODY></TABLE></BODY>";


IHTMLDocument2 *html_doc;

BOOL loaded;


static int html_src_compare(LPCWSTR strw, const char *stra)

{

    char buf[2048], *p1;

    const char *p2;


    WideCharToMultiByte(CP_ACP, 0, strw, -1, buf, sizeof(buf), NULL, NULL);


    p1 = buf;

    p2 = stra;

    while(1) {

        while(*p1=='\r' || *p1=='\n' || *p1=='\"') p1++;

        while(*p2=='\r' || *p2=='\n') p2++;


        if(!*p1 || !*p2 || tolower(*p1)!=tolower(*p2))

            break;


        p1++;

        p2++;

    }


    return *p1 != *p2;

}


static HRESULT WINAPI HTMLEvents_QueryInterface(IDispatch *iface, REFIID riid, void **ppv)

{

    if(IsEqualGUID(&IID_IUnknown, riid) || IsEqualGUID(&IID_IDispatch, riid)) {

        *ppv = iface;

        return S_OK;

    }


    ok(0, "Unexpected call\n");

    return E_NOINTERFACE;

}


static ULONG WINAPI HTMLEvents_AddRef(IDispatch *iface)

{

    return 2;

}


static ULONG WINAPI HTMLEvents_Release(IDispatch *iface)

{

    return 1;

}


static HRESULT WINAPI HTMLEvents_GetTypeInfoCount(IDispatch *iface, UINT *pctinfo)

{

    ok(0, "unexpected call\n");

    return E_NOTIMPL;

}


static HRESULT WINAPI HTMLEvents_GetTypeInfo(IDispatch *iface, UINT iTInfo, LCID lcid,

        ITypeInfo **ppTInfo)

{

    ok(0, "unexpected call\n");

    return E_NOTIMPL;

}


static HRESULT WINAPI HTMLEvents_GetIDsOfNames(IDispatch *iface, REFIID riid, LPOLESTR *rgszNames,

        UINT cNames, LCID lcid, DISPID *rgDispId)

{

    ok(0, "unexpected call\n");

    return E_NOTIMPL;

}


static HRESULT WINAPI HTMLEvents_Invoke(IDispatch *iface, DISPID dispIdMember, REFIID riid,

        LCID lcid, WORD wFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult,

        EXCEPINFO *pExcepInfo, UINT *puArgErr)

{

    if (dispIdMember == DISPID_HTMLDOCUMENTEVENTS2_ONREADYSTATECHANGE)

    {

        static const WCHAR completeW[] = L"complete";

        HRESULT hr;

        BSTR state;


        hr = IHTMLDocument2_get_readyState(html_doc, &state);

        ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);

        if (!memcmp(state, completeW, sizeof(completeW)))

            loaded = TRUE;

        SysFreeString(state);

    }


    return S_OK;

}


static const IDispatchVtbl HTMLEventsVtbl = {

    HTMLEvents_QueryInterface,

    HTMLEvents_AddRef,

    HTMLEvents_Release,

    HTMLEvents_GetTypeInfoCount,

    HTMLEvents_GetTypeInfo,

    HTMLEvents_GetIDsOfNames,

    HTMLEvents_Invoke

};


static IDispatch HTMLEvents = { &HTMLEventsVtbl };


static void test_QueryInterface(void)

{

    IUnknown *xmlview, *unk;

    IHTMLDocument *htmldoc;

    HRESULT hres;


    hres = CoCreateInstance(&CLSID_XMLView, NULL, CLSCTX_INPROC_SERVER|CLSCTX_INPROC_HANDLER,

            &IID_IUnknown, (void**)&xmlview);

    if(FAILED(hres)) {

        win_skip("Failed to create XMLView instance\n");

        return;

    }

    ok(hres == S_OK, "Unexpected hr %#lx.\n", hres);


    hres = IUnknown_QueryInterface(xmlview, &IID_IPersistMoniker, (void**)&unk);

    ok(hres == S_OK, "Unexpected hr %#lx.\n", hres);

    IUnknown_Release(unk);


    hres = IUnknown_QueryInterface(xmlview, &IID_IPersistHistory, (void**)&unk);

    ok(hres == S_OK, "Unexpected hr %#lx.\n", hres);

    IUnknown_Release(unk);


    hres = IUnknown_QueryInterface(xmlview, &IID_IOleCommandTarget, (void**)&unk);

    ok(hres == S_OK, "Unexpected hr %#lx.\n", hres);

    IUnknown_Release(unk);


    hres = IUnknown_QueryInterface(xmlview, &IID_IOleObject, (void**)&unk);

    ok(hres == S_OK, "Unexpected hr %#lx.\n", hres);

    IUnknown_Release(unk);


    hres = IUnknown_QueryInterface(xmlview, &IID_IHTMLDocument, (void**)&htmldoc);

    ok(hres == S_OK, "Unexpected hr %#lx.\n", hres);

    hres = IHTMLDocument_QueryInterface(htmldoc, &IID_IUnknown, (void**)&unk);

    ok(hres == S_OK, "Unexpected hr %#lx.\n", hres);

    ok(unk == xmlview, "Aggregation is not working as expected\n");

    IUnknown_Release(unk);

    IHTMLDocument_Release(htmldoc);


    IUnknown_Release(xmlview);

}


static void test_Load(void)

{

    WCHAR buf[1024];

    IPersistMoniker *pers_mon;

    IConnectionPointContainer *cpc;

    IConnectionPoint *cp;

    IMoniker *mon;

    IBindCtx *bctx;

    IHTMLElement *elem;

    HRESULT hres;

    MSG msg;

    BSTR source;


    lstrcpyW(buf, L"res://");

    GetModuleFileNameW(NULL, buf+lstrlenW(buf), ARRAY_SIZE(buf)-ARRAY_SIZE(L"res://"));

    lstrcatW(buf, L"/xml/xmlview.xml");


    if(!pCreateURLMoniker) {

        win_skip("CreateURLMoniker not available\n");

        return;

    }


    hres = CoCreateInstance(&CLSID_XMLView, NULL, CLSCTX_INPROC_SERVER|CLSCTX_INPROC_HANDLER,

            &IID_IPersistMoniker, (void**)&pers_mon);

    if(FAILED(hres)) {

        win_skip("Failed to create XMLView instance\n");

        return;

    }

    ok(hres == S_OK, "Unexpected hr %#lx.\n", hres);


    hres = IPersistMoniker_QueryInterface(pers_mon, &IID_IHTMLDocument2, (void**)&html_doc);

    ok(hres == S_OK, "Unexpected hr %#lx.\n", hres);

    hres = IPersistMoniker_QueryInterface(pers_mon, &IID_IConnectionPointContainer, (void**)&cpc);

    ok(hres == S_OK, "Unexpected hr %#lx.\n", hres);

    hres = IConnectionPointContainer_FindConnectionPoint(cpc, &IID_IDispatch, &cp);

    ok(hres == S_OK, "Unexpected hr %#lx.\n", hres);

    hres = IConnectionPoint_Advise(cp, (IUnknown*)&HTMLEvents, NULL);

    ok(hres == S_OK, "Unexpected hr %#lx.\n", hres);

    IConnectionPoint_Release(cp);

    IConnectionPointContainer_Release(cpc);


    hres = CreateBindCtx(0, &bctx);

    ok(hres == S_OK, "Unexpected hr %#lx.\n", hres);

    hres = pCreateURLMoniker(NULL, buf, &mon);

    ok(hres == S_OK, "Unexpected hr %#lx.\n", hres);

    loaded = FALSE;

    hres = IPersistMoniker_Load(pers_mon, TRUE, mon, bctx, 0);

    ok(hres == S_OK, "Unexpected hr %#lx.\n", hres);

    IBindCtx_Release(bctx);

    IMoniker_Release(mon);


    while(!loaded && GetMessageA(&msg, NULL, 0, 0)) {

        TranslateMessage(&msg);

        DispatchMessageA(&msg);

    }


    hres = IHTMLDocument2_get_body(html_doc, &elem);

    ok(hres == S_OK, "Unexpected hr %#lx.\n", hres);

    hres = IHTMLElement_get_outerHTML(elem, &source);

    ok(hres == S_OK, "Unexpected hr %#lx.\n", hres);

    ok(!html_src_compare(source, xmlview_html), "Incorrect HTML source: %s\n", wine_dbgstr_w(source));

    IHTMLElement_Release(elem);

    SysFreeString(source);


    IHTMLDocument2_Release(html_doc);

    html_doc = NULL;

    IPersistMoniker_Release(pers_mon);

}


START_TEST(xmlview)

{

    HMODULE urlmon = LoadLibraryA("urlmon.dll");

    pCreateURLMoniker = (void*)GetProcAddress(urlmon, "CreateURLMoniker");


    CoInitialize(NULL);

    test_QueryInterface();

    test_Load();

    CoUninitialize();

}

memcmp
int memcmp(void *Buffer1, void *Buffer2, ACPI_SIZE Count)
Definition: utclib.c:112

tolower
int tolower(int c)
Definition: utclib.c:902

state
static int state
Definition: maze.c:121

ok
#define ok(value,...)
Definition: atltest.h:57

START_TEST
#define START_TEST(x)
Definition: atltest.h:75

msg
#define msg(x)
Definition: auth_time.c:54

ARRAY_SIZE
#define ARRAY_SIZE(A)
Definition: main.h:20

IID_IUnknown
const GUID IID_IUnknown
Definition: classfactory.cpp:11

E_NOTIMPL
#define E_NOTIMPL
Definition: ddrawi.h:99

NULL
#define NULL
Definition: types.h:112

TRUE
#define TRUE
Definition: types.h:120

FALSE
#define FALSE
Definition: types.h:117

CP_ACP
#define CP_ACP
Definition: compat.h:109

GetProcAddress
#define GetProcAddress(x, y)
Definition: compat.h:753

BSTR
OLECHAR * BSTR
Definition: compat.h:2293

lstrcpyW
#define lstrcpyW
Definition: compat.h:749

WideCharToMultiByte
#define WideCharToMultiByte
Definition: compat.h:111

lstrlenW
#define lstrlenW
Definition: compat.h:750

GetModuleFileNameW
DWORD WINAPI GetModuleFileNameW(HINSTANCE hModule, LPWSTR lpFilename, DWORD nSize)
Definition: loader.c:600

LoadLibraryA
HINSTANCE WINAPI DECLSPEC_HOTPATCH LoadLibraryA(LPCSTR lpLibFileName)
Definition: loader.c:111

lcid
LCID lcid
Definition: locale.c:5656

CoCreateInstance
HRESULT WINAPI DECLSPEC_HOTPATCH CoCreateInstance(REFCLSID rclsid, LPUNKNOWN pUnkOuter, DWORD dwClsContext, REFIID iid, LPVOID *ppv)
Definition: compobj.c:3325

CoInitialize
HRESULT WINAPI CoInitialize(LPVOID lpReserved)
Definition: compobj.c:1964

CoUninitialize
void WINAPI DECLSPEC_HOTPATCH CoUninitialize(void)
Definition: compobj.c:2067

L
#define L(x)
Definition: resources.c:13

WORD
unsigned short WORD
Definition: ntddk_ex.h:93

BOOL
unsigned int BOOL
Definition: ntddk_ex.h:94

buf
GLenum GLuint GLenum GLsizei const GLchar * buf
Definition: glext.h:7751

riid
REFIID riid
Definition: atlbase.h:39

ppv
REFIID LPVOID * ppv
Definition: atlbase.h:39

initguid.h

HRESULT
Definition: mshtmhst.idl:286

IBindCtx
Definition: objidl.idl:96

IConnectionPointContainer
Definition: ocidl.idl:634

IConnectionPoint
Definition: ocidl.idl:613

IDispatch
Definition: oaidl.idl:580

IMoniker
Definition: objidl.idl:322

IPersistMoniker
Definition: urlmon.idl:638

ITypeInfo
Definition: oaidl.idl:729

IUnknown
Definition: unknwn.idl:39

void
Definition: nsiface.idl:2307

S_OK
#define S_OK
Definition: intsafe.h:52

FAILED
#define FAILED(hr)
Definition: intsafe.h:51

wine_dbgstr_w
#define wine_dbgstr_w
Definition: kernel32.h:34

lstrcatW
LPWSTR WINAPI lstrcatW(LPWSTR lpString1, LPCWSTR lpString2)
Definition: lstring.c:274

cp
POINT cp
Definition: magnifier.c:59

win_skip
#define win_skip
Definition: minitest.h:67

hres
HRESULT hres
Definition: protocol.c:465

strw
static const char * strw(LPCWSTR x)
Definition: actctx.c:49

elem
static size_t elem
Definition: string.c:71

HTMLEvents_GetTypeInfoCount
static HRESULT WINAPI HTMLEvents_GetTypeInfoCount(IDispatch *iface, UINT *pctinfo)
Definition: xmlview.c:100

HTMLEvents_AddRef
static ULONG WINAPI HTMLEvents_AddRef(IDispatch *iface)
Definition: xmlview.c:90

HTMLEvents_GetTypeInfo
static HRESULT WINAPI HTMLEvents_GetTypeInfo(IDispatch *iface, UINT iTInfo, LCID lcid, ITypeInfo **ppTInfo)
Definition: xmlview.c:106

xmlview_html
IMoniker **static const char xmlview_html[]
Definition: xmlview.c:38

HTMLEvents_Invoke
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

HTMLEvents_GetIDsOfNames
static HRESULT WINAPI HTMLEvents_GetIDsOfNames(IDispatch *iface, REFIID riid, LPOLESTR *rgszNames, UINT cNames, LCID lcid, DISPID *rgDispId)
Definition: xmlview.c:113

test_QueryInterface
static void test_QueryInterface(void)
Definition: xmlview.c:152

html_src_compare
static int html_src_compare(LPCWSTR strw, const char *stra)
Definition: xmlview.c:56

LPCWSTR
LPCWSTR
Definition: xmlview.c:36

HTMLEvents_Release
static ULONG WINAPI HTMLEvents_Release(IDispatch *iface)
Definition: xmlview.c:95

HTMLEvents_QueryInterface
static HRESULT WINAPI HTMLEvents_QueryInterface(IDispatch *iface, REFIID riid, void **ppv)
Definition: xmlview.c:79

HTMLEventsVtbl
static const IDispatchVtbl HTMLEventsVtbl
Definition: xmlview.c:140

HTMLEvents
static IDispatch HTMLEvents
Definition: xmlview.c:150

loaded
BOOL loaded
Definition: xmlview.c:54

test_Load
static void test_Load(void)
Definition: xmlview.c:193

html_doc
IHTMLDocument2 * html_doc
Definition: xmlview.c:53

LPOLESTR
static LPOLESTR
Definition: stg_prop.c:27

DISPID
static VARIANTARG static DISPID
Definition: ordinal.c:49

mshtmdid.h

DISPID_HTMLDOCUMENTEVENTS2_ONREADYSTATECHANGE
#define DISPID_HTMLDOCUMENTEVENTS2_ONREADYSTATECHANGE
Definition: mshtmdid.h:910

UINT
unsigned int UINT
Definition: ndis.h:50

ole2.h

CreateBindCtx
HRESULT WINAPI CreateBindCtx(DWORD reserved, LPBC *ppbc)
Definition: bindctx.c:556

SysFreeString
void WINAPI DECLSPEC_HOTPATCH SysFreeString(BSTR str)
Definition: oleaut.c:271

IID_IConnectionPointContainer
const GUID IID_IConnectionPointContainer

IID_IDispatch
const GUID IID_IDispatch

IID_IOleObject
const GUID IID_IOleObject

IsEqualGUID
#define IsEqualGUID(rguid1, rguid2)
Definition: guiddef.h:147

REFIID
#define REFIID
Definition: guiddef.h:118

LCID
DWORD LCID
Definition: nls.h:13

test.h

hr
HRESULT hr
Definition: shlfolder.c:183

source
Definition: pdh_main.c:174

tagVARIANT
Definition: compat.h:2378

MSG
TW_UINT32 TW_UINT16 TW_UINT16 MSG
Definition: twain.h:1829

ULONG
uint32_t ULONG
Definition: typedefs.h:59

wFlags
WINBASEAPI _In_ DWORD _Out_ _In_ WORD wFlags
Definition: wincon_undoc.h:337

HRESULT
#define HRESULT
Definition: msvc.h:7

WINAPI
#define WINAPI
Definition: msvc.h:6

E_NOINTERFACE
#define E_NOINTERFACE
Definition: winerror.h:3479

DispatchMessageA
LRESULT WINAPI DispatchMessageA(_In_ const MSG *)

TranslateMessage
BOOL WINAPI TranslateMessage(_In_ const MSG *)

GetMessageA
BOOL WINAPI GetMessageA(_Out_ LPMSG, _In_opt_ HWND, _In_ UINT, _In_ UINT)

LPCWSTR
const WCHAR * LPCWSTR
Definition: xmlstorage.h:185

WCHAR
__wchar_t WCHAR
Definition: xmlstorage.h:180