First CommitHEADmaster

1 files changed, 214 insertions, 0 deletions

diff --git a/sci_gateway/cpp/warpaffine.cpp b/sci_gateway/cpp/warpaffine.cpp
new file mode 100644
index 0000000..014876b
--- /dev/null
+++ b/sci_gateway/cpp/warpaffine.cpp
@@ -0,0 +1,214 @@
+/* ==================================================================== */
+/* Author :Priyanka Hiranandani NIT Surat                               */
+/* ==================================================================== */
+/* Syntax : rotated_image=warpaffline(InputArray src, InputArray M,int size_x,int size_y ,string flag, string borderMode);                                                          */
+/* ==================================================================== */
+#include <numeric>
+#include "opencv2/core/core.hpp"
+#include "opencv2/highgui/highgui.hpp"
+#include "opencv2/opencv.hpp"
+#include <iostream>
+#include <sciprint.h>
+using namespace cv;
+using namespace std;
+  extern "C"
+  {
+  #include "api_scilab.h"
+  #include "Scierror.h"
+  #include "BOOL.h"
+  #include <localization.h>
+  #include "../common.h"
+  int warpaffine(char *fname, unsigned long fname_len)
+    {
+    // Error management variable
+        SciErr sciErr;
+    //variable info
+	int iRows		= 0;
+	int iCols		= 0;
+        int piRows		= 0;
+	int piCols		= 0;
+	int* piAddr		= NULL;
+        int *piAddr7           =NULL;
+        int* piAddr2            = NULL;
+        int* piAddr3            = NULL;
+        int* piAddr4            = NULL;
+        int* piAddr5            = NULL;
+        int* piAddr6            = NULL;
+        int* piAddrNew            = NULL;
+	int* piLen		= NULL;
+	double* pstData	        = NULL;
+        int* pstData2    	= NULL;
+        double *rrows;
+        double *rcols;
+        int error;
+
+         ////checking input argument 
+        CheckInputArgument(pvApiCtx,6,6);
+         //checking output argument
+        CheckOutputArgument(pvApiCtx, 1, 1);
+         //for first argument 
+         // get Address of first input  
+        sciErr = getVarAddressFromPosition(pvApiCtx,1,&piAddr);
+        //retrieving image
+         Mat img,dst;
+         retrieveImage(img,1);
+    //second argument
+            double *m;
+           //fetching address of second argument
+               sciErr = getVarAddressFromPosition(pvApiCtx,2,&piAddr2);
+            //checking for error if any
+               if (sciErr.iErr)
+                {
+                   printError(&sciErr, 0);
+                   return 0;
+                }
+             //this function will fetch value of second argument
+               sciErr = getMatrixOfDouble(pvApiCtx, piAddr2, &iRows, &iCols ,&m);
+               if(sciErr.iErr)
+	        {
+		  printError(&sciErr, 0);
+		  return 0;
+        	}     
+
+               Mat m1=Mat(2,3,CV_64F);
+               int k=0;
+                for(int j=0;j<3;j++)
+                    {
+                       for(int i=0;i<2;i++)
+                           {
+                            m1.at<double>(i,j)=m[k++];
+                        //    cout<<   m1.at<double>(i,j)<<"\n";
+                           } 
+                    }
+                                   
+  cout<<m1;
+  //third argument
+               double sz1,sz2;
+            //fetching address of third argument
+               sciErr = getVarAddressFromPosition(pvApiCtx,3,&piAddr3);
+             //checking for error if any
+               if (sciErr.iErr)
+               {
+                printError(&sciErr, 0);
+                return 0;
+               }
+             //this function will fetch value of third argument
+               error=getScalarDouble(pvApiCtx,piAddr3,&sz1); 
+               if(error!=0)
+               {
+                  sciprint("error in retrieving second argument");
+               }  
+ //fourth argument
+              //fetching address of fourth argument
+               sciErr = getVarAddressFromPosition(pvApiCtx,4,&piAddr4);
+               if (sciErr.iErr)
+               {
+               printError(&sciErr, 0);
+               return 0;
+               }
+                //this function will fetch value of fourth argument
+              error=getScalarDouble(pvApiCtx,piAddr4,&sz2); 
+               if(error!=0)
+               {
+                  sciprint("error in retrieving second argument");
+               }  
+   //fifth argument
+               //fetching address of fifth argument
+               char **flag;
+               sciErr = getVarAddressFromPosition(pvApiCtx,5,&piAddr5);
+               if (sciErr.iErr)
+               {
+               printError(&sciErr, 0);
+               return 0;
+               }
+               sciErr = getMatrixOfString(pvApiCtx, piAddr5, &iRows, &iCols, NULL, NULL);
+               piLen = (int*)malloc(sizeof(int) * iRows * iCols);
+               //second call to retrieve length of each string of first argument
+               sciErr = getMatrixOfString(pvApiCtx, piAddr5, &iRows, &iCols, piLen, NULL);
+               if(sciErr.iErr)
+               {
+                  printError(&sciErr, 0);
+                  return 0;
+               }
+               flag = (char**)malloc(sizeof(char*) * iRows * iCols);
+               for(int i = 0 ; i < iRows * iCols ; i++)
+               {
+                   flag[i] = (char*)malloc(sizeof(char) * (piLen[i] + 1));//+ 1 for null termination
+               }
+               //third call to retrieve data of each string of first argument
+               sciErr = getMatrixOfString(pvApiCtx, piAddr5, &iRows, &iCols, piLen,flag);
+               if(sciErr.iErr)
+               {
+                  printError(&sciErr, 0);
+                  return 0;
+               }
+                 //this function will fetch value of fifth argument
+              
+//sixth argument
+               //fetching address of sixth argument
+               char **bordermode;
+               sciErr = getVarAddressFromPosition(pvApiCtx,6,&piAddr6);
+               if (sciErr.iErr)
+               {
+               printError(&sciErr, 0);
+               return 0;
+               }
+               sciErr = getMatrixOfString(pvApiCtx, piAddr6, &iRows, &iCols, NULL, NULL);
+               piLen = (int*)malloc(sizeof(int) * iRows * iCols);
+               //second call to retrieve length of each string of first argument
+               sciErr = getMatrixOfString(pvApiCtx, piAddr6, &iRows, &iCols, piLen, NULL);
+               if(sciErr.iErr)
+               {
+                  printError(&sciErr, 0);
+                  return 0;
+               }
+               bordermode = (char**)malloc(sizeof(char*) * iRows * iCols);
+               for(int i = 0 ; i < iRows * iCols ; i++)
+               {
+                   bordermode[i] = (char*)malloc(sizeof(char) * (piLen[i] + 1));//+ 1 for null termination
+               }
+               //third call to retrieve data of each string of first argument
+               sciErr = getMatrixOfString(pvApiCtx, piAddr6, &iRows, &iCols, piLen,bordermode);
+               if(sciErr.iErr)
+               {
+                  printError(&sciErr, 0);
+                  return 0;
+               }
+               //calling size constructor
+               Size ksize=Size(sz1,sz2);
+             
+               
+              
+               
+               //calling warpaffline function
+             
+              int flag1,border; 
+              if(!strcmp(flag[0],"INTER_NEAREST"))
+              flag1=INTER_LINEAR;
+              else if(!strcmp(flag[0],"INTER_LINEAR"))
+              flag1=INTER_LINEAR;
+              else if(!strcmp(flag[0],"INTER_AREA"))
+              flag1=INTER_AREA;
+              else if(!strcmp(flag[0],"INTER_CUBIC"))
+              flag1=INTER_CUBIC;
+               else if(!strcmp(flag[0],"INTER_LANCZOS4"))
+              flag1=INTER_LANCZOS4;
+              if(!strcmp(bordermode[0]," BORDER_TRANSPARENT"))
+              border=BORDER_TRANSPARENT;
+              else if(!strcmp(bordermode[0],"BORDER_CONSTANT"))
+              border=BORDER_CONSTANT;
+              else if(!strcmp(bordermode[0],"BORDER_WRAP"))
+              border=BORDER_WRAP;
+              else if(!strcmp(bordermode[0],"BORDER_REFLECT_101"))
+              border=BORDER_REFLECT_101;
+               warpAffine(img, dst,m1, ksize,flag1,border);            
+               string tempstring = type2str(dst.type());
+              char* checker = (char *)malloc(tempstring.size() + 1);
+              memcpy(checker, tempstring.c_str(), tempstring.size() + 1);
+              returnImage(checker,dst,1);
+             //returning output variable    
+              AssignOutputVariable(pvApiCtx, 1) = nbInputArgument(pvApiCtx) + 1;
+              ReturnArguments(pvApiCtx);   
+                  
+}
+}