/* 
// Copyright 2015 2018 Intel Corporation All Rights Reserved.
// 
// The source code, information and material ("Material") contained herein is
// owned by Intel Corporation or its suppliers or licensors, and title
// to such Material remains with Intel Corporation or its suppliers or
// licensors. The Material contains proprietary information of Intel
// or its suppliers and licensors. The Material is protected by worldwide
// copyright laws and treaty provisions. No part of the Material may be used,
// copied, reproduced, modified, published, uploaded, posted, transmitted,
// distributed or disclosed in any way without Intel's prior express written
// permission. No license under any patent, copyright or other intellectual
// property rights in the Material is granted to or conferred upon you,
// either expressly, by implication, inducement, estoppel or otherwise.
// Any license under such intellectual property rights must be express and
// approved by Intel in writing.
// 
// Unless otherwise agreed by Intel in writing,
// you may not remove or alter this notice or any other notice embedded in
// Materials by Intel or Intel's suppliers or licensors in any way.
*/
#include <math.h>
#include <stdio.h>
#include "ipp.h"

#undef NUMITERS
#define NUMITERS 150

/* Next two defines are created to simplify code reading and understanding */
#define EXIT_MAIN exitLine:                                  /* Label for Exit */
#define check_sts(st) if((st) != ippStsNoErr) goto exitLine; /* Go to Exit if Intel(R) Integrated Primitives (Intel(R) IPP) function returned status different from ippStsNoErr */

/* Results of ippMalloc() are not validated because Intel(R) IPP functions perform bad arguments check and will return an appropriate status  */

int main()
{
    int n = 0, i = 0, specSize = 0, bufferSize = 0;
    IppStatus status;
    IppsIIRState_32f *pIIRState = NULL;  /* Pointer to Intel(R) IPP state structure */
    IppsFIRSpec_32f  *pFIRSpec  = NULL;  /* Pointer to FIR Spec structure */
    Ipp32f *x = ippsMalloc_32f(NUMITERS + 10),
           *y = ippsMalloc_32f(NUMITERS),
           *z = ippsMalloc_32f(NUMITERS);
    const float taps[] = {
        0.0051f, 0.0180f, 0.0591f, 0.1245f, 0.1869f, 0.2127f, 0.1869f,
        0.1245f, 0.0591f, 0.0180f, 0.0051f, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
    };
    Ipp8u* pBuf = NULL; /* Pointer to the work buffers */

    for (n = 0; n < NUMITERS; ++n) x[n] = (float)sin(IPP_2PI *n *0.2);

    check_sts( status = ippsIIRGetStateSize_32f(10, &bufferSize) )

    pBuf = ippsMalloc_8u(bufferSize);

    check_sts( status = ippsIIRInit_32f(&pIIRState, taps, 10, NULL, pBuf) )

    check_sts( status = status = ippsIIR_32f(x, y, NUMITERS, pIIRState) )

    ippsFree(pBuf); pBuf = NULL;

    for (i = 120; i < 120+5; i++) printf("%f,", y[i]);
    printf("\n");

    check_sts( status = ippsFIRSRGetSize(11, ipp32f, &specSize, &bufferSize) )
    pFIRSpec   = (IppsFIRSpec_32f *)ippsMalloc_8u(specSize);
    pBuf   =                        ippsMalloc_8u(bufferSize);

    check_sts( status = ippsFIRSRInit_32f(taps, 11, ippAlgDirect, pFIRSpec) )
    check_sts( status = ippsFIRSR_32f(x, z, NUMITERS, pFIRSpec, NULL, NULL, pBuf) )

    for (i = 120; i < 120+5; i++) printf("%f,", z[i]);

    printf("\n");
EXIT_MAIN
    ippsFree(pBuf);
    ippsFree(z);
    ippsFree(y);
    ippsFree(x);
    printf("Exit status %d (%s)\n", (int)status, ippGetStatusString(status));
    return (int)status;
}