#include <stdlib.h>
#include <stdio.h>
#include <math.h>

#include "SamsungSolomonVoiceW_Int.h"

#define WEBRTC_SPL_SCALEDIFF32(A, B, C) \
	(C + (B >> 16) * A + (((WebRtc_UWord32)(0x0000FFFF & B) * A) >> 16))

const uint16_t kResampleAllpass1[3] = {3284, 24441, 49528};
const uint16_t kResampleAllpass2[3] = {12199, 37471, 60255};

#define MUL_ACCUM_1(a, b, c) WEBRTC_SPL_SCALEDIFF32(a, b, c)
#define MUL_ACCUM_2(a, b, c) WEBRTC_SPL_SCALEDIFF32(a, b, c)

void WebRtcSpl_DownsampleBy2(const int16_t* in, size_t len, int16_t* out, int32_t* filtState) {

	int32_t tmp1, tmp2, diff, in32, out32;
	size_t i;

	register int32_t state0 = filtState[0];
	register int32_t state1 = filtState[1];
	register int32_t state2 = filtState[2];
	register int32_t state3 = filtState[3];
	register int32_t state4 = filtState[4];
	register int32_t state5 = filtState[5];
	register int32_t state6 = filtState[6];
	register int32_t state7 = filtState[7];


	for (i = (len >> 1); i > 0; i--) {
		// lower allpass filter
		in32 = (int32_t)(*in++) << 10;
		diff = in32 - state1;
		tmp1 = MUL_ACCUM_1(kResampleAllpass2[0], diff, state0);
		state0 = in32;
		diff = tmp1 - state2;
		tmp2 = MUL_ACCUM_2(kResampleAllpass2[1], diff, state1);
		state1 = tmp1;
		diff = tmp2 - state3;
		state3 = MUL_ACCUM_2(kResampleAllpass2[2], diff, state2);
		state2 = tmp2;

		// upper allpass filter
		in32 = (int32_t)(*in++) << 10;
		diff = in32 - state5;
		tmp1 = MUL_ACCUM_1(kResampleAllpass1[0], diff, state4);
		state4 = in32;
		diff = tmp1 - state6;
		tmp2 = MUL_ACCUM_1(kResampleAllpass1[1], diff, state5);
		state5 = tmp1;
		diff = tmp2 - state7;
		state7 = MUL_ACCUM_2(kResampleAllpass1[2], diff, state6);
		state6 = tmp2;

		// add two allpass outputs, divide by two and round
		out32 = (state3 + state7 + 1024) >> 11;

    // limit amplitude to prevent wrap-around, and write to output array
//    *out++ = saturate(out32);
//		*out++ = WebRtcSpl_SatW32ToW16(out32);
		*out++ = DVTXOP_saturate(out32);
  }

	filtState[0] = state0;
	filtState[1] = state1;
	filtState[2] = state2;
	filtState[3] = state3;
	filtState[4] = state4;
	filtState[5] = state5;
	filtState[6] = state6;
	filtState[7] = state7;
}

void WebRtcSpl_UpsampleBy2(const int16_t* in, size_t len, int16_t* out, int32_t* filtState) {
  int32_t tmp1, tmp2, diff, in32, out32;
  size_t i;

  register int32_t state0 = filtState[0];
  register int32_t state1 = filtState[1];
  register int32_t state2 = filtState[2];
  register int32_t state3 = filtState[3];
  register int32_t state4 = filtState[4];
  register int32_t state5 = filtState[5];
  register int32_t state6 = filtState[6];
  register int32_t state7 = filtState[7];


  for (i = len; i > 0; i--) {
    // lower allpass filter
    in32 = (int32_t)(*in++) << 10;
    diff = in32 - state1;
    tmp1 = MUL_ACCUM_1(kResampleAllpass1[0], diff, state0);
    state0 = in32;
    diff = tmp1 - state2;
    tmp2 = MUL_ACCUM_1(kResampleAllpass1[1], diff, state1);
    state1 = tmp1;
    diff = tmp2 - state3;
    state3 = MUL_ACCUM_2(kResampleAllpass1[2], diff, state2);
    state2 = tmp2;

    // round; limit amplitude to prevent wrap-around; write to output array
    out32 = (state3 + 512) >> 10;
//	*out++ = saturate(out32);
//	*out++ = WebRtcSpl_SatW32ToW16(out32);
	*out++ = DVTXOP_saturate(out32);

    // upper allpass filter
    diff = in32 - state5;
    tmp1 = MUL_ACCUM_1(kResampleAllpass2[0], diff, state4);
    state4 = in32;
    diff = tmp1 - state6;
    tmp2 = MUL_ACCUM_2(kResampleAllpass2[1], diff, state5);
    state5 = tmp1;
    diff = tmp2 - state7;
    state7 = MUL_ACCUM_2(kResampleAllpass2[2], diff, state6);
    state6 = tmp2;

    // round; limit amplitude to prevent wrap-around; write to output array
    out32 = (state7 + 512) >> 10;
//	*out++ = saturate(out32);
//	*out++ = WebRtcSpl_SatW32ToW16(out32);
	*out++ = DVTXOP_saturate(out32);
  }

  filtState[0] = state0;
  filtState[1] = state1;
  filtState[2] = state2;
  filtState[3] = state3;
  filtState[4] = state4;
  filtState[5] = state5;
  filtState[6] = state6;
  filtState[7] = state7;

}
