/*******************************************************************************
* Copyright 2015-2021 Intel Corporation.
*
* This software and the related documents are Intel copyrighted  materials,  and
* your use of  them is  governed by the  express license  under which  they were
* provided to you (License).  Unless the License provides otherwise, you may not
* use, modify, copy, publish, distribute,  disclose or transmit this software or
* the related documents without Intel's prior written permission.
*
* This software and the related documents  are provided as  is,  with no express
* or implied  warranties,  other  than those  that are  expressly stated  in the
* License.
*******************************************************************************/

//   A simple example of performing linear filtering of an image using one of predefined convolution kernels
// implemented with Intel(R) Integrated Primitives (Intel(R) IPP) functions:
//     ippiFilterPrewittHorizBorderGetBufferSize
//     ippiFilterPrewittHorizBorder_8u16s_C1R
//     ippiFilterPrewittVertBorderGetBufferSize
//     ippiFilterPrewittVertBorder_8u16s_C1R
//     ippiFilterRobertsDownBorderGetBufferSize
//     ippiFilterRobertsDownBorder_8u16s_C1R
//     ippiFilterRobertsUpBorderGetBufferSize
//     ippiFilterRobertsUpBorder_8u16s_C1R
//     ippiFilterScharrHorizMaskBorderGetBufferSize
//     ippiFilterScharrHorizMaskBorder_8u16s_C1R

#include <stdio.h>
#include "ipp.h"

#define WIDTH  128  /* image width  */
#define HEIGHT 128 /* image height */


/* 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) 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(void)
{
    IppStatus status = ippStsNoErr;
    Ipp8u* pSrc = NULL; Ipp16s *pDst = NULL;  /* Pointers to source/destination images */
    int srcStep = 0, dstStep = 0;             /* Steps, in bytes, through the source/destination images */
    IppiSize srcImageSize = { WIDTH + 1, HEIGHT + 1 }; /* size of source image in pixels */
    IppiSize roiSize = { WIDTH, HEIGHT }; /* Size of source/destination ROI in pixels */
    Ipp8u *pBuffer = NULL;                /* Pointer to the work buffer */
    int iTmpBufSize = 0;                  /* Common work buffer size */
    IppiMaskSize mask = ippMskSize3x3;               /* Predefined mask of IppiMaskSize type. */
    IppDataType srcDataType = ipp8u, dstDataType = ipp16s;
    IppiBorderType borderType = (IppiBorderType)(ippBorderRepl | ippBorderInMemTop | ippBorderInMemRight);
    Ipp8u borderValue = 254;
    int numChannels = 1;

    pSrc = ippiMalloc_8u_C1(srcImageSize.width, srcImageSize.height, &srcStep);
    pDst = ippiMalloc_16s_C1(roiSize.width, roiSize.height, &dstStep);

    /* Filters and image using a horizontal Prewitt filter */
    check_sts( status = ippiFilterPrewittHorizBorderGetBufferSize(roiSize, mask, srcDataType, dstDataType, numChannels, &iTmpBufSize) )

    pBuffer = ippsMalloc_8u(iTmpBufSize);

    check_sts( status = ippiFilterPrewittHorizBorder_8u16s_C1R(pSrc + srcStep, srcStep, pDst, dstStep, roiSize, mask, borderType, borderValue, pBuffer) )

    ippsFree(pBuffer);
    pBuffer = NULL;

    /* Filters and image using a vertical Prewitt filter */
    check_sts( status = ippiFilterPrewittVertBorderGetBufferSize(roiSize, mask, srcDataType, dstDataType, numChannels, &iTmpBufSize) )

    pBuffer = ippsMalloc_8u(iTmpBufSize);

    check_sts( status = ippiFilterPrewittVertBorder_8u16s_C1R(pSrc + srcStep, srcStep, pDst, dstStep, roiSize, mask, borderType, borderValue, pBuffer) )

    ippsFree(pBuffer);
    pBuffer = NULL;

    /* Filters an image using a horizontal Roberts kernel. */
    check_sts( status = ippiFilterRobertsDownBorderGetBufferSize(roiSize, mask, srcDataType, dstDataType, numChannels, &iTmpBufSize) )

    pBuffer = ippsMalloc_8u(iTmpBufSize);

    check_sts( status = ippiFilterRobertsDownBorder_8u16s_C1R(pSrc + srcStep, srcStep, pDst, dstStep, roiSize, mask, borderType, borderValue, pBuffer) )

    ippsFree(pBuffer);
    pBuffer = NULL;

    /* Filters an image using a vertical Roberts edge filter */
    check_sts( status = ippiFilterRobertsUpBorderGetBufferSize(roiSize, mask, srcDataType, dstDataType, numChannels, &iTmpBufSize) )

    pBuffer = ippsMalloc_8u(iTmpBufSize);

    check_sts( status = ippiFilterRobertsUpBorder_8u16s_C1R(pSrc + srcStep, srcStep, pDst, dstStep, roiSize, mask, borderType, borderValue, pBuffer) )

    ippsFree(pBuffer);
    pBuffer = NULL;

    /* Filters an image using a horizontal Scharr kernel */
    check_sts( status = ippiFilterScharrHorizMaskBorderGetBufferSize(roiSize, mask, srcDataType, dstDataType, numChannels, &iTmpBufSize) )

    pBuffer = ippsMalloc_8u(iTmpBufSize);

    check_sts( status = ippiFilterScharrHorizMaskBorder_8u16s_C1R(pSrc + srcStep, srcStep, pDst, dstStep, roiSize, mask, borderType, borderValue, pBuffer) )

EXIT_MAIN
    ippsFree(pBuffer);
    ippiFree(pSrc);
    ippiFree(pDst);
    printf("Exit status %d (%s)\n", (int)status, ippGetStatusString(status));
    return (int)status;
}