aboutsummaryrefslogtreecommitdiffstats
path: root/libSYS/src/genericStds.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'libSYS/src/genericStds.cpp')
-rw-r--r--libSYS/src/genericStds.cpp429
1 files changed, 429 insertions, 0 deletions
diff --git a/libSYS/src/genericStds.cpp b/libSYS/src/genericStds.cpp
new file mode 100644
index 0000000..b83aa50
--- /dev/null
+++ b/libSYS/src/genericStds.cpp
@@ -0,0 +1,429 @@
+/************************** Fraunhofer IIS FDK SysLib **********************
+
+ (C) Copyright Fraunhofer IIS (2002)
+ All Rights Reserved
+
+ Please be advised that this software and/or program delivery is
+ Confidential Information of Fraunhofer and subject to and covered by the
+
+ Fraunhofer IIS Software Evaluation Agreement
+ between Google Inc. and Fraunhofer
+ effective and in full force since March 1, 2012.
+
+ You may use this software and/or program only under the terms and
+ conditions described in the above mentioned Fraunhofer IIS Software
+ Evaluation Agreement. Any other and/or further use requires a separate agreement.
+
+
+ $Id$
+ Author(s):
+ Description: - Generic memory, stdio, string, etc. function wrappers or
+ builtins.
+ - OS dependant function wrappers.
+
+ This software and/or program is protected by copyright law and international
+ treaties. Any reproduction or distribution of this software and/or program,
+ or any portion of it, may result in severe civil and criminal penalties, and
+ will be prosecuted to the maximum extent possible under law.
+
+******************************************************************************/
+
+#define _CRT_SECURE_NO_WARNINGS
+
+#include "genericStds.h"
+
+#include <math.h>
+
+/* library info */
+#define SYS_LIB_VL0 1
+#define SYS_LIB_VL1 1
+#define SYS_LIB_VL2 25
+#define SYS_LIB_TITLE "System Integration Library"
+#define SYS_LIB_BUILD_DATE __DATE__
+#define SYS_LIB_BUILD_TIME __TIME__
+
+ #include <stdlib.h>
+ #include <stdio.h>
+ #include <string.h>
+ #include <stdarg.h>
+
+
+/***************************************************************
+ * memory allocation monitoring variables
+ ***************************************************************/
+
+
+/* Include OS/System specific implementations. */
+#if defined(__linux__) /* cppp replaced: elif */
+ #include "linux/genericStds_linux.cpp"
+#endif
+
+
+#if !(defined(USE_BUILTIN_STRING_FUNCTIONS) || defined(__SYMBIAN32__))
+#include <string.h>
+#include <stdlib.h>
+#include <stdio.h>
+
+#ifndef FUNCTION_FDKprintf
+void FDKprintf( const char* szFmt, ...) {
+ va_list ap;
+ va_start(ap, szFmt);
+ vprintf(szFmt, ap);
+ va_end(ap);
+#ifdef ARCH_WA_FLUSH_CONSOLE
+ fflush(stdout);
+#endif
+}
+#endif
+
+#ifndef FUNCTION_FDKprintfErr
+void FDKprintfErr( const char* szFmt, ...) {
+ va_list ap;
+ va_start(ap, szFmt);
+#if defined(ARCH_WA_SLOWCON)
+ vprintf(szFmt, ap);
+#else
+ vfprintf(stderr, szFmt, ap);
+#endif
+ va_end(ap);
+#ifdef ARCH_WA_FLUSH_CONSOLE
+ fflush(stderr);
+#endif
+}
+#endif
+
+int FDKgetchar(void) { return getchar(); }
+
+INT FDKfprintf(FDKFILE *stream, const char *format, ...) {
+ INT chars = 0;
+ va_list ap;
+ va_start(ap, format);
+ chars += vfprintf((FILE*)stream, format, ap);
+ va_end(ap);
+ return chars;
+}
+
+#ifndef FUNCTION_FDKsprintf
+INT FDKsprintf(char *str, const char *format, ...) {
+ INT chars = 0;
+ va_list ap;
+ va_start(ap, format);
+ chars += vsprintf(str, format, ap);
+ va_end(ap);
+ return chars;
+}
+#endif
+
+#else
+
+void FDKprintf( const char* szFmt, ...) { /* stub! */; }
+void FDKprintfErr( const char* szFmt, ...) { /* stub! */; }
+INT FDKfprintf(FILE *stream, const char *format, ...) { /*stub ! */; }
+INT FDKsprintf(char *str, const char *format, ...) { /* stub! */; }
+
+#endif
+
+/************************************************************************************************/
+
+
+const char *FDKstrchr(const char *s, INT c) { return strchr(s, c); }
+const char *FDKstrstr(const char *haystack, const char *needle) { return strstr(haystack, needle); }
+#ifndef FUNCTION_FDKstrcpy
+char *FDKstrcpy(char *dest, const char *src) { return strcpy(dest, src); }
+#endif
+char *FDKstrncpy(char *dest, const char *src, UINT n) { return strncpy(dest, src, n); }
+
+/*************************************************************************
+ * DYNAMIC MEMORY management (heap)
+ *************************************************************************/
+
+#ifndef FUNCTION_FDKcalloc
+void *FDKcalloc (const UINT n, const UINT size)
+{
+ void* ptr;
+
+ ptr = calloc(n, size);
+
+ return ptr;
+}
+#endif
+
+#ifndef FUNCTION_FDKmalloc
+void *FDKmalloc (const UINT size)
+{
+ void* ptr;
+
+ ptr = malloc(size);
+
+ return ptr;
+}
+#endif
+
+#ifndef FUNCTION_FDKfree
+void FDKfree (void *ptr)
+{
+ /* FDKprintf("f, heapSize: %d\n", heapSizeCurr); */
+ free((INT*)ptr);
+}
+#endif
+
+#ifndef FUNCTION_FDKaalloc
+void *FDKaalloc(const UINT size, const UINT alignment)
+{
+ void *addr, *result=NULL;
+ addr = FDKcalloc(1, size + alignment + sizeof(void*)); /* Malloc and clear memory. */
+
+ if (addr!=NULL)
+ {
+ result = ALIGN_PTR((unsigned char*)addr + sizeof(void*)); /* Get aligned memory base address. */
+ *(((void**)result) - 1) = addr; /* Save malloc'ed memory pointer. */
+ }
+
+ return result; /* Return aligned address. */
+}
+#endif
+
+#ifndef FUNCTION_FDKafree
+void FDKafree (void *ptr)
+{
+ void *addr;
+ addr = *(((void**)ptr)-1); /* Get pointer to malloc'ed memory. */
+ FDKfree(addr); /* Free malloc'ed memory area. */
+}
+#endif
+
+
+#ifndef FUNCTION_FDKcalloc_L
+
+/*--------------------------------------------------------------------------*
+ * DATA MEMORY L1/L2 (fallback)
+ *--------------------------------------------------------------------------*/
+
+
+
+/*--------------------------------------------------------------------------*
+ * FDKcalloc_L
+ *--------------------------------------------------------------------------*/
+void *FDKcalloc_L(const UINT dim, const UINT size, MEMORY_SECTION s)
+{
+ int a_size;
+
+ if (s == SECT_DATA_EXTERN)
+ goto fallback;
+
+ a_size = ((dim*size+3)&0xfffffffc); /* force 4 byte alignment (1111 .... 1111 1100) */
+
+
+
+
+
+ //printf("Warning, out of internal memory\n");
+
+fallback:
+ return FDKcalloc(dim, size);
+}
+#endif /* FUNCTION_FDKcalloc_L */
+
+#ifndef FUNCTION_FDKfree_L
+void FDKfree_L (void *p)
+{
+
+ FDKfree(p);
+}
+#endif /* FUNCTION_FDKfree_L */
+
+#ifndef FUNCTION_FDKaalloc_L
+void *FDKaalloc_L(const UINT size, const UINT alignment, MEMORY_SECTION s)
+{
+ void *addr, *result=NULL;
+ addr = FDKcalloc_L(1, size + alignment + sizeof(void*), s); /* Malloc and clear memory. */
+
+ if (addr!=NULL)
+ {
+ result = ALIGN_PTR((unsigned char *)addr + sizeof(void*)); /* Get aligned memory base address. */
+ *(((void**)result) - 1) = addr; /* Save malloc'ed memory pointer. */
+ }
+
+ return result; /* Return aligned address. */
+}
+#endif
+
+#ifndef FUNCTION_FDKafree_L
+void FDKafree_L (void *ptr)
+{
+ void *addr;
+
+ addr = *(((void**)ptr)-1); /* Get pointer to malloc'ed memory. */
+ FDKfree_L(addr); /* Free malloc'ed memory area. */
+}
+#endif
+
+
+
+/*---------------------------------------------------------------------------------------
+ * FUNCTION: FDKmemcpy
+ * DESCRIPTION: - copies memory from "src" to "dst" with length "size" bytes
+ * - compiled with FDK_DEBUG will give you warnings
+ *---------------------------------------------------------------------------------------*/
+void FDKmemcpy(void *dst, const void *src, const UINT size)
+{
+
+ /* do the copy */
+ memcpy(dst, src, size);
+}
+
+void FDKmemmove(void *dst, const void *src, const UINT size) { memmove(dst, src, size); }
+void FDKmemset(void *memPtr, const INT value, const UINT size) { memset(memPtr, value, size); }
+void FDKmemclear(void *memPtr, const UINT size) { FDKmemset(memPtr,0,size); }
+UINT FDKstrlen(const char *s) { return (UINT)strlen(s); }
+
+/* Compare function wrappers */
+INT FDKmemcmp(const void *s1, const void *s2, const UINT size) { return memcmp(s1, s2, size); }
+INT FDKstrcmp(const char *s1, const char *s2) { return strcmp(s1, s2); }
+INT FDKstrncmp(const char *s1, const char *s2, const UINT size) { return strncmp(s1, s2, size); }
+
+
+/* Math function wrappers. Only intended for compatibility, not to be highly optimized. */
+
+INT FDKabs(INT j) { return abs(j); }
+double FDKfabs(double x) { return fabs(x); }
+double FDKpow(double x, double y) { return pow(x,y); }
+double FDKsqrt(double x) { return sqrt(x); }
+double FDKatan(double x) { return atan(x); }
+double FDKlog(double x) { return log(x); }
+double FDKsin(double x) { return sin(x); }
+double FDKcos(double x) { return cos(x); }
+double FDKexp(double x) { return exp(x); }
+double FDKatan2(double y, double x) { return atan2(y, x); }
+double FDKacos(double x) { return acos(x); }
+double FDKtan(double x) { return tan(x); }
+double FDKfloor(double x) { return floor(x); }
+double FDKceil(double x) { return ceil(x); }
+
+INT FDKatoi(const char *nptr) { return atoi(nptr); }
+long FDKatol(const char *nptr) { return atol(nptr); }
+float FDKatof(const char *nptr) { return (float)atof(nptr); }
+
+
+/* ==================== FILE I/O ====================== */
+
+#if !defined(FUNCTION_FDKfopen)
+FDKFILE *FDKfopen(const char *filename, const char *mode) { return fopen(filename, mode); }
+#endif
+#if !defined(FUNCTION_FDKfclose)
+INT FDKfclose(FDKFILE *fp) { return fclose((FILE*)fp);}
+#endif
+#if !defined(FUNCTION_FDKfseek)
+INT FDKfseek(FDKFILE *fp, LONG OFFSET, int WHENCE) { return fseek((FILE*)fp, OFFSET, WHENCE);}
+#endif
+#if !defined(FUNCTION_FDKftell)
+INT FDKftell(FDKFILE *fp) { return ftell((FILE*)fp); }
+#endif
+#if !defined(FUNCTION_FDKfflush)
+INT FDKfflush(FDKFILE *fp) { return fflush((FILE*)fp); }
+#endif
+const INT FDKSEEK_SET = SEEK_SET;
+const INT FDKSEEK_CUR = SEEK_CUR;
+const INT FDKSEEK_END = SEEK_END;
+
+#if !defined(FUNCTION_FDKfwrite)
+UINT FDKfwrite(void *ptrf, INT size, UINT nmemb, FDKFILE *fp) { return fwrite(ptrf, size, nmemb, (FILE*)fp); }
+#endif
+#if !defined(FUNCTION_FDKfread)
+UINT FDKfread(void *dst, INT size, UINT nmemb, FDKFILE *fp) { return fread(dst, size, nmemb, (FILE*)fp); }
+#endif
+#if !defined(FUNCTION_FDKfgets)
+char* FDKfgets(void *dst, INT size, FDKFILE *fp) { return fgets((char *)dst, size, (FILE*)fp); }
+#endif
+#if !defined(FUNCTION_FDKrewind)
+void FDKrewind(FDKFILE *fp) { FDKfseek((FILE*)fp,0,FDKSEEK_SET); }
+#endif
+
+
+UINT FDKfwrite_EL(void *ptrf, INT size, UINT nmemb, FDKFILE *fp) {
+
+ if (IS_LITTLE_ENDIAN()) {
+ FDKfwrite(ptrf, size, nmemb, fp);
+ } else {
+ UINT n;
+ INT s;
+
+ UCHAR *ptr = (UCHAR*) ptrf;
+
+ for (n=0; n<nmemb; n++) {
+ for (s=size-1; s>=0; s--) {
+ //FDKprintf("char = %c\n", (char)*(ptr+s));
+ FDKfwrite(ptr + s, 1, 1, fp);
+ }
+ ptr = ptr + size;
+ }
+ }
+ return nmemb;
+}
+
+
+UINT FDKfread_EL(void *dst, INT size, UINT nmemb, FDKFILE *fp) {
+ UINT n, s0, s1, err;
+ UCHAR tmp, *ptr;
+ UCHAR tmp24[3];
+
+ /* Enforce alignment of 24 bit data. */
+ if (size == 3) {
+ ptr = (UCHAR*)dst;
+ err = 0;
+ for (n=0; n<nmemb; n++) {
+ if ((err = FDKfread(tmp24, 1, 3, fp)) != 3) {
+ return err;
+ }
+ *ptr++ = tmp24[0];
+ *ptr++ = tmp24[1];
+ *ptr++ = tmp24[2];
+ /* Sign extension */
+ if (tmp24[2] & 0x80) {
+ *ptr++ = 0xff;
+ } else {
+ *ptr++ = 0;
+ }
+ }
+ err = nmemb;
+ size = sizeof(LONG);
+ } else {
+ if ((err = FDKfread(dst, size, nmemb, fp)) != nmemb) {
+ return err;
+ }
+ }
+ if (!IS_LITTLE_ENDIAN() && size > 1) {
+ ptr = (UCHAR*)dst;
+ for (n=0; n<nmemb; n++) {
+ for (s0=0, s1=size-1; s0 < s1; s0++, s1--) {
+ tmp = ptr[s0];
+ ptr[s0] = ptr[s1];
+ ptr[s1] = tmp;
+ }
+ ptr += size;
+ }
+ }
+ return err;
+}
+
+INT FDKfeof(FDKFILE *fp) { return feof((FILE*)fp); }
+
+/* Global initialization/cleanup */
+
+#if defined(_DEBUG) && defined(_WIN32) && !defined(_WIN32_WCE)
+ #define _CRTDBG_MAP_ALLOC
+ #include <crtdbg.h>
+#endif
+
+
+
+
+void FDKprintDisclaimer(void)
+{
+ FDKprintf(
+ "This program is protected by copyright law and international treaties.\n" \
+ "Any reproduction or distribution of this program, or any portion\n" \
+ "of it, may result in severe civil and criminal penalties, and will be\n" \
+ "prosecuted to the maximum extent possible under law.\n\n");
+}
+