opencore/codecs_v2/audio/gsm_amr/amr_nb/enc/src/l_abs.cpp

   1 /* ------------------------------------------------------------------
   2  * Copyright (C) 1998-2009 PacketVideo
   3  *
   4  * Licensed under the Apache License, Version 2.0 (the "License");
   5  * you may not use this file except in compliance with the License.
   6  * You may obtain a copy of the License at
   7  *
   8  *      http://www.apache.org/licenses/LICENSE-2.0
   9  *
  10  * Unless required by applicable law or agreed to in writing, software
  11  * distributed under the License is distributed on an "AS IS" BASIS,
  12  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either
  13  * express or implied.
  14  * See the License for the specific language governing permissions
  15  * and limitations under the License.
  16  * -------------------------------------------------------------------
  17  */
  18 /****************************************************************************************
  19 Portions of this file are derived from the following 3GPP standard:
  20
  21     3GPP TS 26.073
  22     ANSI-C code for the Adaptive Multi-Rate (AMR) speech codec
  23     Available from http://www.3gpp.org
  24
  25 (C) 2004, 3GPP Organizational Partners (ARIB, ATIS, CCSA, ETSI, TTA, TTC)
  26 Permission to distribute, modify and use this file under the standard license
  27 terms listed above has been obtained from the copyright holder.
  28 ****************************************************************************************/
  29 /*
  30  Filename: l_abs.cpp
  31
  32 ------------------------------------------------------------------------------
  33  INPUT AND OUTPUT DEFINITIONS
  34
  35  Inputs:
  36     L_var1 = 32 bit long signed integer (Word32 ) whose value falls
  37              in the range : 0x8000 0000 <= L_var1 <= 0x7fff ffff.
  38
  39  Local Stores/Buffers/Pointers Needed:
  40     None
  41
  42  Global Stores/Buffers/Pointers Needed:
  43     None
  44
  45  Outputs:
  46     L_var1 = absolute value of input (Word32)
  47
  48  Pointers and Buffers Modified:
  49     None
  50
  51  Local Stores Modified:
  52     None
  53
  54  Global Stores Modified:
  55     None
  56
  57 ------------------------------------------------------------------------------
  58  FUNCTION DESCRIPTION
  59
  60  This function calculates the absolute value of L_var1; saturate in case
  61  where the input is -214783648.
  62
  63 ------------------------------------------------------------------------------
  64  REQUIREMENTS
  65
  66  None
  67
  68 ------------------------------------------------------------------------------
  69  REFERENCES
  70
  71  [1] basicop2.c, ETS Version 2.0.0, February 8, 1999
  72
  73 ------------------------------------------------------------------------------
  74  PSEUDO-CODE
  75
  76 Word32 L_abs (Word32 L_var1)
  77 {
  78     Word32 L_var_out;
  79
  80     if (L_var1 == MIN_32)
  81     {
  82         L_var_out = MAX_32;
  83     }
  84     else
  85     {
  86         if (L_var1 < 0)
  87         {
  88             L_var_out = -L_var1;
  89         }
  90         else
  91         {
  92             L_var_out = L_var1;
  93         }
  94     }
  95
  96 #if (WMOPS)
  97     multiCounter[currCounter].L_abs++;
  98 #endif
  99     return (L_var_out);
 100 }
 101
 102
 103 ------------------------------------------------------------------------------
 104 */
 105
 106
 107 /*----------------------------------------------------------------------------
 108 ; INCLUDES
 109 ----------------------------------------------------------------------------*/
 110 #include    "l_abs.h"
 111
 112 /*----------------------------------------------------------------------------
 113 ; MACROS
 114 ; Define module specific macros here
 115 ----------------------------------------------------------------------------*/
 116
 117 /*----------------------------------------------------------------------------
 118 ; DEFINES
 119 ; Include all pre-processor statements here. Include conditional
 120 ; compile variables also.
 121 ----------------------------------------------------------------------------*/
 122
 123 /*----------------------------------------------------------------------------
 124 ; LOCAL FUNCTION DEFINITIONS
 125 ; Function Prototype declaration
 126 ----------------------------------------------------------------------------*/
 127
 128 /*----------------------------------------------------------------------------
 129 ; LOCAL STORE/BUFFER/POINTER DEFINITIONS
 130 ; Variable declaration - defined here and used outside this module
 131 ----------------------------------------------------------------------------*/
 132
 133 /*----------------------------------------------------------------------------
 134 ; EXTERNAL FUNCTION REFERENCES
 135 ; Declare functions defined elsewhere and referenced in this module
 136 ----------------------------------------------------------------------------*/
 137
 138 /*----------------------------------------------------------------------------
 139 ; EXTERNAL GLOBAL STORE/BUFFER/POINTER REFERENCES
 140 ; Declare variables used in this module but defined elsewhere
 141 ----------------------------------------------------------------------------*/
 142
 143 /*----------------------------------------------------------------------------
 144 ; FUNCTION CODE
 145 ----------------------------------------------------------------------------*/
 146 Word32 L_abs(Word32 L_var1)
 147 {
 148     /*----------------------------------------------------------------------------
 149     ; Define all local variables
 150     ----------------------------------------------------------------------------*/
 151
 152     /*----------------------------------------------------------------------------
 153     ; Function body here
 154     ----------------------------------------------------------------------------*/
 155
 156     Word32 y = L_var1 - (L_var1 < 0);
 157     y = y ^(y >> 31);
 158     return (y);
 159
 160 }