/*************************************************************************
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
*
* Copyright 2009 by Sun Microsystems, Inc.
*
* OpenOffice.org - a multi-platform office productivity suite
*
* $RCSfile: code,v $
*
* $Revision: 1.4 $
*
* 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.
************************************************************************/

#include "precompiled_configmgr.hxx"
#include "sal/config.h"

#include "com/sun/star/beans/Property.hpp"
#include "com/sun/star/beans/PropertyAttribute.hpp"
#include "com/sun/star/beans/PropertyVetoException.hpp"
#include "com/sun/star/beans/UnknownPropertyException.hpp"
#include "com/sun/star/beans/XPropertiesChangeListener.hpp"
#include "com/sun/star/beans/XPropertyChangeListener.hpp"
#include "com/sun/star/beans/XPropertySetInfo.hpp"
#include "com/sun/star/beans/XVetoableChangeListener.hpp"
#include "com/sun/star/container/NoSuchElementException.hpp"
#include "com/sun/star/container/XContainerListener.hpp"
#include "com/sun/star/lang/IllegalArgumentException.hpp"
#include "com/sun/star/lang/NoSupportException.hpp"
#include "com/sun/star/lang/WrappedTargetException.hpp"
#include "com/sun/star/lang/XUnoTunnel.hpp"
#include "com/sun/star/uno/Any.hxx"
#include "com/sun/star/uno/Reference.hxx"
#include "com/sun/star/uno/RuntimeException.hpp"
#include "com/sun/star/uno/Sequence.hxx"
#include "com/sun/star/uno/Type.hxx"
#include "com/sun/star/uno/TypeClass.hpp"
#include "com/sun/star/uno/XInterface.hpp"
#include "com/sun/star/util/ChangesSet.hpp"
#include "com/sun/star/util/XChangesListener.hpp"
#include "comphelper/sequenceasvector.hxx"
#include "cppu/unotype.hxx"
#include "cppuhelper/exc_hlp.hxx"
#include "cppuhelper/weak.hxx"
#include "osl/diagnose.h"
#include "osl/mutex.hxx"
#include "rtl/ref.hxx"
#include "rtl/ustring.h"
#include "rtl/ustring.hxx"
#include "sal/types.h"

#include "access.hxx"
#include "childaccess.hxx"
#include "components.hxx"
#include "groupnode.hxx"
#include "localizedpropertynode.hxx"
#include "localizedvalues.hxx"
#include "lock.hxx"
#include "node.hxx"
#include "propertynode.hxx"
#include "rootaccess.hxx"
#include "setnode.hxx"
#include "type.hxx"

#if !defined INCLUDED_COMPHELPER_IMPLBASE_VAR_HXX_16
#define INCLUDED_COMPHELPER_IMPLBASE_VAR_HXX_16
#define COMPHELPER_IMPLBASE_INTERFACE_NUMBER 16
#include "comphelper/implbase_var.hxx"
#undef COMPHELPER_IMPLBASE_INTERFACE_NUMBER
#endif

