Stop using some useless helpers.
[scilab.git] / scilab / modules / graphics / src / c / getHandleProperty / set_color_range_property.c
1 /*
2  * Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3  * Copyright (C) 2009 - Digiteo - Jean-Baptiste Silvy
4  * Copyright (C) 2009 - DIGITEO - Pierre Lando
5  * Copyright (C) 2010 - DIGITEO - Manuel Juliachs
6  *
7  * This file must be used under the terms of the CeCILL.
8  * This source file is licensed as described in the file COPYING, which
9  * you should have received as part of this distribution.  The terms
10  * are also available at
11  * http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
12  *
13  */
14
15 /*------------------------------------------------------------------------*/
16 /* file: set_color_range_property.c                                       */
17 /* desc : function to modify in Scilab the color_range field of           */
18 /*        a handle                                                        */
19 /*------------------------------------------------------------------------*/
20
21 #include "setHandleProperty.h"
22 #include "SetProperty.h"
23 #include "getPropertyAssignedValue.h"
24 #include "SetPropertyStatus.h"
25 #include "GetProperty.h"
26 #include "Scierror.h"
27 #include "localization.h"
28 #include "sciprint.h"
29
30 #include "setGraphicObjectProperty.h"
31 #include "graphicObjectProperties.h"
32
33 /*------------------------------------------------------------------------*/
34 int set_color_range_property(void* _pvCtx, char* pobjUID, size_t stackPointer, int valueType, int nbRow, int nbCol )
35 {
36     BOOL status = FALSE;
37     int values[2];
38     int nbColors = 0;
39
40     if ( !( valueType == sci_matrix ) )
41     {
42         Scierror(999, _("Wrong type for '%s' property: Real matrix expected.\n"), "color_range");
43         return SET_PROPERTY_ERROR;
44     }
45
46     if ( nbRow * nbCol != 2 )
47     {
48         Scierror(999, _("Wrong size for '%s' property: %d elements expected.\n"), "color_range", 2);
49         return SET_PROPERTY_ERROR;
50     }
51
52     copyDoubleVectorToIntFromStack(stackPointer, values, 2);
53
54     /* Returns the number of colors of pobj's parent Figure */
55     nbColors = sciGetNumColors(pobjUID);
56
57     if (   values[0] > nbColors || values[0] < 0
58             || values[1] > nbColors || values[1] < 0)
59     {
60         /* It is possible to set color_range outside the colormap, however it won't be used.*/
61         sciprint(_("WARNING: Wrong value for '%s' property: indices outside the colormap will be clamped.\n"), "color_range");
62     }
63
64     status = setGraphicObjectProperty(pobjUID, __GO_COLOR_RANGE__, values, jni_int_vector, 2);
65
66     if (status == TRUE)
67     {
68         return SET_PROPERTY_SUCCEED;
69     }
70     else
71     {
72         Scierror(999, _("'%s' property does not exist for this handle.\n"), "color_range");
73         return SET_PROPERTY_ERROR;
74     }
75 }
76 /*------------------------------------------------------------------------*/