summaryrefslogtreecommitdiffstats
path: root/libSYS/src
diff options
context:
space:
mode:
authorDave Burke <daveburke@google.com>2012-04-17 09:51:45 -0700
committerDave Burke <daveburke@google.com>2012-04-17 23:04:43 -0700
commit9bf37cc9712506b2483650c82d3c41152337ef7e (patch)
tree77db44e2bae06e3d144b255628be2b7a55c581d3 /libSYS/src
parenta37315fe10ee143d6d0b28c19d41a476a23e63ea (diff)
downloadfdk-aac-9bf37cc9712506b2483650c82d3c41152337ef7e.tar.gz
fdk-aac-9bf37cc9712506b2483650c82d3c41152337ef7e.tar.bz2
fdk-aac-9bf37cc9712506b2483650c82d3c41152337ef7e.zip
Fraunhofer AAC codec.
License boilerplate update to follow. Change-Id: I2810460c11a58b6d148d84673cc031f3685e79b5
Diffstat (limited to 'libSYS/src')
-rw-r--r--libSYS/src/Android.mk19
-rw-r--r--libSYS/src/cmdl_parser.cpp522
-rw-r--r--libSYS/src/conv_string.cpp117
-rw-r--r--libSYS/src/genericStds.cpp429
-rw-r--r--libSYS/src/linux/FDK_stackload_linux.cpp28
-rw-r--r--libSYS/src/linux/audio_linux.cpp28
-rw-r--r--libSYS/src/linux/coresup_linux.cpp28
-rw-r--r--libSYS/src/linux/genericStds_linux.cpp232
-rw-r--r--libSYS/src/linux/uart_linux.cpp28
-rw-r--r--libSYS/src/mips/genericStds_mips.cpp230
-rw-r--r--libSYS/src/wav_file.cpp492
11 files changed, 2153 insertions, 0 deletions
diff --git a/libSYS/src/Android.mk b/libSYS/src/Android.mk
new file mode 100644
index 0000000..5078535
--- /dev/null
+++ b/libSYS/src/Android.mk
@@ -0,0 +1,19 @@
+LOCAL_PATH:= $(call my-dir)
+
+include $(CLEAR_VARS)
+LOCAL_SRC_FILES := \
+ cmdl_parser.cpp \
+ conv_string.cpp \
+ genericStds.cpp \
+ wav_file.cpp
+
+LOCAL_CFLAGS := -DANDROID
+
+LOCAL_C_INCLUDES += \
+ $(LOCAL_PATH) \
+ $(LOCAL_PATH)/../include \
+ $(LOCAL_PATH)/../../libFDK/include
+
+LOCAL_MODULE:= libSYS
+
+include $(BUILD_STATIC_LIBRARY)
diff --git a/libSYS/src/cmdl_parser.cpp b/libSYS/src/cmdl_parser.cpp
new file mode 100644
index 0000000..a2578c3
--- /dev/null
+++ b/libSYS/src/cmdl_parser.cpp
@@ -0,0 +1,522 @@
+/************************** Fraunhofer IIS FDK SysLib **********************
+
+ (C) Copyright Fraunhofer IIS (1999)
+ 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: command line parser
+
+ 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
+
+/* Work around for broken android toolchain: sys/types.h:137: error: 'uint64_t' does not name a type */
+#define _SYS_TYPES_H_
+
+#include <stdarg.h>
+#include <stdio.h>
+#include <string.h>
+#include <stdlib.h>
+#include <ctype.h>
+
+#include "cmdl_parser.h"
+#include "genericStds.h"
+
+
+
+/************************ interface ************************/
+
+static INT GetArgFromString(INT argc, TEXTCHAR* argv[], TEXTCHAR* search_string, TEXTCHAR type, TEXTCHAR* found_string , INT* switches_used);
+static void RemoveWhiteSpace(const TEXTCHAR* pReqArgs, TEXTCHAR* Removed);
+static INT CheckArg(TEXTCHAR* arg, TEXTCHAR* str, UINT numArgs, TEXTCHAR type, TEXTCHAR* current_str);
+static INT CheckForUnusedSwitches(INT argc, /*TEXTCHAR* argv[],*/ INT* switches_used);
+static INT ParseString(TEXTCHAR* str, INT*, TEXTCHAR*, TEXTCHAR*);
+static void GetNumberOfArgs(TEXTCHAR* str, INT* nArgs);
+
+static
+void removeQuotes(char *str)
+{
+ if (str[0] == '"') {
+ FDKstrcpy(str, str+1);
+ str[FDKstrlen(str)-1] = 0;
+ }
+}
+
+
+/********************** implementation *********************/
+
+INT IIS_ScanCmdl(INT argc, TEXTCHAR* argv[], const TEXTCHAR* str, ...)
+{
+ INT i = 0;
+ INT found_and_set = 0;
+ INT nArgs = 0;
+ INT* switches_used = 0;
+ INT* b_str_opt = 0;
+ TEXTCHAR* s_str = 0;
+ TEXTCHAR* c_str_type = 0;
+ TEXTCHAR* str_clean = 0;
+
+ va_list ap;
+
+ if (argc == 0 || argc == 1)
+ {
+ FDKprintf("No command line arguments\n");
+ goto bail;
+ }
+
+ str_clean = (TEXTCHAR*) FDKcalloc((unsigned int)_tcslen(str), sizeof(TEXTCHAR));
+ if (str_clean == NULL) {
+ FDKprintf("Error allocating memory line %d, file %s\n", __LINE__, __FILE__);
+ return 0;
+ }
+
+ RemoveWhiteSpace(str, str_clean );
+ GetNumberOfArgs(str_clean, &nArgs);
+
+ b_str_opt = (INT*) FDKcalloc(nArgs, sizeof(INT));
+ s_str = (TEXTCHAR*) FDKcalloc(nArgs*CMDL_MAX_ARGC, sizeof(TEXTCHAR) );
+ c_str_type = (TEXTCHAR*) FDKcalloc(nArgs, sizeof(TEXTCHAR));
+ switches_used = (INT*) FDKcalloc(argc, sizeof(INT));
+
+ if (b_str_opt == NULL || s_str == NULL || c_str_type == NULL || switches_used == NULL) {
+ FDKprintf("Error allocating memory line %d, file %s\n", __LINE__, __FILE__);
+ goto bail;
+ }
+
+ if ( ParseString( str_clean, b_str_opt, s_str, c_str_type )) {
+ goto bail;
+ }
+
+ va_start(ap, str);
+
+ for ( i = 0; i < nArgs; i++ )
+ {
+ TEXTCHAR arg[CMDL_MAX_STRLEN] = {L'\0'};
+ TEXTCHAR* p_arg = arg;
+ TEXTCHAR* current_str = &(s_str[i*CMDL_MAX_ARGC]);
+
+ if (GetArgFromString(argc, argv, current_str, c_str_type[i], arg, switches_used )
+ && !b_str_opt[i] )
+ {
+#ifdef _UNICODE
+ _ftprintf(stderr, _TEXT("\n\nError: Parsing argument for required switch '%ls'.\n" ), current_str);
+#else
+ _ftprintf(stderr, _TEXT("\n\nError: Parsing argument for required switch '%s'.\n" ), current_str);
+#endif
+ found_and_set = 0;
+ goto bail;
+ }
+ if (CheckArg(p_arg, s_str, nArgs, c_str_type[i], current_str))
+ {
+ goto bail;
+ }
+
+ switch (c_str_type[i] )
+ {
+ case 's':
+ {
+ TEXTCHAR* tmp;
+ tmp = va_arg(ap, TEXTCHAR*);
+
+ if ( arg[0] == '\0' )
+ break;
+
+ _tcsncpy( tmp, arg, CMDL_MAX_STRLEN );
+ /* Remove quotes. Windows Mobile Workaround. */
+ removeQuotes(tmp);
+ found_and_set++;
+ break;
+ }
+ case 'd':
+ {
+ INT* tmp = va_arg(ap, INT*);
+
+ if ( arg[0] == '\0' )
+ break;
+
+ *tmp = _tcstol(arg, NULL, 0);
+ found_and_set++;
+ break;
+ }
+ case 'c':
+ {
+ char* tmp = va_arg(ap, char*);
+
+ if ( arg[0] == '\0' )
+ break;
+
+ *tmp = *arg;
+ found_and_set++;
+ break;
+ }
+ case 'u':
+ {
+ UCHAR* tmp = va_arg(ap, UCHAR*);
+
+ if ( arg[0] == '\0' )
+ break;
+
+ *tmp = _tstoi(arg);
+ found_and_set++;
+ break;
+ }
+ case 'f':
+ {
+ float* tmp = (float*) va_arg( ap,double*);
+
+ if ( arg[0] == '\0' )
+ break;
+
+ *tmp = (float) _tstof(arg);
+ found_and_set++;
+ break;
+ }
+ case 'y': // support 'data type double'
+ {
+ double* tmp = (double*) va_arg( ap,double*);
+ // use sscanf instead _tstof because of gcc
+ //_tstof(arg,"%lf",tmp); // '%lf' reads as double
+ *tmp = _tstof(arg); // '%lf' reads as double
+ found_and_set++;
+ break;
+ }
+ case '1':
+ {
+
+ INT* tmp = va_arg( ap, INT*);
+
+ if ( arg[0] == '\0' )
+ break;
+
+ *tmp = 1;
+ found_and_set++;
+ break;
+ }
+
+ default:
+ FDKprintfErr("Bug: unsupported data identifier \"%c\"\n", c_str_type[i]);
+ break;
+
+ }
+
+ }
+
+ va_end(ap);
+
+ CheckForUnusedSwitches(argc, /*argv,*/ switches_used);
+
+bail:
+ if (b_str_opt) FDKfree(b_str_opt);
+ if (s_str) FDKfree(s_str);
+ if (c_str_type) FDKfree(c_str_type);
+ if (str_clean) FDKfree(str_clean);
+ if (switches_used) FDKfree(switches_used);
+
+ return found_and_set;
+}
+
+
+void GetNumberOfArgs(TEXTCHAR* str, INT* nArgs)
+{
+ UINT i = 0;
+ for ( i = 0; i < _tcslen(str); ++i )
+ {
+ if ( str[i] == '%')
+ *nArgs+= 1;
+ }
+
+}
+
+INT ParseString(TEXTCHAR* str, INT* b_str_opt, TEXTCHAR* s_str, TEXTCHAR* c_str_type )
+{
+ UINT i = 0;
+ INT argCounter = 0;
+
+ TEXTCHAR* str_start = 0;
+ TEXTCHAR* str_stop = 0;
+
+
+ str_start = str;
+ str_stop = str_start;
+
+ for ( i = 0; i < _tcslen(str) - 1; ++i )
+ {
+ if ( str[i] == '%' ) /* We have an Argument */
+ {
+ if ( argCounter )
+ {
+ if ( b_str_opt[argCounter-1] )
+ str_start = str_stop + 3;
+
+ else
+ str_start = str_stop + 2;
+ }
+
+ /* Save Argument type */
+ c_str_type[argCounter] = str[i+1];
+
+ if ( *str_start == '(' ) /* Optional Argument */
+ {
+ b_str_opt[argCounter] = 1;
+ str_start++;
+ }
+
+ /* Save Argument */
+ str[i] = '\0';
+
+ _tcsncpy(&(s_str[argCounter*CMDL_MAX_ARGC]), str_start, CMDL_MAX_ARGC );
+
+ str[i] = '%';
+
+ str_stop = &(str[i]);
+
+ if ( b_str_opt[argCounter] )
+ {
+ if ( i+2 > ( _tcslen(str) -1 ))
+ {
+ _ftprintf(stderr,_TEXT("\n\nInternal Parser Error: Strlen Problem\n") );
+ return 1;
+ }
+ if ( str[i+2] != ')' )
+ {
+ _ftprintf(stderr,_TEXT("\n\nInternal Parser Error: Missing bracket ')'\n") );
+ return 1;
+ }
+
+ }
+
+
+ argCounter++;
+ }
+
+
+ }
+
+ return 0;
+ }
+
+
+
+
+void RemoveWhiteSpace(const TEXTCHAR* pReqArgs, TEXTCHAR* pRemoved)
+{
+ UINT i = 0;
+ INT k = 0;
+ UINT len = (UINT)_tcslen(pReqArgs);
+
+
+ for ( i = 0; i < len; ++i )
+ {
+
+ if ( pReqArgs[i] != ' ' )
+ {
+ pRemoved[k] = pReqArgs[i];
+ k++;
+ }
+ }
+}
+
+
+INT GetArgFromString(INT argc, TEXTCHAR* argv[], TEXTCHAR* search_string, TEXTCHAR type, TEXTCHAR* found_string, INT* sw_used )
+{
+ INT i = 0;
+
+ for (i = 1; i < argc; ++i ) {
+ if ( !_tcscmp(search_string, argv[i]) ) /* Strings are equal */
+ {
+ if ( type == '1' ) /* Switch without argument */
+ {
+ _tcsncpy( found_string, _TEXT("1"), 1);
+ sw_used[i] = 1;
+ return 0;
+
+ }
+
+ if ( i == (argc - 1)) /* We have %s or %d but are finished*/
+ return 1;
+
+ if ( _tcslen(argv[i+1]) > CMDL_MAX_STRLEN )
+ {
+#ifdef _UNICODE
+ _ftprintf (stderr,_TEXT("Warning: Ignoring argument for switch '%ls'. "), search_string );
+#else
+ _ftprintf (stderr,_TEXT("Warning: Ignoring argument for switch '%s'. "), search_string );
+#endif
+ _ftprintf (stderr,_TEXT("Argument is too LONG.\n") );
+ return 1;
+ }
+ else
+ {
+ _tcsncpy( found_string, argv[i+1], CMDL_MAX_STRLEN);
+ sw_used[i] = 1;
+ sw_used[i+1] = 1;
+ return 0;
+ }
+ }
+ }
+ return 1;
+}
+
+
+
+INT CheckArg(TEXTCHAR* arg, TEXTCHAR* str, UINT numArgs, TEXTCHAR type, TEXTCHAR* cur_str)
+{
+ UINT i = 0;
+
+ /* No argument given-> return */
+ if (arg[0] == '\0')
+ return 0;
+
+
+ /* Check if arg is switch */
+ for ( i = 0; i < numArgs; ++i )
+ {
+ if (!_tcscmp(arg, &(str[i*CMDL_MAX_ARGC])))
+ {
+#ifdef _UNICODE
+ _ftprintf(stderr, _TEXT("\n\nError: Argument '%ls' for switch '%ls' is not valid \n" ), arg, cur_str );
+#else
+ _ftprintf(stderr, _TEXT("\n\nError: Argument '%s' for switch '%s' is not valid \n" ), arg, cur_str );
+#endif
+ return 1;
+ }
+
+ }
+ /* Check if type is %d but a string is given */
+
+ for ( i = 0; i < _tcslen(arg); ++i )
+ {
+ if ( (type == 'd') && !_istdigit(arg[i]) && arg[i] != 'x' )
+ {
+#ifdef _UNICODE
+ _ftprintf(stderr, _TEXT("\n\nError: Argument '%ls' for switch '%ls' is not a valid number.\n" ), arg, cur_str);
+#else
+ _ftprintf(stderr, _TEXT("\n\nError: Argument '%s' for switch '%s' is not a valid number.\n" ), arg, cur_str);
+#endif
+ return 1;
+ }
+ }
+
+
+ return 0;
+}
+
+
+INT CheckForUnusedSwitches(INT argc, /*TEXTCHAR* argv[],*/ INT* switches_used)
+{
+ INT i = 0;
+
+ for( i = 1; i < argc; ++i )
+ {
+ if ( !switches_used[i] )
+ {
+ ++i;
+ }
+ }
+
+ return 0;
+}
+
+
+
+static char line[CMDL_MAX_STRLEN*CMDL_MAX_ARGC];
+static char *argv_ptr[CMDL_MAX_ARGC];
+#ifdef CMDFILE_PREFIX
+static char tmp[256]; /* this array is used to store the prefix and the filepath/name */
+#endif
+
+int IIS_ProcessCmdlList(const char* param_filename, int (*pFunction)(int, TEXTCHAR**))
+{
+ /* static to reduce required stack size */
+
+ FDKFILE *config_fp;
+ int argc;
+ char *line_ptr;
+
+#ifdef CMDFILE_PREFIX
+ FDKstrcpy(tmp, CMDFILE_PREFIX);
+ FDKstrcpy(tmp+FDKstrlen(CMDFILE_PREFIX), param_filename);
+ /* Open the file with command lines */
+ config_fp = FDKfopen(tmp, "r");
+#else
+ /* Open the file with command lines */
+ config_fp = FDKfopen(param_filename, "r");
+#endif
+
+ if(config_fp == NULL)
+ {
+#ifdef CMDFILE_PREFIX
+ FDKprintf("\ncould not open config file %s", tmp);
+#else
+ FDKprintf("\ncould not open config file %s", param_filename);
+#endif
+ return 1;
+ }
+
+ /* Obtain a command line from config file */
+ while (FDKfgets(line, CMDL_MAX_STRLEN*CMDL_MAX_ARGC, config_fp) != NULL)
+ {
+ argc = 1;
+
+ /* Eat \n */
+ line_ptr = (char*)FDKstrchr(line, '\n');
+ if (line_ptr != NULL)
+ *line_ptr = ' ';
+
+ line_ptr = line;
+
+ /* Scan the line and put the command line params into argv */
+ do {
+ /* Skip consecutive blanks. */
+ while (*line_ptr == ' ' && line_ptr < line+CMDL_MAX_STRLEN)
+ line_ptr++;
+ /* Assign argument. TODO: maybe handle quotes */
+ argv_ptr[argc] = line_ptr;
+ /* Get pointer to next blank. */
+ line_ptr = (char*)FDKstrchr(line_ptr, ' ');
+ /* */
+ if (line_ptr != NULL) {
+ /* Null terminate */
+ *line_ptr = 0;
+ /* Skip former blank (now null character) */
+ line_ptr++;
+ /* Advance argument counter */
+ }
+ argc++;
+ } while ( line_ptr != NULL && argc < CMDL_MAX_ARGC);
+
+ /* call "would be main()" */
+ if (argc > 2 && *argv_ptr[1] != '#' && FDKstrlen(argv_ptr[1])>1)
+ {
+ int retval;
+
+ retval = (*pFunction)(argc, argv_ptr);
+
+ FDKprintf("main returned %d\n", retval);
+ }
+ }
+
+ FDKfclose(config_fp);
+ return 0;
+}
+
diff --git a/libSYS/src/conv_string.cpp b/libSYS/src/conv_string.cpp
new file mode 100644
index 0000000..37af9c1
--- /dev/null
+++ b/libSYS/src/conv_string.cpp
@@ -0,0 +1,117 @@
+/************************** Fraunhofer IIS FDK SysLib **********************
+
+ (C) Copyright Fraunhofer IIS (2009)
+ 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: string conversion functions
+
+ 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.
+
+******************************************************************************/
+
+
+
+#include "genericStds.h"
+#include "conv_string.h"
+
+INT charBuf2HexString(char *string, UCHAR *charBuf, INT charBufLength)
+{
+ INT i;
+ UCHAR c1, c2;
+
+ /* sanity checks */
+ /* check array length */
+ if (charBufLength == 0) {
+ return -1;
+ }
+
+ /* define hex string Table */
+ UCHAR hexSymb[16]={'0','1','2','3','4','5','6','7','8','9','a','b','c','d','e','f'};
+
+ /* calculate corresponding hex string from charBuffer */
+ for (i=0;i<charBufLength;i++) {
+ c1 = ((charBuf[i])>>4)&0x0f; /* upper nibble */
+ c2 = (charBuf[i])&0x0f; /* lower nibble */
+
+ string[i*2] = hexSymb[c1]; /* convert to string */
+ string[i*2+1] = hexSymb[c2]; /* convert to string */
+ }
+
+ /* terminate string */
+ string[charBufLength<<1]='\0';
+
+ return 0;
+
+}
+
+INT hexString2CharBuf(const char *string, UCHAR *charBuf, UINT charBufLength)
+{
+ UINT i, k = 0;
+ UCHAR hNibble, lNibble;
+
+ /* sanity checks */
+ if (string[0] == '\0') {
+ return -1; /* invalid string size */
+ }
+
+ if (charBufLength<=0){
+ return -2; /* invalid buffer size */
+ }
+
+ /* convert to hex characters to corresponding 8bit value */
+ for (i=0;(string[i]!='\0')&&((i>>1)<charBufLength);i+=2) {
+ k = i>>1;
+ hNibble = hexChar2Dec(string[i]);
+ lNibble = hexChar2Dec(string[i+1]);
+ if ((hNibble == 16) || (lNibble == 16)) {
+ return -3; /* invalid character */
+ }
+ charBuf[k] = ((hNibble<<4)&0xf0) + lNibble;
+ }
+
+ /* check if last character was string terminator */
+ if ((string[i-2]!=0) && (string[i]!=0)) {
+ return -1; /* invalid string size */
+ }
+
+ /* fill charBuffer with zeros */
+ for (i=k+1;i<charBufLength;i++) {
+ charBuf[i] = 0;
+ }
+
+ return 0;
+
+}
+
+UCHAR hexChar2Dec(const char c)
+{
+ INT r = 0;
+ if ((c >= '0') && (c <= '9'))
+ r = c-'0';
+ else if ((c >= 'a') && (c <= 'f'))
+ r = c-'a'+10;
+ else if ((c >= 'A') && (c <= 'F'))
+ r = c-'A'+10;
+ else
+ r = 16; /* invalid hex character */
+
+ return (UCHAR)r;
+}
+
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");
+}
+
diff --git a/libSYS/src/linux/FDK_stackload_linux.cpp b/libSYS/src/linux/FDK_stackload_linux.cpp
new file mode 100644
index 0000000..d90f295
--- /dev/null
+++ b/libSYS/src/linux/FDK_stackload_linux.cpp
@@ -0,0 +1,28 @@
+/************************** Fraunhofer IIS FDK SysLib **********************
+
+ (C) Copyright Fraunhofer IIS (2006)
+ 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): Manuel Jander
+ Description: Stack consumption information gathering.
+
+ 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.
+
+******************************************************************************/
+
diff --git a/libSYS/src/linux/audio_linux.cpp b/libSYS/src/linux/audio_linux.cpp
new file mode 100644
index 0000000..ffc78ff
--- /dev/null
+++ b/libSYS/src/linux/audio_linux.cpp
@@ -0,0 +1,28 @@
+/************************** Fraunhofer IIS FDK SysLib **********************
+
+ (C) Copyright Fraunhofer IIS (2003)
+ 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: Manuel Jander
+ Description: Audio support
+
+ 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.
+
+******************************************************************************/
+
diff --git a/libSYS/src/linux/coresup_linux.cpp b/libSYS/src/linux/coresup_linux.cpp
new file mode 100644
index 0000000..9b80869
--- /dev/null
+++ b/libSYS/src/linux/coresup_linux.cpp
@@ -0,0 +1,28 @@
+/************************** Fraunhofer IIS FDK SysLib **********************
+
+ (C) Copyright Fraunhofer IIS (2003)
+ 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): Manuel Jander
+ Description: System support routines
+
+ 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.
+
+******************************************************************************/
+
diff --git a/libSYS/src/linux/genericStds_linux.cpp b/libSYS/src/linux/genericStds_linux.cpp
new file mode 100644
index 0000000..ce10f9c
--- /dev/null
+++ b/libSYS/src/linux/genericStds_linux.cpp
@@ -0,0 +1,232 @@
+/************************** Fraunhofer IIS FDK SysLib **********************
+
+ (C) Copyright Fraunhofer IIS (2006)
+ 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): Manuel Jander
+ Description: Linux genericStds (mostly kernel SRAM driver bindings)
+
+ 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.
+
+******************************************************************************/
+
+
+/*
+ * NOTE: it makes only sense to enable this if you also have the corresponding
+ * GNU/Linux kernel driver to access fast SRAM.
+ */
+#if defined(__arm__) /* || defined(__mips__) */
+
+/**
+ * EABI static linking problem workaround
+ *
+ * These function are normally present in libc.a but
+ * apparently can be linked only statically.
+ * While using C++ (iisisoff) that is a problem,
+ * because it wont work (static global constructors
+ * cause problems with static linked programs).
+ * So the workaround is to include those functions here,
+ * because libSYS.a is linked statically, and libc can be
+ * linked dynamically as usual.
+ *
+ * Add more EABI functions here if you get unresolved
+ * symbols of EABI functions.
+ */
+#include <string.h>
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+void __aeabi_memcpy(void *dest, void *src, int size)
+{
+ memcpy(dest, src, size);
+}
+void __aeabi_memcpy4(void *dest, void *src, int size)
+{
+ memcpy(dest, src, size);
+}
+void __aeabi_memmove4(void *dest, void *src, int size)
+{
+ memmove(dest, src, size);
+}
+void __aeabi_memclr(void *ptr, int size)
+{
+ memset(ptr, 0, size);
+}
+void __aeabi_memclr4(void *ptr, int size)
+{
+ memset(ptr, 0, size);
+}
+#ifdef __cplusplus
+}
+#endif
+
+/* Include Linux kernel config, or set ARCH and processor macros directly */
+/*
+#define CONFIG_ARCH_MXC
+#define CONFIG_ARCH_MX25
+*/
+
+#if defined(CONFIG_ARCH_OMAP3)
+#define KERNEL_SRAM_SIZE 65536
+#elif defined(CONFIG_ARCH_MX31)
+#define KERNEL_SRAM_SIZE 16384
+#elif defined(CONFIG_ARCH_MX25)
+#define KERNEL_SRAM_SIZE 131072
+#elif defined(CONFIG_ARCH_MX35)
+#define KERNEL_SRAM_SIZE 131072
+#else
+#define KERNEL_SRAM_SIZE 0
+#endif
+
+#if (KERNEL_SRAM_SIZE > 0)
+#define KERNEL_SCRATCH_SIZE (4096)
+#define FDK_SCRATCHBUF_SIZE (KERNEL_SCRATCH_SIZE/sizeof(INT))
+#define DATA_L1_A_SIZE (KERNEL_SRAM_SIZE-KERNEL_SCRATCH_SIZE)
+
+#define RESOURCE_scratchBuffer
+#define FUNCTION_FDKprolog
+#define FUNCTION_FDKepilog
+
+static unsigned char *L1_DATA_A=NULL;
+static unsigned char *_a=NULL;
+
+
+#ifdef RESOURCE_scratchBuffer
+static INT *__scratchBuffer;
+static unsigned char *__pScratchBuffer = NULL;
+#endif
+
+
+#ifdef __linux__
+
+#include <stdio.h>
+#include <sys/mman.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <fcntl.h>
+#include <unistd.h>
+
+static int fd;
+static inline void * getSram(void)
+{
+ unsigned long *ptr = NULL;
+
+ /* Open driver */
+ fd = open("/dev/sram", 0);
+ if (fd < 0)
+ {
+ printf("Unable to open /dev/sram. Fallback to malloc\n");
+ /* Signal "no sram driver at use". */
+ fd = -1;
+ /* Return malloced pointer (fallback) */
+ return FDKaalloc(KERNEL_SRAM_SIZE, 8);
+ }
+
+ /* Get memory mapped into CPU (virtual) address space */
+ ptr = (unsigned long *)mmap(NULL, KERNEL_SRAM_SIZE, PROT_READ | PROT_WRITE, MAP_PRIVATE, fd, 0);
+ if(ptr == MAP_FAILED)
+ {
+ printf("Unable to mmap(). Fallback to malloc\n");
+ /* Give up on the sram driver */
+ close(fd);
+ /* Signal "no sram driver at use". */
+ fd = -1;
+ /* Return malloced pointer (fallback) */
+ ptr = (unsigned long *)FDKaalloc(KERNEL_SRAM_SIZE, 8);
+ }
+
+
+ /* Return pointer to sram */
+ return (void*)ptr;
+}
+
+static inline void freeSram(void* ptr)
+{
+ /* Check if sram driver is being used. */
+ if (fd == -1)
+ {
+ FDKafree(ptr);
+ return;
+ }
+
+ /* Unmap memory */
+ munmap(ptr, KERNEL_SRAM_SIZE);
+ /* Close driver */
+ close(fd);
+
+ return;
+}
+
+#else
+
+static inline void * getSram(void)
+{
+ return FDKaalloc(KERNEL_SRAM_SIZE, 8);
+}
+static inline void * freeSram(void* ptr)
+{
+ FDKafree(ptr);
+}
+
+#endif
+
+
+#ifdef FUNCTION_FDKprolog
+void FDKprolog(void)
+{
+ unsigned char *addr = (unsigned char*)getSram();
+
+
+ if (addr == NULL)
+ {
+ printf("SRAM allocation failed ! This is fatal.\n");
+ exit(-1);
+ }
+
+#ifdef RESOURCE_scratchBuffer
+ __scratchBuffer = (INT*) ( addr + (KERNEL_SRAM_SIZE-KERNEL_SCRATCH_SIZE) );
+ __pScratchBuffer = addr + (KERNEL_SRAM_SIZE);
+#endif
+
+ printf("SRAM @ 0x%08x\n", (unsigned int) addr);
+ atexit(FDKepilog);
+
+ FDKprolog_generic();
+}
+#endif
+
+#ifdef FUNCTION_FDKepilog
+void FDKepilog(void)
+{
+ /* Because of atexit(), make sure to call this only once */
+ if (L1_DATA_A != NULL)
+ {
+ freeSram(L1_DATA_A);
+ L1_DATA_A = NULL;
+
+ FDKepilog_generic();
+ }
+}
+#endif
+
+#endif /* KERNEL_SRAM > 0 */
+
+#endif /* ifdef __arm__ */
+
diff --git a/libSYS/src/linux/uart_linux.cpp b/libSYS/src/linux/uart_linux.cpp
new file mode 100644
index 0000000..6497c9f
--- /dev/null
+++ b/libSYS/src/linux/uart_linux.cpp
@@ -0,0 +1,28 @@
+/************************** Fraunhofer IIS FDK SysLib **********************
+
+ (C) Copyright Fraunhofer IIS (2003)
+ 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: Manuel Jander
+ Description: UART support
+
+ 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.
+
+******************************************************************************/
+
diff --git a/libSYS/src/mips/genericStds_mips.cpp b/libSYS/src/mips/genericStds_mips.cpp
new file mode 100644
index 0000000..7e77eee
--- /dev/null
+++ b/libSYS/src/mips/genericStds_mips.cpp
@@ -0,0 +1,230 @@
+/************************** Fraunhofer IIS FDK SysLib **********************
+
+ (C) Copyright Fraunhofer IIS (2006)
+ 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): Manuel Jander
+ Description:
+
+ 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 RESOURCE_scratchBuffer
+#define FUNCTION_FDKprolog
+#define FUNCTION_FDKepilog
+
+#define MIPS_VIRTUAL_START (0x80000000)
+/* value below is defined in simulator config (MipsMemIntf-{24KE,4KE}.cfg) */
+#define MIPS_SDE_SCRATCHPAD (0x00058000)
+
+//#define MIPS_SRAM_SIZE (32768)
+#define MIPS_SRAM_SIZE (4096)
+
+#define MIPS_SCRATCH_SIZE (4096)
+#define DATA_L1_A_SIZE (MIPS_SRAM_SIZE-MIPS_SCRATCH_SIZE)
+
+
+
+
+#ifdef RESOURCE_scratchBuffer
+#define FDK_SCRATCHBUF_SIZE 1024
+static LONG *___scratchBuffer = NULL;
+static LONG *__scratchBuffer = NULL;
+static unsigned char *__pScratchBuffer = NULL;
+#endif
+
+
+#ifdef __linux__
+
+#include <stdio.h>
+#include <sys/mman.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <fcntl.h>
+#include <unistd.h>
+
+static int fd;
+static inline void * getSram(void)
+{
+ unsigned long *ptr = NULL;
+
+ /* Open driver */
+ fd = open("/dev/sram", 0);
+ if (fd < 0)
+ {
+ printf("Unable to access sram. Fallback to malloc\n");
+ /* Signal "no sram driver at use". */
+ fd = -1;
+ /* Return malloced pointer (fallback) */
+ return malloc(MIPS_SRAM_SIZE);
+ }
+
+ /* Get memory mapped into CPU (virtual) address space */
+ ptr = (unsigned long *)mmap(NULL, MIPS_SRAM_SIZE, PROT_READ | PROT_WRITE, MAP_PRIVATE, fd, 0);
+ if(ptr == MAP_FAILED)
+ {
+ printf("Unable to access sram. Fallback to malloc\n");
+ /* Give up on the sram driver */
+ close(fd);
+ /* Signal "no sram driver at use". */
+ fd = -1;
+ /* Return malloced pointer (fallback) */
+ ptr = (unsigned long *)malloc(MIPS_SRAM_SIZE);
+ }
+
+
+ /* Return pointer to sram */
+ return (void*)ptr;
+}
+
+static inline void freeSram(void* ptr)
+{
+ /* Check if sram driver is being used. */
+ if (fd == -1)
+ {
+ free(ptr);
+ return;
+ }
+
+ /* Unmap memory */
+ munmap(ptr, MIPS_SRAM_SIZE);
+ /* Close driver */
+ close(fd);
+
+ return;
+}
+
+#elif defined(__SDE_MIPS__)
+
+#include <stdio.h>
+#include <mips/cpu.h>
+
+static int hasISPRAM, hasDSPRAM;
+
+static inline void * getSram(void)
+{
+ void *addr;
+ unsigned int Config;
+
+ Config = mips_getconfig();
+ hasISPRAM = (Config >> 24) & 1;
+ hasDSPRAM = (Config >> 23) & 1;
+
+ FDKprintf("Config ISP/DSP: %d/%d\n", hasISPRAM, hasDSPRAM);
+
+ if (hasDSPRAM) {
+ long paddr, laddr;
+
+ FDKprintf("wrong\n");
+ paddr = MIPS_SDE_SCRATCHPAD;
+ /* Fixed mapping of kseg0: 0x80000000-0x9fffffff virtual => 0x00000000-0x1fffffff physical */
+ laddr = MIPS_VIRTUAL_START + MIPS_SDE_SCRATCHPAD;
+ addr = (void*)(laddr);
+ } else {
+ FDKprintf("ok\n");
+ addr = malloc(MIPS_SRAM_SIZE);
+ FDKprintf("addr %d\n", (int)addr);
+ }
+ return addr;
+}
+static inline void freeSram(void* ptr)
+{
+ if (!hasDSPRAM) {
+ free(ptr);
+ }
+}
+
+#else
+
+static inline void * getSram(void)
+{
+ return malloc(MIPS_SRAM_SIZE);
+}
+static inline void freeSram(void* ptr)
+{
+ free(ptr);
+}
+
+#endif
+
+
+#ifdef FUNCTION_FDKprolog
+void FDKprolog(void)
+{
+ unsigned char *addr;
+
+#ifdef _MIPS_ARCH_MIPS32R2
+ unsigned status;
+ asm volatile("mfc0 %0, $12, 0;\n" : "=r" (status));
+ status |= (1 << 24);
+ asm volatile("mtc0 %0, $12, 0;\n" :: "r" (status));
+#endif
+
+ addr = (unsigned char*)getSram();
+ if (addr == NULL) {
+ FDKprintfErr("SRAM allocation failed ! This is fatal.\n");
+ exit(-1);
+ } else {
+ FDKprintf("SRAM @ 0x%08x, size = 0x%x\n", (unsigned int) addr, MIPS_SRAM_SIZE);
+ }
+
+
+#ifdef RESOURCE_scratchBuffer
+ ___scratchBuffer = (LONG*)(addr + MIPS_SRAM_SIZE - MIPS_SCRATCH_SIZE);
+#endif
+
+ atexit(FDKepilog);
+
+ FDKprolog_generic();
+}
+#endif
+
+#ifdef FUNCTION_FDKepilog
+void FDKepilog(void)
+{
+
+#ifdef _MIPS_ARCH_MIPS32R2
+ unsigned status;
+ asm volatile("mfc0 %0, $12, 0;\n" : "=r" (status));
+ status &= ~(1 << 24);
+ asm volatile("mtc0 %0, $12, 0;\n" :: "r" (status));
+#endif
+
+ FDKepilog_generic();
+}
+#endif
+
+
+#if !defined(__linux__)
+
+#define FUNCTION_FDKclock
+
+#ifndef MIPS_CPU_CLK
+#define MIPS_CPU_CLK 100000000
+#endif
+
+INT FDKclock(void) {
+ INT clk;
+
+ asm volatile ("mfc0 %0,$9 " : "=r" (clk));
+ return clk;
+}
+
+#endif /* !defined(__linux__) */
diff --git a/libSYS/src/wav_file.cpp b/libSYS/src/wav_file.cpp
new file mode 100644
index 0000000..da401e4
--- /dev/null
+++ b/libSYS/src/wav_file.cpp
@@ -0,0 +1,492 @@
+/************************** Fraunhofer IIS FDK SysLib **********************
+
+ (C) Copyright Fraunhofer IIS (2000)
+ 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): Eric Allamanche
+ Description: a rudimentary wav file interface
+
+ 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.
+
+******************************************************************************/
+
+
+
+#include "wav_file.h"
+#include "genericStds.h"
+
+
+static INT_PCM ulaw2pcm (UCHAR ulawbyte);
+
+/*!
+ *
+ * \brief Read header from a WAVEfile. Host endianess is handled accordingly.
+ * \wav->fp filepointer of type FILE*.
+ * \wavinfo SWavInfo struct where the decoded header info is stored into.
+ * \return 0 on success and non-zero on failure.
+ *
+ */
+INT WAV_InputOpen (HANDLE_WAV *pWav, const char *filename)
+{
+ HANDLE_WAV wav = (HANDLE_WAV)FDKcalloc(1, sizeof(struct WAV));
+ INT offset;
+
+ if (wav == NULL) {
+ FDKprintfErr("WAV_InputOpen(): Unable to allocate WAV struct.\n");
+ goto error;
+ }
+
+ wav->fp = FDKfopen(filename, "rb");
+ if (wav->fp == NULL) {
+ FDKprintfErr("WAV_InputOpen(): Unable to open wav file. %s\n", filename);
+ goto error;
+ }
+
+ /* read RIFF-chunk */
+ if (FDKfread(&(wav->header.riffType), 1, 4, wav->fp) != 4) {
+ FDKprintfErr("WAV_InputOpen(): couldn't read RIFF_ID\n");
+ goto error; /* bad error "couldn't read RIFF_ID" */
+ }
+ if (FDKstrncmp("RIFF", wav->header.riffType, 4)) {
+ FDKprintfErr("WAV_InputOpen(): RIFF descriptor not found.\n") ;
+ goto error;
+ }
+
+ /* Read RIFF size. Ignored. */
+ FDKfread_EL(&(wav->header.riffSize), 4, 1, wav->fp);
+
+ /* read WAVE-chunk */
+ if (FDKfread(&wav->header.waveType, 1, 4, wav->fp) !=4) {
+ FDKprintfErr("WAV_InputOpen(): couldn't read format\n");
+ goto error; /* bad error "couldn't read format" */
+ }
+ if (FDKstrncmp("WAVE", wav->header.waveType, 4)) {
+ FDKprintfErr("WAV_InputOpen(): WAVE chunk ID not found.\n") ;
+ goto error;
+ }
+
+ /* read format-chunk */
+ if (FDKfread(&(wav->header.formatType), 1, 4, wav->fp) != 4) {
+ FDKprintfErr("WAV_InputOpen(): couldn't read format_ID\n");
+ goto error; /* bad error "couldn't read format_ID" */
+ }
+ if (FDKstrncmp("fmt", wav->header.formatType, 3)) {
+ FDKprintfErr("WAV_InputOpen(): fmt chunk format not found.\n") ;
+ goto error;
+ }
+
+
+ FDKfread_EL(&wav->header.formatSize, 4, 1, wav->fp); /* should be 16 for PCM-format (uncompressed) */
+
+
+ /* read info */
+ FDKfread_EL(&(wav->header.compressionCode), 2, 1, wav->fp);
+ FDKfread_EL(&(wav->header.numChannels), 2, 1, wav->fp);
+ FDKfread_EL(&(wav->header.sampleRate), 4, 1, wav->fp);
+ FDKfread_EL(&(wav->header.bytesPerSecond), 4, 1, wav->fp);
+ FDKfread_EL(&(wav->header.blockAlign), 2, 1, wav->fp);
+ FDKfread_EL(&(wav->header.bitsPerSample), 2, 1, wav->fp);
+
+ offset = wav->header.formatSize - 16;
+
+ /* Wave format extensible */
+ if (wav->header.compressionCode == 0xFFFE) {
+ static const UCHAR guidPCM[16] = {
+ 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x10, 0x00,
+ 0x80, 0x00, 0x00, 0xaa, 0x00, 0x38, 0x9b, 0x71
+ };
+ USHORT extraFormatBytes, validBitsPerSample;
+ UINT channelMask;
+ UCHAR guid[16];
+ INT i;
+
+ /* read extra bytes */
+ FDKfread_EL(&(extraFormatBytes), 2, 1, wav->fp);
+ offset -= 2;
+
+ if (extraFormatBytes >= 22) {
+ FDKfread_EL(&(validBitsPerSample), 2, 1, wav->fp);
+ FDKfread_EL(&(channelMask), 4, 1, wav->fp);
+ FDKfread_EL(&(guid), 16, 1, wav->fp);
+
+ /* check for PCM GUID */
+ for (i = 0; i < 16; i++) if (guid[i] != guidPCM[i]) break;
+ if (i == 16) wav->header.compressionCode = 0x01;
+
+ offset -= 22;
+ }
+ }
+
+ /* Skip rest of fmt header if any. */
+ for (;offset > 0; offset--) {
+ FDKfread(&wav->header.formatSize, 1, 1, wav->fp);
+ }
+
+ do {
+ /* Read data chunk ID */
+ if (FDKfread(wav->header.dataType, 1, 4, wav->fp) != 4) {
+ FDKprintfErr("WAV_InputOpen(): Unable to read data chunk ID.\n");
+ FDKfree(wav);
+ goto error;
+ }
+
+ /* Read chunk length. */
+ FDKfread_EL(&offset, 4, 1, wav->fp);
+
+ /* Check for data chunk signature. */
+ if (FDKstrncmp("data", wav->header.dataType, 4) == 0) {
+ wav->header.dataSize = offset;
+ break;
+ }
+ /* Jump over non data chunk. */
+ for (;offset > 0; offset--) {
+ FDKfread(&(wav->header.dataSize), 1, 1, wav->fp);
+ }
+ } while (!FDKfeof(wav->fp));
+
+ /* return success */
+ *pWav = wav;
+ return 0;
+
+ /* Error path */
+error:
+ if (wav->fp) {
+ FDKfclose(wav->fp);
+ wav->fp = NULL;
+ }
+
+ if (wav) {
+ FDKfree(wav);
+ }
+
+ *pWav = NULL;
+
+ return -1;
+}
+
+/*!
+ *
+ * \brief Read samples from a WAVEfile. The samples are automatically reorder to the native
+ * host endianess and scaled to full scale of the INT_PCM type, from whatever bps the WAVEfile
+ * had specified in its haader data.
+ *
+ * \wav HANDLE_WAV of the wav file.
+ * \buffer Pointer to store read data.
+ * \numSamples Desired number of samples to read.
+ * \nBits sample size in bits to be used for the buffer
+ *
+ * \return Number of samples actually read.
+ *
+ */
+
+INT WAV_InputRead (HANDLE_WAV wav, void *buffer, UINT numSamples, int nBits)
+{
+ UINT result = 0 ;
+ UINT i;
+ SCHAR *bptr = (SCHAR*)buffer;
+ LONG *lptr = (LONG*)buffer;
+ SHORT *sptr = (SHORT*)buffer;
+
+ switch (wav->header.compressionCode)
+ {
+ case 0x01: /* PCM uncompressed */
+ if (nBits == wav->header.bitsPerSample) {
+ result = FDKfread_EL(buffer, wav->header.bitsPerSample >> 3, numSamples, wav->fp) ;
+ } else {
+ result = 0;
+ for (i=0; i<numSamples; i++)
+ {
+ LONG tmp = 0;
+ result += FDKfread_EL(&tmp, wav->header.bitsPerSample >> 3, 1, wav->fp) ;
+
+ /* Move read bits to lower bits of LONG. */
+ if ( !IS_LITTLE_ENDIAN() && wav->header.bitsPerSample != 24 && wav->header.bitsPerSample < 32) {
+ tmp >>= (32-wav->header.bitsPerSample);
+ }
+
+ /* Full scale */
+ if (wav->header.bitsPerSample > nBits)
+ tmp >>= (wav->header.bitsPerSample-nBits);
+ else
+ tmp <<= (nBits-wav->header.bitsPerSample);
+
+ if (nBits == 8)
+ *bptr++ = (SCHAR) tmp;
+ if (nBits == 16)
+ *sptr++ = (SHORT) tmp;
+ if (nBits == 32)
+ *lptr++ = (LONG) tmp;
+ }
+ }
+ break;
+
+ case 0x07: /* u-Law compression */
+ for (i=0; i<numSamples; i++) {
+ result += FDKfread(&(bptr[i<<1]), 1, 1, wav->fp) ;
+ sptr[i] = ulaw2pcm(bptr[i<<1]) ;
+ }
+ break ;
+
+ default:
+ FDKprintf("WAV_InputRead(): unsupported data-compression!!") ;
+ break ;
+ }
+ return result ;
+}
+
+void WAV_InputClose(HANDLE_WAV *pWav)
+{
+ HANDLE_WAV wav = *pWav;
+
+ if (wav != NULL) {
+ if (wav->fp != NULL) {
+ FDKfclose(wav->fp);
+ wav->fp = NULL;
+ }
+ if (wav) {
+ FDKfree(wav);
+ }
+ }
+ *pWav = NULL;
+}
+
+/* conversion of u-law to linear coding */
+static INT_PCM ulaw2pcm (UCHAR ulawbyte)
+{
+ static const INT exp_lut[8] = { 0, 132, 396, 924, 1980, 4092, 8316, 16764 } ;
+ INT sign, exponent, mantissa, sample ;
+
+ ulawbyte = (UCHAR)~ulawbyte ;
+ sign = (ulawbyte & 0x80) ;
+ exponent = (ulawbyte >> 4) & 0x07 ;
+ mantissa = ulawbyte & 0x0F ;
+
+ sample = exp_lut[exponent] + (mantissa << (exponent + 3)) ;
+ if (sign != 0)
+ sample = -sample ;
+
+ return (INT_PCM)sample ;
+}
+
+/************** Writer ***********************/
+
+static UINT LittleEndian32(UINT v)
+{
+ if (IS_LITTLE_ENDIAN())
+ return v ;
+ else
+ return (v & 0x000000FF) << 24 | (v & 0x0000FF00) << 8 | (v & 0x00FF0000) >> 8 | (v & 0xFF000000) >> 24;
+}
+
+static SHORT LittleEndian16(SHORT v)
+{
+ if (IS_LITTLE_ENDIAN())
+ return v;
+ else
+ return (SHORT)(((v << 8) & 0xFF00) | ((v >> 8) & 0x00FF));
+}
+
+static USHORT Unpack(USHORT v)
+{
+ if (IS_LITTLE_ENDIAN())
+ return v;
+ else
+ return (SHORT)(((v << 8) & 0xFF00) | ((v >> 8) & 0x00FF));
+}
+
+/**
+ * WAV_OutputOpen
+ * \brief Open WAV output/writer handle
+ * \param pWav pointer to WAV handle to be returned
+ * \param sampleRate desired samplerate of the resulting WAV file
+ * \param numChannels desired number of audio channels of the resulting WAV file
+ * \param bitsPerSample desired number of bits per audio sample of the resulting WAV file
+ *
+ * \return value: 0: ok
+ * -1: error
+ */
+INT WAV_OutputOpen(HANDLE_WAV *pWav, const char *outputFilename, INT sampleRate, INT numChannels, INT bitsPerSample)
+{
+ HANDLE_WAV wav = (HANDLE_WAV)FDKcalloc(1, sizeof(struct WAV));
+ UINT size = 0;
+
+ if (bitsPerSample != 16 && bitsPerSample != 24 && bitsPerSample != 32)
+ {
+ FDKprintfErr("WAV_OutputOpen(): Invalid argument (bitsPerSample).\n");
+ goto bail;
+ }
+
+ wav->fp = FDKfopen(outputFilename, "wb");
+ if (wav->fp == NULL)
+ {
+ FDKprintfErr("WAV_OutputOpen(): unable to create file %s\n", outputFilename);
+ goto bail;
+ }
+
+ FDKstrcpy(wav->header.riffType, "RIFF");
+ wav->header.riffSize = LittleEndian32(0x7fffffff); /* in case fseek() doesn't work later in WAV_OutputClose() */
+ FDKstrcpy(wav->header.waveType, "WAVE");
+
+ FDKstrcpy(wav->header.formatType, "fmt ");
+ wav->header.formatSize = LittleEndian32(16);
+
+ wav->header.compressionCode = LittleEndian16(0x01);
+ wav->header.bitsPerSample = LittleEndian16((SHORT)bitsPerSample);
+ wav->header.numChannels = LittleEndian16((SHORT)numChannels);
+ wav->header.blockAlign = LittleEndian16((SHORT)(numChannels * (bitsPerSample >> 3)));
+ wav->header.sampleRate = LittleEndian32(sampleRate);
+ wav->header.bytesPerSecond = LittleEndian32(sampleRate * wav->header.blockAlign);
+ FDKstrcpy(wav->header.dataType, "data");
+ wav->header.dataSize = LittleEndian32(0x7fffffff - 36);
+
+
+ size = sizeof(WAV_HEADER);
+ if (FDKfwrite(&wav->header, 1, size, wav->fp) != size)
+ {
+ FDKprintfErr("WAV_OutputOpen(): error writing to output file %s\n", outputFilename);
+ goto bail;
+ }
+
+
+ wav->header.dataSize = wav->header.riffSize = 0;
+
+ *pWav = wav;
+
+ return 0;
+
+bail:
+ if (wav->fp)
+ FDKfclose(wav->fp);
+ if (wav)
+ FDKfree(wav);
+
+ pWav = NULL;
+
+ return -1;
+}
+
+
+/**
+ * WAV_OutputWrite
+ * \brief Write data to WAV file asociated to WAV handle
+ *
+ * \param wav handle of wave file
+ * \param sampleBuffer pointer to audio samples, right justified integer values
+ * \param nBufBits size in bits of each audio sample in sampleBuffer
+ * \param nSigBits amount of significant bits of each nBufBits in sampleBuffer
+ *
+ * \return value: 0: ok
+ * -1: error
+ */
+INT WAV_OutputWrite(HANDLE_WAV wav, void *sampleBuffer, UINT numberOfSamples, int nBufBits, int nSigBits)
+{
+ SCHAR *bptr = (SCHAR*)sampleBuffer;
+ SHORT *sptr = (SHORT*)sampleBuffer;
+ LONG *lptr = (LONG*)sampleBuffer;
+ LONG tmp;
+
+ int bps = Unpack(wav->header.bitsPerSample);
+ UINT i;
+
+ /* Pack samples if required */
+ if (bps == nBufBits && bps == nSigBits) {
+ if (FDKfwrite_EL(sampleBuffer, (bps>>3), numberOfSamples, wav->fp) != numberOfSamples)
+ {
+ FDKprintfErr("WAV_OutputWrite(): error: unable to write to file %d\n", wav->fp);
+ return -1;
+ }
+ } else {
+ for (i=0; i<numberOfSamples; i++)
+ {
+ int result;
+ int shift;
+
+ switch (nBufBits) {
+ case 8: tmp = *bptr++; break;
+ case 16: tmp = *sptr++; break;
+ case 32: tmp = *lptr++; break;
+ default: return -1;
+ }
+ /* Adapt sample size */
+ shift = (nBufBits-nSigBits)-(32-bps);
+
+ /* Correct alignment difference between 32 bit data buffer "tmp" and 24 bits to be written. */
+ if ( !IS_LITTLE_ENDIAN() && bps == 24) {
+ shift += 8;
+ }
+
+ if (shift < 0)
+ tmp >>= -shift;
+ else
+ tmp <<= shift;
+
+ /* Write sample */
+ result=FDKfwrite_EL(&tmp, bps>>3, 1, wav->fp);
+ if (result <= 0) {
+ FDKprintfErr("WAV_OutputWrite(): error: unable to write to file %d\n", wav->fp);
+ return -1;
+ }
+ }
+ }
+
+ wav->header.dataSize += (numberOfSamples * (bps>>3));
+ return 0;
+}
+
+
+/**
+ * WAV_OutputClose
+ * \brief Close WAV Output handle
+ * \param pWav pointer to WAV handle. *pWav is set to NULL.
+ */
+void WAV_OutputClose(HANDLE_WAV *pWav)
+{
+ HANDLE_WAV wav = *pWav;
+ UINT size = 0;
+
+ if ( wav == NULL ) {
+ return;
+ }
+
+ wav->header.dataSize = LittleEndian32(wav->header.dataSize);
+ wav->header.riffSize = LittleEndian32(wav->header.dataSize + 36);
+
+ if (wav->fp != NULL)
+ {
+ if (FDKfseek(wav->fp, 0, FDKSEEK_SET)) {
+ FDKprintf("WAV_OutputClose(): fseek() failed.\n");
+ }
+
+ size = sizeof(WAV_HEADER);
+ if (FDKfwrite(&wav->header.riffType, 1, size, wav->fp) != size)
+ {
+ FDKprintfErr("WAV_OutputClose(): unable to write header\n");
+ }
+
+ if (FDKfclose(wav->fp))
+ {
+ FDKprintfErr("WAV_OutputClose(): unable to close wav file\n");
+ }
+ wav->fp = NULL;
+ }
+
+ FDKfree(wav);
+ *pWav = NULL;
+}
+