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// 8// <-- CLI SHELL MODE --> 9 10msgerr = msprintf(gettext("%s: Wrong number of input argument(s): %d to %d expected.\n"), "h5ls", 1, 3); 11assert_checkerror("h5ls()",msgerr,77); 12msgerr = msprintf(gettext("%s: Wrong type for input argument #%d: string expected.\n"), "h5ls", 1); 13assert_checkerror("h5ls(42)",msgerr,999); 14msgerr = msprintf(gettext("%s: %s\n"), "h5ls", msprintf(gettext("Invalid hdf5 file: %s."), "42")); 15assert_checkerror("h5ls(""42"")",msgerr,999); 16 17x = int8(matrix(1:80, 10, 8)); 18save(TMPDIR + "/x.sod", "x"); 19 20 21msgerr = msprintf(gettext("%s: %s\n"), "h5ls", msprintf(gettext("Invalid hdf5 file: %s."), "x")); 22assert_checkerror("h5ls(""x"")",msgerr,999); 23 24msgerr = msprintf(gettext("%s: Wrong type for input argument #%d: string expected.\n"), "h5ls", 2); 25assert_checkerror("h5ls(TMPDIR+""/x.sod"",12.0)",msgerr,999); 26msgerr = msprintf(gettext("%s: Wrong type for input argument #%d: string expected.\n"), "h5ls", 3); 27assert_checkerror("h5ls(TMPDIR+""/x.sod"",""."",12.0)",msgerr,999); 28 29a = h5open(TMPDIR + "/x.sod"); 30dset = ["x" "dataset"]; 31attr = ["SCILAB_scilab_version" "attribute";"SCILAB_sod_version" "attribute"]; 32assert_checkequal(h5ls(a),cat(1,dset,attr)); 33attr = ["SCILAB_Class" "attribute";"SCILAB_precision" "attribute"]; 34assert_checkequal(h5ls(a.root.x),attr); 35assert_checkequal(h5ls(a,"/x"),attr); 36 37attr = ["SCILAB_scilab_version";"SCILAB_sod_version"]; 38assert_checkequal(h5ls(a,".","a"),attr); 39 40msgerr = msprintf(gettext("%s: %s\n"), "h5ls", gettext("Invalid filter")); 41assert_checkerror("h5ls(a,""."",""x"")",msgerr,999); 42 43msgerr = msprintf(gettext("%s: Wrong type for input argument #%d: string expected.\n"), "h5ls", 1); 44assert_checkerror("h5ls(12.0)",msgerr,999); 45msgerr = msprintf(gettext("%s: Wrong type for input argument #%d: string expected.\n"), "h5ls", 2); 46assert_checkerror("h5ls(a,12.0)",msgerr,999); 47msgerr = msprintf(gettext("%s: Wrong type for input argument #%d: string expected.\n"), "h5ls", 3); 48assert_checkerror("h5ls(a,""."",12.0)",msgerr,999); 49msgerr = msprintf(gettext("%s: %s\n"), "h5ls", msprintf(gettext("Invalid hdf5 file: %s."), "x")); 50assert_checkerror("h5ls(""x"")",msgerr,999); 51 52h5close(a); 53 54attr = ["SCILAB_scilab_version" "attribute";"SCILAB_sod_version" "attribute"]; 55assert_checkequal(h5ls(TMPDIR+"/x.sod"),cat(1,dset,attr)); 56attr = ["SCILAB_Class" "attribute";"SCILAB_precision" "attribute"]; 57assert_checkequal(h5ls(TMPDIR+"/x.sod","/x"),attr); 58attr = ["SCILAB_scilab_version";"SCILAB_sod_version"]; 59assert_checkequal(h5ls(TMPDIR+"/x.sod",".","a"),attr); 60 61 62 63