Salome HOME
updated copyright message
[modules/kernel.git] / src / HDFPersist / HDFobjectIdentify.c
1 /* Copyright (C) 2007-2023  CEA, EDF, OPEN CASCADE
2  *
3  * Copyright (C) 2003-2007  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4  * CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
5  *
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, or (at your option) any later version.
10  *
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.
15  *
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
19  *
20  * See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
21  */
22
23 /*----------------------------------------------------------------------------
24 SALOME HDFPersist : implementation of HDF persitent ( save/ restore )
25   File   : HDFobjectIdentify.c
26   Module : SALOME
27 ----------------------------------------------------------------------------*/
28
29 #include "hdfi.h"
30 #include <string.h>
31
32 /*
33  * - Name: HDFobjectIdentify
34  * - Description : find the name of the HDF object of rank "i" in the HDF
35  *     group "path"
36  * - Parameters :
37  *     - fid     (IN)     : l'ID du fichier o
38  *     - path  (IN)       : group access path
39  *     - i (IN)           : access rank
40  *     - name (OUT)       : expected name
41  * - Result : 
42  *     - if success : 0
43  *     - if failure : -1
44  */ 
45
46 hdf_err RankInfo(hdf_idt id, const char *name, void *data);
47
48 hdf_err HDFobjectIdentify(hdf_idt fid,const char *path,int i,char *name)
49 {
50   int idx;
51
52   if ((idx = H5Giterate(fid,path,&i,RankInfo,
53                         name)) < 0)
54     return -1;
55
56   return 0;
57 }
58
59
60 hdf_err RankInfo(hdf_idt id, const char *name, void *data)
61 {
62   (void)id;
63
64   if ( data )
65     strcpy( (char*)data, name );
66   else 
67     return -1;
68
69   return 1;
70 }