summaryrefslogtreecommitdiff
path: root/Drivers/CMSIS/DSP/DSP_Lib_TestSuite/RefLibs/src/StatisticsFunctions/rms.c
blob: 94943a9e3c8acfa2fe14ed50a1f1752d3936cec8 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
#include "ref.h"

void ref_rms_f32(
  float32_t * pSrc,
  uint32_t blockSize,
  float32_t * pResult)
{
	uint32_t i;
	float32_t sumsq=0;
	
	for(i=0;i<blockSize;i++)
	{
			sumsq += pSrc[i] * pSrc[i];
	}
	*pResult = sqrtf(sumsq / (float32_t)blockSize);
}

void ref_rms_q31(
  q31_t * pSrc,
  uint32_t blockSize,
  q31_t * pResult)
{
	uint32_t i;
    uint64_t sumsq = 0;             /* accumulator (can get never negative. changed type from q63 to uint64 */
	q63_t tmp1;
	q31_t tmp2;
  
  float help_float;
  
	for(i=0;i<blockSize;i++)
	{
			sumsq += (q63_t)pSrc[i] * pSrc[i];
	}
	tmp1 = (sumsq / (q63_t)blockSize) >> 31;
	tmp2 = ref_sat_q31(tmp1);

  /* GCC M0 problem: __aeabi_f2iz(QNAN) returns not 0 */
  help_float = (sqrtf((float)tmp2 / 2147483648.0f) * 2147483648.0f);
  /* Checking for a NAN value in help_float */
  if (((*((int *)(&help_float))) & 0x7FC00000) == 0x7FC00000) {
      help_float = 0;
  }
  *pResult = (q31_t)(help_float);

//  *pResult = (q31_t)(sqrtf((float)tmp2 / 2147483648.0f) * 2147483648.0f);
}

void ref_rms_q15(
  q15_t * pSrc,
  uint32_t blockSize,
  q15_t * pResult)
{
	uint32_t i;
	q63_t sumsq=0;
	q31_t tmp1;
	q15_t tmp2;
	
	for(i=0;i<blockSize;i++)
	{
			sumsq += (q63_t)pSrc[i] * pSrc[i];
	}
	tmp1 = (sumsq / (q63_t)blockSize) >> 15;
	tmp2 = ref_sat_q15(tmp1);
	*pResult = (q15_t)(sqrtf((float)tmp2 / 32768.0f) * 32768.0f);
}