namespace configmgr {

namespace {

namespace css = com::sun::star;

css::uno::Type mapType(Type type) {
    switch (type) {
    case TYPE_NONE: //TODO: can happen?
        return cppu::UnoType< cppu::UnoVoidType >::get();
    case TYPE_BOOLEAN:
        return cppu::UnoType< sal_Bool >::get();
    case TYPE_SHORT:
        return cppu::UnoType< sal_Int16 >::get();
    case TYPE_INT:
        return cppu::UnoType< sal_Int32 >::get();
    case TYPE_LONG:
        return cppu::UnoType< sal_Int64 >::get();
    case TYPE_DOUBLE:
        return cppu::UnoType< double >::get();
    case TYPE_STRING:
        return cppu::UnoType< rtl::OUString >::get();
    case TYPE_HEXBINARY:
        return cppu::UnoType< css::uno::Sequence< sal_Int8 > >::get();
    case TYPE_ANY: //TODO: can happen?
        return cppu::UnoType< css::uno::Any >::get();
    case TYPE_BOOLEAN_LIST:
        return cppu::UnoType< css::uno::Sequence< sal_Bool > >::get();
    case TYPE_SHORT_LIST:
        return cppu::UnoType< css::uno::Sequence< sal_Int16 > >::get();
    case TYPE_INT_LIST:
        return cppu::UnoType< css::uno::Sequence< sal_Int32 > >::get();
    case TYPE_LONG_LIST:
        return cppu::UnoType< css::uno::Sequence< sal_Int64 > >::get();
    case TYPE_DOUBLE_LIST:
        return cppu::UnoType< css::uno::Sequence< double > >::get();
    case TYPE_STRING_LIST:
        return cppu::UnoType< css::uno::Sequence< rtl::OUString > >::get();
    case TYPE_HEXBINARY_LIST:
        return cppu::UnoType<
            css::uno::Sequence< css::uno::Sequence< sal_Int8 > > >::get();
    }
}

Type mapType(css::uno::Type type) {
    switch (type.getTypeClass()) {
    case css::uno::TypeClass_BOOLEAN:
        return TYPE_BOOLEAN;
    case css::uno::TypeClass_SHORT:
        return TYPE_SHORT;
    case css::uno::TypeClass_LONG:
        return TYPE_INT;
    case css::uno::TypeClass_HYPER:
        return TYPE_LONG;
    case css::uno::TypeClass_DOUBLE:
        return TYPE_DOUBLE;
    case css::uno::TypeClass_STRING:
        return TYPE_STRING;
    case css::uno::TypeClass_SEQUENCE:
        {
            rtl::OUString name(type.getTypeName());
            if (name.equalsAsciiL(RTL_CONSTASCII_STRINGPARAM("[]byte"))) {
                return TYPE_HEXBINARY;
            } else if (name.equalsAsciiL(
                           RTL_CONSTASCII_STRINGPARAM("[]boolean")))
            {
                return TYPE_BOOLEAN_LIST;
            } else if (name.equalsAsciiL(RTL_CONSTASCII_STRINGPARAM("[]short")))
            {
                return TYPE_SHORT_LIST;
            } else if (name.equalsAsciiL(RTL_CONSTASCII_STRINGPARAM("[]long")))
            {
                return TYPE_INT_LIST;
            } else if (name.equalsAsciiL(RTL_CONSTASCII_STRINGPARAM("[]hyper")))
            {
                return TYPE_LONG_LIST;
            } else if (name.equalsAsciiL(
                           RTL_CONSTASCII_STRINGPARAM("[]double")))
            {
                return TYPE_DOUBLE_LIST;
            } else if (name.equalsAsciiL(
                           RTL_CONSTASCII_STRINGPARAM("[]string")))
            {
                return TYPE_STRING_LIST;
            } else if (name.equalsAsciiL(
                           RTL_CONSTASCII_STRINGPARAM("[][]byte")))
            {
                return TYPE_HEXBINARY_LIST;
            }
        }
        // fall through
    default:
        return TYPE_NONE;
    }
}

bool allLocales(rtl::OUString const & locale) {
    return locale.equalsAsciiL(RTL_CONSTASCII_STRINGPARAM("*"));
}

css::beans::Property asProperty(
    rtl::Reference< RootAccess > const & root,
    rtl::Reference< Node > const & node)
{
    css::uno::Type type;
    bool nillable;
    bool removable;
    if (PropertyNode * prop = dynamic_cast< PropertyNode * >(node.get()))
    {
        type = mapType(prop->getType());
        nillable = prop->isNillable();
        removable = prop->isExtension();
    } else if (LocalizedPropertyNode * locprop =
               dynamic_cast< LocalizedPropertyNode * >(node.get()))
    {
        if (allLocales(root->getLocale())) {
            type = cppu::UnoType< css::uno::XInterface >::get();
                //TODO: correct?
            removable = false;
        } else {
            type = mapType(locprop->getType());
            removable = false; //TODO ???
        }
        nillable = locprop->isNillable();
    } else {
        OSL_ASSERT(
            dynamic_cast< GroupNode * >(node.get()) != 0 ||
            dynamic_cast< SetNode * >(node.get()) != 0);
        type = cppu::UnoType< css::uno::XInterface >::get(); //TODO: correct?
        nillable = false;
        removable = node->getParent() == 0
            ? node->getName().getLength() == 0
            : dynamic_cast< SetNode * >(node->getParent()) != 0;
    }
    return css::beans::Property(
        node->getName(), -1, type,
        (css::beans::PropertyAttribute::BOUND | //TODO: correct for group/set?
         css::beans::PropertyAttribute::CONSTRAINED |
         (nillable ? css::beans::PropertyAttribute::MAYBEVOID : 0) |
         (root->isUpdate()
          ? (removable ? css::beans::PropertyAttribute::REMOVEABLE : 0)
          : css::beans::PropertyAttribute::READONLY))); //TODO: MAYBEDEFAULT
}

}

Access::Access(): WeakComponentImplHelper16(lock) {}

Access::~Access() {}

css::uno::Type Access::getElementType() throw (css::uno::RuntimeException) {
    OSL_ASSERT(thisIs(IS_GROUP_OR_SET_OR_LOCALIZED));
    osl::MutexGuard g(lock);
    rtl::Reference< Node > p(getNode());
    if (LocalizedPropertyNode * locprop =
        dynamic_cast< LocalizedPropertyNode * >(p.get()))
    {
        return mapType(locprop->getType());
    } else if (dynamic_cast< GroupNode * >(p.get()) != 0) {
        //TODO: Should a specific type be returned for a non-extensible group
        // with homogeneous members or for an extensible group that currently
        // has only homegeneous members?
        return cppu::UnoType< cppu::UnoVoidType >::get();
    } else if (dynamic_cast< SetNode * >(p.get()) != 0) {
        return cppu::UnoType< cppu::UnoVoidType >::get(); //TODO: correct?
    } else {
        OSL_ASSERT(false);
        throw css::uno::RuntimeException(
            rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("this cannot happen")),
            static_cast< cppu::OWeakObject * >(this));
    }
}

sal_Bool Access::hasElements() throw (css::uno::RuntimeException) {
    OSL_ASSERT(thisIs(IS_GROUP_OR_SET_OR_LOCALIZED));
    osl::MutexGuard g(lock);
    rtl::Reference< Node > p(getNode());
    if (dynamic_cast< LocalizedPropertyNode * >(p.get()) != 0) {
        return true; //TODO: correct?
    } else if (GroupNode * group = dynamic_cast< GroupNode * >(p.get())) {
        return !group->getMembers().empty();
    } else if (SetNode * set = dynamic_cast< SetNode * >(p.get())) {
        return !set->getMembers().empty();
    } else {
        OSL_ASSERT(false);
        throw css::uno::RuntimeException(
            rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("this cannot happen")),
            static_cast< cppu::OWeakObject * >(this));
    }
}

css::uno::Any Access::getByName(rtl::OUString const & aName)
    throw (
        css::container::NoSuchElementException,
        css::lang::WrappedTargetException, css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP_OR_SET_OR_LOCALIZED));
    osl::MutexGuard g(lock);
    css::uno::Any value;
    rtl::Reference< ChildAccess > node;
    switch (getChild(aName, &value, &node)) {
    case CHILD_NONE:
        throw css::container::NoSuchElementException(
            aName, static_cast< cppu::OWeakObject * >(this));
    case CHILD_VALUE:
        return value;
    case CHILD_NODE:
        return css::uno::makeAny(
            css::uno::Reference< css::uno::XInterface >(
                static_cast< cppu::OWeakObject * >(node.get())));
    }
}

css::uno::Sequence< rtl::OUString > Access::getElementNames()
    throw (css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP_OR_SET_OR_LOCALIZED));
    osl::MutexGuard g(lock);
    rtl::Reference< Node > p(getNode());
    if (LocalizedPropertyNode * locprop =
        dynamic_cast< LocalizedPropertyNode * >(p.get()))
    {
        comphelper::SequenceAsVector< rtl::OUString > names;
        for (LocalizedValues::iterator i(locprop->getValues().begin());
             i != locprop->getValues().end(); ++i)
        {
            names.push_back(i->first);
        }
        return names.getAsConstList();
    }
    if (GroupNode * group = dynamic_cast< GroupNode * >(p.get())) {
        comphelper::SequenceAsVector< rtl::OUString > names;
        for (NodeMap::iterator i(group->getMembers().begin());
             i != group->getMembers().end(); ++i)
        {
            names.push_back(i->first);
        }
        return names.getAsConstList();
    } else if (SetNode * set = dynamic_cast< SetNode * >(p.get())) {
        comphelper::SequenceAsVector< rtl::OUString > names;
        for (NodeMap::iterator i(set->getMembers().begin());
             i != set->getMembers().end(); ++i)
        {
            names.push_back(i->first);
        }
        return names.getAsConstList();
    } else {
        OSL_ASSERT(false);
        throw css::uno::RuntimeException(
            rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("this cannot happen")),
            static_cast< cppu::OWeakObject * >(this));
    }
}

sal_Bool Access::hasByName(rtl::OUString const & aName)
    throw (css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP_OR_SET_OR_LOCALIZED));
    osl::MutexGuard g(lock);
    rtl::Reference< Node > p(getNode());
    if (LocalizedPropertyNode * locprop =
        dynamic_cast< LocalizedPropertyNode * >(p.get()))
    {
        return locprop->getValues().find(aName) != locprop->getValues().end();
    } else {
        OSL_ASSERT(
            dynamic_cast< GroupNode * >(p.get()) != 0 ||
            dynamic_cast< SetNode * >(p.get()) != 0);
        return p->getMember(aName).is();
    }
}

css::uno::Any Access::getByHierarchicalName(rtl::OUString const & aName)
    throw (css::container::NoSuchElementException, css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP_OR_SET));
    osl::MutexGuard g(lock);
    sal_Int32 i = aName.indexOf('/');
    rtl::OUString name;
    bool setElement;
    rtl::OUString templateName;
    if (Components::parseSegment(
            i == -1 ? aName : aName.copy(0, i), &name, &setElement,
            &templateName))
    {
        css::uno::Any value;
        rtl::Reference< ChildAccess > node;
        switch (getChild(name, &value, &node)) {
        case CHILD_NONE:
            break;
        case CHILD_VALUE:
            if (i != -1) {
                break;
            }
            return value;
        case CHILD_NODE:
            if (setElement) {
                SetNode * set = dynamic_cast< SetNode * >(getNode().get());
                if (set == 0 ||
                    (templateName.getLength() != 0 &&
                     !set->isValidTemplate(templateName)))
                {
                    break;
                }
            }
            // For backwards compatibility, ignore a final slash:
            return i == -1 || i + 1 == aName.getLength()
                ? css::uno::makeAny(
                    css::uno::Reference< css::uno::XInterface >(
                        static_cast< cppu::OWeakObject * >(node.get())))
                : node->getByHierarchicalName(aName.copy(i + 1));
                //TODO: optimize
        }
    }
    throw css::container::NoSuchElementException(
        aName, static_cast< cppu::OWeakObject * >(this));
}

sal_Bool Access::hasByHierarchicalName(rtl::OUString const & aName)
    throw (css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP_OR_SET));
    osl::MutexGuard g(lock);
    return Components::singleton().resolvePath(getNode(), aName) != 0;
}

void Access::addContainerListener(
    css::uno::Reference< css::container::XContainerListener > const & xListener)
    throw (css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP_OR_SET));
    rBHelper.addListener(
        cppu::UnoType< css::container::XContainerListener >::get(), xListener);
}

void Access::removeContainerListener(
    css::uno::Reference< css::container::XContainerListener > const & xListener)
    throw (css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP_OR_SET));
    rBHelper.removeListener(
        cppu::UnoType< css::container::XContainerListener >::get(), xListener);
}

rtl::OUString Access::getExactName(rtl::OUString const & /*aApproximateName*/)
    throw (css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP_OR_SET));
    if(true)abort();*(char*)0=0;throw 0;//TODO
}

css::uno::Sequence< css::beans::Property > Access::getProperties()
    throw (css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP));
    if(true)abort();*(char*)0=0;throw 0;//TODO
}

css::beans::Property Access::getPropertyByName(rtl::OUString const & aName)
    throw (css::beans::UnknownPropertyException, css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP));
    osl::MutexGuard g(lock);
    rtl::Reference< Node > p(getNode()->getMember(aName));
    if (!p.is()) {
        throw css::beans::UnknownPropertyException(
            aName, static_cast< cppu::OWeakObject * >(this));
    }
    return asProperty(getRoot(), p);
}

sal_Bool Access::hasPropertyByName(rtl::OUString const & Name)
    throw (css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP));
    return hasByName(Name);
}

rtl::OUString Access::getHierarchicalName() throw (css::uno::RuntimeException) {
    OSL_ASSERT(thisIs(IS_GROUP_OR_SET));
    if(true)abort();*(char*)0=0;throw 0;//TODO
}

rtl::OUString Access::composeHierarchicalName(
    rtl::OUString const & /*aRelativeName*/)
    throw (
        css::lang::IllegalArgumentException, css::lang::NoSupportException,
        css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP_OR_SET));
    if(true)abort();*(char*)0=0;throw 0;//TODO
}

rtl::OUString Access::getName() throw (css::uno::RuntimeException) {
    OSL_ASSERT(thisIs(IS_GROUP_OR_SET));
    if(true)abort();*(char*)0=0;throw 0;//TODO
}

void Access::setName(rtl::OUString const & /*aName*/)
    throw (css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP_OR_SET));
    if(true)abort();*(char*)0=0;throw 0;//TODO
}

css::beans::Property Access::getAsProperty() throw (css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP_OR_SET_OR_LOCALIZED));
    osl::MutexGuard g(lock);
    return asProperty(getRoot(), getNode());
}

css::uno::Reference< css::uno::XInterface > Access::getParent()
    throw (css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP_OR_SET_OR_LOCALIZED|IS_CHILD));
    osl::MutexGuard g(lock);
    return static_cast< cppu::OWeakObject * >(
        dynamic_cast< ChildAccess * >(this)->getParentAccess());
}

void Access::setParent(css::uno::Reference< css::uno::XInterface > const &)
    throw (css::lang::NoSupportException, css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP_OR_SET_OR_LOCALIZED|IS_CHILD));
    throw css::lang::NoSupportException(
        rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("setParent")),
        static_cast< cppu::OWeakObject * >(this));
}

css::uno::Reference< css::beans::XPropertySetInfo > Access::getPropertySetInfo()
    throw (css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP));
    return this;
}

void Access::setPropertyValue(
    rtl::OUString const & aPropertyName, css::uno::Any const & aValue)
    throw (
        css::beans::UnknownPropertyException, css::beans::PropertyVetoException,
        css::lang::IllegalArgumentException, css::lang::WrappedTargetException,
        css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP));
    osl::MutexGuard g(lock);
    if (!getRoot()->isUpdate()) {
        throw css::uno::RuntimeException(
            rtl::OUString(
                RTL_CONSTASCII_USTRINGPARAM(
                    "configmgr insertByName on non-update access")),
            static_cast< cppu::OWeakObject * >(this));
    }
    rtl::Reference< Node > p(getNode()->getMember(aPropertyName));
    if (!p.is()) {
        throw css::beans::UnknownPropertyException(
            aPropertyName, static_cast< cppu::OWeakObject * >(this));
    }
    setProperty(p, aValue);
}

css::uno::Any Access::getPropertyValue(rtl::OUString const & PropertyName)
    throw (
        css::beans::UnknownPropertyException, css::lang::WrappedTargetException,
        css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP));
    osl::MutexGuard g(lock);
    css::uno::Any value;
    rtl::Reference< ChildAccess > node;
    switch (getChild(PropertyName, &value, &node)) {
    case CHILD_NONE:
        throw css::beans::UnknownPropertyException(
            PropertyName, static_cast< cppu::OWeakObject * >(this));
    case CHILD_VALUE:
        return value;
    case CHILD_NODE:
        return css::uno::makeAny(
            css::uno::Reference< css::uno::XInterface >(
                static_cast< cppu::OWeakObject * >(node.get())));
    }
}

void Access::addPropertyChangeListener(
    rtl::OUString const & /*aPropertyName*/, //TODO
    css::uno::Reference< css::beans::XPropertyChangeListener > const &
        xListener)
    throw (
        css::beans::UnknownPropertyException, css::lang::WrappedTargetException,
        css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP));
    rBHelper.addListener(
        cppu::UnoType< css::beans::XPropertyChangeListener >::get(), xListener);
}

void Access::removePropertyChangeListener(
    rtl::OUString const & /*aPropertyName*/, //TODO
    css::uno::Reference< css::beans::XPropertyChangeListener > const &
        aListener)
    throw (
        css::beans::UnknownPropertyException, css::lang::WrappedTargetException,
        css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP));
    rBHelper.removeListener(
        cppu::UnoType< css::beans::XPropertyChangeListener >::get(), aListener);
}

void Access::addVetoableChangeListener(
    rtl::OUString const & /*PropertyName*/, //TODO
    css::uno::Reference< css::beans::XVetoableChangeListener > const &
        aListener)
    throw (
        css::beans::UnknownPropertyException, css::lang::WrappedTargetException,
        css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP));
    rBHelper.addListener(
        cppu::UnoType< css::beans::XVetoableChangeListener >::get(), aListener);
}

void Access::removeVetoableChangeListener(
    rtl::OUString const & /*PropertyName*/, //TODO
    css::uno::Reference< css::beans::XVetoableChangeListener > const &
        aListener)
    throw (
        css::beans::UnknownPropertyException, css::lang::WrappedTargetException,
        css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP));
    rBHelper.removeListener(
        cppu::UnoType< css::beans::XVetoableChangeListener >::get(), aListener);
}

void Access::setPropertyValues(
    css::uno::Sequence< rtl::OUString > const & /*aPropertyNames*/,
    css::uno::Sequence< css::uno::Any > const & /*aValues*/)
    throw (
        css::beans::PropertyVetoException, css::lang::IllegalArgumentException,
        css::lang::WrappedTargetException, css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP));
    if(true)abort();*(char*)0=0;throw 0;//TODO
}

css::uno::Sequence< css::uno::Any > Access::getPropertyValues(
    css::uno::Sequence< rtl::OUString > const & /*aPropertyNames*/)
    throw (css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP));
    if(true)abort();*(char*)0=0;throw 0;//TODO
}

void Access::addPropertiesChangeListener(
    css::uno::Sequence< rtl::OUString > const & /*aPropertyNames*/, //TODO
    css::uno::Reference< css::beans::XPropertiesChangeListener > const &
        xListener)
    throw (css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP));
    rBHelper.addListener(
        cppu::UnoType< css::beans::XPropertiesChangeListener >::get(),
        xListener);
}

void Access::removePropertiesChangeListener(
    css::uno::Reference< css::beans::XPropertiesChangeListener > const &
        xListener)
    throw (css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP));
    rBHelper.removeListener(
        cppu::UnoType< css::beans::XPropertiesChangeListener >::get(),
        xListener);
}

void Access::firePropertiesChangeEvent(
    css::uno::Sequence< rtl::OUString > const & /*aPropertyNames*/,
    css::uno::Reference< css::beans::XPropertiesChangeListener > const &
        /*xListener*/)
    throw (css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP));
    if(true)abort();*(char*)0=0;throw 0;//TODO
}

css::uno::Reference< css::beans::XHierarchicalPropertySetInfo >
Access::getHierarchicalPropertySetInfo() throw (css::uno::RuntimeException) {
    OSL_ASSERT(thisIs(IS_GROUP));
    if(true)abort();*(char*)0=0;throw 0;//TODO
}

void Access::setHierarchicalPropertyValue(
    rtl::OUString const & aHierarchicalPropertyName,
    css::uno::Any const & aValue)
    throw (
        css::beans::UnknownPropertyException, css::beans::PropertyVetoException,
        css::lang::IllegalArgumentException, css::lang::WrappedTargetException,
        css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP));
    osl::MutexGuard g(lock);
    if (!getRoot()->isUpdate()) {
        throw css::uno::RuntimeException(
            rtl::OUString(
                RTL_CONSTASCII_USTRINGPARAM(
                    "configmgr insertByName on non-update access")),
            static_cast< cppu::OWeakObject * >(this));
    }
    rtl::Reference< Node > p(
        Components::singleton().resolvePath(
            getNode(), aHierarchicalPropertyName));
    if (!p.is()) {
        throw css::beans::UnknownPropertyException(
            aHierarchicalPropertyName,
            static_cast< cppu::OWeakObject * >(this));
    }
    setProperty(p, aValue);
}

css::uno::Any Access::getHierarchicalPropertyValue(
    rtl::OUString const & /*aHierarchicalPropertyName*/)
    throw (
        css::beans::UnknownPropertyException,
        css::lang::IllegalArgumentException, css::lang::WrappedTargetException,
        css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP));
    if(true)abort();*(char*)0=0;throw 0;//TODO
}

void Access::setHierarchicalPropertyValues(
    css::uno::Sequence< rtl::OUString > const & /*aHierarchicalPropertyNames*/,
    css::uno::Sequence< css::uno::Any > const & /*Values*/)
    throw (
        css::beans::PropertyVetoException, css::lang::IllegalArgumentException,
        css::lang::WrappedTargetException, css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP));
    if(true)abort();*(char*)0=0;throw 0;//TODO
}

css::uno::Sequence< css::uno::Any > Access::getHierarchicalPropertyValues(
    css::uno::Sequence< rtl::OUString > const & /*aHierarchicalPropertyNames*/)
    throw (
        css::lang::IllegalArgumentException, css::lang::WrappedTargetException,
        css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP));
    if(true)abort();*(char*)0=0;throw 0;//TODO
}

void Access::addChangesListener(
    css::uno::Reference< css::util::XChangesListener > const & aListener)
    throw (css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP_OR_SET|IS_ROOT));
    rBHelper.addListener(
        cppu::UnoType< css::util::XChangesListener >::get(), aListener);
}

void Access::removeChangesListener(
    css::uno::Reference< css::util::XChangesListener > const & aListener)
    throw (css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP_OR_SET|IS_ROOT));
    rBHelper.removeListener(
        cppu::UnoType< css::util::XChangesListener >::get(), aListener);
}

void Access::replaceByName(
    rtl::OUString const & aName, css::uno::Any const & aElement)
    throw (
        css::lang::IllegalArgumentException,
        css::container::NoSuchElementException,
        css::lang::WrappedTargetException, css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP_OR_SET|IS_UPDATE));
    osl::MutexGuard g(lock);
    rtl::Reference< Node > p(getNode());
    if (dynamic_cast< GroupNode * >(p.get()) != 0) {
        try {
            setPropertyValue(aName, aElement);
        } catch (css::beans::UnknownPropertyException & e) {
            throw css::container::NoSuchElementException(e.Message, e.Context);
        } catch (css::beans::PropertyVetoException & e) {
            css::uno::Any ex(cppu::getCaughtException());
            throw css::lang::WrappedTargetException(e.Message, e.Context, ex);
        }
    } else if (dynamic_cast< SetNode * >(p.get()) != 0) {
        if(true)abort();*(char*)0=0;throw 0;//TODO
    } else {
        OSL_ASSERT(false);
        throw css::uno::RuntimeException(
            rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("this cannot happen")),
            static_cast< cppu::OWeakObject * >(this));
    }
}

void Access::insertByName(
    rtl::OUString const & aName, css::uno::Any const & aElement)
    throw (
        css::lang::IllegalArgumentException,
        css::container::ElementExistException,
        css::lang::WrappedTargetException, css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_EXTGROUP_OR_SET|IS_UPDATE));
    osl::MutexGuard g(lock);
    rtl::Reference< Node > p(getNode());
    if (GroupNode * group = dynamic_cast< GroupNode * >(p.get())) {
        if (group->getMember(aName).is()) {
            throw css::container::ElementExistException(
                aName, static_cast< cppu::OWeakObject * >(this));
        }
        Type type = mapType(aElement.getValueType());
        if (type == TYPE_NONE) {
            throw css::lang::IllegalArgumentException(
                rtl::OUString(
                    RTL_CONSTASCII_USTRINGPARAM(
                        "configmgr insertByName inappropriate group element")),
                static_cast< cppu::OWeakObject * >(this), 1);
        }
        group->getMembers().insert(
            NodeMap::value_type(
                aName,
                new PropertyNode(group, aName, type, true, aElement, true)));
        //TODO notify change
    } else if (SetNode * set = dynamic_cast< SetNode * >(p.get())) {
        if (set->getMember(aName).is()) {
            throw css::container::ElementExistException(
                aName, static_cast< cppu::OWeakObject * >(this));
        }
        rtl::Reference< ChildAccess > freeAcc;
        css::uno::Reference< css::lang::XUnoTunnel > tunnel;
        aElement >>= tunnel;
        if (tunnel.is()) {
            freeAcc.set(
                reinterpret_cast< ChildAccess * >(
                    tunnel->getSomething(ChildAccess::getTunnelId())));
        }
        rtl::OUString tmplName;
        if (freeAcc.is()) {
            if (GroupNode * p = dynamic_cast< GroupNode * >(
                    freeAcc->getNode().get()))
            {
                tmplName = p->getTemplateName();
            } else if (SetNode * p = dynamic_cast< SetNode * >(
                           freeAcc->getNode().get()))
            {
                tmplName = p->getTemplateName();
            }
        }
        if (!set->isValidTemplate(tmplName)) {
            throw css::lang::IllegalArgumentException(
                rtl::OUString(
                    RTL_CONSTASCII_USTRINGPARAM(
                        "configmgr insertByName inappropriate set element")),
                static_cast< cppu::OWeakObject * >(this), 1);
        }
        rtl::Reference< RootAccess > root(getRoot());
        set->getMembers().insert(
            NodeMap::value_type(aName, freeAcc->getNode()));
        freeAcc->bind(root.get(), this); // must not throw
        //TODO notify change
    } else {
        OSL_ASSERT(false);
        throw css::uno::RuntimeException(
            rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("this cannot happen")),
            static_cast< cppu::OWeakObject * >(this));
    }
}

