153 lines
5 KiB
C++
153 lines
5 KiB
C++
/*************************************************************************
|
|
*
|
|
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
|
|
*
|
|
* Copyright 2000, 2010 Oracle and/or its affiliates.
|
|
*
|
|
* OpenOffice.org - a multi-platform office productivity suite
|
|
*
|
|
* This file is part of OpenOffice.org.
|
|
*
|
|
* OpenOffice.org is free software: you can redistribute it and/or modify
|
|
* it under the terms of the GNU Lesser General Public License version 3
|
|
* only, as published by the Free Software Foundation.
|
|
*
|
|
* OpenOffice.org is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU Lesser General Public License version 3 for more details
|
|
* (a copy is included in the LICENSE file that accompanied this code).
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public License
|
|
* version 3 along with OpenOffice.org. If not, see
|
|
* <http://www.openoffice.org/license.html>
|
|
* for a copy of the LGPLv3 License.
|
|
*
|
|
************************************************************************/
|
|
|
|
// MARKER(update_precomp.py): autogen include statement, do not remove
|
|
#include "precompiled_idlc.hxx"
|
|
#include <idlc/astoperation.hxx>
|
|
#include <idlc/asttype.hxx>
|
|
#include <idlc/astbasetype.hxx>
|
|
#include <idlc/astparameter.hxx>
|
|
#include <idlc/errorhandler.hxx>
|
|
|
|
#include "registry/writer.hxx"
|
|
|
|
using namespace ::rtl;
|
|
|
|
void AstOperation::setExceptions(DeclList const * pExceptions)
|
|
{
|
|
if (pExceptions != 0) {
|
|
if (isOneway()) {
|
|
idlc()->error()->error1(EIDL_ONEWAY_RAISE_CONFLICT, this);
|
|
}
|
|
m_exceptions = *pExceptions;
|
|
}
|
|
}
|
|
|
|
bool AstOperation::isVariadic() const {
|
|
DeclList::const_iterator i(getIteratorEnd());
|
|
return i != getIteratorBegin()
|
|
&& static_cast< AstParameter const * >(*(--i))->isRest();
|
|
}
|
|
|
|
sal_Bool AstOperation::dumpBlob(typereg::Writer & rBlob, sal_uInt16 index)
|
|
{
|
|
sal_uInt16 nParam = getNodeCount(NT_parameter);
|
|
sal_uInt16 nExcep = nExceptions();
|
|
RTMethodMode methodMode = RT_MODE_TWOWAY;
|
|
|
|
if ( isOneway() )
|
|
methodMode = RT_MODE_ONEWAY;
|
|
|
|
rtl::OUString returnTypeName;
|
|
if (m_pReturnType == 0) {
|
|
returnTypeName = rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("void"));
|
|
} else {
|
|
returnTypeName = rtl::OStringToOUString(
|
|
m_pReturnType->getRelativName(), RTL_TEXTENCODING_UTF8);
|
|
}
|
|
rBlob.setMethodData(
|
|
index, getDocumentation(), methodMode,
|
|
OStringToOUString(getLocalName(), RTL_TEXTENCODING_UTF8),
|
|
returnTypeName, nParam, nExcep);
|
|
|
|
if ( nParam )
|
|
{
|
|
DeclList::const_iterator iter = getIteratorBegin();
|
|
DeclList::const_iterator end = getIteratorEnd();
|
|
AstDeclaration* pDecl = NULL;
|
|
RTParamMode paramMode;
|
|
sal_uInt16 paramIndex = 0;
|
|
while ( iter != end )
|
|
{
|
|
pDecl = *iter;
|
|
if ( pDecl->getNodeType() == NT_parameter )
|
|
{
|
|
AstParameter* pParam = (AstParameter*)pDecl;
|
|
switch (pParam->getDirection())
|
|
{
|
|
case DIR_IN :
|
|
paramMode = RT_PARAM_IN;
|
|
break;
|
|
case DIR_OUT :
|
|
paramMode = RT_PARAM_OUT;
|
|
break;
|
|
case DIR_INOUT :
|
|
paramMode = RT_PARAM_INOUT;
|
|
break;
|
|
default:
|
|
paramMode = RT_PARAM_INVALID;
|
|
break;
|
|
}
|
|
if (pParam->isRest()) {
|
|
paramMode = static_cast< RTParamMode >(
|
|
paramMode | RT_PARAM_REST);
|
|
}
|
|
|
|
rBlob.setMethodParameterData(
|
|
index, paramIndex++, paramMode,
|
|
OStringToOUString(
|
|
pDecl->getLocalName(), RTL_TEXTENCODING_UTF8),
|
|
OStringToOUString(
|
|
pParam->getType()->getRelativName(),
|
|
RTL_TEXTENCODING_UTF8));
|
|
}
|
|
++iter;
|
|
}
|
|
}
|
|
|
|
if ( nExcep )
|
|
{
|
|
DeclList::iterator iter = m_exceptions.begin();
|
|
DeclList::iterator end = m_exceptions.end();
|
|
sal_uInt16 exceptIndex = 0;
|
|
while ( iter != end )
|
|
{
|
|
rBlob.setMethodExceptionTypeName(
|
|
index, exceptIndex++,
|
|
OStringToOUString(
|
|
(*iter)->getRelativName(), RTL_TEXTENCODING_UTF8));
|
|
++iter;
|
|
}
|
|
}
|
|
|
|
return sal_True;
|
|
}
|
|
|
|
AstDeclaration* AstOperation::addDeclaration(AstDeclaration* pDecl)
|
|
{
|
|
if ( pDecl->getNodeType() == NT_parameter )
|
|
{
|
|
AstParameter* pParam = (AstParameter*)pDecl;
|
|
if ( isOneway() &&
|
|
(pParam->getDirection() == DIR_OUT || pParam->getDirection() == DIR_INOUT) )
|
|
{
|
|
idlc()->error()->error2(EIDL_ONEWAY_CONFLICT, pDecl, this);
|
|
return NULL;
|
|
}
|
|
}
|
|
return AstScope::addDeclaration(pDecl);
|
|
}
|