Fix some memory leaks and useless declarations 57/10457/2
Sylvestre Ledru [Tue, 12 Feb 2013 12:53:12 +0000 (13:53 +0100)]
Change-Id: I45d2d0975afefd60ba1e5235b64984b29c42f318

12 files changed:
scilab/modules/cacsd/sci_gateway/c/sci_rankqr.c
scilab/modules/core/src/c/intmacr2tree.c
scilab/modules/core/src/c/stack2.c
scilab/modules/elementary_functions/src/c/IsEqualVar.c
scilab/modules/fftw/sci_gateway/c/sci_dst.c
scilab/modules/fftw/sci_gateway/c/sci_fftw.c
scilab/modules/fileio/sci_gateway/c/sci_pathconvert.c
scilab/modules/graphics/sci_gateway/c/sci_set.c
scilab/modules/graphics/sci_gateway/c/sci_xgetmouse.c
scilab/modules/graphics/src/c/getHandleProperty/set_log_flags_property.c
scilab/modules/gui/sci_gateway/cpp/sci_uigetfile.cpp
scilab/modules/mexlib/src/c/mexlib.c

index 2289afb..056383e 100644 (file)
@@ -27,11 +27,11 @@ int intrankqr(char* fname)
        header1 = (int *) GetData(1);
        Cmplx=header1[3];
        if (Cmplx==0) {
-               ret = C2F(intmb03od)("rankqr",6L);
+               C2F(intmb03od)("rankqr",6L);
                return 0; } 
        else
        {
-               ret = C2F(intzb03od)("rankqr",6L);
+               C2F(intzb03od)("rankqr",6L);
                return 0; } 
 }
 /*--------------------------------------------------------------------------*/ 
index eb15986..b09093d 100644 (file)
@@ -1338,7 +1338,7 @@ static int CreateInlineTList(int *data,int *index2, int *nblines, int *addinstr)
     }
   
     /* Read character strings lengths */
-    k = 0;
+
     for (k=0; k<nCols*nRows; k++)
     {
         lengths[k] =  data[*index2 + 1] - data[*index2];
index 244299f..f124d33 100644 (file)
@@ -2557,7 +2557,7 @@ L9999:
 int C2F(scistring) (int *ifirst, char *thestring, int *mlhs, int *mrhs, unsigned long thestring_len)
 {
     int ret = FALSE;
-    int ifin = 0, ifun = 0, tops = 0, moutputs = 0;
+    int ifin = 0, ifun = 0, tops = 0;
     int id[nsiz];
     int lf = 0, op = 0, ils = 0, nnn = thestring_len;
 
@@ -2585,7 +2585,6 @@ int C2F(scistring) (int *ifirst, char *thestring, int *mlhs, int *mrhs, unsigned
         {
             lf = *Lstk(Fin);
             ils = iadr(lf) + 1;
-            moutputs = *istk(ils);
             ret = C2F(scifunction) (ifirst, &lf, mlhs, mrhs);
         }
         else
index ab0e48c..1d8bd6b 100644 (file)
@@ -380,7 +380,6 @@ ELEMENT:
     d1 = p1+ip1[k]-1;
     d2 = p2+ip2[k]-1;
     id1=(int *)d1;
-    id2=(int *)d2;
 
     if (id1[0]!=15 && id1[0]!=16&& id1[0]!=17) { /* elements which are not lists */
         res = IsEqualVar(d1, ip1[k+1]-ip1[k], d2, ip2[k+1]-ip2[k]);
index 617c4bc..7c7724c 100644 (file)
@@ -974,14 +974,15 @@ int sci_dst_4args(void* _pvCtx, char *fname, int ndimsA, int *dimsA, double *Ar,
     * Return results in lhs argument *
     ***********************************/
 
-    ReturnArguments(_pvCtx);
-
     FREE(Dim1);
     FREE(Incr);
     FREE(Dim);
     FREE(Sel);
     FREE(gdim.dims);
     FREE(gdim.howmany_dims);
+
+    ReturnArguments(_pvCtx);
+
     return 0;
 }
 /*--------------------------------------------------------------------------*/
index 1f71a0e..4980b56 100644 (file)
@@ -868,14 +868,15 @@ int sci_fft_4args(void* _pvCtx, char *fname, int ndimsA, int *dimsA, double *Ar,
     * Return results in lhs argument *
     ***********************************/
 
-    ReturnArguments(_pvCtx);
-
     FREE(Dim1);
     FREE(Incr);
     FREE(Dim);
     FREE(Sel);
     FREE(gdim.dims);
     FREE(gdim.howmany_dims);
+
+    ReturnArguments(_pvCtx);
+
     return 0;
 }
 /*--------------------------------------------------------------------------*/
index 989b28b..47f4044 100644 (file)
@@ -319,6 +319,7 @@ int sci_pathconvert(char *fname, unsigned long fname_len)
         {
             printError(&sciErr, 0);
             Scierror(999, _("%s: Can not read input argument #%d.\n"), fname, 1);
+            FREE(results);
             return 0;
         }
 
@@ -331,6 +332,7 @@ int sci_pathconvert(char *fname, unsigned long fname_len)
                 lenStVarOne = NULL;
             }
             Scierror(999, _("%s: Memory allocation error.\n"), fname);
+            FREE(results);
             return 0;
         }
 
@@ -346,6 +348,7 @@ int sci_pathconvert(char *fname, unsigned long fname_len)
                 }
                 freeArrayOfWideString(pStVarOne, m1 * n1);
                 Scierror(999, _("%s: Memory allocation error.\n"), fname);
+                FREE(results);
                 return 0;
             }
         }
