Salome HOME
Join modifications from branch BR_DEBUG_3_2_0b1
[modules/kernel.git] / src / HDFPersist / test8.cxx
1 //  SALOME HDFPersist : implementation of HDF persitent ( save/ restore )
2 //
3 //  Copyright (C) 2003  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. 
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 //  File   : test8.cxx
25 //  Module : SALOME
26
27 #include <iostream.h>
28 #include "HDFOI.hxx"
29 #include <stdlib.h>
30 using namespace std;
31
32
33 int main()
34 {
35   HDFfile *hdf_file;
36   HDFgroup *hdf_group;
37   HDFdataset *hdf_dataset;
38   hdf_size size[1];
39   char message[HDF_NAME_MAX_LEN+1] = "MESSAGE";
40   hdf_int32 attribute = 3;
41
42   system("rm file_ascii.hdf");
43
44   try
45     {
46       // a new HDFfile object
47       hdf_file = new HDFfile("file_ascii.hdf");
48       MESSAGE( ">> A HDFfile object is created" );
49       
50       hdf_file->CreateOnDisk();
51       MESSAGE( ">> The HDF file is created on Disk " );
52
53       // Inside the HDF file 
54
55       // A new HDF group object
56       hdf_group = new HDFgroup("ASCII GROUP",hdf_file);
57       MESSAGE( ">> A HDFgroup object 'ASCII' is created" );
58
59       hdf_group->CreateOnDisk();
60       MESSAGE( ">> The HDF group is created on Disk " );
61
62       // Transfert d'un fichier ASCII dans un groupe HDF
63       HDFConvert::FromAscii("ascii.txt",*hdf_group,"ASCII DATASET");
64       MESSAGE( ">> The Ascii file is transfered " );
65  
66       // The HDF group is built, it can be closed
67       hdf_group->CloseOnDisk();
68       MESSAGE( ">> The HDF group is closed on Disk " );
69
70       // The HDF file is built, it can be closed
71       hdf_file->CloseOnDisk();
72       MESSAGE( ">> The HDF file is closed on disk" );
73
74  
75       delete hdf_group;
76       MESSAGE( ">> The HDF group object is deleted" ); 
77       delete hdf_file;
78       MESSAGE( ">> The HDF file object is deleted" );
79     }
80   catch (HDFexception)
81     {
82       MESSAGE( "!!!! HDFexception" )
83     }
84
85   return 0;
86 }