stoc/source/corereflection/crarray.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 <typelib/typedescription.h>
  21 #include <uno/data.h>
  22 #include <cppuhelper/queryinterface.hxx>
  23
  24 #include "base.hxx"
  25
  26 using namespace css::lang;
  27 using namespace css::reflection;
  28 using namespace css::uno;
  29
  30 namespace stoc_corefl
  31 {
  32
  33 // XInterface
  34
  35 Any ArrayIdlClassImpl::queryInterface( const Type & rType )
  36 {
  37     Any aRet( ::cppu::queryInterface( rType, static_cast< XIdlArray * >( this ) ) );
  38     return (aRet.hasValue() ? aRet : IdlClassImpl::queryInterface( rType ));
  39 }
  40
  41 void ArrayIdlClassImpl::acquire() throw()
  42 {
  43     IdlClassImpl::acquire();
  44 }
  45
  46 void ArrayIdlClassImpl::release() throw()
  47 {
  48     IdlClassImpl::release();
  49 }
  50
  51 // XTypeProvider
  52
  53 Sequence< Type > ArrayIdlClassImpl::getTypes()
  54 {
  55     static ::cppu::OTypeCollection * s_pTypes = nullptr;
  56     if (! s_pTypes)
  57     {
  58         ::osl::MutexGuard aGuard( getMutexAccess() );
  59         if (! s_pTypes)
  60         {
  61             static ::cppu::OTypeCollection s_aTypes(
  62                 cppu::UnoType<XIdlArray>::get(),
  63                 IdlClassImpl::getTypes() );
  64             s_pTypes = &s_aTypes;
  65         }
  66     }
  67     return s_pTypes->getTypes();
  68 }
  69
  70 Sequence< sal_Int8 > ArrayIdlClassImpl::getImplementationId()
  71 {
  72     return css::uno::Sequence<sal_Int8>();
  73 }
  74
  75 // XIdlArray
  76
  77 void ArrayIdlClassImpl::realloc( Any & rArray, sal_Int32 nLen )
  78 {
  79     TypeClass eTC = rArray.getValueTypeClass();
  80     if (eTC != TypeClass_SEQUENCE)
  81     {
  82         throw IllegalArgumentException(
  83             "expected sequence, but found " + rArray.getValueType().getTypeName(),
  84             static_cast<XWeak *>(static_cast<OWeakObject *>(this)), 0 );
  85     }
  86     if (nLen < 0)
  87     {
  88         throw IllegalArgumentException(
  89             "negative length given!",
  90             static_cast<XWeak *>(static_cast<OWeakObject *>(this)), 1 );
  91     }
  92
  93     uno_Sequence ** ppSeq = const_cast<uno_Sequence **>(static_cast<uno_Sequence * const *>(rArray.getValue()));
  94     uno_sequence_realloc( ppSeq, &getTypeDescr()->aBase,
  95                           nLen,
  96                           reinterpret_cast< uno_AcquireFunc >(cpp_acquire),
  97                           reinterpret_cast< uno_ReleaseFunc >(cpp_release) );
  98     rArray.pData = ppSeq;
  99 }
 100
 101 sal_Int32 ArrayIdlClassImpl::getLen( const Any & rArray )
 102 {
 103     TypeClass eTC = rArray.getValueTypeClass();
 104     if (eTC != TypeClass_SEQUENCE)
 105     {
 106         throw IllegalArgumentException(
 107             "expected sequence, but found " + rArray.getValueType().getTypeName(),
 108             static_cast<XWeak *>(static_cast<OWeakObject *>(this)), 0 );
 109     }
 110
 111     return (*static_cast<uno_Sequence * const *>(rArray.getValue()))->nElements;
 112 }
 113
 114 Any ArrayIdlClassImpl::get( const Any & rArray, sal_Int32 nIndex )
 115 {
 116     TypeClass eTC = rArray.getValueTypeClass();
 117     if (eTC != TypeClass_SEQUENCE)
 118     {
 119         throw IllegalArgumentException(
 120             "expected sequence, but found " + rArray.getValueType().getTypeName(),
 121             static_cast<XWeak *>(static_cast<OWeakObject *>(this)), 0 );
 122     }
 123
 124     uno_Sequence * pSeq = *static_cast<uno_Sequence * const *>(rArray.getValue());
 125     if (pSeq->nElements <= nIndex)
 126     {
 127         throw ArrayIndexOutOfBoundsException(
 128             "illegal index given, index " + OUString::number(nIndex) + " is < " + OUString::number(pSeq->nElements),
 129             static_cast<XWeak *>(static_cast<OWeakObject *>(this)) );
 130     }
 131
 132     Any aRet;
 133     typelib_TypeDescription * pElemTypeDescr = nullptr;
 134     TYPELIB_DANGER_GET( &pElemTypeDescr, getTypeDescr()->pType );
 135     uno_any_destruct( &aRet, reinterpret_cast< uno_ReleaseFunc >(cpp_release) );
 136     uno_any_construct( &aRet, &pSeq->elements[nIndex * pElemTypeDescr->nSize],
 137                        pElemTypeDescr,
 138                        reinterpret_cast< uno_AcquireFunc >(cpp_acquire) );
 139     TYPELIB_DANGER_RELEASE( pElemTypeDescr );
 140     return aRet;
 141 }
 142
 143
 144 void ArrayIdlClassImpl::set( Any & rArray, sal_Int32 nIndex, const Any & rNewValue )
 145 {
 146     TypeClass eTC = rArray.getValueTypeClass();
 147     if (eTC != TypeClass_SEQUENCE)
 148     {
 149         throw IllegalArgumentException(
 150             "expected sequence, but found " + rArray.getValueType().getTypeName(),
 151             static_cast<XWeak *>(static_cast<OWeakObject *>(this)), 0 );
 152     }
 153
 154     uno_Sequence * pSeq = *static_cast<uno_Sequence * const *>(rArray.getValue());
 155     if (pSeq->nElements <= nIndex)
 156     {
 157         throw ArrayIndexOutOfBoundsException(
 158             "illegal index given, index " + OUString::number(nIndex) + " is < " + OUString::number(pSeq->nElements),
 159             static_cast<XWeak *>(static_cast<OWeakObject *>(this)) );
 160     }
 161
 162     uno_Sequence ** ppSeq = const_cast<uno_Sequence **>(static_cast<uno_Sequence * const *>(rArray.getValue()));
 163     uno_sequence_reference2One(
 164         ppSeq, &getTypeDescr()->aBase,
 165         reinterpret_cast< uno_AcquireFunc >(cpp_acquire),
 166         reinterpret_cast< uno_ReleaseFunc >(cpp_release) );
 167     rArray.pData = ppSeq;
 168     pSeq = *ppSeq;
 169
 170     typelib_TypeDescription * pElemTypeDescr = nullptr;
 171     TYPELIB_DANGER_GET( &pElemTypeDescr, getTypeDescr()->pType );
 172
 173     if (! coerce_assign( &pSeq->elements[nIndex * pElemTypeDescr->nSize],
 174                          pElemTypeDescr, rNewValue, getReflection() ))
 175     {
 176         TYPELIB_DANGER_RELEASE( pElemTypeDescr );
 177         throw IllegalArgumentException(
 178             "sequence element is not assignable by given value!",
 179             static_cast<XWeak *>(static_cast<OWeakObject *>(this)), 2 );
 180     }
 181     TYPELIB_DANGER_RELEASE( pElemTypeDescr );
 182 }
 183
 184 // ArrayIdlClassImpl
 185
 186 sal_Bool ArrayIdlClassImpl::isAssignableFrom( const Reference< XIdlClass > & xType )
 187 {
 188     return (xType.is() &&
 189             (equals( xType ) ||
 190              (xType->getTypeClass() == getTypeClass() && // must be sequence|array
 191               getComponentType()->isAssignableFrom( xType->getComponentType() ))));
 192 }
 193
 194 Reference< XIdlClass > ArrayIdlClassImpl::getComponentType()
 195 {
 196     return getReflection()->forType( getTypeDescr()->pType );
 197 }
 198
 199 Reference< XIdlArray > ArrayIdlClassImpl::getArray()
 200 {
 201     return this;
 202 }
 203
 204 }
 205
 206
 207 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */