/*************************************************************************
 *                                                                       *
 * Open Dynamics Engine, Copyright (C) 2001,2002 Russell L. Smith.       *
 * All rights reserved.  Email: russ@q12.org   Web: www.q12.org          *
 *                                                                       *
 * This library is free software; you can redistribute it and/or         *
 * modify it under the terms of EITHER:                                  *
 *   (1) The GNU Lesser General Public License as published by the Free  *
 *       Software Foundation; either version 2.1 of the License, or (at  *
 *       your option) any later version. The text of the GNU Lesser      *
 *       General Public License is included with this library in the     *
 *       file LICENSE.TXT.                                               *
 *   (2) The BSD-style license that is included with this library in     *
 *       the file LICENSE-BSD.TXT.                                       *
 *                                                                       *
 * 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 files    *
 * LICENSE.TXT and LICENSE-BSD.TXT for more details.                     *
 *                                                                       *
 *************************************************************************/

#include <ode/odeconfig.h>
#include "config.h"
#include <ode/memory.h>
#include <ode/error.h>


static dAllocFunction *allocfn = 0;
static dReallocFunction *reallocfn = 0;
static dFreeFunction *freefn = 0;

#ifdef __MINGW32__
/* 
   this is a guard against AC_FUNC_MALLOC and AC_FUNC_REALLOC
   which break cross compilation, no issues in native MSYS.
*/
#undef malloc
#undef realloc
#endif

void dSetAllocHandler (dAllocFunction *fn)
{
  allocfn = fn;
}


void dSetReallocHandler (dReallocFunction *fn)
{
  reallocfn = fn;
}


void dSetFreeHandler (dFreeFunction *fn)
{
  freefn = fn;
}


dAllocFunction *dGetAllocHandler()
{
  return allocfn;
}


dReallocFunction *dGetReallocHandler()
{
  return reallocfn;
}


dFreeFunction *dGetFreeHandler()
{
  return freefn;
}

// PSP memalgin by default to 16bytes
void * dAlloc (size_t size) {
  if (allocfn) return allocfn (size);
//  else return malloc (size);
  else return memalign (16,size);
}

// PSP mem-re-align patch, is more costly (as it always copies to new block)
// but it's aligned, so we can access data by lv.q
void * dRealloc (void *ptr, size_t oldsize, size_t newsize) {
  if (reallocfn) return reallocfn (ptr,oldsize,newsize);
  else {
	void * newptr = memalign(16,newsize);
	memcpy (newptr,ptr,oldsize);
	free (ptr);
	return newptr;
//	return realloc (ptr,newsize);
  }
}

void dFree (void *ptr, size_t size) {
  if (!ptr) return;
  if (freefn) freefn (ptr,size); else free (ptr);
}

