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.073 224f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ANSI-C code for the Adaptive Multi-Rate (AMR) speech codec 234f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Available from http://www.3gpp.org 244f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 254f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber(C) 2004, 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 Pathname: ./include/basic_op_c_equivalent.h 324f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 334f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber------------------------------------------------------------------------------ 344f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber REVISION HISTORY 354f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 364f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Who: Date: 374f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Description: 384f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 394f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber------------------------------------------------------------------------------ 404f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber INCLUDE DESCRIPTION 414f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 424f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber This file includes all the C-Equivalent basicop.c functions. 434f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 444f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber------------------------------------------------------------------------------ 454f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber*/ 464f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 474f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber/*---------------------------------------------------------------------------- 484f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber; CONTINUE ONLY IF NOT ALREADY DEFINED 494f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber----------------------------------------------------------------------------*/ 504f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber#ifndef BASIC_OP_C_EQUIVALENT_H 514f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber#define BASIC_OP_C_EQUIVALENT_H 524f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 534f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber/*---------------------------------------------------------------------------- 544f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber; INCLUDES 554f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber----------------------------------------------------------------------------*/ 564f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber#include "basicop_malloc.h" 574f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 584f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber/*--------------------------------------------------------------------------*/ 594f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber#ifdef __cplusplus 604f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huberextern "C" 614f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber{ 624f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber#endif 634f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 644f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /*---------------------------------------------------------------------------- 654f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ; MACROS 664f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ; Define module specific macros here 674f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ----------------------------------------------------------------------------*/ 684f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 694f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /*---------------------------------------------------------------------------- 704f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ; DEFINES 714f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ; Include all pre-processor statements here. 724f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ----------------------------------------------------------------------------*/ 734f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 744f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /*---------------------------------------------------------------------------- 754f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ; EXTERNAL VARIABLES REFERENCES 764f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ; Declare variables used in this module but defined elsewhere 774f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ----------------------------------------------------------------------------*/ 784f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 794f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /*---------------------------------------------------------------------------- 804f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ; SIMPLE TYPEDEF'S 814f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ----------------------------------------------------------------------------*/ 824f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 834f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /*---------------------------------------------------------------------------- 844f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ; ENUMERATED TYPEDEF'S 854f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ----------------------------------------------------------------------------*/ 864f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 874f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /*---------------------------------------------------------------------------- 884f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ; STRUCTURES TYPEDEF'S 894f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ----------------------------------------------------------------------------*/ 904f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 914f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /*---------------------------------------------------------------------------- 924f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ; GLOBAL FUNCTION DEFINITIONS 934f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ; Function Prototype declaration 944f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ----------------------------------------------------------------------------*/ 954f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 964f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 974f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* 984f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 994f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber FUNCTION NAME: L_add 1004f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 1014f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber INPUT AND OUTPUT DEFINITIONS 1024f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1034f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Inputs: 1044f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var1 = 32 bit long signed integer (Word32) whose value falls 1054f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber in the range : 0x8000 0000 <= L_var1 <= 0x7fff ffff. 1064f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1074f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var2 = 32 bit long signed integer (Word32) whose value falls 1084f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber in the range : 0x8000 0000 <= L_var1 <= 0x7fff ffff. 1094f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1104f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow = pointer to overflow (Flag) 1114f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1124f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Outputs: 1134f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow -> 1 if the 32 bit add operation resulted in overflow 1144f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1154f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Returns: 1164f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_sum = 32-bit sum of L_var1 and L_var2 (Word32) 1174f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber */ 1184f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber static inline Word32 L_add(register Word32 L_var1, register Word32 L_var2, Flag *pOverflow) 1194f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 1204f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 L_sum; 1214f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1224f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_sum = L_var1 + L_var2; 1234f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1244f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber if ((L_var1 ^ L_var2) >= 0) 1254f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 1264f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber if ((L_sum ^ L_var1) < 0) 1274f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 1284f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_sum = (L_var1 < 0) ? MIN_32 : MAX_32; 1294f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber *pOverflow = 1; 1304f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 1314f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 1324f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1334f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber return (L_sum); 1344f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 1354f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1364f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* 1374f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 1384f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber FUNCTION NAME: L_sub 1394f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 1404f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber INPUT AND OUTPUT DEFINITIONS 1414f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1424f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Inputs: 1434f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var1 = 32 bit long signed integer (Word32) whose value falls 1444f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber in the range : 0x8000 0000 <= L_var1 <= 0x7fff ffff. 1454f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1464f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var2 = 32 bit long signed integer (Word32) whose value falls 1474f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber in the range : 0x8000 0000 <= L_var1 <= 0x7fff ffff. 1484f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1494f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow = pointer to overflow (Flag) 1504f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1514f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Outputs: 1524f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow -> 1 if the 32 bit add operation resulted in overflow 1534f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1544f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Returns: 1554f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_diff = 32-bit difference of L_var1 and L_var2 (Word32) 1564f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber */ 1574f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber static inline Word32 L_sub(register Word32 L_var1, register Word32 L_var2, 1584f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Flag *pOverflow) 1594f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 1604f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 L_diff; 1614f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1624f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_diff = L_var1 - L_var2; 1634f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1644f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber if ((L_var1 ^ L_var2) < 0) 1654f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 1664f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber if ((L_diff ^ L_var1) & MIN_32) 1674f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 1684f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_diff = (L_var1 < 0L) ? MIN_32 : MAX_32; 1694f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber *pOverflow = 1; 1704f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 1714f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 1724f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1734f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber return (L_diff); 1744f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 1754f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1764f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1774f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* 1784f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 1794f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber FUNCTION NAME: L_mac 1804f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 1814f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber INPUT AND OUTPUT DEFINITIONS 1824f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1834f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Inputs: 1844f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var3 = 32 bit long signed integer (Word32) whose value falls 1854f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber in the range : 0x8000 0000 <= L_var3 <= 0x7fff ffff. 1864f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber var1 = 16 bit short signed integer (Word16) whose value falls in 1874f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber the range : 0xffff 8000 <= var1 <= 0x0000 7fff. 1884f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber var2 = 16 bit short signed integer (Word16) whose value falls in 1894f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber the range : 0xffff 8000 <= var2 <= 0x0000 7fff. 1904f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1914f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow = pointer to overflow (Flag) 1924f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1934f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Outputs: 1944f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow -> 1 if the 32 bit add operation resulted in overflow 1954f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1964f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Returns: 1974f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber result = 32-bit result of L_var3 + (var1 * var2)(Word32) 1984f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber */ 1994f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber __inline Word32 L_mac(Word32 L_var3, Word16 var1, Word16 var2, Flag *pOverflow) 2004f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 2014f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 result; 2024f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 L_sum; 2034f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber result = (Word32) var1 * var2; 2044f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber if (result != (Word32) 0x40000000L) 2054f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 2064f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_sum = (result << 1) + L_var3; 2074f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2084f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* Check if L_sum and L_var_3 share the same sign */ 2094f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber if ((L_var3 ^ result) > 0) 2104f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 2114f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber if ((L_sum ^ L_var3) < 0) 2124f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 2134f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_sum = (L_var3 < 0) ? MIN_32 : MAX_32; 2144f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber *pOverflow = 1; 2154f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 2164f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 2174f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 2184f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber else 2194f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 2204f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber *pOverflow = 1; 2214f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_sum = MAX_32; 2224f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 2234f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber return (L_sum); 2244f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 2254f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2264f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* 2274f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 2284f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber FUNCTION NAME: L_mult 2294f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 2304f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber INPUT AND OUTPUT DEFINITIONS 2314f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2324f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Inputs: 2334f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var1 = 16 bit short signed integer (Word16) whose value falls in 2344f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber the range : 0xffff 8000 <= var1 <= 0x0000 7fff. 2354f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2364f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var2 = 16 bit short signed integer (Word16) whose value falls in 2374f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber the range : 0xffff 8000 <= var1 <= 0x0000 7fff. 2384f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2394f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow = pointer to overflow (Flag) 2404f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2414f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Outputs: 2424f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow -> 1 if the 32 bit add operation resulted in overflow 2434f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2444f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Returns: 2454f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_product = 32-bit product of L_var1 and L_var2 (Word32) 2464f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber */ 2474f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber static inline Word32 L_mult(Word16 var1, Word16 var2, Flag *pOverflow) 2484f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 2494f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 L_product; 2504f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2514f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_product = (Word32) var1 * var2; 2524f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2534f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber if (L_product != (Word32) 0x40000000L) 2544f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 2554f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_product <<= 1; /* Multiply by 2 */ 2564f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 2574f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber else 2584f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 2594f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber *pOverflow = 1; 2604f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_product = MAX_32; 2614f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 2624f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2634f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber return (L_product); 2644f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 2654f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2664f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2674f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* 2684f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 2694f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber FUNCTION NAME: L_msu 2704f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 2714f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber INPUT AND OUTPUT DEFINITIONS 2724f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2734f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Inputs: 2744f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var3 = 32 bit long signed integer (Word32) whose value falls 2754f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber in the range : 0x8000 0000 <= L_var3 <= 0x7fff ffff. 2764f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2774f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber var1 = 16 bit short signed integer (Word16) whose value falls in 2784f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber the range : 0xffff 8000 <= var1 <= 0x0000 7fff. 2794f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber var2 = 16 bit short signed integer (Word16) whose value falls in 2804f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber the range : 0xffff 8000 <= var2 <= 0x0000 7fff. 2814f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2824f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow = pointer to overflow (Flag) 2834f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2844f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Outputs: 2854f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow -> 1 if the 32 bit operation resulted in overflow 2864f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2874f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Returns: 2884f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber result = 32-bit result of L_var3 - (var1 * var2) 2894f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber */ 2904f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2914f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber static inline Word32 L_msu(Word32 L_var3, Word16 var1, Word16 var2, Flag *pOverflow) 2924f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 2934f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 result; 2944f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2954f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber result = L_mult(var1, var2, pOverflow); 2964f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber result = L_sub(L_var3, result, pOverflow); 2974f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2984f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber return (result); 2994f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 3004f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3014f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* 3024f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 3034f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber FUNCTION NAME: Mpy_32 3044f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 3054f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber INPUT AND OUTPUT DEFINITIONS 3064f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3074f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Inputs: 3084f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var1_hi = most significant word of first input (Word16). 3094f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var1_lo = least significant word of first input (Word16). 3104f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var2_hi = most significant word of second input (Word16). 3114f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var2_lo = least significant word of second input (Word16). 3124f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3134f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow = pointer to overflow (Flag) 3144f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3154f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Outputs: 3164f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow -> 1 if the 32 bit multiply operation resulted in overflow 3174f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3184f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Returns: 3194f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_product = 32-bit product of L_var1 and L_var2 (Word32) 3204f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber */ 3214f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber __inline Word32 Mpy_32(Word16 L_var1_hi, 3224f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word16 L_var1_lo, 3234f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word16 L_var2_hi, 3244f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word16 L_var2_lo, 3254f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Flag *pOverflow) 3264f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 3274f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 L_product; 3284f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 L_sum; 3294f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 product32; 3304f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3314f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber OSCL_UNUSED_ARG(pOverflow); 3324f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_product = (Word32) L_var1_hi * L_var2_hi; 3334f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3344f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber if (L_product != (Word32) 0x40000000L) 3354f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 3364f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_product <<= 1; 3374f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 3384f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber else 3394f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 3404f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_product = MAX_32; 3414f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 3424f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3434f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* result = mult (L_var1_hi, L_var2_lo, pOverflow); */ 3444f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber product32 = ((Word32) L_var1_hi * L_var2_lo) >> 15; 3454f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3464f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* L_product = L_mac (L_product, result, 1, pOverflow); */ 3474f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_sum = L_product + (product32 << 1); 3484f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3494f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber if ((L_product ^ product32) > 0) 3504f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 3514f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber if ((L_sum ^ L_product) < 0) 3524f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 3534f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_sum = (L_product < 0) ? MIN_32 : MAX_32; 3544f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 3554f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 3564f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3574f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_product = L_sum; 3584f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3594f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* result = mult (L_var1_lo, L_var2_hi, pOverflow); */ 3604f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber product32 = ((Word32) L_var1_lo * L_var2_hi) >> 15; 3614f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3624f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* L_product = L_mac (L_product, result, 1, pOverflow); */ 3634f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_sum = L_product + (product32 << 1); 3644f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3654f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber if ((L_product ^ product32) > 0) 3664f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 3674f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber if ((L_sum ^ L_product) < 0) 3684f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 3694f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_sum = (L_product < 0) ? MIN_32 : MAX_32; 3704f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 3714f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 3724f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber return (L_sum); 3734f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 3744f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3754f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* 3764f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 3774f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber FUNCTION NAME: Mpy_32_16 3784f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 3794f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber INPUT AND OUTPUT DEFINITIONS 3804f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3814f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Inputs: 3824f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var1_hi = most significant 16 bits of 32-bit input (Word16). 3834f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var1_lo = least significant 16 bits of 32-bit input (Word16). 3844f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber var2 = 16-bit signed integer (Word16). 3854f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3864f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow = pointer to overflow (Flag) 3874f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3884f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Outputs: 3894f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow -> 1 if the 32 bit product operation resulted in overflow 3904f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3914f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Returns: 3924f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber product = 32-bit product of the 32-bit L_var1 and 16-bit var1 (Word32) 3934f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber */ 3944f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3954f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber __inline Word32 Mpy_32_16(Word16 L_var1_hi, 3964f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word16 L_var1_lo, 3974f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word16 var2, 3984f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Flag *pOverflow) 3994f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 4004f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4014f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 L_product; 4024f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 L_sum; 4034f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 result; 4044f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_product = (Word32) L_var1_hi * var2; 4054f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4064f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber if (L_product != (Word32) 0x40000000L) 4074f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 4084f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_product <<= 1; 4094f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 4104f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber else 4114f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 4124f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber *pOverflow = 1; 4134f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_product = MAX_32; 4144f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 4154f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4164f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber result = ((Word32)L_var1_lo * var2) >> 15; 4174f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4184f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_sum = L_product + (result << 1); 4194f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4204f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber if ((L_product ^ result) > 0) 4214f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 4224f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber if ((L_sum ^ L_product) < 0) 4234f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 4244f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_sum = (L_product < 0) ? MIN_32 : MAX_32; 4254f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber *pOverflow = 1; 4264f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 4274f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 4284f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber return (L_sum); 4294f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4304f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 4314f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4324f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* 4334f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 4344f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber FUNCTION NAME: mult 4354f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 4364f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber INPUT AND OUTPUT DEFINITIONS 4374f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4384f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Inputs: 4394f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber var1 = 16 bit short signed integer (Word16) whose value falls in 4404f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber the range : 0xffff 8000 <= var1 <= 0x0000 7fff. 4414f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4424f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber var2 = 16 bit short signed integer (Word16) whose value falls in 4434f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber the range : 0xffff 8000 <= var2 <= 0x0000 7fff. 4444f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4454f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow = pointer to overflow (Flag) 4464f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4474f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Outputs: 4484f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow -> 1 if the add operation resulted in overflow 4494f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4504f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Returns: 4514f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber product = 16-bit limited product of var1 and var2 (Word16) 4524f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber */ 4534f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber static inline Word16 mult(Word16 var1, Word16 var2, Flag *pOverflow) 4544f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 4554f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 product; 4564f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4574f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber product = ((Word32) var1 * var2) >> 15; 4584f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4594f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* Saturate result (if necessary). */ 4604f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* var1 * var2 >0x00007fff is the only case */ 4614f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* that saturation occurs. */ 4624f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4634f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber if (product > 0x00007fffL) 4644f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 4654f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber *pOverflow = 1; 4664f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber product = (Word32) MAX_16; 4674f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 4684f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4694f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4704f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* Return the product as a 16 bit value by type casting Word32 to Word16 */ 4714f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4724f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber return ((Word16) product); 4734f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 4744f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4754f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4764f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber static inline Word32 amrnb_fxp_mac_16_by_16bb(Word32 L_var1, Word32 L_var2, Word32 L_var3) 4774f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 4784f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 result; 4794f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4804f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber result = L_var3 + L_var1 * L_var2; 4814f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4824f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber return result; 4834f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 4844f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4854f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber static inline Word32 amrnb_fxp_msu_16_by_16bb(Word32 L_var1, Word32 L_var2, Word32 L_var3) 4864f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 4874f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 result; 4884f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4894f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber result = L_var3 - L_var1 * L_var2; 4904f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4914f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber return result; 4924f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 4934f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4944f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4954f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /*---------------------------------------------------------------------------- 4964f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ; END 4974f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ----------------------------------------------------------------------------*/ 4984f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber#ifdef __cplusplus 4994f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber} 5004f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber#endif 5014f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 5024f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber#endif /* BASIC_OP_C_EQUIVALENT_H */ 5034f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 5044f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 5054f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 506