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_arm_gcc_v5.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 GCC-ARM V5 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_ARM_GCC_V5_H 514f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber#define BASIC_OP_ARM_GCC_V5_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 /*---------------------------------------------------------------------------- 664f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ; MACROS 674f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ; Define module specific macros here 684f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ----------------------------------------------------------------------------*/ 694f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 704f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /*---------------------------------------------------------------------------- 714f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ; DEFINES 724f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ; Include all pre-processor statements here. 734f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ----------------------------------------------------------------------------*/ 744f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 754f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /*---------------------------------------------------------------------------- 764f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ; EXTERNAL VARIABLES REFERENCES 774f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ; Declare variables used in this module but defined elsewhere 784f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ----------------------------------------------------------------------------*/ 794f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 804f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /*---------------------------------------------------------------------------- 814f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ; SIMPLE TYPEDEF'S 824f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ----------------------------------------------------------------------------*/ 834f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 844f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /*---------------------------------------------------------------------------- 854f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ; ENUMERATED TYPEDEF'S 864f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ----------------------------------------------------------------------------*/ 874f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 884f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /*---------------------------------------------------------------------------- 894f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ; STRUCTURES TYPEDEF'S 904f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ----------------------------------------------------------------------------*/ 914f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 924f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /*---------------------------------------------------------------------------- 934f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ; GLOBAL FUNCTION DEFINITIONS 944f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ; Function Prototype declaration 954f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ----------------------------------------------------------------------------*/ 964f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 974f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 984f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 994f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* 1004f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 1014f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber FUNCTION NAME: L_add 1024f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 1034f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber INPUT AND OUTPUT DEFINITIONS 1044f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1054f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Inputs: 1064f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var1 = 32 bit long signed integer (Word32) whose value falls 1074f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber in the range : 0x8000 0000 <= L_var1 <= 0x7fff ffff. 1084f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1094f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var2 = 32 bit long signed integer (Word32) whose value falls 1104f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber in the range : 0x8000 0000 <= L_var1 <= 0x7fff ffff. 1114f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1124f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow = pointer to overflow (Flag) 1134f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1144f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Outputs: 1154f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow -> 1 if the 32 bit add operation resulted in overflow 1164f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1174f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Returns: 1184f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_sum = 32-bit sum of L_var1 and L_var2 (Word32) 1194f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber */ 1204f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1214f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber __inline Word32 L_add(register Word32 L_var1, register Word32 L_var2, Flag *pOverflow) 1224f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber { 1234f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 ra = L_var1; 1244f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 rb = L_var2; 1254f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 result; 1264f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1274f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber OSCL_UNUSED_ARG(pOverflow); 1284f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1294f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("qadd %0, %1, %2" 1304f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(result) 1314f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(ra), "r"(rb) 1324f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 1334f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber return (result); 1344f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1354f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 1364f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1374f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* 1384f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 1394f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber FUNCTION NAME: L_sub 1404f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 1414f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber INPUT AND OUTPUT DEFINITIONS 1424f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1434f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Inputs: 1444f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var1 = 32 bit long signed integer (Word32) whose value falls 1454f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber in the range : 0x8000 0000 <= L_var1 <= 0x7fff ffff. 1464f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1474f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var2 = 32 bit long signed integer (Word32) whose value falls 1484f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber in the range : 0x8000 0000 <= L_var1 <= 0x7fff ffff. 1494f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1504f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow = pointer to overflow (Flag) 1514f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1524f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Outputs: 1534f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow -> 1 if the 32 bit add operation resulted in overflow 1544f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1554f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Returns: 1564f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_diff = 32-bit difference of L_var1 and L_var2 (Word32) 1574f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber */ 1584f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber __inline Word32 L_sub(Word32 L_var1, Word32 L_var2, Flag *pOverflow) 1594f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber{ 1604f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 ra = L_var1; 1614f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 rb = L_var2; 1624f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 result; 1634f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1644f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber OSCL_UNUSED_ARG(pOverflow); 1654f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1664f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("qsub %0, %1, %2" 1674f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(result) 1684f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(ra), "r"(rb) 1694f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 1704f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1714f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber return (result); 1724f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 1734f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1744f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1754f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* 1764f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 1774f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber FUNCTION NAME: L_mac 1784f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 1794f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber INPUT AND OUTPUT DEFINITIONS 1804f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1814f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Inputs: 1824f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var3 = 32 bit long signed integer (Word32) whose value falls 1834f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber in the range : 0x8000 0000 <= L_var3 <= 0x7fff ffff. 1844f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber var1 = 16 bit short signed integer (Word16) whose value falls in 1854f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber the range : 0xffff 8000 <= var1 <= 0x0000 7fff. 1864f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber var2 = 16 bit short signed integer (Word16) whose value falls in 1874f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber the range : 0xffff 8000 <= var2 <= 0x0000 7fff. 1884f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1894f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow = pointer to overflow (Flag) 1904f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1914f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Outputs: 1924f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow -> 1 if the 32 bit add operation resulted in overflow 1934f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 1944f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Returns: 1954f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber result = 32-bit result of L_var3 + (var1 * var2)(Word32) 1964f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber */ 1974f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber static inline Word32 L_mac(Word32 L_var3, Word16 var1, Word16 var2, Flag *pOverflow) 1984f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber{ 1994f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 ra = L_var3; 2004f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 rb = var1; 2014f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 rc = var2; 2024f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 result; 2034f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2044f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber OSCL_UNUSED_ARG(pOverflow); 2054f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2064f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("smulbb %0, %1, %2" 2074f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(result) 2084f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(rb), "r"(rc) 2094f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 2104f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2114f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("qdadd %0, %1, %2" 2124f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(rc) 2134f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(ra), "r"(result) 2144f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 2154f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2164f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber return (rc); 2174f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 2184f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2194f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* 2204f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 2214f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber FUNCTION NAME: L_mult 2224f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 2234f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber INPUT AND OUTPUT DEFINITIONS 2244f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2254f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Inputs: 2264f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var1 = 16 bit short signed integer (Word16) whose value falls in 2274f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber the range : 0xffff 8000 <= var1 <= 0x0000 7fff. 2284f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2294f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var2 = 16 bit short signed integer (Word16) whose value falls in 2304f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber the range : 0xffff 8000 <= var1 <= 0x0000 7fff. 2314f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2324f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow = pointer to overflow (Flag) 2334f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2344f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Outputs: 2354f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow -> 1 if the 32 bit add operation resulted in overflow 2364f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2374f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Returns: 2384f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_product = 32-bit product of L_var1 and L_var2 (Word32) 2394f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber */ 2404f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2414f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber __inline Word32 L_mult(Word16 var1, Word16 var2, Flag *pOverflow) 2424f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber{ 2434f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 ra = var1; 2444f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 rb = var2; 2454f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 result; 2464f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 product; 2474f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2484f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber OSCL_UNUSED_ARG(pOverflow); 2494f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2504f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("smulbb %0, %1, %2" 2514f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(product) 2524f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(ra), "r"(rb) 2534f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 2544f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2554f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("qadd %0, %1, %2" 2564f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(result) 2574f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(product), "r"(product) 2584f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 2594f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2604f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber return(result); 2614f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 2624f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2634f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* 2644f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 2654f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber FUNCTION NAME: L_msu 2664f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 2674f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber INPUT AND OUTPUT DEFINITIONS 2684f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2694f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Inputs: 2704f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var3 = 32 bit long signed integer (Word32) whose value falls 2714f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber in the range : 0x8000 0000 <= L_var3 <= 0x7fff ffff. 2724f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2734f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber var1 = 16 bit short signed integer (Word16) whose value falls in 2744f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber the range : 0xffff 8000 <= var1 <= 0x0000 7fff. 2754f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber var2 = 16 bit short signed integer (Word16) whose value falls in 2764f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber the range : 0xffff 8000 <= var2 <= 0x0000 7fff. 2774f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2784f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow = pointer to overflow (Flag) 2794f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2804f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Outputs: 2814f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow -> 1 if the 32 bit operation resulted in overflow 2824f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2834f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Returns: 2844f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber result = 32-bit result of L_var3 - (var1 * var2) 2854f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber */ 2864f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber __inline Word32 L_msu(Word32 L_var3, Word16 var1, Word16 var2, Flag *pOverflow) 2874f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber{ 2884f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 ra = L_var3; 2894f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 rb = var1; 2904f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 rc = var2; 2914f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 product; 2924f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 result; 2934f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2944f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber OSCL_UNUSED_ARG(pOverflow); 2954f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 2964f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("smulbb %0, %1, %2" 2974f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(product) 2984f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(rb), "r"(rc) 2994f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 3004f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3014f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("qdsub %0, %1, %2" 3024f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(result) 3034f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(ra), "r"(product) 3044f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 3054f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3064f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber return (result); 3074f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 3084f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3094f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* 3104f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 3114f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber FUNCTION NAME: Mpy_32 3124f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 3134f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber INPUT AND OUTPUT DEFINITIONS 3144f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3154f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Inputs: 3164f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var1_hi = most significant word of first input (Word16). 3174f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var1_lo = least significant word of first input (Word16). 3184f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var2_hi = most significant word of second input (Word16). 3194f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var2_lo = least significant word of second input (Word16). 3204f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3214f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow = pointer to overflow (Flag) 3224f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3234f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Outputs: 3244f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow -> 1 if the 32 bit multiply operation resulted in overflow 3254f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3264f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Returns: 3274f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_product = 32-bit product of L_var1 and L_var2 (Word32) 3284f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber */ 3294f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber static inline Word32 Mpy_32(Word16 L_var1_hi, 3304f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word16 L_var1_lo, 3314f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word16 L_var2_hi, 3324f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word16 L_var2_lo, 3334f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Flag *pOverflow) 3344f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber{ 3354f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 product32; 3364f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 L_sum; 3374f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 L_product, result; 3384f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 ra = L_var1_hi; 3394f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 rb = L_var1_lo; 3404f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 rc = L_var2_hi; 3414f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 rd = L_var2_lo; 3424f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3434f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3444f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3454f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber OSCL_UNUSED_ARG(pOverflow); 3464f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3474f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("smulbb %0, %1, %2" 3484f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(L_product) 3494f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(ra), "r"(rc) 3504f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 3514f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("mov %0, #0" 3524f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(result) 3534f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 3544f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3554f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("qdadd %0, %1, %2" 3564f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(L_sum) 3574f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(result), "r"(L_product) 3584f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 3594f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3604f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("smulbb %0, %1, %2" 3614f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(product32) 3624f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(ra), "r"(rd) 3634f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 3644f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3654f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("mov %0, %1, ASR #15" 3664f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(ra) 3674f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(product32) 3684f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 3694f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("qdadd %0, %1, %2" 3704f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(L_product) 3714f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(L_sum), "r"(ra) 3724f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 3734f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3744f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("smulbb %0, %1, %2" 3754f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(product32) 3764f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(rb), "r"(rc) 3774f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 3784f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3794f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("mov %0, %1, ASR #15" 3804f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(rb) 3814f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(product32) 3824f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 3834f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3844f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("qdadd %0, %1, %2" 3854f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(L_sum) 3864f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(L_product), "r"(rb) 3874f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 3884f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3894f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber return (L_sum); 3904f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 3914f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3924f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3934f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 3944f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* 3954f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 3964f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber FUNCTION NAME: Mpy_32_16 3974f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 3984f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber INPUT AND OUTPUT DEFINITIONS 3994f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4004f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Inputs: 4014f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var1_hi = most significant 16 bits of 32-bit input (Word16). 4024f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber L_var1_lo = least significant 16 bits of 32-bit input (Word16). 4034f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber var2 = 16-bit signed integer (Word16). 4044f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4054f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow = pointer to overflow (Flag) 4064f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4074f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Outputs: 4084f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow -> 1 if the 32 bit product operation resulted in overflow 4094f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4104f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Returns: 4114f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber product = 32-bit product of the 32-bit L_var1 and 16-bit var1 (Word32) 4124f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber */ 4134f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber static inline Word32 Mpy_32_16(Word16 L_var1_hi, 4144f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word16 L_var1_lo, 4154f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word16 var2, 4164f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Flag *pOverflow) 4174f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber{ 4184f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4194f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 ra = L_var1_hi; 4204f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 rb = L_var1_lo; 4214f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 rc = var2; 4224f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 result, L_product; 4234f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4244f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber OSCL_UNUSED_ARG(pOverflow); 4254f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4264f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("smulbb %0, %1, %2" 4274f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(L_product) 4284f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(ra), "r"(rc) 4294f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 4304f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("mov %0, #0" 4314f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(result) 4324f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 4334f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4344f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("qdadd %0, %1, %2" 4354f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(L_product) 4364f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(result), "r"(L_product) 4374f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 4384f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4394f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("smulbb %0, %1, %2" 4404f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(result) 4414f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(rb), "r"(rc) 4424f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 4434f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4444f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("mov %0, %1, ASR #15" 4454f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(ra) 4464f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(result) 4474f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 4484f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("qdadd %0, %1, %2" 4494f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(result) 4504f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(L_product), "r"(ra) 4514f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 4524f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4534f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber return (result); 4544f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 4554f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4564f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /* 4574f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 4584f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber FUNCTION NAME: mult 4594f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ------------------------------------------------------------------------------ 4604f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber INPUT AND OUTPUT DEFINITIONS 4614f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4624f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Inputs: 4634f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber var1 = 16 bit short signed integer (Word16) whose value falls in 4644f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber the range : 0xffff 8000 <= var1 <= 0x0000 7fff. 4654f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4664f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber var2 = 16 bit short signed integer (Word16) whose value falls in 4674f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber the range : 0xffff 8000 <= var2 <= 0x0000 7fff. 4684f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4694f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow = pointer to overflow (Flag) 4704f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4714f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Outputs: 4724f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber pOverflow -> 1 if the add operation resulted in overflow 4734f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4744f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Returns: 4754f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber product = 16-bit limited product of var1 and var2 (Word16) 4764f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber */ 4774f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber __inline Word16 mult(Word16 var1, Word16 var2, Flag *pOverflow) 4784f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber{ 4794f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 ra = var1; 4804f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 rb = var2; 4814f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 product; 4824f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 temp; 4834f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4844f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber OSCL_UNUSED_ARG(pOverflow); 4854f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4864f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile( 4874f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber "smulbb %0, %1, %2" 4884f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(temp) 4894f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(ra), "r"(rb) 4904f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 4914f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile( 4924f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber "qadd %0, %1, %2\n\t" 4934f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber "mov %0, %0, asr #16" 4944f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=&r*i"(product) 4954f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(temp), "r"(temp) 4964f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 4974f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 4984f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber return ((Word16) product); 4994f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 5004f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 5014f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber __inline Word32 amrnb_fxp_mac_16_by_16bb(Word32 L_var1, Word32 L_var2, Word32 L_var3) 5024f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber{ 5034f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 ra = L_var1; 5044f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 rb = L_var2; 5054f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 rc = L_var3; 5064f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 result; 5074f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 5084f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("smlabb %0, %1, %2, %3" 5094f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(result) 5104f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(ra), "r"(rb), "r"(rc) 5114f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 5124f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber return (result); 5134f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 5144f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 5154f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber __inline Word32 amrnb_fxp_msu_16_by_16bb(Word32 L_var1, Word32 L_var2, Word32 L_var3) 5164f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber{ 5174f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 ra = L_var1; 5184f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 rb = L_var2; 5194f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber register Word32 rc = L_var3; 5204f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber Word32 result; 5214f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 5224f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("rsb %0, %1, #0" 5234f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(ra) 5244f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(ra) 5254f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 5264f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 5274f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber asm volatile("smlabb %0, %1, %2, %3" 5284f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "=r"(result) 5294f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber : "r"(ra), "r"(rb), "r"(rc) 5304f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ); 5314f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber return (result); 5324f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber } 5334f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 5344f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber /*---------------------------------------------------------------------------- 5354f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ; END 5364f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber ----------------------------------------------------------------------------*/ 5374f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber#ifdef __cplusplus 5384f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber} 5394f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber#endif 5404f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 5414f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber#endif /* BASIC_OP_ARM_GCC_V5_H */ 5424f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 5434f1efc098cb5791c3e9f483f2af84aef70d2d0a0Andreas Huber 544