void Access::removeByName(rtl::OUString const & aName)
    throw (
        css::container::NoSuchElementException,
        css::lang::WrappedTargetException, css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_EXTGROUP_OR_SET|IS_UPDATE));
    osl::MutexGuard g(lock);
    rtl::Reference< Node > p(getNode());
    if (GroupNode * group = dynamic_cast< GroupNode * >(p.get())) {
        NodeMap::iterator i(group->getMembers().find(aName));
        if (i == group->getMembers().end()) {
            throw css::container::NoSuchElementException(
                aName, static_cast< cppu::OWeakObject * >(this));
        }
        rtl::Reference< PropertyNode > prop(
            dynamic_cast< PropertyNode * >(i->second.get()));
        if (!(prop.is() && prop->isExtension())) {
            throw css::container::NoSuchElementException(
                aName, static_cast< cppu::OWeakObject * >(this));
        }
        group->getMembers().erase(i);
        prop->unbind(); // must not throw
        //TODO notify change
    } else if (SetNode * set = dynamic_cast< SetNode * >(p.get())) {
        NodeMap::iterator i(set->getMembers().find(aName));
        if (i == group->getMembers().end()) {
            throw css::container::NoSuchElementException(
                aName, static_cast< cppu::OWeakObject * >(this));
        }
        ChildMap::iterator j(children_.find(aName));
        rtl::Reference< ChildAccess > oldChild;
        ChildMap newChildren;
        if (j != children_.end()) {
            oldChild = j->second;
            newChildren = children_;
            newChildren.erase(aName);
        }
        rtl::Reference< Node > removed(i->second);
        set->getMembers().erase(i);
        removed->unbind(); // this and following must not throw
        if (oldChild.is()) {
            children_.swap(newChildren);
            oldChild->unbind();
        }
        //TODO notify change
    } else {
        OSL_ASSERT(false);
        throw css::uno::RuntimeException(
            rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("this cannot happen")),
            static_cast< cppu::OWeakObject * >(this));
    }
}

css::uno::Reference< css::uno::XInterface > Access::createInstance()
    throw (css::uno::Exception, css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_SET|IS_UPDATE));
    osl::MutexGuard g(lock);
    rtl::OUString tmplName(
        dynamic_cast< SetNode * >(getNode().get())->getDefaultTemplateName());
    rtl::Reference< Node > p(Components::singleton().getTemplate(tmplName));
    if (!p.is()) {
        throw css::uno::Exception(
            (rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("unknown template ")) +
             tmplName),
            static_cast< cppu::OWeakObject * >(this));
    }
    return static_cast< cppu::OWeakObject * >(
        new ChildAccess(getRoot(), p->clone(0, rtl::OUString())));
}

css::uno::Reference< css::uno::XInterface > Access::createInstanceWithArguments(
    css::uno::Sequence< css::uno::Any > const & aArguments)
    throw (css::uno::Exception, css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_SET|IS_UPDATE));
    if (aArguments.getLength() != 0) {
        throw css::uno::Exception(
            rtl::OUString(
                RTL_CONSTASCII_USTRINGPARAM(
                    "configuration SimpleSetUpdate createInstanceWithArguments"
                    " must not specify any arguments")),
            static_cast< cppu::OWeakObject * >(this));
    }
    return createInstance();
}

void Access::commitChanges()
    throw (css::lang::WrappedTargetException, css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP_OR_SET|IS_ROOT|IS_UPDATE));
    //TODO
}

sal_Bool Access::hasPendingChanges() throw (css::uno::RuntimeException) {
    OSL_ASSERT(thisIs(IS_GROUP_OR_SET|IS_ROOT|IS_UPDATE));
    return false;//TODO
}

css::util::ChangesSet Access::getPendingChanges()
    throw (css::uno::RuntimeException)
{
    OSL_ASSERT(thisIs(IS_GROUP_OR_SET|IS_ROOT|IS_UPDATE));
    if(true)abort();*(char*)0=0;throw 0;//TODO
}

