shell/source/win32/workbench/TestSmplMail.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
  20 #include <com/sun/star/lang/XComponent.hpp>
  21 #include <com/sun/star/registry/XSimpleRegistry.hpp>
  22 #include <com/sun/star/system/XSimpleMailClientSupplier.hpp>
  23 #include <cppuhelper/servicefactory.hxx>
  24 #include <rtl/ustring.hxx>
  25 #include <sal/types.h>
  26 #include <osl/diagnose.h>
  27
  28 #include <stdio.h>
  29 #if defined _MSC_VER
  30 #pragma warning(push, 1)
  31 #endif
  32 #include <windows.h>
  33 #if defined _MSC_VER
  34 #pragma warning(pop)
  35 #endif
  36
  37 #include <osl/file.hxx>
  38
  39 //--------------------------------------------------------------
  40 //  namesapces
  41 //--------------------------------------------------------------
  42
  43 using namespace ::rtl                   ;
  44 using namespace ::cppu                  ;
  45 using namespace ::com::sun::star::uno   ;
  46 using namespace ::com::sun::star::lang  ;
  47 using namespace std                     ;
  48 using namespace com::sun::star::system;
  49
  50 #define RDB_SYSPATH "D:\\Projects\\gsl\\shell\\wntmsci7\\bin\\applicat.rdb"
  51
  52 //--------------------------------------------------------------
  53 //  global variables
  54 //--------------------------------------------------------------
  55
  56 Reference< XMultiServiceFactory >   g_xFactory;
  57
  58 //--------------------------------------------------------------
  59 //  main
  60 //--------------------------------------------------------------
  61
  62
  63 // int SAL_CALL main(int nArgc, char* Argv[], char* pEnv[]  )
  64 // make Warning free, leave out typename
  65 int SAL_CALL main(int , char*, char* )
  66 {
  67     //-------------------------------------------------
  68     // get the global service-manager
  69     //-------------------------------------------------
  70
  71     // Get global factory for uno services.
  72     OUString rdbName = OUString( RDB_SYSPATH  );
  73     Reference< XMultiServiceFactory > g_xFactory( createRegistryServiceFactory( rdbName ) );
  74
  75     // Print a message if an error occurred.
  76     if ( g_xFactory.is() == sal_False )
  77     {
  78         OSL_FAIL("Can't create RegistryServiceFactory");
  79         return(-1);
  80     }
  81
  82     printf("Creating RegistryServiceFactory successful\n");
  83
  84     //-------------------------------------------------
  85     // try to get an Interface to a XFilePicker Service
  86     //-------------------------------------------------
  87
  88     try
  89     {
  90         Reference< XSimpleMailClientSupplier > xSmplMailClientSuppl(
  91             g_xFactory->createInstance( OUString("com.sun.star.system.SimpleSystemMail") ), UNO_QUERY );
  92
  93         if ( !xSmplMailClientSuppl.is() )
  94         {
  95             OSL_FAIL( "Error creating SimpleSystemMail Service" );
  96             return(-1);
  97         }
  98
  99         Reference< XSimpleMailClient > xSmplMailClient(
 100             xSmplMailClientSuppl->querySimpleMailClient( ) );
 101
 102         if ( xSmplMailClient.is( ) )
 103         {
 104             Reference< XSimpleMailMessage > xSmplMailMsg(
 105                 xSmplMailClient->createSimpleMailMessage( ) );
 106
 107             if ( xSmplMailMsg.is( ) )
 108             {
 109                 xSmplMailMsg->setRecipient( OUString("tino.rachui@germany.sun.com") );
 110                 xSmplMailMsg->setOriginator( OUString("tino.rachui@germany.sun.com") );
 111
 112                 Sequence< OUString > ccRecips( 1 );
 113                 ccRecips[0] = OUString("tino.rachui@germany.sun.com");
 114
 115                 xSmplMailMsg->setCcRecipient( ccRecips );
 116
 117                 Sequence< OUString > bccRecips( 1 );
 118                 bccRecips[0] = OUString("tino.rachui@germany.sun.com");
 119
 120                 xSmplMailMsg->setBccRecipient( bccRecips );
 121
 122                 xSmplMailMsg->setSubject( OUString("Mapi Test") );
 123
 124                 Sequence< OUString > attachements( 2 );
 125
 126                 OUString aFile("D:\\Projects\\gsl\\shell\\wntmsci7\\bin\\testprx.exe");
 127                 OUString aFileURL;
 128
 129                 osl::FileBase::getFileURLFromSystemPath( aFile, aFileURL );
 130                 attachements[0] = aFileURL;
 131
 132                 aFile = OUString("D:\\Projects\\gsl\\shell\\wntmsci7\\bin\\testsyssh.exe");
 133                 osl::FileBase::getFileURLFromSystemPath( aFile, aFileURL );
 134
 135                 attachements[1] = aFile;
 136
 137                 xSmplMailMsg->setAttachement( attachements );
 138
 139                 xSmplMailClient->sendSimpleMailMessage( xSmplMailMsg, 0 );
 140             }
 141         }
 142     }
 143     catch( Exception& )
 144     {
 145     }
 146
 147     //--------------------------------------------------
 148     // shutdown
 149     //--------------------------------------------------
 150
 151     // Cast factory to XComponent
 152     Reference< XComponent > xComponent( g_xFactory, UNO_QUERY );
 153
 154     // Print a message if an error occurred.
 155     if ( xComponent.is() == sal_False )
 156     {
 157         OSL_FAIL("Error shuting down");
 158     }
 159
 160     // Dispose and clear factory
 161     xComponent->dispose();
 162     g_xFactory.clear();
 163     g_xFactory = Reference< XMultiServiceFactory >();
 164
 165     printf("Test successful\n");
 166
 167     return 0;
 168 }
 169
 170 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */