Chris@69: /*Copyright (c) 2013, Xiph.Org Foundation and contributors.
Chris@69: 
Chris@69:   All rights reserved.
Chris@69: 
Chris@69:   Redistribution and use in source and binary forms, with or without
Chris@69:    modification, are permitted provided that the following conditions are met:
Chris@69: 
Chris@69:     * Redistributions of source code must retain the above copyright notice,
Chris@69:        this list of conditions and the following disclaimer.
Chris@69:     * Redistributions in binary form must reproduce the above copyright notice,
Chris@69:        this list of conditions and the following disclaimer in the
Chris@69:        documentation and/or other materials provided with the distribution.
Chris@69: 
Chris@69:   THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
Chris@69:   AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
Chris@69:   IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
Chris@69:   ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
Chris@69:   LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
Chris@69:   CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
Chris@69:   SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
Chris@69:   INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
Chris@69:   CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
Chris@69:   ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
Chris@69:   POSSIBILITY OF SUCH DAMAGE.*/
Chris@69: 
Chris@69: #ifndef KISS_FFT_ARMv4_H
Chris@69: #define KISS_FFT_ARMv4_H
Chris@69: 
Chris@69: #if !defined(KISS_FFT_GUTS_H)
Chris@69: #error "This file should only be included from _kiss_fft_guts.h"
Chris@69: #endif
Chris@69: 
Chris@69: #ifdef FIXED_POINT
Chris@69: 
Chris@69: #undef C_MUL
Chris@69: #define C_MUL(m,a,b) \
Chris@69:     do{ \
Chris@69:        int br__; \
Chris@69:        int bi__; \
Chris@69:        int tt__; \
Chris@69:         __asm__ __volatile__( \
Chris@69:             "#C_MUL\n\t" \
Chris@69:             "ldrsh %[br], [%[bp], #0]\n\t" \
Chris@69:             "ldm %[ap], {r0,r1}\n\t" \
Chris@69:             "ldrsh %[bi], [%[bp], #2]\n\t" \
Chris@69:             "smull %[tt], %[mi], r1, %[br]\n\t" \
Chris@69:             "smlal %[tt], %[mi], r0, %[bi]\n\t" \
Chris@69:             "rsb %[bi], %[bi], #0\n\t" \
Chris@69:             "smull %[br], %[mr], r0, %[br]\n\t" \
Chris@69:             "mov %[tt], %[tt], lsr #15\n\t" \
Chris@69:             "smlal %[br], %[mr], r1, %[bi]\n\t" \
Chris@69:             "orr %[mi], %[tt], %[mi], lsl #17\n\t" \
Chris@69:             "mov %[br], %[br], lsr #15\n\t" \
Chris@69:             "orr %[mr], %[br], %[mr], lsl #17\n\t" \
Chris@69:             : [mr]"=r"((m).r), [mi]"=r"((m).i), \
Chris@69:               [br]"=&r"(br__), [bi]"=r"(bi__), [tt]"=r"(tt__) \
Chris@69:             : [ap]"r"(&(a)), [bp]"r"(&(b)) \
Chris@69:             : "r0", "r1" \
Chris@69:         ); \
Chris@69:     } \
Chris@69:     while(0)
Chris@69: 
Chris@69: #undef C_MUL4
Chris@69: #define C_MUL4(m,a,b) \
Chris@69:     do{ \
Chris@69:        int br__; \
Chris@69:        int bi__; \
Chris@69:        int tt__; \
Chris@69:         __asm__ __volatile__( \
Chris@69:             "#C_MUL4\n\t" \
Chris@69:             "ldrsh %[br], [%[bp], #0]\n\t" \
Chris@69:             "ldm %[ap], {r0,r1}\n\t" \
Chris@69:             "ldrsh %[bi], [%[bp], #2]\n\t" \
Chris@69:             "smull %[tt], %[mi], r1, %[br]\n\t" \
Chris@69:             "smlal %[tt], %[mi], r0, %[bi]\n\t" \
Chris@69:             "rsb %[bi], %[bi], #0\n\t" \
Chris@69:             "smull %[br], %[mr], r0, %[br]\n\t" \
Chris@69:             "mov %[tt], %[tt], lsr #17\n\t" \
Chris@69:             "smlal %[br], %[mr], r1, %[bi]\n\t" \
Chris@69:             "orr %[mi], %[tt], %[mi], lsl #15\n\t" \
Chris@69:             "mov %[br], %[br], lsr #17\n\t" \
Chris@69:             "orr %[mr], %[br], %[mr], lsl #15\n\t" \
Chris@69:             : [mr]"=r"((m).r), [mi]"=r"((m).i), \
Chris@69:               [br]"=&r"(br__), [bi]"=r"(bi__), [tt]"=r"(tt__) \
Chris@69:             : [ap]"r"(&(a)), [bp]"r"(&(b)) \
Chris@69:             : "r0", "r1" \
Chris@69:         ); \
Chris@69:     } \
Chris@69:     while(0)
Chris@69: 
Chris@69: #undef C_MULC
Chris@69: #define C_MULC(m,a,b) \
Chris@69:     do{ \
Chris@69:        int br__; \
Chris@69:        int bi__; \
Chris@69:        int tt__; \
Chris@69:         __asm__ __volatile__( \
Chris@69:             "#C_MULC\n\t" \
Chris@69:             "ldrsh %[br], [%[bp], #0]\n\t" \
Chris@69:             "ldm %[ap], {r0,r1}\n\t" \
Chris@69:             "ldrsh %[bi], [%[bp], #2]\n\t" \
Chris@69:             "smull %[tt], %[mr], r0, %[br]\n\t" \
Chris@69:             "smlal %[tt], %[mr], r1, %[bi]\n\t" \
Chris@69:             "rsb %[bi], %[bi], #0\n\t" \
Chris@69:             "smull %[br], %[mi], r1, %[br]\n\t" \
Chris@69:             "mov %[tt], %[tt], lsr #15\n\t" \
Chris@69:             "smlal %[br], %[mi], r0, %[bi]\n\t" \
Chris@69:             "orr %[mr], %[tt], %[mr], lsl #17\n\t" \
Chris@69:             "mov %[br], %[br], lsr #15\n\t" \
Chris@69:             "orr %[mi], %[br], %[mi], lsl #17\n\t" \
Chris@69:             : [mr]"=r"((m).r), [mi]"=r"((m).i), \
Chris@69:               [br]"=&r"(br__), [bi]"=r"(bi__), [tt]"=r"(tt__) \
Chris@69:             : [ap]"r"(&(a)), [bp]"r"(&(b)) \
Chris@69:             : "r0", "r1" \
Chris@69:         ); \
Chris@69:     } \
Chris@69:     while(0)
Chris@69: 
Chris@69: #endif /* FIXED_POINT */
Chris@69: 
Chris@69: #endif /* KISS_FFT_ARMv4_H */