Access::ChildStatus Access::getChild(
    rtl::OUString const & name, css::uno::Any * value,
    rtl::Reference< ChildAccess > * node)
{
    OSL_ASSERT(value != 0 && node != 0);
    ChildMap::iterator i(children_.find(name));
    if (i != children_.end()) {
        *node = i->second;
        return CHILD_NODE;
    }
    rtl::Reference< Node > p(getNode());
    if (LocalizedPropertyNode * locprop =
        dynamic_cast< LocalizedPropertyNode * >(p.get()))
    {
        LocalizedValues::iterator j(locprop->getValues().find(name));
        if (j == locprop->getValues().end()) {
            return CHILD_NONE;
        }
        *value = j->second;
        return CHILD_VALUE;
    }
    p = p->getMember(name);
    if (p == 0) {
        return CHILD_NONE;
    }
    if (PropertyNode * prop = dynamic_cast< PropertyNode * >(p.get())) {
        *value = prop->getValue();
        return CHILD_VALUE;
    }
    rtl::Reference< ChildAccess > child;
    if (LocalizedPropertyNode * locprop =
        dynamic_cast< LocalizedPropertyNode * >(p.get()))
    {
        rtl::OUString loc(getRoot()->getLocale());
        if (!allLocales(loc)) {
            *value = locprop->getValue(loc);
            return CHILD_VALUE;
        }
        child = new ChildAccess(getRoot().get(), this, locprop);
    } else if (GroupNode * group = dynamic_cast< GroupNode * >(p.get())) {
        child = new ChildAccess(getRoot().get(), this, group);
    } else if (SetNode * set = dynamic_cast< SetNode * >(p.get())) {
        child = new ChildAccess(getRoot().get(), this, set);
    } else {
        OSL_ASSERT(false);
        throw css::uno::RuntimeException(
            rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("this cannot happen")),
            static_cast< cppu::OWeakObject * >(this));
    }
    children_.insert(ChildMap::value_type(name, child));
    *node = child;
    return CHILD_NODE;
}

void Access::setProperty(
    rtl::Reference< Node > const & node, css::uno::Any const & value)
{
    OSL_ASSERT(node.is());
    if (PropertyNode * prop = dynamic_cast< PropertyNode * >(node.get())) {
        Type type = mapType(value.getValueType());
        if (value.hasValue()
            ? (type == TYPE_NONE ||
               (prop->getType() != TYPE_ANY && type != prop->getType()))
            : !prop->isNillable())
        {
            throw css::lang::IllegalArgumentException(
                rtl::OUString(
                    RTL_CONSTASCII_USTRINGPARAM(
                        "configmgr setPropertyValue inappropriate prop value")),
                static_cast< cppu::OWeakObject * >(this), 1);
        }
        prop->setValue(value);
        //TODO notify change
        return;
    }
    if (LocalizedPropertyNode * locprop =
        dynamic_cast< LocalizedPropertyNode * >(node.get()))
    {
        rtl::OUString loc(getRoot()->getLocale());
        if (!allLocales(loc)) {
            Type type = mapType(value.getValueType());
            if (value.hasValue()
                ? (type == TYPE_NONE ||
                   (locprop->getType() != TYPE_ANY &&
                    type != locprop->getType()))
                : !locprop->isNillable())
            {
                throw css::lang::IllegalArgumentException(
                    rtl::OUString(
                        RTL_CONSTASCII_USTRINGPARAM(
                            "configmgr setPropertyValue inappropriate prop"
                            " value")),
                    static_cast< cppu::OWeakObject * >(this), 1);
            }
            locprop->getValues()[loc] = value;
            //TODO notify change
            return;
        }
    }
    throw css::lang::IllegalArgumentException(
        rtl::OUString(
            RTL_CONSTASCII_USTRINGPARAM(
                "configmgr setPropertyValue naming an inappropriate member")),
        static_cast< cppu::OWeakObject * >(this), 0);
}

#if OSL_DEBUG_LEVEL > 0
bool Access::thisIs(int what) {
    osl::MutexGuard g(lock);
    rtl::Reference< Node > p(getNode());
    return ((what & IS_GROUP) == 0 ||
            dynamic_cast< GroupNode * >(p.get()) != 0) &&
        ((what & IS_SET) == 0 || dynamic_cast< SetNode * >(p.get()) != 0) &&
        ((what & IS_GROUP_OR_SET) == 0 ||
         dynamic_cast< GroupNode * >(p.get()) != 0 ||
         dynamic_cast< SetNode * >(p.get()) != 0) &&
        ((what & IS_EXTGROUP_OR_SET) == 0 ||
         (dynamic_cast< GroupNode * >(p.get()) != 0 &&
          dynamic_cast< GroupNode * >(p.get())->isExtensible()) ||
         dynamic_cast< SetNode * >(p.get()) != 0) &&
        ((what & IS_GROUP_OR_SET_OR_LOCALIZED) == 0 ||
         dynamic_cast< GroupNode * >(p.get()) != 0 ||
         dynamic_cast< SetNode * >(p.get()) != 0 ||
         (dynamic_cast< LocalizedPropertyNode * >(p.get()) != 0 &&
          allLocales(getRoot()->getLocale()))) ||
        ((what & IS_ROOT) == 0 || dynamic_cast< RootAccess * >(p.get()) != 0) ||
        ((what & IS_CHILD) == 0 ||
         dynamic_cast< ChildAccess * >(p.get()) != 0) ||
        ((what & IS_GROUP_MEMBER) == 0 ||
         dynamic_cast< GroupNode * >(p->getParent()) != 0) ||
        ((what & IS_SET_MEMBER) == 0 ||
         dynamic_cast< SetNode * >(p->getParent()) != 0) ||
         ((what & IS_UPDATE) == 0 || getRoot()->isUpdate());
}
#endif

}