Compare commits
9 Commits
| Author | SHA1 | Date | |
|---|---|---|---|
|
3916055ddf | ||
|
|
49961c4af9 | ||
|
|
2792469196 | ||
|
|
ac40b2b883 | ||
|
|
e222ece85b | ||
|
|
f7ed1ee06d | ||
|
|
f186f8a3ee | ||
|
|
3014f69735 | ||
|
|
a817fbe1e5 |
@ -54,6 +54,8 @@ LOCAL_C_INCLUDES := \
|
||||
$(LOCAL_PATH)/libSBRenc/include
|
||||
|
||||
|
||||
LOCAL_CPPFLAGS += -std=c++98
|
||||
|
||||
LOCAL_MODULE:= libFraunhoferAAC
|
||||
|
||||
include $(BUILD_STATIC_LIBRARY)
|
||||
|
||||
@ -12,7 +12,7 @@ AM_CPPFLAGS = \
|
||||
-I$(top_srcdir)/libFDK/include \
|
||||
-I$(top_srcdir)/libPCMutils/include
|
||||
|
||||
AM_CXXFLAGS = -fno-exceptions -fno-rtti
|
||||
AM_CXXFLAGS = -fno-exceptions -fno-rtti -std=c++98
|
||||
libfdk_aac_la_LINK = $(LINK) $(libfdk_aac_la_LDFLAGS)
|
||||
# Mention a dummy pure C file to trigger generation of the $(LINK) variable
|
||||
nodist_EXTRA_libfdk_aac_la_SOURCES = dummy.c
|
||||
@ -186,11 +186,9 @@ libfdk_aac_la_SOURCES = \
|
||||
|
||||
EXTRA_DIST = \
|
||||
$(top_srcdir)/autogen.sh \
|
||||
$(top_srcdir)/MODULE_LICENSE_FRAUNHOFER \
|
||||
$(top_srcdir)/NOTICE \
|
||||
$(top_srcdir)/Android.mk \
|
||||
$(top_srcdir)/fdk-aac.sym \
|
||||
$(top_srcdir)/Makefile.vc \
|
||||
$(top_srcdir)/documentation/*.pdf \
|
||||
$(top_srcdir)/libAACdec/src/*.h \
|
||||
$(top_srcdir)/libAACdec/src/arm/*.cpp \
|
||||
@ -211,12 +209,10 @@ EXTRA_DIST = \
|
||||
$(top_srcdir)/libMpegTPDec/src/*.h \
|
||||
$(top_srcdir)/libMpegTPDec/src/version \
|
||||
$(top_srcdir)/libFDK/include/*.h \
|
||||
$(top_srcdir)/libFDK/include/aarch64/*.h \
|
||||
$(top_srcdir)/libFDK/include/arm/*.h \
|
||||
$(top_srcdir)/libFDK/include/mips/*.h \
|
||||
$(top_srcdir)/libFDK/include/ppc/*.h \
|
||||
$(top_srcdir)/libFDK/include/x86/*.h \
|
||||
$(top_srcdir)/libFDK/src/arm/*.cpp \
|
||||
$(top_srcdir)/libFDK/src/mips/*.cpp \
|
||||
$(top_srcdir)/win32/*.h
|
||||
$(top_srcdir)/libFDK/src/mips/*.cpp
|
||||
|
||||
|
||||
250
Makefile.vc
250
Makefile.vc
@ -1,250 +0,0 @@
|
||||
#
|
||||
# Options:
|
||||
# prefix=\path\to\install
|
||||
#
|
||||
# Compiling: nmake -f Makefile.vc
|
||||
# Installing: nmake -f Makefile.vc prefix=\path\to\x install
|
||||
#
|
||||
|
||||
VERSION=0.1.5
|
||||
|
||||
# Linker and librarian commands
|
||||
LD = link
|
||||
AR = lib
|
||||
|
||||
!IFDEF HOME
|
||||
# In case we are using a cross compiler shell.
|
||||
MKDIR_FLAGS = -p
|
||||
!ENDIF
|
||||
|
||||
AM_CPPFLAGS = \
|
||||
-Iwin32 \
|
||||
-IlibAACdec/include \
|
||||
-IlibAACenc/include \
|
||||
-IlibSBRdec/include \
|
||||
-IlibSBRenc/include \
|
||||
-IlibMpegTPDec/include \
|
||||
-IlibMpegTPEnc/include \
|
||||
-IlibSYS/include \
|
||||
-IlibFDK/include \
|
||||
-IlibPCMutils/include
|
||||
|
||||
AACDEC_SRC = \
|
||||
libAACdec/src/aacdec_drc.cpp \
|
||||
libAACdec/src/aacdec_hcr.cpp \
|
||||
libAACdec/src/aacdecoder.cpp \
|
||||
libAACdec/src/aacdec_pns.cpp \
|
||||
libAACdec/src/aac_ram.cpp \
|
||||
libAACdec/src/block.cpp \
|
||||
libAACdec/src/channelinfo.cpp \
|
||||
libAACdec/src/ldfiltbank.cpp \
|
||||
libAACdec/src/rvlcbit.cpp \
|
||||
libAACdec/src/rvlc.cpp \
|
||||
libAACdec/src/aacdec_hcr_bit.cpp \
|
||||
libAACdec/src/aacdec_hcrs.cpp \
|
||||
libAACdec/src/aacdecoder_lib.cpp \
|
||||
libAACdec/src/aacdec_tns.cpp \
|
||||
libAACdec/src/aac_rom.cpp \
|
||||
libAACdec/src/channel.cpp \
|
||||
libAACdec/src/conceal.cpp \
|
||||
libAACdec/src/pulsedata.cpp \
|
||||
libAACdec/src/rvlcconceal.cpp \
|
||||
libAACdec/src/stereo.cpp
|
||||
|
||||
AACENC_SRC = \
|
||||
libAACenc/src/aacenc.cpp \
|
||||
libAACenc/src/aacEnc_ram.cpp \
|
||||
libAACenc/src/band_nrg.cpp \
|
||||
libAACenc/src/block_switch.cpp \
|
||||
libAACenc/src/grp_data.cpp \
|
||||
libAACenc/src/metadata_main.cpp \
|
||||
libAACenc/src/pre_echo_control.cpp \
|
||||
libAACenc/src/quantize.cpp \
|
||||
libAACenc/src/tonality.cpp \
|
||||
libAACenc/src/aacEnc_rom.cpp \
|
||||
libAACenc/src/bandwidth.cpp \
|
||||
libAACenc/src/channel_map.cpp \
|
||||
libAACenc/src/intensity.cpp \
|
||||
libAACenc/src/ms_stereo.cpp \
|
||||
libAACenc/src/psy_configuration.cpp \
|
||||
libAACenc/src/sf_estim.cpp \
|
||||
libAACenc/src/transform.cpp \
|
||||
libAACenc/src/aacenc_lib.cpp \
|
||||
libAACenc/src/aacenc_tns.cpp \
|
||||
libAACenc/src/bit_cnt.cpp \
|
||||
libAACenc/src/chaosmeasure.cpp \
|
||||
libAACenc/src/line_pe.cpp \
|
||||
libAACenc/src/noisedet.cpp \
|
||||
libAACenc/src/psy_main.cpp \
|
||||
libAACenc/src/spreading.cpp \
|
||||
libAACenc/src/aacenc_pns.cpp \
|
||||
libAACenc/src/adj_thr.cpp \
|
||||
libAACenc/src/bitenc.cpp \
|
||||
libAACenc/src/dyn_bits.cpp \
|
||||
libAACenc/src/metadata_compressor.cpp \
|
||||
libAACenc/src/pnsparam.cpp \
|
||||
libAACenc/src/qc_main.cpp
|
||||
|
||||
FDK_SRC = \
|
||||
libFDK/src/autocorr2nd.cpp \
|
||||
libFDK/src/dct.cpp \
|
||||
libFDK/src/FDK_bitbuffer.cpp \
|
||||
libFDK/src/FDK_core.cpp \
|
||||
libFDK/src/FDK_crc.cpp \
|
||||
libFDK/src/FDK_hybrid.cpp \
|
||||
libFDK/src/FDK_tools_rom.cpp \
|
||||
libFDK/src/FDK_trigFcts.cpp \
|
||||
libFDK/src/fft.cpp \
|
||||
libFDK/src/fft_rad2.cpp \
|
||||
libFDK/src/fixpoint_math.cpp \
|
||||
libFDK/src/mdct.cpp \
|
||||
libFDK/src/qmf.cpp \
|
||||
libFDK/src/scale.cpp \
|
||||
|
||||
MPEGTPDEC_SRC = \
|
||||
libMpegTPDec/src/tpdec_adif.cpp \
|
||||
libMpegTPDec/src/tpdec_adts.cpp \
|
||||
libMpegTPDec/src/tpdec_asc.cpp \
|
||||
libMpegTPDec/src/tpdec_drm.cpp \
|
||||
libMpegTPDec/src/tpdec_latm.cpp \
|
||||
libMpegTPDec/src/tpdec_lib.cpp
|
||||
|
||||
MPEGTPENC_SRC = \
|
||||
libMpegTPEnc/src/tpenc_adif.cpp \
|
||||
libMpegTPEnc/src/tpenc_adts.cpp \
|
||||
libMpegTPEnc/src/tpenc_asc.cpp \
|
||||
libMpegTPEnc/src/tpenc_latm.cpp \
|
||||
libMpegTPEnc/src/tpenc_lib.cpp
|
||||
|
||||
PCMUTILS_SRC = \
|
||||
libPCMutils/src/limiter.cpp \
|
||||
libPCMutils/src/pcmutils_lib.cpp
|
||||
|
||||
SBRDEC_SRC = \
|
||||
libSBRdec/src/env_calc.cpp \
|
||||
libSBRdec/src/env_dec.cpp \
|
||||
libSBRdec/src/env_extr.cpp \
|
||||
libSBRdec/src/huff_dec.cpp \
|
||||
libSBRdec/src/lpp_tran.cpp \
|
||||
libSBRdec/src/psbitdec.cpp \
|
||||
libSBRdec/src/psdec.cpp \
|
||||
libSBRdec/src/psdec_hybrid.cpp \
|
||||
libSBRdec/src/sbr_crc.cpp \
|
||||
libSBRdec/src/sbr_deb.cpp \
|
||||
libSBRdec/src/sbr_dec.cpp \
|
||||
libSBRdec/src/sbrdec_drc.cpp \
|
||||
libSBRdec/src/sbrdec_freq_sca.cpp \
|
||||
libSBRdec/src/sbrdecoder.cpp \
|
||||
libSBRdec/src/sbr_ram.cpp \
|
||||
libSBRdec/src/sbr_rom.cpp
|
||||
|
||||
SBRENC_SRC = \
|
||||
libSBRenc/src/bit_sbr.cpp \
|
||||
libSBRenc/src/env_bit.cpp \
|
||||
libSBRenc/src/fram_gen.cpp \
|
||||
libSBRenc/src/mh_det.cpp \
|
||||
libSBRenc/src/ps_bitenc.cpp \
|
||||
libSBRenc/src/ps_encode.cpp \
|
||||
libSBRenc/src/resampler.cpp \
|
||||
libSBRenc/src/sbr_encoder.cpp \
|
||||
libSBRenc/src/sbr_ram.cpp \
|
||||
libSBRenc/src/ton_corr.cpp \
|
||||
libSBRenc/src/code_env.cpp \
|
||||
libSBRenc/src/env_est.cpp \
|
||||
libSBRenc/src/invf_est.cpp \
|
||||
libSBRenc/src/nf_est.cpp \
|
||||
libSBRenc/src/ps_main.cpp \
|
||||
libSBRenc/src/sbrenc_freq_sca.cpp \
|
||||
libSBRenc/src/sbr_misc.cpp \
|
||||
libSBRenc/src/sbr_rom.cpp \
|
||||
libSBRenc/src/tran_det.cpp
|
||||
|
||||
SYS_SRC = \
|
||||
libSYS/src/cmdl_parser.cpp \
|
||||
libSYS/src/conv_string.cpp \
|
||||
libSYS/src/genericStds.cpp \
|
||||
libSYS/src/wav_file.cpp
|
||||
|
||||
libfdk_aac_SOURCES = \
|
||||
$(AACDEC_SRC) $(AACENC_SRC) \
|
||||
$(MPEGTPDEC_SRC) $(MPEGTPENC_SRC) \
|
||||
$(SBRDEC_SRC) $(SBRENC_SRC) \
|
||||
$(PCMUTILS_SRC) $(FDK_SRC) $(SYS_SRC)
|
||||
|
||||
|
||||
aac_enc_SOURCES = aac-enc.c wavreader.c
|
||||
|
||||
prefix = \usr\local
|
||||
prefix_win = $(prefix:/=\) # In case we are using MSYS or MinGW.
|
||||
|
||||
CFLAGS = /nologo /W3 /Ox /MT /EHsc /Dinline=__inline $(TARGET_FLAGS) $(AM_CPPFLAGS) $(XCFLAGS)
|
||||
CXXFLAGS = $(CFLAGS)
|
||||
CPPFLAGS = $(CFLAGS)
|
||||
LDFLAGS = -nologo $(XLDFLAGS)
|
||||
ARFLAGS = -nologo
|
||||
|
||||
incdir = $(prefix_win)\include\fdk-aac
|
||||
bindir = $(prefix_win)\bin
|
||||
libdir = $(prefix_win)\lib
|
||||
|
||||
INST_DIRS = $(bindir) $(incdir) $(libdir)
|
||||
|
||||
LIB_DEF = fdk-aac.def
|
||||
STATIC_LIB = fdk-aac.lib
|
||||
SHARED_LIB = fdk-aac-1.dll
|
||||
IMP_LIB = fdk-aac.dll.lib
|
||||
|
||||
AAC_ENC_OBJS = $(aac_enc_SOURCES:.c=.obj)
|
||||
FDK_OBJS = $(libfdk_aac_SOURCES:.cpp=.obj)
|
||||
|
||||
PROGS = aac-enc.exe
|
||||
|
||||
|
||||
|
||||
all: $(LIB_DEF) $(STATIC_LIB) $(SHARED_LIB) $(IMP_LIB) $(PROGS)
|
||||
|
||||
clean:
|
||||
del /f $(LIB_DEF) $(STATIC_LIB) $(SHARED_LIB) $(IMP_LIB) $(PROGS) libfdk-aac.pc 2>NUL
|
||||
del /f *.obj *.exp 2>NUL
|
||||
del /f libAACdec\src\*.obj 2>NUL
|
||||
del /f libAACenc\src\*.obj 2>NUL
|
||||
del /f libFDK\src\*.obj 2>NUL
|
||||
del /f libMpegTPDec\src\*.obj 2>NUL
|
||||
del /f libMpegTPEnc\src\*.obj 2>NUL
|
||||
del /f libPCMutils\src\*.obj 2>NUL
|
||||
del /f libSBRdec\src\*.obj 2>NUL
|
||||
del /f libSBRenc\src\*.obj 2>NUL
|
||||
del /f libSYS\src\*.obj 2>NUL
|
||||
|
||||
install: $(INST_DIRS)
|
||||
copy libAACdec\include\aacdecoder_lib.h $(incdir)
|
||||
copy libAACenc\include\aacenc_lib.h $(incdir)
|
||||
copy libSYS\include\FDK_audio.h $(incdir)
|
||||
copy libSYS\include\genericStds.h $(incdir)
|
||||
copy libSYS\include\machine_type.h $(incdir)
|
||||
copy $(STATIC_LIB) $(libdir)
|
||||
copy $(IMP_LIB) $(libdir)
|
||||
copy $(SHARED_LIB) $(bindir)
|
||||
copy $(PROGS) $(bindir)
|
||||
copy $(LIB_DEF) $(libdir)
|
||||
|
||||
$(INST_DIRS):
|
||||
@mkdir $(MKDIR_FLAGS) $@
|
||||
|
||||
$(STATIC_LIB): $(FDK_OBJS)
|
||||
$(AR) $(ARFLAGS) -out:$@ $(FDK_OBJS)
|
||||
|
||||
$(IMP_LIB): $(SHARED_LIB)
|
||||
|
||||
$(SHARED_LIB): $(FDK_OBJS)
|
||||
$(LD) $(LDFLAGS) -OUT:$@ -DEF:$(LIB_DEF) -implib:$(IMP_LIB) -DLL $(FDK_OBJS)
|
||||
|
||||
$(PROGS): $(AAC_ENC_OBJS)
|
||||
$(LD) $(LDFLAGS) -out:$@ $(AAC_ENC_OBJS) $(STATIC_LIB)
|
||||
|
||||
.cpp.obj:
|
||||
$(CXX) $(CXXFLAGS) -c -Fo$@ $<
|
||||
|
||||
$(LIB_DEF):
|
||||
@echo EXPORTS > $(LIB_DEF)
|
||||
@type fdk-aac.sym >> $(LIB_DEF)
|
||||
@ -18,13 +18,7 @@
|
||||
|
||||
#include <stdio.h>
|
||||
#include <stdint.h>
|
||||
|
||||
#if defined(_MSC_VER)
|
||||
#include <getopt.h>
|
||||
#else
|
||||
#include <unistd.h>
|
||||
#endif
|
||||
|
||||
#include <stdlib.h>
|
||||
#include "libAACenc/include/aacenc_lib.h"
|
||||
#include "wavreader.h"
|
||||
|
||||
@ -99,7 +99,7 @@ amm-info@iis.fraunhofer.de
|
||||
/* Take action against VisualStudio 2005 crosscompile problems. */
|
||||
|
||||
/* Use single macro (the GCC built in macro) for architecture identification independent of the particular toolchain */
|
||||
#if defined(__i386__) || defined(__i486__) || defined(__i586__) || defined(__i686__) || (defined(_MSC_VER) && defined(_M_IX86)) || defined (__x86_64__) || (defined(_MSC_VER) && defined(_M_X64))
|
||||
#if defined(__i386__) || defined(__i486__) || defined(__i586__) || defined(__i686__) || (defined(_MSC_VER) && defined(_M_IX86)) || defined (__x86_64__)
|
||||
#define __x86__
|
||||
#endif
|
||||
|
||||
@ -154,6 +154,7 @@ amm-info@iis.fraunhofer.de
|
||||
#endif
|
||||
|
||||
#ifdef _M_ARM
|
||||
#include "cmnintrin.h"
|
||||
#include "armintr.h"
|
||||
#endif
|
||||
|
||||
@ -197,14 +198,6 @@ amm-info@iis.fraunhofer.de
|
||||
#undef POW2COEFF_16BIT
|
||||
#undef LDCOEFF_16BIT
|
||||
|
||||
#elif defined(__aarch64__) || defined(__AARCH64EL__)
|
||||
#define ARCH_PREFER_MULT_32x32
|
||||
#define ARCH_PREFER_MULT_32x16
|
||||
#define SINETABLE_16BIT
|
||||
#define POW2COEFF_16BIT
|
||||
#define LDCOEFF_16BIT
|
||||
#define WINDOWTABLE_16BIT
|
||||
|
||||
#elif defined(__x86__) /* cppp replaced: elif */
|
||||
#define ARCH_PREFER_MULT_32x16
|
||||
#define SINETABLE_16BIT
|
||||
@ -220,6 +213,14 @@ amm-info@iis.fraunhofer.de
|
||||
#define LDCOEFF_16BIT
|
||||
#define WINDOWTABLE_16BIT
|
||||
|
||||
#elif defined(__aarch64__) || defined(__AARCH64EL__)
|
||||
#define ARCH_PREFER_MULT_32x32
|
||||
#define ARCH_PREFER_MULT_32x16
|
||||
#define SINETABLE_16BIT
|
||||
#define POW2COEFF_16BIT
|
||||
#define LDCOEFF_16BIT
|
||||
#define WINDOWTABLE_16BIT
|
||||
|
||||
#else
|
||||
|
||||
#warning >>>> Please set architecture characterization defines for your platform (FDK_HIGH_PERFORMANCE)! <<<<
|
||||
|
||||
@ -1,113 +0,0 @@
|
||||
|
||||
/* -----------------------------------------------------------------------------------------------------------
|
||||
Software License for The Fraunhofer FDK AAC Codec Library for Android
|
||||
|
||||
© Copyright 1995 - 2013 Fraunhofer-Gesellschaft zur Förderung der angewandten Forschung e.V.
|
||||
All rights reserved.
|
||||
|
||||
1. INTRODUCTION
|
||||
The Fraunhofer FDK AAC Codec Library for Android ("FDK AAC Codec") is software that implements
|
||||
the MPEG Advanced Audio Coding ("AAC") encoding and decoding scheme for digital audio.
|
||||
This FDK AAC Codec software is intended to be used on a wide variety of Android devices.
|
||||
|
||||
AAC's HE-AAC and HE-AAC v2 versions are regarded as today's most efficient general perceptual
|
||||
audio codecs. AAC-ELD is considered the best-performing full-bandwidth communications codec by
|
||||
independent studies and is widely deployed. AAC has been standardized by ISO and IEC as part
|
||||
of the MPEG specifications.
|
||||
|
||||
Patent licenses for necessary patent claims for the FDK AAC Codec (including those of Fraunhofer)
|
||||
may be obtained through Via Licensing (www.vialicensing.com) or through the respective patent owners
|
||||
individually for the purpose of encoding or decoding bit streams in products that are compliant with
|
||||
the ISO/IEC MPEG audio standards. Please note that most manufacturers of Android devices already license
|
||||
these patent claims through Via Licensing or directly from the patent owners, and therefore FDK AAC Codec
|
||||
software may already be covered under those patent licenses when it is used for those licensed purposes only.
|
||||
|
||||
Commercially-licensed AAC software libraries, including floating-point versions with enhanced sound quality,
|
||||
are also available from Fraunhofer. Users are encouraged to check the Fraunhofer website for additional
|
||||
applications information and documentation.
|
||||
|
||||
2. COPYRIGHT LICENSE
|
||||
|
||||
Redistribution and use in source and binary forms, with or without modification, are permitted without
|
||||
payment of copyright license fees provided that you satisfy the following conditions:
|
||||
|
||||
You must retain the complete text of this software license in redistributions of the FDK AAC Codec or
|
||||
your modifications thereto in source code form.
|
||||
|
||||
You must retain the complete text of this software license in the documentation and/or other materials
|
||||
provided with redistributions of the FDK AAC Codec or your modifications thereto in binary form.
|
||||
You must make available free of charge copies of the complete source code of the FDK AAC Codec and your
|
||||
modifications thereto to recipients of copies in binary form.
|
||||
|
||||
The name of Fraunhofer may not be used to endorse or promote products derived from this library without
|
||||
prior written permission.
|
||||
|
||||
You may not charge copyright license fees for anyone to use, copy or distribute the FDK AAC Codec
|
||||
software or your modifications thereto.
|
||||
|
||||
Your modified versions of the FDK AAC Codec must carry prominent notices stating that you changed the software
|
||||
and the date of any change. For modified versions of the FDK AAC Codec, the term
|
||||
"Fraunhofer FDK AAC Codec Library for Android" must be replaced by the term
|
||||
"Third-Party Modified Version of the Fraunhofer FDK AAC Codec Library for Android."
|
||||
|
||||
3. NO PATENT LICENSE
|
||||
|
||||
NO EXPRESS OR IMPLIED LICENSES TO ANY PATENT CLAIMS, including without limitation the patents of Fraunhofer,
|
||||
ARE GRANTED BY THIS SOFTWARE LICENSE. Fraunhofer provides no warranty of patent non-infringement with
|
||||
respect to this software.
|
||||
|
||||
You may use this FDK AAC Codec software or modifications thereto only for purposes that are authorized
|
||||
by appropriate patent licenses.
|
||||
|
||||
4. DISCLAIMER
|
||||
|
||||
This FDK AAC Codec software is provided by Fraunhofer on behalf of the copyright holders and contributors
|
||||
"AS IS" and WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES, including but not limited to the implied warranties
|
||||
of merchantability and fitness for a particular purpose. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR
|
||||
CONTRIBUTORS BE LIABLE for any direct, indirect, incidental, special, exemplary, or consequential damages,
|
||||
including but not limited to procurement of substitute goods or services; loss of use, data, or profits,
|
||||
or business interruption, however caused and on any theory of liability, whether in contract, strict
|
||||
liability, or tort (including negligence), arising in any way out of the use of this software, even if
|
||||
advised of the possibility of such damage.
|
||||
|
||||
5. CONTACT INFORMATION
|
||||
|
||||
Fraunhofer Institute for Integrated Circuits IIS
|
||||
Attention: Audio and Multimedia Departments - FDK AAC LL
|
||||
Am Wolfsmantel 33
|
||||
91058 Erlangen, Germany
|
||||
|
||||
www.iis.fraunhofer.de/amm
|
||||
amm-info@iis.fraunhofer.de
|
||||
----------------------------------------------------------------------------------------------------------- */
|
||||
|
||||
/*************************** Fraunhofer IIS FDK Tools **********************
|
||||
|
||||
Author(s):
|
||||
Description: fixed point intrinsics
|
||||
|
||||
******************************************************************************/
|
||||
|
||||
#if defined(__aarch64__) || defined(__AARCH64EL__)
|
||||
|
||||
#if defined(__GNUC__) /* cppp replaced: elif */
|
||||
/* ARM with GNU compiler */
|
||||
|
||||
#define FUNCTION_fixmuldiv2_DD
|
||||
|
||||
#define FUNCTION_fixmuldiv2BitExact_DD
|
||||
#define fixmuldiv2BitExact_DD(a,b) fixmuldiv2_DD(a,b)
|
||||
#define FUNCTION_fixmulBitExact_DD
|
||||
#define fixmulBitExact_DD(a,b) fixmul_DD(a,b)
|
||||
|
||||
inline INT fixmuldiv2_DD (const INT a, const INT b)
|
||||
{
|
||||
INT result ;
|
||||
result = ((long long)a * b)>>32;
|
||||
return result ;
|
||||
}
|
||||
|
||||
#endif /* defined(__GNUC__) */
|
||||
|
||||
#endif /* __aarch64__ */
|
||||
|
||||
@ -97,9 +97,6 @@ amm-info@iis.fraunhofer.de
|
||||
#if defined(__arm__)
|
||||
#include "arm/clz_arm.h"
|
||||
|
||||
#elif defined(__aarch64__) || defined(__AARCH64EL__)
|
||||
#include "aarch64/clz_aarch64.h"
|
||||
|
||||
#elif defined(__mips__) /* cppp replaced: elif */
|
||||
#include "mips/clz_mips.h"
|
||||
|
||||
@ -109,6 +106,9 @@ amm-info@iis.fraunhofer.de
|
||||
#elif defined(__powerpc__)
|
||||
#include "ppc/clz_ppc.h"
|
||||
|
||||
#elif defined(__aarch64__) || defined(__AARCH64EL__)
|
||||
#include "aarch64/clz_aarch64.h"
|
||||
|
||||
#endif /* all cores */
|
||||
|
||||
|
||||
|
||||
@ -98,9 +98,6 @@ amm-info@iis.fraunhofer.de
|
||||
#if defined(__arm__)
|
||||
#include "arm/fixmul_arm.h"
|
||||
|
||||
#elif defined(__aarch64__) || defined(__AARCH64EL__)
|
||||
#include "aarch64/fixmul_aarch64.h"
|
||||
|
||||
#elif defined(__mips__) /* cppp replaced: elif */
|
||||
#include "mips/fixmul_mips.h"
|
||||
|
||||
@ -110,6 +107,9 @@ amm-info@iis.fraunhofer.de
|
||||
#elif defined(__powerpc__)
|
||||
#include "ppc/fixmul_ppc.h"
|
||||
|
||||
#elif defined(__aarch64__) || defined(__AARCH64EL__)
|
||||
#define NO_WARN_FIXMUL
|
||||
|
||||
#endif /* all cores */
|
||||
|
||||
/*************************************************************************
|
||||
@ -120,11 +120,13 @@ amm-info@iis.fraunhofer.de
|
||||
|
||||
#if !defined(FUNCTION_fixmuldiv2_DD)
|
||||
#define FUNCTION_fixmuldiv2_DD
|
||||
#ifndef NO_WARN_FIXMUL
|
||||
#if defined(_MSC_VER) || defined(__CC_ARM) || defined(__ANALOG_EXTENSIONS__) || defined(__TI_COMPILER_VERSION__)
|
||||
#pragma message ("Extremely slow implementation of fixmuldiv2_DD !!")
|
||||
#else
|
||||
#warning Extremely slow implementation of fixmuldiv2_DD !!
|
||||
#endif
|
||||
#endif
|
||||
inline LONG fixmuldiv2_DD (const LONG a, const LONG b)
|
||||
{
|
||||
return (LONG) ((((INT64)a) * b) >> 32) ;
|
||||
@ -133,11 +135,13 @@ inline LONG fixmuldiv2_DD (const LONG a, const LONG b)
|
||||
|
||||
#if !defined(FUNCTION_fixmuldiv2BitExact_DD)
|
||||
#define FUNCTION_fixmuldiv2BitExact_DD
|
||||
#ifndef NO_WARN_FIXMUL
|
||||
#if defined(_MSC_VER) || defined(__CC_ARM) || defined(__ANALOG_EXTENSIONS__) || defined(__TI_COMPILER_VERSION__)
|
||||
#pragma message ("Extremely slow implementation of fixmuldiv2BitExact_DD !!")
|
||||
#else
|
||||
#warning Extremely slow implementation of fixmuldiv2BitExact_DD !!
|
||||
#endif
|
||||
#endif
|
||||
inline LONG fixmuldiv2BitExact_DD (const LONG a, const LONG b)
|
||||
{
|
||||
return (LONG) ((((INT64)a) * b) >> 32) ;
|
||||
@ -152,11 +156,13 @@ inline LONG fixmul_DD (const LONG a, const LONG b)
|
||||
|
||||
#if !defined(FUNCTION_fixmulBitExact_DD)
|
||||
#define FUNCTION_fixmulBitExact_DD
|
||||
#ifndef NO_WARN_FIXMUL
|
||||
#if defined(_MSC_VER) || defined(__CC_ARM) || defined(__ANALOG_EXTENSIONS__) || defined(__TI_COMPILER_VERSION__) || defined(__XTENSA__)
|
||||
#pragma message ("Extremely slow implementation of fixmulBitExact_DD !!")
|
||||
#else
|
||||
#warning Extremely slow implementation of fixmulBitExact_DD !!
|
||||
#endif
|
||||
#endif
|
||||
inline LONG fixmulBitExact_DD (const LONG a, const LONG b)
|
||||
{
|
||||
return ( (LONG) ((((INT64)a) * b) >> 32) ) << 1;
|
||||
|
||||
@ -1260,9 +1260,9 @@ const FIXP_WTP * FDKgetWindowSlope(int length, int shape)
|
||||
#define QTCFL(x) FL2FXCONST_SGL(x)
|
||||
#define QTC(x) FX_DBL2FXCONST_SGL(x)
|
||||
#else
|
||||
#define QFC(x) ((FIXP_DBL)(x))
|
||||
#define QFC(x) (x)
|
||||
#define QTCFL(x) FL2FXCONST_DBL(x)
|
||||
#define QTC(x) ((FIXP_DBL)(x))
|
||||
#define QTC(x) (x)
|
||||
#endif /* ARCH_PREFER_MULT_32x16 */
|
||||
|
||||
#ifndef LOW_POWER_SBR_ONLY
|
||||
|
||||
@ -324,12 +324,12 @@ void dct_IV(FIXP_DBL *pDat,
|
||||
{
|
||||
FIXP_DBL *RESTRICT pDat_0 = &pDat[0];
|
||||
FIXP_DBL *RESTRICT pDat_1 = &pDat[L - 2];
|
||||
int i;
|
||||
register int i;
|
||||
|
||||
/* 29 cycles on ARM926 */
|
||||
for (i = 0; i < M-1; i+=2,pDat_0+=2,pDat_1-=2)
|
||||
{
|
||||
FIXP_DBL accu1,accu2,accu3,accu4;
|
||||
register FIXP_DBL accu1,accu2,accu3,accu4;
|
||||
|
||||
accu1 = pDat_1[1]; accu2 = pDat_0[0];
|
||||
accu3 = pDat_0[1]; accu4 = pDat_1[0];
|
||||
@ -342,7 +342,7 @@ void dct_IV(FIXP_DBL *pDat,
|
||||
}
|
||||
if (M&1)
|
||||
{
|
||||
FIXP_DBL accu1,accu2;
|
||||
register FIXP_DBL accu1,accu2;
|
||||
|
||||
accu1 = pDat_1[1]; accu2 = pDat_0[0];
|
||||
|
||||
@ -363,7 +363,7 @@ void dct_IV(FIXP_DBL *pDat,
|
||||
{
|
||||
FIXP_DBL *RESTRICT pDat_0 = &pDat[0];
|
||||
FIXP_DBL *RESTRICT pDat_1 = &pDat[L - 2];
|
||||
FIXP_DBL accu1,accu2,accu3,accu4;
|
||||
register FIXP_DBL accu1,accu2,accu3,accu4;
|
||||
int idx, i;
|
||||
|
||||
/* Sin and Cos values are 0.0f and 1.0f */
|
||||
@ -450,12 +450,12 @@ void dst_IV(FIXP_DBL *pDat,
|
||||
FIXP_DBL *RESTRICT pDat_0 = &pDat[0];
|
||||
FIXP_DBL *RESTRICT pDat_1 = &pDat[L - 2];
|
||||
|
||||
int i;
|
||||
register int i;
|
||||
|
||||
/* 34 cycles on ARM926 */
|
||||
for (i = 0; i < M-1; i+=2,pDat_0+=2,pDat_1-=2)
|
||||
{
|
||||
FIXP_DBL accu1,accu2,accu3,accu4;
|
||||
register FIXP_DBL accu1,accu2,accu3,accu4;
|
||||
|
||||
accu1 = pDat_1[1]; accu2 = -pDat_0[0];
|
||||
accu3 = pDat_0[1]; accu4 = -pDat_1[0];
|
||||
@ -468,7 +468,7 @@ void dst_IV(FIXP_DBL *pDat,
|
||||
}
|
||||
if (M&1)
|
||||
{
|
||||
FIXP_DBL accu1,accu2;
|
||||
register FIXP_DBL accu1,accu2;
|
||||
|
||||
accu1 = pDat_1[1]; accu2 = -pDat_0[0];
|
||||
|
||||
@ -488,7 +488,7 @@ void dst_IV(FIXP_DBL *pDat,
|
||||
{
|
||||
FIXP_DBL *RESTRICT pDat_0;
|
||||
FIXP_DBL *RESTRICT pDat_1;
|
||||
FIXP_DBL accu1,accu2,accu3,accu4;
|
||||
register FIXP_DBL accu1,accu2,accu3,accu4;
|
||||
int idx, i;
|
||||
|
||||
pDat_0 = &pDat[0];
|
||||
|
||||
@ -322,31 +322,31 @@ LNK_SECTION_CODE_L1 FIXP_DBL CalcInvLdData(FIXP_DBL x)
|
||||
|
||||
LNK_SECTION_CONSTDATA_L1
|
||||
static const FIXP_DBL ldIntCoeff[] = {
|
||||
(FIXP_DBL)0x80000001, (FIXP_DBL)0x00000000, (FIXP_DBL)0x02000000, (FIXP_DBL)0x032b8034, (FIXP_DBL)0x04000000, (FIXP_DBL)0x04a4d3c2, (FIXP_DBL)0x052b8034, (FIXP_DBL)0x059d5da0,
|
||||
(FIXP_DBL)0x06000000, (FIXP_DBL)0x06570069, (FIXP_DBL)0x06a4d3c2, (FIXP_DBL)0x06eb3a9f, (FIXP_DBL)0x072b8034, (FIXP_DBL)0x0766a009, (FIXP_DBL)0x079d5da0, (FIXP_DBL)0x07d053f7,
|
||||
(FIXP_DBL)0x08000000, (FIXP_DBL)0x082cc7ee, (FIXP_DBL)0x08570069, (FIXP_DBL)0x087ef05b, (FIXP_DBL)0x08a4d3c2, (FIXP_DBL)0x08c8ddd4, (FIXP_DBL)0x08eb3a9f, (FIXP_DBL)0x090c1050,
|
||||
(FIXP_DBL)0x092b8034, (FIXP_DBL)0x0949a785, (FIXP_DBL)0x0966a009, (FIXP_DBL)0x0982809d, (FIXP_DBL)0x099d5da0, (FIXP_DBL)0x09b74949, (FIXP_DBL)0x09d053f7, (FIXP_DBL)0x09e88c6b,
|
||||
(FIXP_DBL)0x0a000000, (FIXP_DBL)0x0a16bad3, (FIXP_DBL)0x0a2cc7ee, (FIXP_DBL)0x0a423162, (FIXP_DBL)0x0a570069, (FIXP_DBL)0x0a6b3d79, (FIXP_DBL)0x0a7ef05b, (FIXP_DBL)0x0a92203d,
|
||||
(FIXP_DBL)0x0aa4d3c2, (FIXP_DBL)0x0ab7110e, (FIXP_DBL)0x0ac8ddd4, (FIXP_DBL)0x0ada3f60, (FIXP_DBL)0x0aeb3a9f, (FIXP_DBL)0x0afbd42b, (FIXP_DBL)0x0b0c1050, (FIXP_DBL)0x0b1bf312,
|
||||
(FIXP_DBL)0x0b2b8034, (FIXP_DBL)0x0b3abb40, (FIXP_DBL)0x0b49a785, (FIXP_DBL)0x0b584822, (FIXP_DBL)0x0b66a009, (FIXP_DBL)0x0b74b1fd, (FIXP_DBL)0x0b82809d, (FIXP_DBL)0x0b900e61,
|
||||
(FIXP_DBL)0x0b9d5da0, (FIXP_DBL)0x0baa708f, (FIXP_DBL)0x0bb74949, (FIXP_DBL)0x0bc3e9ca, (FIXP_DBL)0x0bd053f7, (FIXP_DBL)0x0bdc899b, (FIXP_DBL)0x0be88c6b, (FIXP_DBL)0x0bf45e09,
|
||||
(FIXP_DBL)0x0c000000, (FIXP_DBL)0x0c0b73cb, (FIXP_DBL)0x0c16bad3, (FIXP_DBL)0x0c21d671, (FIXP_DBL)0x0c2cc7ee, (FIXP_DBL)0x0c379085, (FIXP_DBL)0x0c423162, (FIXP_DBL)0x0c4caba8,
|
||||
(FIXP_DBL)0x0c570069, (FIXP_DBL)0x0c6130af, (FIXP_DBL)0x0c6b3d79, (FIXP_DBL)0x0c7527b9, (FIXP_DBL)0x0c7ef05b, (FIXP_DBL)0x0c88983f, (FIXP_DBL)0x0c92203d, (FIXP_DBL)0x0c9b8926,
|
||||
(FIXP_DBL)0x0ca4d3c2, (FIXP_DBL)0x0cae00d2, (FIXP_DBL)0x0cb7110e, (FIXP_DBL)0x0cc0052b, (FIXP_DBL)0x0cc8ddd4, (FIXP_DBL)0x0cd19bb0, (FIXP_DBL)0x0cda3f60, (FIXP_DBL)0x0ce2c97d,
|
||||
(FIXP_DBL)0x0ceb3a9f, (FIXP_DBL)0x0cf39355, (FIXP_DBL)0x0cfbd42b, (FIXP_DBL)0x0d03fda9, (FIXP_DBL)0x0d0c1050, (FIXP_DBL)0x0d140ca0, (FIXP_DBL)0x0d1bf312, (FIXP_DBL)0x0d23c41d,
|
||||
(FIXP_DBL)0x0d2b8034, (FIXP_DBL)0x0d3327c7, (FIXP_DBL)0x0d3abb40, (FIXP_DBL)0x0d423b08, (FIXP_DBL)0x0d49a785, (FIXP_DBL)0x0d510118, (FIXP_DBL)0x0d584822, (FIXP_DBL)0x0d5f7cff,
|
||||
(FIXP_DBL)0x0d66a009, (FIXP_DBL)0x0d6db197, (FIXP_DBL)0x0d74b1fd, (FIXP_DBL)0x0d7ba190, (FIXP_DBL)0x0d82809d, (FIXP_DBL)0x0d894f75, (FIXP_DBL)0x0d900e61, (FIXP_DBL)0x0d96bdad,
|
||||
(FIXP_DBL)0x0d9d5da0, (FIXP_DBL)0x0da3ee7f, (FIXP_DBL)0x0daa708f, (FIXP_DBL)0x0db0e412, (FIXP_DBL)0x0db74949, (FIXP_DBL)0x0dbda072, (FIXP_DBL)0x0dc3e9ca, (FIXP_DBL)0x0dca258e,
|
||||
(FIXP_DBL)0x0dd053f7, (FIXP_DBL)0x0dd6753e, (FIXP_DBL)0x0ddc899b, (FIXP_DBL)0x0de29143, (FIXP_DBL)0x0de88c6b, (FIXP_DBL)0x0dee7b47, (FIXP_DBL)0x0df45e09, (FIXP_DBL)0x0dfa34e1,
|
||||
(FIXP_DBL)0x0e000000, (FIXP_DBL)0x0e05bf94, (FIXP_DBL)0x0e0b73cb, (FIXP_DBL)0x0e111cd2, (FIXP_DBL)0x0e16bad3, (FIXP_DBL)0x0e1c4dfb, (FIXP_DBL)0x0e21d671, (FIXP_DBL)0x0e275460,
|
||||
(FIXP_DBL)0x0e2cc7ee, (FIXP_DBL)0x0e323143, (FIXP_DBL)0x0e379085, (FIXP_DBL)0x0e3ce5d8, (FIXP_DBL)0x0e423162, (FIXP_DBL)0x0e477346, (FIXP_DBL)0x0e4caba8, (FIXP_DBL)0x0e51daa8,
|
||||
(FIXP_DBL)0x0e570069, (FIXP_DBL)0x0e5c1d0b, (FIXP_DBL)0x0e6130af, (FIXP_DBL)0x0e663b74, (FIXP_DBL)0x0e6b3d79, (FIXP_DBL)0x0e7036db, (FIXP_DBL)0x0e7527b9, (FIXP_DBL)0x0e7a1030,
|
||||
(FIXP_DBL)0x0e7ef05b, (FIXP_DBL)0x0e83c857, (FIXP_DBL)0x0e88983f, (FIXP_DBL)0x0e8d602e, (FIXP_DBL)0x0e92203d, (FIXP_DBL)0x0e96d888, (FIXP_DBL)0x0e9b8926, (FIXP_DBL)0x0ea03232,
|
||||
(FIXP_DBL)0x0ea4d3c2, (FIXP_DBL)0x0ea96df0, (FIXP_DBL)0x0eae00d2, (FIXP_DBL)0x0eb28c7f, (FIXP_DBL)0x0eb7110e, (FIXP_DBL)0x0ebb8e96, (FIXP_DBL)0x0ec0052b, (FIXP_DBL)0x0ec474e4,
|
||||
(FIXP_DBL)0x0ec8ddd4, (FIXP_DBL)0x0ecd4012, (FIXP_DBL)0x0ed19bb0, (FIXP_DBL)0x0ed5f0c4, (FIXP_DBL)0x0eda3f60, (FIXP_DBL)0x0ede8797, (FIXP_DBL)0x0ee2c97d, (FIXP_DBL)0x0ee70525,
|
||||
(FIXP_DBL)0x0eeb3a9f, (FIXP_DBL)0x0eef69ff, (FIXP_DBL)0x0ef39355, (FIXP_DBL)0x0ef7b6b4, (FIXP_DBL)0x0efbd42b, (FIXP_DBL)0x0effebcd, (FIXP_DBL)0x0f03fda9, (FIXP_DBL)0x0f0809cf,
|
||||
(FIXP_DBL)0x0f0c1050, (FIXP_DBL)0x0f10113b, (FIXP_DBL)0x0f140ca0, (FIXP_DBL)0x0f18028d, (FIXP_DBL)0x0f1bf312, (FIXP_DBL)0x0f1fde3d, (FIXP_DBL)0x0f23c41d, (FIXP_DBL)0x0f27a4c0,
|
||||
(FIXP_DBL)0x0f2b8034
|
||||
0x80000001, 0x00000000, 0x02000000, 0x032b8034, 0x04000000, 0x04a4d3c2, 0x052b8034, 0x059d5da0,
|
||||
0x06000000, 0x06570069, 0x06a4d3c2, 0x06eb3a9f, 0x072b8034, 0x0766a009, 0x079d5da0, 0x07d053f7,
|
||||
0x08000000, 0x082cc7ee, 0x08570069, 0x087ef05b, 0x08a4d3c2, 0x08c8ddd4, 0x08eb3a9f, 0x090c1050,
|
||||
0x092b8034, 0x0949a785, 0x0966a009, 0x0982809d, 0x099d5da0, 0x09b74949, 0x09d053f7, 0x09e88c6b,
|
||||
0x0a000000, 0x0a16bad3, 0x0a2cc7ee, 0x0a423162, 0x0a570069, 0x0a6b3d79, 0x0a7ef05b, 0x0a92203d,
|
||||
0x0aa4d3c2, 0x0ab7110e, 0x0ac8ddd4, 0x0ada3f60, 0x0aeb3a9f, 0x0afbd42b, 0x0b0c1050, 0x0b1bf312,
|
||||
0x0b2b8034, 0x0b3abb40, 0x0b49a785, 0x0b584822, 0x0b66a009, 0x0b74b1fd, 0x0b82809d, 0x0b900e61,
|
||||
0x0b9d5da0, 0x0baa708f, 0x0bb74949, 0x0bc3e9ca, 0x0bd053f7, 0x0bdc899b, 0x0be88c6b, 0x0bf45e09,
|
||||
0x0c000000, 0x0c0b73cb, 0x0c16bad3, 0x0c21d671, 0x0c2cc7ee, 0x0c379085, 0x0c423162, 0x0c4caba8,
|
||||
0x0c570069, 0x0c6130af, 0x0c6b3d79, 0x0c7527b9, 0x0c7ef05b, 0x0c88983f, 0x0c92203d, 0x0c9b8926,
|
||||
0x0ca4d3c2, 0x0cae00d2, 0x0cb7110e, 0x0cc0052b, 0x0cc8ddd4, 0x0cd19bb0, 0x0cda3f60, 0x0ce2c97d,
|
||||
0x0ceb3a9f, 0x0cf39355, 0x0cfbd42b, 0x0d03fda9, 0x0d0c1050, 0x0d140ca0, 0x0d1bf312, 0x0d23c41d,
|
||||
0x0d2b8034, 0x0d3327c7, 0x0d3abb40, 0x0d423b08, 0x0d49a785, 0x0d510118, 0x0d584822, 0x0d5f7cff,
|
||||
0x0d66a009, 0x0d6db197, 0x0d74b1fd, 0x0d7ba190, 0x0d82809d, 0x0d894f75, 0x0d900e61, 0x0d96bdad,
|
||||
0x0d9d5da0, 0x0da3ee7f, 0x0daa708f, 0x0db0e412, 0x0db74949, 0x0dbda072, 0x0dc3e9ca, 0x0dca258e,
|
||||
0x0dd053f7, 0x0dd6753e, 0x0ddc899b, 0x0de29143, 0x0de88c6b, 0x0dee7b47, 0x0df45e09, 0x0dfa34e1,
|
||||
0x0e000000, 0x0e05bf94, 0x0e0b73cb, 0x0e111cd2, 0x0e16bad3, 0x0e1c4dfb, 0x0e21d671, 0x0e275460,
|
||||
0x0e2cc7ee, 0x0e323143, 0x0e379085, 0x0e3ce5d8, 0x0e423162, 0x0e477346, 0x0e4caba8, 0x0e51daa8,
|
||||
0x0e570069, 0x0e5c1d0b, 0x0e6130af, 0x0e663b74, 0x0e6b3d79, 0x0e7036db, 0x0e7527b9, 0x0e7a1030,
|
||||
0x0e7ef05b, 0x0e83c857, 0x0e88983f, 0x0e8d602e, 0x0e92203d, 0x0e96d888, 0x0e9b8926, 0x0ea03232,
|
||||
0x0ea4d3c2, 0x0ea96df0, 0x0eae00d2, 0x0eb28c7f, 0x0eb7110e, 0x0ebb8e96, 0x0ec0052b, 0x0ec474e4,
|
||||
0x0ec8ddd4, 0x0ecd4012, 0x0ed19bb0, 0x0ed5f0c4, 0x0eda3f60, 0x0ede8797, 0x0ee2c97d, 0x0ee70525,
|
||||
0x0eeb3a9f, 0x0eef69ff, 0x0ef39355, 0x0ef7b6b4, 0x0efbd42b, 0x0effebcd, 0x0f03fda9, 0x0f0809cf,
|
||||
0x0f0c1050, 0x0f10113b, 0x0f140ca0, 0x0f18028d, 0x0f1bf312, 0x0f1fde3d, 0x0f23c41d, 0x0f27a4c0,
|
||||
0x0f2b8034
|
||||
};
|
||||
|
||||
|
||||
|
||||
@ -97,10 +97,7 @@ amm-info@iis.fraunhofer.de
|
||||
#ifdef FUNCTION_LPPTRANSPOSER_func1
|
||||
|
||||
/* Note: This code requires only 43 cycles per iteration instead of 61 on ARM926EJ-S */
|
||||
#ifdef __GNUC__
|
||||
__attribute__ ((noinline))
|
||||
#endif
|
||||
static void lppTransposer_func1(
|
||||
__attribute__ ((noinline)) static void lppTransposer_func1(
|
||||
FIXP_DBL *lowBandReal,
|
||||
FIXP_DBL *lowBandImag,
|
||||
FIXP_DBL **qmfBufferReal,
|
||||
|
||||
@ -2031,7 +2031,7 @@ static void adjustTimeSlotHQ(
|
||||
FIXP_SGL direct_ratio = /*FL2FXCONST_SGL(1.0f) */ (FIXP_SGL)MAXVAL_SGL - smooth_ratio;
|
||||
int index = *ptrPhaseIndex;
|
||||
UCHAR harmIndex = *ptrHarmIndex;
|
||||
int freqInvFlag = (lowSubband & 1);
|
||||
register int freqInvFlag = (lowSubband & 1);
|
||||
FIXP_DBL sineLevel;
|
||||
int shift;
|
||||
|
||||
|
||||
@ -1185,7 +1185,7 @@ const FIXP_DBL Alphas[NO_ICC_LEVELS] = {
|
||||
#define FL2FXCONST_PS FL2FXCONST_SGL
|
||||
#else
|
||||
#define FIXP_PS FIXP_DBL
|
||||
#define FXP_CAST(x) ((FIXP_DBL)(x))
|
||||
#define FXP_CAST
|
||||
#define FL2FXCONST_PS FL2FXCONST_DBL
|
||||
#endif
|
||||
|
||||
|
||||
@ -1939,7 +1939,7 @@ INT sbrEncoder_Init(
|
||||
|
||||
|
||||
|
||||
if ( aot==AOT_PS ) {
|
||||
if ( (aot==AOT_PS) ) {
|
||||
usePs = 1;
|
||||
}
|
||||
if ( aot==AOT_ER_AAC_ELD ) {
|
||||
|
||||
904
win32/getopt.h
904
win32/getopt.h
@ -1,904 +0,0 @@
|
||||
#ifndef __GETOPT_H__
|
||||
/**
|
||||
* DISCLAIMER
|
||||
* This file has no copyright assigned and is placed in the Public Domain.
|
||||
* This file is part of the mingw-w64 runtime package.
|
||||
*
|
||||
* The mingw-w64 runtime package and its code is distributed in the hope that it
|
||||
* will be useful but WITHOUT ANY WARRANTY. ALL WARRANTIES, EXPRESSED OR
|
||||
* IMPLIED ARE HEREBY DISCLAIMED. This includes but is not limited to
|
||||
* warranties of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
*/
|
||||
/*
|
||||
* Implementation of the `getopt', `getopt_long' and `getopt_long_only'
|
||||
* APIs, for inclusion in the MinGW runtime library.
|
||||
*
|
||||
* This file is part of the MinGW32 package set.
|
||||
*
|
||||
* Written by Keith Marshall <keithmarshall@users.sourceforge.net>
|
||||
* Copyright (C) 2008, 2009, 2011, 2012, MinGW.org Project.
|
||||
*
|
||||
* ---------------------------------------------------------------------------
|
||||
*
|
||||
* Permission is hereby granted, free of charge, to any person obtaining a
|
||||
* copy of this software and associated documentation files (the "Software"),
|
||||
* to deal in the Software without restriction, including without limitation
|
||||
* the rights to use, copy, modify, merge, publish, distribute, sublicense,
|
||||
* and/or sell copies of the Software, and to permit persons to whom the
|
||||
* Software is furnished to do so, subject to the following conditions:
|
||||
*
|
||||
* The above copyright notice, this permission notice, and the following
|
||||
* disclaimer shall be included in all copies or substantial portions of
|
||||
* the Software.
|
||||
*
|
||||
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
|
||||
* OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
||||
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
|
||||
* THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
||||
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
|
||||
* FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
|
||||
* DEALINGS IN THE SOFTWARE.
|
||||
*
|
||||
* ---------------------------------------------------------------------------
|
||||
*
|
||||
*/
|
||||
|
||||
#define __GETOPT_H__
|
||||
|
||||
/* All the headers include this file. */
|
||||
#include <crtdefs.h>
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
#include <stdarg.h>
|
||||
|
||||
#ifdef __cplusplus
|
||||
extern "C" {
|
||||
#endif
|
||||
|
||||
extern int optind; /* index of first non-option in argv */
|
||||
extern int optopt; /* single option character, as parsed */
|
||||
extern int opterr; /* flag to enable built-in diagnostics... */
|
||||
/* (user may set to zero, to suppress) */
|
||||
|
||||
extern char *optarg; /* pointer to argument of current option */
|
||||
|
||||
/* Identify how to get the calling program name, for use in messages...
|
||||
*/
|
||||
#ifdef __CYGWIN__
|
||||
/*
|
||||
* CYGWIN uses this DLL reference...
|
||||
*/
|
||||
# define PROGNAME __progname
|
||||
extern char __declspec(dllimport) *__progname;
|
||||
#else
|
||||
/*
|
||||
* ...while elsewhere, we simply use the first argument passed.
|
||||
*/
|
||||
# define PROGNAME *argv
|
||||
#endif
|
||||
|
||||
extern int getopt(int nargc, char * const *nargv, const char *options);
|
||||
|
||||
#ifdef _BSD_SOURCE
|
||||
/*
|
||||
* BSD adds the non-standard `optreset' feature, for reinitialisation
|
||||
* of `getopt' parsing. We support this feature, for applications which
|
||||
* proclaim their BSD heritage, before including this header; however,
|
||||
* to maintain portability, developers are advised to avoid it.
|
||||
*/
|
||||
# define optreset __mingw_optreset
|
||||
extern int optreset;
|
||||
#endif
|
||||
#ifdef __cplusplus
|
||||
}
|
||||
#endif
|
||||
/*
|
||||
* POSIX requires the `getopt' API to be specified in `unistd.h';
|
||||
* thus, `unistd.h' includes this header. However, we do not want
|
||||
* to expose the `getopt_long' or `getopt_long_only' APIs, when
|
||||
* included in this manner. Thus, close the standard __GETOPT_H__
|
||||
* declarations block, and open an additional __GETOPT_LONG_H__
|
||||
* specific block, only when *not* __UNISTD_H_SOURCED__, in which
|
||||
* to declare the extended API.
|
||||
*/
|
||||
#endif /* !defined(__GETOPT_H__) */
|
||||
|
||||
#if !defined(__UNISTD_H_SOURCED__) && !defined(__GETOPT_LONG_H__)
|
||||
#define __GETOPT_LONG_H__
|
||||
|
||||
#ifdef __cplusplus
|
||||
extern "C" {
|
||||
#endif
|
||||
|
||||
struct option /* specification for a long form option... */
|
||||
{
|
||||
const char *name; /* option name, without leading hyphens */
|
||||
int has_arg; /* does it take an argument? */
|
||||
int *flag; /* where to save its status, or NULL */
|
||||
int val; /* its associated status value */
|
||||
};
|
||||
|
||||
enum /* permitted values for its `has_arg' field... */
|
||||
{
|
||||
no_argument = 0, /* option never takes an argument */
|
||||
required_argument, /* option always requires an argument */
|
||||
optional_argument /* option may take an argument */
|
||||
};
|
||||
|
||||
extern int getopt_long(int nargc, char * const *nargv, const char *options,
|
||||
const struct option *long_options, int *idx);
|
||||
extern int getopt_long_only(int nargc, char * const *nargv, const char *options,
|
||||
const struct option *long_options, int *idx);
|
||||
/*
|
||||
* Previous MinGW implementation had...
|
||||
*/
|
||||
#ifndef HAVE_DECL_GETOPT
|
||||
/*
|
||||
* ...for the long form API only; keep this for compatibility.
|
||||
*/
|
||||
# define HAVE_DECL_GETOPT 1
|
||||
#endif
|
||||
|
||||
|
||||
|
||||
/* Identify how to get the calling program name, for use in messages...
|
||||
*/
|
||||
#ifdef __CYGWIN__
|
||||
/*
|
||||
* CYGWIN uses this DLL reference...
|
||||
*/
|
||||
# define PROGNAME __progname
|
||||
extern char __declspec(dllimport) *__progname;
|
||||
#else
|
||||
/*
|
||||
* ...while elsewhere, we simply use the first argument passed.
|
||||
*/
|
||||
# define PROGNAME *argv
|
||||
#endif
|
||||
|
||||
/* Initialise the public variables. */
|
||||
|
||||
int optind = 1; /* index for first non-option arg */
|
||||
int opterr = 1; /* enable built-in error messages */
|
||||
|
||||
char *optarg = NULL; /* pointer to current option argument */
|
||||
|
||||
#define CHAR char /* argument type selector */
|
||||
|
||||
#define getopt_switchar '-' /* option prefix character in argv */
|
||||
#define getopt_pluschar '+' /* prefix for POSIX mode in optstring */
|
||||
#define getopt_takes_argument ':' /* marker for optarg in optstring */
|
||||
#define getopt_arg_assign '=' /* longopt argument field separator */
|
||||
#define getopt_unknown '?' /* return code for unmatched option */
|
||||
#define getopt_ordered 1 /* return code for ordered non-option */
|
||||
|
||||
#define getopt_all_done -1 /* return code to indicate completion */
|
||||
|
||||
enum
|
||||
{ /* All `getopt' API functions are implemented via calls to the
|
||||
* common static function `getopt_parse()'; these `mode' selectors
|
||||
* determine the behaviour of `getopt_parse()', to deliver the
|
||||
* appropriate result in each case.
|
||||
*/
|
||||
getopt_mode_standard = 0, /* getopt() */
|
||||
getopt_mode_long, /* getopt_long() */
|
||||
getopt_mode_long_only /* getopt_long_only() */
|
||||
};
|
||||
|
||||
enum
|
||||
{ /* When attempting to match a command line argument to a long form option,
|
||||
* these indicate the status of the match.
|
||||
*/
|
||||
getopt_no_match = 0, /* no successful match */
|
||||
getopt_abbreviated_match, /* argument is an abbreviation for an option */
|
||||
getopt_exact_match /* argument matches the full option name */
|
||||
};
|
||||
|
||||
int optopt = getopt_unknown; /* return value for option being evaluated */
|
||||
|
||||
/* Some BSD applications expect to be able to reinitialise `getopt' parsing
|
||||
* by setting a global variable called `optreset'. We provide an obfuscated
|
||||
* API, which allows applications to emulate this brain damage; however, any
|
||||
* use of this is non-portable, and is strongly discouraged.
|
||||
*/
|
||||
#define optreset __mingw_optreset
|
||||
int optreset = 0;
|
||||
|
||||
static
|
||||
int getopt_missing_arg( const CHAR *optstring )
|
||||
{
|
||||
/* Helper function to determine the appropriate return value,
|
||||
* for the case where a required option argument is missing.
|
||||
*/
|
||||
if( (*optstring == getopt_pluschar) || (*optstring == getopt_switchar) )
|
||||
++optstring;
|
||||
return (*optstring == getopt_takes_argument)
|
||||
? getopt_takes_argument
|
||||
: getopt_unknown;
|
||||
}
|
||||
|
||||
/* `complain' macro facilitates the generation of simple built-in
|
||||
* error messages, displayed on various fault conditions, provided
|
||||
* `opterr' is non-zero.
|
||||
*/
|
||||
#define complain( MSG, ARG ) if( opterr ) \
|
||||
fprintf( stderr, "%s: "MSG"\n", PROGNAME, ARG )
|
||||
|
||||
static
|
||||
int getopt_argerror( int mode, char *fmt, CHAR *prog, struct option *opt, int retval )
|
||||
{
|
||||
/* Helper function, to generate more complex built-in error
|
||||
* messages, for invalid arguments to long form options ...
|
||||
*/
|
||||
if( opterr )
|
||||
{
|
||||
/* ... but, displayed only if `opterr' is non-zero.
|
||||
*/
|
||||
char flag[] = "--";
|
||||
if( mode != getopt_mode_long )
|
||||
/*
|
||||
* only display one hyphen, for implicit long form options,
|
||||
* improperly resolved by `getopt_long_only()'.
|
||||
*/
|
||||
flag[1] = 0;
|
||||
/*
|
||||
* always preface the program name ...
|
||||
*/
|
||||
fprintf( stderr, "%s: ", prog );
|
||||
/*
|
||||
* to the appropriate, option specific message.
|
||||
*/
|
||||
fprintf( stderr, fmt, flag, opt->name );
|
||||
}
|
||||
/* Whether displaying the message, or not, always set `optopt'
|
||||
* to identify the faulty option ...
|
||||
*/
|
||||
optopt = opt->val;
|
||||
/*
|
||||
* and return the `invalid option' indicator.
|
||||
*/
|
||||
return retval;
|
||||
}
|
||||
|
||||
/* `getopt_conventions' establish behavioural options, to control
|
||||
* the operation of `getopt_parse()', e.g. to select between POSIX
|
||||
* and GNU style argument parsing behaviour.
|
||||
*/
|
||||
#define getopt_set_conventions 0x1000
|
||||
#define getopt_posixly_correct 0x0010
|
||||
|
||||
static
|
||||
int getopt_conventions( int flags )
|
||||
{
|
||||
static int conventions = 0;
|
||||
|
||||
if( (conventions == 0) && ((flags & getopt_set_conventions) == 0) )
|
||||
{
|
||||
/* default conventions have not yet been established;
|
||||
* initialise them now!
|
||||
*/
|
||||
conventions = getopt_set_conventions;
|
||||
if( flags == getopt_pluschar )
|
||||
conventions |= getopt_posixly_correct;
|
||||
}
|
||||
|
||||
else if( flags & getopt_set_conventions )
|
||||
/*
|
||||
* default conventions may have already been established,
|
||||
* but this is a specific request to augment them.
|
||||
*/
|
||||
conventions |= flags;
|
||||
|
||||
/* in any event, return the currently established conventions.
|
||||
*/
|
||||
return conventions;
|
||||
}
|
||||
|
||||
static
|
||||
int is_switchar( CHAR flag )
|
||||
{
|
||||
/* A simple helper function, used to identify the switch character
|
||||
* introducing an optional command line argument.
|
||||
*/
|
||||
return flag == getopt_switchar;
|
||||
}
|
||||
|
||||
static
|
||||
const CHAR *getopt_match( CHAR lookup, const CHAR *opt_string )
|
||||
{
|
||||
/* Helper function, used to identify short form options.
|
||||
*/
|
||||
if( (*opt_string == getopt_pluschar) || (*opt_string == getopt_switchar) )
|
||||
++opt_string;
|
||||
if( *opt_string == getopt_takes_argument )
|
||||
++opt_string;
|
||||
do if( lookup == *opt_string ) return opt_string;
|
||||
while( *++opt_string );
|
||||
return NULL;
|
||||
}
|
||||
|
||||
static
|
||||
int getopt_match_long( const CHAR *nextchar, const CHAR *optname )
|
||||
{
|
||||
/* Helper function, used to identify potential matches for
|
||||
* long form options.
|
||||
*/
|
||||
CHAR matchchar;
|
||||
while( (matchchar = *nextchar++) && (matchchar == *optname) )
|
||||
/*
|
||||
* skip over initial substring which DOES match.
|
||||
*/
|
||||
++optname;
|
||||
|
||||
if( matchchar )
|
||||
{
|
||||
/* did NOT match the entire argument to an initial substring
|
||||
* of a defined option name ...
|
||||
*/
|
||||
if( matchchar != getopt_arg_assign )
|
||||
/*
|
||||
* ... and didn't stop at an `=' internal field separator,
|
||||
* so this is NOT a possible match.
|
||||
*/
|
||||
return getopt_no_match;
|
||||
|
||||
/* DID stop at an `=' internal field separator,
|
||||
* so this IS a possible match, and what follows is an
|
||||
* argument to the possibly matched option.
|
||||
*/
|
||||
optarg = (char *)(nextchar);
|
||||
}
|
||||
return *optname
|
||||
/*
|
||||
* if we DIDN'T match the ENTIRE text of the option name,
|
||||
* then it's a possible abbreviated match ...
|
||||
*/
|
||||
? getopt_abbreviated_match
|
||||
/*
|
||||
* but if we DID match the entire option name,
|
||||
* then it's a DEFINITE EXACT match.
|
||||
*/
|
||||
: getopt_exact_match;
|
||||
}
|
||||
|
||||
static
|
||||
int getopt_resolved( int mode, int argc, CHAR *const *argv, int *argind,
|
||||
struct option *opt, int index, int *retindex, const CHAR *optstring )
|
||||
{
|
||||
/* Helper function to establish appropriate return conditions,
|
||||
* on resolution of a long form option.
|
||||
*/
|
||||
if( retindex != NULL )
|
||||
*retindex = index;
|
||||
|
||||
/* On return, `optind' should normally refer to the argument, if any,
|
||||
* which follows the current one; it is convenient to set this, before
|
||||
* checking for the presence of any `optarg'.
|
||||
*/
|
||||
optind = *argind + 1;
|
||||
|
||||
if( optarg && (opt[index].has_arg == no_argument) )
|
||||
/*
|
||||
* it is an error for the user to specify an option specific argument
|
||||
* with an option which doesn't expect one!
|
||||
*/
|
||||
return getopt_argerror( mode, "option `%s%s' doesn't accept an argument\n",
|
||||
PROGNAME, opt + index, getopt_unknown );
|
||||
|
||||
else if( (optarg == NULL) && (opt[index].has_arg == required_argument) )
|
||||
{
|
||||
/* similarly, it is an error if no argument is specified
|
||||
* with an option which requires one ...
|
||||
*/
|
||||
if( optind < argc )
|
||||
/*
|
||||
* ... except that the requirement may be satisfied from
|
||||
* the following command line argument, if any ...
|
||||
*/
|
||||
optarg = argv[*argind = optind++];
|
||||
|
||||
else
|
||||
/* so fail this case, only if no such argument exists!
|
||||
*/
|
||||
return getopt_argerror( mode, "option `%s%s' requires an argument\n",
|
||||
PROGNAME, opt + index, getopt_missing_arg( optstring ) );
|
||||
}
|
||||
|
||||
/* when the caller has provided a return buffer ...
|
||||
*/
|
||||
if( opt[index].flag != NULL )
|
||||
{
|
||||
/* ... then we place the proper return value there,
|
||||
* and return a status code of zero ...
|
||||
*/
|
||||
*(opt[index].flag) = opt[index].val;
|
||||
return 0;
|
||||
}
|
||||
/* ... otherwise, the return value becomes the status code.
|
||||
*/
|
||||
return opt[index].val;
|
||||
}
|
||||
|
||||
static
|
||||
int getopt_verify( const CHAR *nextchar, const CHAR *optstring )
|
||||
{
|
||||
/* Helper function, called by getopt_parse() when invoked
|
||||
* by getopt_long_only(), to verify when an unmatched or an
|
||||
* ambiguously matched long form option string is valid as
|
||||
* a short form option specification.
|
||||
*/
|
||||
if( ! (nextchar && *nextchar && optstring && *optstring) )
|
||||
/*
|
||||
* There are no characters to be matched, or there are no
|
||||
* valid short form option characters to which they can be
|
||||
* matched, so this can never be valid.
|
||||
*/
|
||||
return 0;
|
||||
|
||||
while( *nextchar )
|
||||
{
|
||||
/* For each command line character in turn ...
|
||||
*/
|
||||
const CHAR *test;
|
||||
if( (test = getopt_match( *nextchar++, optstring )) == NULL )
|
||||
/*
|
||||
* ... there is no short form option to match the current
|
||||
* candidate, so the entire argument fails.
|
||||
*/
|
||||
return 0;
|
||||
|
||||
if( test[1] == getopt_takes_argument )
|
||||
/*
|
||||
* The current candidate is valid, and it matches an option
|
||||
* which takes an argument, so this command line argument is
|
||||
* a valid short form option specification; accept it.
|
||||
*/
|
||||
return 1;
|
||||
}
|
||||
/* If we get to here, then every character in the command line
|
||||
* argument was valid as a short form option; accept it.
|
||||
*/
|
||||
return 1;
|
||||
}
|
||||
|
||||
static
|
||||
#define getopt_std_args int argc, CHAR *const argv[], const CHAR *optstring
|
||||
int getopt_parse( int mode, getopt_std_args, ... )
|
||||
{
|
||||
/* Common core implementation for ALL `getopt' functions.
|
||||
*/
|
||||
static int argind = 0;
|
||||
static int optbase = 0;
|
||||
static const CHAR *nextchar = NULL;
|
||||
static int optmark = 0;
|
||||
|
||||
if( (optreset |= (optind < 1)) || (optind < optbase) )
|
||||
{
|
||||
/* POSIX does not prescribe any definitive mechanism for restarting
|
||||
* a `getopt' scan, but some applications may require such capability.
|
||||
* We will support it, by allowing the caller to adjust the value of
|
||||
* `optind' downwards, (nominally setting it to zero). Since POSIX
|
||||
* wants `optind' to have an initial value of one, but we want all
|
||||
* of our internal place holders to be initialised to zero, when we
|
||||
* are called for the first time, we will handle such a reset by
|
||||
* adjusting all of the internal place holders to one less than
|
||||
* the adjusted `optind' value, (but never to less than zero).
|
||||
*/
|
||||
if( optreset )
|
||||
{
|
||||
/* User has explicitly requested reinitialisation...
|
||||
* We need to reset `optind' to it's normal initial value of 1,
|
||||
* to avoid a potential infinitely recursive loop; by doing this
|
||||
* up front, we also ensure that the remaining place holders
|
||||
* will be correctly reinitialised to no less than zero.
|
||||
*/
|
||||
optind = 1;
|
||||
|
||||
/* We also need to clear the `optreset' request...
|
||||
*/
|
||||
optreset = 0;
|
||||
}
|
||||
|
||||
/* Now, we may safely reinitialise the internal place holders, to
|
||||
* one less than `optind', without fear of making them negative.
|
||||
*/
|
||||
optmark = optbase = argind = optind - 1;
|
||||
nextchar = NULL;
|
||||
}
|
||||
|
||||
/* From a POSIX perspective, the following is `undefined behaviour';
|
||||
* we implement it thus, for compatibility with GNU and BSD getopt.
|
||||
*/
|
||||
else if( optind > (argind + 1) )
|
||||
{
|
||||
/* Some applications expect to be able to manipulate `optind',
|
||||
* causing `getopt' to skip over one or more elements of `argv';
|
||||
* POSIX doesn't require us to support this brain-damaged concept;
|
||||
* (indeed, POSIX defines no particular behaviour, in the event of
|
||||
* such usage, so it must be considered a bug for an application
|
||||
* to rely on any particular outcome); nonetheless, Mac-OS-X and
|
||||
* BSD actually provide *documented* support for this capability,
|
||||
* so we ensure that our internal place holders keep track of
|
||||
* external `optind' increments; (`argind' must lag by one).
|
||||
*/
|
||||
argind = optind - 1;
|
||||
|
||||
/* When `optind' is misused, in this fashion, we also abandon any
|
||||
* residual text in the argument we had been parsing; this is done
|
||||
* without any further processing of such abandoned text, assuming
|
||||
* that the caller is equipped to handle it appropriately.
|
||||
*/
|
||||
nextchar = NULL;
|
||||
}
|
||||
|
||||
if( nextchar && *nextchar )
|
||||
{
|
||||
/* we are parsing a standard, or short format, option argument ...
|
||||
*/
|
||||
const CHAR *optchar;
|
||||
if( (optchar = getopt_match( optopt = *nextchar++, optstring )) != NULL )
|
||||
{
|
||||
/* we have identified it as valid ...
|
||||
*/
|
||||
if( optchar[1] == getopt_takes_argument )
|
||||
{
|
||||
/* and determined that it requires an associated argument ...
|
||||
*/
|
||||
if( ! *(optarg = (char *)(nextchar)) )
|
||||
{
|
||||
/* the argument is NOT attached ...
|
||||
*/
|
||||
if( optchar[2] == getopt_takes_argument )
|
||||
/*
|
||||
* but this GNU extension marks it as optional,
|
||||
* so we don't provide one on this occasion.
|
||||
*/
|
||||
optarg = NULL;
|
||||
|
||||
/* otherwise this option takes a mandatory argument,
|
||||
* so, provided there is one available ...
|
||||
*/
|
||||
else if( (argc - argind) > 1 )
|
||||
/*
|
||||
* we take the following command line argument,
|
||||
* as the appropriate option argument.
|
||||
*/
|
||||
optarg = argv[++argind];
|
||||
|
||||
/* but if no further argument is available,
|
||||
* then there is nothing we can do, except for
|
||||
* issuing the requisite diagnostic message.
|
||||
*/
|
||||
else
|
||||
{
|
||||
complain( "option requires an argument -- %c", optopt );
|
||||
return getopt_missing_arg( optstring );
|
||||
}
|
||||
}
|
||||
optind = argind + 1;
|
||||
nextchar = NULL;
|
||||
}
|
||||
else
|
||||
optarg = NULL;
|
||||
optind = (nextchar && *nextchar) ? argind : argind + 1;
|
||||
return optopt;
|
||||
}
|
||||
/* if we didn't find a valid match for the specified option character,
|
||||
* then we fall through to here, so take appropriate diagnostic action.
|
||||
*/
|
||||
if( mode == getopt_mode_long_only )
|
||||
{
|
||||
complain( "unrecognised option `-%s'", --nextchar );
|
||||
nextchar = NULL;
|
||||
optopt = 0;
|
||||
}
|
||||
else
|
||||
complain( "invalid option -- %c", optopt );
|
||||
optind = (nextchar && *nextchar) ? argind : argind + 1;
|
||||
return getopt_unknown;
|
||||
}
|
||||
|
||||
if( optmark > optbase )
|
||||
{
|
||||
/* This can happen, in GNU parsing mode ONLY, when we have
|
||||
* skipped over non-option arguments, and found a subsequent
|
||||
* option argument; in this case we permute the arguments.
|
||||
*/
|
||||
int index;
|
||||
/*
|
||||
* `optspan' specifies the number of contiguous arguments
|
||||
* which are spanned by the current option, and so must be
|
||||
* moved together during permutation.
|
||||
*/
|
||||
const int optspan = argind - optmark + 1;
|
||||
/*
|
||||
* we use `this_arg' to store these temporarily.
|
||||
*/
|
||||
CHAR **this_arg = malloc(sizeof(CHAR*) * optspan);
|
||||
/*
|
||||
* we cannot manipulate `argv' directly, since the `getopt'
|
||||
* API prototypes it as `read-only'; this cast to `arglist'
|
||||
* allows us to work around that restriction.
|
||||
*/
|
||||
CHAR **arglist = (char **)(argv);
|
||||
|
||||
/* save temporary copies of the arguments which are associated
|
||||
* with the current option ...
|
||||
*/
|
||||
for( index = 0; index < optspan; ++index )
|
||||
this_arg[index] = arglist[optmark + index];
|
||||
|
||||
/* move all preceding non-option arguments to the right,
|
||||
* overwriting these saved arguments, while making space
|
||||
* to replace them in their permuted location.
|
||||
*/
|
||||
for( --optmark; optmark >= optbase; --optmark )
|
||||
arglist[optmark + optspan] = arglist[optmark];
|
||||
|
||||
/* restore the temporarily saved option arguments to
|
||||
* their permuted location.
|
||||
*/
|
||||
for( index = 0; index < optspan; ++index )
|
||||
arglist[optbase + index] = this_arg[index];
|
||||
|
||||
/* adjust `optbase', to account for the relocated option.
|
||||
*/
|
||||
optbase += optspan;
|
||||
|
||||
free(this_arg);
|
||||
}
|
||||
|
||||
else
|
||||
/* no permutation occurred ...
|
||||
* simply adjust `optbase' for all options parsed so far.
|
||||
*/
|
||||
optbase = argind + 1;
|
||||
|
||||
/* enter main parsing loop ...
|
||||
*/
|
||||
while( argc > ++argind )
|
||||
{
|
||||
/* inspect each argument in turn, identifying possible options ...
|
||||
*/
|
||||
if( is_switchar( *(nextchar = argv[optmark = argind]) ) && *++nextchar )
|
||||
{
|
||||
/* we've found a candidate option argument ... */
|
||||
|
||||
if( is_switchar( *nextchar ) )
|
||||
{
|
||||
/* it's a double hyphen argument ... */
|
||||
|
||||
const CHAR *refchar = nextchar;
|
||||
if( *++refchar )
|
||||
{
|
||||
/* and it looks like a long format option ...
|
||||
* `getopt_long' mode must be active to accept it as such,
|
||||
* `getopt_long_only' also qualifies, but we must downgrade
|
||||
* it to force explicit handling as a long format option.
|
||||
*/
|
||||
if( mode >= getopt_mode_long )
|
||||
{
|
||||
nextchar = refchar;
|
||||
mode = getopt_mode_long;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
/* this is an explicit `--' end of options marker, so wrap up now!
|
||||
*/
|
||||
if( optmark > optbase )
|
||||
{
|
||||
/* permuting the argument list as necessary ...
|
||||
* (note use of `this_arg' and `arglist', as above).
|
||||
*/
|
||||
CHAR *this_arg = argv[optmark];
|
||||
CHAR **arglist = (CHAR **)(argv);
|
||||
|
||||
/* move all preceding non-option arguments to the right ...
|
||||
*/
|
||||
do arglist[optmark] = arglist[optmark - 1];
|
||||
while( optmark-- > optbase );
|
||||
|
||||
/* reinstate the `--' marker, in its permuted location.
|
||||
*/
|
||||
arglist[optbase] = this_arg;
|
||||
}
|
||||
/* ... before finally bumping `optbase' past the `--' marker,
|
||||
* and returning the `all done' completion indicator.
|
||||
*/
|
||||
optind = ++optbase;
|
||||
return getopt_all_done;
|
||||
}
|
||||
}
|
||||
else if( mode < getopt_mode_long_only )
|
||||
{
|
||||
/* it's not an explicit long option, and `getopt_long_only' isn't active,
|
||||
* so we must explicitly try to match it as a short option.
|
||||
*/
|
||||
mode = getopt_mode_standard;
|
||||
}
|
||||
|
||||
if( mode >= getopt_mode_long )
|
||||
{
|
||||
/* the current argument is a long form option, (either explicitly,
|
||||
* introduced by a double hyphen, or implicitly because we were called
|
||||
* by `getopt_long_only'); this is where we parse it.
|
||||
*/
|
||||
int lookup;
|
||||
int matched = -1;
|
||||
|
||||
/* we need to fetch the `extra' function arguments, which are
|
||||
* specified for the `getopt_long' APIs.
|
||||
*/
|
||||
va_list refptr;
|
||||
struct option *longopts;
|
||||
int *optindex;
|
||||
va_start( refptr, optstring );
|
||||
longopts = va_arg( refptr, struct option * );
|
||||
optindex = va_arg( refptr, int * );
|
||||
va_end( refptr );
|
||||
|
||||
/* ensuring that `optarg' does not inherit any junk, from parsing
|
||||
* preceding arguments ...
|
||||
*/
|
||||
optarg = NULL;
|
||||
for( lookup = 0; longopts && longopts[lookup].name; ++lookup )
|
||||
{
|
||||
/* scan the list of defined long form options ...
|
||||
*/
|
||||
switch( getopt_match_long( nextchar, longopts[lookup].name ) )
|
||||
{
|
||||
/* looking for possible matches for the current argument.
|
||||
*/
|
||||
case getopt_exact_match:
|
||||
/*
|
||||
* when an exact match is found,
|
||||
* return it immediately, setting `nextchar' to NULL,
|
||||
* to ensure we don't mistakenly try to match any
|
||||
* subsequent characters as short form options.
|
||||
*/
|
||||
nextchar = NULL;
|
||||
return getopt_resolved( mode, argc, argv, &argind,
|
||||
longopts, lookup, optindex, optstring );
|
||||
|
||||
case getopt_abbreviated_match:
|
||||
/*
|
||||
* but, for a partial (initial substring) match ...
|
||||
*/
|
||||
if( matched >= 0 )
|
||||
{
|
||||
/* if this is not the first, then we have an ambiguity ...
|
||||
*/
|
||||
if( (mode == getopt_mode_long_only)
|
||||
/*
|
||||
* However, in the case of getopt_long_only(), if
|
||||
* the entire ambiguously matched string represents
|
||||
* a valid short option specification, then we may
|
||||
* proceed to interpret it as such.
|
||||
*/
|
||||
&& getopt_verify( nextchar, optstring ) )
|
||||
return getopt_parse( mode, argc, argv, optstring );
|
||||
|
||||
/* If we get to here, then the ambiguously matched
|
||||
* partial long option isn't valid for short option
|
||||
* evaluation; reset parser context to resume with
|
||||
* the following command line argument, diagnose
|
||||
* ambiguity, and bail out.
|
||||
*/
|
||||
optopt = 0;
|
||||
nextchar = NULL;
|
||||
optind = argind + 1;
|
||||
complain( "option `%s' is ambiguous", argv[argind] );
|
||||
return getopt_unknown;
|
||||
}
|
||||
/* otherwise just note that we've found a possible match ...
|
||||
*/
|
||||
matched = lookup;
|
||||
}
|
||||
}
|
||||
if( matched >= 0 )
|
||||
{
|
||||
/* if we get to here, then we found exactly one partial match,
|
||||
* so return it, as for an exact match.
|
||||
*/
|
||||
nextchar = NULL;
|
||||
return getopt_resolved( mode, argc, argv, &argind,
|
||||
longopts, matched, optindex, optstring );
|
||||
}
|
||||
/* if here, then we had what SHOULD have been a long form option,
|
||||
* but it is unmatched ...
|
||||
*/
|
||||
if( (mode < getopt_mode_long_only)
|
||||
/*
|
||||
* ... although paradoxically, `mode == getopt_mode_long_only'
|
||||
* allows us to still try to match it as a short form option.
|
||||
*/
|
||||
|| (getopt_verify( nextchar, optstring ) == 0) )
|
||||
{
|
||||
/* When it cannot be matched, reset the parsing context to
|
||||
* resume from the next argument, diagnose the failed match,
|
||||
* and bail out.
|
||||
*/
|
||||
optopt = 0;
|
||||
nextchar = NULL;
|
||||
optind = argind + 1;
|
||||
complain( "unrecognised option `%s'", argv[argind] );
|
||||
return getopt_unknown;
|
||||
}
|
||||
}
|
||||
/* fall through to handle standard short form options...
|
||||
* when the option argument format is neither explictly identified
|
||||
* as long, nor implicitly matched as such, and the argument isn't
|
||||
* just a bare hyphen, (which isn't an option), then we make one
|
||||
* recursive call to explicitly interpret it as short format.
|
||||
*/
|
||||
if( *nextchar )
|
||||
return getopt_parse( mode, argc, argv, optstring );
|
||||
}
|
||||
/* if we get to here, then we've parsed a non-option argument ...
|
||||
* in GNU compatibility mode, we step over it, so we can permute
|
||||
* any subsequent option arguments, but ...
|
||||
*/
|
||||
if( *optstring == getopt_switchar )
|
||||
{
|
||||
/* if `optstring' begins with a `-' character, this special
|
||||
* GNU specific behaviour requires us to return the non-option
|
||||
* arguments in strict order, as pseudo-arguments to a special
|
||||
* option, with return value defined as `getopt_ordered'.
|
||||
*/
|
||||
nextchar = NULL;
|
||||
optind = argind + 1;
|
||||
optarg = argv[argind];
|
||||
return getopt_ordered;
|
||||
}
|
||||
if( getopt_conventions( *optstring ) & getopt_posixly_correct )
|
||||
/*
|
||||
* otherwise ...
|
||||
* for POSIXLY_CORRECT behaviour, or if `optstring' begins with
|
||||
* a `+' character, then we break out of the parsing loop, so that
|
||||
* the scan ends at the current argument, with no permutation.
|
||||
*/
|
||||
break;
|
||||
}
|
||||
/* fall through when all arguments have been evaluated,
|
||||
*/
|
||||
optind = optbase;
|
||||
return getopt_all_done;
|
||||
}
|
||||
|
||||
/* All three public API entry points are trivially defined,
|
||||
* in terms of the internal `getopt_parse' function.
|
||||
*/
|
||||
int getopt( getopt_std_args )
|
||||
{
|
||||
return getopt_parse( getopt_mode_standard, argc, argv, optstring );
|
||||
}
|
||||
|
||||
int getopt_long( getopt_std_args, const struct option *opts, int *index )
|
||||
{
|
||||
return getopt_parse( getopt_mode_long, argc, argv, optstring, opts, index );
|
||||
}
|
||||
|
||||
int getopt_long_only( getopt_std_args, const struct option *opts, int *index )
|
||||
{
|
||||
return getopt_parse( getopt_mode_long_only, argc, argv, optstring, opts, index );
|
||||
}
|
||||
|
||||
#ifdef __weak_alias
|
||||
/*
|
||||
* These Microsnot style uglified aliases are provided for compatibility
|
||||
* with the previous MinGW implementation of the getopt API.
|
||||
*/
|
||||
__weak_alias( getopt, _getopt )
|
||||
__weak_alias( getopt_long, _getopt_long )
|
||||
__weak_alias( getopt_long_only, _getopt_long_only )
|
||||
#endif
|
||||
|
||||
|
||||
|
||||
|
||||
#ifdef __cplusplus
|
||||
}
|
||||
#endif
|
||||
|
||||
#endif /* !defined(__UNISTD_H_SOURCED__) && !defined(__GETOPT_LONG_H__) */
|
||||
Loading…
x
Reference in New Issue
Block a user