index 0e9979d..bdd20b1 100644 (file)
@@ -121,7 +121,6 @@ int sci_set(char *fname, unsigned long fname_len)
             }
 
             hdl = (long) * hstk(l1);
-            pobjUID = (char*)getObjectFromHandle(hdl);
 
             GetRhsVar(2, STRING_DATATYPE, &m2, &n2, &l2);   /* Gets the command name */
 
index 14fee64..a1d8168 100644 (file)
@@ -47,8 +47,6 @@ int sci_xgetmouse( char *fname,unsigned long fname_len )
 
     int selPosition = 0;
 
-    char *pstWindowUID = NULL;
-
     int iFigureId = 0;
 
     CheckRhs(0,1);
@@ -96,7 +94,6 @@ int sci_xgetmouse( char *fname,unsigned long fname_len )
     mouseButtonNumber = getJxgetmouseMouseButtonNumber();
     pixelCoords[0] = (int) getJxgetmouseXCoordinate();
     pixelCoords[1] = (int) getJxgetmouseYCoordinate();
-    pstWindowUID = getJxgetmouseWindowsID();
 
     CreateVar(Rhs+1,MATRIX_OF_DOUBLE_DATATYPE,&m1,&n1,&l1);
     // No need to calculate coordinates if callback or close is trapped
index 2dcbbb2..14c813d 100644 (file)
@@ -90,8 +90,6 @@ char ** CaseLogflagN2L(int * u_nxgrads, double *u_xgrads, char ** u_xlabels)
     }
 
     *u_nxgrads = cmpteur;
-    cmpteur = 0;
-    cmpteur2 = 0;
 
     return u_xlabels;
 }
index 8691692..53aab25 100644 (file)
@@ -247,7 +247,6 @@ int sci_uigetfile(char *fname, unsigned long fname_len)
         selectionPathName = getJuigetfileSelectionPathName();
         selectionFileNames = getJuigetfileSelectionFileNames();
         selectionSize = getJuigetfileSelectionSize();
-        multipleSelection = getJuigetfileMultipleSelection();
         filterIndex = getJuigetfileFilterIndex();
         menuCallback = getJuigetfileMenuCallback();
     }
index 5cac1fe..56e4092 100644 (file)
@@ -1683,9 +1683,10 @@ bool mexIsGlobal(const mxArray *ptr)
   int ret_val;
   int *header;int *rheader;
   header=(int *) Header(ptr);
+/*
   rheader=(int *) RawHeader(ptr);
   pointed = arr2numcst(ptr);
-  /*  A FINIR si interface par reference OK
+   A FINIR si interface par reference OK
       printf("POINTED %i Infstk(pointed) %i\n", pointed, *Infstk(pointed));
       printf("header[2] %i Infstk(pointed) %i\n", header[2], *Infstk(header[2])); */
   pointed=header[2];