binaryurp/source/incomingrequest.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*************************************************************************
   3 *
   4 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   5 *
   6 * Copyright 2000, 2011 Oracle and/or its affiliates.
   7 *
   8 * OpenOffice.org - a multi-platform office productivity suite
   9 *
  10 * This file is part of OpenOffice.org.
  11 *
  12 * OpenOffice.org is free software: you can redistribute it and/or modify
  13 * it under the terms of the GNU Lesser General Public License version 3
  14 * only, as published by the Free Software Foundation.
  15 *
  16 * OpenOffice.org is distributed in the hope that it will be useful,
  17 * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19 * GNU Lesser General Public License version 3 for more details
  20 * (a copy is included in the LICENSE file that accompanied this code).
  21 *
  22 * You should have received a copy of the GNU Lesser General Public License
  23 * version 3 along with OpenOffice.org.  If not, see
  24 * <http://www.openoffice.org/license.html>
  25 * for a copy of the LGPLv3 License.
  26 *
  27 ************************************************************************/
  28
  29 #include "sal/config.h"
  30
  31 #include <list>
  32 #include <vector>
  33
  34 #include "boost/noncopyable.hpp"
  35 #include "com/sun/star/bridge/XInstanceProvider.hpp"
  36 #include "cppuhelper/exc_hlp.hxx"
  37 #include "rtl/byteseq.hxx"
  38 #include "rtl/ref.hxx"
  39 #include "rtl/ustring.hxx"
  40 #include "sal/types.h"
  41 #include "typelib/typedescription.hxx"
  42 #include "uno/dispatcher.hxx"
  43
  44 #include "binaryany.hxx"
  45 #include "bridge.hxx"
  46 #include "currentcontext.hxx"
  47 #include "incomingrequest.hxx"
  48 #include "specialfunctionids.hxx"
  49
  50 namespace binaryurp {
  51
  52 namespace {
  53
  54 namespace css = com::sun::star;
  55
  56 }
  57
  58 IncomingRequest::IncomingRequest(
  59     rtl::Reference< Bridge > const & bridge, rtl::ByteSequence const & tid,
  60     rtl::OUString const & oid, css::uno::UnoInterfaceReference const & object,
  61     css::uno::TypeDescription const & type, sal_uInt16 functionId,
  62     bool synchronous, css::uno::TypeDescription const & member, bool setter,
  63     std::vector< BinaryAny > const & inArguments, bool currentContextMode,
  64     css::uno::UnoInterfaceReference const & currentContext):
  65     bridge_(bridge), tid_(tid), oid_(oid), object_(object), type_(type),
  66     functionId_(functionId), synchronous_(synchronous), member_(member),
  67     setter_(setter), inArguments_(inArguments),
  68     currentContextMode_(currentContextMode), currentContext_(currentContext)
  69 {
  70     OSL_ASSERT(bridge.is() && member.is() && member.get()->bComplete);
  71 }
  72
  73 IncomingRequest::~IncomingRequest() {}
  74
  75 void IncomingRequest::execute() const {
  76     BinaryAny ret;
  77     std::vector< BinaryAny > outArgs;
  78     bool isExc;
  79     try {
  80         bool resetCc = false;
  81         css::uno::UnoInterfaceReference oldCc;
  82         if (currentContextMode_) {
  83             oldCc = current_context::get();
  84             current_context::set(currentContext_);
  85             resetCc = true;
  86         }
  87         try {
  88             try {
  89                 isExc = !execute_throw(&ret, &outArgs);
  90             } catch (std::exception & e) {
  91                 throw css::uno::RuntimeException(
  92                     (rtl::OUString(
  93                         RTL_CONSTASCII_USTRINGPARAM("caught C++ exception: ")) +
  94                      rtl::OStringToOUString(
  95                          rtl::OString(e.what()), RTL_TEXTENCODING_ASCII_US)),
  96                     css::uno::Reference< css::uno::XInterface >());
  97                     // best-effort string conversion
  98             }
  99         } catch (css::uno::RuntimeException &) {
 100             css::uno::Any exc(cppu::getCaughtException());
 101             ret = bridge_->mapCppToBinaryAny(exc);
 102             isExc = true;
 103         }
 104         if (resetCc) {
 105             current_context::set(oldCc);
 106         }
 107     } catch (css::uno::RuntimeException &) {
 108         css::uno::Any exc(cppu::getCaughtException());
 109         ret = bridge_->mapCppToBinaryAny(exc);
 110         isExc = true;
 111     }
 112     if (synchronous_) {
 113         bridge_->decrementActiveCalls();
 114         try {
 115             bridge_->getWriter()->queueReply(
 116                 tid_, member_, setter_, isExc, ret, outArgs, false);
 117             return;
 118         } catch (css::uno::RuntimeException & e) {
 119             OSL_TRACE(
 120                 OSL_LOG_PREFIX "caught UNO runtime exception '%s'",
 121                 (rtl::OUStringToOString(e.Message, RTL_TEXTENCODING_UTF8).
 122                  getStr()));
 123         } catch (std::exception & e) {
 124             OSL_TRACE(OSL_LOG_PREFIX "caught C++ exception '%s'", e.what());
 125         }
 126         bridge_->terminate();
 127     } else {
 128         if (isExc) {
 129             OSL_TRACE(OSL_LOG_PREFIX "oneway method raised exception");
 130         }
 131         bridge_->decrementCalls();
 132     }
 133 }
 134
 135 static size_t size_t_round(size_t val)
 136 {
 137     return (val + (sizeof(size_t)-1)) & ~(sizeof(size_t)-1);
 138 }
 139
 140 bool IncomingRequest::execute_throw(
 141     BinaryAny * returnValue, std::vector< BinaryAny > * outArguments) const
 142 {
 143     OSL_ASSERT(
 144         returnValue != 0 &&
 145         returnValue->getType().equals(
 146             css::uno::TypeDescription(
 147                 cppu::UnoType< cppu::UnoVoidType >::get())) &&
 148         outArguments != 0 && outArguments->empty());
 149     bool isExc = false;
 150     switch (functionId_) {
 151     case SPECIAL_FUNCTION_ID_RESERVED:
 152         OSL_ASSERT(false); // this cannot happen
 153         break;
 154     case SPECIAL_FUNCTION_ID_RELEASE:
 155         bridge_->releaseStub(oid_, type_);
 156         break;
 157     case SPECIAL_FUNCTION_ID_QUERY_INTERFACE:
 158         if (!object_.is()) {
 159             css::uno::Reference< css::uno::XInterface > ifc;
 160             css::uno::Reference< css::bridge::XInstanceProvider > prov(
 161                 bridge_->getProvider());
 162             if (prov.is()) {
 163                 try {
 164                     ifc = prov->getInstance(oid_);
 165                 } catch (css::container::NoSuchElementException & e) {
 166                     OSL_TRACE(
 167                         (OSL_LOG_PREFIX "initial element '%s':"
 168                          " NoSuchElementException '%s'"),
 169                         (rtl::OUStringToOString(oid_, RTL_TEXTENCODING_UTF8).
 170                          getStr()),
 171                         (rtl::OUStringToOString(
 172                             e.Message, RTL_TEXTENCODING_UTF8).
 173                          getStr()));
 174                 }
 175             }
 176             if (ifc.is()) {
 177                 css::uno::UnoInterfaceReference unoIfc(
 178                     static_cast< uno_Interface * >(
 179                         bridge_->getCppToBinaryMapping().mapInterface(
 180                             ifc.get(),
 181                             (css::uno::TypeDescription(
 182                                 cppu::UnoType<
 183                                     css::uno::Reference<
 184                                         css::uno::XInterface > >::get()).
 185                              get()))),
 186                     SAL_NO_ACQUIRE);
 187                 *returnValue = BinaryAny(
 188                     css::uno::TypeDescription(
 189                         cppu::UnoType<
 190                             css::uno::Reference<
 191                                 css::uno::XInterface > >::get()),
 192                     &unoIfc.m_pUnoI);
 193             }
 194             break;
 195         }
 196         // fall through
 197     default:
 198         {
 199             OSL_ASSERT(object_.is());
 200             css::uno::TypeDescription retType;
 201             std::list< std::vector< char > > outBufs;
 202             std::vector< void * > args;
 203             switch (member_.get()->eTypeClass) {
 204             case typelib_TypeClass_INTERFACE_ATTRIBUTE:
 205                 {
 206                     css::uno::TypeDescription t(
 207                         reinterpret_cast<
 208                             typelib_InterfaceAttributeTypeDescription * >(
 209                                 member_.get())->
 210                         pAttributeTypeRef);
 211                     if (setter_) {
 212                         OSL_ASSERT(inArguments_.size() == 1);
 213                         args.push_back(inArguments_[0].getValue(t));
 214                     } else {
 215                         OSL_ASSERT(inArguments_.empty());
 216                         retType = t;
 217                     }
 218                     break;
 219                 }
 220             case typelib_TypeClass_INTERFACE_METHOD:
 221                 {
 222                     typelib_InterfaceMethodTypeDescription * mtd =
 223                         reinterpret_cast<
 224                             typelib_InterfaceMethodTypeDescription * >(
 225                                 member_.get());
 226                     retType = css::uno::TypeDescription(mtd->pReturnTypeRef);
 227                     std::vector< BinaryAny >::const_iterator i(
 228                         inArguments_.begin());
 229                     for (sal_Int32 j = 0; j != mtd->nParams; ++j) {
 230                         void * p;
 231                         if (mtd->pParams[j].bIn) {
 232                             p = i++->getValue(
 233                                 css::uno::TypeDescription(
 234                                     mtd->pParams[j].pTypeRef));
 235                         } else {
 236                             outBufs.push_back(
 237                                 std::vector< char >(size_t_round(
 238                                     css::uno::TypeDescription(
 239                                         mtd->pParams[j].pTypeRef).
 240                                     get()->nSize)));
 241                             p = &outBufs.back()[0];
 242                         }
 243                         args.push_back(p);
 244                         if (mtd->pParams[j].bOut) {
 245                             outArguments->push_back(BinaryAny());
 246                         }
 247                     }
 248                     OSL_ASSERT(i == inArguments_.end());
 249                     break;
 250                 }
 251             default:
 252                 OSL_ASSERT(false); // this cannot happen
 253                 break;
 254             }
 255             size_t nSize = 0;
 256             if (retType.is())
 257                 nSize = size_t_round(retType.get()->nSize);
 258             std::vector< char > retBuf(nSize);
 259             uno_Any exc;
 260             uno_Any * pexc = &exc;
 261             (*object_.get()->pDispatcher)(
 262                 object_.get(), member_.get(), retBuf.empty() ? 0 : &retBuf[0],
 263                 args.empty() ? 0 : &args[0], &pexc);
 264             isExc = pexc != 0;
 265             if (isExc) {
 266                 *returnValue = BinaryAny(
 267                     css::uno::TypeDescription(
 268                         cppu::UnoType< css::uno::Any >::get()),
 269                     &exc);
 270                 uno_any_destruct(&exc, 0);
 271             } else {
 272                 if (!retBuf.empty()) {
 273                     *returnValue = BinaryAny(retType, &retBuf[0]);
 274                     uno_destructData(&retBuf[0], retType.get(), 0);
 275                 }
 276                 if (!outArguments->empty()) {
 277                     OSL_ASSERT(
 278                         member_.get()->eTypeClass ==
 279                         typelib_TypeClass_INTERFACE_METHOD);
 280                     typelib_InterfaceMethodTypeDescription * mtd =
 281                         reinterpret_cast<
 282                             typelib_InterfaceMethodTypeDescription * >(
 283                                 member_.get());
 284                     std::vector< BinaryAny >::iterator i(outArguments->begin());
 285                     std::list< std::vector< char > >::iterator j(
 286                         outBufs.begin());
 287                     for (sal_Int32 k = 0; k != mtd->nParams; ++k) {
 288                         if (mtd->pParams[k].bOut) {
 289                             *i++ = BinaryAny(
 290                                 css::uno::TypeDescription(
 291                                     mtd->pParams[k].pTypeRef),
 292                                 args[k]);
 293                         }
 294                         if (!mtd->pParams[k].bIn) {
 295                             uno_type_destructData(
 296                                 &(*j++)[0], mtd->pParams[k].pTypeRef, 0);
 297                         }
 298                     }
 299                     OSL_ASSERT(i == outArguments->end());
 300                     OSL_ASSERT(j == outBufs.end());
 301                 }
 302             }
 303             break;
 304         }
 305     }
 306     return !isExc;
 307 }
 308
 309 }
 310
 311 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */