aboutsummaryrefslogtreecommitdiff
path: root/modules/mod_mem/mod_mem.c
diff options
context:
space:
mode:
Diffstat (limited to 'modules/mod_mem/mod_mem.c')
-rw-r--r--modules/mod_mem/mod_mem.c266
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"
+
+/* ----------------------------------------------------------------- */