a35849311eecb6f9ac33cda22d9e48c3a585b821
[scilab.git] / scilab / modules / graphics / src / c / getHandleProperty / set_polyline_style_property.c
1 /*
2  * Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3  * Copyright (C) 2004-2006 - INRIA - Fabrice Leray
4  * Copyright (C) 2006 - INRIA - Allan Cornet
5  * Copyright (C) 2006 - INRIA - Jean-Baptiste Silvy
6  * Copyright (C) 2010 - DIGITEO - Manuel Juliachs
7  *
8  * This file must be used under the terms of the CeCILL.
9  * This source file is licensed as described in the file COPYING, which
10  * you should have received as part of this distribution.  The terms
11  * are also available at
12  * http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
13  *
14  */
15
16 /*------------------------------------------------------------------------*/
17 /* file: set_polyline_style_property.c                                    */
18 /* desc : function to modify in Scilab the polyline_style field of        */
19 /*        a handle                                                        */
20 /*------------------------------------------------------------------------*/
21
22 #include "setHandleProperty.h"
23 #include "SetProperty.h"
24 #include "getPropertyAssignedValue.h"
25 #include "Scierror.h"
26 #include "localization.h"
27 #include "GetProperty.h"
28 #include "SetPropertyStatus.h"
29
30 #include "setGraphicObjectProperty.h"
31 #include "graphicObjectProperties.h"
32
33 /*------------------------------------------------------------------------*/
34 int set_polyline_style_property(void* _pvCtx, char* pobjUID, size_t stackPointer, int valueType, int nbRow, int nbCol )
35 {
36     BOOL status = FALSE;
37     int value = 0;
38
39     if ( !isParameterDoubleMatrix( valueType ) )
40     {
41         Scierror(999, _("Wrong type for '%s' property: Integer expected.\n"), "polyline_style");
42         return SET_PROPERTY_ERROR;
43     }
44
45     value = (int) getDoubleFromStack( stackPointer );
46     if ( value < 1 || value > 7 )
47     {
48         Scierror(999, _("Wrong value for '%s' property: Must be between %d and %d.\n"),"polyline_style",1,7);
49         return SET_PROPERTY_ERROR;
50     }
51
52     status = setGraphicObjectProperty(pobjUID, __GO_POLYLINE_STYLE__, &value, jni_int, 1);
53
54     if (status == TRUE)
55     {
56         return SET_PROPERTY_SUCCEED;
57     }
58     else
59     {
60         Scierror(999, _("'%s' property does not exist for this handle.\n"),"polyline_style");
61         return SET_PROPERTY_ERROR;
62     }
63
64 }
65 /*------------------------------------------------------------------------*/