remotebridges/examples/officeclient.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19 #include <stdio.h>
  20 #include <osl/mutex.hxx>
  21 #include <cppuhelper/factory.hxx>
  22
  23 #include <cppuhelper/servicefactory.hxx>
  24
  25 #include <com/sun/star/uno/XNamingService.hpp>
  26
  27 #include <com/sun/star/registry/ImplementationRegistration.hpp>
  28
  29 #include <com/sun/star/connection/XConnector.hpp>
  30
  31 #include <com/sun/star/bridge/XUnoUrlResolver.hpp>
  32
  33 #include <com/sun/star/lang/XMain.hpp>
  34 #include <com/sun/star/lang/XComponent.hpp>
  35
  36 #include <com/sun/star/frame/Desktop.hpp>
  37 #include <com/sun/star/frame/XComponentLoader.hpp>
  38
  39 #include <com/sun/star/text/XTextDocument.hpp>
  40
  41 #include <cppuhelper/implbase1.hxx>
  42
  43 using namespace ::cppu;
  44 using namespace ::osl;
  45 using namespace ::com::sun::star::uno;
  46 using namespace ::com::sun::star::lang;
  47 using namespace ::com::sun::star::registry;
  48 using namespace ::com::sun::star::connection;
  49 using namespace ::com::sun::star::container;
  50 using namespace ::com::sun::star::bridge;
  51 using namespace ::com::sun::star::text;
  52 using namespace ::com::sun::star::frame;
  53
  54
  55
  56 namespace remotebridges_officeclient {
  57
  58 class OfficeClientMain : public WeakImplHelper1< XMain >
  59 {
  60 public:
  61     OfficeClientMain( const Reference< XMultiServiceFactory > &r ) :
  62         m_xSMgr( r )
  63         {}
  64 public:     // Methods
  65
  66
  67     virtual sal_Int32 SAL_CALL run( const Sequence< OUString >& aArguments )
  68         throw(RuntimeException);
  69
  70
  71 private: // helper methods
  72     void testWriter( const Reference < XComponent > & rComponent );
  73     void registerServices();
  74     Reference< XMultiServiceFactory > m_xSMgr;
  75 };
  76
  77 void OfficeClientMain::testWriter( const Reference< XComponent > & rComponent )
  78 {
  79     printf( "pasting some text into the writer document\n" );
  80
  81     Reference< XTextDocument > rTextDoc( rComponent , UNO_QUERY );
  82     Reference< XText > rText = rTextDoc->getText();
  83     Reference< XTextCursor > rCursor = rText->createTextCursor();
  84     Reference< XTextRange > rRange ( rCursor , UNO_QUERY );
  85
  86     rText->insertString( rRange, OUString("This text has been posted by the officeclient component"), sal_False );
  87 }
  88
  89 /********************
  90  * does necessary service registration ( this could be done also by a setup tool )
  91  *********************/
  92 void OfficeClientMain::registerServices( )
  93 {
  94     // register services.
  95     // Note : this needs to be done only once and is in general done by the setup
  96     Reference < XImplementationRegistration > rImplementationRegistration(
  97         ImplementationRegistration::create(m_xSMgr) );
  98
  99     if( ! rImplementationRegistration.is() )
 100     {
 101         printf( "Couldn't create registration component\n" );
 102         exit(1);
 103     }
 104
 105     OUString aSharedLibrary[4];
 106     aSharedLibrary[0] =
 107         OUString( "connector.uno" SAL_DLLEXTENSION );
 108     aSharedLibrary[1] =
 109         OUString( "remotebridge.uno" SAL_DLLEXTENSION );
 110     aSharedLibrary[2] =
 111         OUString( "bridgefac.uno" SAL_DLLEXTENSION );
 112     aSharedLibrary[3] =
 113         OUString( "uuresolver.uno" SAL_DLLEXTENSION );
 114
 115     sal_Int32 i;
 116     for( i = 0 ; i < 4 ; i ++ )
 117     {
 118
 119         // build the system specific library name
 120         OUString aDllName = aSharedLibrary[i];
 121
 122         try
 123         {
 124             // register the needed services in the servicemanager
 125             rImplementationRegistration->registerImplementation(
 126                 OUString("com.sun.star.loader.SharedLibrary"),
 127                 aDllName,
 128                 Reference< XSimpleRegistry > () );
 129         }
 130         catch( Exception & )
 131         {
 132             printf( "couldn't register dll %s\n" ,
 133                     OUStringToOString( aDllName, RTL_TEXTENCODING_ASCII_US ).getStr() );
 134         }
 135     }
 136 }
 137
 138 sal_Int32 OfficeClientMain::run( const Sequence< OUString > & aArguments ) throw ( RuntimeException )
 139 {
 140     printf( "Connecting ....\n" );
 141
 142     if( aArguments.getLength() == 1 )
 143     {
 144         try {
 145             registerServices();
 146             Reference < XInterface > r =
 147                 m_xSMgr->createInstance("com.sun.star.bridge.UnoUrlResolver");
 148             Reference < XUnoUrlResolver > rResolver( r , UNO_QUERY );
 149             r = rResolver->resolve( aArguments.getConstArray()[0] );
 150
 151             Reference< XNamingService > rNamingService( r, UNO_QUERY );
 152             if( rNamingService.is() )
 153             {
 154                 printf( "got the remote NamingService\n" );
 155
 156                 r = rNamingService->getRegisteredObject(OUString("StarOffice.ServiceManager"));
 157
 158                 Reference< XMultiServiceFactory > rRemoteSMgr( r , UNO_QUERY );
 159
 160                 Reference < XDesktop2 > rLoader = Desktop::create( comphelper::getComponentContext(r) );
 161
 162                 sal_Char *urls[] = {
 163                     "private:factory/swriter",
 164                     "private:factory/sdraw",
 165                     "private:factory/simpress",
 166                     "private:factory/scalc"
 167                 };
 168
 169                 sal_Char *docu[]= {
 170                     "a new writer document ...\n",
 171                     "a new draw document ...\n",
 172                     "a new schedule document ...\n" ,
 173                     "a new calc document ...\n"
 174                 };
 175                 sal_Int32 i;
 176                 for( i = 0 ; i < 4 ; i ++ )
 177                 {
 178                     printf( "press any key to open %s\n" , docu[i] );
 179                     getchar();
 180
 181                     Reference< XComponent > rComponent =
 182                         rLoader->loadComponentFromURL(
 183                             OUString::createFromAscii( urls[i] ) ,
 184                             OUString( "_blank"),
 185                             0 ,
 186                             Sequence < ::com::sun::star::beans::PropertyValue >() );
 187
 188                     if( 0 == i )
 189                     {
 190                         testWriter( rComponent );
 191                     }
 192                     printf( "press any key to close the document\n" );
 193                     getchar();
 194                     rComponent->dispose();
 195                 }
 196             }
 197
 198         }
 199         catch( const ConnectionSetupException &e )
 200         {
 201             OString o = OUStringToOString( e.Message, RTL_TEXTENCODING_ASCII_US );
 202             printf( "%s\n", o.pData->buffer );
 203             printf( "couldn't access local resource ( possible security resons )\n" );
 204         }
 205         catch( const NoConnectException &e )
 206         {
 207             OString o = OUStringToOString( e.Message, RTL_TEXTENCODING_ASCII_US );
 208             printf( "%s\n", o.pData->buffer );
 209             printf( "no server listening on the resource\n" );
 210         }
 211         catch( const IllegalArgumentException &e )
 212         {
 213             OString o = OUStringToOString( e.Message, RTL_TEXTENCODING_ASCII_US );
 214             printf( "%s\n", o.pData->buffer );
 215             printf( "uno url invalid\n" );
 216         }
 217         catch( const RuntimeException & e )
 218         {
 219             OString o = OUStringToOString( e.Message, RTL_TEXTENCODING_ASCII_US );
 220             printf( "%s\n", o.pData->buffer );
 221             printf( "a remote call was aborted\n" );
 222         }
 223     }
 224     else
 225     {
 226         printf( "usage: (uno officeclient-component --) uno-url\n"
 227                 "e.g.:  uno:socket,host=localhost,port=2002;urp;StarOffice.NamingService\n" );
 228         return 1;
 229     }
 230     return 0;
 231 }
 232
 233 Reference< XInterface > SAL_CALL CreateInstance( const Reference< XMultiServiceFactory > &r)
 234 {
 235     return Reference< XInterface > ( ( OWeakObject * ) new OfficeClientMain(r) );
 236 }
 237
 238 Sequence< OUString > getSupportedServiceNames()
 239 {
 240     static Sequence < OUString > *pNames = 0;
 241     if( ! pNames )
 242     {
 243         MutexGuard guard( Mutex::getGlobalMutex() );
 244         if( !pNames )
 245         {
 246             static Sequence< OUString > seqNames(2);
 247             seqNames[0] = "com.sun.star.bridge.example.OfficeClientExample";
 248             pNames = &seqNames;
 249         }
 250     }
 251     return *pNames;
 252 }
 253
 254 }
 255
 256 using namespace remotebridges_officeclient;
 257 #define IMPLEMENTATION_NAME "com.sun.star.comp.remotebridges.example.OfficeClientSample"
 258
 259
 260 extern "C"
 261 {
 262
 263 sal_Bool SAL_CALL component_writeInfo(
 264     void * pServiceManager, void * pRegistryKey )
 265 {
 266     if (pRegistryKey)
 267     {
 268         try
 269         {
 270             Reference< XRegistryKey > xNewKey(
 271                 reinterpret_cast< XRegistryKey * >( pRegistryKey )->createKey(
 272                     OUString( "/" IMPLEMENTATION_NAME "/UNO/SERVICES" ) ) );
 273
 274             const Sequence< OUString > & rSNL = getSupportedServiceNames();
 275             const OUString * pArray = rSNL.getConstArray();
 276             for ( sal_Int32 nPos = rSNL.getLength(); nPos--; )
 277                 xNewKey->createKey( pArray[nPos] );
 278
 279             return sal_True;
 280         }
 281         catch (InvalidRegistryException &)
 282         {
 283             OSL_FAIL( "### InvalidRegistryException!" );
 284         }
 285     }
 286     return sal_False;
 287 }
 288
 289 SAL_DLLPUBLIC_EXPORT void * SAL_CALL component_getFactory(
 290     const sal_Char * pImplName, void * pServiceManager, void * pRegistryKey )
 291 {
 292     void * pRet = 0;
 293
 294     if (pServiceManager && rtl_str_compare( pImplName, IMPLEMENTATION_NAME ) == 0)
 295     {
 296         Reference< XSingleServiceFactory > xFactory( createSingleFactory(
 297             reinterpret_cast< XMultiServiceFactory * >( pServiceManager ),
 298             OUString::createFromAscii( pImplName ),
 299             CreateInstance, getSupportedServiceNames() ) );
 300
 301         if (xFactory.is())
 302         {
 303             xFactory->acquire();
 304             pRet = xFactory.get();
 305         }
 306     }
 307
 308     return pRet;
 309 }
 310 }
 311
 312 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */