1 /* This file is part of MED.
2 *
3 * COPYRIGHT (C) 1999 - 2019 EDF R&D, CEA/DEN
4 * MED is free software: you can redistribute it and/or modify
5 * it under the terms of the GNU Lesser General Public License as published by
6 * the Free Software Foundation, either version 3 of the License, or
7 * (at your option) any later version.
8 *
9 * MED is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU Lesser General Public License for more details.
13 *
14 * You should have received a copy of the GNU Lesser General Public License
15 * along with MED. If not, see <http://www.gnu.org/licenses/>.
16 */
17
18
19 #include <med.h>
20 #include <med_config.h>
21 #include <med_outils.h>
22 #include <string.h>
23 #include <stdlib.h>
24
25
26 /**\ingroup MEDfield
27 \brief \MEDfieldValueRdBrief
28 \param fid \fid
29 \param fieldname \fieldname
30 \param numdt \numdt
31 \param numit \numit
32 \param entitype \entitype
33 \param geotype \geotype
34 \param switchmode \switchmode
35 \param componentselect \componentselect
36 \param value \value
37 \retval med_err \error
38 \details \MEDfieldValueRdDetails
39
40 \remarks
41 \MEDfieldValueRdRem
42 */
43
MEDfieldValueRd(const med_idt fid,const char * const fieldname,const med_int numdt,const med_int numit,const med_entity_type entitype,const med_geometry_type geotype,const med_switch_mode switchmode,const med_int componentselect,unsigned char * const value)44 med_err MEDfieldValueRd(const med_idt fid,
45 const char* const fieldname,
46 const med_int numdt,
47 const med_int numit,
48 const med_entity_type entitype,
49 const med_geometry_type geotype,
50 const med_switch_mode switchmode,
51 const med_int componentselect,
52 unsigned char* const value)
53 {
54 char * name = "_MEDfieldValueAdvancedRd";
55 int dummy=0;
56 med_err fret=-1;
57 med_int majeur=0, mineur=0, release=0;
58 MedFuncType func;
59
60
61 /* ISCRUTE((*filter).nentity ); */
62 /* ISCRUTE((*filter).nvaluesperentity ); */
63 /* ISCRUTE((*filter).nconstituentpervalue ); */
64 /* ISCRUTE((*filter).constituentselect ); */
65 /* ISCRUTE((*filter).switchmode ); */
66 /* ISCRUTE((*filter).filterarraysize ); */
67 /* ISCRUTE((*filter).profilearraysize ); */
68 /* ISCRUTE((*filter).profilemode ); */
69 /* SSCRUTE((*filter).profilename ); */
70
71 MEDfileNumVersionRd(fid, &majeur, &mineur, &release);
72
73 func = _MEDversionedApi3(name,majeur,mineur,release);
74 if ( func != (MedFuncType) NULL )
75 func (dummy,
76 fid,
77 fieldname,
78 numdt,
79 numit,
80 entitype,
81 geotype,
82 MED_NO_MESHNAME,
83 MED_UNDEF_STMODE,
84 MED_NO_PROFILE,
85 switchmode,
86 componentselect,
87 NULL,
88 value,
89 &fret);
90
91 return fret;
92 }
93