Salome HOME
BugID: IPAL9392, modified methods GetRowUnits.
[modules/kernel.git] / src / HDFPersist / HDFfileOpen.c
1 /*----------------------------------------------------------------------------
2 SALOME HDFPersist : implementation of HDF persitent ( save/ restore )
3
4  Copyright (C) 2003  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
5  CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS 
6
7  This library is free software; you can redistribute it and/or 
8  modify it under the terms of the GNU Lesser General Public 
9  License as published by the Free Software Foundation; either 
10  version 2.1 of the License. 
11
12  This library is distributed in the hope that it will be useful, 
13  but WITHOUT ANY WARRANTY; without even the implied warranty of 
14  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU 
15  Lesser General Public License for more details. 
16
17  You should have received a copy of the GNU Lesser General Public 
18  License along with this library; if not, write to the Free Software 
19  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA 
20
21  See http://www.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org 
22
23
24
25   File   : HDFfileOpen.c
26 Module : SALOME
27 ----------------------------------------------------------------------------*/
28
29 #include "hdfi.h"
30 /*
31  * - Name : HDFfileOpen
32  * - Description : open an existing HDF file
33  * - Parameters :
34  *     - name (IN)        : file name
35  *     - access_mode (IN) : file access mode 
36  * - Result : 
37  *     - success : file ID
38  *     - failure : -1 
39  */ 
40
41 hdf_idt HDFfileOpen(char *name,hdf_access_mode access_mode)
42
43   hdf_idt fid;
44   int mode;
45
46   switch(access_mode)
47     {
48     case HDF_RDONLY:
49       mode = H5F_ACC_RDONLY;
50       break;
51
52     case HDF_RDWR :
53       mode = H5F_ACC_RDWR; 
54       break;
55
56     default :
57       return -1;
58     }  
59
60   if ((fid = H5Fopen(name,mode,H5P_DEFAULT)) < 0)
61     return -1;
62
63   return fid;
64 }