1 // SALOME HDFPersist : implementation of HDF persitent ( save/ restore )
3 // Copyright (C) 2003 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
6 // This library is free software; you can redistribute it and/or
7 // modify it under the terms of the GNU Lesser General Public
8 // License as published by the Free Software Foundation; either
9 // version 2.1 of the License.
11 // This library is distributed in the hope that it will be useful,
12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 // Lesser General Public License for more details.
16 // You should have received a copy of the GNU Lesser General Public
17 // License along with this library; if not, write to the Free Software
18 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20 // See http://www.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org
24 // File : HDFconvert.cc
27 #include "HDFconvert.hxx"
30 int HDFConvert::FromAscii(const string& file, const HDFcontainerObject & hdf_container, const string& nomdataset)
33 HDFdataset * hdf_dataset;
40 // Ouverture du fichier source
41 if ( (fd = open(file.c_str(),O_RDONLY)) <0) {
42 perror("HDFConvert::FromAscii");
46 // Lit l'état du fichier
47 if ( fstat(fd,&status) < 0) {
48 perror("HDFConvert::FromAscii");
52 length = status.st_size; //Calcul la taille du fichier en octets
55 #ifdef _POSIX_MAPPED_FILES
57 // Map le fichier en mémoire
58 if ( (buffer = (char *) mmap(0,length,PROT_READ,MAP_SHARED,fd,0)) == MAP_FAILED ) {
59 perror("HDFConvert::FromAscii");
65 // Sort de la compilation
66 #error Necessite l''utilisation de la primitive mmap
70 // Creation du Dataset utilisateur
71 hdf_dataset = new HDFdataset( (char *) nomdataset.c_str(), /*discard const */
72 (HDFcontainerObject*) &hdf_container, /*discard const, pas de constructeur par référence */
75 // Cree le Dataset sur le disk
76 hdf_dataset->CreateOnDisk();
79 hdf_dataset->WriteOnDisk(buffer);
81 // Ferme le fichier hdf
82 hdf_dataset->CloseOnDisk();
87 #ifdef _POSIX_MAPPED_FILES
89 // Desalloue le mapping
90 if (munmap(buffer,length) < 0 ) {
91 perror("HDFConvert::FromAscii");
96 // Ferme le fichier ASCII
98 perror("HDFConvert::FromAscii");