/**************************************************************
 *
 * Licensed to the Apache Software Foundation (ASF) under one
 * or more contributor license agreements.  See the NOTICE file
 * distributed with this work for additional information
 * regarding copyright ownership.  The ASF licenses this file
 * to you under the Apache License, Version 2.0 (the
 * "License"); you may not use this file except in compliance
 * with the License.  You may obtain a copy of the License at
 *
 *   http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing,
 * software distributed under the License is distributed on an
 * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
 * KIND, either express or implied.  See the License for the
 * specific language governing permissions and limitations
 * under the License.
 *
 *************************************************************/



#if ! defined INCLUDED_CLI_BASE_H
#define INCLUDED_CLI_BASE_H

#pragma unmanaged
// Workaround: osl/mutex.h contains only a forward declaration of _oslMutexImpls.
// When using the inline class in Mutex in osl/mutex.hxx, the loader needs to find
// a declaration for the struct. If not found a TypeLoadException is being thrown.
struct _oslMutexImpl
{
};
#pragma managed
#include <memory>
#include "rtl/ustring.hxx"
#include "typelib/typedescription.hxx"

#using <mscorlib.dll>
#using <system.dll>

#define OUSTR(x) ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM(x) )

namespace cli_uno
{
System::Type ^ loadCliType(System::String ^ typeName);
System::Type ^ mapUnoType(typelib_TypeDescription const * pTD);
System::Type ^ mapUnoType(typelib_TypeDescriptionReference const * pTD);
typelib_TypeDescriptionReference* mapCliType(System::Type ^ cliType);
rtl::OUString mapCliString(System::String ^ data);
System::String ^ mapUnoString(rtl_uString const * data);
System::String ^ mapUnoTypeName(rtl_uString const * typeName);

ref struct Constants
{
    static const System::String ^ sXInterfaceName= gcnew System::String(
        "unoidl.com.sun.star.uno.XInterface");
    static const System::String ^ sObject= gcnew System::String("System.Object");
    static const System::String ^ sType= gcnew System::String("System.Type");
    static const System::String ^ sUnoidl= gcnew System::String("unoidl.");
    static const System::String ^ sVoid= gcnew System::String("System.Void");
    static const System::String ^ sAny= gcnew System::String("uno.Any");
    static const System::String ^ sArArray= gcnew System::String("System.Array[]");
    static const System::String ^ sBoolean= gcnew System::String("System.Boolean");
    static const System::String ^ sChar= gcnew System::String("System.Char");
    static const System::String ^ sByte= gcnew System::String("System.Byte");
    static const System::String ^ sInt16= gcnew System::String("System.Int16");
    static const System::String ^ sUInt16= gcnew System::String("System.UInt16");
    static const System::String ^ sInt32= gcnew System::String("System.Int32");
    static const System::String ^ sUInt32= gcnew System::String("System.UInt32");
    static const System::String ^ sInt64= gcnew System::String("System.Int64");
    static const System::String ^ sUInt64= gcnew System::String("System.UInt64");
    static const System::String ^ sString= gcnew System::String("System.String");
    static const System::String ^ sSingle= gcnew System::String("System.Single");
    static const System::String ^ sDouble= gcnew System::String("System.Double");
    static const System::String ^ sArBoolean= gcnew System::String("System.Boolean[]");
    static const System::String ^ sArChar= gcnew System::String("System.Char[]");
    static const System::String ^ sArByte= gcnew System::String("System.Byte[]");
    static const System::String ^ sArInt16= gcnew System::String("System.Int16[]");
    static const System::String ^ sArUInt16= gcnew System::String("System.UInt16[]");
    static const System::String ^ sArInt32= gcnew System::String("System.Int32[]");
    static const System::String ^ sArUInt32= gcnew System::String("System.UInt32[]");
    static const System::String ^ sArInt64= gcnew System::String("System.Int64[]");
    static const System::String ^ sArUInt64= gcnew System::String("System.UInt64[]");
    static const System::String ^ sArString= gcnew System::String("System.String[]");
    static const System::String ^ sArSingle= gcnew System::String("System.Single[]");
    static const System::String ^ sArDouble= gcnew System::String("System.Double[]");
    static const System::String ^ sArType= gcnew System::String("System.Type[]");
    static const System::String ^ sArObject= gcnew System::String("System.Object[]");
    static const System::String ^ sBrackets= gcnew System::String("[]");
    static const System::String ^ sAttributeSet= gcnew System::String("set_");
    static const System::String ^ sAttributeGet= gcnew System::String("get_");

	static const System::String ^ usXInterface = "com.sun.star.uno.XInterface";
	static const System::String ^ usVoid = "void";
	static const System::String ^ usType = "type";
	static const System::String ^ usAny = "any";
	static const System::String ^ usBrackets = "[]";
	static const System::String ^ usBool = "boolean";
	static const System::String ^ usByte = "byte";
	static const System::String ^ usChar = "char";
	static const System::String ^ usShort = "short";
	static const System::String ^ usUShort = "unsigned short";
	static const System::String ^ usLong = "long";
	static const System::String ^ usULong = "unsigned long";
	static const System::String ^ usHyper = "hyper";
	static const System::String ^ usUHyper = "unsigned hyper";
	static const System::String ^ usString = "string";
	static const System::String ^ usFloat = "float";
	static const System::String ^ usDouble = "double";
};

struct BridgeRuntimeError
{
    ::rtl::OUString m_message;

    inline BridgeRuntimeError( ::rtl::OUString const & message )
        : m_message( message )
        {}
};

//==================================================================================================
struct rtl_mem
{
	inline static void * operator new ( size_t nSize )
		{ return rtl_allocateMemory( nSize ); }
	inline static void operator delete ( void * mem )
		{ if (mem) rtl_freeMemory( mem ); }
	inline static void * operator new ( size_t, void * mem )
		{ return mem; }
	inline static void operator delete ( void *, void * )
		{}

    static inline ::std::auto_ptr< rtl_mem > allocate( ::std::size_t bytes );
};
//--------------------------------------------------------------------------------------------------
inline ::std::auto_ptr< rtl_mem > rtl_mem::allocate( ::std::size_t bytes )
{
    void * p = rtl_allocateMemory( bytes );
    if (0 == p)
        throw BridgeRuntimeError(OUSTR("out of memory!") );
    return ::std::auto_ptr< rtl_mem >( (rtl_mem *)p );
}

//==================================================================================================
class TypeDescr
{
    typelib_TypeDescription * m_td;

    TypeDescr( TypeDescr & ); // not impl
    void operator = ( TypeDescr ); // not impl

public:
    inline explicit TypeDescr( typelib_TypeDescriptionReference * td_ref );
    inline ~TypeDescr() SAL_THROW( () )
        { TYPELIB_DANGER_RELEASE( m_td ); }

    inline typelib_TypeDescription * get() const
        { return m_td; }
};

inline TypeDescr::TypeDescr( typelib_TypeDescriptionReference * td_ref )
    : m_td( 0 )
{
    TYPELIB_DANGER_GET( &m_td, td_ref );
    if (0 == m_td)
    {
        throw BridgeRuntimeError(
            OUSTR("cannot get comprehensive type description for ") +
            *reinterpret_cast< ::rtl::OUString const * >( &td_ref->pTypeName ) );
    }
}


} //end namespace cli_uno
 #endif