MED fichier
MEDfileCompatibility.c
Aller à la documentation de ce fichier.
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 
23 
33 med_err
34 MEDfileCompatibility(const char* const filename,
35  med_bool* const hdfok,
36  med_bool* const medok)
37 {
38  med_err _ret = -1;
39  med_idt _fid = 0;
40  med_idt _id = 0;
41  med_int _major = 0;
42  med_int _minor = 0;
43  med_int _release = 0;
44  med_int _hmajeur=0, _hmineur=0, _hrelease=0;
45  med_int _hversionMMR = 0;
46  med_int _fversionMM = 0;
47 
48 
49 
51 
52  *hdfok = MED_FALSE;
53  *medok = MED_FALSE;
54 
55  /* Si le fichier n'est pas un fichier hdf retourne en indiquant hdfok=false et medok=false
56  mais pas de code d'erreur */
57  if ( H5Fis_hdf5(filename) <= 0 ) {goto SORTIE;};
58 
59  /* Si l'on ne peut pas déterminer la version de la bibliothèque med, renvoie une erreur */
60  if (MEDlibraryHdfNumVersion(&_hmajeur, &_hmineur, &_hrelease) < 0) {
61  MED_ERR_(_ret,MED_ERR_CALL,MED_ERR_API,"MEDlibraryNumVersion");
62  goto ERROR;
63  }
64 
65 
66  /* Si la bibliothèque HDF est conforme à la version HDF de référence
67  de cette version de la bibliothèque MED renvoie hdfok=false et medok=false */
68  /* Il se peut tout de même que cette version d'HDF soit partiellement utilisable par la bibliothèque
69  ... on test aussi la version du modèle med */
70 
71  _hversionMMR=10000*_hmajeur+100*_hmineur+_hrelease;
72  /* ISCRUTE(_hversionMMR); */
73  /* ISCRUTE(HDF_VERSION_NUM_REF); */
74  if ( (_hversionMMR >= HDF_VERSION_NUM_REF) && (_hmineur == HDF_VERSION_MINOR_REF) ) *hdfok = MED_TRUE;
75 
76  /* TODO : Vérifier si la version mineure HDF du fichier est supérieur
77  à la version mineure de la bibliothèque HDF utilisée */
78  /* Je n'ai pas trouvé de mécanisme HDF pour trouver la version HDF du fichier */
79 
80  /* On appel _MEDfileOpen et non MEDfileOpen car l'accessibilité du fichier
81  peut-être testée au préalable par l'utilisateur via
82  MEDfileExist (le fichier est supposé accessible).
83  Si le fichier ne s'ouvre pas, il n'est pas conforme, on n'affiche pas de message d'erreur car l'information est renvoyée par medok
84  */
85  if ((_fid = _MEDfileOpen((char *)filename,MED_ACC_RDONLY)) < 0) {
86  /* MED_ERR_(_ret,MED_ERR_OPEN,MED_ERR_FILE,filename); */
87  /* _ret = MED_ERR_OPEN MED_ERR_FILE; */
88  /* SSCRUTE(filename); */
89  /* goto ERROR; */
90  goto SORTIE;
91  }
92 
93 
94  if ( MEDfileNumVersionRd(_fid,&_major,&_minor,&_release) < 0) {
95  MED_ERR_(_ret,MED_ERR_CALL,MED_ERR_API,"MEDfileNumVersionRd");
96  goto ERROR;
97  }
98 
99  _fversionMM = 100*_major+10*_minor;
100 
101  *medok= MED_TRUE;
102  /* if ( (_major > 2) || ((_major == 2) && (_minor > 1)) ) *medok = MED_TRUE; */
103  if ( _fversionMM < 220 ) *medok = MED_FALSE;
104  /* Si le mineur du fichier est plus récent que celui de la bibliothèque,
105  la bibliothèque n'est pas capable de relire le modèle.*/
106  if ( _fversionMM > 100*MED_NUM_MAJEUR+10*MED_NUM_MINEUR ) *medok = MED_FALSE;
107 
108  SORTIE:
109  _ret = 0;
110  ERROR:
111 
112  if (_id > 0)
113  if (_MEDdatagroupFermer(_id) < 0) {
115  _ret = -1;
116  }
117 
118  if (_fid > 0)
119  if (MEDfileClose(_fid) < 0) {
120  MED_ERR_(_ret,MED_ERR_CLOSE,MED_ERR_FILE,filename);
121  _ret = -1;
122  }
123 
124  return _ret;
125 }
herr_t med_err
Definition: med.h:327
#define MED_ERR_(rt, r1, r2, r3)
Definition: med_utils.h:158
med_err MEDfileCompatibility(const char *const filename, med_bool *const hdfok, med_bool *const medok)
Vérification de la compatibilité d'un fichier avec HDF et MED.
#define HDF_VERSION_MINOR_REF
Definition: med.h:34
MEDC_EXPORT med_err MEDlibraryHdfNumVersion(med_int *const major, med_int *const minor, med_int *const release)
Renvoie les 3 numéros de version de la librairie HDF5 utilisée par MED.
MEDC_EXPORT med_err MEDfileNumVersionRd(const med_idt fid, med_int *const major, med_int *const minor, med_int *const release)
Lecture du numéro de version de la bibliothèque MED utilisée pour créer le fichier.
Definition: med.h:257
MEDC_EXPORT med_err MEDfileClose(med_idt fid)
Fermeture d'un fichier MED.
Definition: MEDfileClose.c:30
#define MED_ERR_CALL
Definition: med_err.h:45
MEDC_EXPORT med_idt _MEDfileOpen(const char *const filename, const med_access_mode accessmode)
int med_int
Definition: med.h:337
Definition: med.h:257
#define MED_ERR_CLOSE
Definition: med_err.h:27
#define MED_NUM_MAJEUR
Definition: med.h:63
#define MED_INFOS
Definition: med_outils.h:247
#define MED_NUM_MINEUR
Definition: med.h:64
#define MED_ERR_DATAGROUP
Definition: med_err.h:98
hid_t med_idt
Definition: med.h:326
#define HDF_VERSION_NUM_REF
Definition: med.h:36
MEDC_EXPORT med_err _MEDdatagroupFermer(med_idt id)
#define filename
Definition: test10.c:73
med_bool
Definition: med.h:257
MEDC_EXPORT void _MEDmodeErreurVerrouiller(void)
#define MED_ERR_API
Definition: med_err.h:108
#define MED_ERR_FILE
Definition: med_err.h:81