/* FCE Ultra - NES/Famicom Emulator
 *
 * Copyright notice for this file:
 *  Copyright (C) 2002 Xodnizel
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program 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 General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
 */

/// \file
/// \brief memory management services provided by FCEU core

#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include "../types.h"
#include "../fceu.h"
#include "memory.h"

void *FCEU_amalloc(size_t size, size_t alignment)
{
	size = (size + alignment - 1) & ~(alignment-1);

	#ifdef _MSC_VER
	void *ret = _aligned_malloc(size,alignment);
	#else
	void *ret = aligned_alloc(alignment,size);
	#endif

	if(!ret)
		FCEU_abort("Error allocating memory!");

	return ret;
}

void FCEU_afree(void* ptr)
{
	#ifdef _MSC_VER
	_aligned_free(ptr);
	#else
	free(ptr);
	#endif
}

static void *_FCEU_malloc(uint32 size)
{
	void* ret = malloc(size);

	if(!ret)
		FCEU_abort("Error allocating memory!");

	return ret;
}

static void _FCEU_free(void* ptr)
{
	free(ptr);
}

void *FCEU_gmalloc(uint32 size)
{
	void *ret = _FCEU_malloc(size);
 
	// initialize according to RAMInitOption, default zero
	FCEU_MemoryRand((uint8*)ret,size,true);

	return ret;
}

void *FCEU_malloc(uint32 size)
{
	void *ret = _FCEU_malloc(size);
	memset(ret, 0, size);
	return ret;
}

void FCEU_gfree(void *ptr)
{
	_FCEU_free(ptr);
}

void FCEU_free(void *ptr)
{
	_FCEU_free(ptr);
}

void *FCEU_dmalloc(uint32 size)
{
	return FCEU_malloc(size);
}

void FCEU_dfree(void *ptr)
{
	return FCEU_free(ptr);
}

void* FCEU_realloc(void* ptr, size_t size)
{
	return realloc(ptr,size);
}

void FCEU_abort(const char* message)
{
	if(message) FCEU_PrintError("%s", message);
	abort();
}
