Changeset 7218 for issm/trunk/src/c/io/FetchData.cpp

Timestamp:

01/28/11 11:32:16 (14 years ago)

Author:

Mathieu Morlighem

Message:

Added additional FetchData

File:

• issm/trunk/src/c/io/FetchData.cpp (modified) (8 diffs)

issm/trunk/src/c/io/FetchData.cpp

@@ -41 +41 @@
                 else{
                         /*This is an error: we don't have the correct input!: */
-                        _error_("  wrong input parameter!");
+                        _error_("Input parameter of class %s not supported yet",mxGetClassName(dataref));
                 }
         }
@@ -79 +79 @@
                 _error_("Input parameter of class %s not supported yet",mxGetClassName(dataref));
         }
-
                         
         /*Assign output pointers:*/
@@ -86 +85 @@
         if (pN)*pN=outmatrix_cols;
 
-
+}
+/*}}}*/
+/*FUNCTION FetchData(int** pmatrix,int* pM,int *pN,const mxArray* dataref){{{1*/
+void FetchData(int** pmatrix,int* pM,int *pN,const mxArray* dataref){
+
+        int     i,outmatrix_rows,outmatrix_cols;
+        double *doublematrix=NULL;
+        int    *outmatrix=NULL;
+
+        if(mxIsEmpty(dataref) ){
+                /*Nothing to pick up. Just initialize matrix pointer to NULL: */
+                outmatrix_rows=0;
+                outmatrix_cols=0;
+                outmatrix=NULL;
+        }
+        else if (mxIsDouble(dataref) ){
+
+                /*Check dataref is not pointing to NaN: */
+                if ( mxIsNaN(*(mxGetPr(dataref))) && (mxGetM(dataref)==1) && (mxGetN(dataref)==1) ){
+                        outmatrix_rows=0;
+                        outmatrix_cols=0;
+                        outmatrix=NULL;
+                }
+                else{
+
+                        /*Convert matlab matrix to double* matrix: */
+                        MatlabMatrixToDoubleMatrix(&doublematrix,&outmatrix_rows,&outmatrix_cols,dataref);
+
+                        /*Convert double matrix into integer matrix: */
+                        outmatrix=(int*)xmalloc(outmatrix_rows*outmatrix_cols*sizeof(int));
+                        for(i=0;i<outmatrix_rows*outmatrix_cols;i++)outmatrix[i]=(int)doublematrix[i];
+                }
+        }
+        else{
+                /*This is an error: we don't have the correct input!: */
+                _error_("Input parameter of class %s not supported yet",mxGetClassName(dataref));
+        }
+
+        /*Assign output pointers:*/
+        *pmatrix=outmatrix;
+        if (pM)*pM=outmatrix_rows;
+        if (pN)*pN=outmatrix_cols;
+}
+/*}}}*/
+/*FUNCTION FetchData(bool** pmatrix,int* pM,int *pN,const mxArray* dataref){{{1*/
+void FetchData(bool** pmatrix,int* pM,int *pN,const mxArray* dataref){
+
+        int     i,outmatrix_rows,outmatrix_cols;
+        double *doublematrix=NULL;
+        bool   *outmatrix=NULL;
+
+        if(mxIsEmpty(dataref) ){
+                /*Nothing to pick up. Just initialize matrix pointer to NULL: */
+                outmatrix_rows=0;
+                outmatrix_cols=0;
+                outmatrix=NULL;
+        }
+        else if (mxIsDouble(dataref) ){
+
+                /*Check dataref is not pointing to NaN: */
+                if ( mxIsNaN(*(mxGetPr(dataref))) && (mxGetM(dataref)==1) && (mxGetN(dataref)==1) ){
+                        outmatrix_rows=0;
+                        outmatrix_cols=0;
+                        outmatrix=NULL;
+                }
+                else{
+
+                        /*Convert matlab matrix to double* matrix: */
+                        MatlabMatrixToDoubleMatrix(&doublematrix,&outmatrix_rows,&outmatrix_cols,dataref);
+
+                        /*Convert double matrix into integer matrix: */
+                        outmatrix=(bool*)xmalloc(outmatrix_rows*outmatrix_cols*sizeof(bool));
+                        for(i=0;i<outmatrix_rows;i++)outmatrix[i]=(bool)doublematrix[i];
+                }
+        }
+        else{
+                /*This is an error: we don't have the correct input!: */
+                _error_("Input parameter of class %s not supported yet",mxGetClassName(dataref));
+        }
+
+        /*Assign output pointers:*/
+        *pmatrix=outmatrix;
+        if (pM)*pM=outmatrix_rows;
+        if (pN)*pN=outmatrix_cols;
 }
 /*}}}*/
@@ -109 +191 @@
         else{
                 /*This is an error: we don't have the correct input!: */
-                _error_("wrong input parameter");
+                _error_("Input parameter of class %s not supported yet",mxGetClassName(dataref));
         }
 
@@ -135 +217 @@
         else{
                 /*This is an error: we don't have the correct input!: */
-                _error_("wrong input parameter");
+                _error_("Input parameter of class %s not supported yet",mxGetClassName(dataref));
         }
 
@@ -167 +249 @@
         else{
                 /*This is an error: we don't have the correct input!: */
-                _error_("wrong input parameter");
+                _error_("Input parameter of class %s not supported yet",mxGetClassName(dataref));
+        }
+
+        /*Assign output pointers:*/
+        *pvector=outvector;
+        if (pM)*pM=outvector_rows;
+}
+/*}}}*/
+/*FUNCTION FetchData(bool** pvector,int* pM,const mxArray* dataref){{{1*/
+void FetchData(bool** pvector,int* pM,const mxArray* dataref){
+
+        int    i;
+        double *doublevector   = NULL;
+        bool   *outvector      = NULL;
+        int     outvector_rows;
+
+        if(mxIsEmpty(dataref)){
+                /*Nothing to pick up. Just initialize matrix pointer to NULL: */
+                outvector_rows=0;
+                outvector=NULL;
+        }
+        else if (mxIsDouble(dataref) ){
+
+                /*Convert matlab vector to double*  vector: */
+                MatlabVectorToDoubleVector(&doublevector,&outvector_rows,dataref);
+
+                /*Convert double vector into integer vector: */
+                outvector=(bool*)xmalloc(outvector_rows*sizeof(bool));
+                for(i=0;i<outvector_rows;i++)outvector[i]=(bool)doublevector[i];
+        }
+        else{
+                /*This is an error: we don't have the correct input!: */
+                _error_("Input parameter of class %s not supported yet",mxGetClassName(dataref));
         }
 
@@ -199 +313 @@
         else{
                 /*This is an error: we don't have the correct input!: */
-                _error_("wrong input parameter");
+                _error_("Input parameter of class %s not supported yet",mxGetClassName(dataref));
         }
 
@@ -224 +338 @@
         else{
                 /*This is an error: we don't have the correct input!: */
-                _error_("wrong input parameter");
+                _error_("Input parameter of class %s not supported yet",mxGetClassName(dataref));
         }