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_ARMv4_H
cannam@154: #define KISS_FFT_ARMv4_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: #undef C_MUL
cannam@154: #define C_MUL(m,a,b) \
cannam@154:     do{ \
cannam@154:        int br__; \
cannam@154:        int bi__; \
cannam@154:        int tt__; \
cannam@154:         __asm__ __volatile__( \
cannam@154:             "#C_MUL\n\t" \
cannam@154:             "ldrsh %[br], [%[bp], #0]\n\t" \
cannam@154:             "ldm %[ap], {r0,r1}\n\t" \
cannam@154:             "ldrsh %[bi], [%[bp], #2]\n\t" \
cannam@154:             "smull %[tt], %[mi], r1, %[br]\n\t" \
cannam@154:             "smlal %[tt], %[mi], r0, %[bi]\n\t" \
cannam@154:             "rsb %[bi], %[bi], #0\n\t" \
cannam@154:             "smull %[br], %[mr], r0, %[br]\n\t" \
cannam@154:             "mov %[tt], %[tt], lsr #15\n\t" \
cannam@154:             "smlal %[br], %[mr], r1, %[bi]\n\t" \
cannam@154:             "orr %[mi], %[tt], %[mi], lsl #17\n\t" \
cannam@154:             "mov %[br], %[br], lsr #15\n\t" \
cannam@154:             "orr %[mr], %[br], %[mr], lsl #17\n\t" \
cannam@154:             : [mr]"=r"((m).r), [mi]"=r"((m).i), \
cannam@154:               [br]"=&r"(br__), [bi]"=r"(bi__), [tt]"=r"(tt__) \
cannam@154:             : [ap]"r"(&(a)), [bp]"r"(&(b)) \
cannam@154:             : "r0", "r1" \
cannam@154:         ); \
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 br__; \
cannam@154:        int bi__; \
cannam@154:        int tt__; \
cannam@154:         __asm__ __volatile__( \
cannam@154:             "#C_MUL4\n\t" \
cannam@154:             "ldrsh %[br], [%[bp], #0]\n\t" \
cannam@154:             "ldm %[ap], {r0,r1}\n\t" \
cannam@154:             "ldrsh %[bi], [%[bp], #2]\n\t" \
cannam@154:             "smull %[tt], %[mi], r1, %[br]\n\t" \
cannam@154:             "smlal %[tt], %[mi], r0, %[bi]\n\t" \
cannam@154:             "rsb %[bi], %[bi], #0\n\t" \
cannam@154:             "smull %[br], %[mr], r0, %[br]\n\t" \
cannam@154:             "mov %[tt], %[tt], lsr #17\n\t" \
cannam@154:             "smlal %[br], %[mr], r1, %[bi]\n\t" \
cannam@154:             "orr %[mi], %[tt], %[mi], lsl #15\n\t" \
cannam@154:             "mov %[br], %[br], lsr #17\n\t" \
cannam@154:             "orr %[mr], %[br], %[mr], lsl #15\n\t" \
cannam@154:             : [mr]"=r"((m).r), [mi]"=r"((m).i), \
cannam@154:               [br]"=&r"(br__), [bi]"=r"(bi__), [tt]"=r"(tt__) \
cannam@154:             : [ap]"r"(&(a)), [bp]"r"(&(b)) \
cannam@154:             : "r0", "r1" \
cannam@154:         ); \
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 br__; \
cannam@154:        int bi__; \
cannam@154:        int tt__; \
cannam@154:         __asm__ __volatile__( \
cannam@154:             "#C_MULC\n\t" \
cannam@154:             "ldrsh %[br], [%[bp], #0]\n\t" \
cannam@154:             "ldm %[ap], {r0,r1}\n\t" \
cannam@154:             "ldrsh %[bi], [%[bp], #2]\n\t" \
cannam@154:             "smull %[tt], %[mr], r0, %[br]\n\t" \
cannam@154:             "smlal %[tt], %[mr], r1, %[bi]\n\t" \
cannam@154:             "rsb %[bi], %[bi], #0\n\t" \
cannam@154:             "smull %[br], %[mi], r1, %[br]\n\t" \
cannam@154:             "mov %[tt], %[tt], lsr #15\n\t" \
cannam@154:             "smlal %[br], %[mi], r0, %[bi]\n\t" \
cannam@154:             "orr %[mr], %[tt], %[mr], lsl #17\n\t" \
cannam@154:             "mov %[br], %[br], lsr #15\n\t" \
cannam@154:             "orr %[mi], %[br], %[mi], lsl #17\n\t" \
cannam@154:             : [mr]"=r"((m).r), [mi]"=r"((m).i), \
cannam@154:               [br]"=&r"(br__), [bi]"=r"(bi__), [tt]"=r"(tt__) \
cannam@154:             : [ap]"r"(&(a)), [bp]"r"(&(b)) \
cannam@154:             : "r0", "r1" \
cannam@154:         ); \
cannam@154:     } \
cannam@154:     while(0)
cannam@154: 
cannam@154: #endif /* FIXED_POINT */
cannam@154: 
cannam@154: #endif /* KISS_FFT_ARMv4_H */