kmalloc.c

日本著名的的嵌入式实时操作系统T-Kernel的源码及用户手册。

/*
 *----------------------------------------------------------------------
 *    T-Kernel
 *
 *    Copyright (C) 2004 by Ken Sakamura. All rights reserved.
 *    T-Kernel is distributed under the T-License.
 *----------------------------------------------------------------------
 *
 *    Version:   1.01.00
 *    Released by T-Engine Forum(http://www.t-engine.org) at 2004/6/28.
 *
 *----------------------------------------------------------------------
 */

/*
 *	@(#)kmalloc.c (libtk)
 *
 *	Resident system memory allocation 
 */

#include "libtk.h"

#ifndef KMALLOCTEST

EXPORT void* Kmalloc( size_t size )
{
	void	*p;

	MEMLOCK( return NULL )
	p = _mem_malloc(size, &_Kmacb);
	MEMUNLOCK()

	return p;
}

EXPORT void* Kcalloc( size_t nmemb, size_t size )
{
	void	*p;

	MEMLOCK( return NULL )
	p = _mem_calloc(nmemb, size, &_Kmacb);
	MEMUNLOCK()

	return p;
}

EXPORT void* Krealloc( void *ptr, size_t size )
{
	void	*p;

	MEMLOCK( return NULL )
	p = _mem_realloc(ptr, size, &_Kmacb);
	MEMUNLOCK()

	return p;
}

EXPORT void Kfree( void *ptr )
{
	MEMLOCK( return )
	_mem_free(ptr, &_Kmacb);
	MEMUNLOCK()
}

#else /* KMALLOCTEST */

EXPORT void Kmalloctest( int mode )
{
	MEMLOCK( return )
	_mem_malloctest(mode, &_Kmacb);
	MEMUNLOCK()
}

EXPORT BOOL Kmalloccheck( void *ptr )
{
	BOOL	v;

	MEMLOCK( return FALSE )
	v = _mem_malloccheck(ptr, &_Kmacb);
	MEMUNLOCK()

	return v;
}

#endif /* KMALLOCTEST */