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
|
/********************************************************
Function :imlincomb
Syntax :C=imlincomb(x1,A1,x2,A2...xn,An)
A1...An image matrix,x1...xn double values
Author : Tess Zacharias
********************************************************/
#include <numeric>
#include "opencv2/core/core.hpp"
#include "opencv2/highgui/highgui.hpp"
#include "opencv2/opencv.hpp"
#include <iostream>
#include "string.h"
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_imlincomb(char *fname, unsigned long fname_len)
{
SciErr sciErr;
Mat A,B,C,tmp;
int* piAddr2=NULL;
int* piAddr4=NULL;
int iType = 0;
int iRet = 0;
double value= 0;
CheckOutputArgument(pvApiCtx, 1, 1);
for(int i=1;i<=Rhs;i=i+2)
{
sciErr = getVarAddressFromPosition(pvApiCtx,i,&piAddr2);
if(sciErr.iErr)
{
printError(&sciErr, 0);
return 0;
}
if(isDoubleType(pvApiCtx, piAddr2))
{
if(isScalar(pvApiCtx, piAddr2))
{
iRet = getScalarDouble(pvApiCtx, piAddr2, &value);
}
}
if(i!=Rhs)
{
retrieveImage(A,i+1);
A.convertTo(A,CV_64F);
C=A*value;
if((i+1)==2)
{
C.copyTo(tmp);
A.copyTo(B);
}
else
{
add(C,tmp,tmp);
}
}
else
{
add(tmp,value,tmp);
}
A.release();
C.release();
}
int temp = nbInputArgument(pvApiCtx) + 1;
string tempstring = type2str(tmp.type());
char *checker;
checker = (char *)malloc(tempstring.size() + 1);
memcpy(checker, tempstring.c_str(), tempstring.size() + 1);
returnImage(checker,tmp,1);
free(checker);
AssignOutputVariable(pvApiCtx, 1) = nbInputArgument(pvApiCtx) + 1;
ReturnArguments(pvApiCtx);
return 0;
}
}
|
