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