cannam@154: /*Copyright (c) 2013, Xiph.Org Foundation and contributors.
cannam@154: 
cannam@154:   All rights reserved.
cannam@154: 
cannam@154:   Redistribution and use in source and binary forms, with or without
cannam@154:    modification, are permitted provided that the following conditions are met:
cannam@154: 
cannam@154:     * Redistributions of source code must retain the above copyright notice,
cannam@154:        this list of conditions and the following disclaimer.
cannam@154:     * Redistributions in binary form must reproduce the above copyright notice,
cannam@154:        this list of conditions and the following disclaimer in the
cannam@154:        documentation and/or other materials provided with the distribution.
cannam@154: 
cannam@154:   THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
cannam@154:   AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
cannam@154:   IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
cannam@154:   ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
cannam@154:   LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
cannam@154:   CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
cannam@154:   SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
cannam@154:   INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
cannam@154:   CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
cannam@154:   ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
cannam@154:   POSSIBILITY OF SUCH DAMAGE.*/
cannam@154: 
cannam@154: #ifndef KISS_FFT_ARMv5E_H
cannam@154: #define KISS_FFT_ARMv5E_H
cannam@154: 
cannam@154: #if !defined(KISS_FFT_GUTS_H)
cannam@154: #error "This file should only be included from _kiss_fft_guts.h"
cannam@154: #endif
cannam@154: 
cannam@154: #ifdef FIXED_POINT
cannam@154: 
cannam@154: #if defined(__thumb__)||defined(__thumb2__)
cannam@154: #define LDRD_CONS "Q"
cannam@154: #else
cannam@154: #define LDRD_CONS "Uq"
cannam@154: #endif
cannam@154: 
cannam@154: #undef C_MUL
cannam@154: #define C_MUL(m,a,b) \
cannam@154:     do{ \
cannam@154:         int mr1__; \
cannam@154:         int mr2__; \
cannam@154:         int mi__; \
cannam@154:         long long aval__; \
cannam@154:         int bval__; \
cannam@154:         __asm__( \
cannam@154:             "#C_MUL\n\t" \
cannam@154:             "ldrd %[aval], %H[aval], %[ap]\n\t" \
cannam@154:             "ldr %[bval], %[bp]\n\t" \
cannam@154:             "smulwb %[mi], %H[aval], %[bval]\n\t" \
cannam@154:             "smulwb %[mr1], %[aval], %[bval]\n\t" \
cannam@154:             "smulwt %[mr2], %H[aval], %[bval]\n\t" \
cannam@154:             "smlawt %[mi], %[aval], %[bval], %[mi]\n\t" \
cannam@154:             : [mr1]"=r"(mr1__), [mr2]"=r"(mr2__), [mi]"=r"(mi__), \
cannam@154:               [aval]"=&r"(aval__), [bval]"=r"(bval__) \
cannam@154:             : [ap]LDRD_CONS(a), [bp]"m"(b) \
cannam@154:         ); \
cannam@154:         (m).r = SHL32(SUB32(mr1__, mr2__), 1); \
cannam@154:         (m).i = SHL32(mi__, 1); \
cannam@154:     } \
cannam@154:     while(0)
cannam@154: 
cannam@154: #undef C_MUL4
cannam@154: #define C_MUL4(m,a,b) \
cannam@154:     do{ \
cannam@154:         int mr1__; \
cannam@154:         int mr2__; \
cannam@154:         int mi__; \
cannam@154:         long long aval__; \
cannam@154:         int bval__; \
cannam@154:         __asm__( \
cannam@154:             "#C_MUL4\n\t" \
cannam@154:             "ldrd %[aval], %H[aval], %[ap]\n\t" \
cannam@154:             "ldr %[bval], %[bp]\n\t" \
cannam@154:             "smulwb %[mi], %H[aval], %[bval]\n\t" \
cannam@154:             "smulwb %[mr1], %[aval], %[bval]\n\t" \
cannam@154:             "smulwt %[mr2], %H[aval], %[bval]\n\t" \
cannam@154:             "smlawt %[mi], %[aval], %[bval], %[mi]\n\t" \
cannam@154:             : [mr1]"=r"(mr1__), [mr2]"=r"(mr2__), [mi]"=r"(mi__), \
cannam@154:               [aval]"=&r"(aval__), [bval]"=r"(bval__) \
cannam@154:             : [ap]LDRD_CONS(a), [bp]"m"(b) \
cannam@154:         ); \
cannam@154:         (m).r = SHR32(SUB32(mr1__, mr2__), 1); \
cannam@154:         (m).i = SHR32(mi__, 1); \
cannam@154:     } \
cannam@154:     while(0)
cannam@154: 
cannam@154: #undef C_MULC
cannam@154: #define C_MULC(m,a,b) \
cannam@154:     do{ \
cannam@154:         int mr__; \
cannam@154:         int mi1__; \
cannam@154:         int mi2__; \
cannam@154:         long long aval__; \
cannam@154:         int bval__; \
cannam@154:         __asm__( \
cannam@154:             "#C_MULC\n\t" \
cannam@154:             "ldrd %[aval], %H[aval], %[ap]\n\t" \
cannam@154:             "ldr %[bval], %[bp]\n\t" \
cannam@154:             "smulwb %[mr], %[aval], %[bval]\n\t" \
cannam@154:             "smulwb %[mi1], %H[aval], %[bval]\n\t" \
cannam@154:             "smulwt %[mi2], %[aval], %[bval]\n\t" \
cannam@154:             "smlawt %[mr], %H[aval], %[bval], %[mr]\n\t" \
cannam@154:             : [mr]"=r"(mr__), [mi1]"=r"(mi1__), [mi2]"=r"(mi2__), \
cannam@154:               [aval]"=&r"(aval__), [bval]"=r"(bval__) \
cannam@154:             : [ap]LDRD_CONS(a), [bp]"m"(b) \
cannam@154:         ); \
cannam@154:         (m).r = SHL32(mr__, 1); \
cannam@154:         (m).i = SHL32(SUB32(mi1__, mi2__), 1); \
cannam@154:     } \
cannam@154:     while(0)
cannam@154: 
cannam@154: #endif /* FIXED_POINT */
cannam@154: 
cannam@154: #endif /* KISS_FFT_GUTS_H */