cli_ure/source/mono_bridge/uno_glue.cxx

   1 /*************************************************************************
   2  *
   3  *  $RCSfile: $
   4  *
   5  *  $Revision: $
   6  *
   7  *  last change: $Author: $ $Date: $
   8  *
   9  *  The Contents of this file are made available subject to the terms of
  10  *  either of the following licenses
  11  *
  12  *         - GNU Lesser General Public License Version 2.1
  13  *         - Sun Industry Standards Source License Version 1.1
  14  *
  15  *  Sun Microsystems Inc., October, 2000
  16  *
  17  *  GNU Lesser General Public License Version 2.1
  18  *  =============================================
  19  *  Copyright 2000 by Sun Microsystems, Inc.
  20  *  901 San Antonio Road, Palo Alto, CA 94303, USA
  21  *
  22  *  This library is free software; you can redistribute it and/or
  23  *  modify it under the terms of the GNU Lesser General Public
  24  *  License version 2.1, as published by the Free Software Foundation.
  25  *
  26  *  This library is distributed in the hope that it will be useful,
  27  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  28  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  29  *  Lesser General Public License for more details.
  30  *
  31  *  You should have received a copy of the GNU Lesser General Public
  32  *  License along with this library; if not, write to the Free Software
  33  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  34  *  MA  02111-1307  USA
  35  *
  36  *
  37  *  Sun Industry Standards Source License Version 1.1
  38  *  =================================================
  39  *  The contents of this file are subject to the Sun Industry Standards
  40  *  Source License Version 1.1 (the "License"); You may not use this file
  41  *  except in compliance with the License. You may obtain a copy of the
  42  *  License at http://www.openoffice.org/license.html.
  43  *
  44  *  Software provided under this License is provided on an "AS IS" basis,
  45  *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
  46  *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
  47  *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
  48  *  See the License for the specific provisions governing your rights and
  49  *  obligations concerning the Software.
  50  *
  51  *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
  52  *
  53  *  Copyright: 2000 by Sun Microsystems, Inc.
  54  *
  55  *  All Rights Reserved.
  56  *
  57  *  Contributor(s): _______________________________________
  58  *
  59  *
  60  ************************************************************************/
  61
  62 #include "rtl/ustring.h"
  63 #include "uno/dispatcher.h"
  64 #include "uno/environment.h"
  65 #include <stdio.h>
  66
  67 extern "C" {
  68
  69 /* uno_Interface */
  70
  71 void SAL_CALL cli_uno_interface_acquire( uno_Interface *pInterface )
  72     SAL_THROW_EXTERN_C()
  73 {
  74     (*pInterface->acquire)( pInterface );
  75 }
  76
  77 void SAL_CALL cli_uno_interface_release( uno_Interface *pInterface )
  78     SAL_THROW_EXTERN_C()
  79 {
  80     (*pInterface->release)( pInterface );
  81 }
  82
  83 void SAL_CALL cli_uno_interface_dispatch(
  84     uno_Interface *pInterface, const struct _typelib_TypeDescription *pMemberType,
  85     void *pReturn, void *pArgs[], uno_Any **ppException )
  86     SAL_THROW_EXTERN_C()
  87 {
  88     (*pInterface->pDispatcher)( pInterface, pMemberType, pReturn, pArgs, ppException );
  89 }
  90
  91 /* uno_ExtEnvironment */
  92
  93 void SAL_CALL cli_uno_environment_getObjectIdentifier(
  94     uno_ExtEnvironment *pUnoEnv, rtl_uString **ppOId, uno_Interface *pUnoI )
  95     SAL_THROW_EXTERN_C()
  96 {
  97     (*pUnoEnv->getObjectIdentifier)( pUnoEnv, ppOId, pUnoI );
  98 }
  99
 100 void SAL_CALL cli_uno_environment_registerInterface(
 101     uno_ExtEnvironment *pUnoEnv, void **ppInterface, rtl_uString *pOId,
 102     struct _typelib_InterfaceTypeDescription *pTypeDescr )
 103     SAL_THROW_EXTERN_C()
 104 {
 105     (*pUnoEnv->registerInterface)( pUnoEnv, ppInterface, pOId, pTypeDescr );
 106 }
 107
 108 void SAL_CALL cli_uno_environment_getRegisteredInterface(
 109     uno_ExtEnvironment *pUnoEnv, void **ppInterface, rtl_uString *pOId,
 110     struct _typelib_InterfaceTypeDescription *pTypeDescr )
 111     SAL_THROW_EXTERN_C()
 112 {
 113     (*pUnoEnv->getRegisteredInterface)( pUnoEnv, ppInterface, pOId, pTypeDescr );
 114 }
 115
 116
 117 }