office-gobmx/idlc/source/astinterface.cxx
Sebastian Spaeth a715e1b3d0 Add vim/emacs modelines to all source files
Fixes #fdo30794
Based on bin/add-modelines script (originally posted in mail
1286706307.1871.1399280959@webmail.messagingengine.com)

Signed-off-by: Sebastian Spaeth <Sebastian@SSpaeth.de>
2010-10-14 17:04:31 +02:00

430 lines
15 KiB
C++

/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
/*************************************************************************
*
* 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/astinterface.hxx>
#include <idlc/astattribute.hxx>
#include <idlc/astoperation.hxx>
#include "idlc/idlc.hxx"
#include "registry/version.h"
#include "registry/writer.hxx"
using namespace ::rtl;
AstInterface::AstInterface(const ::rtl::OString& name,
AstInterface const * pInherits,
AstScope* pScope)
: AstType(NT_interface, name, pScope)
, AstScope(NT_interface)
, m_mandatoryInterfaces(0)
, m_bIsDefined(false)
, m_bForwarded(sal_False)
, m_bForwardedInSameFile(sal_False)
, m_bSingleInheritance(pInherits != 0)
{
if (pInherits != 0) {
addInheritedInterface(pInherits, false, rtl::OUString());
}
}
AstInterface::~AstInterface()
{
}
AstInterface::DoubleDeclarations AstInterface::checkInheritedInterfaceClashes(
AstInterface const * ifc, bool optional) const
{
DoubleDeclarations doubleDecls;
std::set< rtl::OString > seen;
checkInheritedInterfaceClashes(
doubleDecls, seen, ifc, true, optional, optional);
return doubleDecls;
}
void AstInterface::addInheritedInterface(
AstType const * ifc, bool optional, rtl::OUString const & documentation)
{
m_inheritedInterfaces.push_back(
InheritedInterface(ifc, optional, documentation));
if (!optional) {
++m_mandatoryInterfaces;
}
AstInterface const * resolved = resolveInterfaceTypedefs(ifc);
addVisibleInterface(resolved, true, optional);
if (optional) {
addOptionalVisibleMembers(resolved);
}
}
AstInterface::DoubleMemberDeclarations AstInterface::checkMemberClashes(
AstDeclaration const * member) const
{
DoubleMemberDeclarations doubleMembers;
checkMemberClashes(doubleMembers, member, true);
return doubleMembers;
}
void AstInterface::addMember(AstDeclaration /*TODO: const*/ * member) {
addDeclaration(member);
m_visibleMembers.insert(
VisibleMembers::value_type(
member->getLocalName(), VisibleMember(member)));
}
void AstInterface::forwardDefined(AstInterface const & def)
{
setImported(def.isImported());
setInMainfile(def.isInMainfile());
setLineNumber(def.getLineNumber());
setFileName(def.getFileName());
setDocumentation(def.getDocumentation());
m_inheritedInterfaces = def.m_inheritedInterfaces;
m_mandatoryInterfaces = def.m_mandatoryInterfaces;
m_bIsDefined = true;
}
sal_Bool AstInterface::dump(RegistryKey& rKey)
{
if ( !isDefined() )
return sal_True;
RegistryKey localKey;
if (rKey.createKey( OStringToOUString(getFullName(), RTL_TEXTENCODING_UTF8 ), localKey))
{
fprintf(stderr, "%s: warning, could not create key '%s' in '%s'\n",
idlc()->getOptions()->getProgramName().getStr(),
getFullName().getStr(), OUStringToOString(rKey.getRegistryName(), RTL_TEXTENCODING_UTF8).getStr());
return sal_False;
}
if (m_mandatoryInterfaces > SAL_MAX_UINT16
|| m_inheritedInterfaces.size() - m_mandatoryInterfaces
> SAL_MAX_UINT16)
{
fprintf(
stderr, "%s: interface %s has too many direct base interfaces\n",
idlc()->getOptions()->getProgramName().getStr(),
getScopedName().getStr());
return false;
}
sal_uInt16 nBaseTypes = static_cast< sal_uInt16 >(m_mandatoryInterfaces);
sal_uInt16 nAttributes = 0;
sal_uInt16 nMethods = 0;
sal_uInt16 nReferences = static_cast< sal_uInt16 >(
m_inheritedInterfaces.size() - m_mandatoryInterfaces);
typereg_Version version
= (nBaseTypes <= 1 && nReferences == 0 && !m_bPublished
? TYPEREG_VERSION_0 : TYPEREG_VERSION_1);
{for (DeclList::const_iterator i(getIteratorBegin()); i != getIteratorEnd();
++i)
{
switch ((*i)->getNodeType()) {
case NT_attribute:
{
if (!increment(&nAttributes, "attributes")) {
return false;
}
// AstAttribute * attr = static_cast< AstAttribute * >(*i);
AstAttribute * attr = (AstAttribute *)(*i);
if (attr->isBound()) {
version = TYPEREG_VERSION_1;
}
DeclList::size_type getCount = attr->getGetExceptionCount();
if (getCount > SAL_MAX_UINT16) {
fprintf(
stderr,
("%s: raises clause of getter for attribute %s of"
" interface %s is too long\n"),
idlc()->getOptions()->getProgramName().getStr(),
(*i)->getLocalName().getStr(),
getScopedName().getStr());
return false;
}
if (getCount > 0) {
version = TYPEREG_VERSION_1;
if (!increment(&nMethods, "attributes")) {
return false;
}
}
DeclList::size_type setCount = attr->getSetExceptionCount();
if (setCount > SAL_MAX_UINT16) {
fprintf(
stderr,
("%s: raises clause of setter for attribute %s of"
" interface %s is too long\n"),
idlc()->getOptions()->getProgramName().getStr(),
(*i)->getLocalName().getStr(),
getScopedName().getStr());
return false;
}
if (setCount > 0) {
version = TYPEREG_VERSION_1;
if (!increment(&nMethods, "attributes")) {
return false;
}
}
break;
}
case NT_operation:
if (!increment(&nMethods, "methods")) {
return false;
}
break;
default:
OSL_ASSERT(false);
break;
}
}}
OUString emptyStr;
typereg::Writer aBlob(
version, getDocumentation(), emptyStr, RT_TYPE_INTERFACE, m_bPublished,
OStringToOUString(getRelativName(), RTL_TEXTENCODING_UTF8), nBaseTypes,
nAttributes, nMethods, nReferences);
sal_uInt16 superTypeIndex = 0;
sal_uInt16 referenceIndex = 0;
{for (InheritedInterfaces::iterator i = m_inheritedInterfaces.begin();
i != m_inheritedInterfaces.end(); ++i)
{
if (i->isOptional()) {
aBlob.setReferenceData(
referenceIndex++, i->getDocumentation(), RT_REF_SUPPORTS,
RT_ACCESS_OPTIONAL,
OStringToOUString(
i->getInterface()->getRelativName(),
RTL_TEXTENCODING_UTF8));
} else {
aBlob.setSuperTypeName(
superTypeIndex++,
OStringToOUString(
i->getInterface()->getRelativName(),
RTL_TEXTENCODING_UTF8));
}
}}
sal_uInt16 attributeIndex = 0;
sal_uInt16 methodIndex = 0;
{for (DeclList::const_iterator i(getIteratorBegin()); i != getIteratorEnd();
++i)
{
switch ((*i)->getNodeType()) {
case NT_attribute:
// static_cast< AstAttribute * >(*i)->dumpBlob(
((AstAttribute *)(*i))->dumpBlob(
aBlob, attributeIndex++, &methodIndex);
break;
case NT_operation:
// static_cast< AstOperation * >(*i)->dumpBlob(aBlob, methodIndex++);
((AstOperation *)(*i))->dumpBlob(aBlob, methodIndex++);
break;
default:
OSL_ASSERT(false);
break;
}
}}
sal_uInt32 aBlobSize;
void const * pBlob = aBlob.getBlob(&aBlobSize);
if (localKey.setValue(emptyStr, RG_VALUETYPE_BINARY, (RegValue)pBlob, aBlobSize))
{
fprintf(stderr, "%s: warning, could not set value of key \"%s\" in %s\n",
idlc()->getOptions()->getProgramName().getStr(),
getFullName().getStr(), OUStringToOString(localKey.getRegistryName(), RTL_TEXTENCODING_UTF8).getStr());
return sal_False;
}
return true;
}
void AstInterface::checkInheritedInterfaceClashes(
DoubleDeclarations & doubleDeclarations,
std::set< rtl::OString > & seenInterfaces, AstInterface const * ifc,
bool direct, bool optional, bool mainOptional) const
{
if (direct || optional
|| seenInterfaces.insert(ifc->getScopedName()).second)
{
VisibleInterfaces::const_iterator visible(
m_visibleInterfaces.find(ifc->getScopedName()));
if (visible != m_visibleInterfaces.end()) {
switch (visible->second) {
case INTERFACE_INDIRECT_OPTIONAL:
if (direct && optional) {
doubleDeclarations.interfaces.push_back(ifc);
return;
}
break;
case INTERFACE_DIRECT_OPTIONAL:
if (direct || !mainOptional) {
doubleDeclarations.interfaces.push_back(ifc);
}
return;
case INTERFACE_INDIRECT_MANDATORY:
if (direct) {
doubleDeclarations.interfaces.push_back(ifc);
}
return;
case INTERFACE_DIRECT_MANDATORY:
if (direct || (!optional && !mainOptional)) {
doubleDeclarations.interfaces.push_back(ifc);
}
return;
}
}
if (direct || !optional) {
{for (DeclList::const_iterator i(ifc->getIteratorBegin());
i != ifc->getIteratorEnd(); ++i)
{
checkMemberClashes(
doubleDeclarations.members, *i, !mainOptional);
}}
{for (InheritedInterfaces::const_iterator i(
ifc->m_inheritedInterfaces.begin());
i != ifc->m_inheritedInterfaces.end(); ++i)
{
checkInheritedInterfaceClashes(
doubleDeclarations, seenInterfaces, i->getResolved(),
false, i->isOptional(), mainOptional);
}}
}
}
}
void AstInterface::checkMemberClashes(
DoubleMemberDeclarations & doubleMembers, AstDeclaration const * member,
bool checkOptional) const
{
VisibleMembers::const_iterator i(
m_visibleMembers.find(member->getLocalName()));
if (i != m_visibleMembers.end()) {
if (i->second.mandatory != 0) {
if (i->second.mandatory->getScopedName() != member->getScopedName())
{
DoubleMemberDeclaration d;
d.first = i->second.mandatory;
d.second = member;
doubleMembers.push_back(d);
}
} else if (checkOptional) {
for (VisibleMember::Optionals::const_iterator j(
i->second.optionals.begin());
j != i->second.optionals.end(); ++j)
{
if (j->second->getScopedName() != member->getScopedName()) {
DoubleMemberDeclaration d;
d.first = j->second;
d.second = member;
doubleMembers.push_back(d);
}
}
}
}
}
void AstInterface::addVisibleInterface(
AstInterface const * ifc, bool direct, bool optional)
{
InterfaceKind kind = optional
? direct ? INTERFACE_DIRECT_OPTIONAL : INTERFACE_INDIRECT_OPTIONAL
: direct ? INTERFACE_DIRECT_MANDATORY : INTERFACE_INDIRECT_MANDATORY;
std::pair< VisibleInterfaces::iterator, bool > result(
m_visibleInterfaces.insert(
VisibleInterfaces::value_type(ifc->getScopedName(), kind)));
bool seen = !result.second
&& result.first->second >= INTERFACE_INDIRECT_MANDATORY;
if (!result.second && kind > result.first->second) {
result.first->second = kind;
}
if (!optional && !seen) {
{for (DeclList::const_iterator i(ifc->getIteratorBegin());
i != ifc->getIteratorEnd(); ++i)
{
m_visibleMembers.insert(
VisibleMembers::value_type(
(*i)->getLocalName(), VisibleMember(*i)));
}}
{for (InheritedInterfaces::const_iterator i(
ifc->m_inheritedInterfaces.begin());
i != ifc->m_inheritedInterfaces.end(); ++i)
{
addVisibleInterface(i->getResolved(), false, i->isOptional());
}}
}
}
void AstInterface::addOptionalVisibleMembers(AstInterface const * ifc) {
{for (DeclList::const_iterator i(ifc->getIteratorBegin());
i != ifc->getIteratorEnd(); ++i)
{
VisibleMembers::iterator visible(
m_visibleMembers.find((*i)->getLocalName()));
if (visible == m_visibleMembers.end()) {
visible = m_visibleMembers.insert(
VisibleMembers::value_type(
(*i)->getLocalName(), VisibleMember())).first;
}
if (visible->second.mandatory == 0) {
visible->second.optionals.insert(
VisibleMember::Optionals::value_type(ifc->getScopedName(), *i));
}
}}
{for (InheritedInterfaces::const_iterator i(
ifc->m_inheritedInterfaces.begin());
i != ifc->m_inheritedInterfaces.end(); ++i)
{
if (!i->isOptional()) {
addOptionalVisibleMembers(i->getResolved());
}
}}
}
bool AstInterface::increment(sal_uInt16 * counter, char const * sort) const {
if (*counter == SAL_MAX_UINT16) {
fprintf(
stderr, "%s: interface %s has too many direct %s\n",
idlc()->getOptions()->getProgramName().getStr(),
getScopedName().getStr(), sort);
return false;
}
++*counter;
return true;
}
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */