MED fichier
MEDfileCompatibility.c
Aller à la documentation de ce fichier.
1/* This file is part of MED.
2 *
3 * COPYRIGHT (C) 1999 - 2020 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#include <med.h>
19#include <med_config.h>
20#include <med_outils.h>
21
22
34 med_bool* const hdfok,
35 med_bool* const medok)
36{
37 med_err _ret = -1;
38 med_idt _fid = 0;
39 med_idt _id = 0;
40 med_int _major = 0;
41 med_int _minor = 0;
42 med_int _release = 0;
43 med_int _hmajeur=0, _hmineur=0, _hrelease=0;
44 med_int _hversionMMR = 0;
45 med_int _fversionMM = 0;
46
47
48
50
51 *hdfok = MED_FALSE;
52 *medok = MED_FALSE;
53
54 /* Si le fichier n'est pas un fichier hdf retourne en indiquant hdfok=false et medok=false
55 mais pas de code d'erreur */
56 if ( H5Fis_hdf5(filename) <= 0 ) {goto SORTIE;};
57
58 /* Si l'on ne peut pas déterminer la version de la bibliothèque med, renvoie une erreur */
59 if (MEDlibraryHdfNumVersion(&_hmajeur, &_hmineur, &_hrelease) < 0) {
60 MED_ERR_(_ret,MED_ERR_CALL,MED_ERR_API,"MEDlibraryNumVersion");
61 goto ERROR;
62 }
63
64
65 /* Si la bibliothèque HDF n'est pas conforme à la version HDF de référence
66 de cette version de la bibliothèque MED renvoie hdfok=false et medok=false */
67 /* Il se peut tout de même que cette version d'HDF soit partiellement utilisable par la bibliothèque
68 ... on test aussi la version du modèle med */
69
70 _hversionMMR=10000*_hmajeur+100*_hmineur+_hrelease;
71 /* ISCRUTE(_hversionMMR); */
72 /* ISCRUTE(HDF_VERSION_NUM_REF); */
73 if ( (_hversionMMR >= HDF_VERSION_NUM_REF) && (_hmineur >= HDF_VERSION_MINOR_REF) ) *hdfok = MED_TRUE;
74
75 /* TODO : Vérifier si la version mineure HDF du fichier est supérieure
76 à la version mineure de la bibliothèque HDF utilisée :
77 - Je n'ai pas trouvé de mécanisme HDF pour trouver la version HDF du fichier
78 */
79
80 /* On appelle _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 /* Les versions 3.y.z des fichiers med sont compatibles avec la bibliothèque 4.
107 La bibliothèque 4 autorise la création de fichiers 3.y.z et sait les gérer.
108 Celà est dû au fait que l'on a figé le modèle interne hdf à la version 1.8
109 */
110 if ( _fversionMM > 100*MED_NUM_MAJEUR+10*MED_NUM_MINEUR ) *medok = MED_FALSE;
111
112#if MED_NUM_MAJEUR != 4
113#error "Don't forget to update the test version here when you change the major version of the library !"
114#endif
115#if H5_VERS_MINOR > 10
116#warning "Don't forget to check the compatibility version of the library, depending on the internal hdf model choice !"
117#warning "Cf. _MEDfileCreate ..."
118#endif
119
120 SORTIE:
121 _ret = 0;
122 ERROR:
123
124 if (_id > 0)
125 if (_MEDdatagroupFermer(_id) < 0) {
127 _ret = -1;
128 }
129
130 if (_fid > 0)
131 if (MEDfileClose(_fid) < 0) {
133 _ret = -1;
134 }
135
136 return _ret;
137}
#define MED_NUM_MAJEUR
#define MED_NUM_MINEUR
#define HDF_VERSION_NUM_REF
#define HDF_VERSION_MINOR_REF
#define MED_ERR_(rt, r1, r2, r3)
MEDC_EXPORT med_err MEDfileClose(med_idt fid)
Fermeture d'un fichier MED.
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.
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.
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.
#define MED_ERR_CALL
Definition med_err.h:48
#define MED_ERR_DATAGROUP
Definition med_err.h:99
#define MED_ERR_CLOSE
Definition med_err.h:30
#define MED_ERR_FILE
Definition med_err.h:82
#define MED_ERR_API
Definition med_err.h:111
MEDC_EXPORT med_idt _MEDfileOpen(const char *const filename, const med_access_mode accessmode)
MEDC_EXPORT void _MEDmodeErreurVerrouiller(void)
MEDC_EXPORT med_err _MEDdatagroupFermer(med_idt id)
#define MED_INFOS
Definition med_outils.h:256
#define filename
Definition test10.c:73