summaryrefslogtreecommitdiffstats
path: root/src
Commit message (Expand)AuthorAgeFilesLines
* TRILAB-142 Change minimum CMake version to 3.12Allen Byrne2020-02-211-1/+1
* Merge developJordan Henderson2020-02-21208-6115/+17611
|\
| * Replace the old H5F_DECODE_LENGTH() implementation with one thatDavid Young2020-02-191-1/+1
| * Merge pull request #2367 in HDFFV/hdf5 from ~DYOUNG/werror:unused to developDavid Young2020-02-198-23/+53
| |\
| | * H5_HAVE_PARALLEL, _DEBUG_API, etc. Add attributes to some variables andDavid Young2020-02-108-23/+53
| * | Merge pull request #2369 in HDFFV/hdf5 from ~DYOUNG/vs2010:develop to developDavid Young2020-02-173-13/+41
| |\ \
| | * \ Make sure that H5TS_thread_id() is available as either a function or a macro inDavid Young2020-02-102-12/+2
| | |\ \
| | | * | Delete unhelpful comment per Jordan's question.David Young2020-02-101-3/+0
| | | * | Make sure that H5TS_thread_id() is available as either a function or a macro inDavid Young2020-02-072-12/+5
| | | |/
| | * | Provide C99/POSIX.1 format strings PRI[doux]{8,16,32,64,MAX,PTR} on systemsDavid Young2020-02-071-1/+39
| | |/
| * | Merge pull request #2325 in HDFFV/hdf5 from ~DYOUNG/werror:h5t_copy to developDavid Young2020-02-1715-194/+480
| |\ \
| | * | H5T_copy() constification plus Quincey's contributions.David Young2020-01-2915-194/+480
| * | | Fix improper S3 signing key null check (HDFFV-11015).Jacob Smith2020-02-071-2/+2
| | |/ | |/|
| * | If H5_HAVE_THREADSAFE is not #defined, define nothing but a stub implementationDavid Young2020-02-051-0/+7
| * | src/H5Eint.c: #include H5TSprivate.h for H5TS_thread_id() definitions.David Young2020-02-031-0/+1
| * | Change thread IDs to uint64_t from unsigned long, per Quincey's suggestion.David Young2020-02-034-13/+13
| * | Replace pthread_self_ulong() with H5TS_thread_id(). The POSIX ThreadsDavid Young2020-02-036-21/+124
| * | Merge pull request #2329 in HDFFV/hdf5 from ~DEROBINS/hdf5_der:H5MM_const to ...Dana Robinson2020-01-3110-50/+67
| |\ \
| | * | Minor refactoring to the VFD info free call.Dana Robinson2020-01-311-10/+8
| | * | Updated the 'const memory free' changes based on PR feedback.Dana Robinson2020-01-319-45/+27
| | * | Added a free wrapper that lets us free constant pointers withoutDana Robinson2020-01-308-25/+62
| * | | VS2010 needs an underscoreAllen Byrne2020-01-301-0/+6
| |/ /
| * | Merge pull request #2318 in HDFFV/hdf5 from ~DYOUNG/werror:reduce-werror-diff...David Young2020-01-2915-127/+125
| |\ \
| | * | Reduce differences between my -Werror branch and `develop`:David Young2020-01-2915-127/+125
| | |/
| * | Merge pull request #2320 in HDFFV/hdf5 from ~DYOUNG/werror:reduce-werror-diff...David Young2020-01-296-73/+67
| |\ \
| | * | Reduce casts of HDcalloc()/HDmalloc() that -Wc++-compat required.David Young2020-01-296-73/+67
| | |/
| * | Merge pull request #2321 in HDFFV/hdf5 from ~DYOUNG/werror:reduce-werror-diff...David Young2020-01-291-1/+3
| |\ \
| | * | testpar/t_2Gio.c: Fix a typo that I think was introduced by aDavid Young2020-01-291-1/+3
| | |/
| * | Introduce new H5VL _by_value routinesJordan Henderson2020-01-295-25/+227
| |/
| * Merge pull request #2311 in HDFFV/hdf5 from ~KMU/hdf5:misc to developKimmy Mu2020-01-281-1/+1
| |\
| | * fix Wredundant-decls, Wswitch-default, Wdeclaration-after-statement, Wsign-co...kmu2020-01-271-1/+1
| * | Replaced my_isnan with C99 isnan in h5diff.Dana Robinson2020-01-241-0/+3
| * | Removed H5_DEC_ENUMDana Robinson2020-01-231-7/+0
| * | Revert "Revert "Moved -Wunsuffixed-float-constants to the developer warnings.""Dana Robinson2020-01-232-16/+1
| |/
| * remove unnecessary stuffkmu2020-01-231-2/+0
| * squash cast warning fixkmu2020-01-2311-91/+95
| * merge and fix conflictkmu2020-01-23150-3016/+7804
| |\
| | * Merge pull request #2292 in HDFFV/hdf5 from ~KMU/hdf5:bugfix/prototype to dev...Kimmy Mu2020-01-231-1/+2
| | |\
| | | * fix missing prototype warningkmu2020-01-211-1/+2
| | * | Merge pull request #2094 in HDFFV/hdf5 from ~KMU/hdf5:bugfix/unused to developKimmy Mu2020-01-2343-145/+151
| | |\ \
| | | * | more cleanupkmu2020-01-231-1/+1
| | | * | merge and fixkmu2020-01-2167-1014/+4089
| | | |\ \
| | | * \ \ merge and fix conflictkmu2020-01-1942-123/+142
| | | |\ \ \
| | | * \ \ \ merge and fix conflictskmu2020-01-14101-2516/+4199
| | | |\ \ \ \
| | | * | | | | pick up missing piecekmu2020-01-132-2/+3
| | | * | | | | fix unused related warningskmu2020-01-1340-128/+138
| | | * | | | | remove unsed var,function,macro, etckmu2019-12-062-16/+2
| | * | | | | | Remove irrelevant sentence from comment.Larry Knox2020-01-221-3/+1
| | * | | | | | Add v111 version for H5O functions to enable version1 default for HDF5Larry Knox2020-01-211-5/+16
| | | |_|_|/ / | | |/| | | |
| | * | | | | Only 2 versions of H5O_info_t and H5O_iterate_t.Larry Knox2020-01-201-2/+2
generated by cgit v0.12 at 2024-10-05 23:45:29 (GMT)
t;, /* 38: */ "extlinks17", /* 39: */ "extlinks18A", /* 40: */ "extlinks18B", /* 41: */ "extlinks19A", /* 42: */ "extlinks19B", /* 43: */ "extlinks20", /* 44: */ NULL }; #endif // 0 #define TMPDIR "tmp" #define FAMILY_SIZE 1024 #define CORE_INCREMENT 1024 #define NUM400 400 /* do not do check_all_closed() for "ext*" files and "tmp/ext*" */ #define EXTSTOP 12 #define LINK_BUF_SIZE 1024 #define NAME_BUF_SIZE 1024 #define MAX_NAME_LEN ((64*1024)+1024) /* Link type IDs */ #define UD_HARD_TYPE 201 #define UD_CB_TYPE H5L_TYPE_MAX #define UD_PLIST_TYPE 128 #define UD_CBFAIL_TYPE UD_PLIST_TYPE #define UD_ERROR_TYPE 189 #define UD_BAD_TYPE1 H5L_TYPE_HARD #define UD_BAD_TYPE2 (H5L_TYPE_UD_MIN - 5) #define UD_BAD_VERS (H5L_LINK_CLASS_T_VERS + 1) #define DEST_PROP_NAME "destination_group" #define REREG_TARGET_NAME "rereg_target" #define UD_CB_LINK_NAME "ud_callback_link" #define NEW_UD_CB_LINK_NAME "ud_callback_link2" #define UD_CB_TARGET "ud_target" #define UD_CB_TARGET_LEN 10 #define LE_FILENAME "le_extlink1.h5" #define BE_FILENAME "be_extlink1.h5" #define ELINK_CB_FAM_SIZE (hsize_t) 100 #define H5L_DIM1 100 #define H5L_DIM2 100 /* Creation order macros */ #define CORDER_GROUP_NAME "corder_group" #define CORDER_SOFT_GROUP_NAME "corder_soft_group" #define CORDER_NLINKS 18 #define CORDER_ITER_STOP 3 #define CORDER_EST_ENTRY_LEN 9 /* Timestamp macros */ #define TIMESTAMP_GROUP_1 "timestamp1" #define TIMESTAMP_GROUP_2 "timestamp2" /* Link iteration struct */ typedef struct { H5_iter_order_t order; /* Direction of iteration */ unsigned ncalled; /* # of times callback is entered */ unsigned nskipped; /* # of links skipped */ int stop; /* # of iterations to stop after */ int64_t curr; /* Current creation order value */ size_t max_visit; /* Size of "visited link" flag array */ hbool_t *visited; /* Pointer to array of "visited link" flags */ } link_iter_info_t; #if 0 /* Link visit structs */ typedef struct { const char *path; /* Path to link */ H5L_type_t type; /* Type of link */ } link_visit_t; static const link_visit_t lvisit0[] = { {"Dataset_zero", H5L_TYPE_HARD}, {"Group1", H5L_TYPE_HARD}, {"Group1/Dataset_one", H5L_TYPE_HARD}, {"Group1/Group2", H5L_TYPE_HARD}, {"Group1/Group2/Dataset_two", H5L_TYPE_HARD}, {"Group1/Group2/Type_two", H5L_TYPE_HARD}, {"Group1/Group2/hard_zero", H5L_TYPE_HARD}, {"Group1/Type_one", H5L_TYPE_HARD}, {"Group1/hard_one", H5L_TYPE_HARD}, {"Type_zero", H5L_TYPE_HARD}, {"ext_dangle", H5L_TYPE_EXTERNAL}, {"ext_one", H5L_TYPE_EXTERNAL}, {"hard_one", H5L_TYPE_HARD}, {"hard_two", H5L_TYPE_HARD}, {"hard_zero", H5L_TYPE_HARD}, {"soft_dangle", H5L_TYPE_SOFT}, {"soft_one", H5L_TYPE_SOFT}, {"soft_two", H5L_TYPE_SOFT} }; static const link_visit_t lvisit1[] = { {"Dataset_one", H5L_TYPE_HARD}, {"Group2", H5L_TYPE_HARD}, {"Group2/Dataset_two", H5L_TYPE_HARD}, {"Group2/Type_two", H5L_TYPE_HARD}, {"Group2/hard_zero", H5L_TYPE_HARD}, {"Group2/hard_zero/Dataset_zero", H5L_TYPE_HARD}, {"Group2/hard_zero/Group1", H5L_TYPE_HARD}, {"Group2/hard_zero/Type_zero", H5L_TYPE_HARD}, {"Group2/hard_zero/ext_dangle", H5L_TYPE_EXTERNAL}, {"Group2/hard_zero/ext_one", H5L_TYPE_EXTERNAL}, {"Group2/hard_zero/hard_one", H5L_TYPE_HARD}, {"Group2/hard_zero/hard_two", H5L_TYPE_HARD}, {"Group2/hard_zero/hard_zero", H5L_TYPE_HARD}, {"Group2/hard_zero/soft_dangle", H5L_TYPE_SOFT}, {"Group2/hard_zero/soft_one", H5L_TYPE_SOFT}, {"Group2/hard_zero/soft_two", H5L_TYPE_SOFT}, {"Type_one", H5L_TYPE_HARD}, {"hard_one", H5L_TYPE_HARD} }; static const link_visit_t lvisit2[] = { {"Dataset_two", H5L_TYPE_HARD}, {"Type_two", H5L_TYPE_HARD}, {"hard_zero", H5L_TYPE_HARD}, {"hard_zero/Dataset_zero", H5L_TYPE_HARD}, {"hard_zero/Group1", H5L_TYPE_HARD}, {"hard_zero/Group1/Dataset_one", H5L_TYPE_HARD}, {"hard_zero/Group1/Group2", H5L_TYPE_HARD}, {"hard_zero/Group1/Type_one", H5L_TYPE_HARD}, {"hard_zero/Group1/hard_one", H5L_TYPE_HARD}, {"hard_zero/Type_zero", H5L_TYPE_HARD}, {"hard_zero/ext_dangle", H5L_TYPE_EXTERNAL}, {"hard_zero/ext_one", H5L_TYPE_EXTERNAL}, {"hard_zero/hard_one", H5L_TYPE_HARD}, {"hard_zero/hard_two", H5L_TYPE_HARD}, {"hard_zero/hard_zero", H5L_TYPE_HARD}, {"hard_zero/soft_dangle", H5L_TYPE_SOFT}, {"hard_zero/soft_one", H5L_TYPE_SOFT}, {"hard_zero/soft_two", H5L_TYPE_SOFT} }; typedef struct { unsigned idx; /* Index in link visit structure */ const link_visit_t *info; /* Pointer to the link visit structure to use */ } lvisit_ud_t; /* Object visit structs */ typedef struct { const char *path; /* Path to object */ H5O_type_t type; /* Type of object */ } obj_visit_t; static const obj_visit_t ovisit0_old[] = { {".", H5O_TYPE_GROUP}, {"Dataset_zero", H5O_TYPE_DATASET}, {"Group1", H5O_TYPE_GROUP}, {"Group1/Dataset_one", H5O_TYPE_DATASET}, {"Group1/Group2", H5O_TYPE_GROUP}, {"Group1/Group2/Dataset_two", H5O_TYPE_DATASET}, {"Group1/Group2/Type_two", H5O_TYPE_NAMED_DATATYPE}, {"Group1/Type_one", H5O_TYPE_NAMED_DATATYPE}, {"Type_zero", H5O_TYPE_NAMED_DATATYPE} }; static const obj_visit_t ovisit0_new[] = { {".", H5O_TYPE_GROUP}, {"Dataset_zero", H5O_TYPE_DATASET}, {"Group1", H5O_TYPE_GROUP}, {"Group1/Dataset_one", H5O_TYPE_DATASET}, {"Group1/Group2", H5O_TYPE_GROUP}, {"Group1/Group2/Dataset_two", H5O_TYPE_DATASET}, {"Group1/Group2/Type_two", H5O_TYPE_NAMED_DATATYPE}, {"Group1/Type_one", H5O_TYPE_NAMED_DATATYPE}, {"Type_zero", H5O_TYPE_NAMED_DATATYPE} }; static const obj_visit_t ovisit1_old[] = { {".", H5O_TYPE_GROUP}, {"Dataset_one", H5O_TYPE_DATASET}, {"Group2", H5O_TYPE_GROUP}, {"Group2/Dataset_two", H5O_TYPE_DATASET}, {"Group2/Type_two", H5O_TYPE_NAMED_DATATYPE}, {"Group2/hard_zero", H5O_TYPE_GROUP}, {"Group2/hard_zero/Dataset_zero", H5O_TYPE_DATASET}, {"Group2/hard_zero/Type_zero", H5O_TYPE_NAMED_DATATYPE}, {"Type_one", H5O_TYPE_NAMED_DATATYPE} }; static const obj_visit_t ovisit1_new[] = { {".", H5O_TYPE_GROUP}, {"Dataset_one", H5O_TYPE_DATASET}, {"Group2", H5O_TYPE_GROUP}, {"Group2/Dataset_two", H5O_TYPE_DATASET}, {"Group2/Type_two", H5O_TYPE_NAMED_DATATYPE}, {"Group2/hard_zero", H5O_TYPE_GROUP}, {"Group2/hard_zero/Dataset_zero", H5O_TYPE_DATASET}, {"Group2/hard_zero/Type_zero", H5O_TYPE_NAMED_DATATYPE}, {"Type_one", H5O_TYPE_NAMED_DATATYPE} }; static const obj_visit_t ovisit2_old[] = { {".", H5O_TYPE_GROUP}, {"Dataset_two", H5O_TYPE_DATASET}, {"Type_two", H5O_TYPE_NAMED_DATATYPE}, {"hard_zero", H5O_TYPE_GROUP}, {"hard_zero/Dataset_zero", H5O_TYPE_DATASET}, {"hard_zero/Group1", H5O_TYPE_GROUP}, {"hard_zero/Group1/Dataset_one", H5O_TYPE_DATASET}, {"hard_zero/Group1/Type_one", H5O_TYPE_NAMED_DATATYPE}, {"hard_zero/Type_zero", H5O_TYPE_NAMED_DATATYPE} }; static const obj_visit_t ovisit2_new[] = { {".", H5O_TYPE_GROUP}, {"Dataset_two", H5O_TYPE_DATASET}, {"Type_two", H5O_TYPE_NAMED_DATATYPE}, {"hard_zero", H5O_TYPE_GROUP}, {"hard_zero/Dataset_zero", H5O_TYPE_DATASET}, {"hard_zero/Group1", H5O_TYPE_GROUP}, {"hard_zero/Group1/Dataset_one", H5O_TYPE_DATASET}, {"hard_zero/Group1/Type_one", H5O_TYPE_NAMED_DATATYPE}, {"hard_zero/Type_zero", H5O_TYPE_NAMED_DATATYPE} }; typedef struct { unsigned idx; /* Index in object visit structure */ const obj_visit_t *info; /* Pointer to the object visit structure to use */ } ovisit_ud_t; #endif static const char *FILENAME[] = { "link0", "link1.h5", "link2.h5", NULL }; /*------------------------------------------------------------------------- * Function: test_basic_links * * Purpose: Test building a file with assorted links. * * Return: Success: 0 * * Failure: -1 * * Programmer: Binh-Minh Ribler * October 16, 2009 * * Modifications: * *------------------------------------------------------------------------- */ static void test_basic_links(hid_t fapl_id, hbool_t new_format) { hsize_t size[1] = {1}; char filename[NAME_BUF_SIZE]; // Use the file access template id to create a file access prop. list. FileAccPropList fapl(fapl_id); try { if(new_format) SUBTEST("Link creation (w/new group format)") else SUBTEST("Link creation") h5_fixname(FILENAME[0], fapl_id, filename, sizeof filename); H5File file(filename, H5F_ACC_TRUNC, FileCreatPropList::DEFAULT, fapl); // Create simple dataspace DataSpace scalar (1, size, size); // Create a group then close it by letting the object go out of scope { Group group(file.createGroup("grp1", 0)); } // Create a dataset then close it by letting the object go out of scope { DataSet dset1(file.createDataSet("dset1", PredType::NATIVE_INT, scalar)); } hid_t file_id = file.getId(); // Because these are not implemented in the C++ API yet, they are // used so CommonFG::getLinkval can be tested. // Create a hard link if(H5Lcreate_hard( file_id, "dset1", H5L_SAME_LOC, "grp1/hard1", H5P_DEFAULT, H5P_DEFAULT) < 0) throw Exception("test_basic_links", "H5Lcreate_hard failed"); // Create a symbolic link if(H5Lcreate_soft( "/dset1", file_id, "grp1/soft", H5P_DEFAULT, H5P_DEFAULT) < 0) throw Exception("test_basic_links", "H5Lcreate_soft failed"); // Create a symbolic link to something that doesn't exist if(H5Lcreate_soft( "foobar", file_id, "grp1/dangle", H5P_DEFAULT, H5P_DEFAULT) < 0) throw Exception("test_basic_links", "H5Lcreate_soft failed"); // Create a recursive symbolic link if(H5Lcreate_soft( "/grp1/recursive", file_id, "/grp1/recursive", H5P_DEFAULT, H5P_DEFAULT) < 0) throw Exception("test_basic_links", "H5Lcreate_soft failed"); // Verify link values before closing the file H5std_string softlink_val = file.getLinkval("grp1/soft"); verify_val(softlink_val, "/dset1", "H5File::getLinkval grp1/soft", __LINE__, __FILE__); H5std_string dngllink_val = file.getLinkval("grp1/dangle"); verify_val(dngllink_val, "foobar", "H5File::getLinkval grp1/dangle", __LINE__, __FILE__); H5std_string reclink_val = file.getLinkval("grp1/recursive"); verify_val(reclink_val, "/grp1/recursive", "H5File::getLinkval grp1/recursive", __LINE__, __FILE__); } // end of try block catch (Exception& E) { issue_fail_msg("test_basic_links()", __LINE__, __FILE__, E.getCDetailMsg()); } // Open the file and check on the links in it try { // Open the file above H5File file(filename, H5F_ACC_RDWR, FileCreatPropList::DEFAULT, fapl); // Verify link existence if(file.nameExists("dset1", LinkAccPropList::DEFAULT) != TRUE) throw InvalidActionException("H5File::nameExists", "dset1 doesn't exist"); if(file.nameExists("grp1/soft", LinkAccPropList::DEFAULT) != TRUE) throw InvalidActionException("H5File::nameExists", "grp1/soft doesn't exist"); // Verify link values H5std_string softlink_val = file.getLinkval("grp1/soft"); verify_val(softlink_val, "/dset1", "H5File::getLinkval grp1/soft", __LINE__, __FILE__); H5std_string reclink_val = file.getLinkval("grp1/recursive"); verify_val(reclink_val, "/grp1/recursive", "H5File::getLinkval grp1/recursive", __LINE__, __FILE__); PASSED(); } // end of try block catch (Exception& E) { issue_fail_msg("test_basic_links()", __LINE__, __FILE__, E.getCDetailMsg()); } } /*------------------------------------------------------------------------- * Function: test_links * * Purpose: Test links * * Return: None * * Programmer: Binh-Minh Ribler * October 16, 2009 * *------------------------------------------------------------------------- */ extern "C" void test_links() { hid_t fapl_id, fapl2_id; /* File access property lists */ hbool_t new_format; /* Whether to use the new format or not */ const char *envval; envval = HDgetenv("HDF5_DRIVER"); if(envval == NULL) envval = "nomatch"; fapl_id = h5_fileaccess(); // Output message about test being performed MESSAGE(5, ("Testing Various Links\n")); try { /* Copy the file access property list */ if((fapl2_id = H5Pcopy(fapl_id)) < 0) throw Exception("test_links", "H5Pcopy failed"); /* Set the "use the latest version of the format" bounds for creating objects in the file */ if(H5Pset_libver_bounds(fapl2_id, H5F_LIBVER_LATEST, H5F_LIBVER_LATEST) < 0) throw Exception("test_links", "H5Pset_libver_bounds failed"); /* Loop over using new group format */ for(new_format = FALSE; new_format <= TRUE; new_format++) { hid_t my_fapl_id; /* Check for FAPL to use */ if(new_format) my_fapl_id = fapl2_id; else my_fapl_id = fapl_id; /* General tests... (on both old & new format groups */ // FileAccPropList may be passed in instead of fapl id test_basic_links(my_fapl_id, new_format); #if 0 // these tests are from the C test links.c and left here for future // implementation of H5L API nerrors += test_basic_links(fapl_id, new_format) < 0 ? 1 : 0; nerrors += cklinks(my_fapl, new_format) < 0 ? 1 : 0; nerrors += new_links(my_fapl, new_format) < 0 ? 1 : 0; nerrors += ck_new_links(my_fapl, new_format) < 0 ? 1 : 0; nerrors += long_links(my_fapl, new_format) < 0 ? 1 : 0; nerrors += toomany(my_fapl, new_format) < 0 ? 1 : 0; /* Test new H5L link creation routine */ nerrors += test_lcpl(my_fapl, new_format); nerrors += test_move(my_fapl, new_format); nerrors += test_copy(my_fapl, new_format); nerrors += test_move_preserves(my_fapl, new_format); #ifndef H5_NO_DEPRECATED_SYMBOLS nerrors += test_deprec(my_fapl, new_format); #endif /* H5_NO_DEPRECATED_SYMBOLS */ nerrors += external_link_root(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_path(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_mult(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_self(envval, my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_pingpong(envval, my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_toomany(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_dangling(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_recursive(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_query(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_unlink_compact(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_unlink_dense(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_move(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_ride(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_closing(envval, my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_endian(new_format) < 0 ? 1 : 0; nerrors += external_link_strong(my_fapl, new_format) < 0 ? 1 : 0; /* tests for external link */ nerrors += external_link_env(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_prefix(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_abs_mainpath(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_rel_mainpath(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_cwd(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_abstar(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_abstar_cur(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_reltar(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_chdir(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_set_elink_fapl1(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_set_elink_fapl2(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_set_elink_fapl3(new_format) < 0 ? 1 : 0; nerrors += external_set_elink_acc_flags(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_set_elink_cb(my_fapl, new_format) < 0 ? 1 : 0; #ifdef H5_HAVE_WINDOW_PATH nerrors += external_link_win1(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_win2(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_win3(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_win4(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_win5(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_win6(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_win7(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_win8(my_fapl, new_format) < 0 ? 1 : 0; nerrors += external_link_win9(my_fapl, new_format) < 0 ? 1 : 0; #endif /* These tests assume that external links are a form of UD links, * so assume that everything that passed for external links * above has already been tested for UD links. */ if(new_format == TRUE) { nerrors += ud_hard_links(fapl2) < 0 ? 1 : 0; /* requires new format groups */ nerrors += ud_link_reregister(fapl2) < 0 ? 1 : 0; /* requires new format groups */ } /* end if */ nerrors += ud_callbacks(my_fapl, new_format) < 0 ? 1 : 0; nerrors += ud_link_errors(my_fapl, new_format) < 0 ? 1 : 0; nerrors += lapl_udata(my_fapl, new_format) < 0 ? 1 : 0; nerrors += lapl_nlinks(my_fapl, new_format) < 0 ? 1 : 0; nerrors += linkinfo(my_fapl, new_format) < 0 ? 1 : 0; /* Misc. extra tests, useful for both new & old format files */ nerrors += link_visit(my_fapl, new_format) < 0 ? 1 : 0; nerrors += link_visit_by_name(my_fapl, new_format) < 0 ? 1 : 0; nerrors += obj_visit(my_fapl, new_format) < 0 ? 1 : 0; nerrors += obj_visit_by_name(my_fapl, new_format) < 0 ? 1 : 0; nerrors += obj_visit_stop(my_fapl, new_format) < 0 ? 1 : 0; /* Keep this test last, it's testing files that are used above */ /* do not do this for files used by external link tests */ nerrors += check_all_closed(my_fapl, new_format, EXTSTOP) < 0 ? 1 : 0; #endif // 0 } /* end for */ #if 0 /* New group revision feature tests */ nerrors += corder_create_empty(fapl2) < 0 ? 1 : 0; /* XXX: when creation order indexing is fully working, go back and add checks * to these tests to make certain that the creation order values are * correct. */ nerrors += corder_create_compact(fapl2) < 0 ? 1 : 0; nerrors += corder_create_dense(fapl2) < 0 ? 1 : 0; nerrors += corder_transition(fapl2) < 0 ? 1 : 0; nerrors += corder_delete(fapl2) < 0 ? 1 : 0; nerrors += link_info_by_idx(fapl2) < 0 ? 1 : 0; nerrors += delete_by_idx(fapl2) < 0 ? 1 : 0; nerrors += link_iterate(fapl2) < 0 ? 1 : 0; nerrors += open_by_idx(fapl2) < 0 ? 1 : 0; nerrors += object_info(fapl2) < 0 ? 1 : 0; nerrors += group_info(fapl2) < 0 ? 1 : 0; nerrors += timestamps(fapl2) < 0 ? 1 : 0; /* Test new API calls on old-style groups */ nerrors += link_info_by_idx_old(fapl) < 0 ? 1 : 0; nerrors += delete_by_idx_old(fapl) < 0 ? 1 : 0; nerrors += link_iterate_old(fapl) < 0 ? 1 : 0; nerrors += open_by_idx_old(fapl) < 0 ? 1 : 0; nerrors += object_info_old(fapl) < 0 ? 1 : 0; nerrors += group_info_old(fapl) < 0 ? 1 : 0; #endif /* Close 2nd FAPL */ H5Pclose(fapl2_id); h5_clean_files(FILENAME, fapl_id); /* Test that external links can be used after a library reset. MUST be * called last so the reset doesn't interfere with the property lists. This * routine will delete its own file. */ /* nerrors += external_reset_register() < 0 ? 1 : 0; */ } catch (Exception& E) { issue_fail_msg("test_links()", __LINE__, __FILE__, E.getCDetailMsg()); } } /*------------------------------------------------------------------------- * Function: cleanup_links * * Purpose: Cleanup temporary test files * * Return: none * * Programmer: Binh-Minh Ribler * October 16, 2009 * * Modifications: * *------------------------------------------------------------------------- */ extern "C" void cleanup_links() { HDremove(FILENAME[0]); }
generated by cgit v0.12 at 2024-10-05 23:45:27 (GMT)