value_policies.hpp

新版本TR1的stl

/* /////////////////////////////////////////////////////////////////////////
 * File:        comstl/util/value_policies.hpp (originally MOEnSeq.h, ::SynesisCom)
 *
 * Purpose:     Value policies that work with STL sequence types for IEnumXXXX
 *              enumerator interfaces.
 *
 * Created:     17th September 1998
 * Updated:     12th March 2007
 *
 * Home:        http://stlsoft.org/
 *
 * Copyright (c) 1998-2007, Matthew Wilson and Synesis Software
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are met:
 *
 * - Redistributions of source code must retain the above copyright notice, this
 *   list of conditions and the following disclaimer.
 * - Redistributions in binary form must reproduce the above copyright notice,
 *   this list of conditions and the following disclaimer in the documentation
 *   and/or other materials provided with the distribution.
 * - Neither the name(s) of Matthew Wilson and Synesis Software nor the names of
 *   any contributors may be used to endorse or promote products derived from
 *   this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 *
 * ////////////////////////////////////////////////////////////////////// */


/** \file comstl/util/value_policies.hpp
 *
 * \brief [C++ only; requires COM] Value policies for various COM types
 *   (\ref group__library__utility__com "COM Utility" Library).
 */

#ifndef COMSTL_INCL_COMSTL_UTIL_HPP_VALUE_POLICIES
#define COMSTL_INCL_COMSTL_UTIL_HPP_VALUE_POLICIES

#ifndef STLSOFT_DOCUMENTATION_SKIP_SECTION
# define COMSTL_VER_COMSTL_UTIL_HPP_VALUE_POLICIES_MAJOR    5
# define COMSTL_VER_COMSTL_UTIL_HPP_VALUE_POLICIES_MINOR    1
# define COMSTL_VER_COMSTL_UTIL_HPP_VALUE_POLICIES_REVISION 1
# define COMSTL_VER_COMSTL_UTIL_HPP_VALUE_POLICIES_EDIT     161
#endif /* !STLSOFT_DOCUMENTATION_SKIP_SECTION */

/* /////////////////////////////////////////////////////////////////////////
 * Includes
 */

#ifndef COMSTL_INCL_COMSTL_H_COMSTL
# include <comstl/comstl.h>
#endif /* !COMSTL_INCL_COMSTL_H_COMSTL */
#ifndef COMSTL_INCL_COMSTL_STRING_H_OLESTRING_FUNCTIONS
# include <comstl/string/olestring_functions.h>   // for olestring_dup(), etc.
#endif /* !COMSTL_INCL_COMSTL_STRING_H_OLESTRING_FUNCTIONS */
#ifndef STLSOFT_INCL_STLSOFT_CONVERSION_HPP_SAP_CAST
# include <stlsoft/conversion/sap_cast.hpp>
#endif /* !STLSOFT_INCL_STLSOFT_CONVERSION_HPP_SAP_CAST */

#ifdef STLSOFT_CF_EXCEPTION_SUPPORT
# ifndef COMSTL_INCL_COMSTL_ERROR_HPP_EXCEPTIONS
#  include <comstl/error/exceptions.hpp>
# endif /* !COMSTL_INCL_COMSTL_ERROR_HPP_EXCEPTIONS */
#endif /* STLSOFT_CF_EXCEPTION_SUPPORT */

/* /////////////////////////////////////////////////////////////////////////
 * Namespace
 */

#ifndef _COMSTL_NO_NAMESPACE
# if defined(_STLSOFT_NO_NAMESPACE) || \
     defined(STLSOFT_DOCUMENTATION_SKIP_SECTION)
