1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
|
/*
* Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
* Copyright (C) 2004-2006 - INRIA - Fabrice Leray
* Copyright (C) 2006 - INRIA - Allan Cornet
* Copyright (C) 2006 - INRIA - Jean-Baptiste Silvy
* Copyright (C) 2010 - DIGITEO - Manuel Juliachs
*
* 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
* http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
*
*/
/*------------------------------------------------------------------------*/
/* file: set_triangles_property.c */
/* desc : function to modify in Scilab the surface_color field of */
/* a handle */
/*------------------------------------------------------------------------*/
#include <string.h>
#include "setHandleProperty.h"
#include "SetProperty.h"
#include "getPropertyAssignedValue.h"
#include "SetPropertyStatus.h"
#include "GetProperty.h"
#include "Scierror.h"
#include "localization.h"
#include "getGraphicObjectProperty.h"
#include "setGraphicObjectProperty.h"
#include "graphicObjectProperties.h"
/*------------------------------------------------------------------------*/
int set_triangles_property(void* _pvCtx, char* pobjUID, size_t stackPointer, int valueType, int nbRow, int nbCol )
{
char* type = NULL;
BOOL result = FALSE;
double* pnoeud = NULL;
if ( !isParameterDoubleMatrix( valueType ) )
{
Scierror(999, _("Wrong type for '%s' property: Real matrix expected.\n"), "triangles");
return SET_PROPERTY_ERROR;
}
/*
* Discriminating between a failed allocation and the non-existing property case
* is not done for now.
* To be implemented/corrected.
*/
getGraphicObjectProperty(pobjUID, __GO_TYPE__, jni_string, (void **)&type);
if (strcmp(type, __GO_FEC__) != 0)
{
Scierror(999, _("'%s' property does not exist for this handle.\n"),"triangles");
return SET_PROPERTY_ERROR;
}
if ( nbCol != 5 )
{
Scierror(999, _("Wrong size for '%s' property: Must have %d columns.\n"), "triangles", 5);
return SET_PROPERTY_ERROR;
}
/* Resizes the triangle array if required */
result = setGraphicObjectProperty(pobjUID, __GO_DATA_MODEL_NUM_INDICES__, &nbRow, jni_int, 1);
if (result == FALSE)
{
Scierror(999, _("%s: No more memory.\n"),"set_triangles_property");
return SET_PROPERTY_ERROR;
}
pnoeud = getDoubleMatrixFromStack(stackPointer);
setGraphicObjectProperty(pobjUID, __GO_DATA_MODEL_FEC_TRIANGLES__, pnoeud, jni_double_vector, nbRow);
return SET_PROPERTY_SUCCEED;
}
/*------------------------------------------------------------------------*/
|