14f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber/* ------------------------------------------------------------------
24f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber * Copyright (C) 1998-2009 PacketVideo
34f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber *
44f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber * Licensed under the Apache License, Version 2.0 (the "License");
54f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber * you may not use this file except in compliance with the License.
64f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber * You may obtain a copy of the License at
74f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber *
84f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber *      http://www.apache.org/licenses/LICENSE-2.0
94f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber *
104f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber * Unless required by applicable law or agreed to in writing, software
114f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber * distributed under the License is distributed on an "AS IS" BASIS,
124f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either
134f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber * express or implied.
144f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber * See the License for the specific language governing permissions
154f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber * and limitations under the License.
164f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber * -------------------------------------------------------------------
174f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber */
184f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber/****************************************************************************************
194f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas HuberPortions of this file are derived from the following 3GPP standard:
204f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
214f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    3GPP TS 26.173
224f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    ANSI-C code for the Adaptive Multi-Rate - Wideband (AMR-WB) speech codec
234f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    Available from http://www.3gpp.org
244f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
254f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber(C) 2007, 3GPP Organizational Partners (ARIB, ATIS, CCSA, ETSI, TTA, TTC)
264f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas HuberPermission to distribute, modify and use this file under the standard license
274f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huberterms listed above has been obtained from the copyright holder.
284f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber****************************************************************************************/
294f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber/*
304f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber------------------------------------------------------------------------------
314f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
324f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
334f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
344f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Pathname: ./src/pvamrwbdecoder_basic_op_cequivalent.h
354f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
364f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber     Date: 05/07/2007
374f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
384f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber------------------------------------------------------------------------------
394f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber REVISION HISTORY
404f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
414f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Description:
424f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber------------------------------------------------------------------------------
434f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber INCLUDE DESCRIPTION
444f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
454f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber------------------------------------------------------------------------------
464f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber*/
474f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber#ifndef PVAMRWBDECODER_BASIC_OP_CEQUIVALENT_H
484f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber#define PVAMRWBDECODER_BASIC_OP_CEQUIVALENT_H
494f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
504f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber#ifdef __cplusplus
514f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huberextern "C"
524f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber{
534f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber#endif
544f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
554f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
564f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber#include "normalize_amr_wb.h"
574f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
584f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber#if defined(C_EQUIVALENT)
594f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
604f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
614f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    /*----------------------------------------------------------------------------
624f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
634f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Function Name : add_int16
644f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
654f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Purpose :
664f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
674f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          Performs the addition (var1+var2) with overflow control and saturation;
684f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          the 16 bit result is set at +32767 when overflow occurs or at -32768
694f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          when underflow occurs.
704f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
714f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Inputs :
724f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          var1
734f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   16 bit short signed integer (int16) whose value falls in the
744f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0xffff 8000 <= var1 <= 0x0000 7fff.
754f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
764f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          var2
774f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   16 bit short signed integer (int16) whose value falls in the
784f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0xffff 8000 <= var1 <= 0x0000 7fff.
794f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
804f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Outputs :
814f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          none
824f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
834f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Return Value :
844f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   16 bit short signed integer (int16) whose value falls in the
854f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0xffff 8000 <= var_out <= 0x0000 7fff.
864f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
874f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber     ----------------------------------------------------------------------------*/
884f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    __inline int16 add_int16(int16 var1, int16 var2)
894f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    {
904f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        int32 L_sum;
914f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
924f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        L_sum = (int32) var1 + var2;
934f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        if ((L_sum >> 15) != (L_sum >> 31))
944f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        {
954f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber            L_sum = (L_sum >> 31) ^ MAX_16;
964f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        }
974f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        return ((int16)(L_sum));
984f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    }
994f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1004f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1014f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    /*----------------------------------------------------------------------------
1024f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1034f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Function Name : sub_int16
1044f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1054f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          Performs the subtraction (var1+var2) with overflow control and satu-
1064f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          ration; the 16 bit result is set at +32767 when overflow occurs or at
1074f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          -32768 when underflow occurs.
1084f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1094f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Inputs :
1104f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1114f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          var1
1124f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   16 bit short signed integer (int16) whose value falls in the
1134f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0xffff 8000 <= var1 <= 0x0000 7fff.
1144f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1154f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          var2
1164f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   16 bit short signed integer (int16) whose value falls in the
1174f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0xffff 8000 <= var1 <= 0x0000 7fff.
1184f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1194f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Outputs :
1204f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          none
1214f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1224f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Return Value :
1234f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   16 bit short signed integer (int16) whose value falls in the
1244f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0xffff 8000 <= var_out <= 0x0000 7fff.
1254f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1264f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber     ----------------------------------------------------------------------------*/
1274f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    __inline int16 sub_int16(int16 var1, int16 var2)
1284f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    {
1294f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        int32 L_diff;
1304f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1314f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        L_diff = (int32) var1 - var2;
1324f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        if ((L_diff >> 15) != (L_diff >> 31))
1334f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        {
1344f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber            L_diff = (L_diff >> 31) ^ MAX_16;
1354f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        }
1364f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        return ((int16)(L_diff));
1374f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    }
1384f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1394f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1404f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    /*----------------------------------------------------------------------------
1414f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1424f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Function Name : mult_int16
1434f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1444f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          Performs the multiplication of var1 by var2 and gives a 16 bit result
1454f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          which is scaled i.e.:
1464f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   mult_int16(var1,var2) = extract_l(L_shr((var1 times var2),15)) and
1474f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   mult_int16(-32768,-32768) = 32767.
1484f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1494f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Inputs :
1504f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          var1
1514f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   16 bit short signed integer (int16) whose value falls in the
1524f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0xffff 8000 <= var1 <= 0x0000 7fff.
1534f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1544f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          var2
1554f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   16 bit short signed integer (int16) whose value falls in the
1564f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0xffff 8000 <= var1 <= 0x0000 7fff.
1574f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1584f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1594f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Return Value :
1604f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   16 bit short signed integer (int16) whose value falls in the
1614f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0xffff 8000 <= var_out <= 0x0000 7fff.
1624f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1634f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber     ----------------------------------------------------------------------------*/
1644f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1654f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    __inline int16 mult_int16(int16 var1, int16 var2)
1664f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    {
1674f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        int32 L_product;
1684f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1694f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        L_product = ((int32) var1 * (int32) var2) >> 15;
1704f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1714f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        if ((L_product >> 15) != (L_product >> 31))
1724f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        {
1734f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber            L_product = (L_product >> 31) ^ MAX_16;
1744f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        }
1754f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1764f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        return ((int16)L_product);
1774f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    }
1784f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1794f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1804f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    /*----------------------------------------------------------------------------
1814f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1824f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Function Name : add_int32
1834f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1844f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         32 bits addition of the two 32 bits variables (L_var1+L_var2) with
1854f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         overflow control and saturation; the result is set at +2147483647 when
1864f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         overflow occurs or at -2147483648 when underflow occurs.
1874f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1884f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Inputs :
1894f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1904f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          L_var1   32 bit long signed integer (int32) whose value falls in the
1914f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0x8000 0000 <= L_var3 <= 0x7fff ffff.
1924f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1934f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          L_var2   32 bit long signed integer (int32) whose value falls in the
1944f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0x8000 0000 <= L_var3 <= 0x7fff ffff.
1954f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1964f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
1974f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Return Value :
1984f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          L_var_out
1994f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   32 bit long signed integer (int32) whose value falls in the
2004f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0x8000 0000 <= L_var_out <= 0x7fff ffff.
2014f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2024f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber     ----------------------------------------------------------------------------*/
2034f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2044f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2054f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    __inline  int32 add_int32(int32 L_var1, int32 L_var2)
2064f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    {
2074f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        int32 L_var_out;
2084f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2094f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        L_var_out = L_var1 + L_var2;
2104f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2114f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        if (((L_var1 ^ L_var2) & MIN_32) == 0)  /* same sign ? */
2124f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        {
2134f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber            if ((L_var_out ^ L_var1) & MIN_32)  /* addition matches sign ? */
2144f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber            {
2154f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                L_var_out = (L_var1 >> 31) ^ MAX_32;
2164f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber            }
2174f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        }
2184f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        return (L_var_out);
2194f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    }
2204f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2214f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2224f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2234f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2244f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    /*----------------------------------------------------------------------------
2254f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2264f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Function Name : sub_int32
2274f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2284f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         32 bits subtraction of the two 32 bits variables (L_var1-L_var2) with
2294f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         overflow control and saturation; the result is set at +2147483647 when
2304f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         overflow occurs or at -2147483648 when underflow occurs.
2314f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2324f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Inputs :
2334f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2344f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          L_var1   32 bit long signed integer (int32) whose value falls in the
2354f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0x8000 0000 <= L_var3 <= 0x7fff ffff.
2364f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2374f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          L_var2   32 bit long signed integer (int32) whose value falls in the
2384f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0x8000 0000 <= L_var3 <= 0x7fff ffff.
2394f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2404f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2414f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Return Value :
2424f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          L_var_out
2434f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   32 bit long signed integer (int32) whose value falls in the
2444f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0x8000 0000 <= L_var_out <= 0x7fff ffff.
2454f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2464f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber     ----------------------------------------------------------------------------*/
2474f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2484f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2494f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    __inline  int32 sub_int32(int32 L_var1, int32 L_var2)
2504f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    {
2514f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        int32 L_var_out;
2524f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2534f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        L_var_out = L_var1 - L_var2;
2544f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2554f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        if (((L_var1 ^ L_var2) & MIN_32) != 0)  /* different sign ? */
2564f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        {
2574f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber            if ((L_var_out ^ L_var1) & MIN_32)  /* difference matches sign ? */
2584f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber            {
2594f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                L_var_out = (L_var1 >> 31) ^ MAX_32;
2604f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber            }
2614f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        }
2624f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        return (L_var_out);
2634f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    }
2644f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2654f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2664f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2674f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    /*----------------------------------------------------------------------------
2684f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2694f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Function Name : mac_16by16_to_int32
2704f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2714f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Multiply var1 by var2 and shift the result left by 1. Add the 32 bit
2724f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         result to L_var3 with saturation, return a 32 bit result:
2734f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber              L_mac(L_var3,var1,var2) = L_add(L_var3,L_mult(var1,var2)).
2744f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2754f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Inputs :
2764f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2774f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          L_var3   32 bit long signed integer (int32) whose value falls in the
2784f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0x8000 0000 <= L_var3 <= 0x7fff ffff.
2794f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2804f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          var1
2814f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   16 bit short signed integer (int16) whose value falls in the
2824f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0xffff 8000 <= var1 <= 0x0000 7fff.
2834f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2844f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          var2
2854f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   16 bit short signed integer (int16) whose value falls in the
2864f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0xffff 8000 <= var1 <= 0x0000 7fff.
2874f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2884f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2894f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Return Value :
2904f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   32 bit long signed integer (int32) whose value falls in the
2914f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0x8000 0000 <= L_var_out <= 0x7fff ffff.
2924f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2934f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber     ----------------------------------------------------------------------------*/
2944f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2954f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
2964f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    __inline  int32 mac_16by16_to_int32(int32 L_var3, int16 var1, int16 var2)
2974f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    {
2984f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        int32 L_var_out;
2994f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        int32 L_mul;
3004f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3014f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        L_mul  = ((int32) var1 * (int32) var2);
3024f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3034f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        if (L_mul != 0x40000000)
3044f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        {
3054f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber            L_mul <<= 1;
3064f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        }
3074f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        else
3084f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        {
3094f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber            L_mul = MAX_32;     /* saturation */
3104f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        }
3114f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3124f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        L_var_out = L_var3 + L_mul;
3134f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3144f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        if (((L_mul ^ L_var3) & MIN_32) == 0)  /* same sign ? */
3154f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        {
3164f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber            if ((L_var_out ^ L_var3) & MIN_32)  /* addition matches sign ? */
3174f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber            {
3184f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                L_var_out = (L_var3 >> 31) ^ MAX_32;
3194f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber            }
3204f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        }
3214f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3224f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        return (L_var_out);
3234f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    }
3244f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3254f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3264f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3274f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    /*----------------------------------------------------------------------------
3284f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3294f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Function Name : msu_16by16_from_int32
3304f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3314f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Multiply var1 by var2 and shift the result left by 1. Subtract the 32 bit
3324f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         result to L_var3 with saturation, return a 32 bit result:
3334f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber              L_msu(L_var3,var1,var2) = L_sub(L_var3,L_mult(var1,var2)).
3344f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3354f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Inputs :
3364f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3374f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          L_var3   32 bit long signed integer (int32) whose value falls in the
3384f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0x8000 0000 <= L_var3 <= 0x7fff ffff.
3394f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3404f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          var1
3414f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   16 bit short signed integer (int16) whose value falls in the
3424f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0xffff 8000 <= var1 <= 0x0000 7fff.
3434f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3444f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          var2
3454f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   16 bit short signed integer (int16) whose value falls in the
3464f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0xffff 8000 <= var1 <= 0x0000 7fff.
3474f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3484f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3494f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Return Value :
3504f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   32 bit long signed integer (int32) whose value falls in the
3514f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0x8000 0000 <= L_var_out <= 0x7fff ffff.
3524f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3534f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber     ----------------------------------------------------------------------------*/
3544f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3554f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    __inline  int32 msu_16by16_from_int32(int32 L_var3, int16 var1, int16 var2)
3564f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    {
3574f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        int32 L_var_out;
3584f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        int32 L_mul;
3594f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3604f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        L_mul  = ((int32) var1 * (int32) var2);
3614f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3624f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        if (L_mul != 0x40000000)
3634f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        {
3644f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber            L_mul <<= 1;
3654f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        }
3664f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        else
3674f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        {
3684f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber            L_mul = MAX_32;     /* saturation */
3694f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        }
3704f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3714f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        L_var_out = L_var3 - L_mul;
3724f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3734f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        if (((L_mul ^ L_var3) & MIN_32) != 0)  /* different sign ? */
3744f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        {
3754f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber            if ((L_var_out ^ L_var3) & MIN_32)  /* difference matches sign ? */
3764f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber            {
3774f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                L_var_out = (L_var3 >> 31) ^ MAX_32;
3784f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber            }
3794f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        }
3804f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3814f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        return (L_var_out);
3824f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    }
3834f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3844f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3854f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    /*----------------------------------------------------------------------------
3864f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3874f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Function Name : mul_16by16_to_int32
3884f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3894f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         mul_16by16_to_int32 is the 32 bit result of the multiplication of var1
3904f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         times var2 with one shift left i.e.:
3914f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber              L_mult(var1,var2) = L_shl((var1 times var2),1) and
3924f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber              L_mult(-32768,-32768) = 2147483647.
3934f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3944f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Inputs :
3954f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          var1
3964f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   16 bit short signed integer (int16) whose value falls in the
3974f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0xffff 8000 <= var1 <= 0x0000 7fff.
3984f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
3994f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          var2
4004f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   16 bit short signed integer (int16) whose value falls in the
4014f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0xffff 8000 <= var1 <= 0x0000 7fff.
4024f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4034f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Return Value :
4044f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   32 bit long signed integer (int32) whose value falls in the
4054f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0x8000 0000 <= L_var_out <= 0x7fff ffff.
4064f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4074f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber     ----------------------------------------------------------------------------*/
4084f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4094f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4104f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    __inline  int32 mul_16by16_to_int32(int16 var1, int16 var2)
4114f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    {
4124f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        int32 L_mul;
4134f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4144f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        L_mul  = ((int32) var1 * (int32) var2);
4154f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4164f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        if (L_mul != 0x40000000)
4174f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        {
4184f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber            L_mul <<= 1;
4194f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        }
4204f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        else
4214f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        {
4224f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber            L_mul = MAX_32;     /* saturation */
4234f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        }
4244f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4254f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        return (L_mul);
4264f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4274f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    }
4284f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4294f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    /*----------------------------------------------------------------------------
4304f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4314f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Function Name : amr_wb_round
4324f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4334f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Round the lower 16 bits of the 32 bit input number into the MS 16 bits
4344f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         with saturation. Shift the resulting bits right by 16 and return the 16
4354f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         bit number:
4364f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                     round(L_var1) = extract_h(L_add(L_var1,32768))
4374f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4384f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Inputs :
4394f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          L_var1
4404f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   32 bit long signed integer (int32 ) whose value falls in the
4414f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0x8000 0000 <= L_var1 <= 0x7fff ffff.
4424f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4434f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Return Value :
4444f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   16 bit short signed integer (int16) whose value falls in the
4454f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0xffff 8000 <= var_out <= 0x0000 7fff.
4464f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4474f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber     ----------------------------------------------------------------------------*/
4484f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    __inline int16 amr_wb_round(int32 L_var1)
4494f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    {
4504f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        if (L_var1 != MAX_32)
4514f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        {
4524f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber            L_var1 +=  0x00008000L;
4534f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        }
4544f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        return ((int16)(L_var1 >> 16));
4554f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    }
4564f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4574f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4584f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    /*----------------------------------------------------------------------------
4594f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4604f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Function Name : amr_wb_shl1_round
4614f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4624f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Shift the 32 bit input number to the left by 1, round up the result and
4634f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         shift down by 16
4644f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                     amr_wb_shl1_round(L_var1) = round(L_shl(L_var1,1))
4654f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4664f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Inputs :
4674f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber          L_var1
4684f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   32 bit long signed integer (int32 ) whose value falls in the
4694f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0x8000 0000 <= L_var1 <= 0x7fff ffff.
4704f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4714f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         Return Value :
4724f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   16 bit short signed integer (int16) whose value falls in the
4734f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                   range : 0xffff 8000 <= var_out <= 0x0000 7fff.
4744f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4754f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber     ----------------------------------------------------------------------------*/
4764f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    __inline int16 amr_wb_shl1_round(int32 L_var1)
4774f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    {
4784f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        int16 var_out;
4794f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4804f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        if ((L_var1 << 1) >> 1 == L_var1)
4814f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        {
4824f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber            var_out = (int16)((L_var1 + 0x00004000) >> 15);
4834f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        }
4844f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        else
4854f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        {
4864f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber            var_out = (int16)(((L_var1 >> 31) ^ MAX_32) >> 16);
4874f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        }
4884f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4894f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        return (var_out);
4904f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    }
4914f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4924f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    /*----------------------------------------------------------------------------
4934f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber             Function Name : mul_32by16
4944f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4954f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber             Multiply a 16 bit integer by a 32 bit (DPF). The result is divided
4964f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber             by 2^15
4974f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
4984f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber                    L_32 = (hi1*lo2)<<1 + ((lo1*lo2)>>15)<<1
4994f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
5004f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber             Inputs :
5014f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
5024f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber             hi          hi part of 32 bit number.
5034f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber             lo          lo part of 32 bit number.
5044f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber             n           16 bit number.
5054f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
5064f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber         ----------------------------------------------------------------------------*/
5074f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
5084f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
5094f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    __inline int32 mul_32by16(int16 hi, int16 lo, int16 n)
5104f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    {
5114f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        return (((((int32)hi*n)) + ((((int32)lo*n) >> 15))) << 1);
5124f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    }
5134f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
5144f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    __inline  int32 fxp_mac_16by16(int16 var1,  int16 var2, int32 L_add)
5154f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    {
5164f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
5174f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        L_add += (int32)var1 * var2;
5184f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
5194f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        return L_add;
5204f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    }
5214f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
5224f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    __inline  int32 fxp_mul_16by16(int16 var1, const int16 var2)
5234f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    {
5244f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        int32 L_mul = (int32)var1 * var2;
5254f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
5264f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        return L_mul;
5274f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    }
5284f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
5294f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    __inline  int32 fxp_mul32_by_16b(int32 L_var1, const int32 L_var2)
5304f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    {
5314f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
5324f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        int32 L_mul = (int32)(((int64)L_var1 * (L_var2 << 16)) >> 32);
5334f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
5344f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber        return L_mul;
5354f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber    }
5364f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
5374f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
5384f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber#ifdef __cplusplus
5394f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber}
5404f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber#endif
5414f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
5424f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber#endif
5434f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
5444f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber#endif   /*  PVAMRWBDECODER_BASIC_OP_CEQUIVALENT_H  */
5454f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber
546