MEDstructElementInfo.c

Aller à la documentation de ce fichier.
00001 /*  This file is part of MED.
00002  *
00003  *  COPYRIGHT (C) 1999 - 2015  EDF R&D, CEA/DEN
00004  *  MED is free software: you can redistribute it and/or modify
00005  *  it under the terms of the GNU Lesser General Public License as published by
00006  *  the Free Software Foundation, either version 3 of the License, or
00007  *  (at your option) any later version.
00008  *
00009  *  MED is distributed in the hope that it will be useful,
00010  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
00011  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
00012  *  GNU Lesser General Public License for more details.
00013  *
00014  *  You should have received a copy of the GNU Lesser General Public License
00015  *  along with MED.  If not, see <http://www.gnu.org/licenses/>.
00016  */
00017 
00018 
00019 #include <med.h>
00020 #include <med_config.h>
00021 #include <med_outils.h>
00022 
00023 #include <stdlib.h>
00024 #include <string.h>
00025 
00049 med_err
00050 MEDstructElementInfo(const med_idt             fid,
00051                      const int                 mit,
00052                      char *              const modelname,
00053                      med_geometry_type * const mgeotype,
00054                      med_int*            const modeldim,
00055                      char*               const supportmeshname,
00056                      med_entity_type*    const sentitytype,
00057                      med_int*            const snnode,
00058                      med_int*            const sncell,
00059                      med_geometry_type*  const sgeotype,
00060                      med_int*            const nconstantattribute,
00061                      med_bool*           const anyprofile,
00062                      med_int*            const nvariableattribute
00063                            )
00064 {
00065 
00066   med_err  _ret=-1;
00067   char     _path[MED_TAILLE_STRCT+MED_NAME_SIZE+1]=MED_STRCT;
00068   int      _num = mit -1;
00069 
00070   /*
00071    * On inhibe le gestionnaire d'erreur HDF 5
00072    */
00073   _MEDmodeErreurVerrouiller();
00074 
00075   /*
00076    * On recupere le nom de l'élément de structure
00077    */
00078   if ( _MEDobjectGetName(fid, _path ,_num, modelname) < 0 ) {
00079     MED_ERR_(_ret,MED_ERR_ACCESS,MED_ERR_DATAGROUP,_path);ISCRUTE_int(mit);
00080     goto ERROR;
00081   }
00082   strcat(_path,modelname);
00083 
00084   if (
00085       MEDstructElementInfoByName(fid,
00086                                  modelname,
00087                                  mgeotype,
00088                                  modeldim,
00089                                  supportmeshname,
00090                                  sentitytype,
00091                                  snnode,
00092                                  sncell,
00093                                  sgeotype,
00094                                  nconstantattribute,
00095                                  anyprofile,
00096                                  nvariableattribute
00097                                  ) < 0 ) {
00098     MED_ERR_(_ret,MED_ERR_CALL,MED_ERR_API,MED_ERR_STRUCT_MSG);
00099     SSCRUTE(modelname);SSCRUTE(_path);SSCRUTE("MEDstructElementInfoByName");
00100     goto ERROR;
00101   }
00102 
00103   _ret = 0;
00104 
00105  ERROR:
00106 
00107   return _ret;
00108 }

Généré le Thu Oct 8 14:26:16 2015 pour MED fichier par  doxygen 1.6.1