Merge remote-tracking branch 'origin/5.4'
[scilab.git] / scilab / modules / graphics / src / c / getHandleProperty / set_format_n_property.c
index 58c421b..8601214 100644 (file)
@@ -3,11 +3,14 @@
  * Copyright (C) 2004-2006 - INRIA - Fabrice Leray
  * Copyright (C) 2006 - INRIA - Allan Cornet
  * Copyright (C) 2006 - INRIA - Jean-Baptiste Silvy
- * 
+ * Copyright (C) 2009 - DIGITEO - Pierre Lando
+ * Copyright (C) 2010 - DIGITEO - Manuel Juliachs
+ * Copyright (C) 2013 - Scilab Enterprises - Calixte DENIZET
+ *
  * This file must be used under the terms of the CeCILL.
  * This source file is licensed as described in the file COPYING, which
  * you should have received as part of this distribution.  The terms
- * are also available at    
+ * are also available at
  * http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
  *
  */
 #include "getPropertyAssignedValue.h"
 #include "SetPropertyStatus.h"
 #include "GetProperty.h"
-#include "sciprint.h"
+#include "Scierror.h"
 #include "localization.h"
+#include "MALLOC.h"
+#include "string.h"
+#include "StringMatrix.h"
+#include "Format.h"
+
+#include "getGraphicObjectProperty.h"
+#include "setGraphicObjectProperty.h"
+#include "graphicObjectProperties.h"
 
 /*------------------------------------------------------------------------*/
-int set_format_n_property( sciPointObj * pobj, int stackPointer, int valueType, int nbRow, int nbCol )
+int set_format_n_property(void* _pvCtx, char* pobjUID, void* _pvData, int valueType, int nbRow, int nbCol)
 {
-  if ( !isParameterStringMatrix( valueType ) )
-  {
-    sciprint(_("Incompatible type for property %s.\n"),"format_n") ;
-    return SET_PROPERTY_ERROR ;
-  }
-
-  if ( sciGetEntityType(pobj) != SCI_AXES )
-  {
-    sciprint(_("%s property does not exist for this handle.\n"),"format_n") ;
-    return SET_PROPERTY_ERROR ;
-  }
-  pAXES_FEATURE(pobj)->format[0] = getStringFromStack(stackPointer)[0] ;
-  return SET_PROPERTY_SUCCEED ;
+    BOOL status = FALSE;
+    char* format = NULL;
+    char * oldFormat = NULL;
+    StringMatrix * labels = NULL;
+
+    if (valueType != sci_strings)
+    {
+        Scierror(999, _("Wrong type for '%s' property: String expected.\n"), "format_n");
+        return SET_PROPERTY_ERROR;
+    }
+
+    format = (char*)_pvData;
+
+    getGraphicObjectProperty(pobjUID, __GO_FORMATN__, jni_string, (void **)&oldFormat);
+
+    if (strcmp(format, oldFormat) == 0)
+    {
+        return SET_PROPERTY_SUCCEED;
+    }
+
+    status = setGraphicObjectProperty(pobjUID, __GO_FORMATN__, format, jni_string, 1);
+    if (status == TRUE)
+    {
+        labels = computeDefaultTicsLabels(pobjUID);
+        if (labels != NULL)
+        {
+            char ** data = getStrMatData(labels);
+            setGraphicObjectProperty(pobjUID, __GO_TICKS_LABELS__, data, jni_string_vector, labels->nbCol * labels->nbRow);
+            deleteMatrix(labels);
+        }
+
+        return SET_PROPERTY_SUCCEED;
+    }
+    else
+    {
+        Scierror(999, _("'%s' property does not exist for this handle.\n"), "format_n");
+        return SET_PROPERTY_ERROR;
+    }
 }
 /*------------------------------------------------------------------------*/