cannam@154: /* Copyright (c) 2007-2008 CSIRO
cannam@154:    Copyright (c) 2007-2009 Xiph.Org Foundation
cannam@154:    Written by Jean-Marc Valin */
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
cannam@154:    are met:
cannam@154: 
cannam@154:    - Redistributions of source code must retain the above copyright
cannam@154:    notice, this list of conditions and the following disclaimer.
cannam@154: 
cannam@154:    - Redistributions in binary form must reproduce the above copyright
cannam@154:    notice, 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
cannam@154:    ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
cannam@154:    LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
cannam@154:    A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER
cannam@154:    OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
cannam@154:    EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
cannam@154:    PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
cannam@154:    PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
cannam@154:    LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
cannam@154:    NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
cannam@154:    SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
cannam@154: */
cannam@154: 
cannam@154: #ifndef __VQ_MIPSR1_H__
cannam@154: #define __VQ_MIPSR1_H__
cannam@154: 
cannam@154: #ifdef HAVE_CONFIG_H
cannam@154: #include "config.h"
cannam@154: #endif
cannam@154: 
cannam@154: #include "mathops.h"
cannam@154: #include "arch.h"
cannam@154: 
cannam@154: static void renormalise_vector_mips(celt_norm *X, int N, opus_val16 gain, int arch);
cannam@154: 
cannam@154: #define OVERRIDE_vq_exp_rotation1
cannam@154: static void exp_rotation1(celt_norm *X, int len, int stride, opus_val16 c, opus_val16 s)
cannam@154: {
cannam@154:    int i;
cannam@154:    opus_val16 ms;
cannam@154:    celt_norm *Xptr;
cannam@154:    Xptr = X;
cannam@154:    ms = NEG16(s);
cannam@154:    for (i=0;i<len-stride;i++)
cannam@154:    {
cannam@154:       celt_norm x1, x2;
cannam@154:       x1 = Xptr[0];
cannam@154:       x2 = Xptr[stride];
cannam@154:       Xptr[stride] = EXTRACT16(PSHR32(MAC16_16(MULT16_16(c, x2),  s, x1), 15));
cannam@154:       *Xptr++      = EXTRACT16(PSHR32(MAC16_16(MULT16_16(c, x1), ms, x2), 15));
cannam@154:    }
cannam@154:    Xptr = &X[len-2*stride-1];
cannam@154:    for (i=len-2*stride-1;i>=0;i--)
cannam@154:    {
cannam@154:       celt_norm x1, x2;
cannam@154:       x1 = Xptr[0];
cannam@154:       x2 = Xptr[stride];
cannam@154:       Xptr[stride] = EXTRACT16(PSHR32(MAC16_16(MULT16_16(c, x2),  s, x1), 15));
cannam@154:       *Xptr--      = EXTRACT16(PSHR32(MAC16_16(MULT16_16(c, x1), ms, x2), 15));
cannam@154:    }
cannam@154: }
cannam@154: 
cannam@154: #define OVERRIDE_renormalise_vector
cannam@154: 
cannam@154: #define renormalise_vector(X, N, gain, arch) \
cannam@154:  (renormalise_vector_mips(X, N, gain, arch))
cannam@154: 
cannam@154: void renormalise_vector_mips(celt_norm *X, int N, opus_val16 gain, int arch)
cannam@154: {
cannam@154:    int i;
cannam@154: #ifdef FIXED_POINT
cannam@154:    int k;
cannam@154: #endif
cannam@154:    opus_val32 E = EPSILON;
cannam@154:    opus_val16 g;
cannam@154:    opus_val32 t;
cannam@154:    celt_norm *xptr = X;
cannam@154:    int X0, X1;
cannam@154: 
cannam@154:    (void)arch;
cannam@154: 
cannam@154:    asm volatile("mult $ac1, $0, $0");
cannam@154:    asm volatile("MTLO %0, $ac1" : :"r" (E));
cannam@154:    /*if(N %4)
cannam@154:        printf("error");*/
cannam@154:    for (i=0;i<N-2;i+=2)
cannam@154:    {
cannam@154:       X0 = (int)*xptr++;
cannam@154:       asm volatile("MADD $ac1, %0, %1" : : "r" (X0), "r" (X0));
cannam@154: 
cannam@154:       X1 = (int)*xptr++;
cannam@154:       asm volatile("MADD $ac1, %0, %1" : : "r" (X1), "r" (X1));
cannam@154:    }
cannam@154: 
cannam@154:    for (;i<N;i++)
cannam@154:    {
cannam@154:       X0 = (int)*xptr++;
cannam@154:       asm volatile("MADD $ac1, %0, %1" : : "r" (X0), "r" (X0));
cannam@154:    }
cannam@154: 
cannam@154:    asm volatile("MFLO %0, $ac1" : "=r" (E));
cannam@154: #ifdef FIXED_POINT
cannam@154:    k = celt_ilog2(E)>>1;
cannam@154: #endif
cannam@154:    t = VSHR32(E, 2*(k-7));
cannam@154:    g = MULT16_16_P15(celt_rsqrt_norm(t),gain);
cannam@154: 
cannam@154:    xptr = X;
cannam@154:    for (i=0;i<N;i++)
cannam@154:    {
cannam@154:       *xptr = EXTRACT16(PSHR32(MULT16_16(g, *xptr), k+1));
cannam@154:       xptr++;
cannam@154:    }
cannam@154:    /*return celt_sqrt(E);*/
cannam@154: }
cannam@154: 
cannam@154: #endif /* __VQ_MIPSR1_H__ */