/*
********************************************************************************
*
*      GSM AMR-NB speech codec   R98   Version 7.6.0   December 12, 2001
*                                R99   Version 3.3.0                
*                                REL-4 Version 4.1.0                
*
********************************************************************************
*
*      File             : d3_14pf.c
*      Purpose          : Algebraic codebook decoder
*
********************************************************************************
*/

/*
********************************************************************************
*                         MODULE INCLUDE FILE AND VERSION ID
********************************************************************************
*/
#include "d3_14pf.h"
const char d3_14pf_c_id[] = "@(#)$Id $" d3_14pf_h;
 
/*
********************************************************************************
*                         INCLUDE FILES
********************************************************************************
*/
#include "typedef.h"
#include "basic_op.h"
#include "count.h"
#include "cnst.h"

/*
********************************************************************************
*                         LOCAL VARIABLES AND TABLES
********************************************************************************
*/
#define NB_PULSE 3           /* number of pulses  */
 
/*
********************************************************************************
*                         PUBLIC PROGRAM CODE
********************************************************************************
*/
/*************************************************************************
 *
 *  FUNCTION:  decode_3i40_14bits (decod_ACELP())
 *
 *  PURPOSE:   Algebraic codebook decoder
 *
 *************************************************************************/

void decode_3i40_14bits(
    Word16 sign,   /* i : signs of 3 pulses.                       */
    Word16 index,  /* i : Positions of the 3 pulses.               */
    Word16 cod[]   /* o : algebraic (fixed) codebook excitation    */
)
{
    Word16 i, j;
    Word16 pos[NB_PULSE];

    /* Decode the positions */

    i = index & 7;                                       logic16 ();

    pos[0] = add_ex(i, shl_ex(i, 2));   /* pos0 =i*5 */        move16 ();

    index = shr_ex(index, 3);
    j = index & 1;                                       logic16 ();
    index = shr_ex(index, 1);
    i = index & 7;                                       logic16 ();

    i = add_ex(i, shl_ex(i, 2));        /* pos1 =i*5+1+j*2 */
    i = add_ex(i, 1);
    j = shl_ex(j, 1);     
    pos[1] = add_ex(i, j);                                  move16 ();

    index = shr_ex(index, 3);
    j = index & 1;                                       logic16 ();
    index = shr_ex(index, 1);
    i = index & 7;                                       logic16 ();

    i = add_ex(i, shl_ex(i, 2));        /* pos2 =i*5+2+j*2 */
    i = add_ex(i, 2); 
    j = shl_ex(j, 1); 
    pos[2] = add_ex(i, j);                                  move16 ();

    /* decode the signs  and build the codeword */

    for (i = 0; i < L_SUBFR; i++) {
        cod[i] = 0;                                      move16 ();
    }

    for (j = 0; j < NB_PULSE; j++) {
        i = sign & 1;                                    logic16 ();
        sign = shr_ex(sign, 1);

        test ();
        if (i > 0) {
            cod[pos[j]] = 8191;                          move16 (); /* +1.0 */
        } else {
            cod[pos[j]] = -8192;                         move16 (); /* -1.0 */
        }
    }

    return;
}