1*cdf0e10cSrcweir /*************************************************************************
2*cdf0e10cSrcweir  *
3*cdf0e10cSrcweir  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4*cdf0e10cSrcweir  *
5*cdf0e10cSrcweir  * Copyright 2000, 2010 Oracle and/or its affiliates.
6*cdf0e10cSrcweir  *
7*cdf0e10cSrcweir  * OpenOffice.org - a multi-platform office productivity suite
8*cdf0e10cSrcweir  *
9*cdf0e10cSrcweir  * This file is part of OpenOffice.org.
10*cdf0e10cSrcweir  *
11*cdf0e10cSrcweir  * OpenOffice.org is free software: you can redistribute it and/or modify
12*cdf0e10cSrcweir  * it under the terms of the GNU Lesser General Public License version 3
13*cdf0e10cSrcweir  * only, as published by the Free Software Foundation.
14*cdf0e10cSrcweir  *
15*cdf0e10cSrcweir  * OpenOffice.org is distributed in the hope that it will be useful,
16*cdf0e10cSrcweir  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17*cdf0e10cSrcweir  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18*cdf0e10cSrcweir  * GNU Lesser General Public License version 3 for more details
19*cdf0e10cSrcweir  * (a copy is included in the LICENSE file that accompanied this code).
20*cdf0e10cSrcweir  *
21*cdf0e10cSrcweir  * You should have received a copy of the GNU Lesser General Public License
22*cdf0e10cSrcweir  * version 3 along with OpenOffice.org.  If not, see
23*cdf0e10cSrcweir  * <http://www.openoffice.org/license.html>
24*cdf0e10cSrcweir  * for a copy of the LGPLv3 License.
25*cdf0e10cSrcweir  *
26*cdf0e10cSrcweir  ************************************************************************/
27*cdf0e10cSrcweir 
28*cdf0e10cSrcweir // MARKER(update_precomp.py): autogen include statement, do not remove
29*cdf0e10cSrcweir #include "precompiled_extensions.hxx"
30*cdf0e10cSrcweir // cpptest.cpp : Defines the entry point for the console application.
31*cdf0e10cSrcweir //
32*cdf0e10cSrcweir 
33*cdf0e10cSrcweir #if _MSC_VER > 1000
34*cdf0e10cSrcweir #pragma once
35*cdf0e10cSrcweir #endif // _MSC_VER > 1000
36*cdf0e10cSrcweir #pragma warning(disable: 4917)
37*cdf0e10cSrcweir #include <comdef.h>
38*cdf0e10cSrcweir #include <tchar.h>
39*cdf0e10cSrcweir #include<atlbase.h>
40*cdf0e10cSrcweir #include<atlcom.h>
41*cdf0e10cSrcweir 
42*cdf0e10cSrcweir HRESULT doTest();
43*cdf0e10cSrcweir 
44*cdf0e10cSrcweir int main(int /*argc*/, char** /*argv*/)
45*cdf0e10cSrcweir {
46*cdf0e10cSrcweir 	HRESULT hr;
47*cdf0e10cSrcweir 	if( FAILED( hr=CoInitialize(NULL)))
48*cdf0e10cSrcweir 	{
49*cdf0e10cSrcweir 		_tprintf(_T("CoInitialize failed \n"));
50*cdf0e10cSrcweir 		return -1;
51*cdf0e10cSrcweir 	}
52*cdf0e10cSrcweir 
53*cdf0e10cSrcweir 	if( FAILED(hr=doTest()))
54*cdf0e10cSrcweir 	{
55*cdf0e10cSrcweir 		_com_error err( hr);
56*cdf0e10cSrcweir 		const TCHAR * errMsg= err.ErrorMessage();
57*cdf0e10cSrcweir 		MessageBox( NULL, errMsg, "Test failed", MB_ICONERROR);
58*cdf0e10cSrcweir 	}
59*cdf0e10cSrcweir 
60*cdf0e10cSrcweir 	CoUninitialize();
61*cdf0e10cSrcweir 	return 0;
62*cdf0e10cSrcweir }
63*cdf0e10cSrcweir 
64*cdf0e10cSrcweir HRESULT doTest()
65*cdf0e10cSrcweir {
66*cdf0e10cSrcweir 	HRESULT hr;
67*cdf0e10cSrcweir 	CComPtr<IUnknown> spUnkMgr;
68*cdf0e10cSrcweir 
69*cdf0e10cSrcweir 
70*cdf0e10cSrcweir 	if( FAILED(hr= spUnkMgr.CoCreateInstance(L"com.sun.star.ServiceManager")))
71*cdf0e10cSrcweir 		return hr;
72*cdf0e10cSrcweir 
73*cdf0e10cSrcweir 	IDispatchPtr starManager;
74*cdf0e10cSrcweir     //    var starManager=new ActiveXObject("com.sun.star.ServiceManager");
75*cdf0e10cSrcweir 	if (FAILED(hr= starManager.CreateInstance(_T("com.sun.star.ServiceManager"))))
76*cdf0e10cSrcweir     {
77*cdf0e10cSrcweir         fprintf(stderr, "creating ServiceManager failed\n");
78*cdf0e10cSrcweir         return hr;
79*cdf0e10cSrcweir     }
80*cdf0e10cSrcweir     //    var starDesktop=starManager.createInstance("com.sun.star.frame.Desktop");
81*cdf0e10cSrcweir 	_variant_t varP1(L"com.sun.star.frame.Desktop");
82*cdf0e10cSrcweir 	_variant_t varRet;
83*cdf0e10cSrcweir 	CComDispatchDriver dispMgr(starManager);
84*cdf0e10cSrcweir 	if (FAILED(hr=	dispMgr.Invoke1(L"createInstance", &varP1, &varRet)))
85*cdf0e10cSrcweir     {
86*cdf0e10cSrcweir         fprintf(stderr,"createInstance of Desktop failed\n");
87*cdf0e10cSrcweir         return hr;
88*cdf0e10cSrcweir     }
89*cdf0e10cSrcweir 	CComDispatchDriver dispDesk(varRet.pdispVal);
90*cdf0e10cSrcweir 	varP1.Clear();
91*cdf0e10cSrcweir 	varRet.Clear();
92*cdf0e10cSrcweir 	//    var bOK=new Boolean(true);
93*cdf0e10cSrcweir 
94*cdf0e10cSrcweir     //    var noArgs=new Array();
95*cdf0e10cSrcweir     //    var oDoc=starDesktop.loadComponentFromURL("private:factory/swriter", "Test", 40, noArgs);
96*cdf0e10cSrcweir 	IDispatchPtr oDoc;
97*cdf0e10cSrcweir 	SAFEARRAY* ar= SafeArrayCreateVector(VT_DISPATCH, 0, 0);
98*cdf0e10cSrcweir 	_variant_t args[4];
99*cdf0e10cSrcweir 	args[3]= _variant_t(L"private:factory/swriter");
100*cdf0e10cSrcweir 	args[2]= _variant_t(L"Test");
101*cdf0e10cSrcweir 	args[1]= _variant_t((long) 40);
102*cdf0e10cSrcweir 	args[0].vt= VT_ARRAY | VT_DISPATCH;;
103*cdf0e10cSrcweir 	args[0].parray= ar;
104*cdf0e10cSrcweir 	if (FAILED(hr= dispDesk.InvokeN(L"loadComponentFromURL", args, 4, &varRet)))
105*cdf0e10cSrcweir     {
106*cdf0e10cSrcweir         fprintf(stderr,"loadComponentFromURL failed\n");
107*cdf0e10cSrcweir         return hr;
108*cdf0e10cSrcweir     }
109*cdf0e10cSrcweir 	CComDispatchDriver dispDoc(varRet.pdispVal);
110*cdf0e10cSrcweir 	varRet.Clear();
111*cdf0e10cSrcweir 	return S_OK;
112*cdf0e10cSrcweir 
113*cdf0e10cSrcweir }
114