summaryrefslogtreecommitdiff
path: root/sci_gateway/cpp/opencv_imgaussfilt3.cpp
blob: f07076f9d2284d1dfa6fe4c6244de75350e67592 (plain)
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
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
/***************************************************
Author : Yash S. Bhalgat
****************************************************
Usage : filtered_image = imgaussfilt3(input_img, filter_height, filter_width, sigmaX, sigmaY);
Example : 
	img = imread("lena.jpg");
	imshow(img);
	filtered_img = imgaussfilt3(img, 9, 9, 3, 3);
	imshow(filtered_img);
***************************************************/

#include <numeric>
#include "opencv2/core/core.hpp"
#include "opencv2/highgui/highgui.hpp"
#include "opencv2/opencv.hpp"
#include <iostream>
using namespace cv;
using namespace std;
extern "C"
{
  #include "api_scilab.h"
  #include "Scierror.h"
  #include "BOOL.h"
  #include <localization.h>
  #include <sciprint.h>
  #include "../common.h"
  
  int opencv_imgaussfilt3(char *fname, unsigned long fname_len)
  {

    SciErr sciErr;
    int intErr = 0;
    int iRows=0,iCols=0;
    int *piAddr2  = NULL;
    int *piAddr3  = NULL;
    int *piAddr4  = NULL;
    int *piAddr5  = NULL;
    int i,j,k;
    double filter_width,filter_height,sigmaX,sigmaY;

    //checking input argument
    CheckInputArgument(pvApiCtx, 5, 5);
    CheckOutputArgument(pvApiCtx, 1, 1) ;

    Mat image;
    retrieveImage(image,1);

    //for value of filter_height
    sciErr = getVarAddressFromPosition(pvApiCtx,2,&piAddr2);
    if (sciErr.iErr)
    {
        printError(&sciErr, 0);
        return 0;
    }
    intErr = getScalarDouble(pvApiCtx, piAddr2, &filter_height);
    if(intErr)
        return intErr;

    //for value of filter_width
    sciErr = getVarAddressFromPosition(pvApiCtx,3,&piAddr3);
    if (sciErr.iErr)
    {
        printError(&sciErr, 0);
        return 0;
    }
    intErr = getScalarDouble(pvApiCtx, piAddr3, &filter_width);
    if(intErr)
        return intErr;

    //for value of sigmaX
    sciErr = getVarAddressFromPosition(pvApiCtx,4,&piAddr4);
    if (sciErr.iErr)
    {
        printError(&sciErr, 0);
        return 0;
    }
    intErr = getScalarDouble(pvApiCtx, piAddr4, &sigmaX);
    if(intErr)
        return intErr;

    //for value of sigmaY
    sciErr = getVarAddressFromPosition(pvApiCtx,5,&piAddr5);
    if (sciErr.iErr)
    {
        printError(&sciErr, 0);
        return 0;
    }
    intErr = getScalarDouble(pvApiCtx, piAddr5, &sigmaY);
    if(intErr)
        return intErr;

    //taking the cases which can lead to an error
    Mat filtered_image(image.rows,image.cols,CV_8UC3);
    if(filter_height<0)
    {
        sciprint("Positive Value Required for Height. 1 value was used instead");
        filter_height=1;
    }
    if(filter_width<0)
    {
        sciprint("Positive Value Required for Width. 1 value was used instead");
        filter_width=1;
    }
    if((int)filter_height%2==0)
    {
        filter_height+=1;
        sciprint("Odd Value Required for Height. %f value was used instead",&filter_height);
    }
    if((int)filter_width%2==0)
    {
        filter_width+=1;
        sciprint("Odd Value Required for Width. %f value was used instead",&filter_width);
    }

    //temporary size variable, to use in function
    Size sz(filter_height,filter_width);

    //opencv function called
    //if both sigmaX, sigmaY are set to zero, they are calaulated from the filter_size
    GaussianBlur(image,filtered_image,sz,sigmaX,sigmaY);

    //returning image
    string tempstring = type2str(filtered_image.type());
    char *checker;
    checker = (char *)malloc(tempstring.size() + 1);
    memcpy(checker, tempstring.c_str(), tempstring.size() + 1);
    returnImage(checker,filtered_image,1);
    free(checker);

    //Assigning the list as the Output Variable
    AssignOutputVariable(pvApiCtx, 1) = nbInputArgument(pvApiCtx) + 1;
    //Returning the Output Variables as arguments to the Scilab environment
    ReturnArguments(pvApiCtx);
    return 0;

  }
/* ==================================================================== */
}