/* There is no stlsoft namespace, so must define ::comstl */
namespace comstl
{
# else
/* Define stlsoft::comstl_project */

namespace stlsoft
{

namespace comstl_project
{

# endif /* _STLSOFT_NO_NAMESPACE */
#endif /* !_COMSTL_NO_NAMESPACE */

/* /////////////////////////////////////////////////////////////////////////
 * Classes
 */

/** \brief Value policy for GUID
 *
 * \ingroup group__library__utility__com
 */
struct GUID_policy
{
public:
    typedef GUID        value_type;

public:
    /// Initialises an instance
    static void init(value_type *) stlsoft_throw_0()
    {}
    /// Initialises an instance from another
    static void copy(value_type *dest, value_type const* src)
    {
        *dest = *src;
    }
    /// Releases an instance
    static void clear(value_type *) stlsoft_throw_0()
    {}
};


/** \brief Value policy for BSTR
 *
 * \ingroup group__library__utility__com
 */
struct BSTR_policy
{
public:
    typedef BSTR    value_type;

public:
    /// Initialises an instance
    static void init(value_type *p) stlsoft_throw_0()
    {
        *p = NULL;
    }
    /// Initialises an instance from another
    static void copy(value_type *dest, value_type const* src)
    {
        *dest = ::SysAllocString(*src);

#ifdef STLSOFT_CF_EXCEPTION_SUPPORT
        if( NULL == *dest &&
            NULL != *src &&
            L'\0' != (*src)[0])
        {
            throw com_exception("failed to copy BSTR", E_OUTOFMEMORY);
        }
#endif /* STLSOFT_CF_EXCEPTION_SUPPORT */
    }
    /// Releases an instance
    static void clear(value_type *p) stlsoft_throw_0()
    {
        ::SysFreeString(*p);
    }
};


/** \brief Value policy for LPOLESTR
 *
 * \ingroup group__library__utility__com
 */
struct LPOLESTR_policy
{
public:
    typedef LPOLESTR    value_type;

public:
    /// Initialises an instance
    static void init(value_type *p) stlsoft_throw_0()
    {
        *p = NULL;
    }
    /// Initialises an instance from another
    static void copy(value_type *dest, value_type const* src)
    {
        *dest = olestring_dup(*src);

#ifdef STLSOFT_CF_EXCEPTION_SUPPORT
        if( NULL == *dest &&
            NULL != *src)
        {
            throw com_exception("failed to copy OLE string", E_OUTOFMEMORY);
        }
#endif /* STLSOFT_CF_EXCEPTION_SUPPORT */
    }
    /// Releases an instance
    static void clear(value_type *p) stlsoft_throw_0()
    {
        olestring_destroy(*p);
    }
};


/** \brief Value policy for VARIANT
 *
 * \ingroup group__library__utility__com
 */
struct VARIANT_policy
{
public:
    typedef VARIANT value_type;

public:
    /// Initialises an instance
    static void init(value_type *p) stlsoft_throw_0()
    {
        ::VariantInit(p);
    }
    /// Initialises an instance from another
    static void copy(value_type *dest, value_type const* src)
    {
        HRESULT hr = ::VariantCopy(dest, const_cast<VARIANT*>(src));

        if(FAILED(hr))
        {
#ifdef STLSOFT_CF_EXCEPTION_SUPPORT
            throw com_exception("failed to copy VARIANT", hr);
#endif /* STLSOFT_CF_EXCEPTION_SUPPORT */
        }
    }
    /// Releases an instance
    static void clear(value_type *p) stlsoft_throw_0()
    {
        ::VariantClear(p);
    }
};


/** \brief Value policy for interface
 *
 * \ingroup group__library__utility__com
 *
 * \param I The interface
 */
template <ss_typename_param_k I>
struct interface_policy
{
public:
    typedef I               interface_type;
    typedef interface_type  *value_type;

public:
    /// Initialises an instance
    static void init(value_type *p) stlsoft_throw_0()
    {
        *p = NULL;
    }
    /// Initialises an instance from another
    static void copy(value_type *dest, value_type const* src)
    {
        *dest = *src;
        if(NULL != *dest)
        {
            (*dest)->AddRef();
        }
    }
    /// Releases an instance
    static void clear(value_type *p) stlsoft_throw_0()
    {
        if(NULL != *p)
        {
            (*p)->Release();
            *p = NULL;
        }
    }
};


/** \brief Value policy for LPUNKNOWN
 *
 * \ingroup group__library__utility__com
 */
struct LPUNKNOWN_policy
{
public:
    typedef LPUNKNOWN   value_type;

public:
    /// Initialises an instance
    static void init(value_type *p) stlsoft_throw_0()
    {
        *p = NULL;
    }
    /// Initialises an instance from another
    static void copy(value_type *dest, value_type const* src)
    {
        *dest = *src;
        if(NULL != *dest)
        {
            (*dest)->AddRef();
        }
    }
    /// Releases an instance
    static void clear(value_type *p) stlsoft_throw_0()
    {
        if(NULL != *p)
        {
            (*p)->Release();
            *p = NULL;
        }
    }
};


/** \brief Value policy for STATSTG
 *
 * \ingroup group__library__utility__com
 */
struct STATSTG_policy
{
public:
    typedef STATSTG value_type;

public:
    /// Initialises an instance
    static void init(value_type *p) stlsoft_throw_0()
    {
        p->pwcsName = NULL;
    }
    /// Initialises an instance from another
    static void copy(value_type *dest, value_type const* src)
    {
        *dest = *src;
        if(NULL != src->pwcsName)
        {
            dest->pwcsName = olestring_dup(src->pwcsName);

#ifdef STLSOFT_CF_EXCEPTION_SUPPORT
            if(NULL == dest->pwcsName)
            {
                throw com_exception("failed to copy OLE string when copying STATSTG", E_OUTOFMEMORY);
            }
#endif /* STLSOFT_CF_EXCEPTION_SUPPORT */
        };
    }
    /// Releases an instance
    static void clear(value_type *p) stlsoft_throw_0()
    {
        olestring_destroy(p->pwcsName);
    }
};


/** \brief Value policy for FORMATETC
 *
 * \ingroup group__library__utility__com
 */
struct FORMATETC_policy
{
public:
    typedef FORMATETC   value_type;

public:
    /// Initialises an instance
    static void init(value_type *p) stlsoft_throw_0()
    {
        p->ptd  =   NULL;
    }
    /// Initialises an instance from another
    static void copy(value_type *dest, value_type const* src)
    {
        *dest = *src;
        if(NULL != dest->ptd)
        {
            dest->ptd = static_cast<DVTARGETDEVICE*>(::CoTaskMemAlloc(src->ptd->tdSize));

            if(NULL == dest->ptd)
            {
#ifdef STLSOFT_CF_EXCEPTION_SUPPORT
                throw com_exception("failed to copy DVTARGETDEVICE when copying FORMATETC", E_OUTOFMEMORY);
#endif /* STLSOFT_CF_EXCEPTION_SUPPORT */
            }
            else
            {
                BYTE const  *src_begin  =   stlsoft_ns_qual(sap_cast)<BYTE const*>(&src->ptd);
                BYTE const  *src_end    =   src_begin + src->ptd->tdSize;
                BYTE        *dest_begin =   stlsoft_ns_qual(sap_cast)<BYTE*>(&dest->ptd);

                for(; src_begin != src_end; ++src_begin, ++dest_begin)
                {
                    *dest_begin = *src_begin;
                }
            }
        }
    }
    /// Releases an instance
    static void clear(value_type *p) stlsoft_throw_0()
    {
        ::CoTaskMemFree(p->ptd);
    }
};

/* ////////////////////////////////////////////////////////////////////// */

#ifndef _COMSTL_NO_NAMESPACE
# if defined(_STLSOFT_NO_NAMESPACE) || \
     defined(STLSOFT_DOCUMENTATION_SKIP_SECTION)
} // namespace comstl
# else
} // namespace stlsoft::comstl_project
} // namespace stlsoft
# endif /* _STLSOFT_NO_NAMESPACE */
#endif /* !_COMSTL_NO_NAMESPACE */

/* ////////////////////////////////////////////////////////////////////// */

#endif /* !COMSTL_INCL_COMSTL_UTIL_HPP_VALUE_POLICIES */

/* ////////////////////////////////////////////////////////////////////// */