/*! * \copy *     Copyright (c)  2013, Cisco Systems *     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. * *     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 HOLDER 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. * */ #include "memory.h" WELSVP_NAMESPACE_BEGIN///////////////////////////////////////////////////////////////////////////////// void* WelsMalloc (const uint32_t kuiSize, char* pTag) {  const int32_t kiSizeVoidPointer	= sizeof (void**);  const int32_t kiSizeInt32		= sizeof (int32_t);  const int32_t kiAlignedBytes	= ALIGNBYTES - 1;   uint8_t* pBuf		= (uint8_t*) ::malloc (kuiSize + kiAlignedBytes + kiSizeVoidPointer + kiSizeInt32);  uint8_t* pAlignedBuf = NULL;   if (NULL == pBuf)    return NULL;   // to fill zero values  WelsMemset (pBuf, 0, kuiSize + kiAlignedBytes + kiSizeVoidPointer + kiSizeInt32);   pAlignedBuf = pBuf + kiAlignedBytes + kiSizeVoidPointer + kiSizeInt32;  pAlignedBuf -= WelsCastFromPointer (pAlignedBuf) & kiAlignedBytes;  * ((void**) (pAlignedBuf - kiSizeVoidPointer)) = pBuf;  * ((int32_t*) (pAlignedBuf - (kiSizeVoidPointer + kiSizeInt32))) = kuiSize;   return (pAlignedBuf);} ///////////////////////////////////////////////////////////////////////////// void WelsFree (void* pPointer, char* pTag) {  if (pPointer) {    ::free (* (((void**) pPointer) - 1));  }} ///////////////////////////////////////////////////////////////////////////// void* InternalReallocate (void* pPointer, const uint32_t kuiSize, char* pTag) {  uint32_t iOldSize = 0;  uint8_t* pNew = NULL;  if (pPointer != NULL)    iOldSize = * ((int32_t*) ((uint8_t*) pPointer - sizeof (void**) - sizeof (int32_t)));  else    return WelsMalloc (kuiSize, pTag);   pNew = (uint8_t*)WelsMalloc (kuiSize, pTag);  if (0 == pNew) {    if (iOldSize > 0 && kuiSize > 0 && iOldSize >= kuiSize)      return (pPointer);    return 0;  } else if (iOldSize > 0 && kuiSize > 0)    memcpy (pNew, pPointer, (iOldSize < kuiSize) ? iOldSize : kuiSize);  else    return 0;   WelsFree (pPointer, pTag);  return (pNew);} ///////////////////////////////////////////////////////////////////////////// void* WelsRealloc (void* pPointer, uint32_t* pRealSize, const uint32_t kuiSize, char* pTag) {  const uint32_t kuiOldSize = *pRealSize;  uint32_t kuiNewSize = 0;  void* pLocalPointer = NULL;  if (kuiOldSize >= kuiSize)	// large enough of original block, so do nothing    return (pPointer);   // new request  kuiNewSize = kuiSize + 15;  kuiNewSize -= (kuiNewSize & 15);  kuiNewSize += 32;   pLocalPointer = InternalReallocate (pPointer, kuiNewSize, pTag);  if (NULL != pLocalPointer) {    *pRealSize	= kuiNewSize;    return (pLocalPointer);  } else {    return NULL;  }   return NULL;	// something wrong} WELSVP_NAMESPACE_END