diff options
author | neonloop | 2021-10-20 14:54:27 +0000 |
---|---|---|
committer | neonloop | 2021-10-20 14:54:27 +0000 |
commit | ea1947ffcc606d757357398b24e74a3f4ecefa07 (patch) | |
tree | 2031b8d4fc4c61063c710a7148378f57e662efbd /modules/mod_mem/mod_mem.c | |
download | bennugd-ea1947ffcc606d757357398b24e74a3f4ecefa07.tar.gz bennugd-ea1947ffcc606d757357398b24e74a3f4ecefa07.tar.bz2 bennugd-ea1947ffcc606d757357398b24e74a3f4ecefa07.zip |
Initial commit from steward-fu releasemain
Diffstat (limited to 'modules/mod_mem/mod_mem.c')
-rw-r--r-- | modules/mod_mem/mod_mem.c | 266 |
1 files changed, 266 insertions, 0 deletions
diff --git a/modules/mod_mem/mod_mem.c b/modules/mod_mem/mod_mem.c new file mode 100644 index 0000000..b716144 --- /dev/null +++ b/modules/mod_mem/mod_mem.c @@ -0,0 +1,266 @@ +/* + * Copyright © 2006-2016 SplinterGU (Fenix/Bennugd) + * Copyright © 2002-2006 Fenix Team (Fenix) + * Copyright © 1999-2002 José Luis Cebrián Pagüe (Fenix) + * + * This file is part of Bennu - Game Development + * + * This software is provided 'as-is', without any express or implied + * warranty. In no event will the authors be held liable for any damages + * arising from the use of this software. + * + * Permission is granted to anyone to use this software for any purpose, + * including commercial applications, and to alter it and redistribute it + * freely, subject to the following restrictions: + * + * 1. The origin of this software must not be misrepresented; you must not + * claim that you wrote the original software. If you use this software + * in a product, an acknowledgment in the product documentation would be + * appreciated but is not required. + * + * 2. Altered source versions must be plainly marked as such, and must not be + * misrepresented as being the original software. + * + * 3. This notice may not be removed or altered from any source + * distribution. + * + */ + +#include <stdint.h> + +#include <stdio.h> +#include <stdlib.h> +#include <string.h> + +/* WIN32 INCLUDES */ +#ifdef WIN32 +#include <windows.h> +#include <winbase.h> +#include <windef.h> +#endif + +/* BeOS INCLUDES */ +#ifdef TARGET_BEOS +#include <unistd.h> +#include <sys/utsname.h> +#include <sys/types.h> +#include <ctype.h> +#include <be/kernel/OS.h> +#endif + +/* LINUX INCLUDES */ +#ifdef TARGET_LINUX +#include <unistd.h> +#include <sys/sysinfo.h> +#include <sys/utsname.h> +#include <ctype.h> +#define KERNELC_V_1 2 +#define KERNELC_V_2 3 +#define KERNELC_V_3 16 +#endif + +/* Mac OS X INCLUDES */ +#ifdef TARGET_MAC +#include <unistd.h> +#include <sys/utsname.h> +#include <ctype.h> +#endif + +/* BSD INCLUDES */ +#ifdef TARGET_BSD +#include <unistd.h> +#include <sys/utsname.h> +#include <ctype.h> +#endif + +#include "bgddl.h" + +/* + * Dynamic memory + */ + +/* Linux utility function */ + +#ifdef TARGET_LINUX +static int kernel_version_type( void ) +{ + struct utsname sysinf; + int kernel_v[3]; + int i, t, fv = 0; + + if ( uname( &sysinf ) == -1 ) + return -1; + + bzero(( int* )kernel_v, sizeof( int )*3 ); + + for ( i = 0, t = 0; i <= 2; i++ ) + { + if ( sysinf.release[t] ) + { + kernel_v[i] = atoi( &sysinf.release[t] ); + while ( sysinf.release[++t] && sysinf.release[t] != '.' ) + ; + t++; + } + } + + if ( !fv && kernel_v[0] > KERNELC_V_1 ) fv = 1; + if ( !fv && kernel_v[0] < KERNELC_V_1 ) fv = 2; + if ( !fv && kernel_v[1] > KERNELC_V_2 ) fv = 1; + if ( !fv && kernel_v[1] < KERNELC_V_2 ) fv = 2; + if ( !fv && kernel_v[2] > KERNELC_V_3 ) fv = 1; + if ( !fv && kernel_v[2] < KERNELC_V_3 ) fv = 2; + + return fv; +} +#endif + +/* MEMORY_FREE() + * Returns the number of free bytes (physycal memory only) + * This value is intended only for informational purposes + * and may or may not be an approximation. + */ + +static int modmem_memory_free( INSTANCE * my, int * params ) +{ +#ifdef WIN32 + MEMORYSTATUS mem ; + GlobalMemoryStatus( &mem ) ; + return mem.dwAvailPhys ; + +#elif defined(TARGET_BEOS) + system_info info; + get_system_info( &info ); + return B_PAGE_SIZE * ( info.max_pages - info.used_pages ); + +#elif !defined(TARGET_MAC) && !defined(TARGET_WII) + /* Linux and other Unix (?) */ + struct sysinfo meminf; + int fv; + + if ( sysinfo( &meminf ) == -1 ) return -1; + + if ( !( fv = kernel_version_type() ) ) return -1; + + if ( fv == 1 ) + return meminf.freeram * meminf.mem_unit; + else + return meminf.freeram; + + return -1; + +#else + return 0; //TODO + +#endif +} + +/* MEMORY_TOTAL(); + * Return total number of bytes of physical memory + */ + +static int modmem_memory_total( INSTANCE * my, int * params ) +{ +#ifdef WIN32 + MEMORYSTATUS mem ; + GlobalMemoryStatus( &mem ) ; + return mem.dwTotalPhys ; + +#elif defined(TARGET_BEOS) + system_info info; + get_system_info( &info ); + return B_PAGE_SIZE * ( info.max_pages ); + +#elif !defined(TARGET_MAC) && !defined(TARGET_WII) + /* Linux and other Unix (?) */ + struct sysinfo meminf; + int fv; + + if ( sysinfo( &meminf ) == -1 ) return -1; + + if ( !( fv = kernel_version_type() ) ) return -1; + + if ( fv == 1 ) + return meminf.totalram * meminf.mem_unit; + else + return meminf.totalram; + + return -1; + +#else + return 0; //TODO + +#endif +} + +static int modmem_memcmp( INSTANCE * my, int * params ) +{ + return ( memcmp(( void * )params[0], ( void * )params[1], params[2] ) ) ; +} + +static int modmem_memmove( INSTANCE * my, int * params ) +{ + memmove(( void * )params[0], ( void * )params[1], params[2] ) ; + return 1 ; +} + +static int modmem_memcopy( INSTANCE * my, int * params ) +{ + memcpy(( void * )params[0], ( void * )params[1], params[2] ) ; + return 1 ; +} + +static int modmem_memset( INSTANCE * my, int * params ) +{ + memset(( void * )params[0], params[1], params[2] ) ; + return 1 ; +} + +static int modmem_memsetw( INSTANCE * my, int * params ) +{ + uint16_t * ptr = ( uint16_t * )params[0] ; + const uint16_t b = params[1] ; + int n ; + + for ( n = params[2] ; n ; n-- ) *ptr++ = b ; + return 1 ; +} + +static int modmem_memseti( INSTANCE * my, int * params ) +{ + uint32_t * ptr = ( uint32_t * )params[0] ; + const uint32_t b = params[1] ; + int n ; + + for ( n = params[2] ; n ; n-- ) *ptr++ = b ; + return 1 ; +} + +static int modmem_calloc( INSTANCE * my, int * params ) +{ + return (( int ) calloc( params[0], params[1] ) ) ; +} + +static int modmem_alloc( INSTANCE * my, int * params ) +{ + return (( int ) malloc( params[0] ) ) ; +} + +static int modmem_realloc( INSTANCE * my, int * params ) +{ + return (( int )realloc(( void * )params[0], params[1] ) ) ; +} + +static int modmem_free( INSTANCE * my, int * params ) +{ + free(( void * )params[0] ) ; + return 1 ; +} + +/* ----------------------------------------------------------------- */ +/* exports */ +/* ----------------------------------------------------------------- */ + +#include "mod_mem_exports.h" + +/* ----------------------------------------------------------------- */ |