/*

 *  Copyright (C) 2005, 2006, 2007, 2008 Apple Inc. All rights reserved.

 *  Copyright (C) 2007-2009 Torch Mobile, Inc. All rights reserved

 *

 *  This library is free software; you can redistribute it and/or

 *  modify it under the terms of the GNU Library General Public

 *  License as published by the Free Software Foundation; either

 *  version 2 of the License, or (at your option) any later version.

 *

 *  This library 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

 *  Library General Public License for more details.

 *

 *  You should have received a copy of the GNU Library General Public License

 *  along with this library; see the file COPYING.LIB.  If not, write to

 *  the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,

 *  Boston, MA 02110-1301, USA.

 *

 */

#ifndef FastMallocWince_h

#define FastMallocWince_h

#include <new.h>

#ifdef __cplusplus

#include <new>

#include "MemoryManager.h"

extern "C" {

#endif

void* fastMalloc(size_t n);

void* fastCalloc(size_t n_elements, size_t element_size);

void fastFree(void* p);

void* fastRealloc(void* p, size_t n);

void* fastZeroedMalloc(size_t n);

// These functions return 0 if an allocation fails.

void* tryFastMalloc(size_t n);

void* tryFastZeroedMalloc(size_t n);

void* tryFastCalloc(size_t n_elements, size_t element_size);

void* tryFastRealloc(void* p, size_t n);

char* fastStrDup(const char*);

#ifndef NDEBUG

void fastMallocForbid();

void fastMallocAllow();

#endif

#if !defined(USE_SYSTEM_MALLOC) || !USE_SYSTEM_MALLOC

#define malloc(n)                           fastMalloc(n)

#define calloc(n_elements, element_size)    fastCalloc(n_elements, element_size)

#define realloc(p, n)                       fastRealloc(p, n)

#define free(p)                             fastFree(p)

#define strdup(p)                           fastStrDup(p)

#else

#define strdup(p)                           _strdup(p)

#endif

#ifdef __cplusplus

}

#endif

#ifdef __cplusplus

#if !defined(USE_SYSTEM_MALLOC) || !USE_SYSTEM_MALLOC

static inline void* __cdecl operator new(size_t s) { return fastMalloc(s); }

static inline void __cdecl operator delete(void* p) { fastFree(p); }

static inline void* __cdecl operator new[](size_t s) { return fastMalloc(s); }

static inline void __cdecl operator delete[](void* p) { fastFree(p); }

static inline void* operator new(size_t s, const std::nothrow_t&) throw() { return fastMalloc(s); }

static inline void operator delete(void* p, const std::nothrow_t&) throw() { fastFree(p); }

static inline void* operator new[](size_t s, const std::nothrow_t&) throw() { return fastMalloc(s); }

static inline void operator delete[](void* p, const std::nothrow_t&) throw() { fastFree(p); }

#endif

namespace WTF {

    // This defines a type which holds an unsigned integer and is the same

    // size as the minimally aligned memory allocation.

    typedef unsigned long long AllocAlignmentInteger;

    namespace Internal {

        enum AllocType {                    // Start with an unusual number instead of zero, because zero is common.

            AllocTypeMalloc = 0x375d6750,   // Encompasses fastMalloc, fastZeroedMalloc, fastCalloc, fastRealloc.

            AllocTypeClassNew,              // Encompasses class operator new from FastAllocBase.

            AllocTypeClassNewArray,         // Encompasses class operator new[] from FastAllocBase.

            AllocTypeFastNew,               // Encompasses fastNew.

            AllocTypeFastNewArray,          // Encompasses fastNewArray.

            AllocTypeNew,                   // Encompasses global operator new.

            AllocTypeNewArray               // Encompasses global operator new[].

        };

    }

#if ENABLE(FAST_MALLOC_MATCH_VALIDATION)

    // Malloc validation is a scheme whereby a tag is attached to an

    // allocation which identifies how it was originally allocated.

    // This allows us to verify that the freeing operation matches the

    // allocation operation. If memory is allocated with operator new[]

    // but freed with free or delete, this system would detect that.

    // In the implementation here, the tag is an integer prepended to

    // the allocation memory which is assigned one of the AllocType

    // enumeration values. An alternative implementation of this

    // scheme could store the tag somewhere else or ignore it.

    // Users of FastMalloc don't need to know or care how this tagging

    // is implemented.

    namespace Internal {

        // Return the AllocType tag associated with the allocated block p.

        inline AllocType fastMallocMatchValidationType(const void* p)

        {

            const AllocAlignmentInteger* type = static_cast<const AllocAlignmentInteger*>(p) - 1;

            return static_cast<AllocType>(*type);

        }

        // Return the address of the AllocType tag associated with the allocated block p.

        inline AllocAlignmentInteger* fastMallocMatchValidationValue(void* p)

        {

            return reinterpret_cast<AllocAlignmentInteger*>(static_cast<char*>(p) - sizeof(AllocAlignmentInteger));

        }

        // Set the AllocType tag to be associaged with the allocated block p.

        inline void setFastMallocMatchValidationType(void* p, AllocType allocType)

        {

            AllocAlignmentInteger* type = static_cast<AllocAlignmentInteger*>(p) - 1;

            *type = static_cast<AllocAlignmentInteger>(allocType);

        }

        // Handle a detected alloc/free mismatch. By default this calls CRASH().

        void fastMallocMatchFailed(void* p);

    } // namespace Internal

    // This is a higher level function which is used by FastMalloc-using code.

    inline void fastMallocMatchValidateMalloc(void* p, Internal::AllocType allocType)

    {

        if (!p)

            return;

        Internal::setFastMallocMatchValidationType(p, allocType);

    }

    // This is a higher level function which is used by FastMalloc-using code.

    inline void fastMallocMatchValidateFree(void* p, Internal::AllocType allocType)

    {

        if (!p)

            return;

        if (Internal::fastMallocMatchValidationType(p) != allocType)

            Internal::fastMallocMatchFailed(p);

        Internal::setFastMallocMatchValidationType(p, Internal::AllocTypeMalloc);  // Set it to this so that fastFree thinks it's OK.

    }

#else

    inline void fastMallocMatchValidateMalloc(void*, Internal::AllocType)

    {

    }

    inline void fastMallocMatchValidateFree(void*, Internal::AllocType)

    {

    }

#endif

} // namespace WTF

#endif

#endif // FastMallocWince_h