hdf5: force some hdf5 lib functions, force no depreacated functions, convert code...
[scilab.git] / scilab / modules / hdf5 / tests / unit_tests / h5readattr.dia.ref
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2012 - SCILAB ENTERPRISES - Simon GARESTE
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 // <-- ENGLISH IMPOSED -->
8 // <-- CLI SHELL MODE -->
9 msgerr = msprintf(gettext("%s: Wrong number of input argument(s): 1 to 3 expected."), "h5readattr");
10 assert_checkerror("h5readattr()",msgerr,77);
11 msgerr = msprintf(gettext("%s: Wrong type for input argument #1: A string expected."), "h5readattr");
12 assert_checkerror("h5readattr(42)",msgerr,999);
13 msgerr = msprintf(gettext("%s: Invalid number of argument(s): 3 expected."), "h5readattr");
14 assert_checkerror("h5readattr(""42"")",msgerr,999);
15 msgerr = msprintf(gettext("%s: Wrong type for input argument #2: A string expected."), "h5readattr");
16 assert_checkerror("h5readattr(""42"",42,42)",msgerr,999);
17 msgerr = msprintf(gettext("%s: Wrong type for input argument #3: A string expected."), "h5readattr");
18 assert_checkerror("h5readattr(""42"",""42"",42)",msgerr,999);
19 msgerr = msprintf(gettext("%s: Invalid hdf5 file: %s.\nHDF5 description: unable to find a valid file signature."), "h5readattr","42");
20 assert_checkerror("h5readattr(""42"",""42"",""42"")",msgerr,999);
21 x = int8(matrix(1:80, 10, 8));
22 save(TMPDIR + "/x.sod", "x");
23 version = string(getversion('scilab'));
24 version = getversion()+" "+strcat([version(1),version(2),version(3)],'.');
25 a = h5open(TMPDIR + "/x.sod");
26 scilab_version = h5readattr(a, "/", "SCILAB_scilab_version");
27 assert_checkequal(scilab_version,version);
28 scilab_class = h5readattr(a.root.x, "SCILAB_Class");
29 assert_checkequal(scilab_class,"integer");
30 msgerr = msprintf(gettext("%s: Cannot open attribute: %s\n"), ..
31                 "h5readattr","test");
32 assert_checkerror("h5readattr(a.root.x, ""test"")",msgerr,999);
33 msgerr = msprintf(gettext("%s: Invalid name: %s"), "h5readattr",".");
34 assert_checkerror("h5readattr(a.root.x)",msgerr,999);
35 msgerr = msprintf(gettext("%s: Cannot open attribute: %s"), ..
36             "h5readattr","Attributes");
37 assert_checkerror("h5readattr(a.root.x,""Attributes"")",msgerr,999);
38 //After closing, all h5readattr will fail
39 h5close(a);
40 msgerr = msprintf(gettext("%s: Invalid H5Object.\n"), "h5readattr");
41 assert_checkerror("h5readattr(a, ""/"", ""SCILAB_scilab_version"")",msgerr,999);
42 msgerr = msprintf(gettext("%s: Invalid H5Object.\n"), "%H5Object_e");
43 assert_checkerror("h5readattr(a.root.x, ""SCILAB_Class"")",msgerr,999);
44 assert_checkerror("h5readattr(a.root.x, ""test"")",msgerr,999);
45 assert_checkerror("h5readattr(a.root.x)",msgerr,999);
46 assert_checkerror("h5readattr(a.root.x,""Attributes"")",msgerr,999);
47 msgerr = msprintf(gettext("Undefined variable: %s\n"), "b");
48 assert_checkerror("h5readattr(b)",msgerr,4);
49 //on a non hdf5 variable
50 b=1;
51 msgerr = msprintf(gettext("%s: Wrong type for input argument #1: A string expected.\n"), "h5readattr");
52 assert_checkerror("h5readattr(b)",msgerr,999);
53 msgerr = msprintf(gettext("%s: Wrong type for input argument #1: " ..
54                     +"A string expected.\n"), "h5readattr");
55 assert_checkerror("h5readattr(b,""/"")",msgerr,999);
56 b="hello";
57 msgerr = msprintf(gettext("%s: Invalid hdf5 file: %s.\n"), "h5readattr",b);
58 assert_checkerror("h5readattr(b,""/"")",msgerr,999);
59 assert_checkequal(deletefile(TMPDIR+"/x.sod"),%T);